1 /* src/vmcore/options.c - contains global options
3 Copyright (C) 1996-2005, 2006, 2007 R. Grafl, A. Krall, C. Kruegel,
4 C. Oates, R. Obermaisser, M. Platter, M. Probst, S. Ring,
5 E. Steiner, C. Thalinger, D. Thuernbeck, P. Tomsich, C. Ullrich,
6 J. Wenninger, Institut f. Computersprachen - TU Wien
8 This file is part of CACAO.
10 This program is free software; you can redistribute it and/or
11 modify it under the terms of the GNU General Public License as
12 published by the Free Software Foundation; either version 2, or (at
13 your option) any later version.
15 This program is distributed in the hope that it will be useful, but
16 WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
35 #if defined(HAVE_STRING_H)
41 #include "mm/memory.h"
43 #include "native/jni.h"
47 #include "vmcore/options.h"
50 /* command line option ********************************************************/
52 s4 opt_index = 0; /* index of processed arguments */
53 char *opt_arg; /* this one exports the option argument */
55 bool opt_foo = false; /* option for development */
59 #if defined(ENABLE_JIT)
60 bool opt_jit = true; /* JIT mode execution (default) */
61 bool opt_intrp = false; /* interpreter mode execution */
63 bool opt_jit = false; /* JIT mode execution */
64 bool opt_intrp = true; /* interpreter mode execution (default) */
69 s4 opt_heapmaxsize = 0; /* maximum heap size */
70 s4 opt_heapstartsize = 0; /* initial heap size */
71 s4 opt_stacksize = 0; /* thread stack size */
73 bool opt_verbose = false;
74 bool opt_debugcolor = false; /* use ANSI terminal sequences */
75 bool compileall = false;
77 bool loadverbose = false;
78 bool linkverbose = false;
79 bool initverbose = false;
81 bool opt_verboseclass = false;
82 bool opt_verbosegc = false;
83 bool opt_verbosejni = false;
84 bool opt_verbosecall = false; /* trace all method invocation */
85 bool opt_verbosethreads = false;
87 bool showmethods = false;
88 bool showconstantpool = false;
91 char *opt_method = NULL;
92 char *opt_signature = NULL;
94 bool compileverbose = false; /* trace compiler actions */
95 bool showstack = false;
97 bool opt_showdisassemble = false; /* generate disassembler listing */
98 bool opt_shownops = false;
99 bool opt_showddatasegment = false; /* generate data segment listing */
100 bool opt_showintermediate = false; /* generate intermediate code listing */
101 bool opt_showexceptionstubs = false;
103 bool checkbounds = true; /* check array bounds */
104 bool opt_noieee = false; /* don't implement ieee compliant floats */
105 bool checksync = true; /* do synchronization */
106 #if defined(ENABLE_LOOP)
107 bool opt_loops = false; /* optimize array accesses in loops */
110 bool makeinitializations = true;
112 #if defined(ENABLE_STATISTICS)
113 bool opt_stat = false;
114 bool opt_getloadingtime = false; /* to measure the runtime */
115 bool opt_getcompilingtime = false; /* compute compile time */
117 #if defined(ENABLE_VERIFIER)
118 bool opt_verify = true; /* true if classfiles should be verified */
121 #if defined(ENABLE_PROFILING)
122 bool opt_prof = false;
123 bool opt_prof_bb = false;
127 /* inlining options ***********************************************************/
129 #if defined(ENABLE_INLINING)
130 bool opt_inlining = false;
131 #if defined(ENABLE_INLINING_DEBUG) || !defined(NDEBUG)
132 s4 opt_inline_debug_min_size = 0;
133 s4 opt_inline_debug_max_size = INT_MAX;
134 s4 opt_inline_debug_end_counter = INT_MAX;
135 bool opt_inline_debug_all = false;
136 #endif /* defined(ENABLE_INLINING_DEBUG) || !defined(NDEBUG) */
138 bool opt_inline_debug_log = false;
139 #endif /* !defined(NDEBUG) */
140 #endif /* defined(ENABLE_INLINING) */
143 /* optimization options *******************************************************/
145 #if defined(ENABLE_IFCONV)
146 bool opt_ifconv = false;
149 #if defined(ENABLE_LSRA) || defined(ENABLE_SSA)
150 bool opt_lsra = false;
154 /* interpreter options ********************************************************/
156 #if defined(ENABLE_INTRP)
157 bool opt_no_dynamic = false; /* suppress dynamic superinstructions */
158 bool opt_no_replication = false; /* don't use replication in intrp */
159 bool opt_no_quicksuper = false; /* instructions for quickening cannot be
160 part of dynamic superinstructions */
162 s4 opt_static_supers = 0x7fffffff;
163 bool vm_debug = false; /* XXX this should be called `opt_trace' */
166 #if defined(ENABLE_DEBUG_FILTER)
167 const char *opt_filter_verbosecall_include = 0;
168 const char *opt_filter_verbosecall_exclude = 0;
169 const char *opt_filter_show_method = 0;
173 /* -XX options ****************************************************************/
175 /* NOTE: For better readability keep these alpha-sorted. */
177 int32_t opt_DebugStackFrameInfo = 0;
178 int32_t opt_DebugStackTrace = 0;
179 #if defined(ENABLE_DISASSEMBLER)
180 int opt_DisassembleStubs = 0;
182 #if defined(ENABLE_GC_CACAO)
183 int32_t opt_GCDebugRootSet = 0;
184 int32_t opt_GCStress = 0;
186 int32_t opt_MaxPermSize = 0;
187 int32_t opt_PermSize = 0;
188 int opt_PrintConfig = 0;
189 int32_t opt_ProfileGCMemoryUsage = 0;
190 int32_t opt_ProfileMemoryUsage = 0;
191 FILE *opt_ProfileMemoryUsageGNUPlot = NULL;
192 int32_t opt_ThreadStackSize = 0;
193 int32_t opt_TraceExceptions = 0;
194 int32_t opt_TraceJavaCalls = 0;
195 int32_t opt_TraceJNICalls = 0;
196 int32_t opt_TraceJVMCalls = 0;
197 #if defined(ENABLE_REPLACEMENT)
198 int32_t opt_TraceReplacement = 0;
208 OPT_DebugStackFrameInfo,
210 OPT_DisassembleStubs,
216 OPT_ProfileGCMemoryUsage,
217 OPT_ProfileMemoryUsage,
218 OPT_ProfileMemoryUsageGNUPlot,
228 option_t options_XX[] = {
229 { "DebugStackFrameInfo", OPT_DebugStackFrameInfo, OPT_TYPE_BOOLEAN, "TODO" },
230 { "DebugStackTrace", OPT_DebugStackTrace, OPT_TYPE_BOOLEAN, "debug stacktrace creation" },
231 #if defined(ENABLE_DISASSEMBLER)
232 { "DisassembleStubs", OPT_DisassembleStubs, OPT_TYPE_BOOLEAN, "disassemble builtin and native stubs when generated" },
234 #if defined(ENABLE_GC_CACAO)
235 { "GCDebugRootSet", OPT_GCDebugRootSet, OPT_TYPE_BOOLEAN, "GC: print root-set at collection" },
236 { "GCStress", OPT_GCStress, OPT_TYPE_BOOLEAN, "GC: forced collection at every allocation" },
238 { "MaxPermSize", OPT_MaxPermSize, OPT_TYPE_VALUE, "not implemented" },
239 { "PermSize", OPT_PermSize, OPT_TYPE_VALUE, "not implemented" },
240 { "PrintConfig", OPT_PrintConfig, OPT_TYPE_BOOLEAN, "print VM configuration" },
241 { "ProfileGCMemoryUsage", OPT_ProfileGCMemoryUsage, OPT_TYPE_VALUE, "profiles GC memory usage in the given interval, <value> is in seconds (default: 5)" },
242 { "ProfileMemoryUsage", OPT_ProfileMemoryUsage, OPT_TYPE_VALUE, "TODO" },
243 { "ProfileMemoryUsageGNUPlot", OPT_ProfileMemoryUsageGNUPlot, OPT_TYPE_VALUE, "TODO" },
244 { "ThreadStackSize", OPT_ThreadStackSize, OPT_TYPE_VALUE, "TODO" },
245 { "TraceExceptions", OPT_TraceExceptions, OPT_TYPE_BOOLEAN, "trace Exception throwing" },
246 { "TraceJavaCalls", OPT_TraceJavaCalls, OPT_TYPE_BOOLEAN, "trace Java method calls" },
247 { "TraceJNICalls", OPT_TraceJNICalls, OPT_TYPE_BOOLEAN, "trace JNI method calls" },
248 { "TraceJVMCalls", OPT_TraceJVMCalls, OPT_TYPE_BOOLEAN, "TODO" },
249 #if defined(ENABLE_REPLACEMENT)
250 { "TraceReplacement", OPT_TraceReplacement, OPT_TYPE_VALUE, "trace on-stack replacement with the given verbosity level (default: 1)" },
255 { NULL, -1, -1, NULL }
259 /* options_get *****************************************************************
263 *******************************************************************************/
265 s4 options_get(opt_struct *opts, JavaVMInitArgs *vm_args)
270 if (opt_index >= vm_args->nOptions)
273 /* get the current option */
275 option = vm_args->options[opt_index].optionString;
277 if ((option == NULL) || (option[0] != '-'))
280 for (i = 0; opts[i].name; i++) {
282 /* boolean option found */
284 if (strcmp(option + 1, opts[i].name) == 0) {
286 return opts[i].value;
290 /* parameter option found */
292 /* with a space between */
294 if (strcmp(option + 1, opts[i].name) == 0) {
297 if (opt_index < vm_args->nOptions) {
299 #if defined(HAVE_STRDUP)
300 opt_arg = strdup(vm_args->options[opt_index].optionString);
306 return opts[i].value;
312 /* parameter and option have no space between */
314 /* FIXME: this assumption is plain wrong, hits you if there is a
315 * parameter with no argument starting with same letter as param with argument
316 * but named after that one, ouch! */
318 size_t l = strlen(opts[i].name);
320 if (strlen(option + 1) > l) {
321 if (memcmp(option + 1, opts[i].name, l) == 0) {
324 #if defined(HAVE_STRDUP)
325 opt_arg = strdup(option + 1 + l);
330 return opts[i].value;
341 /* options_xxusage *************************************************************
343 Print usage message for debugging options.
345 *******************************************************************************/
347 static void options_xxusage(void)
354 for (opt = options_XX; opt->name != NULL; opt++) {
358 case OPT_TYPE_BOOLEAN:
359 printf("+%s", opt->name);
360 length = strlen(" -XX:+") + strlen(opt->name);
363 printf("%s=<value>", opt->name);
364 length = strlen(" -XX:") + strlen(opt->name) + strlen("=<value>");
368 /* Check if the help fits into one 80-column line.
369 Documentation starts at column 29. */
371 if (length < (29 - 1)) {
372 /* Print missing spaces up to column 29. */
374 for (i = length; i < 29; i++)
379 printf(" "); /* 29 spaces */
382 /* Check documentation length. */
384 length = strlen(opt->doc);
386 if (length < (80 - 29)) {
387 printf("%s", opt->doc);
390 for (c = opt->doc, i = 29; *c != 0; c++, i++) {
391 /* If we are at the end of the line, break it. */
395 printf(" "); /* 29 spaces */
406 /* exit with error code */
412 /* options_xx ******************************************************************
416 *******************************************************************************/
418 void options_xx(const char *name)
429 /* Check for help (-XX), in this case name is NULL. */
434 /* Check if the option is a boolean option. */
436 if (name[0] == '+') {
440 else if (name[0] == '-') {
449 /* Search for a '=' in the option name and get the option name
450 length and the value of the option. */
452 end = strchr(start, '=');
455 length = strlen(start);
459 length = end - start;
463 /* search the option in the option array */
465 for (opt = options_XX; opt->name != NULL; opt++) {
466 if (strncmp(opt->name, start, length) == 0) {
467 /* Check if the options passed fits to the type. */
470 case OPT_TYPE_BOOLEAN:
471 if ((enable == -1) || (value != NULL))
475 if ((enable != -1) || (value == NULL))
479 vm_abort("options_xx: unknown option type %d for option %s",
480 opt->type, opt->name);
487 /* process the option */
489 switch (opt->value) {
490 case OPT_DebugStackFrameInfo:
491 opt_DebugStackFrameInfo = enable;
494 case OPT_DebugStackTrace:
495 opt_DebugStackTrace = enable;
498 #if defined(ENABLE_DISASSEMBLER)
499 case OPT_DisassembleStubs:
500 opt_DisassembleStubs = enable;
504 #if defined(ENABLE_GC_CACAO)
505 case OPT_GCDebugRootSet:
506 opt_GCDebugRootSet = enable;
510 opt_GCStress = enable;
514 case OPT_MaxPermSize:
515 /* currently ignored */
519 /* currently ignored */
522 case OPT_PrintConfig:
526 case OPT_ProfileGCMemoryUsage:
528 opt_ProfileGCMemoryUsage = 5;
530 opt_ProfileGCMemoryUsage = atoi(value);
533 case OPT_ProfileMemoryUsage:
535 opt_ProfileMemoryUsage = 5;
537 opt_ProfileMemoryUsage = atoi(value);
539 # if defined(ENABLE_STATISTICS)
540 /* we also need statistics */
546 case OPT_ProfileMemoryUsageGNUPlot:
548 filename = "profile.dat";
552 file = fopen(filename, "w");
555 vm_abort("options_xx: fopen failed: %s", strerror(errno));
557 opt_ProfileMemoryUsageGNUPlot = file;
560 case OPT_ThreadStackSize:
561 /* currently ignored */
564 case OPT_TraceExceptions:
565 opt_TraceExceptions = enable;
568 case OPT_TraceJavaCalls:
569 opt_verbosecall = enable;
570 opt_TraceJavaCalls = enable;
573 case OPT_TraceJNICalls:
574 opt_TraceJNICalls = enable;
577 case OPT_TraceJVMCalls:
578 opt_TraceJVMCalls = enable;
581 #if defined(ENABLE_REPLACEMENT)
582 case OPT_TraceReplacement:
584 opt_TraceReplacement = 1;
586 opt_TraceReplacement = atoi(value);
591 printf("Unknown -XX option: %s\n", name);
598 * These are local overrides for various environment variables in Emacs.
599 * Please do not remove this and leave it at the end of the file, where
600 * Emacs will automagically detect them.
601 * ---------------------------------------------------------------------
604 * indent-tabs-mode: t