1 /*
2 * Copyright (c) 1994, 2008, 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 <string.h>
27
28 #include "jni.h"
29 #include "jni_util.h"
30 #include "jvm.h"
31 #include "java_props.h"
32
33 #include "java_lang_System.h"
34
35 #define OBJ "Ljava/lang/Object;"
36
37 /* Only register the performance-critical methods */
38 static JNINativeMethod methods[] = {
39 {"currentTimeMillis", "()J", (void *)&JVM_CurrentTimeMillis},
40 {"nanoTime", "()J", (void *)&JVM_NanoTime},
41 {"arraycopy", "(" OBJ "I" OBJ "II)V", (void *)&JVM_ArrayCopy},
42 };
43
44 #undef OBJ
45
46 JNIEXPORT void JNICALL
47 Java_java_lang_System_registerNatives(JNIEnv *env, jclass cls)
48 {
49 (*env)->RegisterNatives(env, cls,
50 methods, sizeof(methods)/sizeof(methods[0]));
51 }
52
53 JNIEXPORT jint JNICALL
54 Java_java_lang_System_identityHashCode(JNIEnv *env, jobject this, jobject x)
55 {
56 return JVM_IHashCode(env, x);
57 }
58
59 #define PUTPROP(props, key, val) \
60 if (1) { \
61 jstring jkey = (*env)->NewStringUTF(env, key); \
62 jstring jval = (*env)->NewStringUTF(env, val); \
63 jobject r = (*env)->CallObjectMethod(env, props, putID, jkey, jval); \
64 if ((*env)->ExceptionOccurred(env)) return NULL; \
65 (*env)->DeleteLocalRef(env, jkey); \
66 (*env)->DeleteLocalRef(env, jval); \
67 (*env)->DeleteLocalRef(env, r); \
68 } else ((void) 0)
69
70 /* "key" is a char type string with only ASCII character in it.
71 "val" is a nchar (typedefed in java_props.h) type string */
72
73 #define PUTPROP_ForPlatformNString(props, key, val) \
74 if (1) { \
75 jstring jkey = (*env)->NewStringUTF(env, key); \
76 jstring jval = GetStringPlatform(env, val); \
77 jobject r = (*env)->CallObjectMethod(env, props, putID, jkey, jval); \
78 if ((*env)->ExceptionOccurred(env)) return NULL; \
79 (*env)->DeleteLocalRef(env, jkey); \
80 (*env)->DeleteLocalRef(env, jval); \
81 (*env)->DeleteLocalRef(env, r); \
82 } else ((void) 0)
83 #define REMOVEPROP(props, key) \
84 if (1) { \
85 jstring jkey = JNU_NewStringPlatform(env, key); \
86 jobject r = (*env)->CallObjectMethod(env, props, removeID, jkey); \
87 if ((*env)->ExceptionOccurred(env)) return NULL; \
88 (*env)->DeleteLocalRef(env, jkey); \
89 (*env)->DeleteLocalRef(env, r); \
90 } else ((void) 0)
91 #define GETPROP(props, key, jret) \
92 if (1) { \
93 jstring jkey = JNU_NewStringPlatform(env, key); \
94 jret = (*env)->CallObjectMethod(env, props, getPropID, jkey); \
95 if ((*env)->ExceptionOccurred(env)) return NULL; \
96 (*env)->DeleteLocalRef(env, jkey); \
97 } else ((void) 0)
98
99 #ifndef VENDOR /* Third party may overwrite this. */
100 #define VENDOR "Oracle Corporation"
101 #define VENDOR_URL "http://java.oracle.com/"
102 #define VENDOR_URL_BUG "http://java.sun.com/cgi-bin/bugreport.cgi"
103 #endif
104
105 #define JAVA_MAX_SUPPORTED_VERSION 51
106 #define JAVA_MAX_SUPPORTED_MINOR_VERSION 0
107
108 #ifdef JAVA_SPECIFICATION_VENDOR /* Third party may NOT overwrite this. */
109 #error "ERROR: No override of JAVA_SPECIFICATION_VENDOR is allowed"
110 #else
111 #define JAVA_SPECIFICATION_VENDOR "Oracle Corporation"
112 #endif
113
114 static int fmtdefault; // boolean value
115 jobject fillI18nProps(JNIEnv *env, jobject props, char *baseKey,
116 char *platformDispVal, char *platformFmtVal,
117 jmethodID putID, jmethodID getPropID) {
118 jstring jVMBaseVal = NULL;
119
120 GETPROP(props, baseKey, jVMBaseVal);
121 if (jVMBaseVal) {
122 // user specified the base property. there's nothing to do here.
123 (*env)->DeleteLocalRef(env, jVMBaseVal);
124 } else {
125 char buf[64];
126 jstring jVMVal = NULL;
127 const char *baseVal = "";
128
129 /* user.xxx base property */
130 if (fmtdefault) {
131 if (platformFmtVal) {
132 PUTPROP(props, baseKey, platformFmtVal);
133 baseVal = platformFmtVal;
134 }
135 } else {
136 if (platformDispVal) {
137 PUTPROP(props, baseKey, platformDispVal);
138 baseVal = platformDispVal;
139 }
140 }
141
142 /* user.xxx.display property */
143 jio_snprintf(buf, sizeof(buf), "%s.display", baseKey);
144 GETPROP(props, buf, jVMVal);
145 if (jVMVal == NULL) {
146 if (platformDispVal && (strcmp(baseVal, platformDispVal) != 0)) {
147 PUTPROP(props, buf, platformDispVal);
148 }
149 } else {
150 (*env)->DeleteLocalRef(env, jVMVal);
151 }
152
153 /* user.xxx.format property */
154 jio_snprintf(buf, sizeof(buf), "%s.format", baseKey);
155 GETPROP(props, buf, jVMVal);
156 if (jVMVal == NULL) {
157 if (platformFmtVal && (strcmp(baseVal, platformFmtVal) != 0)) {
158 PUTPROP(props, buf, platformFmtVal);
159 }
160 } else {
161 (*env)->DeleteLocalRef(env, jVMVal);
162 }
163 }
164
165 return NULL;
166 }
167
168 JNIEXPORT jobject JNICALL
169 Java_java_lang_System_initProperties(JNIEnv *env, jclass cla, jobject props)
170 {
171 char buf[128];
172 java_props_t *sprops = GetJavaProperties(env);
173 jmethodID putID = (*env)->GetMethodID(env,
174 (*env)->GetObjectClass(env, props),
175 "put",
176 "(Ljava/lang/Object;Ljava/lang/Object;)Ljava/lang/Object;");
177 jmethodID removeID = (*env)->GetMethodID(env,
178 (*env)->GetObjectClass(env, props),
179 "remove",
180 "(Ljava/lang/Object;)Ljava/lang/Object;");
181 jmethodID getPropID = (*env)->GetMethodID(env,
182 (*env)->GetObjectClass(env, props),
183 "getProperty",
184 "(Ljava/lang/String;)Ljava/lang/String;");
185 jobject ret = NULL;
186 jstring jVMVal = NULL;
187
188 if (sprops == NULL || putID == NULL ) return NULL;
189
190 PUTPROP(props, "java.specification.version",
191 JDK_MAJOR_VERSION "." JDK_MINOR_VERSION);
192 PUTPROP(props, "java.specification.name",
193 "Java Platform API Specification");
194 PUTPROP(props, "java.specification.vendor",
195 JAVA_SPECIFICATION_VENDOR);
196
197 PUTPROP(props, "java.version", RELEASE);
198 PUTPROP(props, "java.vendor", VENDOR);
199 PUTPROP(props, "java.vendor.url", VENDOR_URL);
200 PUTPROP(props, "java.vendor.url.bug", VENDOR_URL_BUG);
201
202 jio_snprintf(buf, sizeof(buf), "%d.%d", JAVA_MAX_SUPPORTED_VERSION,
203 JAVA_MAX_SUPPORTED_MINOR_VERSION);
204 PUTPROP(props, "java.class.version", buf);
205
206 if (sprops->awt_toolkit) {
207 PUTPROP(props, "awt.toolkit", sprops->awt_toolkit);
208 }
209
210 /* os properties */
211 PUTPROP(props, "os.name", sprops->os_name);
212 PUTPROP(props, "os.version", sprops->os_version);
213 PUTPROP(props, "os.arch", sprops->os_arch);
214
215 /* file system properties */
216 PUTPROP(props, "file.separator", sprops->file_separator);
217 PUTPROP(props, "path.separator", sprops->path_separator);
218 PUTPROP(props, "line.separator", sprops->line_separator);
219
220 /*
221 * user.language
222 * user.script, user.country, user.variant (if user's environment specifies them)
223 * file.encoding
224 * file.encoding.pkg
225 */
226 PUTPROP(props, "user.language", sprops->language);
227 if (sprops->script) {
228 PUTPROP(props, "user.script", sprops->script);
229 }
230 if (sprops->country) {
231 PUTPROP(props, "user.country", sprops->country);
232 }
233 if (sprops->variant) {
234 PUTPROP(props, "user.variant", sprops->variant);
235 }
236 PUTPROP(props, "file.encoding", sprops->encoding);
237 PUTPROP(props, "sun.jnu.encoding", sprops->sun_jnu_encoding);
238 PUTPROP(props, "file.encoding.pkg", "sun.io");
239 /* unicode_encoding specifies the default endianness */
240 PUTPROP(props, "sun.io.unicode.encoding", sprops->unicode_encoding);
241 PUTPROP(props, "sun.cpu.isalist",
242 (sprops->cpu_isalist ? sprops->cpu_isalist : ""));
243 PUTPROP(props, "sun.cpu.endian", sprops->cpu_endian);
244
245 /* !!! DO NOT call PUTPROP_ForPlatformNString before this line !!!
246 * !!! I18n properties have not been set up yet !!!
247 */
248
249 /* Printing properties */
250 /* Note: java.awt.printerjob is an implementation private property which
251 * just happens to have a java.* name because it is referenced in
252 * a java.awt class. It is the mechanism by which the implementation
253 * finds the appropriate class in the JRE for the platform.
254 * It is explicitly not designed to be overridden by clients as
255 * a way of replacing the implementation class, and in any case
256 * the mechanism by which the class is loaded is constrained to only
257 * find and load classes that are part of the JRE.
258 * This property may be removed if that mechanism is redesigned
259 */
260 PUTPROP(props, "java.awt.printerjob", sprops->printerJob);
261
262 /* data model */
263 if (sizeof(sprops) == 4) {
264 sprops->data_model = "32";
265 } else if (sizeof(sprops) == 8) {
266 sprops->data_model = "64";
267 } else {
268 sprops->data_model = "unknown";
269 }
270 PUTPROP(props, "sun.arch.data.model", \
271 sprops->data_model);
272
273 /* patch level */
274 PUTPROP(props, "sun.os.patch.level", \
275 sprops->patch_level);
276
277 /* Java2D properties */
278 /* Note: java.awt.graphicsenv is an implementation private property which
279 * just happens to have a java.* name because it is referenced in
280 * a java.awt class. It is the mechanism by which the implementation
281 * finds the appropriate class in the JRE for the platform.
282 * It is explicitly not designed to be overridden by clients as
283 * a way of replacing the implementation class, and in any case
284 * the mechanism by which the class is loaded is constrained to only
285 * find and load classes that are part of the JRE.
286 * This property may be removed if that mechanism is redesigned
287 */
288 PUTPROP(props, "java.awt.graphicsenv", sprops->graphics_env);
289 if (sprops->font_dir != NULL) {
290 PUTPROP_ForPlatformNString(props,
291 "sun.java2d.fontpath", sprops->font_dir);
292 }
293
294 PUTPROP_ForPlatformNString(props, "java.io.tmpdir", sprops->tmp_dir);
295
296 PUTPROP_ForPlatformNString(props, "user.name", sprops->user_name);
297 PUTPROP_ForPlatformNString(props, "user.home", sprops->user_home);
298
299 PUTPROP(props, "user.timezone", sprops->timezone);
300
301 PUTPROP_ForPlatformNString(props, "user.dir", sprops->user_dir);
302
303 /* This is a sun. property as it is currently only set for Gnome and
304 * Windows desktops.
305 */
306 if (sprops->desktop != NULL) {
307 PUTPROP(props, "sun.desktop", sprops->desktop);
308 }
309
310 /*
311 * unset "user.language", "user.script", "user.country", and "user.variant"
312 * in order to tell whether the command line option "-DXXXX=YYYY" is
313 * specified or not. They will be reset in fillI18nProps() below.
314 */
315 REMOVEPROP(props, "user.language");
316 REMOVEPROP(props, "user.script");
317 REMOVEPROP(props, "user.country");
318 REMOVEPROP(props, "user.variant");
319 REMOVEPROP(props, "file.encoding");
320
321 ret = JVM_InitProperties(env, props);
322
323 /* Check the compatibility flag */
324 GETPROP(props, "sun.locale.formatasdefault", jVMVal);
325 if (jVMVal) {
326 const char * val = (*env)->GetStringUTFChars(env, jVMVal, 0);
327 fmtdefault = !strcmp(val, "true");
328 (*env)->ReleaseStringUTFChars(env, jVMVal, val);
329 (*env)->DeleteLocalRef(env, jVMVal);
330 }
331
332 /* reconstruct i18n related properties */
333 fillI18nProps(env, props, "user.language", sprops->display_language,
334 sprops->format_language, putID, getPropID);
335 fillI18nProps(env, props, "user.script",
336 sprops->display_script, sprops->format_script, putID, getPropID);
337 fillI18nProps(env, props, "user.country",
338 sprops->display_country, sprops->format_country, putID, getPropID);
339 fillI18nProps(env, props, "user.variant",
340 sprops->display_variant, sprops->format_variant, putID, getPropID);
341 GETPROP(props, "file.encoding", jVMVal);
342 if (jVMVal == NULL) {
343 if (fmtdefault) {
344 PUTPROP(props, "file.encoding", sprops->encoding);
345 } else {
346 PUTPROP(props, "file.encoding", sprops->sun_jnu_encoding);
347 }
348 } else {
349 (*env)->DeleteLocalRef(env, jVMVal);
350 }
351
352 return ret;
353 }
354
355 /*
356 * The following three functions implement setter methods for
357 * java.lang.System.{in, out, err}. They are natively implemented
358 * because they violate the semantics of the language (i.e. set final
359 * variable).
360 */
361 JNIEXPORT void JNICALL
362 Java_java_lang_System_setIn0(JNIEnv *env, jclass cla, jobject stream)
363 {
364 jfieldID fid =
365 (*env)->GetStaticFieldID(env,cla,"in","Ljava/io/InputStream;");
366 if (fid == 0)
367 return;
368 (*env)->SetStaticObjectField(env,cla,fid,stream);
369 }
370
371 JNIEXPORT void JNICALL
372 Java_java_lang_System_setOut0(JNIEnv *env, jclass cla, jobject stream)
373 {
374 jfieldID fid =
375 (*env)->GetStaticFieldID(env,cla,"out","Ljava/io/PrintStream;");
376 if (fid == 0)
377 return;
378 (*env)->SetStaticObjectField(env,cla,fid,stream);
379 }
380
381 JNIEXPORT void JNICALL
382 Java_java_lang_System_setErr0(JNIEnv *env, jclass cla, jobject stream)
383 {
384 jfieldID fid =
385 (*env)->GetStaticFieldID(env,cla,"err","Ljava/io/PrintStream;");
386 if (fid == 0)
387 return;
388 (*env)->SetStaticObjectField(env,cla,fid,stream);
389 }
390
391 static void cpchars(jchar *dst, char *src, int n)
392 {
393 int i;
394 for (i = 0; i < n; i++) {
395 dst[i] = src[i];
396 }
397 }
398
399 JNIEXPORT jstring JNICALL
400 Java_java_lang_System_mapLibraryName(JNIEnv *env, jclass ign, jstring libname)
401 {
402 int len;
403 int prefix_len = (int) strlen(JNI_LIB_PREFIX);
404 int suffix_len = (int) strlen(JNI_LIB_SUFFIX);
405
406 jchar chars[256];
407 if (libname == NULL) {
408 JNU_ThrowNullPointerException(env, 0);
409 return NULL;
410 }
411 len = (*env)->GetStringLength(env, libname);
412 if (len > 240) {
413 JNU_ThrowIllegalArgumentException(env, "name too long");
414 return NULL;
415 }
416 cpchars(chars, JNI_LIB_PREFIX, prefix_len);
417 (*env)->GetStringRegion(env, libname, 0, len, chars + prefix_len);
418 len += prefix_len;
419 cpchars(chars + len, JNI_LIB_SUFFIX, suffix_len);
420 len += suffix_len;
421
422 return (*env)->NewString(env, chars, len);
423 }