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
Java_com_sun_management_internal_Flag_getInternalFlagCount(JNIEnv * env,jclass cls)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
Java_com_sun_management_internal_Flag_getAllFlagNames(JNIEnv * env,jclass cls)52   Java_com_sun_management_internal_Flag_getAllFlagNames
53 (JNIEnv *env, jclass cls)
54 {
55   return jmm_interface->GetVMGlobalNames(env);
56 }
57 
find_origin_constant(JNIEnv * env,const char * enum_name)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
Java_com_sun_management_internal_Flag_initialize(JNIEnv * env,jclass cls)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
Java_com_sun_management_internal_Flag_getFlags(JNIEnv * env,jclass cls,jobjectArray names,jobjectArray flags,jint count)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 
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 
205 JNIEXPORT void JNICALL
Java_com_sun_management_internal_Flag_setLongValue(JNIEnv * env,jclass cls,jstring name,jlong value)206 Java_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 
215 JNIEXPORT void JNICALL
Java_com_sun_management_internal_Flag_setDoubleValue(JNIEnv * env,jclass cls,jstring name,jdouble value)216 Java_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 
225 JNIEXPORT void JNICALL
Java_com_sun_management_internal_Flag_setBooleanValue(JNIEnv * env,jclass cls,jstring name,jboolean value)226 Java_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 
235 JNIEXPORT void JNICALL
Java_com_sun_management_internal_Flag_setStringValue(JNIEnv * env,jclass cls,jstring name,jstring value)236 Java_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