* libiberty.h (expandargv): New function.
[official-gcc.git] / libjava / gij.cc
blob7c8d8b4222b45c71e23d14f070cecd17d5c3f74d
1 /* Copyright (C) 1999-2005 Free Software Foundation
3 This file is part of libgcj.
5 This software is copyrighted work licensed under the terms of the
6 Libgcj License. Please consult the file "LIBGCJ_LICENSE" for
7 details. */
9 #include <config.h>
11 #include <jvm.h>
12 #include <gcj/cni.h>
14 #include <stdio.h>
15 #include <string.h>
16 #include <stdlib.h>
18 static void
19 help ()
21 printf ("Usage: gij [OPTION] ... CLASS [ARGS] ...\n");
22 printf (" to interpret Java bytecodes, or\n");
23 printf (" gij -jar [OPTION] ... JARFILE [ARGS] ...\n");
24 printf (" to execute a jar file\n\n");
25 printf (" --cp LIST set class path\n");
26 printf (" --classpath LIST set class path\n");
27 printf (" -DVAR=VAL define property VAR with value VAL\n");
28 printf (" -?, --help print this help, then exit\n");
29 printf (" -X print help on supported -X options, then exit\n");
30 printf (" --ms=NUMBER set initial heap size\n");
31 printf (" --mx=NUMBER set maximum heap size\n");
32 printf (" --verbose[:class] print information about class loading\n");
33 printf (" --showversion print version number, then keep going\n");
34 printf (" --version print version number, then exit\n");
35 printf ("\nOptions can be specified with `-' or `--'.\n");
36 printf ("\nSee http://gcc.gnu.org/java/ for information on reporting bugs\n");
37 exit (0);
40 static void
41 version ()
43 printf ("java version \"" JV_VERSION "\"\n");
44 printf ("gij (GNU libgcj) version %s\n\n", __VERSION__);
45 printf ("Copyright (C) 2005 Free Software Foundation, Inc.\n");
46 printf ("This is free software; see the source for copying conditions. There is NO\n");
47 printf ("warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n");
50 static void
51 nonstandard_opts_help ()
53 printf (" -Xms<size> set initial heap size\n");
54 printf (" -Xmx<size> set maximum heap size\n");
55 exit (0);
58 static void
59 add_option (JvVMInitArgs& vm_args, char const* option, void const* extra)
61 vm_args.options =
62 (JvVMOption*) JvRealloc (vm_args.options,
63 (vm_args.nOptions + 1) * sizeof (JvVMOption));
65 vm_args.options[vm_args.nOptions].optionString = const_cast<char*> (option);
66 vm_args.options[vm_args.nOptions].extraInfo = const_cast<void*> (extra);
67 ++vm_args.nOptions;
70 int
71 main (int argc, char const** argv)
73 JvVMInitArgs vm_args;
74 bool jar_mode = false;
76 vm_args.options = NULL;
77 vm_args.nOptions = 0;
78 vm_args.ignoreUnrecognized = true;
80 // Command-line options always override the CLASSPATH environment
81 // variable.
82 char *classpath = getenv("CLASSPATH");
84 if (classpath)
86 char* darg = (char*) JvMalloc (strlen (classpath)
87 + sizeof ("-Djava.class.path="));
88 sprintf (darg, "-Djava.class.path=%s", classpath);
89 add_option (vm_args, darg, NULL);
92 // Handle arguments to the java command. Store in vm_args arguments
93 // handled by the invocation API.
94 int i;
95 for (i = 1; i < argc; ++i)
97 char* arg = const_cast<char*> (argv[i]);
99 // A non-option stops processing.
100 if (arg[0] != '-')
101 break;
103 // A "--" stops processing.
104 if (! strcmp (arg, "--"))
106 ++i;
107 break;
110 // Allow both single or double hyphen for all options.
111 if (arg[1] == '-')
112 ++arg;
114 // Ignore JIT options
115 if (! strcmp (arg, "-client"))
116 continue;
117 else if (! strcmp (arg, "-server"))
118 continue;
119 else if (! strcmp (arg, "-hotspot"))
120 continue;
121 else if (! strcmp (arg, "-jrockit"))
122 continue;
123 // Ignore JVM Tool Interface options
124 else if (! strncmp (arg, "-agentlib:", sizeof ("-agentlib:") - 1))
125 continue;
126 else if (! strncmp (arg, "-agentpath:", sizeof ("-agentpath:") - 1))
127 continue;
128 else if (! strcmp (arg, "-classpath") || ! strcmp (arg, "-cp"))
130 if (i >= argc - 1)
132 no_arg:
133 fprintf (stderr, "gij: option requires an argument -- `%s'\n",
134 argv[i]);
135 fprintf (stderr, "Try `gij --help' for more information.\n");
136 exit (1);
139 // Sun seems to translate the -classpath option into
140 // -Djava.class.path because if both -classpath and
141 // -Djava.class.path are specified on the java command line,
142 // the last one always wins.
143 char* darg = (char*) JvMalloc (strlen (argv[++i])
144 + sizeof ("-Djava.class.path="));
145 sprintf (darg, "-Djava.class.path=%s", argv[i]);
146 add_option (vm_args, darg, NULL);
148 else if (! strcmp (arg, "-debug"))
150 char* xarg = strdup ("-Xdebug");
151 add_option (vm_args, xarg, NULL);
153 else if (! strncmp (arg, "-D", sizeof ("-D") - 1))
154 add_option (vm_args, arg, NULL);
155 // Ignore 32/64-bit JIT options
156 else if (! strcmp (arg, "-d32") || ! strcmp (arg, "-d64"))
157 continue;
158 else if (! strncmp (arg, "-enableassertions", sizeof ("-enableassertions") - 1)
159 || ! strncmp (arg, "-ea", sizeof ("-ea") - 1))
161 // FIXME: hook up assertion support
162 continue;
164 else if (! strncmp (arg, "-disableassertions", sizeof ("-disableassertions") - 1)
165 || ! strncmp (arg, "-da", sizeof ("-da") - 1))
167 // FIXME: hook up assertion support
168 continue;
170 else if (! strcmp (arg, "-enablesystemassertions")
171 || ! strcmp (arg, "-esa"))
173 // FIXME: hook up system assertion support
174 continue;
176 else if (! strcmp (arg, "-disablesystemassertions")
177 || ! strcmp (arg, "-dsa"))
179 // FIXME
180 continue;
182 else if (! strcmp (arg, "-jar"))
184 jar_mode = true;
185 continue;
187 // Ignore java.lang.instrument option
188 else if (! strncmp (arg, "-javaagent:", sizeof ("-javaagent:") - 1))
189 continue;
190 else if (! strcmp (arg, "-noclassgc"))
192 char* xarg = strdup ("-Xnoclassgc");
193 add_option (vm_args, xarg, NULL);
195 // -ms=n
196 else if (! strncmp (arg, "-ms=", sizeof ("-ms=") - 1))
198 arg[1] = 'X';
199 arg[2] = 'm';
200 arg[3] = 's';
201 add_option (vm_args, arg, NULL);
203 // -ms n
204 else if (! strcmp (arg, "-ms"))
206 if (i >= argc - 1)
207 goto no_arg;
209 char* xarg = (char*) JvMalloc (strlen (argv[++i])
210 + sizeof ("-Xms"));
211 sprintf (xarg, "-Xms%s", argv[i]);
212 add_option (vm_args, xarg, NULL);
214 // -msn
215 else if (! strncmp (arg, "-ms", sizeof ("-ms") - 1))
217 char* xarg = (char*) JvMalloc (strlen (arg) + sizeof ("X"));
218 sprintf (xarg, "-Xms%s", arg + sizeof ("-Xms") - 1);
219 add_option (vm_args, xarg, NULL);
221 // -mx=n
222 else if (! strncmp (arg, "-mx=", sizeof ("-mx=") - 1))
224 arg[1] = 'X';
225 arg[2] = 'm';
226 arg[3] = 'x';
227 add_option (vm_args, arg, NULL);
229 // -mx n
230 else if (! strcmp (arg, "-mx"))
232 if (i >= argc - 1)
233 goto no_arg;
235 char* xarg = (char*) JvMalloc (strlen (argv[++i])
236 + sizeof ("-Xmx"));
237 sprintf (xarg, "-Xmx%s", argv[i]);
238 add_option (vm_args, xarg, NULL);
240 // -mxn
241 else if (! strncmp (arg, "-mx", sizeof ("-mx") - 1))
243 char* xarg = (char*) JvMalloc (strlen (arg) + sizeof ("X"));
244 sprintf (xarg, "-Xmx%s", arg + sizeof ("-Xmx") - 1);
245 add_option (vm_args, xarg, NULL);
247 // -ss=n
248 else if (! strncmp (arg, "-ss=", sizeof ("-ss=") - 1))
250 arg[1] = 'X';
251 arg[2] = 's';
252 arg[3] = 's';
253 add_option (vm_args, arg, NULL);
255 // -ss n
256 else if (! strcmp (arg, "-ss"))
258 if (i >= argc - 1)
259 goto no_arg;
261 char* xarg = (char*) JvMalloc (strlen (argv[++i])
262 + sizeof ("-Xss"));
263 sprintf (xarg, "-Xss%s", argv[i]);
264 add_option (vm_args, xarg, NULL);
266 // -ssn
267 else if (! strncmp (arg, "-ss", sizeof ("-ss") - 1))
269 char* xarg = (char*) JvMalloc (strlen (arg) + sizeof ("X"));
270 sprintf (xarg, "-Xss%s", arg + sizeof ("-Xss") - 1);
271 add_option (vm_args, xarg, NULL);
273 // This handles all the option variants that begin with
274 // -verbose.
275 else if (! strncmp (arg, "-verbose", 8))
276 add_option (vm_args, arg, NULL);
277 else if (! strcmp (arg, "-version"))
279 version ();
280 exit (0);
282 else if (! strcmp (arg, "-fullversion"))
284 printf ("java full version \"gcj-" JV_VERSION "\"\n");
285 exit (0);
287 else if (! strcmp (arg, "-showversion"))
288 version ();
289 else if (! strcmp (arg, "-help") || ! strcmp (arg, "-?"))
290 help ();
291 else if (! strcmp (arg, "-X"))
292 nonstandard_opts_help ();
293 else if (! strncmp (arg, "-X", 2))
294 add_option (vm_args, arg, NULL);
295 // Obsolete options recognized for backwards-compatibility.
296 else if (! strcmp (arg, "-verify")
297 || ! strcmp (arg, "-verifyremote"))
298 continue;
299 else if (! strcmp (arg, "-noverify"))
301 gcj::verifyClasses = false;
303 else
305 fprintf (stderr, "gij: unrecognized option -- `%s'\n", argv[i]);
306 fprintf (stderr, "Try `gij --help' for more information.\n");
307 exit (1);
311 if (argc - i < 1)
313 fprintf (stderr, "Usage: gij [OPTION] ... CLASS [ARGS] ...\n");
314 fprintf (stderr, " to invoke CLASS.main, or\n");
315 fprintf (stderr, " gij -jar [OPTION] ... JARFILE [ARGS] ...\n");
316 fprintf (stderr, " to execute a jar file\n");
317 fprintf (stderr, "Try `gij --help' for more information.\n");
318 exit (1);
321 // -jar mode overrides all other modes of specifying class path:
322 // CLASSPATH, -Djava.class.path, -classpath and -cp.
323 if (jar_mode)
325 char* darg = (char*) JvMalloc (strlen (argv[i])
326 + sizeof ("-Djava.class.path="));
327 sprintf (darg, "-Djava.class.path=%s", argv[i]);
328 add_option (vm_args, darg, NULL);
331 _Jv_RunMain (&vm_args, NULL, argv[i], argc - i,
332 (char const**) (argv + i), jar_mode);