|
1 /* |
|
2 * Copyright (c) 1997, 2014, 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 "precompiled.hpp" |
|
26 #include "memory/allocation.inline.hpp" |
|
27 #include "oops/oop.inline.hpp" |
|
28 #include "runtime/arguments.hpp" |
|
29 #include "runtime/globals.hpp" |
|
30 #include "runtime/globals_extension.hpp" |
|
31 #include "utilities/ostream.hpp" |
|
32 #include "utilities/macros.hpp" |
|
33 #include "utilities/top.hpp" |
|
34 #include "trace/tracing.hpp" |
|
35 #if INCLUDE_ALL_GCS |
|
36 #include "gc_implementation/g1/g1_globals.hpp" |
|
37 #endif // INCLUDE_ALL_GCS |
|
38 #ifdef COMPILER1 |
|
39 #include "c1/c1_globals.hpp" |
|
40 #endif |
|
41 #ifdef COMPILER2 |
|
42 #include "opto/c2_globals.hpp" |
|
43 #endif |
|
44 #ifdef SHARK |
|
45 #include "shark/shark_globals.hpp" |
|
46 #endif |
|
47 |
|
48 PRAGMA_FORMAT_MUTE_WARNINGS_FOR_GCC |
|
49 |
|
50 RUNTIME_FLAGS(MATERIALIZE_DEVELOPER_FLAG, MATERIALIZE_PD_DEVELOPER_FLAG, \ |
|
51 MATERIALIZE_PRODUCT_FLAG, MATERIALIZE_PD_PRODUCT_FLAG, \ |
|
52 MATERIALIZE_DIAGNOSTIC_FLAG, MATERIALIZE_EXPERIMENTAL_FLAG, \ |
|
53 MATERIALIZE_NOTPRODUCT_FLAG, \ |
|
54 MATERIALIZE_MANAGEABLE_FLAG, MATERIALIZE_PRODUCT_RW_FLAG, \ |
|
55 MATERIALIZE_LP64_PRODUCT_FLAG) |
|
56 |
|
57 RUNTIME_OS_FLAGS(MATERIALIZE_DEVELOPER_FLAG, MATERIALIZE_PD_DEVELOPER_FLAG, \ |
|
58 MATERIALIZE_PRODUCT_FLAG, MATERIALIZE_PD_PRODUCT_FLAG, \ |
|
59 MATERIALIZE_DIAGNOSTIC_FLAG, MATERIALIZE_NOTPRODUCT_FLAG) |
|
60 |
|
61 ARCH_FLAGS(MATERIALIZE_DEVELOPER_FLAG, MATERIALIZE_PRODUCT_FLAG, \ |
|
62 MATERIALIZE_DIAGNOSTIC_FLAG, MATERIALIZE_EXPERIMENTAL_FLAG, \ |
|
63 MATERIALIZE_NOTPRODUCT_FLAG) |
|
64 |
|
65 MATERIALIZE_FLAGS_EXT |
|
66 |
|
67 |
|
68 static bool is_product_build() { |
|
69 #ifdef PRODUCT |
|
70 return true; |
|
71 #else |
|
72 return false; |
|
73 #endif |
|
74 } |
|
75 |
|
76 void Flag::check_writable() { |
|
77 if (is_constant_in_binary()) { |
|
78 fatal(err_msg("flag is constant: %s", _name)); |
|
79 } |
|
80 } |
|
81 |
|
82 bool Flag::is_bool() const { |
|
83 return strcmp(_type, "bool") == 0; |
|
84 } |
|
85 |
|
86 bool Flag::get_bool() const { |
|
87 return *((bool*) _addr); |
|
88 } |
|
89 |
|
90 void Flag::set_bool(bool value) { |
|
91 check_writable(); |
|
92 *((bool*) _addr) = value; |
|
93 } |
|
94 |
|
95 bool Flag::is_intx() const { |
|
96 return strcmp(_type, "intx") == 0; |
|
97 } |
|
98 |
|
99 intx Flag::get_intx() const { |
|
100 return *((intx*) _addr); |
|
101 } |
|
102 |
|
103 void Flag::set_intx(intx value) { |
|
104 check_writable(); |
|
105 *((intx*) _addr) = value; |
|
106 } |
|
107 |
|
108 bool Flag::is_uintx() const { |
|
109 return strcmp(_type, "uintx") == 0; |
|
110 } |
|
111 |
|
112 uintx Flag::get_uintx() const { |
|
113 return *((uintx*) _addr); |
|
114 } |
|
115 |
|
116 void Flag::set_uintx(uintx value) { |
|
117 check_writable(); |
|
118 *((uintx*) _addr) = value; |
|
119 } |
|
120 |
|
121 bool Flag::is_uint64_t() const { |
|
122 return strcmp(_type, "uint64_t") == 0; |
|
123 } |
|
124 |
|
125 uint64_t Flag::get_uint64_t() const { |
|
126 return *((uint64_t*) _addr); |
|
127 } |
|
128 |
|
129 void Flag::set_uint64_t(uint64_t value) { |
|
130 check_writable(); |
|
131 *((uint64_t*) _addr) = value; |
|
132 } |
|
133 |
|
134 bool Flag::is_double() const { |
|
135 return strcmp(_type, "double") == 0; |
|
136 } |
|
137 |
|
138 double Flag::get_double() const { |
|
139 return *((double*) _addr); |
|
140 } |
|
141 |
|
142 void Flag::set_double(double value) { |
|
143 check_writable(); |
|
144 *((double*) _addr) = value; |
|
145 } |
|
146 |
|
147 bool Flag::is_ccstr() const { |
|
148 return strcmp(_type, "ccstr") == 0 || strcmp(_type, "ccstrlist") == 0; |
|
149 } |
|
150 |
|
151 bool Flag::ccstr_accumulates() const { |
|
152 return strcmp(_type, "ccstrlist") == 0; |
|
153 } |
|
154 |
|
155 ccstr Flag::get_ccstr() const { |
|
156 return *((ccstr*) _addr); |
|
157 } |
|
158 |
|
159 void Flag::set_ccstr(ccstr value) { |
|
160 check_writable(); |
|
161 *((ccstr*) _addr) = value; |
|
162 } |
|
163 |
|
164 |
|
165 Flag::Flags Flag::get_origin() { |
|
166 return Flags(_flags & VALUE_ORIGIN_MASK); |
|
167 } |
|
168 |
|
169 void Flag::set_origin(Flags origin) { |
|
170 assert((origin & VALUE_ORIGIN_MASK) == origin, "sanity"); |
|
171 _flags = Flags((_flags & ~VALUE_ORIGIN_MASK) | origin); |
|
172 } |
|
173 |
|
174 bool Flag::is_default() { |
|
175 return (get_origin() == DEFAULT); |
|
176 } |
|
177 |
|
178 bool Flag::is_ergonomic() { |
|
179 return (get_origin() == ERGONOMIC); |
|
180 } |
|
181 |
|
182 bool Flag::is_command_line() { |
|
183 return (get_origin() == COMMAND_LINE); |
|
184 } |
|
185 |
|
186 bool Flag::is_product() const { |
|
187 return (_flags & KIND_PRODUCT) != 0; |
|
188 } |
|
189 |
|
190 bool Flag::is_manageable() const { |
|
191 return (_flags & KIND_MANAGEABLE) != 0; |
|
192 } |
|
193 |
|
194 bool Flag::is_diagnostic() const { |
|
195 return (_flags & KIND_DIAGNOSTIC) != 0; |
|
196 } |
|
197 |
|
198 bool Flag::is_experimental() const { |
|
199 return (_flags & KIND_EXPERIMENTAL) != 0; |
|
200 } |
|
201 |
|
202 bool Flag::is_notproduct() const { |
|
203 return (_flags & KIND_NOT_PRODUCT) != 0; |
|
204 } |
|
205 |
|
206 bool Flag::is_develop() const { |
|
207 return (_flags & KIND_DEVELOP) != 0; |
|
208 } |
|
209 |
|
210 bool Flag::is_read_write() const { |
|
211 return (_flags & KIND_READ_WRITE) != 0; |
|
212 } |
|
213 |
|
214 bool Flag::is_commercial() const { |
|
215 return (_flags & KIND_COMMERCIAL) != 0; |
|
216 } |
|
217 |
|
218 /** |
|
219 * Returns if this flag is a constant in the binary. Right now this is |
|
220 * true for notproduct and develop flags in product builds. |
|
221 */ |
|
222 bool Flag::is_constant_in_binary() const { |
|
223 #ifdef PRODUCT |
|
224 return is_notproduct() || is_develop(); |
|
225 #else |
|
226 return false; |
|
227 #endif |
|
228 } |
|
229 |
|
230 bool Flag::is_unlocker() const { |
|
231 return strcmp(_name, "UnlockDiagnosticVMOptions") == 0 || |
|
232 strcmp(_name, "UnlockExperimentalVMOptions") == 0 || |
|
233 is_unlocker_ext(); |
|
234 } |
|
235 |
|
236 bool Flag::is_unlocked() const { |
|
237 if (is_diagnostic()) { |
|
238 return UnlockDiagnosticVMOptions; |
|
239 } |
|
240 if (is_experimental()) { |
|
241 return UnlockExperimentalVMOptions; |
|
242 } |
|
243 return is_unlocked_ext(); |
|
244 } |
|
245 |
|
246 // Get custom message for this locked flag, or return NULL if |
|
247 // none is available. |
|
248 void Flag::get_locked_message(char* buf, int buflen) const { |
|
249 buf[0] = '\0'; |
|
250 if (is_diagnostic() && !is_unlocked()) { |
|
251 jio_snprintf(buf, buflen, "Error: VM option '%s' is diagnostic and must be enabled via -XX:+UnlockDiagnosticVMOptions.\n", |
|
252 _name); |
|
253 return; |
|
254 } |
|
255 if (is_experimental() && !is_unlocked()) { |
|
256 jio_snprintf(buf, buflen, "Error: VM option '%s' is experimental and must be enabled via -XX:+UnlockExperimentalVMOptions.\n", |
|
257 _name); |
|
258 return; |
|
259 } |
|
260 if (is_develop() && is_product_build()) { |
|
261 jio_snprintf(buf, buflen, "Error: VM option '%s' is develop and is available only in debug version of VM.\n", |
|
262 _name); |
|
263 return; |
|
264 } |
|
265 if (is_notproduct() && is_product_build()) { |
|
266 jio_snprintf(buf, buflen, "Error: VM option '%s' is notproduct and is available only in debug version of VM.\n", |
|
267 _name); |
|
268 return; |
|
269 } |
|
270 get_locked_message_ext(buf, buflen); |
|
271 } |
|
272 |
|
273 bool Flag::is_writeable() const { |
|
274 return is_manageable() || (is_product() && is_read_write()) || is_writeable_ext(); |
|
275 } |
|
276 |
|
277 // All flags except "manageable" are assumed to be internal flags. |
|
278 // Long term, we need to define a mechanism to specify which flags |
|
279 // are external/stable and change this function accordingly. |
|
280 bool Flag::is_external() const { |
|
281 return is_manageable() || is_external_ext(); |
|
282 } |
|
283 |
|
284 |
|
285 // Length of format string (e.g. "%.1234s") for printing ccstr below |
|
286 #define FORMAT_BUFFER_LEN 16 |
|
287 |
|
288 PRAGMA_FORMAT_NONLITERAL_IGNORED_EXTERNAL |
|
289 void Flag::print_on(outputStream* st, bool withComments) { |
|
290 // Don't print notproduct and develop flags in a product build. |
|
291 if (is_constant_in_binary()) { |
|
292 return; |
|
293 } |
|
294 |
|
295 st->print("%9s %-40s %c= ", _type, _name, (!is_default() ? ':' : ' ')); |
|
296 |
|
297 if (is_bool()) { |
|
298 st->print("%-16s", get_bool() ? "true" : "false"); |
|
299 } |
|
300 if (is_intx()) { |
|
301 st->print("%-16ld", get_intx()); |
|
302 } |
|
303 if (is_uintx()) { |
|
304 st->print("%-16lu", get_uintx()); |
|
305 } |
|
306 if (is_uint64_t()) { |
|
307 st->print("%-16lu", get_uint64_t()); |
|
308 } |
|
309 if (is_double()) { |
|
310 st->print("%-16f", get_double()); |
|
311 } |
|
312 if (is_ccstr()) { |
|
313 const char* cp = get_ccstr(); |
|
314 if (cp != NULL) { |
|
315 const char* eol; |
|
316 while ((eol = strchr(cp, '\n')) != NULL) { |
|
317 char format_buffer[FORMAT_BUFFER_LEN]; |
|
318 size_t llen = pointer_delta(eol, cp, sizeof(char)); |
|
319 jio_snprintf(format_buffer, FORMAT_BUFFER_LEN, |
|
320 "%%." SIZE_FORMAT "s", llen); |
|
321 PRAGMA_DIAG_PUSH |
|
322 PRAGMA_FORMAT_NONLITERAL_IGNORED_INTERNAL |
|
323 st->print(format_buffer, cp); |
|
324 PRAGMA_DIAG_POP |
|
325 st->cr(); |
|
326 cp = eol+1; |
|
327 st->print("%5s %-35s += ", "", _name); |
|
328 } |
|
329 st->print("%-16s", cp); |
|
330 } |
|
331 else st->print("%-16s", ""); |
|
332 } |
|
333 |
|
334 st->print("%-20s", " "); |
|
335 print_kind(st); |
|
336 |
|
337 if (withComments) { |
|
338 #ifndef PRODUCT |
|
339 st->print("%s", _doc); |
|
340 #endif |
|
341 } |
|
342 st->cr(); |
|
343 } |
|
344 |
|
345 void Flag::print_kind(outputStream* st) { |
|
346 struct Data { |
|
347 int flag; |
|
348 const char* name; |
|
349 }; |
|
350 |
|
351 Data data[] = { |
|
352 { KIND_C1, "C1" }, |
|
353 { KIND_C2, "C2" }, |
|
354 { KIND_ARCH, "ARCH" }, |
|
355 { KIND_SHARK, "SHARK" }, |
|
356 { KIND_PLATFORM_DEPENDENT, "pd" }, |
|
357 { KIND_PRODUCT, "product" }, |
|
358 { KIND_MANAGEABLE, "manageable" }, |
|
359 { KIND_DIAGNOSTIC, "diagnostic" }, |
|
360 { KIND_EXPERIMENTAL, "experimental" }, |
|
361 { KIND_COMMERCIAL, "commercial" }, |
|
362 { KIND_NOT_PRODUCT, "notproduct" }, |
|
363 { KIND_DEVELOP, "develop" }, |
|
364 { KIND_LP64_PRODUCT, "lp64_product" }, |
|
365 { KIND_READ_WRITE, "rw" }, |
|
366 { -1, "" } |
|
367 }; |
|
368 |
|
369 if ((_flags & KIND_MASK) != 0) { |
|
370 st->print("{"); |
|
371 bool is_first = true; |
|
372 |
|
373 for (int i = 0; data[i].flag != -1; i++) { |
|
374 Data d = data[i]; |
|
375 if ((_flags & d.flag) != 0) { |
|
376 if (is_first) { |
|
377 is_first = false; |
|
378 } else { |
|
379 st->print(" "); |
|
380 } |
|
381 st->print("%s", d.name); |
|
382 } |
|
383 } |
|
384 |
|
385 st->print("}"); |
|
386 } |
|
387 } |
|
388 |
|
389 void Flag::print_as_flag(outputStream* st) { |
|
390 if (is_bool()) { |
|
391 st->print("-XX:%s%s", get_bool() ? "+" : "-", _name); |
|
392 } else if (is_intx()) { |
|
393 st->print("-XX:%s=" INTX_FORMAT, _name, get_intx()); |
|
394 } else if (is_uintx()) { |
|
395 st->print("-XX:%s=" UINTX_FORMAT, _name, get_uintx()); |
|
396 } else if (is_uint64_t()) { |
|
397 st->print("-XX:%s=" UINT64_FORMAT, _name, get_uint64_t()); |
|
398 } else if (is_double()) { |
|
399 st->print("-XX:%s=%f", _name, get_double()); |
|
400 } else if (is_ccstr()) { |
|
401 st->print("-XX:%s=", _name); |
|
402 const char* cp = get_ccstr(); |
|
403 if (cp != NULL) { |
|
404 // Need to turn embedded '\n's back into separate arguments |
|
405 // Not so efficient to print one character at a time, |
|
406 // but the choice is to do the transformation to a buffer |
|
407 // and print that. And this need not be efficient. |
|
408 for (; *cp != '\0'; cp += 1) { |
|
409 switch (*cp) { |
|
410 default: |
|
411 st->print("%c", *cp); |
|
412 break; |
|
413 case '\n': |
|
414 st->print(" -XX:%s=", _name); |
|
415 break; |
|
416 } |
|
417 } |
|
418 } |
|
419 } else { |
|
420 ShouldNotReachHere(); |
|
421 } |
|
422 } |
|
423 |
|
424 // 4991491 do not "optimize out" the was_set false values: omitting them |
|
425 // tickles a Microsoft compiler bug causing flagTable to be malformed |
|
426 |
|
427 #define NAME(name) NOT_PRODUCT(&name) PRODUCT_ONLY(&CONST_##name) |
|
428 |
|
429 #define RUNTIME_PRODUCT_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_PRODUCT) }, |
|
430 #define RUNTIME_PD_PRODUCT_FLAG_STRUCT( type, name, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_PRODUCT | Flag::KIND_PLATFORM_DEPENDENT) }, |
|
431 #define RUNTIME_DIAGNOSTIC_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_DIAGNOSTIC) }, |
|
432 #define RUNTIME_EXPERIMENTAL_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_EXPERIMENTAL) }, |
|
433 #define RUNTIME_MANAGEABLE_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_MANAGEABLE) }, |
|
434 #define RUNTIME_PRODUCT_RW_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_PRODUCT | Flag::KIND_READ_WRITE) }, |
|
435 #define RUNTIME_DEVELOP_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_DEVELOP) }, |
|
436 #define RUNTIME_PD_DEVELOP_FLAG_STRUCT( type, name, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_DEVELOP | Flag::KIND_PLATFORM_DEPENDENT) }, |
|
437 #define RUNTIME_NOTPRODUCT_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_NOT_PRODUCT) }, |
|
438 |
|
439 #ifdef _LP64 |
|
440 #define RUNTIME_LP64_PRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_LP64_PRODUCT) }, |
|
441 #else |
|
442 #define RUNTIME_LP64_PRODUCT_FLAG_STRUCT(type, name, value, doc) /* flag is constant */ |
|
443 #endif // _LP64 |
|
444 |
|
445 #define C1_PRODUCT_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C1 | Flag::KIND_PRODUCT) }, |
|
446 #define C1_PD_PRODUCT_FLAG_STRUCT( type, name, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C1 | Flag::KIND_PRODUCT | Flag::KIND_PLATFORM_DEPENDENT) }, |
|
447 #define C1_DIAGNOSTIC_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C1 | Flag::KIND_DIAGNOSTIC) }, |
|
448 #define C1_DEVELOP_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C1 | Flag::KIND_DEVELOP) }, |
|
449 #define C1_PD_DEVELOP_FLAG_STRUCT( type, name, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C1 | Flag::KIND_DEVELOP | Flag::KIND_PLATFORM_DEPENDENT) }, |
|
450 #define C1_NOTPRODUCT_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C1 | Flag::KIND_NOT_PRODUCT) }, |
|
451 |
|
452 #define C2_PRODUCT_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C2 | Flag::KIND_PRODUCT) }, |
|
453 #define C2_PD_PRODUCT_FLAG_STRUCT( type, name, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C2 | Flag::KIND_PRODUCT | Flag::KIND_PLATFORM_DEPENDENT) }, |
|
454 #define C2_DIAGNOSTIC_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C2 | Flag::KIND_DIAGNOSTIC) }, |
|
455 #define C2_EXPERIMENTAL_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C2 | Flag::KIND_EXPERIMENTAL) }, |
|
456 #define C2_DEVELOP_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C2 | Flag::KIND_DEVELOP) }, |
|
457 #define C2_PD_DEVELOP_FLAG_STRUCT( type, name, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C2 | Flag::KIND_DEVELOP | Flag::KIND_PLATFORM_DEPENDENT) }, |
|
458 #define C2_NOTPRODUCT_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_C2 | Flag::KIND_NOT_PRODUCT) }, |
|
459 |
|
460 #define ARCH_PRODUCT_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_ARCH | Flag::KIND_PRODUCT) }, |
|
461 #define ARCH_DIAGNOSTIC_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_ARCH | Flag::KIND_DIAGNOSTIC) }, |
|
462 #define ARCH_EXPERIMENTAL_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_ARCH | Flag::KIND_EXPERIMENTAL) }, |
|
463 #define ARCH_DEVELOP_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_ARCH | Flag::KIND_DEVELOP) }, |
|
464 #define ARCH_NOTPRODUCT_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_ARCH | Flag::KIND_NOT_PRODUCT) }, |
|
465 |
|
466 #define SHARK_PRODUCT_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_SHARK | Flag::KIND_PRODUCT) }, |
|
467 #define SHARK_PD_PRODUCT_FLAG_STRUCT( type, name, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_SHARK | Flag::KIND_PRODUCT | Flag::KIND_PLATFORM_DEPENDENT) }, |
|
468 #define SHARK_DIAGNOSTIC_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_SHARK | Flag::KIND_DIAGNOSTIC) }, |
|
469 #define SHARK_DEVELOP_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_SHARK | Flag::KIND_DEVELOP) }, |
|
470 #define SHARK_PD_DEVELOP_FLAG_STRUCT( type, name, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_SHARK | Flag::KIND_DEVELOP | Flag::KIND_PLATFORM_DEPENDENT) }, |
|
471 #define SHARK_NOTPRODUCT_FLAG_STRUCT( type, name, value, doc) { #type, XSTR(name), NAME(name), NOT_PRODUCT_ARG(doc) Flag::Flags(Flag::DEFAULT | Flag::KIND_SHARK | Flag::KIND_NOT_PRODUCT) }, |
|
472 |
|
473 static Flag flagTable[] = { |
|
474 RUNTIME_FLAGS(RUNTIME_DEVELOP_FLAG_STRUCT, RUNTIME_PD_DEVELOP_FLAG_STRUCT, RUNTIME_PRODUCT_FLAG_STRUCT, RUNTIME_PD_PRODUCT_FLAG_STRUCT, RUNTIME_DIAGNOSTIC_FLAG_STRUCT, RUNTIME_EXPERIMENTAL_FLAG_STRUCT, RUNTIME_NOTPRODUCT_FLAG_STRUCT, RUNTIME_MANAGEABLE_FLAG_STRUCT, RUNTIME_PRODUCT_RW_FLAG_STRUCT, RUNTIME_LP64_PRODUCT_FLAG_STRUCT) |
|
475 RUNTIME_OS_FLAGS(RUNTIME_DEVELOP_FLAG_STRUCT, RUNTIME_PD_DEVELOP_FLAG_STRUCT, RUNTIME_PRODUCT_FLAG_STRUCT, RUNTIME_PD_PRODUCT_FLAG_STRUCT, RUNTIME_DIAGNOSTIC_FLAG_STRUCT, RUNTIME_NOTPRODUCT_FLAG_STRUCT) |
|
476 #if INCLUDE_ALL_GCS |
|
477 G1_FLAGS(RUNTIME_DEVELOP_FLAG_STRUCT, RUNTIME_PD_DEVELOP_FLAG_STRUCT, RUNTIME_PRODUCT_FLAG_STRUCT, RUNTIME_PD_PRODUCT_FLAG_STRUCT, RUNTIME_DIAGNOSTIC_FLAG_STRUCT, RUNTIME_EXPERIMENTAL_FLAG_STRUCT, RUNTIME_NOTPRODUCT_FLAG_STRUCT, RUNTIME_MANAGEABLE_FLAG_STRUCT, RUNTIME_PRODUCT_RW_FLAG_STRUCT) |
|
478 #endif // INCLUDE_ALL_GCS |
|
479 #ifdef COMPILER1 |
|
480 C1_FLAGS(C1_DEVELOP_FLAG_STRUCT, C1_PD_DEVELOP_FLAG_STRUCT, C1_PRODUCT_FLAG_STRUCT, C1_PD_PRODUCT_FLAG_STRUCT, C1_DIAGNOSTIC_FLAG_STRUCT, C1_NOTPRODUCT_FLAG_STRUCT) |
|
481 #endif |
|
482 #ifdef COMPILER2 |
|
483 C2_FLAGS(C2_DEVELOP_FLAG_STRUCT, C2_PD_DEVELOP_FLAG_STRUCT, C2_PRODUCT_FLAG_STRUCT, C2_PD_PRODUCT_FLAG_STRUCT, C2_DIAGNOSTIC_FLAG_STRUCT, C2_EXPERIMENTAL_FLAG_STRUCT, C2_NOTPRODUCT_FLAG_STRUCT) |
|
484 #endif |
|
485 #ifdef SHARK |
|
486 SHARK_FLAGS(SHARK_DEVELOP_FLAG_STRUCT, SHARK_PD_DEVELOP_FLAG_STRUCT, SHARK_PRODUCT_FLAG_STRUCT, SHARK_PD_PRODUCT_FLAG_STRUCT, SHARK_DIAGNOSTIC_FLAG_STRUCT, SHARK_NOTPRODUCT_FLAG_STRUCT) |
|
487 #endif |
|
488 ARCH_FLAGS(ARCH_DEVELOP_FLAG_STRUCT, ARCH_PRODUCT_FLAG_STRUCT, ARCH_DIAGNOSTIC_FLAG_STRUCT, ARCH_EXPERIMENTAL_FLAG_STRUCT, ARCH_NOTPRODUCT_FLAG_STRUCT) |
|
489 FLAGTABLE_EXT |
|
490 {0, NULL, NULL} |
|
491 }; |
|
492 |
|
493 Flag* Flag::flags = flagTable; |
|
494 size_t Flag::numFlags = (sizeof(flagTable) / sizeof(Flag)); |
|
495 |
|
496 inline bool str_equal(const char* s, const char* q, size_t len) { |
|
497 // s is null terminated, q is not! |
|
498 if (strlen(s) != (unsigned int) len) return false; |
|
499 return strncmp(s, q, len) == 0; |
|
500 } |
|
501 |
|
502 // Search the flag table for a named flag |
|
503 Flag* Flag::find_flag(const char* name, size_t length, bool allow_locked, bool return_flag) { |
|
504 for (Flag* current = &flagTable[0]; current->_name != NULL; current++) { |
|
505 if (str_equal(current->_name, name, length)) { |
|
506 // Found a matching entry. |
|
507 // Don't report notproduct and develop flags in product builds. |
|
508 if (current->is_constant_in_binary()) { |
|
509 return (return_flag == true ? current : NULL); |
|
510 } |
|
511 // Report locked flags only if allowed. |
|
512 if (!(current->is_unlocked() || current->is_unlocker())) { |
|
513 if (!allow_locked) { |
|
514 // disable use of locked flags, e.g. diagnostic, experimental, |
|
515 // commercial... until they are explicitly unlocked |
|
516 return NULL; |
|
517 } |
|
518 } |
|
519 return current; |
|
520 } |
|
521 } |
|
522 // Flag name is not in the flag table |
|
523 return NULL; |
|
524 } |
|
525 |
|
526 // Compute string similarity based on Dice's coefficient |
|
527 static float str_similar(const char* str1, const char* str2, size_t len2) { |
|
528 int len1 = (int) strlen(str1); |
|
529 int total = len1 + (int) len2; |
|
530 |
|
531 int hit = 0; |
|
532 |
|
533 for (int i = 0; i < len1 -1; ++i) { |
|
534 for (int j = 0; j < (int) len2 -1; ++j) { |
|
535 if ((str1[i] == str2[j]) && (str1[i+1] == str2[j+1])) { |
|
536 ++hit; |
|
537 break; |
|
538 } |
|
539 } |
|
540 } |
|
541 |
|
542 return 2.0f * (float) hit / (float) total; |
|
543 } |
|
544 |
|
545 Flag* Flag::fuzzy_match(const char* name, size_t length, bool allow_locked) { |
|
546 float VMOptionsFuzzyMatchSimilarity = 0.7f; |
|
547 Flag* match = NULL; |
|
548 float score; |
|
549 float max_score = -1; |
|
550 |
|
551 for (Flag* current = &flagTable[0]; current->_name != NULL; current++) { |
|
552 score = str_similar(current->_name, name, length); |
|
553 if (score > max_score) { |
|
554 max_score = score; |
|
555 match = current; |
|
556 } |
|
557 } |
|
558 |
|
559 if (!(match->is_unlocked() || match->is_unlocker())) { |
|
560 if (!allow_locked) { |
|
561 return NULL; |
|
562 } |
|
563 } |
|
564 |
|
565 if (max_score < VMOptionsFuzzyMatchSimilarity) { |
|
566 return NULL; |
|
567 } |
|
568 |
|
569 return match; |
|
570 } |
|
571 |
|
572 // Returns the address of the index'th element |
|
573 static Flag* address_of_flag(CommandLineFlagWithType flag) { |
|
574 assert((size_t)flag < Flag::numFlags, "bad command line flag index"); |
|
575 return &Flag::flags[flag]; |
|
576 } |
|
577 |
|
578 bool CommandLineFlagsEx::is_default(CommandLineFlag flag) { |
|
579 assert((size_t)flag < Flag::numFlags, "bad command line flag index"); |
|
580 Flag* f = &Flag::flags[flag]; |
|
581 return f->is_default(); |
|
582 } |
|
583 |
|
584 bool CommandLineFlagsEx::is_ergo(CommandLineFlag flag) { |
|
585 assert((size_t)flag < Flag::numFlags, "bad command line flag index"); |
|
586 Flag* f = &Flag::flags[flag]; |
|
587 return f->is_ergonomic(); |
|
588 } |
|
589 |
|
590 bool CommandLineFlagsEx::is_cmdline(CommandLineFlag flag) { |
|
591 assert((size_t)flag < Flag::numFlags, "bad command line flag index"); |
|
592 Flag* f = &Flag::flags[flag]; |
|
593 return f->is_command_line(); |
|
594 } |
|
595 |
|
596 bool CommandLineFlags::wasSetOnCmdline(const char* name, bool* value) { |
|
597 Flag* result = Flag::find_flag((char*)name, strlen(name)); |
|
598 if (result == NULL) return false; |
|
599 *value = result->is_command_line(); |
|
600 return true; |
|
601 } |
|
602 |
|
603 template<class E, class T> |
|
604 static void trace_flag_changed(const char* name, const T old_value, const T new_value, const Flag::Flags origin) |
|
605 { |
|
606 E e; |
|
607 e.set_name(name); |
|
608 e.set_old_value(old_value); |
|
609 e.set_new_value(new_value); |
|
610 e.set_origin(origin); |
|
611 e.commit(); |
|
612 } |
|
613 |
|
614 bool CommandLineFlags::boolAt(char* name, size_t len, bool* value) { |
|
615 Flag* result = Flag::find_flag(name, len); |
|
616 if (result == NULL) return false; |
|
617 if (!result->is_bool()) return false; |
|
618 *value = result->get_bool(); |
|
619 return true; |
|
620 } |
|
621 |
|
622 bool CommandLineFlags::boolAtPut(char* name, size_t len, bool* value, Flag::Flags origin) { |
|
623 Flag* result = Flag::find_flag(name, len); |
|
624 if (result == NULL) return false; |
|
625 if (!result->is_bool()) return false; |
|
626 bool old_value = result->get_bool(); |
|
627 trace_flag_changed<EventBooleanFlagChanged, bool>(name, old_value, *value, origin); |
|
628 result->set_bool(*value); |
|
629 *value = old_value; |
|
630 result->set_origin(origin); |
|
631 return true; |
|
632 } |
|
633 |
|
634 void CommandLineFlagsEx::boolAtPut(CommandLineFlagWithType flag, bool value, Flag::Flags origin) { |
|
635 Flag* faddr = address_of_flag(flag); |
|
636 guarantee(faddr != NULL && faddr->is_bool(), "wrong flag type"); |
|
637 trace_flag_changed<EventBooleanFlagChanged, bool>(faddr->_name, faddr->get_bool(), value, origin); |
|
638 faddr->set_bool(value); |
|
639 faddr->set_origin(origin); |
|
640 } |
|
641 |
|
642 bool CommandLineFlags::intxAt(char* name, size_t len, intx* value) { |
|
643 Flag* result = Flag::find_flag(name, len); |
|
644 if (result == NULL) return false; |
|
645 if (!result->is_intx()) return false; |
|
646 *value = result->get_intx(); |
|
647 return true; |
|
648 } |
|
649 |
|
650 bool CommandLineFlags::intxAtPut(char* name, size_t len, intx* value, Flag::Flags origin) { |
|
651 Flag* result = Flag::find_flag(name, len); |
|
652 if (result == NULL) return false; |
|
653 if (!result->is_intx()) return false; |
|
654 intx old_value = result->get_intx(); |
|
655 trace_flag_changed<EventLongFlagChanged, s8>(name, old_value, *value, origin); |
|
656 result->set_intx(*value); |
|
657 *value = old_value; |
|
658 result->set_origin(origin); |
|
659 return true; |
|
660 } |
|
661 |
|
662 void CommandLineFlagsEx::intxAtPut(CommandLineFlagWithType flag, intx value, Flag::Flags origin) { |
|
663 Flag* faddr = address_of_flag(flag); |
|
664 guarantee(faddr != NULL && faddr->is_intx(), "wrong flag type"); |
|
665 trace_flag_changed<EventLongFlagChanged, s8>(faddr->_name, faddr->get_intx(), value, origin); |
|
666 faddr->set_intx(value); |
|
667 faddr->set_origin(origin); |
|
668 } |
|
669 |
|
670 bool CommandLineFlags::uintxAt(char* name, size_t len, uintx* value) { |
|
671 Flag* result = Flag::find_flag(name, len); |
|
672 if (result == NULL) return false; |
|
673 if (!result->is_uintx()) return false; |
|
674 *value = result->get_uintx(); |
|
675 return true; |
|
676 } |
|
677 |
|
678 bool CommandLineFlags::uintxAtPut(char* name, size_t len, uintx* value, Flag::Flags origin) { |
|
679 Flag* result = Flag::find_flag(name, len); |
|
680 if (result == NULL) return false; |
|
681 if (!result->is_uintx()) return false; |
|
682 uintx old_value = result->get_uintx(); |
|
683 trace_flag_changed<EventUnsignedLongFlagChanged, u8>(name, old_value, *value, origin); |
|
684 result->set_uintx(*value); |
|
685 *value = old_value; |
|
686 result->set_origin(origin); |
|
687 return true; |
|
688 } |
|
689 |
|
690 void CommandLineFlagsEx::uintxAtPut(CommandLineFlagWithType flag, uintx value, Flag::Flags origin) { |
|
691 Flag* faddr = address_of_flag(flag); |
|
692 guarantee(faddr != NULL && faddr->is_uintx(), "wrong flag type"); |
|
693 trace_flag_changed<EventUnsignedLongFlagChanged, u8>(faddr->_name, faddr->get_uintx(), value, origin); |
|
694 faddr->set_uintx(value); |
|
695 faddr->set_origin(origin); |
|
696 } |
|
697 |
|
698 bool CommandLineFlags::uint64_tAt(char* name, size_t len, uint64_t* value) { |
|
699 Flag* result = Flag::find_flag(name, len); |
|
700 if (result == NULL) return false; |
|
701 if (!result->is_uint64_t()) return false; |
|
702 *value = result->get_uint64_t(); |
|
703 return true; |
|
704 } |
|
705 |
|
706 bool CommandLineFlags::uint64_tAtPut(char* name, size_t len, uint64_t* value, Flag::Flags origin) { |
|
707 Flag* result = Flag::find_flag(name, len); |
|
708 if (result == NULL) return false; |
|
709 if (!result->is_uint64_t()) return false; |
|
710 uint64_t old_value = result->get_uint64_t(); |
|
711 trace_flag_changed<EventUnsignedLongFlagChanged, u8>(name, old_value, *value, origin); |
|
712 result->set_uint64_t(*value); |
|
713 *value = old_value; |
|
714 result->set_origin(origin); |
|
715 return true; |
|
716 } |
|
717 |
|
718 void CommandLineFlagsEx::uint64_tAtPut(CommandLineFlagWithType flag, uint64_t value, Flag::Flags origin) { |
|
719 Flag* faddr = address_of_flag(flag); |
|
720 guarantee(faddr != NULL && faddr->is_uint64_t(), "wrong flag type"); |
|
721 trace_flag_changed<EventUnsignedLongFlagChanged, u8>(faddr->_name, faddr->get_uint64_t(), value, origin); |
|
722 faddr->set_uint64_t(value); |
|
723 faddr->set_origin(origin); |
|
724 } |
|
725 |
|
726 bool CommandLineFlags::doubleAt(char* name, size_t len, double* value) { |
|
727 Flag* result = Flag::find_flag(name, len); |
|
728 if (result == NULL) return false; |
|
729 if (!result->is_double()) return false; |
|
730 *value = result->get_double(); |
|
731 return true; |
|
732 } |
|
733 |
|
734 bool CommandLineFlags::doubleAtPut(char* name, size_t len, double* value, Flag::Flags origin) { |
|
735 Flag* result = Flag::find_flag(name, len); |
|
736 if (result == NULL) return false; |
|
737 if (!result->is_double()) return false; |
|
738 double old_value = result->get_double(); |
|
739 trace_flag_changed<EventDoubleFlagChanged, double>(name, old_value, *value, origin); |
|
740 result->set_double(*value); |
|
741 *value = old_value; |
|
742 result->set_origin(origin); |
|
743 return true; |
|
744 } |
|
745 |
|
746 void CommandLineFlagsEx::doubleAtPut(CommandLineFlagWithType flag, double value, Flag::Flags origin) { |
|
747 Flag* faddr = address_of_flag(flag); |
|
748 guarantee(faddr != NULL && faddr->is_double(), "wrong flag type"); |
|
749 trace_flag_changed<EventDoubleFlagChanged, double>(faddr->_name, faddr->get_double(), value, origin); |
|
750 faddr->set_double(value); |
|
751 faddr->set_origin(origin); |
|
752 } |
|
753 |
|
754 bool CommandLineFlags::ccstrAt(char* name, size_t len, ccstr* value) { |
|
755 Flag* result = Flag::find_flag(name, len); |
|
756 if (result == NULL) return false; |
|
757 if (!result->is_ccstr()) return false; |
|
758 *value = result->get_ccstr(); |
|
759 return true; |
|
760 } |
|
761 |
|
762 // Contract: Flag will make private copy of the incoming value. |
|
763 // Outgoing value is always malloc-ed, and caller MUST call free. |
|
764 bool CommandLineFlags::ccstrAtPut(char* name, size_t len, ccstr* value, Flag::Flags origin) { |
|
765 Flag* result = Flag::find_flag(name, len); |
|
766 if (result == NULL) return false; |
|
767 if (!result->is_ccstr()) return false; |
|
768 ccstr old_value = result->get_ccstr(); |
|
769 trace_flag_changed<EventStringFlagChanged, const char*>(name, old_value, *value, origin); |
|
770 char* new_value = NULL; |
|
771 if (*value != NULL) { |
|
772 new_value = NEW_C_HEAP_ARRAY(char, strlen(*value)+1, mtInternal); |
|
773 strcpy(new_value, *value); |
|
774 } |
|
775 result->set_ccstr(new_value); |
|
776 if (result->is_default() && old_value != NULL) { |
|
777 // Prior value is NOT heap allocated, but was a literal constant. |
|
778 char* old_value_to_free = NEW_C_HEAP_ARRAY(char, strlen(old_value)+1, mtInternal); |
|
779 strcpy(old_value_to_free, old_value); |
|
780 old_value = old_value_to_free; |
|
781 } |
|
782 *value = old_value; |
|
783 result->set_origin(origin); |
|
784 return true; |
|
785 } |
|
786 |
|
787 // Contract: Flag will make private copy of the incoming value. |
|
788 void CommandLineFlagsEx::ccstrAtPut(CommandLineFlagWithType flag, ccstr value, Flag::Flags origin) { |
|
789 Flag* faddr = address_of_flag(flag); |
|
790 guarantee(faddr != NULL && faddr->is_ccstr(), "wrong flag type"); |
|
791 ccstr old_value = faddr->get_ccstr(); |
|
792 trace_flag_changed<EventStringFlagChanged, const char*>(faddr->_name, old_value, value, origin); |
|
793 char* new_value = NEW_C_HEAP_ARRAY(char, strlen(value)+1, mtInternal); |
|
794 strcpy(new_value, value); |
|
795 faddr->set_ccstr(new_value); |
|
796 if (!faddr->is_default() && old_value != NULL) { |
|
797 // Prior value is heap allocated so free it. |
|
798 FREE_C_HEAP_ARRAY(char, old_value, mtInternal); |
|
799 } |
|
800 faddr->set_origin(origin); |
|
801 } |
|
802 |
|
803 extern "C" { |
|
804 static int compare_flags(const void* void_a, const void* void_b) { |
|
805 return strcmp((*((Flag**) void_a))->_name, (*((Flag**) void_b))->_name); |
|
806 } |
|
807 } |
|
808 |
|
809 void CommandLineFlags::printSetFlags(outputStream* out) { |
|
810 // Print which flags were set on the command line |
|
811 // note: this method is called before the thread structure is in place |
|
812 // which means resource allocation cannot be used. |
|
813 |
|
814 // The last entry is the null entry. |
|
815 const size_t length = Flag::numFlags - 1; |
|
816 |
|
817 // Sort |
|
818 Flag** array = NEW_C_HEAP_ARRAY(Flag*, length, mtInternal); |
|
819 for (size_t i = 0; i < length; i++) { |
|
820 array[i] = &flagTable[i]; |
|
821 } |
|
822 qsort(array, length, sizeof(Flag*), compare_flags); |
|
823 |
|
824 // Print |
|
825 for (size_t i = 0; i < length; i++) { |
|
826 if (array[i]->get_origin() /* naked field! */) { |
|
827 array[i]->print_as_flag(out); |
|
828 out->print(" "); |
|
829 } |
|
830 } |
|
831 out->cr(); |
|
832 FREE_C_HEAP_ARRAY(Flag*, array, mtInternal); |
|
833 } |
|
834 |
|
835 #ifndef PRODUCT |
|
836 |
|
837 |
|
838 void CommandLineFlags::verify() { |
|
839 assert(Arguments::check_vm_args_consistency(), "Some flag settings conflict"); |
|
840 } |
|
841 |
|
842 #endif // PRODUCT |
|
843 |
|
844 void CommandLineFlags::printFlags(outputStream* out, bool withComments) { |
|
845 // Print the flags sorted by name |
|
846 // note: this method is called before the thread structure is in place |
|
847 // which means resource allocation cannot be used. |
|
848 |
|
849 // The last entry is the null entry. |
|
850 const size_t length = Flag::numFlags - 1; |
|
851 |
|
852 // Sort |
|
853 Flag** array = NEW_C_HEAP_ARRAY(Flag*, length, mtInternal); |
|
854 for (size_t i = 0; i < length; i++) { |
|
855 array[i] = &flagTable[i]; |
|
856 } |
|
857 qsort(array, length, sizeof(Flag*), compare_flags); |
|
858 |
|
859 // Print |
|
860 out->print_cr("[Global flags]"); |
|
861 for (size_t i = 0; i < length; i++) { |
|
862 if (array[i]->is_unlocked()) { |
|
863 array[i]->print_on(out, withComments); |
|
864 } |
|
865 } |
|
866 FREE_C_HEAP_ARRAY(Flag*, array, mtInternal); |
|
867 } |