hotspot/src/share/vm/runtime/globals.cpp
author kvn
Thu, 07 Jan 2010 16:24:17 -0800
changeset 4579 62478db2dc78
parent 4450 6d700b859b3e
child 5547 f4b087cbb361
permissions -rw-r--r--
6914622: Print values of all flags for product VM Summary: Change the flag -XX:+PrintFlagsFinal to product and add new product flag -XX:+PrintFlagsInitial. Reviewed-by: phh, ysr Contributed-by: gbenson@redhat.com
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
     1
/*
670
ddf3e9583f2f 6719955: Update copyright year
xdono
parents: 360
diff changeset
     2
 * Copyright 1997-2008 Sun Microsystems, Inc.  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
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
    19
 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
489c9b5090e2 Initial load
duke
parents:
diff changeset
    20
 * CA 95054 USA or visit www.sun.com if you need additional information or
489c9b5090e2 Initial load
duke
parents:
diff changeset
    21
 * have any questions.
489c9b5090e2 Initial load
duke
parents:
diff changeset
    22
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
    23
 */
489c9b5090e2 Initial load
duke
parents:
diff changeset
    24
489c9b5090e2 Initial load
duke
parents:
diff changeset
    25
# include "incls/_precompiled.incl"
489c9b5090e2 Initial load
duke
parents:
diff changeset
    26
# include "incls/_globals.cpp.incl"
489c9b5090e2 Initial load
duke
parents:
diff changeset
    27
489c9b5090e2 Initial load
duke
parents:
diff changeset
    28
489c9b5090e2 Initial load
duke
parents:
diff changeset
    29
RUNTIME_FLAGS(MATERIALIZE_DEVELOPER_FLAG, MATERIALIZE_PD_DEVELOPER_FLAG, \
489c9b5090e2 Initial load
duke
parents:
diff changeset
    30
              MATERIALIZE_PRODUCT_FLAG, MATERIALIZE_PD_PRODUCT_FLAG, \
1382
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
    31
              MATERIALIZE_DIAGNOSTIC_FLAG, MATERIALIZE_EXPERIMENTAL_FLAG, \
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
    32
              MATERIALIZE_NOTPRODUCT_FLAG, \
360
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
    33
              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
    34
              MATERIALIZE_LP64_PRODUCT_FLAG)
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    35
489c9b5090e2 Initial load
duke
parents:
diff changeset
    36
RUNTIME_OS_FLAGS(MATERIALIZE_DEVELOPER_FLAG, MATERIALIZE_PD_DEVELOPER_FLAG, \
489c9b5090e2 Initial load
duke
parents:
diff changeset
    37
                 MATERIALIZE_PRODUCT_FLAG, MATERIALIZE_PD_PRODUCT_FLAG, \
489c9b5090e2 Initial load
duke
parents:
diff changeset
    38
                 MATERIALIZE_DIAGNOSTIC_FLAG, MATERIALIZE_NOTPRODUCT_FLAG)
489c9b5090e2 Initial load
duke
parents:
diff changeset
    39
489c9b5090e2 Initial load
duke
parents:
diff changeset
    40
bool Flag::is_unlocker() const {
1382
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
    41
  return strcmp(name, "UnlockDiagnosticVMOptions") == 0     ||
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
    42
         strcmp(name, "UnlockExperimentalVMOptions") == 0;
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
    43
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    44
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    45
489c9b5090e2 Initial load
duke
parents:
diff changeset
    46
bool Flag::is_unlocked() const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    47
  if (strcmp(kind, "{diagnostic}") == 0) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    48
    return UnlockDiagnosticVMOptions;
4450
6d700b859b3e 6892658: C2 should optimize some stringbuilder patterns
never
parents: 4437
diff changeset
    49
  } else if (strcmp(kind, "{experimental}") == 0 ||
6d700b859b3e 6892658: C2 should optimize some stringbuilder patterns
never
parents: 4437
diff changeset
    50
             strcmp(kind, "{C2 experimental}") == 0) {
1382
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
    51
    return UnlockExperimentalVMOptions;
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    52
  } else {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    53
    return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
    54
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
    55
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    56
489c9b5090e2 Initial load
duke
parents:
diff changeset
    57
bool Flag::is_writeable() const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    58
  return (strcmp(kind, "{manageable}") == 0 || strcmp(kind, "{product rw}") == 0);
489c9b5090e2 Initial load
duke
parents:
diff changeset
    59
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    60
489c9b5090e2 Initial load
duke
parents:
diff changeset
    61
// All flags except "manageable" are assumed internal flags.
489c9b5090e2 Initial load
duke
parents:
diff changeset
    62
// Long term, we need to define a mechanism to specify which flags
489c9b5090e2 Initial load
duke
parents:
diff changeset
    63
// are external/stable and change this function accordingly.
489c9b5090e2 Initial load
duke
parents:
diff changeset
    64
bool Flag::is_external() const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    65
  return (strcmp(kind, "{manageable}") == 0);
489c9b5090e2 Initial load
duke
parents:
diff changeset
    66
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    67
489c9b5090e2 Initial load
duke
parents:
diff changeset
    68
// Length of format string (e.g. "%.1234s") for printing ccstr below
489c9b5090e2 Initial load
duke
parents:
diff changeset
    69
#define FORMAT_BUFFER_LEN 16
489c9b5090e2 Initial load
duke
parents:
diff changeset
    70
489c9b5090e2 Initial load
duke
parents:
diff changeset
    71
void Flag::print_on(outputStream* st) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    72
  st->print("%5s %-35s %c= ", type, name, (origin != DEFAULT ? ':' : ' '));
4437
d1abc17afffb 6898160: Need serviceability support for new vm argument type 'uint64_t'
phh
parents: 4434
diff changeset
    73
  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
    74
  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
    75
  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
    76
  if (is_uint64_t()) st->print("%-16lu", get_uint64_t());
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    77
  if (is_ccstr()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    78
    const char* cp = get_ccstr();
350
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    79
    if (cp != NULL) {
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    80
      const char* eol;
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    81
      while ((eol = strchr(cp, '\n')) != NULL) {
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    82
        char format_buffer[FORMAT_BUFFER_LEN];
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    83
        size_t llen = pointer_delta(eol, cp, sizeof(char));
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    84
        jio_snprintf(format_buffer, FORMAT_BUFFER_LEN,
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    85
                     "%%." SIZE_FORMAT "s", llen);
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    86
        st->print(format_buffer, cp);
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    87
        st->cr();
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    88
        cp = eol+1;
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    89
        st->print("%5s %-35s += ", "", name);
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    90
      }
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
    91
      st->print("%-16s", cp);
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    92
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
    93
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
    94
  st->print(" %s", kind);
489c9b5090e2 Initial load
duke
parents:
diff changeset
    95
  st->cr();
489c9b5090e2 Initial load
duke
parents:
diff changeset
    96
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    97
489c9b5090e2 Initial load
duke
parents:
diff changeset
    98
void Flag::print_as_flag(outputStream* st) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    99
  if (is_bool()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   100
    st->print("-XX:%s%s", get_bool() ? "+" : "-", name);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   101
  } else if (is_intx()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   102
    st->print("-XX:%s=" INTX_FORMAT, name, get_intx());
489c9b5090e2 Initial load
duke
parents:
diff changeset
   103
  } else if (is_uintx()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   104
    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
   105
  } else if (is_uint64_t()) {
d1abc17afffb 6898160: Need serviceability support for new vm argument type 'uint64_t'
phh
parents: 4434
diff changeset
   106
    st->print("-XX:%s=" UINT64_FORMAT, name, get_uint64_t());
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   107
  } else if (is_ccstr()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   108
    st->print("-XX:%s=", name);
350
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   109
    const char* cp = get_ccstr();
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   110
    if (cp != NULL) {
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   111
      // Need to turn embedded '\n's back into separate arguments
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   112
      // Not so efficient to print one character at a time,
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   113
      // 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
   114
      // and print that.  And this need not be efficient.
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   115
      for (; *cp != '\0'; cp += 1) {
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   116
        switch (*cp) {
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   117
          default:
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   118
            st->print("%c", *cp);
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   119
            break;
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   120
          case '\n':
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   121
            st->print(" -XX:%s=", name);
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   122
            break;
d6d713dd712a 6619271: The -Xprintflags causes the VM to segv
never
parents: 186
diff changeset
   123
        }
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   124
      }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   125
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   126
  } else {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   127
    ShouldNotReachHere();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   128
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   129
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   130
489c9b5090e2 Initial load
duke
parents:
diff changeset
   131
// 4991491 do not "optimize out" the was_set false values: omitting them
489c9b5090e2 Initial load
duke
parents:
diff changeset
   132
// tickles a Microsoft compiler bug causing flagTable to be malformed
489c9b5090e2 Initial load
duke
parents:
diff changeset
   133
489c9b5090e2 Initial load
duke
parents:
diff changeset
   134
#define RUNTIME_PRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{product}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   135
#define RUNTIME_PD_PRODUCT_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, "{pd product}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   136
#define RUNTIME_DIAGNOSTIC_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{diagnostic}", DEFAULT },
1382
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
   137
#define RUNTIME_EXPERIMENTAL_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{experimental}", DEFAULT },
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   138
#define RUNTIME_MANAGEABLE_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{manageable}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   139
#define RUNTIME_PRODUCT_RW_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{product rw}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   140
489c9b5090e2 Initial load
duke
parents:
diff changeset
   141
#ifdef PRODUCT
489c9b5090e2 Initial load
duke
parents:
diff changeset
   142
  #define RUNTIME_DEVELOP_FLAG_STRUCT(type, name, value, doc) /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   143
  #define RUNTIME_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   144
  #define RUNTIME_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc)
489c9b5090e2 Initial load
duke
parents:
diff changeset
   145
#else
489c9b5090e2 Initial load
duke
parents:
diff changeset
   146
  #define RUNTIME_DEVELOP_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   147
  #define RUNTIME_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, "{pd}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   148
  #define RUNTIME_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{notproduct}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   149
#endif
489c9b5090e2 Initial load
duke
parents:
diff changeset
   150
360
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
   151
#ifdef _LP64
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
   152
  #define RUNTIME_LP64_PRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{lp64_product}", DEFAULT },
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
   153
#else
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
   154
  #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
   155
#endif // _LP64
21d113ecbf6a 6420645: Create a vm that uses compressed oops for up to 32gb heapsizes
coleenp
parents: 350
diff changeset
   156
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   157
#define C1_PRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{C1 product}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   158
#define C1_PD_PRODUCT_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, "{C1 pd product}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   159
#ifdef PRODUCT
489c9b5090e2 Initial load
duke
parents:
diff changeset
   160
  #define C1_DEVELOP_FLAG_STRUCT(type, name, value, doc) /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   161
  #define C1_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   162
  #define C1_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc)
489c9b5090e2 Initial load
duke
parents:
diff changeset
   163
#else
489c9b5090e2 Initial load
duke
parents:
diff changeset
   164
  #define C1_DEVELOP_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{C1}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   165
  #define C1_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, "{C1 pd}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   166
  #define C1_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{C1 notproduct}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   167
#endif
489c9b5090e2 Initial load
duke
parents:
diff changeset
   168
489c9b5090e2 Initial load
duke
parents:
diff changeset
   169
489c9b5090e2 Initial load
duke
parents:
diff changeset
   170
#define C2_PRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{C2 product}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   171
#define C2_PD_PRODUCT_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, "{C2 pd product}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   172
#define C2_DIAGNOSTIC_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{C2 diagnostic}", DEFAULT },
4450
6d700b859b3e 6892658: C2 should optimize some stringbuilder patterns
never
parents: 4437
diff changeset
   173
#define C2_EXPERIMENTAL_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{C2 experimental}", DEFAULT },
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   174
#ifdef PRODUCT
489c9b5090e2 Initial load
duke
parents:
diff changeset
   175
  #define C2_DEVELOP_FLAG_STRUCT(type, name, value, doc) /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   176
  #define C2_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     /* flag is constant */
489c9b5090e2 Initial load
duke
parents:
diff changeset
   177
  #define C2_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc)
489c9b5090e2 Initial load
duke
parents:
diff changeset
   178
#else
489c9b5090e2 Initial load
duke
parents:
diff changeset
   179
  #define C2_DEVELOP_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{C2}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   180
  #define C2_PD_DEVELOP_FLAG_STRUCT(type, name, doc)     { #type, XSTR(name), &name, "{C2 pd}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   181
  #define C2_NOTPRODUCT_FLAG_STRUCT(type, name, value, doc) { #type, XSTR(name), &name, "{C2 notproduct}", DEFAULT },
489c9b5090e2 Initial load
duke
parents:
diff changeset
   182
#endif
489c9b5090e2 Initial load
duke
parents:
diff changeset
   183
489c9b5090e2 Initial load
duke
parents:
diff changeset
   184
489c9b5090e2 Initial load
duke
parents:
diff changeset
   185
static Flag flagTable[] = {
1382
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
   186
 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
   187
 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
   188
#ifndef SERIALGC
1382
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
   189
 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
   190
#endif // SERIALGC
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   191
#ifdef COMPILER1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   192
 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
   193
#endif
489c9b5090e2 Initial load
duke
parents:
diff changeset
   194
#ifdef COMPILER2
4450
6d700b859b3e 6892658: C2 should optimize some stringbuilder patterns
never
parents: 4437
diff changeset
   195
 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
   196
#endif
489c9b5090e2 Initial load
duke
parents:
diff changeset
   197
 {0, NULL, NULL}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   198
};
489c9b5090e2 Initial load
duke
parents:
diff changeset
   199
489c9b5090e2 Initial load
duke
parents:
diff changeset
   200
Flag* Flag::flags = flagTable;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   201
size_t Flag::numFlags = (sizeof(flagTable) / sizeof(Flag));
489c9b5090e2 Initial load
duke
parents:
diff changeset
   202
489c9b5090e2 Initial load
duke
parents:
diff changeset
   203
inline bool str_equal(const char* s, char* q, size_t len) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   204
  // s is null terminated, q is not!
489c9b5090e2 Initial load
duke
parents:
diff changeset
   205
  if (strlen(s) != (unsigned int) len) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   206
  return strncmp(s, q, len) == 0;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   207
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   208
489c9b5090e2 Initial load
duke
parents:
diff changeset
   209
Flag* Flag::find_flag(char* name, size_t length) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   210
  for (Flag* current = &flagTable[0]; current->name; current++) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   211
    if (str_equal(current->name, name, length)) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   212
      if (!(current->is_unlocked() || current->is_unlocker())) {
1382
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
   213
        // disable use of diagnostic or experimental flags until they
fa3de4068282 6618726: Introduce -XX:+UnlockExperimentalVMOptions flag
ysr
parents: 1374
diff changeset
   214
        // are explicitly unlocked
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   215
        return NULL;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   216
      }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   217
      return current;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   218
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   219
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   220
  return NULL;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   221
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   222
489c9b5090e2 Initial load
duke
parents:
diff changeset
   223
// Returns the address of the index'th element
489c9b5090e2 Initial load
duke
parents:
diff changeset
   224
static Flag* address_of_flag(CommandLineFlagWithType flag) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   225
  assert((size_t)flag < Flag::numFlags, "bad command line flag index");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   226
  return &Flag::flags[flag];
489c9b5090e2 Initial load
duke
parents:
diff changeset
   227
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   228
489c9b5090e2 Initial load
duke
parents:
diff changeset
   229
bool CommandLineFlagsEx::is_default(CommandLineFlag flag) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   230
  assert((size_t)flag < Flag::numFlags, "bad command line flag index");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   231
  Flag* f = &Flag::flags[flag];
489c9b5090e2 Initial load
duke
parents:
diff changeset
   232
  return (f->origin == DEFAULT);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   233
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   234
186
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   235
bool CommandLineFlagsEx::is_ergo(CommandLineFlag flag) {
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   236
  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
   237
  Flag* f = &Flag::flags[flag];
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   238
  return (f->origin == ERGONOMIC);
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   239
}
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   240
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   241
bool CommandLineFlagsEx::is_cmdline(CommandLineFlag flag) {
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   242
  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
   243
  Flag* f = &Flag::flags[flag];
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   244
  return (f->origin == COMMAND_LINE);
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   245
}
32e6c95f8d9b 6557851: CMS: ergonomics defaults are not set with FLAG_SET_ERGO
jmasa
parents: 1
diff changeset
   246
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   247
bool CommandLineFlags::wasSetOnCmdline(const char* name, bool* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   248
  Flag* result = Flag::find_flag((char*)name, strlen(name));
489c9b5090e2 Initial load
duke
parents:
diff changeset
   249
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   250
  *value = (result->origin == COMMAND_LINE);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   251
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   252
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   253
489c9b5090e2 Initial load
duke
parents:
diff changeset
   254
bool CommandLineFlags::boolAt(char* name, size_t len, bool* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   255
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   256
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   257
  if (!result->is_bool()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   258
  *value = result->get_bool();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   259
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   260
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   261
489c9b5090e2 Initial load
duke
parents:
diff changeset
   262
bool CommandLineFlags::boolAtPut(char* name, size_t len, bool* value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   263
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   264
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   265
  if (!result->is_bool()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   266
  bool old_value = result->get_bool();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   267
  result->set_bool(*value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   268
  *value = old_value;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   269
  result->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   270
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   271
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   272
489c9b5090e2 Initial load
duke
parents:
diff changeset
   273
void CommandLineFlagsEx::boolAtPut(CommandLineFlagWithType flag, bool value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   274
  Flag* faddr = address_of_flag(flag);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   275
  guarantee(faddr != NULL && faddr->is_bool(), "wrong flag type");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   276
  faddr->set_bool(value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   277
  faddr->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   278
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   279
489c9b5090e2 Initial load
duke
parents:
diff changeset
   280
bool CommandLineFlags::intxAt(char* name, size_t len, intx* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   281
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   282
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   283
  if (!result->is_intx()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   284
  *value = result->get_intx();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   285
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   286
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   287
489c9b5090e2 Initial load
duke
parents:
diff changeset
   288
bool CommandLineFlags::intxAtPut(char* name, size_t len, intx* value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   289
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   290
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   291
  if (!result->is_intx()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   292
  intx old_value = result->get_intx();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   293
  result->set_intx(*value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   294
  *value = old_value;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   295
  result->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   296
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   297
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   298
489c9b5090e2 Initial load
duke
parents:
diff changeset
   299
void CommandLineFlagsEx::intxAtPut(CommandLineFlagWithType flag, intx value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   300
  Flag* faddr = address_of_flag(flag);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   301
  guarantee(faddr != NULL && faddr->is_intx(), "wrong flag type");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   302
  faddr->set_intx(value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   303
  faddr->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   304
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   305
489c9b5090e2 Initial load
duke
parents:
diff changeset
   306
bool CommandLineFlags::uintxAt(char* name, size_t len, uintx* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   307
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   308
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   309
  if (!result->is_uintx()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   310
  *value = result->get_uintx();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   311
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   312
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   313
489c9b5090e2 Initial load
duke
parents:
diff changeset
   314
bool CommandLineFlags::uintxAtPut(char* name, size_t len, uintx* value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   315
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   316
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   317
  if (!result->is_uintx()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   318
  uintx old_value = result->get_uintx();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   319
  result->set_uintx(*value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   320
  *value = old_value;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   321
  result->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   322
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   323
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   324
489c9b5090e2 Initial load
duke
parents:
diff changeset
   325
void CommandLineFlagsEx::uintxAtPut(CommandLineFlagWithType flag, uintx value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   326
  Flag* faddr = address_of_flag(flag);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   327
  guarantee(faddr != NULL && faddr->is_uintx(), "wrong flag type");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   328
  faddr->set_uintx(value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   329
  faddr->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   330
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   331
4434
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   332
bool CommandLineFlags::uint64_tAt(char* name, size_t len, uint64_t* value) {
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   333
  Flag* result = Flag::find_flag(name, len);
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   334
  if (result == NULL) return false;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   335
  if (!result->is_uint64_t()) return false;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   336
  *value = result->get_uint64_t();
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   337
  return true;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   338
}
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   339
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   340
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
   341
  Flag* result = Flag::find_flag(name, len);
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   342
  if (result == NULL) return false;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   343
  if (!result->is_uint64_t()) return false;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   344
  uint64_t old_value = result->get_uint64_t();
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   345
  result->set_uint64_t(*value);
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   346
  *value = old_value;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   347
  result->origin = origin;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   348
  return true;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   349
}
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   350
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   351
void CommandLineFlagsEx::uint64_tAtPut(CommandLineFlagWithType flag, uint64_t value, FlagValueOrigin origin) {
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   352
  Flag* faddr = address_of_flag(flag);
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   353
  guarantee(faddr != NULL && faddr->is_uint64_t(), "wrong flag type");
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   354
  faddr->set_uint64_t(value);
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   355
  faddr->origin = origin;
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   356
}
4b41e5b42f81 6887571: Increase default heap config sizes
phh
parents: 1404
diff changeset
   357
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   358
bool CommandLineFlags::doubleAt(char* name, size_t len, double* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   359
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   360
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   361
  if (!result->is_double()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   362
  *value = result->get_double();
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
bool CommandLineFlags::doubleAtPut(char* name, size_t len, double* value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   367
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   368
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   369
  if (!result->is_double()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   370
  double old_value = result->get_double();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   371
  result->set_double(*value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   372
  *value = old_value;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   373
  result->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   374
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   375
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   376
489c9b5090e2 Initial load
duke
parents:
diff changeset
   377
void CommandLineFlagsEx::doubleAtPut(CommandLineFlagWithType flag, double value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   378
  Flag* faddr = address_of_flag(flag);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   379
  guarantee(faddr != NULL && faddr->is_double(), "wrong flag type");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   380
  faddr->set_double(value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   381
  faddr->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   382
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   383
489c9b5090e2 Initial load
duke
parents:
diff changeset
   384
bool CommandLineFlags::ccstrAt(char* name, size_t len, ccstr* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   385
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   386
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   387
  if (!result->is_ccstr()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   388
  *value = result->get_ccstr();
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
// Contract:  Flag will make private copy of the incoming value.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   393
// Outgoing value is always malloc-ed, and caller MUST call free.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   394
bool CommandLineFlags::ccstrAtPut(char* name, size_t len, ccstr* value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   395
  Flag* result = Flag::find_flag(name, len);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   396
  if (result == NULL) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   397
  if (!result->is_ccstr()) return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   398
  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
   399
  char* new_value = NULL;
ccb40ce62b79 6744783: HotSpot segfaults if given -XX options with an empty string argument
never
parents: 670
diff changeset
   400
  if (*value != NULL) {
ccb40ce62b79 6744783: HotSpot segfaults if given -XX options with an empty string argument
never
parents: 670
diff changeset
   401
    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
   402
    strcpy(new_value, *value);
ccb40ce62b79 6744783: HotSpot segfaults if given -XX options with an empty string argument
never
parents: 670
diff changeset
   403
  }
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   404
  result->set_ccstr(new_value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   405
  if (result->origin == DEFAULT && old_value != NULL) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   406
    // Prior value is NOT heap allocated, but was a literal constant.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   407
    char* old_value_to_free = NEW_C_HEAP_ARRAY(char, strlen(old_value)+1);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   408
    strcpy(old_value_to_free, old_value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   409
    old_value = old_value_to_free;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   410
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   411
  *value = old_value;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   412
  result->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   413
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   414
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   415
489c9b5090e2 Initial load
duke
parents:
diff changeset
   416
// Contract:  Flag will make private copy of the incoming value.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   417
void CommandLineFlagsEx::ccstrAtPut(CommandLineFlagWithType flag, ccstr value, FlagValueOrigin origin) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   418
  Flag* faddr = address_of_flag(flag);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   419
  guarantee(faddr != NULL && faddr->is_ccstr(), "wrong flag type");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   420
  ccstr old_value = faddr->get_ccstr();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   421
  char* new_value = NEW_C_HEAP_ARRAY(char, strlen(value)+1);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   422
  strcpy(new_value, value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   423
  faddr->set_ccstr(new_value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   424
  if (faddr->origin != DEFAULT && old_value != NULL) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   425
    // Prior value is heap allocated so free it.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   426
    FREE_C_HEAP_ARRAY(char, old_value);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   427
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   428
  faddr->origin = origin;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   429
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   430
489c9b5090e2 Initial load
duke
parents:
diff changeset
   431
extern "C" {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   432
  static int compare_flags(const void* void_a, const void* void_b) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   433
    return strcmp((*((Flag**) void_a))->name, (*((Flag**) void_b))->name);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   434
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   435
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   436
489c9b5090e2 Initial load
duke
parents:
diff changeset
   437
void CommandLineFlags::printSetFlags() {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   438
  // Print which flags were set on the command line
489c9b5090e2 Initial load
duke
parents:
diff changeset
   439
  // note: this method is called before the thread structure is in place
489c9b5090e2 Initial load
duke
parents:
diff changeset
   440
  //       which means resource allocation cannot be used.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   441
489c9b5090e2 Initial load
duke
parents:
diff changeset
   442
  // Compute size
489c9b5090e2 Initial load
duke
parents:
diff changeset
   443
  int length= 0;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   444
  while (flagTable[length].name != NULL) length++;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   445
489c9b5090e2 Initial load
duke
parents:
diff changeset
   446
  // Sort
489c9b5090e2 Initial load
duke
parents:
diff changeset
   447
  Flag** array = NEW_C_HEAP_ARRAY(Flag*, length);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   448
  for (int index = 0; index < length; index++) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   449
    array[index] = &flagTable[index];
489c9b5090e2 Initial load
duke
parents:
diff changeset
   450
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   451
  qsort(array, length, sizeof(Flag*), compare_flags);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   452
489c9b5090e2 Initial load
duke
parents:
diff changeset
   453
  // Print
489c9b5090e2 Initial load
duke
parents:
diff changeset
   454
  for (int i = 0; i < length; i++) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   455
    if (array[i]->origin /* naked field! */) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   456
      array[i]->print_as_flag(tty);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   457
      tty->print(" ");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   458
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   459
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   460
  tty->cr();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   461
  FREE_C_HEAP_ARRAY(Flag*, array);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   462
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   463
489c9b5090e2 Initial load
duke
parents:
diff changeset
   464
#ifndef PRODUCT
489c9b5090e2 Initial load
duke
parents:
diff changeset
   465
489c9b5090e2 Initial load
duke
parents:
diff changeset
   466
489c9b5090e2 Initial load
duke
parents:
diff changeset
   467
void CommandLineFlags::verify() {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   468
  assert(Arguments::check_vm_args_consistency(), "Some flag settings conflict");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   469
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   470
4579
62478db2dc78 6914622: Print values of all flags for product VM
kvn
parents: 4450
diff changeset
   471
#endif // PRODUCT
62478db2dc78 6914622: Print values of all flags for product VM
kvn
parents: 4450
diff changeset
   472
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   473
void CommandLineFlags::printFlags() {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   474
  // Print the flags sorted by name
489c9b5090e2 Initial load
duke
parents:
diff changeset
   475
  // note: this method is called before the thread structure is in place
489c9b5090e2 Initial load
duke
parents:
diff changeset
   476
  //       which means resource allocation cannot be used.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   477
489c9b5090e2 Initial load
duke
parents:
diff changeset
   478
  // Compute size
489c9b5090e2 Initial load
duke
parents:
diff changeset
   479
  int length= 0;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   480
  while (flagTable[length].name != NULL) length++;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   481
489c9b5090e2 Initial load
duke
parents:
diff changeset
   482
  // Sort
489c9b5090e2 Initial load
duke
parents:
diff changeset
   483
  Flag** array = NEW_C_HEAP_ARRAY(Flag*, length);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   484
  for (int index = 0; index < length; index++) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   485
    array[index] = &flagTable[index];
489c9b5090e2 Initial load
duke
parents:
diff changeset
   486
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   487
  qsort(array, length, sizeof(Flag*), compare_flags);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   488
489c9b5090e2 Initial load
duke
parents:
diff changeset
   489
  // Print
489c9b5090e2 Initial load
duke
parents:
diff changeset
   490
  tty->print_cr("[Global flags]");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   491
  for (int i = 0; i < length; i++) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   492
    if (array[i]->is_unlocked()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   493
      array[i]->print_on(tty);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   494
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   495
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   496
  FREE_C_HEAP_ARRAY(Flag*, array);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   497
}