hotspot/src/share/vm/runtime/globals.cpp
author twisti
Mon, 18 Jun 2012 12:29:21 -0700
changeset 13106 cecfb99d6cff
parent 12598 1256ef9b648a
child 13195 be27e1b6a4b9
permissions -rw-r--r--
7176856: add the JRE name to the error log Reviewed-by: coleenp, jrose, kvn, twisti Contributed-by: Krystal Mok <sajia@taobao.com>
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
     1
/*
12157
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
     2
 * Copyright (c) 1997, 2012, Oracle and/or its affiliates. All rights reserved.
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
     3
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
489c9b5090e2 Initial load
duke
parents:
diff changeset
     4
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
     5
 * This code is free software; you can redistribute it and/or modify it
489c9b5090e2 Initial load
duke
parents:
diff changeset
     6
 * under the terms of the GNU General Public License version 2 only, as
489c9b5090e2 Initial load
duke
parents:
diff changeset
     7
 * published by the Free Software Foundation.
489c9b5090e2 Initial load
duke
parents:
diff changeset
     8
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
     9
 * This code is distributed in the hope that it will be useful, but WITHOUT
489c9b5090e2 Initial load
duke
parents:
diff changeset
    10
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
489c9b5090e2 Initial load
duke
parents:
diff changeset
    11
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
489c9b5090e2 Initial load
duke
parents:
diff changeset
    12
 * version 2 for more details (a copy is included in the LICENSE file that
489c9b5090e2 Initial load
duke
parents:
diff changeset
    13
 * accompanied this code).
489c9b5090e2 Initial load
duke
parents:
diff changeset
    14
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
    15
 * You should have received a copy of the GNU General Public License version
489c9b5090e2 Initial load
duke
parents:
diff changeset
    16
 * 2 along with this work; if not, write to the Free Software Foundation,
489c9b5090e2 Initial load
duke
parents:
diff changeset
    17
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
489c9b5090e2 Initial load
duke
parents:
diff changeset
    18
 *
5547
f4b087cbb361 6941466: Oracle rebranding changes for Hotspot repositories
trims
parents: 4579
diff changeset
    19
 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
f4b087cbb361 6941466: Oracle rebranding changes for Hotspot repositories
trims
parents: 4579
diff changeset
    20
 * or visit www.oracle.com if you need additional information or have any
f4b087cbb361 6941466: Oracle rebranding changes for Hotspot repositories
trims
parents: 4579
diff changeset
    21
 * questions.
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    22
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
    23
 */
489c9b5090e2 Initial load
duke
parents:
diff changeset
    24
7397
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    25
#include "precompiled.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    26
#include "memory/allocation.inline.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    27
#include "oops/oop.inline.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    28
#include "runtime/arguments.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    29
#include "runtime/globals.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    30
#include "runtime/globals_extension.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    31
#include "utilities/ostream.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    32
#include "utilities/top.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    33
#ifndef SERIALGC
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    34
#include "gc_implementation/g1/g1_globals.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    35
#endif
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    36
#ifdef COMPILER1
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    37
#include "c1/c1_globals.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    38
#endif
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    39
#ifdef COMPILER2
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    40
#include "opto/c2_globals.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    41
#endif
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    42
#ifdef SHARK
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    43
#include "shark/shark_globals.hpp"
5b173b4ca846 6989984: Use standard include model for Hospot
stefank
parents: 6438
diff changeset
    44
#endif
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    45
489c9b5090e2 Initial load
duke
parents:
diff changeset
    46
489c9b5090e2 Initial load
duke
parents:
diff changeset
    47
RUNTIME_FLAGS(MATERIALIZE_DEVELOPER_FLAG, MATERIALIZE_PD_DEVELOPER_FLAG, \
489c9b5090e2 Initial load
duke
parents:
diff changeset
    48
              MATERIALIZE_PRODUCT_FLAG, MATERIALIZE_PD_PRODUCT_FLAG, \
11167
3931428f62ae 7116730: Revert 7116481: Commercial features in Hotspot must be gated by a switch
phh
parents: 11166
diff changeset
    49
              MATERIALIZE_DIAGNOSTIC_FLAG, MATERIALIZE_EXPERIMENTAL_FLAG, \
3931428f62ae 7116730: Revert 7116481: Commercial features in Hotspot must be gated by a switch
phh
parents: 11166
diff changeset
    50
              MATERIALIZE_NOTPRODUCT_FLAG, \
360
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
    51
              MATERIALIZE_MANAGEABLE_FLAG, MATERIALIZE_PRODUCT_RW_FLAG, \
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
    52
              MATERIALIZE_LP64_PRODUCT_FLAG)
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    53
489c9b5090e2 Initial load
duke
parents:
diff changeset
    54
RUNTIME_OS_FLAGS(MATERIALIZE_DEVELOPER_FLAG, MATERIALIZE_PD_DEVELOPER_FLAG, \
489c9b5090e2 Initial load
duke
parents:
diff changeset
    55
                 MATERIALIZE_PRODUCT_FLAG, MATERIALIZE_PD_PRODUCT_FLAG, \
489c9b5090e2 Initial load
duke
parents:
diff changeset
    56
                 MATERIALIZE_DIAGNOSTIC_FLAG, MATERIALIZE_NOTPRODUCT_FLAG)
489c9b5090e2 Initial load
duke
parents:
diff changeset
    57
11183
a81bb5c041d3 7117389: Add a framework for vendor-specific command line switch extensions to Hotspot
phh
parents: 11167
diff changeset
    58
MATERIALIZE_FLAGS_EXT
a81bb5c041d3 7117389: Add a framework for vendor-specific command line switch extensions to Hotspot
phh
parents: 11167
diff changeset
    59
a81bb5c041d3 7117389: Add a framework for vendor-specific command line switch extensions to Hotspot
phh
parents: 11167
diff changeset
    60
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    61
bool Flag::is_unlocker() const {
11167
3931428f62ae 7116730: Revert 7116481: Commercial features in Hotspot must be gated by a switch
phh
parents: 11166
diff changeset
    62
  return strcmp(name, "UnlockDiagnosticVMOptions") == 0     ||
11183
a81bb5c041d3 7117389: Add a framework for vendor-specific command line switch extensions to Hotspot
phh
parents: 11167
diff changeset
    63
         strcmp(name, "UnlockExperimentalVMOptions") == 0   ||
a81bb5c041d3 7117389: Add a framework for vendor-specific command line switch extensions to Hotspot
phh
parents: 11167
diff changeset
    64
         is_unlocker_ext();
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    65
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    66
489c9b5090e2 Initial load
duke
parents:
diff changeset
    67
bool Flag::is_unlocked() const {
11167
3931428f62ae 7116730: Revert 7116481: Commercial features in Hotspot must be gated by a switch
phh
parents: 11166
diff changeset
    68
  if (strcmp(kind, "{diagnostic}") == 0) {
9116
9bc44be338d6 6981791: remove experimental code for JSR 292
jrose
parents: 7397
diff changeset
    69
    if (strcmp(name, "EnableInvokeDynamic") == 0 && UnlockExperimentalVMOptions && !UnlockDiagnosticVMOptions) {
9bc44be338d6 6981791: remove experimental code for JSR 292
jrose
parents: 7397
diff changeset
    70
      // transitional logic to allow tests to run until they are changed
9bc44be338d6 6981791: remove experimental code for JSR 292
jrose
parents: 7397
diff changeset
    71
      static int warned;
9bc44be338d6 6981791: remove experimental code for JSR 292
jrose
parents: 7397
diff changeset
    72
      if (++warned == 1)  warning("Use -XX:+UnlockDiagnosticVMOptions before EnableInvokeDynamic flag");
9bc44be338d6 6981791: remove experimental code for JSR 292
jrose
parents: 7397
diff changeset
    73
      return true;
9bc44be338d6 6981791: remove experimental code for JSR 292
jrose
parents: 7397
diff changeset
    74
    }
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    75
    return UnlockDiagnosticVMOptions;
4450
6d700b859b3e 6892658: C2 should optimize some stringbuilder patterns
never
parents: 4437
diff changeset
    76
  } else if (strcmp(kind, "{experimental}") == 0 ||
6d700b859b3e 6892658: C2 should optimize some stringbuilder patterns
never
parents: 4437
diff changeset
    77
             strcmp(kind, "{C2 experimental}") == 0) {
1382
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
    78
    return UnlockExperimentalVMOptions;
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    79
  } else {
11183
a81bb5c041d3 7117389: Add a framework for vendor-specific command line switch extensions to Hotspot
phh
parents: 11167
diff changeset
    80
    return is_unlocked_ext();
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    81
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
    82
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    83
12157
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
    84
// Get custom message for this locked flag, or return NULL if
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
    85
// none is available.
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
    86
void Flag::get_locked_message(char* buf, int buflen) const {
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
    87
  get_locked_message_ext(buf, buflen);
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
    88
}
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
    89
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    90
bool Flag::is_writeable() const {
11254
e2dd3c32a7cb 7122880: Extend vendor-specific command interface to include manageable switches
phh
parents: 11183
diff changeset
    91
  return strcmp(kind, "{manageable}") == 0 ||
e2dd3c32a7cb 7122880: Extend vendor-specific command interface to include manageable switches
phh
parents: 11183
diff changeset
    92
         strcmp(kind, "{product rw}") == 0 ||
e2dd3c32a7cb 7122880: Extend vendor-specific command interface to include manageable switches
phh
parents: 11183
diff changeset
    93
         is_writeable_ext();
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    94
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    95
11254
e2dd3c32a7cb 7122880: Extend vendor-specific command interface to include manageable switches
phh
parents: 11183
diff changeset
    96
// All flags except "manageable" are assumed to be internal flags.
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    97
// Long term, we need to define a mechanism to specify which flags
489c9b5090e2 Initial load
duke
parents:
diff changeset
    98
// are external/stable and change this function accordingly.
489c9b5090e2 Initial load
duke
parents:
diff changeset
    99
bool Flag::is_external() const {
11254
e2dd3c32a7cb 7122880: Extend vendor-specific command interface to include manageable switches
phh
parents: 11183
diff changeset
   100
  return strcmp(kind, "{manageable}") == 0 || is_external_ext();
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   101
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   102
11254
e2dd3c32a7cb 7122880: Extend vendor-specific command interface to include manageable switches
phh
parents: 11183
diff changeset
   103
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   104
// Length of format string (e.g. "%.1234s") for printing ccstr below
489c9b5090e2 Initial load
duke
parents:
diff changeset
   105
#define FORMAT_BUFFER_LEN 16
489c9b5090e2 Initial load
duke
parents:
diff changeset
   106
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   107
void Flag::print_on(outputStream* st, bool withComments) {
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   108
  st->print("%9s %-40s %c= ", type, name, (origin != DEFAULT ? ':' : ' '));
4437
d1abc17afffb 6898160: Need serviceability support for new vm argument type 'uint64_t'
phh
parents: 4434
diff changeset
   109
  if (is_bool())     st->print("%-16s", get_bool() ? "true" : "false");
d1abc17afffb 6898160: Need serviceability support for new vm argument type 'uint64_t'
phh
parents: 4434
diff changeset
   110
  if (is_intx())     st->print("%-16ld", get_intx());
d1abc17afffb 6898160: Need serviceability support for new vm argument type 'uint64_t'
phh
parents: 4434
diff changeset
   111
  if (is_uintx())    st->print("%-16lu", get_uintx());
d1abc17afffb 6898160: Need serviceability support for new vm argument type 'uint64_t'
phh
parents: 4434
diff changeset
   112
  if (is_uint64_t()) st->print("%-16lu", get_uint64_t());
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   113
  if (is_double())   st->print("%-16f", get_double());
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   114
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   115
  if (is_ccstr()) {
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   116
     const char* cp = get_ccstr();
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   117
     if (cp != NULL) {
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   118
       const char* eol;
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   119
       while ((eol = strchr(cp, '\n')) != NULL) {
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   120
         char format_buffer[FORMAT_BUFFER_LEN];
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   121
         size_t llen = pointer_delta(eol, cp, sizeof(char));
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   122
         jio_snprintf(format_buffer, FORMAT_BUFFER_LEN,
350
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   123
                     "%%." SIZE_FORMAT "s", llen);
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   124
         st->print(format_buffer, cp);
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   125
         st->cr();
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   126
         cp = eol+1;
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   127
         st->print("%5s %-35s += ", "", name);
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   128
       }
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   129
       st->print("%-16s", cp);
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   130
     }
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   131
     else st->print("%-16s", "");
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   132
  }
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   133
  st->print("%-20s", kind);
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   134
  if (withComments) {
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   135
#ifndef PRODUCT
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   136
    st->print("%s", doc );
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   137
#endif
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   138
  }
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   139
  st->cr();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   140
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   141
489c9b5090e2 Initial load
duke
parents:
diff changeset
   142
void Flag::print_as_flag(outputStream* st) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   143
  if (is_bool()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   144
    st->print("-XX:%s%s", get_bool() ? "+" : "-", name);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   145
  } else if (is_intx()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   146
    st->print("-XX:%s=" INTX_FORMAT, name, get_intx());
489c9b5090e2 Initial load
duke
parents:
diff changeset
   147
  } else if (is_uintx()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   148
    st->print("-XX:%s=" UINTX_FORMAT, name, get_uintx());
4437
d1abc17afffb 6898160: Need serviceability support for new vm argument type 'uint64_t'
phh
parents: 4434
diff changeset
   149
  } else if (is_uint64_t()) {
d1abc17afffb 6898160: Need serviceability support for new vm argument type 'uint64_t'
phh
parents: 4434
diff changeset
   150
    st->print("-XX:%s=" UINT64_FORMAT, name, get_uint64_t());
12598
1256ef9b648a 7167069: 6 VM flags crash the VM when queried via jinfo
brutisso
parents: 12157
diff changeset
   151
  } else if (is_double()) {
1256ef9b648a 7167069: 6 VM flags crash the VM when queried via jinfo
brutisso
parents: 12157
diff changeset
   152
    st->print("-XX:%s=%f", name, get_double());
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   153
  } else if (is_ccstr()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   154
    st->print("-XX:%s=", name);
350
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   155
    const char* cp = get_ccstr();
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   156
    if (cp != NULL) {
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   157
      // Need to turn embedded '\n's back into separate arguments
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   158
      // Not so efficient to print one character at a time,
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   159
      // but the choice is to do the transformation to a buffer
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   160
      // and print that.  And this need not be efficient.
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   161
      for (; *cp != '\0'; cp += 1) {
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   162
        switch (*cp) {
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   163
          default:
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   164
            st->print("%c", *cp);
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   165
            break;
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   166
          case '\n':
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   167
            st->print(" -XX:%s=", name);
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   168
            break;
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   169
        }
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   170
      }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   171
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   172
  } else {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   173
    ShouldNotReachHere();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   174
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   175
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   176
489c9b5090e2 Initial load
duke
parents:
diff changeset
   177
// 4991491 do not "optimize out" the was_set false values: omitting them
489c9b5090e2 Initial load
duke
parents:
diff changeset
   178
// tickles a Microsoft compiler bug causing flagTable to be malformed
489c9b5090e2 Initial load
duke
parents:
diff changeset
   179
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   180
#define RUNTIME_PRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{product}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   181
#define RUNTIME_PD_PRODUCT_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{pd product}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   182
#define RUNTIME_DIAGNOSTIC_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{diagnostic}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   183
#define RUNTIME_EXPERIMENTAL_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{experimental}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   184
#define RUNTIME_MANAGEABLE_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{manageable}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   185
#define RUNTIME_PRODUCT_RW_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{product rw}", DEFAULT },
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   186
489c9b5090e2 Initial load
duke
parents:
diff changeset
   187
#ifdef PRODUCT
489c9b5090e2 Initial load
duke
parents:
diff changeset
   188
  #define RUNTIME_DEVELOP_FLAG_STRUCT(type, name, value, doc) /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   189
  #define RUNTIME_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   190
  #define RUNTIME_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc)
489c9b5090e2 Initial load
duke
parents:
diff changeset
   191
#else
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   192
  #define RUNTIME_DEVELOP_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, doc, "", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   193
  #define RUNTIME_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, doc, "{pd}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   194
  #define RUNTIME_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, doc, "{notproduct}", DEFAULT },
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   195
#endif
489c9b5090e2 Initial load
duke
parents:
diff changeset
   196
360
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
   197
#ifdef _LP64
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   198
  #define RUNTIME_LP64_PRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{lp64_product}", DEFAULT },
360
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
   199
#else
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
   200
  #define RUNTIME_LP64_PRODUCT_FLAG_STRUCT(type, name, value, doc) /* flag is constant */
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
   201
#endif // _LP64
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
   202
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   203
#define C1_PRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{C1 product}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   204
#define C1_PD_PRODUCT_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{C1 pd product}", DEFAULT },
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   205
#ifdef PRODUCT
489c9b5090e2 Initial load
duke
parents:
diff changeset
   206
  #define C1_DEVELOP_FLAG_STRUCT(type, name, value, doc) /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   207
  #define C1_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   208
  #define C1_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc)
489c9b5090e2 Initial load
duke
parents:
diff changeset
   209
#else
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   210
  #define C1_DEVELOP_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, doc, "{C1}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   211
  #define C1_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, doc, "{C1 pd}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   212
  #define C1_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, doc, "{C1 notproduct}", DEFAULT },
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   213
#endif
489c9b5090e2 Initial load
duke
parents:
diff changeset
   214
489c9b5090e2 Initial load
duke
parents:
diff changeset
   215
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   216
#define C2_PRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{C2 product}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   217
#define C2_PD_PRODUCT_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{C2 pd product}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   218
#define C2_DIAGNOSTIC_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{C2 diagnostic}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   219
#define C2_EXPERIMENTAL_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{C2 experimental}", DEFAULT },
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   220
#ifdef PRODUCT
489c9b5090e2 Initial load
duke
parents:
diff changeset
   221
  #define C2_DEVELOP_FLAG_STRUCT(type, name, value, doc) /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   222
  #define C2_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   223
  #define C2_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc)
489c9b5090e2 Initial load
duke
parents:
diff changeset
   224
#else
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   225
  #define C2_DEVELOP_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, doc, "{C2}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   226
  #define C2_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, doc, "{C2 pd}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   227
  #define C2_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, doc, "{C2 notproduct}", DEFAULT },
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   228
#endif
489c9b5090e2 Initial load
duke
parents:
diff changeset
   229
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   230
#define SHARK_PRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{Shark product}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   231
#define SHARK_PD_PRODUCT_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{Shark pd product}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   232
#define SHARK_DIAGNOSTIC_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, NOT_PRODUCT_ARG(doc) "{Shark diagnostic}", DEFAULT },
6187
4fa7845f7c14 6976186: integrate Shark HotSpot changes
twisti
parents: 5547
diff changeset
   233
#ifdef PRODUCT
4fa7845f7c14 6976186: integrate Shark HotSpot changes
twisti
parents: 5547
diff changeset
   234
  #define SHARK_DEVELOP_FLAG_STRUCT(type, name, value, doc) /* flag is constant */
4fa7845f7c14 6976186: integrate Shark HotSpot changes
twisti
parents: 5547
diff changeset
   235
  #define SHARK_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     /* flag is constant */
4fa7845f7c14 6976186: integrate Shark HotSpot changes
twisti
parents: 5547
diff changeset
   236
  #define SHARK_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc)
4fa7845f7c14 6976186: integrate Shark HotSpot changes
twisti
parents: 5547
diff changeset
   237
#else
6438
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   238
  #define SHARK_DEVELOP_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, doc, "{Shark}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   239
  #define SHARK_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, doc, "{Shark pd}", DEFAULT },
ace4f8100e90 6979444: add command line option to print command line flags descriptions
ikrylov
parents: 6187
diff changeset
   240
  #define SHARK_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, doc, "{Shark notproduct}", DEFAULT },
6187
4fa7845f7c14 6976186: integrate Shark HotSpot changes
twisti
parents: 5547
diff changeset
   241
#endif
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   242
489c9b5090e2 Initial load
duke
parents:
diff changeset
   243
static Flag flagTable[] = {
11167
3931428f62ae 7116730: Revert 7116481: Commercial features in Hotspot must be gated by a switch
phh
parents: 11166
diff changeset
   244
 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)
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   245
 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)
1374
4c24294029a9 6711316: Open source the Garbage-First garbage collector
ysr
parents: 360
diff changeset
   246
#ifndef SERIALGC
1382
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
   247
 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)
1374
4c24294029a9 6711316: Open source the Garbage-First garbage collector
ysr
parents: 360
diff changeset
   248
#endif // SERIALGC
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   249
#ifdef COMPILER1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   250
 C1_FLAGS(C1_DEVELOP_FLAG_STRUCT, C1_PD_DEVELOP_FLAG_STRUCT, C1_PRODUCT_FLAG_STRUCT, C1_PD_PRODUCT_FLAG_STRUCT, C1_NOTPRODUCT_FLAG_STRUCT)
489c9b5090e2 Initial load
duke
parents:
diff changeset
   251
#endif
489c9b5090e2 Initial load
duke
parents:
diff changeset
   252
#ifdef COMPILER2
4450
6d700b859b3e 6892658: C2 should optimize some stringbuilder patterns
never
parents: 4437
diff changeset
   253
 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)
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   254
#endif
6187
4fa7845f7c14 6976186: integrate Shark HotSpot changes
twisti
parents: 5547
diff changeset
   255
#ifdef SHARK
4fa7845f7c14 6976186: integrate Shark HotSpot changes
twisti
parents: 5547
diff changeset
   256
 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)
4fa7845f7c14 6976186: integrate Shark HotSpot changes
twisti
parents: 5547
diff changeset
   257
#endif
11183
a81bb5c041d3 7117389: Add a framework for vendor-specific command line switch extensions to Hotspot
phh
parents: 11167
diff changeset
   258
 FLAGTABLE_EXT
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   259
 {0, NULL, NULL}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   260
};
489c9b5090e2 Initial load
duke
parents:
diff changeset
   261
489c9b5090e2 Initial load
duke
parents:
diff changeset
   262
Flag* Flag::flags = flagTable;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   263
size_t Flag::numFlags = (sizeof(flagTable) / sizeof(Flag));
489c9b5090e2 Initial load
duke
parents:
diff changeset
   264
489c9b5090e2 Initial load
duke
parents:
diff changeset
   265
inline bool str_equal(const char* s, char* q, size_t len) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   266
  // s is null terminated, q is not!
489c9b5090e2 Initial load
duke
parents:
diff changeset
   267
  if (strlen(s) != (unsigned int) len) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   268
  return strncmp(s, q, len) == 0;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   269
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   270
12157
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
   271
// Search the flag table for a named flag
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
   272
Flag* Flag::find_flag(char* name, size_t length, bool allow_locked) {
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
   273
  for (Flag* current = &flagTable[0]; current->name != NULL; current++) {
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   274
    if (str_equal(current->name, name, length)) {
12157
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
   275
      // Found a matching entry.  Report locked flags only if allowed.
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   276
      if (!(current->is_unlocked() || current->is_unlocker())) {
12157
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
   277
        if (!allow_locked) {
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
   278
          // disable use of locked flags, e.g. diagnostic, experimental,
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
   279
          // commercial... until they are explicitly unlocked
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
   280
          return NULL;
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
   281
        }
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   282
      }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   283
      return current;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   284
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   285
  }
12157
439a7166bf0f 7144328: Improper commandlines for -XX:+-UnlockCommercialFeatures require proper warning/error messages
jmelvin
parents: 11441
diff changeset
   286
  // Flag name is not in the flag table
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   287
  return NULL;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   288
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   289
489c9b5090e2 Initial load
duke
parents:
diff changeset
   290
// Returns the address of the index'th element
489c9b5090e2 Initial load
duke
parents:
diff changeset
   291
static Flag* address_of_flag(CommandLineFlagWithType flag) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   292
  assert((size_t)flag < Flag::numFlags, "bad command line flag index");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   293
  return &Flag::flags[flag];
489c9b5090e2 Initial load
duke
parents:
diff changeset
   294
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   295
489c9b5090e2 Initial load
duke
parents:
diff changeset
   296
bool CommandLineFlagsEx::is_default(CommandLineFlag flag) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   297
  assert((size_t)flag < Flag::numFlags, "bad command line flag index");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   298
  Flag* f = &Flag::flags[flag];
489c9b5090e2 Initial load
duke
parents:
diff changeset
   299
  return (f->origin == DEFAULT);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   300
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   301
186
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   302
bool CommandLineFlagsEx::is_ergo(CommandLineFlag flag) {
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   303
  assert((size_t)flag < Flag::numFlags, "bad command line flag index");
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   304
  Flag* f = &Flag::flags[flag];
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   305
  return (f->origin == ERGONOMIC);
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   306
}
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   307
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   308
bool CommandLineFlagsEx::is_cmdline(CommandLineFlag flag) {
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   309
  assert((size_t)flag < Flag::numFlags, "bad command line flag index");
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   310
  Flag* f = &Flag::flags[flag];
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   311
  return (f->origin == COMMAND_LINE);
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   312
}
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   313
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   314
bool CommandLineFlags::wasSetOnCmdline(const char* name, bool* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   315
  Flag* result = Flag::find_flag((char*)name, strlen(name));
489c9b5090e2 Initial load
duke
parents:
diff changeset
   316
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   317
  *value = (result->origin == COMMAND_LINE);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   318
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   319
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   320
489c9b5090e2 Initial load
duke
parents:
diff changeset
   321
bool CommandLineFlags::boolAt(char* name, size_t len, bool* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   322
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   323
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   324
  if (!result->is_bool()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   325
  *value = result->get_bool();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   326
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   327
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   328
489c9b5090e2 Initial load
duke
parents:
diff changeset
   329
bool CommandLineFlags::boolAtPut(char* name, size_t len, bool* value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   330
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   331
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   332
  if (!result->is_bool()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   333
  bool old_value = result->get_bool();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   334
  result->set_bool(*value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   335
  *value = old_value;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   336
  result->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   337
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   338
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   339
489c9b5090e2 Initial load
duke
parents:
diff changeset
   340
void CommandLineFlagsEx::boolAtPut(CommandLineFlagWithType flag, bool value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   341
  Flag* faddr = address_of_flag(flag);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   342
  guarantee(faddr != NULL && faddr->is_bool(), "wrong flag type");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   343
  faddr->set_bool(value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   344
  faddr->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   345
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   346
489c9b5090e2 Initial load
duke
parents:
diff changeset
   347
bool CommandLineFlags::intxAt(char* name, size_t len, intx* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   348
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   349
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   350
  if (!result->is_intx()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   351
  *value = result->get_intx();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   352
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   353
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   354
489c9b5090e2 Initial load
duke
parents:
diff changeset
   355
bool CommandLineFlags::intxAtPut(char* name, size_t len, intx* value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   356
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   357
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   358
  if (!result->is_intx()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   359
  intx old_value = result->get_intx();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   360
  result->set_intx(*value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   361
  *value = old_value;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   362
  result->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   363
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   364
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   365
489c9b5090e2 Initial load
duke
parents:
diff changeset
   366
void CommandLineFlagsEx::intxAtPut(CommandLineFlagWithType flag, intx value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   367
  Flag* faddr = address_of_flag(flag);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   368
  guarantee(faddr != NULL && faddr->is_intx(), "wrong flag type");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   369
  faddr->set_intx(value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   370
  faddr->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   371
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   372
489c9b5090e2 Initial load
duke
parents:
diff changeset
   373
bool CommandLineFlags::uintxAt(char* name, size_t len, uintx* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   374
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   375
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   376
  if (!result->is_uintx()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   377
  *value = result->get_uintx();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   378
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   379
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   380
489c9b5090e2 Initial load
duke
parents:
diff changeset
   381
bool CommandLineFlags::uintxAtPut(char* name, size_t len, uintx* value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   382
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   383
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   384
  if (!result->is_uintx()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   385
  uintx old_value = result->get_uintx();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   386
  result->set_uintx(*value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   387
  *value = old_value;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   388
  result->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   389
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   390
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   391
489c9b5090e2 Initial load
duke
parents:
diff changeset
   392
void CommandLineFlagsEx::uintxAtPut(CommandLineFlagWithType flag, uintx value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   393
  Flag* faddr = address_of_flag(flag);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   394
  guarantee(faddr != NULL && faddr->is_uintx(), "wrong flag type");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   395
  faddr->set_uintx(value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   396
  faddr->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   397
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   398
4434
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   399
bool CommandLineFlags::uint64_tAt(char* name, size_t len, uint64_t* value) {
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   400
  Flag* result = Flag::find_flag(name, len);
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   401
  if (result == NULL) return false;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   402
  if (!result->is_uint64_t()) return false;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   403
  *value = result->get_uint64_t();
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   404
  return true;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   405
}
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   406
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   407
bool CommandLineFlags::uint64_tAtPut(char* name, size_t len, uint64_t* value, FlagValueOrigin origin) {
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   408
  Flag* result = Flag::find_flag(name, len);
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   409
  if (result == NULL) return false;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   410
  if (!result->is_uint64_t()) return false;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   411
  uint64_t old_value = result->get_uint64_t();
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   412
  result->set_uint64_t(*value);
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   413
  *value = old_value;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   414
  result->origin = origin;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   415
  return true;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   416
}
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   417
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   418
void CommandLineFlagsEx::uint64_tAtPut(CommandLineFlagWithType flag, uint64_t value, FlagValueOrigin origin) {
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   419
  Flag* faddr = address_of_flag(flag);
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   420
  guarantee(faddr != NULL && faddr->is_uint64_t(), "wrong flag type");
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   421
  faddr->set_uint64_t(value);
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   422
  faddr->origin = origin;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   423
}
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   424
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   425
bool CommandLineFlags::doubleAt(char* name, size_t len, double* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   426
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   427
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   428
  if (!result->is_double()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   429
  *value = result->get_double();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   430
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   431
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   432
489c9b5090e2 Initial load
duke
parents:
diff changeset
   433
bool CommandLineFlags::doubleAtPut(char* name, size_t len, double* value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   434
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   435
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   436
  if (!result->is_double()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   437
  double old_value = result->get_double();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   438
  result->set_double(*value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   439
  *value = old_value;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   440
  result->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   441
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   442
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   443
489c9b5090e2 Initial load
duke
parents:
diff changeset
   444
void CommandLineFlagsEx::doubleAtPut(CommandLineFlagWithType flag, double value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   445
  Flag* faddr = address_of_flag(flag);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   446
  guarantee(faddr != NULL && faddr->is_double(), "wrong flag type");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   447
  faddr->set_double(value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   448
  faddr->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   449
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   450
489c9b5090e2 Initial load
duke
parents:
diff changeset
   451
bool CommandLineFlags::ccstrAt(char* name, size_t len, ccstr* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   452
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   453
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   454
  if (!result->is_ccstr()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   455
  *value = result->get_ccstr();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   456
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   457
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   458
489c9b5090e2 Initial load
duke
parents:
diff changeset
   459
// Contract:  Flag will make private copy of the incoming value.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   460
// Outgoing value is always malloc-ed, and caller MUST call free.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   461
bool CommandLineFlags::ccstrAtPut(char* name, size_t len, ccstr* value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   462
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   463
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   464
  if (!result->is_ccstr()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   465
  ccstr old_value = result->get_ccstr();
1402
ccb40ce62b79 6744783: HotSpot segfaults if given -XX options with an empty string argument
never
parents: 670
diff changeset
   466
  char* new_value = NULL;
ccb40ce62b79 6744783: HotSpot segfaults if given -XX options with an empty string argument
never
parents: 670
diff changeset
   467
  if (*value != NULL) {
ccb40ce62b79 6744783: HotSpot segfaults if given -XX options with an empty string argument
never
parents: 670
diff changeset
   468
    new_value = NEW_C_HEAP_ARRAY(char, strlen(*value)+1);
ccb40ce62b79 6744783: HotSpot segfaults if given -XX options with an empty string argument
never
parents: 670
diff changeset
   469
    strcpy(new_value, *value);
ccb40ce62b79 6744783: HotSpot segfaults if given -XX options with an empty string argument
never
parents: 670
diff changeset
   470
  }
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   471
  result->set_ccstr(new_value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   472
  if (result->origin == DEFAULT && old_value != NULL) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   473
    // Prior value is NOT heap allocated, but was a literal constant.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   474
    char* old_value_to_free = NEW_C_HEAP_ARRAY(char, strlen(old_value)+1);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   475
    strcpy(old_value_to_free, old_value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   476
    old_value = old_value_to_free;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   477
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   478
  *value = old_value;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   479
  result->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   480
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   481
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   482
489c9b5090e2 Initial load
duke
parents:
diff changeset
   483
// Contract:  Flag will make private copy of the incoming value.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   484
void CommandLineFlagsEx::ccstrAtPut(CommandLineFlagWithType flag, ccstr value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   485
  Flag* faddr = address_of_flag(flag);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   486
  guarantee(faddr != NULL && faddr->is_ccstr(), "wrong flag type");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   487
  ccstr old_value = faddr->get_ccstr();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   488
  char* new_value = NEW_C_HEAP_ARRAY(char, strlen(value)+1);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   489
  strcpy(new_value, value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   490
  faddr->set_ccstr(new_value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   491
  if (faddr->origin != DEFAULT && old_value != NULL) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   492
    // Prior value is heap allocated so free it.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   493
    FREE_C_HEAP_ARRAY(char, old_value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   494
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   495
  faddr->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   496
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   497
489c9b5090e2 Initial load
duke
parents:
diff changeset
   498
extern "C" {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   499
  static int compare_flags(const void* void_a, const void* void_b) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   500
    return strcmp((*((Flag**) void_a))->name, (*((Flag**) void_b))->name);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   501
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   502
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   503
11441
a89f443814cd 7120511: Add diagnostic commands
fparain
parents: 11254
diff changeset
   504
void CommandLineFlags::printSetFlags(outputStream* out) {
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   505
  // Print which flags were set on the command line
489c9b5090e2 Initial load
duke
parents:
diff changeset
   506
  // note: this method is called before the thread structure is in place
489c9b5090e2 Initial load
duke
parents:
diff changeset
   507
  //       which means resource allocation cannot be used.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   508
489c9b5090e2 Initial load
duke
parents:
diff changeset
   509
  // Compute size
489c9b5090e2 Initial load
duke
parents:
diff changeset
   510
  int length= 0;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   511
  while (flagTable[length].name != NULL) length++;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   512
489c9b5090e2 Initial load
duke
parents:
diff changeset
   513
  // Sort
489c9b5090e2 Initial load
duke
parents:
diff changeset
   514
  Flag** array = NEW_C_HEAP_ARRAY(Flag*, length);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   515
  for (int index = 0; index < length; index++) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   516
    array[index] = &flagTable[index];
489c9b5090e2 Initial load
duke
parents:
diff changeset
   517
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   518
  qsort(array, length, sizeof(Flag*), compare_flags);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   519
489c9b5090e2 Initial load
duke
parents:
diff changeset
   520
  // Print
489c9b5090e2 Initial load
duke
parents:
diff changeset
   521
  for (int i = 0; i < length; i++) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   522
    if (array[i]->origin /* naked field! */) {
11441
a89f443814cd 7120511: Add diagnostic commands
fparain
parents: 11254
diff changeset
   523
      array[i]->print_as_flag(out);
a89f443814cd 7120511: Add diagnostic commands
fparain
parents: 11254
diff changeset
   524
      out->print(" ");
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   525
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   526
  }
11441
a89f443814cd 7120511: Add diagnostic commands
fparain
parents: 11254
diff changeset
   527
  out->cr();
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   528
  FREE_C_HEAP_ARRAY(Flag*, array);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   529
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   530
489c9b5090e2 Initial load
duke
parents:
diff changeset
   531
#ifndef PRODUCT
489c9b5090e2 Initial load
duke
parents:
diff changeset
   532
489c9b5090e2 Initial load
duke
parents:
diff changeset
   533
489c9b5090e2 Initial load
duke
parents:
diff changeset
   534
void CommandLineFlags::verify() {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   535
  assert(Arguments::check_vm_args_consistency(), "Some flag settings conflict");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   536
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   537
4579
62478db2dc78 6914622: Print values of all flags for product VM
kvn
parents: 4450
diff changeset
   538
#endif // PRODUCT
62478db2dc78 6914622: Print values of all flags for product VM
kvn
parents: 4450
diff changeset
   539
11441
a89f443814cd 7120511: Add diagnostic commands
fparain
parents: 11254
diff changeset
   540
void CommandLineFlags::printFlags(outputStream* out, bool withComments) {
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   541
  // Print the flags sorted by name
489c9b5090e2 Initial load
duke
parents:
diff changeset
   542
  // note: this method is called before the thread structure is in place
489c9b5090e2 Initial load
duke
parents:
diff changeset
   543
  //       which means resource allocation cannot be used.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   544
489c9b5090e2 Initial load
duke
parents:
diff changeset
   545
  // Compute size
489c9b5090e2 Initial load
duke
parents:
diff changeset
   546
  int length= 0;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   547
  while (flagTable[length].name != NULL) length++;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   548
489c9b5090e2 Initial load
duke
parents:
diff changeset
   549
  // Sort
489c9b5090e2 Initial load
duke
parents:
diff changeset
   550
  Flag** array = NEW_C_HEAP_ARRAY(Flag*, length);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   551
  for (int index = 0; index < length; index++) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   552
    array[index] = &flagTable[index];
489c9b5090e2 Initial load
duke
parents:
diff changeset
   553
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   554
  qsort(array, length, sizeof(Flag*), compare_flags);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   555
489c9b5090e2 Initial load
duke
parents:
diff changeset
   556
  // Print
11441
a89f443814cd 7120511: Add diagnostic commands
fparain
parents: 11254
diff changeset
   557
  out->print_cr("[Global flags]");
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   558
  for (int i = 0; i < length; i++) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   559
    if (array[i]->is_unlocked()) {
11441
a89f443814cd 7120511: Add diagnostic commands
fparain
parents: 11254
diff changeset
   560
      array[i]->print_on(out, withComments);
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   561
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   562
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   563
  FREE_C_HEAP_ARRAY(Flag*, array);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   564
}