| 1 | /* Copyright (C) 1999, 2000, 2001, 2002 Free Software Foundation
|
|---|
| 2 |
|
|---|
| 3 | This file is part of libgcj.
|
|---|
| 4 |
|
|---|
| 5 | This software is copyrighted work licensed under the terms of the
|
|---|
| 6 | Libgcj License. Please consult the file "LIBGCJ_LICENSE" for
|
|---|
| 7 | details. */
|
|---|
| 8 |
|
|---|
| 9 | /* Author: Kresten Krab Thorup <krab@gnu.org> */
|
|---|
| 10 |
|
|---|
| 11 | #include <config.h>
|
|---|
| 12 |
|
|---|
| 13 | #include <jvm.h>
|
|---|
| 14 | #include <gcj/cni.h>
|
|---|
| 15 | #include <java-props.h>
|
|---|
| 16 |
|
|---|
| 17 | #include <stdio.h>
|
|---|
| 18 | #include <string.h>
|
|---|
| 19 | #include <stdlib.h>
|
|---|
| 20 |
|
|---|
| 21 | #include <java/lang/System.h>
|
|---|
| 22 | #include <java/util/Properties.h>
|
|---|
| 23 |
|
|---|
| 24 | static void
|
|---|
| 25 | help ()
|
|---|
| 26 | {
|
|---|
| 27 | printf ("Usage: gij [OPTION] ... CLASS [ARGS] ...\n");
|
|---|
| 28 | printf (" to interpret Java bytecodes, or\n");
|
|---|
| 29 | printf (" gij -jar [OPTION] ... JARFILE [ARGS] ...\n");
|
|---|
| 30 | printf (" to execute a jar file\n\n");
|
|---|
| 31 | printf (" -DVAR=VAL define property VAR with value VAL\n");
|
|---|
| 32 | printf (" --help print this help, then exit\n");
|
|---|
| 33 | printf (" --ms=NUMBER set initial heap size\n");
|
|---|
| 34 | printf (" --mx=NUMBER set maximum heap size\n");
|
|---|
| 35 | printf (" --version print version number, then exit\n");
|
|---|
| 36 | printf ("\nSee http://gcc.gnu.org/java/ for information on reporting bugs\n");
|
|---|
| 37 | exit (0);
|
|---|
| 38 | }
|
|---|
| 39 |
|
|---|
| 40 | static void
|
|---|
| 41 | version ()
|
|---|
| 42 | {
|
|---|
| 43 | printf ("gij (GNU libgcj) version %s\n\n", __VERSION__);
|
|---|
| 44 | printf ("Copyright (C) 2002 Free Software Foundation, Inc.\n");
|
|---|
| 45 | printf ("This is free software; see the source for copying conditions. There is NO\n");
|
|---|
| 46 | printf ("warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n");
|
|---|
| 47 | exit (0);
|
|---|
| 48 | }
|
|---|
| 49 |
|
|---|
| 50 | int
|
|---|
| 51 | main (int argc, const char **argv)
|
|---|
| 52 | {
|
|---|
| 53 | /* We rearrange ARGV so that all the -D options appear near the
|
|---|
| 54 | beginning. */
|
|---|
| 55 | int last_D_option = 0;
|
|---|
| 56 | bool jar_mode = false;
|
|---|
| 57 |
|
|---|
| 58 | int i;
|
|---|
| 59 | for (i = 1; i < argc; ++i)
|
|---|
| 60 | {
|
|---|
| 61 | const char *arg = argv[i];
|
|---|
| 62 |
|
|---|
| 63 | /* A non-option stops processing. */
|
|---|
| 64 | if (arg[0] != '-')
|
|---|
| 65 | break;
|
|---|
| 66 | /* A "--" stops processing. */
|
|---|
| 67 | if (! strcmp (arg, "--"))
|
|---|
| 68 | {
|
|---|
| 69 | ++i;
|
|---|
| 70 | break;
|
|---|
| 71 | }
|
|---|
| 72 |
|
|---|
| 73 | if (! strncmp (arg, "-D", 2))
|
|---|
| 74 | {
|
|---|
| 75 | argv[last_D_option++] = arg + 2;
|
|---|
| 76 | continue;
|
|---|
| 77 | }
|
|---|
| 78 |
|
|---|
| 79 | if (! strcmp (arg, "-jar"))
|
|---|
| 80 | {
|
|---|
| 81 | jar_mode = true;
|
|---|
| 82 | continue;
|
|---|
| 83 | }
|
|---|
| 84 |
|
|---|
| 85 | /* Allow both single or double hyphen for all remaining
|
|---|
| 86 | options. */
|
|---|
| 87 | if (arg[1] == '-')
|
|---|
| 88 | ++arg;
|
|---|
| 89 |
|
|---|
| 90 | if (! strcmp (arg, "-help"))
|
|---|
| 91 | help ();
|
|---|
| 92 | else if (! strcmp (arg, "-version"))
|
|---|
| 93 | version ();
|
|---|
| 94 | /* FIXME: use getopt and avoid the ugliness here.
|
|---|
| 95 | We at least need to handle the argument in a better way. */
|
|---|
| 96 | else if (! strncmp (arg, "-ms=", 4))
|
|---|
| 97 | _Jv_SetInitialHeapSize (arg + 4);
|
|---|
| 98 | else if (! strcmp (arg, "-ms"))
|
|---|
| 99 | {
|
|---|
| 100 | if (i >= argc - 1)
|
|---|
| 101 | {
|
|---|
| 102 | no_arg:
|
|---|
| 103 | fprintf (stderr, "gij: option requires an argument -- `%s'\n",
|
|---|
| 104 | argv[i]);
|
|---|
| 105 | fprintf (stderr, "Try `gij --help' for more information.\n");
|
|---|
| 106 | exit (1);
|
|---|
| 107 | }
|
|---|
| 108 | _Jv_SetInitialHeapSize (argv[++i]);
|
|---|
| 109 | }
|
|---|
| 110 | else if (! strncmp (arg, "-mx=", 4))
|
|---|
| 111 | _Jv_SetMaximumHeapSize (arg + 4);
|
|---|
| 112 | else if (! strcmp (arg, "-mx"))
|
|---|
| 113 | {
|
|---|
| 114 | if (i >= argc - 1)
|
|---|
| 115 | goto no_arg;
|
|---|
| 116 | _Jv_SetMaximumHeapSize (argv[++i]);
|
|---|
| 117 | }
|
|---|
| 118 | else
|
|---|
| 119 | {
|
|---|
| 120 | fprintf (stderr, "gij: unrecognized option -- `%s'\n", argv[i]);
|
|---|
| 121 | fprintf (stderr, "Try `gij --help' for more information.\n");
|
|---|
| 122 | exit (1);
|
|---|
| 123 | }
|
|---|
| 124 | }
|
|---|
| 125 |
|
|---|
| 126 | argv[last_D_option] = NULL;
|
|---|
| 127 | _Jv_Compiler_Properties = argv;
|
|---|
| 128 |
|
|---|
| 129 | if (argc - i < 1)
|
|---|
| 130 | {
|
|---|
| 131 | fprintf (stderr, "Usage: gij [OPTION] ... CLASS [ARGS] ...\n");
|
|---|
| 132 | fprintf (stderr, " to invoke CLASS.main, or\n");
|
|---|
| 133 | fprintf (stderr, " gij -jar [OPTION] ... JARFILE [ARGS] ...\n");
|
|---|
| 134 | fprintf (stderr, " to execute a jar file\n");
|
|---|
| 135 | fprintf (stderr, "Try `gij --help' for more information.\n");
|
|---|
| 136 | exit (1);
|
|---|
| 137 | }
|
|---|
| 138 |
|
|---|
| 139 | _Jv_RunMain (NULL, argv[i], argc - i, argv + i, jar_mode);
|
|---|
| 140 | }
|
|---|