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
33static jobject default_origin = NULL;
34static jobject vm_creation_origin = NULL;
35static jobject mgmt_origin = NULL;
36static jobject envvar_origin = NULL;
37static jobject config_file_origin = NULL;
38static jobject ergo_origin = NULL;
39static jobject attach_origin = NULL;
40static jobject other_origin = NULL;
41
42JNIEXPORT jint JNICALL
43Java_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
51JNIEXPORT jobjectArray JNICALL
52  Java_com_sun_management_internal_Flag_getAllFlagNames
53(JNIEnv *env, jclass cls)
54{
55  return jmm_interface->GetVMGlobalNames(env);
56}
57
58static 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
68JNIEXPORT void JNICALL
69Java_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
82JNIEXPORT jint JNICALL
83Java_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
145        if (valueObj == NULL && globals[i].type != JMM_VMGLOBAL_TYPE_JSTRING) {
146            free(globals);
147            JNU_ThrowOutOfMemoryError(env, 0);
148            return 0;
149        }
150
151        switch (globals[i].origin) {
152        case JMM_VMGLOBAL_ORIGIN_DEFAULT:
153            origin = default_origin;
154            break;
155        case JMM_VMGLOBAL_ORIGIN_COMMAND_LINE:
156            origin = vm_creation_origin;
157            break;
158        case JMM_VMGLOBAL_ORIGIN_MANAGEMENT:
159            origin = mgmt_origin;
160            break;
161        case JMM_VMGLOBAL_ORIGIN_ENVIRON_VAR:
162            origin = envvar_origin;
163            break;
164        case JMM_VMGLOBAL_ORIGIN_CONFIG_FILE:
165            origin = config_file_origin;
166            break;
167        case JMM_VMGLOBAL_ORIGIN_ERGONOMIC:
168            origin = ergo_origin;
169            break;
170        case JMM_VMGLOBAL_ORIGIN_ATTACH_ON_DEMAND:
171            origin = attach_origin;
172            break;
173        case JMM_VMGLOBAL_ORIGIN_OTHER:
174            origin = other_origin;
175            break;
176        default:
177            // unknown origin
178            origin = other_origin;
179            break;
180        }
181        flag = JNU_NewObjectByName(env, class_name, signature, globals[i].name,
182                                   valueObj, globals[i].writeable,
183                                   globals[i].external, origin);
184        if (flag == NULL) {
185            free(globals);
186            JNU_ThrowOutOfMemoryError(env, 0);
187            return 0;
188        }
189        (*env)->SetObjectArrayElement(env, flags, index, flag);
190        index++;
191    }
192
193    if (index != num_flags) {
194        JNU_ThrowInternalError(env, "Number of Flag objects created unmatched");
195        free(globals);
196        return 0;
197    }
198
199    free(globals);
200
201    /* return the number of Flag objects created */
202    return num_flags;
203}
204
205JNIEXPORT void JNICALL
206Java_com_sun_management_internal_Flag_setLongValue
207  (JNIEnv *env, jclass cls, jstring name, jlong value)
208{
209   jvalue v;
210   v.j = value;
211
212   jmm_interface->SetVMGlobal(env, name, v);
213}
214
215JNIEXPORT void JNICALL
216Java_com_sun_management_internal_Flag_setDoubleValue
217  (JNIEnv *env, jclass cls, jstring name, jdouble value)
218{
219   jvalue v;
220   v.d = value;
221
222   jmm_interface->SetVMGlobal(env, name, v);
223}
224
225JNIEXPORT void JNICALL
226Java_com_sun_management_internal_Flag_setBooleanValue
227  (JNIEnv *env, jclass cls, jstring name, jboolean value)
228{
229   jvalue v;
230   v.z = value;
231
232   jmm_interface->SetVMGlobal(env, name, v);
233}
234
235JNIEXPORT void JNICALL
236Java_com_sun_management_internal_Flag_setStringValue
237  (JNIEnv *env, jclass cls, jstring name, jstring value)
238{
239   jvalue v;
240   v.l = value;
241
242   jmm_interface->SetVMGlobal(env, name, v);
243}
244