1 /*
2 * Copyright (c) 1997, 2010, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation.
8 *
9 * This code is distributed in the hope that it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * version 2 for more details (a copy is included in the LICENSE file that
13 * accompanied this code).
14 *
15 * You should have received a copy of the GNU General Public License version
16 * 2 along with this work; if not, write to the Free Software Foundation,
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 *
23 */
24
25 #include "incls/_precompiled.incl"
26 #include "incls/_arguments.cpp.incl"
27
28 #define DEFAULT_VENDOR_URL_BUG "http://java.sun.com/webapps/bugreport/crash.jsp"
29 #define DEFAULT_JAVA_LAUNCHER "generic"
30
31 char** Arguments::_jvm_flags_array = NULL;
32 int Arguments::_num_jvm_flags = 0;
33 char** Arguments::_jvm_args_array = NULL;
34 int Arguments::_num_jvm_args = 0;
35 char* Arguments::_java_command = NULL;
36 SystemProperty* Arguments::_system_properties = NULL;
37 const char* Arguments::_gc_log_filename = NULL;
38 bool Arguments::_has_profile = false;
39 bool Arguments::_has_alloc_profile = false;
40 uintx Arguments::_min_heap_size = 0;
41 Arguments::Mode Arguments::_mode = _mixed;
42 bool Arguments::_java_compiler = false;
43 bool Arguments::_xdebug_mode = false;
44 const char* Arguments::_java_vendor_url_bug = DEFAULT_VENDOR_URL_BUG;
45 const char* Arguments::_sun_java_launcher = DEFAULT_JAVA_LAUNCHER;
46 int Arguments::_sun_java_launcher_pid = -1;
47
48 // These parameters are reset in method parse_vm_init_args(JavaVMInitArgs*)
49 bool Arguments::_AlwaysCompileLoopMethods = AlwaysCompileLoopMethods;
50 bool Arguments::_UseOnStackReplacement = UseOnStackReplacement;
51 bool Arguments::_BackgroundCompilation = BackgroundCompilation;
52 bool Arguments::_ClipInlining = ClipInlining;
53
54 char* Arguments::SharedArchivePath = NULL;
55
56 AgentLibraryList Arguments::_libraryList;
57 AgentLibraryList Arguments::_agentList;
58
59 abort_hook_t Arguments::_abort_hook = NULL;
60 exit_hook_t Arguments::_exit_hook = NULL;
61 vfprintf_hook_t Arguments::_vfprintf_hook = NULL;
62
63
64 SystemProperty *Arguments::_java_ext_dirs = NULL;
65 SystemProperty *Arguments::_java_endorsed_dirs = NULL;
66 SystemProperty *Arguments::_sun_boot_library_path = NULL;
67 SystemProperty *Arguments::_java_library_path = NULL;
68 SystemProperty *Arguments::_java_home = NULL;
69 SystemProperty *Arguments::_java_class_path = NULL;
70 SystemProperty *Arguments::_sun_boot_class_path = NULL;
71
72 char* Arguments::_meta_index_path = NULL;
73 char* Arguments::_meta_index_dir = NULL;
74
75 static bool force_client_mode = false;
76
77 // Check if head of 'option' matches 'name', and sets 'tail' remaining part of option string
78
79 static bool match_option(const JavaVMOption *option, const char* name,
80 const char** tail) {
81 int len = (int)strlen(name);
82 if (strncmp(option->optionString, name, len) == 0) {
83 *tail = option->optionString + len;
84 return true;
85 } else {
86 return false;
87 }
88 }
89
90 static void logOption(const char* opt) {
91 if (PrintVMOptions) {
92 jio_fprintf(defaultStream::output_stream(), "VM option '%s'\n", opt);
93 }
94 }
95
96 // Process java launcher properties.
97 void Arguments::process_sun_java_launcher_properties(JavaVMInitArgs* args) {
98 // See if sun.java.launcher or sun.java.launcher.pid is defined.
99 // Must do this before setting up other system properties,
100 // as some of them may depend on launcher type.
101 for (int index = 0; index < args->nOptions; index++) {
102 const JavaVMOption* option = args->options + index;
103 const char* tail;
104
105 if (match_option(option, "-Dsun.java.launcher=", &tail)) {
106 process_java_launcher_argument(tail, option->extraInfo);
107 continue;
108 }
109 if (match_option(option, "-Dsun.java.launcher.pid=", &tail)) {
110 _sun_java_launcher_pid = atoi(tail);
111 continue;
112 }
113 }
114 }
115
116 // Initialize system properties key and value.
117 void Arguments::init_system_properties() {
118
119 PropertyList_add(&_system_properties, new SystemProperty("java.vm.specification.version", "1.0", false));
120 PropertyList_add(&_system_properties, new SystemProperty("java.vm.specification.name",
121 "Java Virtual Machine Specification", false));
122 PropertyList_add(&_system_properties, new SystemProperty("java.vm.version", VM_Version::vm_release(), false));
123 PropertyList_add(&_system_properties, new SystemProperty("java.vm.name", VM_Version::vm_name(), false));
124 PropertyList_add(&_system_properties, new SystemProperty("java.vm.info", VM_Version::vm_info_string(), true));
125
126 // following are JVMTI agent writeable properties.
127 // Properties values are set to NULL and they are
128 // os specific they are initialized in os::init_system_properties_values().
129 _java_ext_dirs = new SystemProperty("java.ext.dirs", NULL, true);
130 _java_endorsed_dirs = new SystemProperty("java.endorsed.dirs", NULL, true);
131 _sun_boot_library_path = new SystemProperty("sun.boot.library.path", NULL, true);
132 _java_library_path = new SystemProperty("java.library.path", NULL, true);
133 _java_home = new SystemProperty("java.home", NULL, true);
134 _sun_boot_class_path = new SystemProperty("sun.boot.class.path", NULL, true);
135
136 _java_class_path = new SystemProperty("java.class.path", "", true);
137
138 // Add to System Property list.
139 PropertyList_add(&_system_properties, _java_ext_dirs);
140 PropertyList_add(&_system_properties, _java_endorsed_dirs);
141 PropertyList_add(&_system_properties, _sun_boot_library_path);
142 PropertyList_add(&_system_properties, _java_library_path);
143 PropertyList_add(&_system_properties, _java_home);
144 PropertyList_add(&_system_properties, _java_class_path);
145 PropertyList_add(&_system_properties, _sun_boot_class_path);
146
147 // Set OS specific system properties values
148 os::init_system_properties_values();
149 }
150
151
152 // Update/Initialize System properties after JDK version number is known
153 void Arguments::init_version_specific_system_properties() {
154 PropertyList_add(&_system_properties, new SystemProperty("java.vm.specification.vendor",
155 JDK_Version::is_gte_jdk17x_version() ? "Oracle Corporation" : "Sun Microsystems Inc.", false));
156 PropertyList_add(&_system_properties, new SystemProperty("java.vm.vendor", VM_Version::vm_vendor(), false));
157 }
158
159 /**
160 * Provide a slightly more user-friendly way of eliminating -XX flags.
161 * When a flag is eliminated, it can be added to this list in order to
162 * continue accepting this flag on the command-line, while issuing a warning
163 * and ignoring the value. Once the JDK version reaches the 'accept_until'
164 * limit, we flatly refuse to admit the existence of the flag. This allows
165 * a flag to die correctly over JDK releases using HSX.
166 */
167 typedef struct {
168 const char* name;
169 JDK_Version obsoleted_in; // when the flag went away
170 JDK_Version accept_until; // which version to start denying the existence
171 } ObsoleteFlag;
172
173 static ObsoleteFlag obsolete_jvm_flags[] = {
174 { "UseTrainGC", JDK_Version::jdk(5), JDK_Version::jdk(7) },
175 { "UseSpecialLargeObjectHandling", JDK_Version::jdk(5), JDK_Version::jdk(7) },
176 { "UseOversizedCarHandling", JDK_Version::jdk(5), JDK_Version::jdk(7) },
177 { "TraceCarAllocation", JDK_Version::jdk(5), JDK_Version::jdk(7) },
178 { "PrintTrainGCProcessingStats", JDK_Version::jdk(5), JDK_Version::jdk(7) },
179 { "LogOfCarSpaceSize", JDK_Version::jdk(5), JDK_Version::jdk(7) },
180 { "OversizedCarThreshold", JDK_Version::jdk(5), JDK_Version::jdk(7) },
181 { "MinTickInterval", JDK_Version::jdk(5), JDK_Version::jdk(7) },
182 { "DefaultTickInterval", JDK_Version::jdk(5), JDK_Version::jdk(7) },
183 { "MaxTickInterval", JDK_Version::jdk(5), JDK_Version::jdk(7) },
184 { "DelayTickAdjustment", JDK_Version::jdk(5), JDK_Version::jdk(7) },
185 { "ProcessingToTenuringRatio", JDK_Version::jdk(5), JDK_Version::jdk(7) },
186 { "MinTrainLength", JDK_Version::jdk(5), JDK_Version::jdk(7) },
187 { "AppendRatio", JDK_Version::jdk_update(6,10), JDK_Version::jdk(7) },
188 { "DefaultMaxRAM", JDK_Version::jdk_update(6,18), JDK_Version::jdk(7) },
189 { "DefaultInitialRAMFraction",
190 JDK_Version::jdk_update(6,18), JDK_Version::jdk(7) },
191 { "UseDepthFirstScavengeOrder",
192 JDK_Version::jdk_update(6,22), JDK_Version::jdk(7) },
193 { "HandlePromotionFailure",
194 JDK_Version::jdk_update(6,24), JDK_Version::jdk(8) },
195 { "MaxLiveObjectEvacuationRatio",
196 JDK_Version::jdk_update(6,24), JDK_Version::jdk(8) },
197 { NULL, JDK_Version(0), JDK_Version(0) }
198 };
199
200 // Returns true if the flag is obsolete and fits into the range specified
201 // for being ignored. In the case that the flag is ignored, the 'version'
202 // value is filled in with the version number when the flag became
203 // obsolete so that that value can be displayed to the user.
204 bool Arguments::is_newly_obsolete(const char *s, JDK_Version* version) {
205 int i = 0;
206 assert(version != NULL, "Must provide a version buffer");
207 while (obsolete_jvm_flags[i].name != NULL) {
208 const ObsoleteFlag& flag_status = obsolete_jvm_flags[i];
209 // <flag>=xxx form
210 // [-|+]<flag> form
211 if ((strncmp(flag_status.name, s, strlen(flag_status.name)) == 0) ||
212 ((s[0] == '+' || s[0] == '-') &&
213 (strncmp(flag_status.name, &s[1], strlen(flag_status.name)) == 0))) {
214 if (JDK_Version::current().compare(flag_status.accept_until) == -1) {
215 *version = flag_status.obsoleted_in;
216 return true;
217 }
218 }
219 i++;
220 }
221 return false;
222 }
223
224 // Constructs the system class path (aka boot class path) from the following
225 // components, in order:
226 //
227 // prefix // from -Xbootclasspath/p:...
228 // endorsed // the expansion of -Djava.endorsed.dirs=...
229 // base // from os::get_system_properties() or -Xbootclasspath=
230 // suffix // from -Xbootclasspath/a:...
231 //
232 // java.endorsed.dirs is a list of directories; any jar or zip files in the
233 // directories are added to the sysclasspath just before the base.
234 //
235 // This could be AllStatic, but it isn't needed after argument processing is
236 // complete.
237 class SysClassPath: public StackObj {
238 public:
239 SysClassPath(const char* base);
240 ~SysClassPath();
241
242 inline void set_base(const char* base);
243 inline void add_prefix(const char* prefix);
244 inline void add_suffix_to_prefix(const char* suffix);
245 inline void add_suffix(const char* suffix);
246 inline void reset_path(const char* base);
247
248 // Expand the jar/zip files in each directory listed by the java.endorsed.dirs
249 // property. Must be called after all command-line arguments have been
250 // processed (in particular, -Djava.endorsed.dirs=...) and before calling
251 // combined_path().
252 void expand_endorsed();
253
254 inline const char* get_base() const { return _items[_scp_base]; }
255 inline const char* get_prefix() const { return _items[_scp_prefix]; }
256 inline const char* get_suffix() const { return _items[_scp_suffix]; }
257 inline const char* get_endorsed() const { return _items[_scp_endorsed]; }
258
259 // Combine all the components into a single c-heap-allocated string; caller
260 // must free the string if/when no longer needed.
261 char* combined_path();
262
263 private:
264 // Utility routines.
265 static char* add_to_path(const char* path, const char* str, bool prepend);
266 static char* add_jars_to_path(char* path, const char* directory);
267
268 inline void reset_item_at(int index);
269
270 // Array indices for the items that make up the sysclasspath. All except the
271 // base are allocated in the C heap and freed by this class.
272 enum {
273 _scp_prefix, // from -Xbootclasspath/p:...
274 _scp_endorsed, // the expansion of -Djava.endorsed.dirs=...
275 _scp_base, // the default sysclasspath
276 _scp_suffix, // from -Xbootclasspath/a:...
277 _scp_nitems // the number of items, must be last.
278 };
279
280 const char* _items[_scp_nitems];
281 DEBUG_ONLY(bool _expansion_done;)
282 };
283
284 SysClassPath::SysClassPath(const char* base) {
285 memset(_items, 0, sizeof(_items));
286 _items[_scp_base] = base;
287 DEBUG_ONLY(_expansion_done = false;)
288 }
289
290 SysClassPath::~SysClassPath() {
291 // Free everything except the base.
292 for (int i = 0; i < _scp_nitems; ++i) {
293 if (i != _scp_base) reset_item_at(i);
294 }
295 DEBUG_ONLY(_expansion_done = false;)
296 }
297
298 inline void SysClassPath::set_base(const char* base) {
299 _items[_scp_base] = base;
300 }
301
302 inline void SysClassPath::add_prefix(const char* prefix) {
303 _items[_scp_prefix] = add_to_path(_items[_scp_prefix], prefix, true);
304 }
305
306 inline void SysClassPath::add_suffix_to_prefix(const char* suffix) {
307 _items[_scp_prefix] = add_to_path(_items[_scp_prefix], suffix, false);
308 }
309
310 inline void SysClassPath::add_suffix(const char* suffix) {
311 _items[_scp_suffix] = add_to_path(_items[_scp_suffix], suffix, false);
312 }
313
314 inline void SysClassPath::reset_item_at(int index) {
315 assert(index < _scp_nitems && index != _scp_base, "just checking");
316 if (_items[index] != NULL) {
317 FREE_C_HEAP_ARRAY(char, _items[index]);
318 _items[index] = NULL;
319 }
320 }
321
322 inline void SysClassPath::reset_path(const char* base) {
323 // Clear the prefix and suffix.
324 reset_item_at(_scp_prefix);
325 reset_item_at(_scp_suffix);
326 set_base(base);
327 }
328
329 //------------------------------------------------------------------------------
330
331 void SysClassPath::expand_endorsed() {
332 assert(_items[_scp_endorsed] == NULL, "can only be called once.");
333
334 const char* path = Arguments::get_property("java.endorsed.dirs");
335 if (path == NULL) {
336 path = Arguments::get_endorsed_dir();
337 assert(path != NULL, "no default for java.endorsed.dirs");
338 }
339
340 char* expanded_path = NULL;
341 const char separator = *os::path_separator();
342 const char* const end = path + strlen(path);
343 while (path < end) {
344 const char* tmp_end = strchr(path, separator);
345 if (tmp_end == NULL) {
346 expanded_path = add_jars_to_path(expanded_path, path);
347 path = end;
348 } else {
349 char* dirpath = NEW_C_HEAP_ARRAY(char, tmp_end - path + 1);
350 memcpy(dirpath, path, tmp_end - path);
351 dirpath[tmp_end - path] = '\0';
352 expanded_path = add_jars_to_path(expanded_path, dirpath);
353 FREE_C_HEAP_ARRAY(char, dirpath);
354 path = tmp_end + 1;
355 }
356 }
357 _items[_scp_endorsed] = expanded_path;
358 DEBUG_ONLY(_expansion_done = true;)
359 }
360
361 // Combine the bootclasspath elements, some of which may be null, into a single
362 // c-heap-allocated string.
363 char* SysClassPath::combined_path() {
364 assert(_items[_scp_base] != NULL, "empty default sysclasspath");
365 assert(_expansion_done, "must call expand_endorsed() first.");
366
367 size_t lengths[_scp_nitems];
368 size_t total_len = 0;
369
370 const char separator = *os::path_separator();
371
372 // Get the lengths.
373 int i;
374 for (i = 0; i < _scp_nitems; ++i) {
375 if (_items[i] != NULL) {
376 lengths[i] = strlen(_items[i]);
377 // Include space for the separator char (or a NULL for the last item).
378 total_len += lengths[i] + 1;
379 }
380 }
381 assert(total_len > 0, "empty sysclasspath not allowed");
382
383 // Copy the _items to a single string.
384 char* cp = NEW_C_HEAP_ARRAY(char, total_len);
385 char* cp_tmp = cp;
386 for (i = 0; i < _scp_nitems; ++i) {
387 if (_items[i] != NULL) {
388 memcpy(cp_tmp, _items[i], lengths[i]);
389 cp_tmp += lengths[i];
390 *cp_tmp++ = separator;
391 }
392 }
393 *--cp_tmp = '\0'; // Replace the extra separator.
394 return cp;
395 }
396
397 // Note: path must be c-heap-allocated (or NULL); it is freed if non-null.
398 char*
399 SysClassPath::add_to_path(const char* path, const char* str, bool prepend) {
400 char *cp;
401
402 assert(str != NULL, "just checking");
403 if (path == NULL) {
404 size_t len = strlen(str) + 1;
405 cp = NEW_C_HEAP_ARRAY(char, len);
406 memcpy(cp, str, len); // copy the trailing null
407 } else {
408 const char separator = *os::path_separator();
409 size_t old_len = strlen(path);
410 size_t str_len = strlen(str);
411 size_t len = old_len + str_len + 2;
412
413 if (prepend) {
414 cp = NEW_C_HEAP_ARRAY(char, len);
415 char* cp_tmp = cp;
416 memcpy(cp_tmp, str, str_len);
417 cp_tmp += str_len;
418 *cp_tmp = separator;
419 memcpy(++cp_tmp, path, old_len + 1); // copy the trailing null
420 FREE_C_HEAP_ARRAY(char, path);
421 } else {
422 cp = REALLOC_C_HEAP_ARRAY(char, path, len);
423 char* cp_tmp = cp + old_len;
424 *cp_tmp = separator;
425 memcpy(++cp_tmp, str, str_len + 1); // copy the trailing null
426 }
427 }
428 return cp;
429 }
430
431 // Scan the directory and append any jar or zip files found to path.
432 // Note: path must be c-heap-allocated (or NULL); it is freed if non-null.
433 char* SysClassPath::add_jars_to_path(char* path, const char* directory) {
434 DIR* dir = os::opendir(directory);
435 if (dir == NULL) return path;
436
437 char dir_sep[2] = { '\0', '\0' };
438 size_t directory_len = strlen(directory);
439 const char fileSep = *os::file_separator();
440 if (directory[directory_len - 1] != fileSep) dir_sep[0] = fileSep;
441
442 /* Scan the directory for jars/zips, appending them to path. */
443 struct dirent *entry;
444 char *dbuf = NEW_C_HEAP_ARRAY(char, os::readdir_buf_size(directory));
445 while ((entry = os::readdir(dir, (dirent *) dbuf)) != NULL) {
446 const char* name = entry->d_name;
447 const char* ext = name + strlen(name) - 4;
448 bool isJarOrZip = ext > name &&
449 (os::file_name_strcmp(ext, ".jar") == 0 ||
450 os::file_name_strcmp(ext, ".zip") == 0);
451 if (isJarOrZip) {
452 char* jarpath = NEW_C_HEAP_ARRAY(char, directory_len + 2 + strlen(name));
453 sprintf(jarpath, "%s%s%s", directory, dir_sep, name);
454 path = add_to_path(path, jarpath, false);
455 FREE_C_HEAP_ARRAY(char, jarpath);
456 }
457 }
458 FREE_C_HEAP_ARRAY(char, dbuf);
459 os::closedir(dir);
460 return path;
461 }
462
463 // Parses a memory size specification string.
464 static bool atomull(const char *s, julong* result) {
465 julong n = 0;
466 int args_read = sscanf(s, os::julong_format_specifier(), &n);
467 if (args_read != 1) {
468 return false;
469 }
470 while (*s != '\0' && isdigit(*s)) {
471 s++;
472 }
473 // 4705540: illegal if more characters are found after the first non-digit
474 if (strlen(s) > 1) {
475 return false;
476 }
477 switch (*s) {
478 case 'T': case 't':
479 *result = n * G * K;
480 // Check for overflow.
481 if (*result/((julong)G * K) != n) return false;
482 return true;
483 case 'G': case 'g':
484 *result = n * G;
485 if (*result/G != n) return false;
486 return true;
487 case 'M': case 'm':
488 *result = n * M;
489 if (*result/M != n) return false;
490 return true;
491 case 'K': case 'k':
492 *result = n * K;
493 if (*result/K != n) return false;
494 return true;
495 case '\0':
496 *result = n;
497 return true;
498 default:
499 return false;
500 }
501 }
502
503 Arguments::ArgsRange Arguments::check_memory_size(julong size, julong min_size) {
504 if (size < min_size) return arg_too_small;
505 // Check that size will fit in a size_t (only relevant on 32-bit)
506 if (size > max_uintx) return arg_too_big;
507 return arg_in_range;
508 }
509
510 // Describe an argument out of range error
511 void Arguments::describe_range_error(ArgsRange errcode) {
512 switch(errcode) {
513 case arg_too_big:
514 jio_fprintf(defaultStream::error_stream(),
515 "The specified size exceeds the maximum "
516 "representable size.\n");
517 break;
518 case arg_too_small:
519 case arg_unreadable:
520 case arg_in_range:
521 // do nothing for now
522 break;
523 default:
524 ShouldNotReachHere();
525 }
526 }
527
528 static bool set_bool_flag(char* name, bool value, FlagValueOrigin origin) {
529 return CommandLineFlags::boolAtPut(name, &value, origin);
530 }
531
532 static bool set_fp_numeric_flag(char* name, char* value, FlagValueOrigin origin) {
533 double v;
534 if (sscanf(value, "%lf", &v) != 1) {
535 return false;
536 }
537
538 if (CommandLineFlags::doubleAtPut(name, &v, origin)) {
539 return true;
540 }
541 return false;
542 }
543
544 static bool set_numeric_flag(char* name, char* value, FlagValueOrigin origin) {
545 julong v;
546 intx intx_v;
547 bool is_neg = false;
548 // Check the sign first since atomull() parses only unsigned values.
549 if (*value == '-') {
550 if (!CommandLineFlags::intxAt(name, &intx_v)) {
551 return false;
552 }
553 value++;
554 is_neg = true;
555 }
556 if (!atomull(value, &v)) {
557 return false;
558 }
559 intx_v = (intx) v;
560 if (is_neg) {
561 intx_v = -intx_v;
562 }
563 if (CommandLineFlags::intxAtPut(name, &intx_v, origin)) {
564 return true;
565 }
566 uintx uintx_v = (uintx) v;
567 if (!is_neg && CommandLineFlags::uintxAtPut(name, &uintx_v, origin)) {
568 return true;
569 }
570 uint64_t uint64_t_v = (uint64_t) v;
571 if (!is_neg && CommandLineFlags::uint64_tAtPut(name, &uint64_t_v, origin)) {
572 return true;
573 }
574 return false;
575 }
576
577 static bool set_string_flag(char* name, const char* value, FlagValueOrigin origin) {
578 if (!CommandLineFlags::ccstrAtPut(name, &value, origin)) return false;
579 // Contract: CommandLineFlags always returns a pointer that needs freeing.
580 FREE_C_HEAP_ARRAY(char, value);
581 return true;
582 }
583
584 static bool append_to_string_flag(char* name, const char* new_value, FlagValueOrigin origin) {
585 const char* old_value = "";
586 if (!CommandLineFlags::ccstrAt(name, &old_value)) return false;
587 size_t old_len = old_value != NULL ? strlen(old_value) : 0;
588 size_t new_len = strlen(new_value);
589 const char* value;
590 char* free_this_too = NULL;
591 if (old_len == 0) {
592 value = new_value;
593 } else if (new_len == 0) {
594 value = old_value;
595 } else {
596 char* buf = NEW_C_HEAP_ARRAY(char, old_len + 1 + new_len + 1);
597 // each new setting adds another LINE to the switch:
598 sprintf(buf, "%s\n%s", old_value, new_value);
599 value = buf;
600 free_this_too = buf;
601 }
602 (void) CommandLineFlags::ccstrAtPut(name, &value, origin);
603 // CommandLineFlags always returns a pointer that needs freeing.
604 FREE_C_HEAP_ARRAY(char, value);
605 if (free_this_too != NULL) {
606 // CommandLineFlags made its own copy, so I must delete my own temp. buffer.
607 FREE_C_HEAP_ARRAY(char, free_this_too);
608 }
609 return true;
610 }
611
612 bool Arguments::parse_argument(const char* arg, FlagValueOrigin origin) {
613
614 // range of acceptable characters spelled out for portability reasons
615 #define NAME_RANGE "[abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789_]"
616 #define BUFLEN 255
617 char name[BUFLEN+1];
618 char dummy;
619
620 if (sscanf(arg, "-%" XSTR(BUFLEN) NAME_RANGE "%c", name, &dummy) == 1) {
621 return set_bool_flag(name, false, origin);
622 }
623 if (sscanf(arg, "+%" XSTR(BUFLEN) NAME_RANGE "%c", name, &dummy) == 1) {
624 return set_bool_flag(name, true, origin);
625 }
626
627 char punct;
628 if (sscanf(arg, "%" XSTR(BUFLEN) NAME_RANGE "%c", name, &punct) == 2 && punct == '=') {
629 const char* value = strchr(arg, '=') + 1;
630 Flag* flag = Flag::find_flag(name, strlen(name));
631 if (flag != NULL && flag->is_ccstr()) {
632 if (flag->ccstr_accumulates()) {
633 return append_to_string_flag(name, value, origin);
634 } else {
635 if (value[0] == '\0') {
636 value = NULL;
637 }
638 return set_string_flag(name, value, origin);
639 }
640 }
641 }
642
643 if (sscanf(arg, "%" XSTR(BUFLEN) NAME_RANGE ":%c", name, &punct) == 2 && punct == '=') {
644 const char* value = strchr(arg, '=') + 1;
645 // -XX:Foo:=xxx will reset the string flag to the given value.
646 if (value[0] == '\0') {
647 value = NULL;
648 }
649 return set_string_flag(name, value, origin);
650 }
651
652 #define SIGNED_FP_NUMBER_RANGE "[-0123456789.]"
653 #define SIGNED_NUMBER_RANGE "[-0123456789]"
654 #define NUMBER_RANGE "[0123456789]"
655 char value[BUFLEN + 1];
656 char value2[BUFLEN + 1];
657 if (sscanf(arg, "%" XSTR(BUFLEN) NAME_RANGE "=" "%" XSTR(BUFLEN) SIGNED_NUMBER_RANGE "." "%" XSTR(BUFLEN) NUMBER_RANGE "%c", name, value, value2, &dummy) == 3) {
658 // Looks like a floating-point number -- try again with more lenient format string
659 if (sscanf(arg, "%" XSTR(BUFLEN) NAME_RANGE "=" "%" XSTR(BUFLEN) SIGNED_FP_NUMBER_RANGE "%c", name, value, &dummy) == 2) {
660 return set_fp_numeric_flag(name, value, origin);
661 }
662 }
663
664 #define VALUE_RANGE "[-kmgtKMGT0123456789]"
665 if (sscanf(arg, "%" XSTR(BUFLEN) NAME_RANGE "=" "%" XSTR(BUFLEN) VALUE_RANGE "%c", name, value, &dummy) == 2) {
666 return set_numeric_flag(name, value, origin);
667 }
668
669 return false;
670 }
671
672 void Arguments::add_string(char*** bldarray, int* count, const char* arg) {
673 assert(bldarray != NULL, "illegal argument");
674
675 if (arg == NULL) {
676 return;
677 }
678
679 int index = *count;
680
681 // expand the array and add arg to the last element
682 (*count)++;
683 if (*bldarray == NULL) {
684 *bldarray = NEW_C_HEAP_ARRAY(char*, *count);
685 } else {
686 *bldarray = REALLOC_C_HEAP_ARRAY(char*, *bldarray, *count);
687 }
688 (*bldarray)[index] = strdup(arg);
689 }
690
691 void Arguments::build_jvm_args(const char* arg) {
692 add_string(&_jvm_args_array, &_num_jvm_args, arg);
693 }
694
695 void Arguments::build_jvm_flags(const char* arg) {
696 add_string(&_jvm_flags_array, &_num_jvm_flags, arg);
697 }
698
699 // utility function to return a string that concatenates all
700 // strings in a given char** array
701 const char* Arguments::build_resource_string(char** args, int count) {
702 if (args == NULL || count == 0) {
703 return NULL;
704 }
705 size_t length = strlen(args[0]) + 1; // add 1 for the null terminator
706 for (int i = 1; i < count; i++) {
707 length += strlen(args[i]) + 1; // add 1 for a space
708 }
709 char* s = NEW_RESOURCE_ARRAY(char, length);
710 strcpy(s, args[0]);
711 for (int j = 1; j < count; j++) {
712 strcat(s, " ");
713 strcat(s, args[j]);
714 }
715 return (const char*) s;
716 }
717
718 void Arguments::print_on(outputStream* st) {
719 st->print_cr("VM Arguments:");
720 if (num_jvm_flags() > 0) {
721 st->print("jvm_flags: "); print_jvm_flags_on(st);
722 }
723 if (num_jvm_args() > 0) {
724 st->print("jvm_args: "); print_jvm_args_on(st);
725 }
726 st->print_cr("java_command: %s", java_command() ? java_command() : "<unknown>");
727 st->print_cr("Launcher Type: %s", _sun_java_launcher);
728 }
729
730 void Arguments::print_jvm_flags_on(outputStream* st) {
731 if (_num_jvm_flags > 0) {
732 for (int i=0; i < _num_jvm_flags; i++) {
733 st->print("%s ", _jvm_flags_array[i]);
734 }
735 st->print_cr("");
736 }
737 }
738
739 void Arguments::print_jvm_args_on(outputStream* st) {
740 if (_num_jvm_args > 0) {
741 for (int i=0; i < _num_jvm_args; i++) {
742 st->print("%s ", _jvm_args_array[i]);
743 }
744 st->print_cr("");
745 }
746 }
747
748 bool Arguments::process_argument(const char* arg,
749 jboolean ignore_unrecognized, FlagValueOrigin origin) {
750
751 JDK_Version since = JDK_Version();
752
753 if (parse_argument(arg, origin)) {
754 // do nothing
755 } else if (is_newly_obsolete(arg, &since)) {
756 enum { bufsize = 256 };
757 char buffer[bufsize];
758 since.to_string(buffer, bufsize);
759 jio_fprintf(defaultStream::error_stream(),
760 "Warning: The flag %s has been EOL'd as of %s and will"
761 " be ignored\n", arg, buffer);
762 } else {
763 if (!ignore_unrecognized) {
764 jio_fprintf(defaultStream::error_stream(),
765 "Unrecognized VM option '%s'\n", arg);
766 // allow for commandline "commenting out" options like -XX:#+Verbose
767 if (strlen(arg) == 0 || arg[0] != '#') {
768 return false;
769 }
770 }
771 }
772 return true;
773 }
774
775 bool Arguments::process_settings_file(const char* file_name, bool should_exist, jboolean ignore_unrecognized) {
776 FILE* stream = fopen(file_name, "rb");
777 if (stream == NULL) {
778 if (should_exist) {
779 jio_fprintf(defaultStream::error_stream(),
780 "Could not open settings file %s\n", file_name);
781 return false;
782 } else {
783 return true;
784 }
785 }
786
787 char token[1024];
788 int pos = 0;
789
790 bool in_white_space = true;
791 bool in_comment = false;
792 bool in_quote = false;
793 char quote_c = 0;
794 bool result = true;
795
796 int c = getc(stream);
797 while(c != EOF) {
798 if (in_white_space) {
799 if (in_comment) {
800 if (c == '\n') in_comment = false;
801 } else {
802 if (c == '#') in_comment = true;
803 else if (!isspace(c)) {
804 in_white_space = false;
805 token[pos++] = c;
806 }
807 }
808 } else {
809 if (c == '\n' || (!in_quote && isspace(c))) {
810 // token ends at newline, or at unquoted whitespace
811 // this allows a way to include spaces in string-valued options
812 token[pos] = '\0';
813 logOption(token);
814 result &= process_argument(token, ignore_unrecognized, CONFIG_FILE);
815 build_jvm_flags(token);
816 pos = 0;
817 in_white_space = true;
818 in_quote = false;
819 } else if (!in_quote && (c == '\'' || c == '"')) {
820 in_quote = true;
821 quote_c = c;
822 } else if (in_quote && (c == quote_c)) {
823 in_quote = false;
824 } else {
825 token[pos++] = c;
826 }
827 }
828 c = getc(stream);
829 }
830 if (pos > 0) {
831 token[pos] = '\0';
832 result &= process_argument(token, ignore_unrecognized, CONFIG_FILE);
833 build_jvm_flags(token);
834 }
835 fclose(stream);
836 return result;
837 }
838
839 //=============================================================================================================
840 // Parsing of properties (-D)
841
842 const char* Arguments::get_property(const char* key) {
843 return PropertyList_get_value(system_properties(), key);
844 }
845
846 bool Arguments::add_property(const char* prop) {
847 const char* eq = strchr(prop, '=');
848 char* key;
849 // ns must be static--its address may be stored in a SystemProperty object.
850 const static char ns[1] = {0};
851 char* value = (char *)ns;
852
853 size_t key_len = (eq == NULL) ? strlen(prop) : (eq - prop);
854 key = AllocateHeap(key_len + 1, "add_property");
855 strncpy(key, prop, key_len);
856 key[key_len] = '\0';
857
858 if (eq != NULL) {
859 size_t value_len = strlen(prop) - key_len - 1;
860 value = AllocateHeap(value_len + 1, "add_property");
861 strncpy(value, &prop[key_len + 1], value_len + 1);
862 }
863
864 if (strcmp(key, "java.compiler") == 0) {
865 process_java_compiler_argument(value);
866 FreeHeap(key);
867 if (eq != NULL) {
868 FreeHeap(value);
869 }
870 return true;
871 } else if (strcmp(key, "sun.java.command") == 0) {
872 _java_command = value;
873
874 // don't add this property to the properties exposed to the java application
875 FreeHeap(key);
876 return true;
877 } else if (strcmp(key, "sun.java.launcher.pid") == 0) {
878 // launcher.pid property is private and is processed
879 // in process_sun_java_launcher_properties();
880 // the sun.java.launcher property is passed on to the java application
881 FreeHeap(key);
882 if (eq != NULL) {
883 FreeHeap(value);
884 }
885 return true;
886 } else if (strcmp(key, "java.vendor.url.bug") == 0) {
887 // save it in _java_vendor_url_bug, so JVM fatal error handler can access
888 // its value without going through the property list or making a Java call.
889 _java_vendor_url_bug = value;
890 } else if (strcmp(key, "sun.boot.library.path") == 0) {
891 PropertyList_unique_add(&_system_properties, key, value, true);
892 return true;
893 }
894 // Create new property and add at the end of the list
895 PropertyList_unique_add(&_system_properties, key, value);
896 return true;
897 }
898
899 //===========================================================================================================
900 // Setting int/mixed/comp mode flags
901
902 void Arguments::set_mode_flags(Mode mode) {
903 // Set up default values for all flags.
904 // If you add a flag to any of the branches below,
905 // add a default value for it here.
906 set_java_compiler(false);
907 _mode = mode;
908
909 // Ensure Agent_OnLoad has the correct initial values.
910 // This may not be the final mode; mode may change later in onload phase.
911 PropertyList_unique_add(&_system_properties, "java.vm.info",
912 (char*)Abstract_VM_Version::vm_info_string(), false);
913
914 UseInterpreter = true;
915 UseCompiler = true;
916 UseLoopCounter = true;
917
918 // Default values may be platform/compiler dependent -
919 // use the saved values
920 ClipInlining = Arguments::_ClipInlining;
921 AlwaysCompileLoopMethods = Arguments::_AlwaysCompileLoopMethods;
922 UseOnStackReplacement = Arguments::_UseOnStackReplacement;
923 BackgroundCompilation = Arguments::_BackgroundCompilation;
924
925 // Change from defaults based on mode
926 switch (mode) {
927 default:
928 ShouldNotReachHere();
929 break;
930 case _int:
931 UseCompiler = false;
932 UseLoopCounter = false;
933 AlwaysCompileLoopMethods = false;
934 UseOnStackReplacement = false;
935 break;
936 case _mixed:
937 // same as default
938 break;
939 case _comp:
940 UseInterpreter = false;
941 BackgroundCompilation = false;
942 ClipInlining = false;
943 break;
944 }
945 }
946
947 // Conflict: required to use shared spaces (-Xshare:on), but
948 // incompatible command line options were chosen.
949
950 static void no_shared_spaces() {
951 if (RequireSharedSpaces) {
952 jio_fprintf(defaultStream::error_stream(),
953 "Class data sharing is inconsistent with other specified options.\n");
954 vm_exit_during_initialization("Unable to use shared archive.", NULL);
955 } else {
956 FLAG_SET_DEFAULT(UseSharedSpaces, false);
957 }
958 }
959
960 void Arguments::check_compressed_oops_compat() {
961 #ifdef _LP64
962 assert(UseCompressedOops, "Precondition");
963 # if defined(COMPILER1) && !defined(TIERED)
964 // Until c1 supports compressed oops turn them off.
965 FLAG_SET_DEFAULT(UseCompressedOops, false);
966 # else
967 // Is it on by default or set on ergonomically
968 bool is_on_by_default = FLAG_IS_DEFAULT(UseCompressedOops) || FLAG_IS_ERGO(UseCompressedOops);
969
970 // Tiered currently doesn't work with compressed oops
971 if (TieredCompilation) {
972 if (is_on_by_default) {
973 FLAG_SET_DEFAULT(UseCompressedOops, false);
974 return;
975 } else {
976 vm_exit_during_initialization(
977 "Tiered compilation is not supported with compressed oops yet", NULL);
978 }
979 }
980
981 // If dumping an archive or forcing its use, disable compressed oops if possible
982 if (DumpSharedSpaces || RequireSharedSpaces) {
983 if (is_on_by_default) {
984 FLAG_SET_DEFAULT(UseCompressedOops, false);
985 return;
986 } else {
987 vm_exit_during_initialization(
988 "Class Data Sharing is not supported with compressed oops yet", NULL);
989 }
990 } else if (UseSharedSpaces) {
991 // UseSharedSpaces is on by default. With compressed oops, we turn it off.
992 FLAG_SET_DEFAULT(UseSharedSpaces, false);
993 }
994
995 # endif // defined(COMPILER1) && !defined(TIERED)
996 #endif // _LP64
997 }
998
999 void Arguments::set_tiered_flags() {
1000 if (FLAG_IS_DEFAULT(CompilationPolicyChoice)) {
1001 FLAG_SET_DEFAULT(CompilationPolicyChoice, 2);
1002 }
1003 if (CompilationPolicyChoice < 2) {
1004 vm_exit_during_initialization(
1005 "Incompatible compilation policy selected", NULL);
1006 }
1007 // Increase the code cache size - tiered compiles a lot more.
1008 if (FLAG_IS_DEFAULT(ReservedCodeCacheSize)) {
1009 FLAG_SET_DEFAULT(ReservedCodeCacheSize, ReservedCodeCacheSize * 2);
1010 }
1011 }
1012
1013 #ifndef KERNEL
1014 // If the user has chosen ParallelGCThreads > 0, we set UseParNewGC
1015 // if it's not explictly set or unset. If the user has chosen
1016 // UseParNewGC and not explicitly set ParallelGCThreads we
1017 // set it, unless this is a single cpu machine.
1018 void Arguments::set_parnew_gc_flags() {
1019 assert(!UseSerialGC && !UseParallelOldGC && !UseParallelGC && !UseG1GC,
1020 "control point invariant");
1021 assert(UseParNewGC, "Error");
1022
1023 // Turn off AdaptiveSizePolicy by default for parnew until it is
1024 // complete.
1025 if (FLAG_IS_DEFAULT(UseAdaptiveSizePolicy)) {
1026 FLAG_SET_DEFAULT(UseAdaptiveSizePolicy, false);
1027 }
1028
1029 if (ParallelGCThreads == 0) {
1030 FLAG_SET_DEFAULT(ParallelGCThreads,
1031 Abstract_VM_Version::parallel_worker_threads());
1032 if (ParallelGCThreads == 1) {
1033 FLAG_SET_DEFAULT(UseParNewGC, false);
1034 FLAG_SET_DEFAULT(ParallelGCThreads, 0);
1035 }
1036 }
1037 if (UseParNewGC) {
1038 // CDS doesn't work with ParNew yet
1039 no_shared_spaces();
1040
1041 // By default YoungPLABSize and OldPLABSize are set to 4096 and 1024 respectively,
1042 // these settings are default for Parallel Scavenger. For ParNew+Tenured configuration
1043 // we set them to 1024 and 1024.
1044 // See CR 6362902.
1045 if (FLAG_IS_DEFAULT(YoungPLABSize)) {
1046 FLAG_SET_DEFAULT(YoungPLABSize, (intx)1024);
1047 }
1048 if (FLAG_IS_DEFAULT(OldPLABSize)) {
1049 FLAG_SET_DEFAULT(OldPLABSize, (intx)1024);
1050 }
1051
1052 // AlwaysTenure flag should make ParNew promote all at first collection.
1053 // See CR 6362902.
1054 if (AlwaysTenure) {
1055 FLAG_SET_CMDLINE(intx, MaxTenuringThreshold, 0);
1056 }
1057 // When using compressed oops, we use local overflow stacks,
1058 // rather than using a global overflow list chained through
1059 // the klass word of the object's pre-image.
1060 if (UseCompressedOops && !ParGCUseLocalOverflow) {
1061 if (!FLAG_IS_DEFAULT(ParGCUseLocalOverflow)) {
1062 warning("Forcing +ParGCUseLocalOverflow: needed if using compressed references");
1063 }
1064 FLAG_SET_DEFAULT(ParGCUseLocalOverflow, true);
1065 }
1066 assert(ParGCUseLocalOverflow || !UseCompressedOops, "Error");
1067 }
1068 }
1069
1070 // Adjust some sizes to suit CMS and/or ParNew needs; these work well on
1071 // sparc/solaris for certain applications, but would gain from
1072 // further optimization and tuning efforts, and would almost
1073 // certainly gain from analysis of platform and environment.
1074 void Arguments::set_cms_and_parnew_gc_flags() {
1075 assert(!UseSerialGC && !UseParallelOldGC && !UseParallelGC, "Error");
1076 assert(UseConcMarkSweepGC, "CMS is expected to be on here");
1077
1078 // If we are using CMS, we prefer to UseParNewGC,
1079 // unless explicitly forbidden.
1080 if (FLAG_IS_DEFAULT(UseParNewGC)) {
1081 FLAG_SET_ERGO(bool, UseParNewGC, true);
1082 }
1083
1084 // Turn off AdaptiveSizePolicy by default for cms until it is
1085 // complete.
1086 if (FLAG_IS_DEFAULT(UseAdaptiveSizePolicy)) {
1087 FLAG_SET_DEFAULT(UseAdaptiveSizePolicy, false);
1088 }
1089
1090 // In either case, adjust ParallelGCThreads and/or UseParNewGC
1091 // as needed.
1092 if (UseParNewGC) {
1093 set_parnew_gc_flags();
1094 }
1095
1096 // Now make adjustments for CMS
1097 size_t young_gen_per_worker;
1098 intx new_ratio;
1099 size_t min_new_default;
1100 intx tenuring_default;
1101 if (CMSUseOldDefaults) { // old defaults: "old" as of 6.0
1102 if FLAG_IS_DEFAULT(CMSYoungGenPerWorker) {
1103 FLAG_SET_ERGO(intx, CMSYoungGenPerWorker, 4*M);
1104 }
1105 young_gen_per_worker = 4*M;
1106 new_ratio = (intx)15;
1107 min_new_default = 4*M;
1108 tenuring_default = (intx)0;
1109 } else { // new defaults: "new" as of 6.0
1110 young_gen_per_worker = CMSYoungGenPerWorker;
1111 new_ratio = (intx)7;
1112 min_new_default = 16*M;
1113 tenuring_default = (intx)4;
1114 }
1115
1116 // Preferred young gen size for "short" pauses
1117 const uintx parallel_gc_threads =
1118 (ParallelGCThreads == 0 ? 1 : ParallelGCThreads);
1119 const size_t preferred_max_new_size_unaligned =
1120 ScaleForWordSize(young_gen_per_worker * parallel_gc_threads);
1121 const size_t preferred_max_new_size =
1122 align_size_up(preferred_max_new_size_unaligned, os::vm_page_size());
1123
1124 // Unless explicitly requested otherwise, size young gen
1125 // for "short" pauses ~ 4M*ParallelGCThreads
1126
1127 // If either MaxNewSize or NewRatio is set on the command line,
1128 // assume the user is trying to set the size of the young gen.
1129
1130 if (FLAG_IS_DEFAULT(MaxNewSize) && FLAG_IS_DEFAULT(NewRatio)) {
1131
1132 // Set MaxNewSize to our calculated preferred_max_new_size unless
1133 // NewSize was set on the command line and it is larger than
1134 // preferred_max_new_size.
1135 if (!FLAG_IS_DEFAULT(NewSize)) { // NewSize explicitly set at command-line
1136 FLAG_SET_ERGO(uintx, MaxNewSize, MAX2(NewSize, preferred_max_new_size));
1137 } else {
1138 FLAG_SET_ERGO(uintx, MaxNewSize, preferred_max_new_size);
1139 }
1140 if (PrintGCDetails && Verbose) {
1141 // Too early to use gclog_or_tty
1142 tty->print_cr("Ergo set MaxNewSize: " SIZE_FORMAT, MaxNewSize);
1143 }
1144
1145 // Unless explicitly requested otherwise, prefer a large
1146 // Old to Young gen size so as to shift the collection load
1147 // to the old generation concurrent collector
1148
1149 // If this is only guarded by FLAG_IS_DEFAULT(NewRatio)
1150 // then NewSize and OldSize may be calculated. That would
1151 // generally lead to some differences with ParNewGC for which
1152 // there was no obvious reason. Also limit to the case where
1153 // MaxNewSize has not been set.
1154
1155 FLAG_SET_ERGO(intx, NewRatio, MAX2(NewRatio, new_ratio));
1156
1157 // Code along this path potentially sets NewSize and OldSize
1158
1159 // Calculate the desired minimum size of the young gen but if
1160 // NewSize has been set on the command line, use it here since
1161 // it should be the final value.
1162 size_t min_new;
1163 if (FLAG_IS_DEFAULT(NewSize)) {
1164 min_new = align_size_up(ScaleForWordSize(min_new_default),
1165 os::vm_page_size());
1166 } else {
1167 min_new = NewSize;
1168 }
1169 size_t prev_initial_size = InitialHeapSize;
1170 if (prev_initial_size != 0 && prev_initial_size < min_new + OldSize) {
1171 FLAG_SET_ERGO(uintx, InitialHeapSize, min_new + OldSize);
1172 // Currently minimum size and the initial heap sizes are the same.
1173 set_min_heap_size(InitialHeapSize);
1174 if (PrintGCDetails && Verbose) {
1175 warning("Initial heap size increased to " SIZE_FORMAT " M from "
1176 SIZE_FORMAT " M; use -XX:NewSize=... for finer control.",
1177 InitialHeapSize/M, prev_initial_size/M);
1178 }
1179 }
1180
1181 // MaxHeapSize is aligned down in collectorPolicy
1182 size_t max_heap =
1183 align_size_down(MaxHeapSize,
1184 CardTableRS::ct_max_alignment_constraint());
1185
1186 if (PrintGCDetails && Verbose) {
1187 // Too early to use gclog_or_tty
1188 tty->print_cr("CMS set min_heap_size: " SIZE_FORMAT
1189 " initial_heap_size: " SIZE_FORMAT
1190 " max_heap: " SIZE_FORMAT,
1191 min_heap_size(), InitialHeapSize, max_heap);
1192 }
1193 if (max_heap > min_new) {
1194 // Unless explicitly requested otherwise, make young gen
1195 // at least min_new, and at most preferred_max_new_size.
1196 if (FLAG_IS_DEFAULT(NewSize)) {
1197 FLAG_SET_ERGO(uintx, NewSize, MAX2(NewSize, min_new));
1198 FLAG_SET_ERGO(uintx, NewSize, MIN2(preferred_max_new_size, NewSize));
1199 if (PrintGCDetails && Verbose) {
1200 // Too early to use gclog_or_tty
1201 tty->print_cr("Ergo set NewSize: " SIZE_FORMAT, NewSize);
1202 }
1203 }
1204 // Unless explicitly requested otherwise, size old gen
1205 // so that it's at least 3X of NewSize to begin with;
1206 // later NewRatio will decide how it grows; see above.
1207 if (FLAG_IS_DEFAULT(OldSize)) {
1208 if (max_heap > NewSize) {
1209 FLAG_SET_ERGO(uintx, OldSize, MIN2(3*NewSize, max_heap - NewSize));
1210 if (PrintGCDetails && Verbose) {
1211 // Too early to use gclog_or_tty
1212 tty->print_cr("Ergo set OldSize: " SIZE_FORMAT, OldSize);
1213 }
1214 }
1215 }
1216 }
1217 }
1218 // Unless explicitly requested otherwise, definitely
1219 // promote all objects surviving "tenuring_default" scavenges.
1220 if (FLAG_IS_DEFAULT(MaxTenuringThreshold) &&
1221 FLAG_IS_DEFAULT(SurvivorRatio)) {
1222 FLAG_SET_ERGO(intx, MaxTenuringThreshold, tenuring_default);
1223 }
1224 // If we decided above (or user explicitly requested)
1225 // `promote all' (via MaxTenuringThreshold := 0),
1226 // prefer minuscule survivor spaces so as not to waste
1227 // space for (non-existent) survivors
1228 if (FLAG_IS_DEFAULT(SurvivorRatio) && MaxTenuringThreshold == 0) {
1229 FLAG_SET_ERGO(intx, SurvivorRatio, MAX2((intx)1024, SurvivorRatio));
1230 }
1231 // If OldPLABSize is set and CMSParPromoteBlocksToClaim is not,
1232 // set CMSParPromoteBlocksToClaim equal to OldPLABSize.
1233 // This is done in order to make ParNew+CMS configuration to work
1234 // with YoungPLABSize and OldPLABSize options.
1235 // See CR 6362902.
1236 if (!FLAG_IS_DEFAULT(OldPLABSize)) {
1237 if (FLAG_IS_DEFAULT(CMSParPromoteBlocksToClaim)) {
1238 // OldPLABSize is not the default value but CMSParPromoteBlocksToClaim
1239 // is. In this situtation let CMSParPromoteBlocksToClaim follow
1240 // the value (either from the command line or ergonomics) of
1241 // OldPLABSize. Following OldPLABSize is an ergonomics decision.
1242 FLAG_SET_ERGO(uintx, CMSParPromoteBlocksToClaim, OldPLABSize);
1243 } else {
1244 // OldPLABSize and CMSParPromoteBlocksToClaim are both set.
1245 // CMSParPromoteBlocksToClaim is a collector-specific flag, so
1246 // we'll let it to take precedence.
1247 jio_fprintf(defaultStream::error_stream(),
1248 "Both OldPLABSize and CMSParPromoteBlocksToClaim"
1249 " options are specified for the CMS collector."
1250 " CMSParPromoteBlocksToClaim will take precedence.\n");
1251 }
1252 }
1253 if (!FLAG_IS_DEFAULT(ResizeOldPLAB) && !ResizeOldPLAB) {
1254 // OldPLAB sizing manually turned off: Use a larger default setting,
1255 // unless it was manually specified. This is because a too-low value
1256 // will slow down scavenges.
1257 if (FLAG_IS_DEFAULT(CMSParPromoteBlocksToClaim)) {
1258 FLAG_SET_ERGO(uintx, CMSParPromoteBlocksToClaim, 50); // default value before 6631166
1259 }
1260 }
1261 // Overwrite OldPLABSize which is the variable we will internally use everywhere.
1262 FLAG_SET_ERGO(uintx, OldPLABSize, CMSParPromoteBlocksToClaim);
1263 // If either of the static initialization defaults have changed, note this
1264 // modification.
1265 if (!FLAG_IS_DEFAULT(CMSParPromoteBlocksToClaim) || !FLAG_IS_DEFAULT(OldPLABWeight)) {
1266 CFLS_LAB::modify_initialization(OldPLABSize, OldPLABWeight);
1267 }
1268 if (PrintGCDetails && Verbose) {
1269 tty->print_cr("MarkStackSize: %uk MarkStackSizeMax: %uk",
1270 MarkStackSize / K, MarkStackSizeMax / K);
1271 tty->print_cr("ConcGCThreads: %u", ConcGCThreads);
1272 }
1273 }
1274 #endif // KERNEL
1275
1276 void set_object_alignment() {
1277 // Object alignment.
1278 assert(is_power_of_2(ObjectAlignmentInBytes), "ObjectAlignmentInBytes must be power of 2");
1279 MinObjAlignmentInBytes = ObjectAlignmentInBytes;
1280 assert(MinObjAlignmentInBytes >= HeapWordsPerLong * HeapWordSize, "ObjectAlignmentInBytes value is too small");
1281 MinObjAlignment = MinObjAlignmentInBytes / HeapWordSize;
1282 assert(MinObjAlignmentInBytes == MinObjAlignment * HeapWordSize, "ObjectAlignmentInBytes value is incorrect");
1283 MinObjAlignmentInBytesMask = MinObjAlignmentInBytes - 1;
1284
1285 LogMinObjAlignmentInBytes = exact_log2(ObjectAlignmentInBytes);
1286 LogMinObjAlignment = LogMinObjAlignmentInBytes - LogHeapWordSize;
1287
1288 // Oop encoding heap max
1289 OopEncodingHeapMax = (uint64_t(max_juint) + 1) << LogMinObjAlignmentInBytes;
1290
1291 #ifndef KERNEL
1292 // Set CMS global values
1293 CompactibleFreeListSpace::set_cms_values();
1294 #endif // KERNEL
1295 }
1296
1297 bool verify_object_alignment() {
1298 // Object alignment.
1299 if (!is_power_of_2(ObjectAlignmentInBytes)) {
1300 jio_fprintf(defaultStream::error_stream(),
1301 "error: ObjectAlignmentInBytes=%d must be power of 2\n",
1302 (int)ObjectAlignmentInBytes);
1303 return false;
1304 }
1305 if ((int)ObjectAlignmentInBytes < BytesPerLong) {
1306 jio_fprintf(defaultStream::error_stream(),
1307 "error: ObjectAlignmentInBytes=%d must be greater or equal %d\n",
1308 (int)ObjectAlignmentInBytes, BytesPerLong);
1309 return false;
1310 }
1311 // It does not make sense to have big object alignment
1312 // since a space lost due to alignment will be greater
1313 // then a saved space from compressed oops.
1314 if ((int)ObjectAlignmentInBytes > 256) {
1315 jio_fprintf(defaultStream::error_stream(),
1316 "error: ObjectAlignmentInBytes=%d must not be greater then 256\n",
1317 (int)ObjectAlignmentInBytes);
1318 return false;
1319 }
1320 // In case page size is very small.
1321 if ((int)ObjectAlignmentInBytes >= os::vm_page_size()) {
1322 jio_fprintf(defaultStream::error_stream(),
1323 "error: ObjectAlignmentInBytes=%d must be less then page size %d\n",
1324 (int)ObjectAlignmentInBytes, os::vm_page_size());
1325 return false;
1326 }
1327 return true;
1328 }
1329
1330 inline uintx max_heap_for_compressed_oops() {
1331 // Avoid sign flip.
1332 if (OopEncodingHeapMax < MaxPermSize + os::vm_page_size()) {
1333 return 0;
1334 }
1335 LP64_ONLY(return OopEncodingHeapMax - MaxPermSize - os::vm_page_size());
1336 NOT_LP64(ShouldNotReachHere(); return 0);
1337 }
1338
1339 bool Arguments::should_auto_select_low_pause_collector() {
1340 if (UseAutoGCSelectPolicy &&
1341 !FLAG_IS_DEFAULT(MaxGCPauseMillis) &&
1342 (MaxGCPauseMillis <= AutoGCSelectPauseMillis)) {
1343 if (PrintGCDetails) {
1344 // Cannot use gclog_or_tty yet.
1345 tty->print_cr("Automatic selection of the low pause collector"
1346 " based on pause goal of %d (ms)", MaxGCPauseMillis);
1347 }
1348 return true;
1349 }
1350 return false;
1351 }
1352
1353 void Arguments::set_ergonomics_flags() {
1354 // Parallel GC is not compatible with sharing. If one specifies
1355 // that they want sharing explicitly, do not set ergonomics flags.
1356 if (DumpSharedSpaces || ForceSharedSpaces) {
1357 return;
1358 }
1359
1360 if (os::is_server_class_machine() && !force_client_mode ) {
1361 // If no other collector is requested explicitly,
1362 // let the VM select the collector based on
1363 // machine class and automatic selection policy.
1364 if (!UseSerialGC &&
1365 !UseConcMarkSweepGC &&
1366 !UseG1GC &&
1367 !UseParNewGC &&
1368 !DumpSharedSpaces &&
1369 FLAG_IS_DEFAULT(UseParallelGC)) {
1370 if (should_auto_select_low_pause_collector()) {
1371 FLAG_SET_ERGO(bool, UseConcMarkSweepGC, true);
1372 } else {
1373 FLAG_SET_ERGO(bool, UseParallelGC, true);
1374 }
1375 no_shared_spaces();
1376 }
1377 }
1378
1379 #ifndef ZERO
1380 #ifdef _LP64
1381 // Check that UseCompressedOops can be set with the max heap size allocated
1382 // by ergonomics.
1383 if (MaxHeapSize <= max_heap_for_compressed_oops()) {
1384 #if !defined(COMPILER1) || defined(TIERED)
1385 if (FLAG_IS_DEFAULT(UseCompressedOops) && !UseG1GC) {
1386 FLAG_SET_ERGO(bool, UseCompressedOops, true);
1387 }
1388 #endif
1389 #ifdef _WIN64
1390 if (UseLargePages && UseCompressedOops) {
1391 // Cannot allocate guard pages for implicit checks in indexed addressing
1392 // mode, when large pages are specified on windows.
1393 // This flag could be switched ON if narrow oop base address is set to 0,
1394 // see code in Universe::initialize_heap().
1395 Universe::set_narrow_oop_use_implicit_null_checks(false);
1396 }
1397 #endif // _WIN64
1398 } else {
1399 if (UseCompressedOops && !FLAG_IS_DEFAULT(UseCompressedOops)) {
1400 warning("Max heap size too large for Compressed Oops");
1401 FLAG_SET_DEFAULT(UseCompressedOops, false);
1402 }
1403 }
1404 // Also checks that certain machines are slower with compressed oops
1405 // in vm_version initialization code.
1406 #endif // _LP64
1407 #endif // !ZERO
1408 }
1409
1410 void Arguments::set_parallel_gc_flags() {
1411 assert(UseParallelGC || UseParallelOldGC, "Error");
1412 // If parallel old was requested, automatically enable parallel scavenge.
1413 if (UseParallelOldGC && !UseParallelGC && FLAG_IS_DEFAULT(UseParallelGC)) {
1414 FLAG_SET_DEFAULT(UseParallelGC, true);
1415 }
1416
1417 // If no heap maximum was requested explicitly, use some reasonable fraction
1418 // of the physical memory, up to a maximum of 1GB.
1419 if (UseParallelGC) {
1420 FLAG_SET_ERGO(uintx, ParallelGCThreads,
1421 Abstract_VM_Version::parallel_worker_threads());
1422
1423 // If InitialSurvivorRatio or MinSurvivorRatio were not specified, but the
1424 // SurvivorRatio has been set, reset their default values to SurvivorRatio +
1425 // 2. By doing this we make SurvivorRatio also work for Parallel Scavenger.
1426 // See CR 6362902 for details.
1427 if (!FLAG_IS_DEFAULT(SurvivorRatio)) {
1428 if (FLAG_IS_DEFAULT(InitialSurvivorRatio)) {
1429 FLAG_SET_DEFAULT(InitialSurvivorRatio, SurvivorRatio + 2);
1430 }
1431 if (FLAG_IS_DEFAULT(MinSurvivorRatio)) {
1432 FLAG_SET_DEFAULT(MinSurvivorRatio, SurvivorRatio + 2);
1433 }
1434 }
1435
1436 if (UseParallelOldGC) {
1437 // Par compact uses lower default values since they are treated as
1438 // minimums. These are different defaults because of the different
1439 // interpretation and are not ergonomically set.
1440 if (FLAG_IS_DEFAULT(MarkSweepDeadRatio)) {
1441 FLAG_SET_DEFAULT(MarkSweepDeadRatio, 1);
1442 }
1443 if (FLAG_IS_DEFAULT(PermMarkSweepDeadRatio)) {
1444 FLAG_SET_DEFAULT(PermMarkSweepDeadRatio, 5);
1445 }
1446 }
1447 }
1448 }
1449
1450 void Arguments::set_g1_gc_flags() {
1451 assert(UseG1GC, "Error");
1452 #ifdef COMPILER1
1453 FastTLABRefill = false;
1454 #endif
1455 FLAG_SET_DEFAULT(ParallelGCThreads,
1456 Abstract_VM_Version::parallel_worker_threads());
1457 if (ParallelGCThreads == 0) {
1458 FLAG_SET_DEFAULT(ParallelGCThreads,
1459 Abstract_VM_Version::parallel_worker_threads());
1460 }
1461 no_shared_spaces();
1462
1463 if (FLAG_IS_DEFAULT(MarkStackSize)) {
1464 FLAG_SET_DEFAULT(MarkStackSize, 128 * TASKQUEUE_SIZE);
1465 }
1466 if (PrintGCDetails && Verbose) {
1467 tty->print_cr("MarkStackSize: %uk MarkStackSizeMax: %uk",
1468 MarkStackSize / K, MarkStackSizeMax / K);
1469 tty->print_cr("ConcGCThreads: %u", ConcGCThreads);
1470 }
1471
1472 if (FLAG_IS_DEFAULT(GCTimeRatio) || GCTimeRatio == 0) {
1473 // In G1, we want the default GC overhead goal to be higher than
1474 // say in PS. So we set it here to 10%. Otherwise the heap might
1475 // be expanded more aggressively than we would like it to. In
1476 // fact, even 10% seems to not be high enough in some cases
1477 // (especially small GC stress tests that the main thing they do
1478 // is allocation). We might consider increase it further.
1479 FLAG_SET_DEFAULT(GCTimeRatio, 9);
1480 }
1481 }
1482
1483 void Arguments::set_heap_size() {
1484 if (!FLAG_IS_DEFAULT(DefaultMaxRAMFraction)) {
1485 // Deprecated flag
1486 FLAG_SET_CMDLINE(uintx, MaxRAMFraction, DefaultMaxRAMFraction);
1487 }
1488
1489 const julong phys_mem =
1490 FLAG_IS_DEFAULT(MaxRAM) ? MIN2(os::physical_memory(), (julong)MaxRAM)
1491 : (julong)MaxRAM;
1492
1493 // If the maximum heap size has not been set with -Xmx,
1494 // then set it as fraction of the size of physical memory,
1495 // respecting the maximum and minimum sizes of the heap.
1496 if (FLAG_IS_DEFAULT(MaxHeapSize)) {
1497 julong reasonable_max = phys_mem / MaxRAMFraction;
1498
1499 if (phys_mem <= MaxHeapSize * MinRAMFraction) {
1500 // Small physical memory, so use a minimum fraction of it for the heap
1501 reasonable_max = phys_mem / MinRAMFraction;
1502 } else {
1503 // Not-small physical memory, so require a heap at least
1504 // as large as MaxHeapSize
1505 reasonable_max = MAX2(reasonable_max, (julong)MaxHeapSize);
1506 }
1507 if (!FLAG_IS_DEFAULT(ErgoHeapSizeLimit) && ErgoHeapSizeLimit != 0) {
1508 // Limit the heap size to ErgoHeapSizeLimit
1509 reasonable_max = MIN2(reasonable_max, (julong)ErgoHeapSizeLimit);
1510 }
1511 if (UseCompressedOops) {
1512 // Limit the heap size to the maximum possible when using compressed oops
1513 julong max_coop_heap = (julong)max_heap_for_compressed_oops();
1514 if (HeapBaseMinAddress + MaxHeapSize < max_coop_heap) {
1515 // Heap should be above HeapBaseMinAddress to get zero based compressed oops
1516 // but it should be not less than default MaxHeapSize.
1517 max_coop_heap -= HeapBaseMinAddress;
1518 }
1519 reasonable_max = MIN2(reasonable_max, max_coop_heap);
1520 }
1521 reasonable_max = os::allocatable_physical_memory(reasonable_max);
1522
1523 if (!FLAG_IS_DEFAULT(InitialHeapSize)) {
1524 // An initial heap size was specified on the command line,
1525 // so be sure that the maximum size is consistent. Done
1526 // after call to allocatable_physical_memory because that
1527 // method might reduce the allocation size.
1528 reasonable_max = MAX2(reasonable_max, (julong)InitialHeapSize);
1529 }
1530
1531 if (PrintGCDetails && Verbose) {
1532 // Cannot use gclog_or_tty yet.
1533 tty->print_cr(" Maximum heap size " SIZE_FORMAT, reasonable_max);
1534 }
1535 FLAG_SET_ERGO(uintx, MaxHeapSize, (uintx)reasonable_max);
1536 }
1537
1538 // If the initial_heap_size has not been set with InitialHeapSize
1539 // or -Xms, then set it as fraction of the size of physical memory,
1540 // respecting the maximum and minimum sizes of the heap.
1541 if (FLAG_IS_DEFAULT(InitialHeapSize)) {
1542 julong reasonable_minimum = (julong)(OldSize + NewSize);
1543
1544 reasonable_minimum = MIN2(reasonable_minimum, (julong)MaxHeapSize);
1545
1546 reasonable_minimum = os::allocatable_physical_memory(reasonable_minimum);
1547
1548 julong reasonable_initial = phys_mem / InitialRAMFraction;
1549
1550 reasonable_initial = MAX2(reasonable_initial, reasonable_minimum);
1551 reasonable_initial = MIN2(reasonable_initial, (julong)MaxHeapSize);
1552
1553 reasonable_initial = os::allocatable_physical_memory(reasonable_initial);
1554
1555 if (PrintGCDetails && Verbose) {
1556 // Cannot use gclog_or_tty yet.
1557 tty->print_cr(" Initial heap size " SIZE_FORMAT, (uintx)reasonable_initial);
1558 tty->print_cr(" Minimum heap size " SIZE_FORMAT, (uintx)reasonable_minimum);
1559 }
1560 FLAG_SET_ERGO(uintx, InitialHeapSize, (uintx)reasonable_initial);
1561 set_min_heap_size((uintx)reasonable_minimum);
1562 }
1563 }
1564
1565 // This must be called after ergonomics because we want bytecode rewriting
1566 // if the server compiler is used, or if UseSharedSpaces is disabled.
1567 void Arguments::set_bytecode_flags() {
1568 // Better not attempt to store into a read-only space.
1569 if (UseSharedSpaces) {
1570 FLAG_SET_DEFAULT(RewriteBytecodes, false);
1571 FLAG_SET_DEFAULT(RewriteFrequentPairs, false);
1572 }
1573
1574 if (!RewriteBytecodes) {
1575 FLAG_SET_DEFAULT(RewriteFrequentPairs, false);
1576 }
1577 }
1578
1579 // Aggressive optimization flags -XX:+AggressiveOpts
1580 void Arguments::set_aggressive_opts_flags() {
1581 #ifdef COMPILER2
1582 if (AggressiveOpts || !FLAG_IS_DEFAULT(AutoBoxCacheMax)) {
1583 if (FLAG_IS_DEFAULT(EliminateAutoBox)) {
1584 FLAG_SET_DEFAULT(EliminateAutoBox, true);
1585 }
1586 if (FLAG_IS_DEFAULT(AutoBoxCacheMax)) {
1587 FLAG_SET_DEFAULT(AutoBoxCacheMax, 20000);
1588 }
1589
1590 // Feed the cache size setting into the JDK
1591 char buffer[1024];
1592 sprintf(buffer, "java.lang.Integer.IntegerCache.high=" INTX_FORMAT, AutoBoxCacheMax);
1593 add_property(buffer);
1594 }
1595 if (AggressiveOpts && FLAG_IS_DEFAULT(DoEscapeAnalysis)) {
1596 FLAG_SET_DEFAULT(DoEscapeAnalysis, true);
1597 }
1598 if (AggressiveOpts && FLAG_IS_DEFAULT(BiasedLockingStartupDelay)) {
1599 FLAG_SET_DEFAULT(BiasedLockingStartupDelay, 500);
1600 }
1601 if (AggressiveOpts && FLAG_IS_DEFAULT(OptimizeStringConcat)) {
1602 FLAG_SET_DEFAULT(OptimizeStringConcat, true);
1603 }
1604 if (AggressiveOpts && FLAG_IS_DEFAULT(OptimizeFill)) {
1605 FLAG_SET_DEFAULT(OptimizeFill, true);
1606 }
1607 #endif
1608
1609 if (AggressiveOpts) {
1610 // Sample flag setting code
1611 // if (FLAG_IS_DEFAULT(EliminateZeroing)) {
1612 // FLAG_SET_DEFAULT(EliminateZeroing, true);
1613 // }
1614 }
1615 }
1616
1617 //===========================================================================================================
1618 // Parsing of java.compiler property
1619
1620 void Arguments::process_java_compiler_argument(char* arg) {
1621 // For backwards compatibility, Djava.compiler=NONE or ""
1622 // causes us to switch to -Xint mode UNLESS -Xdebug
1623 // is also specified.
1624 if (strlen(arg) == 0 || strcasecmp(arg, "NONE") == 0) {
1625 set_java_compiler(true); // "-Djava.compiler[=...]" most recently seen.
1626 }
1627 }
1628
1629 void Arguments::process_java_launcher_argument(const char* launcher, void* extra_info) {
1630 _sun_java_launcher = strdup(launcher);
1631 }
1632
1633 bool Arguments::created_by_java_launcher() {
1634 assert(_sun_java_launcher != NULL, "property must have value");
1635 return strcmp(DEFAULT_JAVA_LAUNCHER, _sun_java_launcher) != 0;
1636 }
1637
1638 //===========================================================================================================
1639 // Parsing of main arguments
1640
1641 bool Arguments::verify_interval(uintx val, uintx min,
1642 uintx max, const char* name) {
1643 // Returns true iff value is in the inclusive interval [min..max]
1644 // false, otherwise.
1645 if (val >= min && val <= max) {
1646 return true;
1647 }
1648 jio_fprintf(defaultStream::error_stream(),
1649 "%s of " UINTX_FORMAT " is invalid; must be between " UINTX_FORMAT
1650 " and " UINTX_FORMAT "\n",
1651 name, val, min, max);
1652 return false;
1653 }
1654
1655 bool Arguments::verify_min_value(intx val, intx min, const char* name) {
1656 // Returns true if given value is greater than specified min threshold
1657 // false, otherwise.
1658 if (val >= min ) {
1659 return true;
1660 }
1661 jio_fprintf(defaultStream::error_stream(),
1662 "%s of " INTX_FORMAT " is invalid; must be greater than " INTX_FORMAT "\n",
1663 name, val, min);
1664 return false;
1665 }
1666
1667 bool Arguments::verify_percentage(uintx value, const char* name) {
1668 if (value <= 100) {
1669 return true;
1670 }
1671 jio_fprintf(defaultStream::error_stream(),
1672 "%s of " UINTX_FORMAT " is invalid; must be between 0 and 100\n",
1673 name, value);
1674 return false;
1675 }
1676
1677 static void force_serial_gc() {
1678 FLAG_SET_DEFAULT(UseSerialGC, true);
1679 FLAG_SET_DEFAULT(UseParNewGC, false);
1680 FLAG_SET_DEFAULT(UseConcMarkSweepGC, false);
1681 FLAG_SET_DEFAULT(CMSIncrementalMode, false); // special CMS suboption
1682 FLAG_SET_DEFAULT(UseParallelGC, false);
1683 FLAG_SET_DEFAULT(UseParallelOldGC, false);
1684 FLAG_SET_DEFAULT(UseG1GC, false);
1685 }
1686
1687 static bool verify_serial_gc_flags() {
1688 return (UseSerialGC &&
1689 !(UseParNewGC || (UseConcMarkSweepGC || CMSIncrementalMode) || UseG1GC ||
1690 UseParallelGC || UseParallelOldGC));
1691 }
1692
1693 // Check consistency of GC selection
1694 bool Arguments::check_gc_consistency() {
1695 bool status = true;
1696 // Ensure that the user has not selected conflicting sets
1697 // of collectors. [Note: this check is merely a user convenience;
1698 // collectors over-ride each other so that only a non-conflicting
1699 // set is selected; however what the user gets is not what they
1700 // may have expected from the combination they asked for. It's
1701 // better to reduce user confusion by not allowing them to
1702 // select conflicting combinations.
1703 uint i = 0;
1704 if (UseSerialGC) i++;
1705 if (UseConcMarkSweepGC || UseParNewGC) i++;
1706 if (UseParallelGC || UseParallelOldGC) i++;
1707 if (UseG1GC) i++;
1708 if (i > 1) {
1709 jio_fprintf(defaultStream::error_stream(),
1710 "Conflicting collector combinations in option list; "
1711 "please refer to the release notes for the combinations "
1712 "allowed\n");
1713 status = false;
1714 }
1715
1716 return status;
1717 }
1718
1719 // Check stack pages settings
1720 bool Arguments::check_stack_pages()
1721 {
1722 bool status = true;
1723 status = status && verify_min_value(StackYellowPages, 1, "StackYellowPages");
1724 status = status && verify_min_value(StackRedPages, 1, "StackRedPages");
1725 // greater stack shadow pages can't generate instruction to bang stack
1726 status = status && verify_interval(StackShadowPages, 1, 50, "StackShadowPages");
1727 return status;
1728 }
1729
1730 // Check the consistency of vm_init_args
1731 bool Arguments::check_vm_args_consistency() {
1732 // Method for adding checks for flag consistency.
1733 // The intent is to warn the user of all possible conflicts,
1734 // before returning an error.
1735 // Note: Needs platform-dependent factoring.
1736 bool status = true;
1737
1738 #if ( (defined(COMPILER2) && defined(SPARC)))
1739 // NOTE: The call to VM_Version_init depends on the fact that VM_Version_init
1740 // on sparc doesn't require generation of a stub as is the case on, e.g.,
1741 // x86. Normally, VM_Version_init must be called from init_globals in
1742 // init.cpp, which is called by the initial java thread *after* arguments
1743 // have been parsed. VM_Version_init gets called twice on sparc.
1744 extern void VM_Version_init();
1745 VM_Version_init();
1746 if (!VM_Version::has_v9()) {
1747 jio_fprintf(defaultStream::error_stream(),
1748 "V8 Machine detected, Server requires V9\n");
1749 status = false;
1750 }
1751 #endif /* COMPILER2 && SPARC */
1752
1753 // Allow both -XX:-UseStackBanging and -XX:-UseBoundThreads in non-product
1754 // builds so the cost of stack banging can be measured.
1755 #if (defined(PRODUCT) && defined(SOLARIS))
1756 if (!UseBoundThreads && !UseStackBanging) {
1757 jio_fprintf(defaultStream::error_stream(),
1758 "-UseStackBanging conflicts with -UseBoundThreads\n");
1759
1760 status = false;
1761 }
1762 #endif
1763
1764 if (TLABRefillWasteFraction == 0) {
1765 jio_fprintf(defaultStream::error_stream(),
1766 "TLABRefillWasteFraction should be a denominator, "
1767 "not " SIZE_FORMAT "\n",
1768 TLABRefillWasteFraction);
1769 status = false;
1770 }
1771
1772 status = status && verify_percentage(AdaptiveSizePolicyWeight,
1773 "AdaptiveSizePolicyWeight");
1774 status = status && verify_percentage(AdaptivePermSizeWeight, "AdaptivePermSizeWeight");
1775 status = status && verify_percentage(ThresholdTolerance, "ThresholdTolerance");
1776 status = status && verify_percentage(MinHeapFreeRatio, "MinHeapFreeRatio");
1777 status = status && verify_percentage(MaxHeapFreeRatio, "MaxHeapFreeRatio");
1778
1779 if (MinHeapFreeRatio > MaxHeapFreeRatio) {
1780 jio_fprintf(defaultStream::error_stream(),
1781 "MinHeapFreeRatio (" UINTX_FORMAT ") must be less than or "
1782 "equal to MaxHeapFreeRatio (" UINTX_FORMAT ")\n",
1783 MinHeapFreeRatio, MaxHeapFreeRatio);
1784 status = false;
1785 }
1786 // Keeping the heap 100% free is hard ;-) so limit it to 99%.
1787 MinHeapFreeRatio = MIN2(MinHeapFreeRatio, (uintx) 99);
1788
1789 if (FullGCALot && FLAG_IS_DEFAULT(MarkSweepAlwaysCompactCount)) {
1790 MarkSweepAlwaysCompactCount = 1; // Move objects every gc.
1791 }
1792
1793 if (UseParallelOldGC && ParallelOldGCSplitALot) {
1794 // Settings to encourage splitting.
1795 if (!FLAG_IS_CMDLINE(NewRatio)) {
1796 FLAG_SET_CMDLINE(intx, NewRatio, 2);
1797 }
1798 if (!FLAG_IS_CMDLINE(ScavengeBeforeFullGC)) {
1799 FLAG_SET_CMDLINE(bool, ScavengeBeforeFullGC, false);
1800 }
1801 }
1802
1803 status = status && verify_percentage(GCHeapFreeLimit, "GCHeapFreeLimit");
1804 status = status && verify_percentage(GCTimeLimit, "GCTimeLimit");
1805 if (GCTimeLimit == 100) {
1806 // Turn off gc-overhead-limit-exceeded checks
1807 FLAG_SET_DEFAULT(UseGCOverheadLimit, false);
1808 }
1809
1810 status = status && verify_percentage(GCHeapFreeLimit, "GCHeapFreeLimit");
1811
1812 // Check whether user-specified sharing option conflicts with GC or page size.
1813 // Both sharing and large pages are enabled by default on some platforms;
1814 // large pages override sharing only if explicitly set on the command line.
1815 const bool cannot_share = UseConcMarkSweepGC || CMSIncrementalMode ||
1816 UseG1GC || UseParNewGC || UseParallelGC || UseParallelOldGC ||
1817 UseLargePages && FLAG_IS_CMDLINE(UseLargePages);
1818 if (cannot_share) {
1819 // Either force sharing on by forcing the other options off, or
1820 // force sharing off.
1821 if (DumpSharedSpaces || ForceSharedSpaces) {
1822 jio_fprintf(defaultStream::error_stream(),
1823 "Using Serial GC and default page size because of %s\n",
1824 ForceSharedSpaces ? "-Xshare:on" : "-Xshare:dump");
1825 force_serial_gc();
1826 FLAG_SET_DEFAULT(UseLargePages, false);
1827 } else {
1828 if (UseSharedSpaces && Verbose) {
1829 jio_fprintf(defaultStream::error_stream(),
1830 "Turning off use of shared archive because of "
1831 "choice of garbage collector or large pages\n");
1832 }
1833 no_shared_spaces();
1834 }
1835 } else if (UseLargePages && (UseSharedSpaces || DumpSharedSpaces)) {
1836 FLAG_SET_DEFAULT(UseLargePages, false);
1837 }
1838
1839 status = status && check_gc_consistency();
1840 status = status && check_stack_pages();
1841
1842 if (_has_alloc_profile) {
1843 if (UseParallelGC || UseParallelOldGC) {
1844 jio_fprintf(defaultStream::error_stream(),
1845 "error: invalid argument combination.\n"
1846 "Allocation profiling (-Xaprof) cannot be used together with "
1847 "Parallel GC (-XX:+UseParallelGC or -XX:+UseParallelOldGC).\n");
1848 status = false;
1849 }
1850 if (UseConcMarkSweepGC) {
1851 jio_fprintf(defaultStream::error_stream(),
1852 "error: invalid argument combination.\n"
1853 "Allocation profiling (-Xaprof) cannot be used together with "
1854 "the CMS collector (-XX:+UseConcMarkSweepGC).\n");
1855 status = false;
1856 }
1857 }
1858
1859 if (CMSIncrementalMode) {
1860 if (!UseConcMarkSweepGC) {
1861 jio_fprintf(defaultStream::error_stream(),
1862 "error: invalid argument combination.\n"
1863 "The CMS collector (-XX:+UseConcMarkSweepGC) must be "
1864 "selected in order\nto use CMSIncrementalMode.\n");
1865 status = false;
1866 } else {
1867 status = status && verify_percentage(CMSIncrementalDutyCycle,
1868 "CMSIncrementalDutyCycle");
1869 status = status && verify_percentage(CMSIncrementalDutyCycleMin,
1870 "CMSIncrementalDutyCycleMin");
1871 status = status && verify_percentage(CMSIncrementalSafetyFactor,
1872 "CMSIncrementalSafetyFactor");
1873 status = status && verify_percentage(CMSIncrementalOffset,
1874 "CMSIncrementalOffset");
1875 status = status && verify_percentage(CMSExpAvgFactor,
1876 "CMSExpAvgFactor");
1877 // If it was not set on the command line, set
1878 // CMSInitiatingOccupancyFraction to 1 so icms can initiate cycles early.
1879 if (CMSInitiatingOccupancyFraction < 0) {
1880 FLAG_SET_DEFAULT(CMSInitiatingOccupancyFraction, 1);
1881 }
1882 }
1883 }
1884
1885 // CMS space iteration, which FLSVerifyAllHeapreferences entails,
1886 // insists that we hold the requisite locks so that the iteration is
1887 // MT-safe. For the verification at start-up and shut-down, we don't
1888 // yet have a good way of acquiring and releasing these locks,
1889 // which are not visible at the CollectedHeap level. We want to
1890 // be able to acquire these locks and then do the iteration rather
1891 // than just disable the lock verification. This will be fixed under
1892 // bug 4788986.
1893 if (UseConcMarkSweepGC && FLSVerifyAllHeapReferences) {
1894 if (VerifyGCStartAt == 0) {
1895 warning("Heap verification at start-up disabled "
1896 "(due to current incompatibility with FLSVerifyAllHeapReferences)");
1897 VerifyGCStartAt = 1; // Disable verification at start-up
1898 }
1899 if (VerifyBeforeExit) {
1900 warning("Heap verification at shutdown disabled "
1901 "(due to current incompatibility with FLSVerifyAllHeapReferences)");
1902 VerifyBeforeExit = false; // Disable verification at shutdown
1903 }
1904 }
1905
1906 // Note: only executed in non-PRODUCT mode
1907 if (!UseAsyncConcMarkSweepGC &&
1908 (ExplicitGCInvokesConcurrent ||
1909 ExplicitGCInvokesConcurrentAndUnloadsClasses)) {
1910 jio_fprintf(defaultStream::error_stream(),
1911 "error: +ExplictGCInvokesConcurrent[AndUnloadsClasses] conflicts"
1912 " with -UseAsyncConcMarkSweepGC");
1913 status = false;
1914 }
1915
1916 if (UseG1GC) {
1917 status = status && verify_percentage(InitiatingHeapOccupancyPercent,
1918 "InitiatingHeapOccupancyPercent");
1919 }
1920
1921 status = status && verify_interval(RefDiscoveryPolicy,
1922 ReferenceProcessor::DiscoveryPolicyMin,
1923 ReferenceProcessor::DiscoveryPolicyMax,
1924 "RefDiscoveryPolicy");
1925
1926 // Limit the lower bound of this flag to 1 as it is used in a division
1927 // expression.
1928 status = status && verify_interval(TLABWasteTargetPercent,
1929 1, 100, "TLABWasteTargetPercent");
1930
1931 status = status && verify_object_alignment();
1932
1933 return status;
1934 }
1935
1936 bool Arguments::is_bad_option(const JavaVMOption* option, jboolean ignore,
1937 const char* option_type) {
1938 if (ignore) return false;
1939
1940 const char* spacer = " ";
1941 if (option_type == NULL) {
1942 option_type = ++spacer; // Set both to the empty string.
1943 }
1944
1945 if (os::obsolete_option(option)) {
1946 jio_fprintf(defaultStream::error_stream(),
1947 "Obsolete %s%soption: %s\n", option_type, spacer,
1948 option->optionString);
1949 return false;
1950 } else {
1951 jio_fprintf(defaultStream::error_stream(),
1952 "Unrecognized %s%soption: %s\n", option_type, spacer,
1953 option->optionString);
1954 return true;
1955 }
1956 }
1957
1958 static const char* user_assertion_options[] = {
1959 "-da", "-ea", "-disableassertions", "-enableassertions", 0
1960 };
1961
1962 static const char* system_assertion_options[] = {
1963 "-dsa", "-esa", "-disablesystemassertions", "-enablesystemassertions", 0
1964 };
1965
1966 // Return true if any of the strings in null-terminated array 'names' matches.
1967 // If tail_allowed is true, then the tail must begin with a colon; otherwise,
1968 // the option must match exactly.
1969 static bool match_option(const JavaVMOption* option, const char** names, const char** tail,
1970 bool tail_allowed) {
1971 for (/* empty */; *names != NULL; ++names) {
1972 if (match_option(option, *names, tail)) {
1973 if (**tail == '\0' || tail_allowed && **tail == ':') {
1974 return true;
1975 }
1976 }
1977 }
1978 return false;
1979 }
1980
1981 bool Arguments::parse_uintx(const char* value,
1982 uintx* uintx_arg,
1983 uintx min_size) {
1984
1985 // Check the sign first since atomull() parses only unsigned values.
1986 bool value_is_positive = !(*value == '-');
1987
1988 if (value_is_positive) {
1989 julong n;
1990 bool good_return = atomull(value, &n);
1991 if (good_return) {
1992 bool above_minimum = n >= min_size;
1993 bool value_is_too_large = n > max_uintx;
1994
1995 if (above_minimum && !value_is_too_large) {
1996 *uintx_arg = n;
1997 return true;
1998 }
1999 }
2000 }
2001 return false;
2002 }
2003
2004 Arguments::ArgsRange Arguments::parse_memory_size(const char* s,
2005 julong* long_arg,
2006 julong min_size) {
2007 if (!atomull(s, long_arg)) return arg_unreadable;
2008 return check_memory_size(*long_arg, min_size);
2009 }
2010
2011 // Parse JavaVMInitArgs structure
2012
2013 jint Arguments::parse_vm_init_args(const JavaVMInitArgs* args) {
2014 // For components of the system classpath.
2015 SysClassPath scp(Arguments::get_sysclasspath());
2016 bool scp_assembly_required = false;
2017
2018 // Save default settings for some mode flags
2019 Arguments::_AlwaysCompileLoopMethods = AlwaysCompileLoopMethods;
2020 Arguments::_UseOnStackReplacement = UseOnStackReplacement;
2021 Arguments::_ClipInlining = ClipInlining;
2022 Arguments::_BackgroundCompilation = BackgroundCompilation;
2023
2024 // Parse JAVA_TOOL_OPTIONS environment variable (if present)
2025 jint result = parse_java_tool_options_environment_variable(&scp, &scp_assembly_required);
2026 if (result != JNI_OK) {
2027 return result;
2028 }
2029
2030 // Parse JavaVMInitArgs structure passed in
2031 result = parse_each_vm_init_arg(args, &scp, &scp_assembly_required, COMMAND_LINE);
2032 if (result != JNI_OK) {
2033 return result;
2034 }
2035
2036 if (AggressiveOpts) {
2037 // Insert alt-rt.jar between user-specified bootclasspath
2038 // prefix and the default bootclasspath. os::set_boot_path()
2039 // uses meta_index_dir as the default bootclasspath directory.
2040 const char* altclasses_jar = "alt-rt.jar";
2041 size_t altclasses_path_len = strlen(get_meta_index_dir()) + 1 +
2042 strlen(altclasses_jar);
2043 char* altclasses_path = NEW_C_HEAP_ARRAY(char, altclasses_path_len);
2044 strcpy(altclasses_path, get_meta_index_dir());
2045 strcat(altclasses_path, altclasses_jar);
2046 scp.add_suffix_to_prefix(altclasses_path);
2047 scp_assembly_required = true;
2048 FREE_C_HEAP_ARRAY(char, altclasses_path);
2049 }
2050
2051 // Parse _JAVA_OPTIONS environment variable (if present) (mimics classic VM)
2052 result = parse_java_options_environment_variable(&scp, &scp_assembly_required);
2053 if (result != JNI_OK) {
2054 return result;
2055 }
2056
2057 // Do final processing now that all arguments have been parsed
2058 result = finalize_vm_init_args(&scp, scp_assembly_required);
2059 if (result != JNI_OK) {
2060 return result;
2061 }
2062
2063 return JNI_OK;
2064 }
2065
2066 jint Arguments::parse_each_vm_init_arg(const JavaVMInitArgs* args,
2067 SysClassPath* scp_p,
2068 bool* scp_assembly_required_p,
2069 FlagValueOrigin origin) {
2070 // Remaining part of option string
2071 const char* tail;
2072
2073 // iterate over arguments
2074 for (int index = 0; index < args->nOptions; index++) {
2075 bool is_absolute_path = false; // for -agentpath vs -agentlib
2076
2077 const JavaVMOption* option = args->options + index;
2078
2079 if (!match_option(option, "-Djava.class.path", &tail) &&
2080 !match_option(option, "-Dsun.java.command", &tail) &&
2081 !match_option(option, "-Dsun.java.launcher", &tail)) {
2082
2083 // add all jvm options to the jvm_args string. This string
2084 // is used later to set the java.vm.args PerfData string constant.
2085 // the -Djava.class.path and the -Dsun.java.command options are
2086 // omitted from jvm_args string as each have their own PerfData
2087 // string constant object.
2088 build_jvm_args(option->optionString);
2089 }
2090
2091 // -verbose:[class/gc/jni]
2092 if (match_option(option, "-verbose", &tail)) {
2093 if (!strcmp(tail, ":class") || !strcmp(tail, "")) {
2094 FLAG_SET_CMDLINE(bool, TraceClassLoading, true);
2095 FLAG_SET_CMDLINE(bool, TraceClassUnloading, true);
2096 } else if (!strcmp(tail, ":gc")) {
2097 FLAG_SET_CMDLINE(bool, PrintGC, true);
2098 } else if (!strcmp(tail, ":jni")) {
2099 FLAG_SET_CMDLINE(bool, PrintJNIResolving, true);
2100 }
2101 // -da / -ea / -disableassertions / -enableassertions
2102 // These accept an optional class/package name separated by a colon, e.g.,
2103 // -da:java.lang.Thread.
2104 } else if (match_option(option, user_assertion_options, &tail, true)) {
2105 bool enable = option->optionString[1] == 'e'; // char after '-' is 'e'
2106 if (*tail == '\0') {
2107 JavaAssertions::setUserClassDefault(enable);
2108 } else {
2109 assert(*tail == ':', "bogus match by match_option()");
2110 JavaAssertions::addOption(tail + 1, enable);
2111 }
2112 // -dsa / -esa / -disablesystemassertions / -enablesystemassertions
2113 } else if (match_option(option, system_assertion_options, &tail, false)) {
2114 bool enable = option->optionString[1] == 'e'; // char after '-' is 'e'
2115 JavaAssertions::setSystemClassDefault(enable);
2116 // -bootclasspath:
2117 } else if (match_option(option, "-Xbootclasspath:", &tail)) {
2118 scp_p->reset_path(tail);
2119 *scp_assembly_required_p = true;
2120 // -bootclasspath/a:
2121 } else if (match_option(option, "-Xbootclasspath/a:", &tail)) {
2122 scp_p->add_suffix(tail);
2123 *scp_assembly_required_p = true;
2124 // -bootclasspath/p:
2125 } else if (match_option(option, "-Xbootclasspath/p:", &tail)) {
2126 scp_p->add_prefix(tail);
2127 *scp_assembly_required_p = true;
2128 // -Xrun
2129 } else if (match_option(option, "-Xrun", &tail)) {
2130 if (tail != NULL) {
2131 const char* pos = strchr(tail, ':');
2132 size_t len = (pos == NULL) ? strlen(tail) : pos - tail;
2133 char* name = (char*)memcpy(NEW_C_HEAP_ARRAY(char, len + 1), tail, len);
2134 name[len] = '\0';
2135
2136 char *options = NULL;
2137 if(pos != NULL) {
2138 size_t len2 = strlen(pos+1) + 1; // options start after ':'. Final zero must be copied.
2139 options = (char*)memcpy(NEW_C_HEAP_ARRAY(char, len2), pos+1, len2);
2140 }
2141 #ifdef JVMTI_KERNEL
2142 if ((strcmp(name, "hprof") == 0) || (strcmp(name, "jdwp") == 0)) {
2143 warning("profiling and debugging agents are not supported with Kernel VM");
2144 } else
2145 #endif // JVMTI_KERNEL
2146 add_init_library(name, options);
2147 }
2148 // -agentlib and -agentpath
2149 } else if (match_option(option, "-agentlib:", &tail) ||
2150 (is_absolute_path = match_option(option, "-agentpath:", &tail))) {
2151 if(tail != NULL) {
2152 const char* pos = strchr(tail, '=');
2153 size_t len = (pos == NULL) ? strlen(tail) : pos - tail;
2154 char* name = strncpy(NEW_C_HEAP_ARRAY(char, len + 1), tail, len);
2155 name[len] = '\0';
2156
2157 char *options = NULL;
2158 if(pos != NULL) {
2159 options = strcpy(NEW_C_HEAP_ARRAY(char, strlen(pos + 1) + 1), pos + 1);
2160 }
2161 #ifdef JVMTI_KERNEL
2162 if ((strcmp(name, "hprof") == 0) || (strcmp(name, "jdwp") == 0)) {
2163 warning("profiling and debugging agents are not supported with Kernel VM");
2164 } else
2165 #endif // JVMTI_KERNEL
2166 add_init_agent(name, options, is_absolute_path);
2167
2168 }
2169 // -javaagent
2170 } else if (match_option(option, "-javaagent:", &tail)) {
2171 if(tail != NULL) {
2172 char *options = strcpy(NEW_C_HEAP_ARRAY(char, strlen(tail) + 1), tail);
2173 add_init_agent("instrument", options, false);
2174 }
2175 // -Xnoclassgc
2176 } else if (match_option(option, "-Xnoclassgc", &tail)) {
2177 FLAG_SET_CMDLINE(bool, ClassUnloading, false);
2178 // -Xincgc: i-CMS
2179 } else if (match_option(option, "-Xincgc", &tail)) {
2180 FLAG_SET_CMDLINE(bool, UseConcMarkSweepGC, true);
2181 FLAG_SET_CMDLINE(bool, CMSIncrementalMode, true);
2182 // -Xnoincgc: no i-CMS
2183 } else if (match_option(option, "-Xnoincgc", &tail)) {
2184 FLAG_SET_CMDLINE(bool, UseConcMarkSweepGC, false);
2185 FLAG_SET_CMDLINE(bool, CMSIncrementalMode, false);
2186 // -Xconcgc
2187 } else if (match_option(option, "-Xconcgc", &tail)) {
2188 FLAG_SET_CMDLINE(bool, UseConcMarkSweepGC, true);
2189 // -Xnoconcgc
2190 } else if (match_option(option, "-Xnoconcgc", &tail)) {
2191 FLAG_SET_CMDLINE(bool, UseConcMarkSweepGC, false);
2192 // -Xbatch
2193 } else if (match_option(option, "-Xbatch", &tail)) {
2194 FLAG_SET_CMDLINE(bool, BackgroundCompilation, false);
2195 // -Xmn for compatibility with other JVM vendors
2196 } else if (match_option(option, "-Xmn", &tail)) {
2197 julong long_initial_eden_size = 0;
2198 ArgsRange errcode = parse_memory_size(tail, &long_initial_eden_size, 1);
2199 if (errcode != arg_in_range) {
2200 jio_fprintf(defaultStream::error_stream(),
2201 "Invalid initial eden size: %s\n", option->optionString);
2202 describe_range_error(errcode);
2203 return JNI_EINVAL;
2204 }
2205 FLAG_SET_CMDLINE(uintx, MaxNewSize, (uintx)long_initial_eden_size);
2206 FLAG_SET_CMDLINE(uintx, NewSize, (uintx)long_initial_eden_size);
2207 // -Xms
2208 } else if (match_option(option, "-Xms", &tail)) {
2209 julong long_initial_heap_size = 0;
2210 ArgsRange errcode = parse_memory_size(tail, &long_initial_heap_size, 1);
2211 if (errcode != arg_in_range) {
2212 jio_fprintf(defaultStream::error_stream(),
2213 "Invalid initial heap size: %s\n", option->optionString);
2214 describe_range_error(errcode);
2215 return JNI_EINVAL;
2216 }
2217 FLAG_SET_CMDLINE(uintx, InitialHeapSize, (uintx)long_initial_heap_size);
2218 // Currently the minimum size and the initial heap sizes are the same.
2219 set_min_heap_size(InitialHeapSize);
2220 // -Xmx
2221 } else if (match_option(option, "-Xmx", &tail)) {
2222 julong long_max_heap_size = 0;
2223 ArgsRange errcode = parse_memory_size(tail, &long_max_heap_size, 1);
2224 if (errcode != arg_in_range) {
2225 jio_fprintf(defaultStream::error_stream(),
2226 "Invalid maximum heap size: %s\n", option->optionString);
2227 describe_range_error(errcode);
2228 return JNI_EINVAL;
2229 }
2230 FLAG_SET_CMDLINE(uintx, MaxHeapSize, (uintx)long_max_heap_size);
2231 // Xmaxf
2232 } else if (match_option(option, "-Xmaxf", &tail)) {
2233 int maxf = (int)(atof(tail) * 100);
2234 if (maxf < 0 || maxf > 100) {
2235 jio_fprintf(defaultStream::error_stream(),
2236 "Bad max heap free percentage size: %s\n",
2237 option->optionString);
2238 return JNI_EINVAL;
2239 } else {
2240 FLAG_SET_CMDLINE(uintx, MaxHeapFreeRatio, maxf);
2241 }
2242 // Xminf
2243 } else if (match_option(option, "-Xminf", &tail)) {
2244 int minf = (int)(atof(tail) * 100);
2245 if (minf < 0 || minf > 100) {
2246 jio_fprintf(defaultStream::error_stream(),
2247 "Bad min heap free percentage size: %s\n",
2248 option->optionString);
2249 return JNI_EINVAL;
2250 } else {
2251 FLAG_SET_CMDLINE(uintx, MinHeapFreeRatio, minf);
2252 }
2253 // -Xss
2254 } else if (match_option(option, "-Xss", &tail)) {
2255 julong long_ThreadStackSize = 0;
2256 ArgsRange errcode = parse_memory_size(tail, &long_ThreadStackSize, 1000);
2257 if (errcode != arg_in_range) {
2258 jio_fprintf(defaultStream::error_stream(),
2259 "Invalid thread stack size: %s\n", option->optionString);
2260 describe_range_error(errcode);
2261 return JNI_EINVAL;
2262 }
2263 // Internally track ThreadStackSize in units of 1024 bytes.
2264 FLAG_SET_CMDLINE(intx, ThreadStackSize,
2265 round_to((int)long_ThreadStackSize, K) / K);
2266 // -Xoss
2267 } else if (match_option(option, "-Xoss", &tail)) {
2268 // HotSpot does not have separate native and Java stacks, ignore silently for compatibility
2269 // -Xmaxjitcodesize
2270 } else if (match_option(option, "-Xmaxjitcodesize", &tail)) {
2271 julong long_ReservedCodeCacheSize = 0;
2272 ArgsRange errcode = parse_memory_size(tail, &long_ReservedCodeCacheSize,
2273 (size_t)InitialCodeCacheSize);
2274 if (errcode != arg_in_range) {
2275 jio_fprintf(defaultStream::error_stream(),
2276 "Invalid maximum code cache size: %s\n",
2277 option->optionString);
2278 describe_range_error(errcode);
2279 return JNI_EINVAL;
2280 }
2281 FLAG_SET_CMDLINE(uintx, ReservedCodeCacheSize, (uintx)long_ReservedCodeCacheSize);
2282 // -green
2283 } else if (match_option(option, "-green", &tail)) {
2284 jio_fprintf(defaultStream::error_stream(),
2285 "Green threads support not available\n");
2286 return JNI_EINVAL;
2287 // -native
2288 } else if (match_option(option, "-native", &tail)) {
2289 // HotSpot always uses native threads, ignore silently for compatibility
2290 // -Xsqnopause
2291 } else if (match_option(option, "-Xsqnopause", &tail)) {
2292 // EVM option, ignore silently for compatibility
2293 // -Xrs
2294 } else if (match_option(option, "-Xrs", &tail)) {
2295 // Classic/EVM option, new functionality
2296 FLAG_SET_CMDLINE(bool, ReduceSignalUsage, true);
2297 } else if (match_option(option, "-Xusealtsigs", &tail)) {
2298 // change default internal VM signals used - lower case for back compat
2299 FLAG_SET_CMDLINE(bool, UseAltSigs, true);
2300 // -Xoptimize
2301 } else if (match_option(option, "-Xoptimize", &tail)) {
2302 // EVM option, ignore silently for compatibility
2303 // -Xprof
2304 } else if (match_option(option, "-Xprof", &tail)) {
2305 #ifndef FPROF_KERNEL
2306 _has_profile = true;
2307 #else // FPROF_KERNEL
2308 // do we have to exit?
2309 warning("Kernel VM does not support flat profiling.");
2310 #endif // FPROF_KERNEL
2311 // -Xaprof
2312 } else if (match_option(option, "-Xaprof", &tail)) {
2313 _has_alloc_profile = true;
2314 // -Xconcurrentio
2315 } else if (match_option(option, "-Xconcurrentio", &tail)) {
2316 FLAG_SET_CMDLINE(bool, UseLWPSynchronization, true);
2317 FLAG_SET_CMDLINE(bool, BackgroundCompilation, false);
2318 FLAG_SET_CMDLINE(intx, DeferThrSuspendLoopCount, 1);
2319 FLAG_SET_CMDLINE(bool, UseTLAB, false);
2320 FLAG_SET_CMDLINE(uintx, NewSizeThreadIncrease, 16 * K); // 20Kb per thread added to new generation
2321
2322 // -Xinternalversion
2323 } else if (match_option(option, "-Xinternalversion", &tail)) {
2324 jio_fprintf(defaultStream::output_stream(), "%s\n",
2325 VM_Version::internal_vm_info_string());
2326 vm_exit(0);
2327 #ifndef PRODUCT
2328 // -Xprintflags
2329 } else if (match_option(option, "-Xprintflags", &tail)) {
2330 CommandLineFlags::printFlags();
2331 vm_exit(0);
2332 #endif
2333 // -D
2334 } else if (match_option(option, "-D", &tail)) {
2335 if (!add_property(tail)) {
2336 return JNI_ENOMEM;
2337 }
2338 // Out of the box management support
2339 if (match_option(option, "-Dcom.sun.management", &tail)) {
2340 FLAG_SET_CMDLINE(bool, ManagementServer, true);
2341 }
2342 // -Xint
2343 } else if (match_option(option, "-Xint", &tail)) {
2344 set_mode_flags(_int);
2345 // -Xmixed
2346 } else if (match_option(option, "-Xmixed", &tail)) {
2347 set_mode_flags(_mixed);
2348 // -Xcomp
2349 } else if (match_option(option, "-Xcomp", &tail)) {
2350 // for testing the compiler; turn off all flags that inhibit compilation
2351 set_mode_flags(_comp);
2352
2353 // -Xshare:dump
2354 } else if (match_option(option, "-Xshare:dump", &tail)) {
2355 #ifdef TIERED
2356 FLAG_SET_CMDLINE(bool, DumpSharedSpaces, true);
2357 set_mode_flags(_int); // Prevent compilation, which creates objects
2358 #elif defined(COMPILER2)
2359 vm_exit_during_initialization(
2360 "Dumping a shared archive is not supported on the Server JVM.", NULL);
2361 #elif defined(KERNEL)
2362 vm_exit_during_initialization(
2363 "Dumping a shared archive is not supported on the Kernel JVM.", NULL);
2364 #else
2365 FLAG_SET_CMDLINE(bool, DumpSharedSpaces, true);
2366 set_mode_flags(_int); // Prevent compilation, which creates objects
2367 #endif
2368 // -Xshare:on
2369 } else if (match_option(option, "-Xshare:on", &tail)) {
2370 FLAG_SET_CMDLINE(bool, UseSharedSpaces, true);
2371 FLAG_SET_CMDLINE(bool, RequireSharedSpaces, true);
2372 #ifdef TIERED
2373 FLAG_SET_CMDLINE(bool, ForceSharedSpaces, true);
2374 #endif // TIERED
2375 // -Xshare:auto
2376 } else if (match_option(option, "-Xshare:auto", &tail)) {
2377 FLAG_SET_CMDLINE(bool, UseSharedSpaces, true);
2378 FLAG_SET_CMDLINE(bool, RequireSharedSpaces, false);
2379 // -Xshare:off
2380 } else if (match_option(option, "-Xshare:off", &tail)) {
2381 FLAG_SET_CMDLINE(bool, UseSharedSpaces, false);
2382 FLAG_SET_CMDLINE(bool, RequireSharedSpaces, false);
2383
2384 // -Xverify
2385 } else if (match_option(option, "-Xverify", &tail)) {
2386 if (strcmp(tail, ":all") == 0 || strcmp(tail, "") == 0) {
2387 FLAG_SET_CMDLINE(bool, BytecodeVerificationLocal, true);
2388 FLAG_SET_CMDLINE(bool, BytecodeVerificationRemote, true);
2389 } else if (strcmp(tail, ":remote") == 0) {
2390 FLAG_SET_CMDLINE(bool, BytecodeVerificationLocal, false);
2391 FLAG_SET_CMDLINE(bool, BytecodeVerificationRemote, true);
2392 } else if (strcmp(tail, ":none") == 0) {
2393 FLAG_SET_CMDLINE(bool, BytecodeVerificationLocal, false);
2394 FLAG_SET_CMDLINE(bool, BytecodeVerificationRemote, false);
2395 } else if (is_bad_option(option, args->ignoreUnrecognized, "verification")) {
2396 return JNI_EINVAL;
2397 }
2398 // -Xdebug
2399 } else if (match_option(option, "-Xdebug", &tail)) {
2400 // note this flag has been used, then ignore
2401 set_xdebug_mode(true);
2402 // -Xnoagent
2403 } else if (match_option(option, "-Xnoagent", &tail)) {
2404 // For compatibility with classic. HotSpot refuses to load the old style agent.dll.
2405 } else if (match_option(option, "-Xboundthreads", &tail)) {
2406 // Bind user level threads to kernel threads (Solaris only)
2407 FLAG_SET_CMDLINE(bool, UseBoundThreads, true);
2408 } else if (match_option(option, "-Xloggc:", &tail)) {
2409 // Redirect GC output to the file. -Xloggc:<filename>
2410 // ostream_init_log(), when called will use this filename
2411 // to initialize a fileStream.
2412 _gc_log_filename = strdup(tail);
2413 FLAG_SET_CMDLINE(bool, PrintGC, true);
2414 FLAG_SET_CMDLINE(bool, PrintGCTimeStamps, true);
2415 FLAG_SET_CMDLINE(bool, TraceClassUnloading, true);
2416
2417 // JNI hooks
2418 } else if (match_option(option, "-Xcheck", &tail)) {
2419 if (!strcmp(tail, ":jni")) {
2420 CheckJNICalls = true;
2421 } else if (is_bad_option(option, args->ignoreUnrecognized,
2422 "check")) {
2423 return JNI_EINVAL;
2424 }
2425 } else if (match_option(option, "vfprintf", &tail)) {
2426 _vfprintf_hook = CAST_TO_FN_PTR(vfprintf_hook_t, option->extraInfo);
2427 } else if (match_option(option, "exit", &tail)) {
2428 _exit_hook = CAST_TO_FN_PTR(exit_hook_t, option->extraInfo);
2429 } else if (match_option(option, "abort", &tail)) {
2430 _abort_hook = CAST_TO_FN_PTR(abort_hook_t, option->extraInfo);
2431 // -XX:+AggressiveHeap
2432 } else if (match_option(option, "-XX:+AggressiveHeap", &tail)) {
2433
2434 // This option inspects the machine and attempts to set various
2435 // parameters to be optimal for long-running, memory allocation
2436 // intensive jobs. It is intended for machines with large
2437 // amounts of cpu and memory.
2438
2439 // initHeapSize is needed since _initial_heap_size is 4 bytes on a 32 bit
2440 // VM, but we may not be able to represent the total physical memory
2441 // available (like having 8gb of memory on a box but using a 32bit VM).
2442 // Thus, we need to make sure we're using a julong for intermediate
2443 // calculations.
2444 julong initHeapSize;
2445 julong total_memory = os::physical_memory();
2446
2447 if (total_memory < (julong)256*M) {
2448 jio_fprintf(defaultStream::error_stream(),
2449 "You need at least 256mb of memory to use -XX:+AggressiveHeap\n");
2450 vm_exit(1);
2451 }
2452
2453 // The heap size is half of available memory, or (at most)
2454 // all of possible memory less 160mb (leaving room for the OS
2455 // when using ISM). This is the maximum; because adaptive sizing
2456 // is turned on below, the actual space used may be smaller.
2457
2458 initHeapSize = MIN2(total_memory / (julong)2,
2459 total_memory - (julong)160*M);
2460
2461 // Make sure that if we have a lot of memory we cap the 32 bit
2462 // process space. The 64bit VM version of this function is a nop.
2463 initHeapSize = os::allocatable_physical_memory(initHeapSize);
2464
2465 // The perm gen is separate but contiguous with the
2466 // object heap (and is reserved with it) so subtract it
2467 // from the heap size.
2468 if (initHeapSize > MaxPermSize) {
2469 initHeapSize = initHeapSize - MaxPermSize;
2470 } else {
2471 warning("AggressiveHeap and MaxPermSize values may conflict");
2472 }
2473
2474 if (FLAG_IS_DEFAULT(MaxHeapSize)) {
2475 FLAG_SET_CMDLINE(uintx, MaxHeapSize, initHeapSize);
2476 FLAG_SET_CMDLINE(uintx, InitialHeapSize, initHeapSize);
2477 // Currently the minimum size and the initial heap sizes are the same.
2478 set_min_heap_size(initHeapSize);
2479 }
2480 if (FLAG_IS_DEFAULT(NewSize)) {
2481 // Make the young generation 3/8ths of the total heap.
2482 FLAG_SET_CMDLINE(uintx, NewSize,
2483 ((julong)MaxHeapSize / (julong)8) * (julong)3);
2484 FLAG_SET_CMDLINE(uintx, MaxNewSize, NewSize);
2485 }
2486
2487 FLAG_SET_DEFAULT(UseLargePages, true);
2488
2489 // Increase some data structure sizes for efficiency
2490 FLAG_SET_CMDLINE(uintx, BaseFootPrintEstimate, MaxHeapSize);
2491 FLAG_SET_CMDLINE(bool, ResizeTLAB, false);
2492 FLAG_SET_CMDLINE(uintx, TLABSize, 256*K);
2493
2494 // See the OldPLABSize comment below, but replace 'after promotion'
2495 // with 'after copying'. YoungPLABSize is the size of the survivor
2496 // space per-gc-thread buffers. The default is 4kw.
2497 FLAG_SET_CMDLINE(uintx, YoungPLABSize, 256*K); // Note: this is in words
2498
2499 // OldPLABSize is the size of the buffers in the old gen that
2500 // UseParallelGC uses to promote live data that doesn't fit in the
2501 // survivor spaces. At any given time, there's one for each gc thread.
2502 // The default size is 1kw. These buffers are rarely used, since the
2503 // survivor spaces are usually big enough. For specjbb, however, there
2504 // are occasions when there's lots of live data in the young gen
2505 // and we end up promoting some of it. We don't have a definite
2506 // explanation for why bumping OldPLABSize helps, but the theory
2507 // is that a bigger PLAB results in retaining something like the
2508 // original allocation order after promotion, which improves mutator
2509 // locality. A minor effect may be that larger PLABs reduce the
2510 // number of PLAB allocation events during gc. The value of 8kw
2511 // was arrived at by experimenting with specjbb.
2512 FLAG_SET_CMDLINE(uintx, OldPLABSize, 8*K); // Note: this is in words
2513
2514 // CompilationPolicyChoice=0 causes the server compiler to adopt
2515 // a more conservative which-method-do-I-compile policy when one
2516 // of the counters maintained by the interpreter trips. The
2517 // result is reduced startup time and improved specjbb and
2518 // alacrity performance. Zero is the default, but we set it
2519 // explicitly here in case the default changes.
2520 // See runtime/compilationPolicy.*.
2521 FLAG_SET_CMDLINE(intx, CompilationPolicyChoice, 0);
2522
2523 // Enable parallel GC and adaptive generation sizing
2524 FLAG_SET_CMDLINE(bool, UseParallelGC, true);
2525 FLAG_SET_DEFAULT(ParallelGCThreads,
2526 Abstract_VM_Version::parallel_worker_threads());
2527
2528 // Encourage steady state memory management
2529 FLAG_SET_CMDLINE(uintx, ThresholdTolerance, 100);
2530
2531 // This appears to improve mutator locality
2532 FLAG_SET_CMDLINE(bool, ScavengeBeforeFullGC, false);
2533
2534 // Get around early Solaris scheduling bug
2535 // (affinity vs other jobs on system)
2536 // but disallow DR and offlining (5008695).
2537 FLAG_SET_CMDLINE(bool, BindGCTaskThreadsToCPUs, true);
2538
2539 } else if (match_option(option, "-XX:+NeverTenure", &tail)) {
2540 // The last option must always win.
2541 FLAG_SET_CMDLINE(bool, AlwaysTenure, false);
2542 FLAG_SET_CMDLINE(bool, NeverTenure, true);
2543 } else if (match_option(option, "-XX:+AlwaysTenure", &tail)) {
2544 // The last option must always win.
2545 FLAG_SET_CMDLINE(bool, NeverTenure, false);
2546 FLAG_SET_CMDLINE(bool, AlwaysTenure, true);
2547 } else if (match_option(option, "-XX:+CMSPermGenSweepingEnabled", &tail) ||
2548 match_option(option, "-XX:-CMSPermGenSweepingEnabled", &tail)) {
2549 jio_fprintf(defaultStream::error_stream(),
2550 "Please use CMSClassUnloadingEnabled in place of "
2551 "CMSPermGenSweepingEnabled in the future\n");
2552 } else if (match_option(option, "-XX:+UseGCTimeLimit", &tail)) {
2553 FLAG_SET_CMDLINE(bool, UseGCOverheadLimit, true);
2554 jio_fprintf(defaultStream::error_stream(),
2555 "Please use -XX:+UseGCOverheadLimit in place of "
2556 "-XX:+UseGCTimeLimit in the future\n");
2557 } else if (match_option(option, "-XX:-UseGCTimeLimit", &tail)) {
2558 FLAG_SET_CMDLINE(bool, UseGCOverheadLimit, false);
2559 jio_fprintf(defaultStream::error_stream(),
2560 "Please use -XX:-UseGCOverheadLimit in place of "
2561 "-XX:-UseGCTimeLimit in the future\n");
2562 // The TLE options are for compatibility with 1.3 and will be
2563 // removed without notice in a future release. These options
2564 // are not to be documented.
2565 } else if (match_option(option, "-XX:MaxTLERatio=", &tail)) {
2566 // No longer used.
2567 } else if (match_option(option, "-XX:+ResizeTLE", &tail)) {
2568 FLAG_SET_CMDLINE(bool, ResizeTLAB, true);
2569 } else if (match_option(option, "-XX:-ResizeTLE", &tail)) {
2570 FLAG_SET_CMDLINE(bool, ResizeTLAB, false);
2571 } else if (match_option(option, "-XX:+PrintTLE", &tail)) {
2572 FLAG_SET_CMDLINE(bool, PrintTLAB, true);
2573 } else if (match_option(option, "-XX:-PrintTLE", &tail)) {
2574 FLAG_SET_CMDLINE(bool, PrintTLAB, false);
2575 } else if (match_option(option, "-XX:TLEFragmentationRatio=", &tail)) {
2576 // No longer used.
2577 } else if (match_option(option, "-XX:TLESize=", &tail)) {
2578 julong long_tlab_size = 0;
2579 ArgsRange errcode = parse_memory_size(tail, &long_tlab_size, 1);
2580 if (errcode != arg_in_range) {
2581 jio_fprintf(defaultStream::error_stream(),
2582 "Invalid TLAB size: %s\n", option->optionString);
2583 describe_range_error(errcode);
2584 return JNI_EINVAL;
2585 }
2586 FLAG_SET_CMDLINE(uintx, TLABSize, long_tlab_size);
2587 } else if (match_option(option, "-XX:TLEThreadRatio=", &tail)) {
2588 // No longer used.
2589 } else if (match_option(option, "-XX:+UseTLE", &tail)) {
2590 FLAG_SET_CMDLINE(bool, UseTLAB, true);
2591 } else if (match_option(option, "-XX:-UseTLE", &tail)) {
2592 FLAG_SET_CMDLINE(bool, UseTLAB, false);
2593 SOLARIS_ONLY(
2594 } else if (match_option(option, "-XX:+UsePermISM", &tail)) {
2595 warning("-XX:+UsePermISM is obsolete.");
2596 FLAG_SET_CMDLINE(bool, UseISM, true);
2597 } else if (match_option(option, "-XX:-UsePermISM", &tail)) {
2598 FLAG_SET_CMDLINE(bool, UseISM, false);
2599 )
2600 } else if (match_option(option, "-XX:+DisplayVMOutputToStderr", &tail)) {
2601 FLAG_SET_CMDLINE(bool, DisplayVMOutputToStdout, false);
2602 FLAG_SET_CMDLINE(bool, DisplayVMOutputToStderr, true);
2603 } else if (match_option(option, "-XX:+DisplayVMOutputToStdout", &tail)) {
2604 FLAG_SET_CMDLINE(bool, DisplayVMOutputToStderr, false);
2605 FLAG_SET_CMDLINE(bool, DisplayVMOutputToStdout, true);
2606 } else if (match_option(option, "-XX:+ExtendedDTraceProbes", &tail)) {
2607 #ifdef SOLARIS
2608 FLAG_SET_CMDLINE(bool, ExtendedDTraceProbes, true);
2609 FLAG_SET_CMDLINE(bool, DTraceMethodProbes, true);
2610 FLAG_SET_CMDLINE(bool, DTraceAllocProbes, true);
2611 FLAG_SET_CMDLINE(bool, DTraceMonitorProbes, true);
2612 #else // ndef SOLARIS
2613 jio_fprintf(defaultStream::error_stream(),
2614 "ExtendedDTraceProbes flag is only applicable on Solaris\n");
2615 return JNI_EINVAL;
2616 #endif // ndef SOLARIS
2617 #ifdef ASSERT
2618 } else if (match_option(option, "-XX:+FullGCALot", &tail)) {
2619 FLAG_SET_CMDLINE(bool, FullGCALot, true);
2620 // disable scavenge before parallel mark-compact
2621 FLAG_SET_CMDLINE(bool, ScavengeBeforeFullGC, false);
2622 #endif
2623 } else if (match_option(option, "-XX:CMSParPromoteBlocksToClaim=", &tail)) {
2624 julong cms_blocks_to_claim = (julong)atol(tail);
2625 FLAG_SET_CMDLINE(uintx, CMSParPromoteBlocksToClaim, cms_blocks_to_claim);
2626 jio_fprintf(defaultStream::error_stream(),
2627 "Please use -XX:OldPLABSize in place of "
2628 "-XX:CMSParPromoteBlocksToClaim in the future\n");
2629 } else if (match_option(option, "-XX:ParCMSPromoteBlocksToClaim=", &tail)) {
2630 julong cms_blocks_to_claim = (julong)atol(tail);
2631 FLAG_SET_CMDLINE(uintx, CMSParPromoteBlocksToClaim, cms_blocks_to_claim);
2632 jio_fprintf(defaultStream::error_stream(),
2633 "Please use -XX:OldPLABSize in place of "
2634 "-XX:ParCMSPromoteBlocksToClaim in the future\n");
2635 } else if (match_option(option, "-XX:ParallelGCOldGenAllocBufferSize=", &tail)) {
2636 julong old_plab_size = 0;
2637 ArgsRange errcode = parse_memory_size(tail, &old_plab_size, 1);
2638 if (errcode != arg_in_range) {
2639 jio_fprintf(defaultStream::error_stream(),
2640 "Invalid old PLAB size: %s\n", option->optionString);
2641 describe_range_error(errcode);
2642 return JNI_EINVAL;
2643 }
2644 FLAG_SET_CMDLINE(uintx, OldPLABSize, old_plab_size);
2645 jio_fprintf(defaultStream::error_stream(),
2646 "Please use -XX:OldPLABSize in place of "
2647 "-XX:ParallelGCOldGenAllocBufferSize in the future\n");
2648 } else if (match_option(option, "-XX:ParallelGCToSpaceAllocBufferSize=", &tail)) {
2649 julong young_plab_size = 0;
2650 ArgsRange errcode = parse_memory_size(tail, &young_plab_size, 1);
2651 if (errcode != arg_in_range) {
2652 jio_fprintf(defaultStream::error_stream(),
2653 "Invalid young PLAB size: %s\n", option->optionString);
2654 describe_range_error(errcode);
2655 return JNI_EINVAL;
2656 }
2657 FLAG_SET_CMDLINE(uintx, YoungPLABSize, young_plab_size);
2658 jio_fprintf(defaultStream::error_stream(),
2659 "Please use -XX:YoungPLABSize in place of "
2660 "-XX:ParallelGCToSpaceAllocBufferSize in the future\n");
2661 } else if (match_option(option, "-XX:CMSMarkStackSize=", &tail) ||
2662 match_option(option, "-XX:G1MarkStackSize=", &tail)) {
2663 julong stack_size = 0;
2664 ArgsRange errcode = parse_memory_size(tail, &stack_size, 1);
2665 if (errcode != arg_in_range) {
2666 jio_fprintf(defaultStream::error_stream(),
2667 "Invalid mark stack size: %s\n", option->optionString);
2668 describe_range_error(errcode);
2669 return JNI_EINVAL;
2670 }
2671 FLAG_SET_CMDLINE(uintx, MarkStackSize, stack_size);
2672 } else if (match_option(option, "-XX:CMSMarkStackSizeMax=", &tail)) {
2673 julong max_stack_size = 0;
2674 ArgsRange errcode = parse_memory_size(tail, &max_stack_size, 1);
2675 if (errcode != arg_in_range) {
2676 jio_fprintf(defaultStream::error_stream(),
2677 "Invalid maximum mark stack size: %s\n",
2678 option->optionString);
2679 describe_range_error(errcode);
2680 return JNI_EINVAL;
2681 }
2682 FLAG_SET_CMDLINE(uintx, MarkStackSizeMax, max_stack_size);
2683 } else if (match_option(option, "-XX:ParallelMarkingThreads=", &tail) ||
2684 match_option(option, "-XX:ParallelCMSThreads=", &tail)) {
2685 uintx conc_threads = 0;
2686 if (!parse_uintx(tail, &conc_threads, 1)) {
2687 jio_fprintf(defaultStream::error_stream(),
2688 "Invalid concurrent threads: %s\n", option->optionString);
2689 return JNI_EINVAL;
2690 }
2691 FLAG_SET_CMDLINE(uintx, ConcGCThreads, conc_threads);
2692 } else if (match_option(option, "-XX:", &tail)) { // -XX:xxxx
2693 // Skip -XX:Flags= since that case has already been handled
2694 if (strncmp(tail, "Flags=", strlen("Flags=")) != 0) {
2695 if (!process_argument(tail, args->ignoreUnrecognized, origin)) {
2696 return JNI_EINVAL;
2697 }
2698 }
2699 // Unknown option
2700 } else if (is_bad_option(option, args->ignoreUnrecognized)) {
2701 return JNI_ERR;
2702 }
2703 }
2704 // Change the default value for flags which have different default values
2705 // when working with older JDKs.
2706 if (JDK_Version::current().compare_major(6) <= 0 &&
2707 FLAG_IS_DEFAULT(UseVMInterruptibleIO)) {
2708 FLAG_SET_DEFAULT(UseVMInterruptibleIO, true);
2709 }
2710 #ifdef LINUX
2711 if (JDK_Version::current().compare_major(6) <= 0 &&
2712 FLAG_IS_DEFAULT(UseLinuxPosixThreadCPUClocks)) {
2713 FLAG_SET_DEFAULT(UseLinuxPosixThreadCPUClocks, false);
2714 }
2715 #endif // LINUX
2716 return JNI_OK;
2717 }
2718
2719 jint Arguments::finalize_vm_init_args(SysClassPath* scp_p, bool scp_assembly_required) {
2720 // This must be done after all -D arguments have been processed.
2721 scp_p->expand_endorsed();
2722
2723 if (scp_assembly_required || scp_p->get_endorsed() != NULL) {
2724 // Assemble the bootclasspath elements into the final path.
2725 Arguments::set_sysclasspath(scp_p->combined_path());
2726 }
2727
2728 // This must be done after all arguments have been processed.
2729 // java_compiler() true means set to "NONE" or empty.
2730 if (java_compiler() && !xdebug_mode()) {
2731 // For backwards compatibility, we switch to interpreted mode if
2732 // -Djava.compiler="NONE" or "" is specified AND "-Xdebug" was
2733 // not specified.
2734 set_mode_flags(_int);
2735 }
2736 if (CompileThreshold == 0) {
2737 set_mode_flags(_int);
2738 }
2739
2740 #ifndef COMPILER2
2741 // Don't degrade server performance for footprint
2742 if (FLAG_IS_DEFAULT(UseLargePages) &&
2743 MaxHeapSize < LargePageHeapSizeThreshold) {
2744 // No need for large granularity pages w/small heaps.
2745 // Note that large pages are enabled/disabled for both the
2746 // Java heap and the code cache.
2747 FLAG_SET_DEFAULT(UseLargePages, false);
2748 SOLARIS_ONLY(FLAG_SET_DEFAULT(UseMPSS, false));
2749 SOLARIS_ONLY(FLAG_SET_DEFAULT(UseISM, false));
2750 }
2751
2752 // Tiered compilation is undefined with C1.
2753 TieredCompilation = false;
2754 #else
2755 if (!FLAG_IS_DEFAULT(OptoLoopAlignment) && FLAG_IS_DEFAULT(MaxLoopPad)) {
2756 FLAG_SET_DEFAULT(MaxLoopPad, OptoLoopAlignment-1);
2757 }
2758 // Temporary disable bulk zeroing reduction with G1. See CR 6627983.
2759 if (UseG1GC) {
2760 FLAG_SET_DEFAULT(ReduceBulkZeroing, false);
2761 }
2762 #endif
2763
2764 // If we are running in a headless jre, force java.awt.headless property
2765 // to be true unless the property has already been set.
2766 // Also allow the OS environment variable JAVA_AWT_HEADLESS to set headless state.
2767 if (os::is_headless_jre()) {
2768 const char* headless = Arguments::get_property("java.awt.headless");
2769 if (headless == NULL) {
2770 char envbuffer[128];
2771 if (!os::getenv("JAVA_AWT_HEADLESS", envbuffer, sizeof(envbuffer))) {
2772 if (!add_property("java.awt.headless=true")) {
2773 return JNI_ENOMEM;
2774 }
2775 } else {
2776 char buffer[256];
2777 strcpy(buffer, "java.awt.headless=");
2778 strcat(buffer, envbuffer);
2779 if (!add_property(buffer)) {
2780 return JNI_ENOMEM;
2781 }
2782 }
2783 }
2784 }
2785
2786 if (!check_vm_args_consistency()) {
2787 return JNI_ERR;
2788 }
2789
2790 return JNI_OK;
2791 }
2792
2793 jint Arguments::parse_java_options_environment_variable(SysClassPath* scp_p, bool* scp_assembly_required_p) {
2794 return parse_options_environment_variable("_JAVA_OPTIONS", scp_p,
2795 scp_assembly_required_p);
2796 }
2797
2798 jint Arguments::parse_java_tool_options_environment_variable(SysClassPath* scp_p, bool* scp_assembly_required_p) {
2799 return parse_options_environment_variable("JAVA_TOOL_OPTIONS", scp_p,
2800 scp_assembly_required_p);
2801 }
2802
2803 jint Arguments::parse_options_environment_variable(const char* name, SysClassPath* scp_p, bool* scp_assembly_required_p) {
2804 const int N_MAX_OPTIONS = 64;
2805 const int OPTION_BUFFER_SIZE = 1024;
2806 char buffer[OPTION_BUFFER_SIZE];
2807
2808 // The variable will be ignored if it exceeds the length of the buffer.
2809 // Don't check this variable if user has special privileges
2810 // (e.g. unix su command).
2811 if (os::getenv(name, buffer, sizeof(buffer)) &&
2812 !os::have_special_privileges()) {
2813 JavaVMOption options[N_MAX_OPTIONS]; // Construct option array
2814 jio_fprintf(defaultStream::error_stream(),
2815 "Picked up %s: %s\n", name, buffer);
2816 char* rd = buffer; // pointer to the input string (rd)
2817 int i;
2818 for (i = 0; i < N_MAX_OPTIONS;) { // repeat for all options in the input string
2819 while (isspace(*rd)) rd++; // skip whitespace
2820 if (*rd == 0) break; // we re done when the input string is read completely
2821
2822 // The output, option string, overwrites the input string.
2823 // Because of quoting, the pointer to the option string (wrt) may lag the pointer to
2824 // input string (rd).
2825 char* wrt = rd;
2826
2827 options[i++].optionString = wrt; // Fill in option
2828 while (*rd != 0 && !isspace(*rd)) { // unquoted strings terminate with a space or NULL
2829 if (*rd == '\'' || *rd == '"') { // handle a quoted string
2830 int quote = *rd; // matching quote to look for
2831 rd++; // don't copy open quote
2832 while (*rd != quote) { // include everything (even spaces) up until quote
2833 if (*rd == 0) { // string termination means unmatched string
2834 jio_fprintf(defaultStream::error_stream(),
2835 "Unmatched quote in %s\n", name);
2836 return JNI_ERR;
2837 }
2838 *wrt++ = *rd++; // copy to option string
2839 }
2840 rd++; // don't copy close quote
2841 } else {
2842 *wrt++ = *rd++; // copy to option string
2843 }
2844 }
2845 // Need to check if we're done before writing a NULL,
2846 // because the write could be to the byte that rd is pointing to.
2847 if (*rd++ == 0) {
2848 *wrt = 0;
2849 break;
2850 }
2851 *wrt = 0; // Zero terminate option
2852 }
2853 // Construct JavaVMInitArgs structure and parse as if it was part of the command line
2854 JavaVMInitArgs vm_args;
2855 vm_args.version = JNI_VERSION_1_2;
2856 vm_args.options = options;
2857 vm_args.nOptions = i;
2858 vm_args.ignoreUnrecognized = IgnoreUnrecognizedVMOptions;
2859
2860 if (PrintVMOptions) {
2861 const char* tail;
2862 for (int i = 0; i < vm_args.nOptions; i++) {
2863 const JavaVMOption *option = vm_args.options + i;
2864 if (match_option(option, "-XX:", &tail)) {
2865 logOption(tail);
2866 }
2867 }
2868 }
2869
2870 return(parse_each_vm_init_arg(&vm_args, scp_p, scp_assembly_required_p, ENVIRON_VAR));
2871 }
2872 return JNI_OK;
2873 }
2874
2875
2876 // Parse entry point called from JNI_CreateJavaVM
2877
2878 jint Arguments::parse(const JavaVMInitArgs* args) {
2879
2880 // Sharing support
2881 // Construct the path to the archive
2882 char jvm_path[JVM_MAXPATHLEN];
2883 os::jvm_path(jvm_path, sizeof(jvm_path));
2884 #ifdef TIERED
2885 if (strstr(jvm_path, "client") != NULL) {
2886 force_client_mode = true;
2887 }
2888 #endif // TIERED
2889 char *end = strrchr(jvm_path, *os::file_separator());
2890 if (end != NULL) *end = '\0';
2891 char *shared_archive_path = NEW_C_HEAP_ARRAY(char, strlen(jvm_path) +
2892 strlen(os::file_separator()) + 20);
2893 if (shared_archive_path == NULL) return JNI_ENOMEM;
2894 strcpy(shared_archive_path, jvm_path);
2895 strcat(shared_archive_path, os::file_separator());
2896 strcat(shared_archive_path, "classes");
2897 DEBUG_ONLY(strcat(shared_archive_path, "_g");)
2898 strcat(shared_archive_path, ".jsa");
2899 SharedArchivePath = shared_archive_path;
2900
2901 // Remaining part of option string
2902 const char* tail;
2903
2904 // If flag "-XX:Flags=flags-file" is used it will be the first option to be processed.
2905 bool settings_file_specified = false;
2906 const char* flags_file;
2907 int index;
2908 for (index = 0; index < args->nOptions; index++) {
2909 const JavaVMOption *option = args->options + index;
2910 if (match_option(option, "-XX:Flags=", &tail)) {
2911 flags_file = tail;
2912 settings_file_specified = true;
2913 }
2914 if (match_option(option, "-XX:+PrintVMOptions", &tail)) {
2915 PrintVMOptions = true;
2916 }
2917 if (match_option(option, "-XX:-PrintVMOptions", &tail)) {
2918 PrintVMOptions = false;
2919 }
2920 if (match_option(option, "-XX:+IgnoreUnrecognizedVMOptions", &tail)) {
2921 IgnoreUnrecognizedVMOptions = true;
2922 }
2923 if (match_option(option, "-XX:-IgnoreUnrecognizedVMOptions", &tail)) {
2924 IgnoreUnrecognizedVMOptions = false;
2925 }
2926 if (match_option(option, "-XX:+PrintFlagsInitial", &tail)) {
2927 CommandLineFlags::printFlags();
2928 vm_exit(0);
2929 }
2930
2931 #ifndef PRODUCT
2932 if (match_option(option, "-XX:+PrintFlagsWithComments", &tail)) {
2933 CommandLineFlags::printFlags(true);
2934 vm_exit(0);
2935 }
2936 #endif
2937 }
2938
2939 if (IgnoreUnrecognizedVMOptions) {
2940 // uncast const to modify the flag args->ignoreUnrecognized
2941 *(jboolean*)(&args->ignoreUnrecognized) = true;
2942 }
2943
2944 // Parse specified settings file
2945 if (settings_file_specified) {
2946 if (!process_settings_file(flags_file, true, args->ignoreUnrecognized)) {
2947 return JNI_EINVAL;
2948 }
2949 }
2950
2951 // Parse default .hotspotrc settings file
2952 if (!settings_file_specified) {
2953 if (!process_settings_file(".hotspotrc", false, args->ignoreUnrecognized)) {
2954 return JNI_EINVAL;
2955 }
2956 }
2957
2958 if (PrintVMOptions) {
2959 for (index = 0; index < args->nOptions; index++) {
2960 const JavaVMOption *option = args->options + index;
2961 if (match_option(option, "-XX:", &tail)) {
2962 logOption(tail);
2963 }
2964 }
2965 }
2966
2967 // Parse JavaVMInitArgs structure passed in, as well as JAVA_TOOL_OPTIONS and _JAVA_OPTIONS
2968 jint result = parse_vm_init_args(args);
2969 if (result != JNI_OK) {
2970 return result;
2971 }
2972
2973 #ifndef PRODUCT
2974 if (TraceBytecodesAt != 0) {
2975 TraceBytecodes = true;
2976 }
2977 if (CountCompiledCalls) {
2978 if (UseCounterDecay) {
2979 warning("UseCounterDecay disabled because CountCalls is set");
2980 UseCounterDecay = false;
2981 }
2982 }
2983 #endif // PRODUCT
2984
2985 if (EnableInvokeDynamic && !EnableMethodHandles) {
2986 if (!FLAG_IS_DEFAULT(EnableMethodHandles)) {
2987 warning("forcing EnableMethodHandles true because EnableInvokeDynamic is true");
2988 }
2989 EnableMethodHandles = true;
2990 }
2991 if (EnableMethodHandles && !AnonymousClasses) {
2992 if (!FLAG_IS_DEFAULT(AnonymousClasses)) {
2993 warning("forcing AnonymousClasses true because EnableMethodHandles is true");
2994 }
2995 AnonymousClasses = true;
2996 }
2997 if ((EnableMethodHandles || AnonymousClasses) && ScavengeRootsInCode == 0) {
2998 if (!FLAG_IS_DEFAULT(ScavengeRootsInCode)) {
2999 warning("forcing ScavengeRootsInCode non-zero because EnableMethodHandles or AnonymousClasses is true");
3000 }
3001 ScavengeRootsInCode = 1;
3002 }
3003 #ifdef COMPILER2
3004 if (EnableInvokeDynamic && DoEscapeAnalysis) {
3005 // TODO: We need to find rules for invokedynamic and EA. For now,
3006 // simply disable EA by default.
3007 if (FLAG_IS_DEFAULT(DoEscapeAnalysis)) {
3008 DoEscapeAnalysis = false;
3009 }
3010 }
3011 #endif
3012
3013 if (PrintGCDetails) {
3014 // Turn on -verbose:gc options as well
3015 PrintGC = true;
3016 }
3017
3018 // Set object alignment values.
3019 set_object_alignment();
3020
3021 #ifdef SERIALGC
3022 force_serial_gc();
3023 #endif // SERIALGC
3024 #ifdef KERNEL
3025 no_shared_spaces();
3026 #endif // KERNEL
3027
3028 // Set flags based on ergonomics.
3029 set_ergonomics_flags();
3030
3031 #ifdef _LP64
3032 if (UseCompressedOops) {
3033 check_compressed_oops_compat();
3034 }
3035 #endif
3036
3037 // Check the GC selections again.
3038 if (!check_gc_consistency()) {
3039 return JNI_EINVAL;
3040 }
3041
3042 if (TieredCompilation) {
3043 set_tiered_flags();
3044 } else {
3045 // Check if the policy is valid. Policies 0 and 1 are valid for non-tiered setup.
3046 if (CompilationPolicyChoice >= 2) {
3047 vm_exit_during_initialization(
3048 "Incompatible compilation policy selected", NULL);
3049 }
3050 }
3051
3052 #ifndef KERNEL
3053 if (UseConcMarkSweepGC) {
3054 // Set flags for CMS and ParNew. Check UseConcMarkSweep first
3055 // to ensure that when both UseConcMarkSweepGC and UseParNewGC
3056 // are true, we don't call set_parnew_gc_flags() as well.
3057 set_cms_and_parnew_gc_flags();
3058 } else {
3059 // Set heap size based on available physical memory
3060 set_heap_size();
3061 // Set per-collector flags
3062 if (UseParallelGC || UseParallelOldGC) {
3063 set_parallel_gc_flags();
3064 } else if (UseParNewGC) {
3065 set_parnew_gc_flags();
3066 } else if (UseG1GC) {
3067 set_g1_gc_flags();
3068 }
3069 }
3070 #endif // KERNEL
3071
3072 #ifdef SERIALGC
3073 assert(verify_serial_gc_flags(), "SerialGC unset");
3074 #endif // SERIALGC
3075
3076 // Set bytecode rewriting flags
3077 set_bytecode_flags();
3078
3079 // Set flags if Aggressive optimization flags (-XX:+AggressiveOpts) enabled.
3080 set_aggressive_opts_flags();
3081
3082 #ifdef CC_INTERP
3083 // Clear flags not supported by the C++ interpreter
3084 FLAG_SET_DEFAULT(ProfileInterpreter, false);
3085 FLAG_SET_DEFAULT(UseBiasedLocking, false);
3086 LP64_ONLY(FLAG_SET_DEFAULT(UseCompressedOops, false));
3087 #endif // CC_INTERP
3088
3089 #ifdef COMPILER2
3090 if (!UseBiasedLocking || EmitSync != 0) {
3091 UseOptoBiasInlining = false;
3092 }
3093 #endif
3094
3095 if (PrintAssembly && FLAG_IS_DEFAULT(DebugNonSafepoints)) {
3096 warning("PrintAssembly is enabled; turning on DebugNonSafepoints to gain additional output");
3097 DebugNonSafepoints = true;
3098 }
3099
3100 #ifndef PRODUCT
3101 if (CompileTheWorld) {
3102 // Force NmethodSweeper to sweep whole CodeCache each time.
3103 if (FLAG_IS_DEFAULT(NmethodSweepFraction)) {
3104 NmethodSweepFraction = 1;
3105 }
3106 }
3107 #endif
3108
3109 if (PrintCommandLineFlags) {
3110 CommandLineFlags::printSetFlags();
3111 }
3112
3113 // Apply CPU specific policy for the BiasedLocking
3114 if (UseBiasedLocking) {
3115 if (!VM_Version::use_biased_locking() &&
3116 !(FLAG_IS_CMDLINE(UseBiasedLocking))) {
3117 UseBiasedLocking = false;
3118 }
3119 }
3120
3121 return JNI_OK;
3122 }
3123
3124 int Arguments::PropertyList_count(SystemProperty* pl) {
3125 int count = 0;
3126 while(pl != NULL) {
3127 count++;
3128 pl = pl->next();
3129 }
3130 return count;
3131 }
3132
3133 const char* Arguments::PropertyList_get_value(SystemProperty *pl, const char* key) {
3134 assert(key != NULL, "just checking");
3135 SystemProperty* prop;
3136 for (prop = pl; prop != NULL; prop = prop->next()) {
3137 if (strcmp(key, prop->key()) == 0) return prop->value();
3138 }
3139 return NULL;
3140 }
3141
3142 const char* Arguments::PropertyList_get_key_at(SystemProperty *pl, int index) {
3143 int count = 0;
3144 const char* ret_val = NULL;
3145
3146 while(pl != NULL) {
3147 if(count >= index) {
3148 ret_val = pl->key();
3149 break;
3150 }
3151 count++;
3152 pl = pl->next();
3153 }
3154
3155 return ret_val;
3156 }
3157
3158 char* Arguments::PropertyList_get_value_at(SystemProperty* pl, int index) {
3159 int count = 0;
3160 char* ret_val = NULL;
3161
3162 while(pl != NULL) {
3163 if(count >= index) {
3164 ret_val = pl->value();
3165 break;
3166 }
3167 count++;
3168 pl = pl->next();
3169 }
3170
3171 return ret_val;
3172 }
3173
3174 void Arguments::PropertyList_add(SystemProperty** plist, SystemProperty *new_p) {
3175 SystemProperty* p = *plist;
3176 if (p == NULL) {
3177 *plist = new_p;
3178 } else {
3179 while (p->next() != NULL) {
3180 p = p->next();
3181 }
3182 p->set_next(new_p);
3183 }
3184 }
3185
3186 void Arguments::PropertyList_add(SystemProperty** plist, const char* k, char* v) {
3187 if (plist == NULL)
3188 return;
3189
3190 SystemProperty* new_p = new SystemProperty(k, v, true);
3191 PropertyList_add(plist, new_p);
3192 }
3193
3194 // This add maintains unique property key in the list.
3195 void Arguments::PropertyList_unique_add(SystemProperty** plist, const char* k, char* v, jboolean append) {
3196 if (plist == NULL)
3197 return;
3198
3199 // If property key exist then update with new value.
3200 SystemProperty* prop;
3201 for (prop = *plist; prop != NULL; prop = prop->next()) {
3202 if (strcmp(k, prop->key()) == 0) {
3203 if (append) {
3204 prop->append_value(v);
3205 } else {
3206 prop->set_value(v);
3207 }
3208 return;
3209 }
3210 }
3211
3212 PropertyList_add(plist, k, v);
3213 }
3214
3215 #ifdef KERNEL
3216 char *Arguments::get_kernel_properties() {
3217 // Find properties starting with kernel and append them to string
3218 // We need to find out how long they are first because the URL's that they
3219 // might point to could get long.
3220 int length = 0;
3221 SystemProperty* prop;
3222 for (prop = _system_properties; prop != NULL; prop = prop->next()) {
3223 if (strncmp(prop->key(), "kernel.", 7 ) == 0) {
3224 length += (strlen(prop->key()) + strlen(prop->value()) + 5); // "-D ="
3225 }
3226 }
3227 // Add one for null terminator.
3228 char *props = AllocateHeap(length + 1, "get_kernel_properties");
3229 if (length != 0) {
3230 int pos = 0;
3231 for (prop = _system_properties; prop != NULL; prop = prop->next()) {
3232 if (strncmp(prop->key(), "kernel.", 7 ) == 0) {
3233 jio_snprintf(&props[pos], length-pos,
3234 "-D%s=%s ", prop->key(), prop->value());
3235 pos = strlen(props);
3236 }
3237 }
3238 }
3239 // null terminate props in case of null
3240 props[length] = '\0';
3241 return props;
3242 }
3243 #endif // KERNEL
3244
3245 // Copies src into buf, replacing "%%" with "%" and "%p" with pid
3246 // Returns true if all of the source pointed by src has been copied over to
3247 // the destination buffer pointed by buf. Otherwise, returns false.
3248 // Notes:
3249 // 1. If the length (buflen) of the destination buffer excluding the
3250 // NULL terminator character is not long enough for holding the expanded
3251 // pid characters, it also returns false instead of returning the partially
3252 // expanded one.
3253 // 2. The passed in "buflen" should be large enough to hold the null terminator.
3254 bool Arguments::copy_expand_pid(const char* src, size_t srclen,
3255 char* buf, size_t buflen) {
3256 const char* p = src;
3257 char* b = buf;
3258 const char* src_end = &src[srclen];
3259 char* buf_end = &buf[buflen - 1];
3260
3261 while (p < src_end && b < buf_end) {
3262 if (*p == '%') {
3263 switch (*(++p)) {
3264 case '%': // "%%" ==> "%"
3265 *b++ = *p++;
3266 break;
3267 case 'p': { // "%p" ==> current process id
3268 // buf_end points to the character before the last character so
3269 // that we could write '\0' to the end of the buffer.
3270 size_t buf_sz = buf_end - b + 1;
3271 int ret = jio_snprintf(b, buf_sz, "%d", os::current_process_id());
3272
3273 // if jio_snprintf fails or the buffer is not long enough to hold
3274 // the expanded pid, returns false.
3275 if (ret < 0 || ret >= (int)buf_sz) {
3276 return false;
3277 } else {
3278 b += ret;
3279 assert(*b == '\0', "fail in copy_expand_pid");
3280 if (p == src_end && b == buf_end + 1) {
3281 // reach the end of the buffer.
3282 return true;
3283 }
3284 }
3285 p++;
3286 break;
3287 }
3288 default :
3289 *b++ = '%';
3290 }
3291 } else {
3292 *b++ = *p++;
3293 }
3294 }
3295 *b = '\0';
3296 return (p == src_end); // return false if not all of the source was copied
3297 }