1 /*

     2  * Copyright (c) 2003, 2015, Oracle and/or its affiliates. All rights reserved.

     3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

     4  *

     5  * This code is free software; you can redistribute it and/or modify it

     6  * under the terms of the GNU General Public License version 2 only, as

     7  * published by the Free Software Foundation.  Oracle designates this

     8  * particular file as subject to the "Classpath" exception as provided

     9  * by Oracle in the LICENSE file that accompanied this code.

    10  *

    11  * This code is distributed in the hope that it will be useful, but WITHOUT

    12  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

    13  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

    14  * version 2 for more details (a copy is included in the LICENSE file that

    15  * accompanied this code).

    16  *

    17  * You should have received a copy of the GNU General Public License version

    18  * 2 along with this work; if not, write to the Free Software Foundation,

    19  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

    20  *

    21  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

    22  * or visit www.oracle.com if you need additional information or have any

    23  * questions.

    24  */

    25 

    26 #include <stdlib.h>

    27 #include <stdio.h>

    28 #include <string.h>

    29 #include <jni.h>

    30 #include "management_ext.h"

    31 #include "com_sun_management_internal_Flag.h"

    32 

    33 static jobject default_origin = NULL;

    34 static jobject vm_creation_origin = NULL;

    35 static jobject mgmt_origin = NULL;

    36 static jobject envvar_origin = NULL;

    37 static jobject config_file_origin = NULL;

    38 static jobject ergo_origin = NULL;

    39 static jobject attach_origin = NULL;

    40 static jobject other_origin = NULL;

    41 

    42 JNIEXPORT jint JNICALL

    43 Java_com_sun_management_internal_Flag_getInternalFlagCount

    44   (JNIEnv *env, jclass cls)

    45 {

    46     jlong count = jmm_interface->GetLongAttribute(env, NULL,

    47                                                   JMM_VM_GLOBAL_COUNT);

    48     return (jint) count;

    49 }

    50 

    51 JNIEXPORT jobjectArray JNICALL

    52   Java_com_sun_management_internal_Flag_getAllFlagNames

    53 (JNIEnv *env, jclass cls)

    54 {

    55   return jmm_interface->GetVMGlobalNames(env);

    56 }

    57 

    58 static jobject find_origin_constant(JNIEnv* env, const char* enum_name) {

    59     jvalue field;

    60     field = JNU_GetStaticFieldByName(env,

    61                                      NULL,

    62                                      "com/sun/management/VMOption$Origin",

    63                                      enum_name,

    64                                      "Lcom/sun/management/VMOption$Origin;");

    65     return (*env)->NewGlobalRef(env, field.l);

    66 }

    67 

    68 JNIEXPORT void JNICALL

    69 Java_com_sun_management_internal_Flag_initialize

    70   (JNIEnv *env, jclass cls)

    71 {

    72     default_origin = find_origin_constant(env, "DEFAULT");

    73     vm_creation_origin = find_origin_constant(env, "VM_CREATION");

    74     mgmt_origin = find_origin_constant(env, "MANAGEMENT");

    75     envvar_origin = find_origin_constant(env, "ENVIRON_VAR");

    76     config_file_origin = find_origin_constant(env, "CONFIG_FILE");

    77     ergo_origin = find_origin_constant(env, "ERGONOMIC");

    78     attach_origin = find_origin_constant(env, "ATTACH_ON_DEMAND");

    79     other_origin = find_origin_constant(env, "OTHER");

    80 }

    81 

    82 JNIEXPORT jint JNICALL

    83 Java_com_sun_management_internal_Flag_getFlags

    84   (JNIEnv *env, jclass cls, jobjectArray names, jobjectArray flags, jint count)

    85 {

    86     jint num_flags, i, index;

    87     jmmVMGlobal* globals;

    88     size_t gsize;

    89     const char* class_name = "com/sun/management/internal/Flag";

    90     const char* signature = "(Ljava/lang/String;Ljava/lang/Object;ZZLcom/sun/management/VMOption$Origin;)V";

    91     jobject origin;

    92     jobject valueObj;

    93     jobject flag;

    94 

    95     if (flags == NULL) {

    96         JNU_ThrowNullPointerException(env, 0);

    97         return 0;

    98     }

    99 

   100     if (count <= 0) {

   101         JNU_ThrowIllegalArgumentException(env, 0);

   102         return 0;

   103     }

   104 

   105     gsize = (size_t)count * sizeof(jmmVMGlobal);

   106     globals = (jmmVMGlobal*) malloc(gsize);

   107     if (globals == NULL) {

   108         JNU_ThrowOutOfMemoryError(env, 0);

   109         return 0;

   110     }

   111 

   112     memset(globals, 0, gsize);

   113     num_flags = jmm_interface->GetVMGlobals(env, names, globals, count);

   114     if (num_flags == 0) {

   115         free(globals);

   116         return 0;

   117     }

   118 

   119     index = 0;

   120     for (i = 0; i < count; i++) {

   121         if (globals[i].name == NULL) {

   122             continue;

   123         }

   124         switch (globals[i].type) {

   125         case JMM_VMGLOBAL_TYPE_JBOOLEAN:

   126             valueObj = JNU_NewObjectByName(env, "java/lang/Boolean", "(Z)V",

   127                                            globals[i].value.z);

   128             break;

   129         case JMM_VMGLOBAL_TYPE_JSTRING:

   130             valueObj = globals[i].value.l;

   131             break;

   132         case JMM_VMGLOBAL_TYPE_JLONG:

   133             valueObj = JNU_NewObjectByName(env, "java/lang/Long", "(J)V",

   134                                            globals[i].value.j);

   135             break;

   136         case JMM_VMGLOBAL_TYPE_JDOUBLE:

   137             valueObj = JNU_NewObjectByName(env, "java/lang/Double", "(D)V",

   138                                            globals[i].value.d);

   139             break;

   140         default:

   141             // ignore unsupported type

   142             continue;

   143         }

   144         switch (globals[i].origin) {

   145         case JMM_VMGLOBAL_ORIGIN_DEFAULT:

   146             origin = default_origin;

   147             break;

   148         case JMM_VMGLOBAL_ORIGIN_COMMAND_LINE:

   149             origin = vm_creation_origin;

   150             break;

   151         case JMM_VMGLOBAL_ORIGIN_MANAGEMENT:

   152             origin = mgmt_origin;

   153             break;

   154         case JMM_VMGLOBAL_ORIGIN_ENVIRON_VAR:

   155             origin = envvar_origin;

   156             break;

   157         case JMM_VMGLOBAL_ORIGIN_CONFIG_FILE:

   158             origin = config_file_origin;

   159             break;

   160         case JMM_VMGLOBAL_ORIGIN_ERGONOMIC:

   161             origin = ergo_origin;

   162             break;

   163         case JMM_VMGLOBAL_ORIGIN_ATTACH_ON_DEMAND:

   164             origin = attach_origin;

   165             break;

   166         case JMM_VMGLOBAL_ORIGIN_OTHER:

   167             origin = other_origin;

   168             break;

   169         default:

   170             // unknown origin

   171             origin = other_origin;

   172             break;

   173         }

   174         flag = JNU_NewObjectByName(env, class_name, signature, globals[i].name,

   175                                    valueObj, globals[i].writeable,

   176                                    globals[i].external, origin);

   177         if (flag == NULL) {

   178             free(globals);

   179             JNU_ThrowOutOfMemoryError(env, 0);

   180             return 0;

   181         }

   182         (*env)->SetObjectArrayElement(env, flags, index, flag);

   183         index++;

   184     }

   185 

   186     if (index != num_flags) {

   187         JNU_ThrowInternalError(env, "Number of Flag objects created unmatched");

   188         free(globals);

   189         return 0;

   190     }

   191 

   192     free(globals);

   193 

   194     /* return the number of Flag objects created */

   195     return num_flags;

   196 }

   197 

   198 JNIEXPORT void JNICALL

   199 Java_com_sun_management_internal_Flag_setLongValue

   200   (JNIEnv *env, jclass cls, jstring name, jlong value)

   201 {

   202    jvalue v;

   203    v.j = value;

   204 

   205    jmm_interface->SetVMGlobal(env, name, v);

   206 }

   207 

   208 JNIEXPORT void JNICALL

   209 Java_com_sun_management_internal_Flag_setDoubleValue

   210   (JNIEnv *env, jclass cls, jstring name, jdouble value)

   211 {

   212    jvalue v;

   213    v.d = value;

   214 

   215    jmm_interface->SetVMGlobal(env, name, v);

   216 }

   217 

   218 JNIEXPORT void JNICALL

   219 Java_com_sun_management_internal_Flag_setBooleanValue

   220   (JNIEnv *env, jclass cls, jstring name, jboolean value)

   221 {

   222    jvalue v;

   223    v.z = value;

   224 

   225    jmm_interface->SetVMGlobal(env, name, v);

   226 }

   227 

   228 JNIEXPORT void JNICALL

   229 Java_com_sun_management_internal_Flag_setStringValue

   230   (JNIEnv *env, jclass cls, jstring name, jstring value)

   231 {

   232    jvalue v;

   233    v.l = value;

   234 

   235    jmm_interface->SetVMGlobal(env, name, v);

   236 }