1 /*
   2  * Copyright (c) 1994, 2012, 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://bugreport.sun.com/bugreport/"
 103 #endif
 104 
 105 #define JAVA_MAX_SUPPORTED_VERSION 52
 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 #ifdef MACOSX
 210     if (sprops->awt_headless) {
 211         PUTPROP(props, "java.awt.headless", sprops->awt_headless);
 212     }
 213 #endif
 214 
 215     /* os properties */
 216     PUTPROP(props, "os.name", sprops->os_name);
 217     PUTPROP(props, "os.version", sprops->os_version);
 218     PUTPROP(props, "os.arch", sprops->os_arch);
 219 
 220 #ifdef JDK_ARCH_ABI_PROP_NAME
 221     PUTPROP(props, "sun.arch.abi", sprops->sun_arch_abi);
 222 #endif
 223 
 224     /* file system properties */
 225     PUTPROP(props, "file.separator", sprops->file_separator);
 226     PUTPROP(props, "path.separator", sprops->path_separator);
 227     PUTPROP(props, "line.separator", sprops->line_separator);
 228 
 229     /*
 230      *  user.language
 231      *  user.script, user.country, user.variant (if user's environment specifies them)
 232      *  file.encoding
 233      *  file.encoding.pkg
 234      */
 235     PUTPROP(props, "user.language", sprops->language);
 236     if (sprops->script) {
 237         PUTPROP(props, "user.script", sprops->script);
 238     }
 239     if (sprops->country) {
 240         PUTPROP(props, "user.country", sprops->country);
 241     }
 242     if (sprops->variant) {
 243         PUTPROP(props, "user.variant", sprops->variant);
 244     }
 245     PUTPROP(props, "file.encoding", sprops->encoding);
 246     PUTPROP(props, "sun.jnu.encoding", sprops->sun_jnu_encoding);
 247     if (sprops->sun_stdout_encoding != NULL) {
 248         PUTPROP(props, "sun.stdout.encoding", sprops->sun_stdout_encoding);
 249     }
 250     if (sprops->sun_stderr_encoding != NULL) {
 251         PUTPROP(props, "sun.stderr.encoding", sprops->sun_stderr_encoding);
 252     }
 253     PUTPROP(props, "file.encoding.pkg", "sun.io");
 254 
 255     /* unicode_encoding specifies the default endianness */
 256     PUTPROP(props, "sun.io.unicode.encoding", sprops->unicode_encoding);
 257     PUTPROP(props, "sun.cpu.isalist",
 258             (sprops->cpu_isalist ? sprops->cpu_isalist : ""));
 259     PUTPROP(props, "sun.cpu.endian",  sprops->cpu_endian);
 260 
 261 
 262 #ifdef MACOSX
 263     /* Proxy setting properties */
 264     if (sprops->httpProxyEnabled) {
 265         PUTPROP(props, "http.proxyHost", sprops->httpHost);
 266         PUTPROP(props, "http.proxyPort", sprops->httpPort);
 267     }
 268 
 269     if (sprops->httpsProxyEnabled) {
 270         PUTPROP(props, "https.proxyHost", sprops->httpsHost);
 271         PUTPROP(props, "https.proxyPort", sprops->httpsPort);
 272     }
 273 
 274     if (sprops->ftpProxyEnabled) {
 275         PUTPROP(props, "ftp.proxyHost", sprops->ftpHost);
 276         PUTPROP(props, "ftp.proxyPort", sprops->ftpPort);
 277     }
 278 
 279     if (sprops->socksProxyEnabled) {
 280         PUTPROP(props, "socksProxyHost", sprops->socksHost);
 281         PUTPROP(props, "socksProxyPort", sprops->socksPort);
 282     }
 283 
 284     if (sprops->gopherProxyEnabled) {
 285         // The gopher client is different in that it expects an 'is this set?' flag that the others don't.
 286         PUTPROP(props, "gopherProxySet", "true");
 287         PUTPROP(props, "gopherProxyHost", sprops->gopherHost);
 288         PUTPROP(props, "gopherProxyPort", sprops->gopherPort);
 289     } else {
 290         PUTPROP(props, "gopherProxySet", "false");
 291     }
 292 
 293     // Mac OS X only has a single proxy exception list which applies
 294     // to all protocols
 295     if (sprops->exceptionList) {
 296         PUTPROP(props, "http.nonProxyHosts", sprops->exceptionList);
 297         // HTTPS: implementation in jsse.jar uses http.nonProxyHosts
 298         PUTPROP(props, "ftp.nonProxyHosts", sprops->exceptionList);
 299         PUTPROP(props, "socksNonProxyHosts", sprops->exceptionList);
 300     }
 301 #endif
 302 
 303     /* !!! DO NOT call PUTPROP_ForPlatformNString before this line !!!
 304      * !!! I18n properties have not been set up yet !!!
 305      */
 306 
 307     /* Printing properties */
 308     /* Note: java.awt.printerjob is an implementation private property which
 309      * just happens to have a java.* name because it is referenced in
 310      * a java.awt class. It is the mechanism by which the implementation
 311      * finds the appropriate class in the JRE for the platform.
 312      * It is explicitly not designed to be overridden by clients as
 313      * a way of replacing the implementation class, and in any case
 314      * the mechanism by which the class is loaded is constrained to only
 315      * find and load classes that are part of the JRE.
 316      * This property may be removed if that mechanism is redesigned
 317      */
 318     PUTPROP(props, "java.awt.printerjob", sprops->printerJob);
 319 
 320     /* data model */
 321     if (sizeof(sprops) == 4) {
 322         sprops->data_model = "32";
 323     } else if (sizeof(sprops) == 8) {
 324         sprops->data_model = "64";
 325     } else {
 326         sprops->data_model = "unknown";
 327     }
 328     PUTPROP(props, "sun.arch.data.model",  \
 329                     sprops->data_model);
 330 
 331     /* patch level */
 332     PUTPROP(props, "sun.os.patch.level",  \
 333                     sprops->patch_level);
 334 
 335     /* Java2D properties */
 336     /* Note: java.awt.graphicsenv is an implementation private property which
 337      * just happens to have a java.* name because it is referenced in
 338      * a java.awt class. It is the mechanism by which the implementation
 339      * finds the appropriate class in the JRE for the platform.
 340      * It is explicitly not designed to be overridden by clients as
 341      * a way of replacing the implementation class, and in any case
 342      * the mechanism by which the class is loaded is constrained to only
 343      * find and load classes that are part of the JRE.
 344      * This property may be removed if that mechanism is redesigned
 345      */
 346     PUTPROP(props, "java.awt.graphicsenv", sprops->graphics_env);
 347     if (sprops->font_dir != NULL) {
 348         PUTPROP_ForPlatformNString(props,
 349                                    "sun.java2d.fontpath", sprops->font_dir);
 350     }
 351 
 352     PUTPROP_ForPlatformNString(props, "java.io.tmpdir", sprops->tmp_dir);
 353 
 354     PUTPROP_ForPlatformNString(props, "user.name", sprops->user_name);
 355     PUTPROP_ForPlatformNString(props, "user.home", sprops->user_home);
 356 
 357     PUTPROP(props, "user.timezone", sprops->timezone);
 358 
 359     PUTPROP_ForPlatformNString(props, "user.dir", sprops->user_dir);
 360 
 361     /* This is a sun. property as it is currently only set for Gnome and
 362      * Windows desktops.
 363      */
 364     if (sprops->desktop != NULL) {
 365         PUTPROP(props, "sun.desktop", sprops->desktop);
 366     }
 367 
 368     /*
 369      * unset "user.language", "user.script", "user.country", and "user.variant"
 370      * in order to tell whether the command line option "-DXXXX=YYYY" is
 371      * specified or not.  They will be reset in fillI18nProps() below.
 372      */
 373     REMOVEPROP(props, "user.language");
 374     REMOVEPROP(props, "user.script");
 375     REMOVEPROP(props, "user.country");
 376     REMOVEPROP(props, "user.variant");
 377     REMOVEPROP(props, "file.encoding");
 378 
 379     ret = JVM_InitProperties(env, props);
 380 
 381     /* Check the compatibility flag */
 382     GETPROP(props, "sun.locale.formatasdefault", jVMVal);
 383     if (jVMVal) {
 384         const char * val = (*env)->GetStringUTFChars(env, jVMVal, 0);
 385         fmtdefault = !strcmp(val, "true");
 386         (*env)->ReleaseStringUTFChars(env, jVMVal, val);
 387         (*env)->DeleteLocalRef(env, jVMVal);
 388     }
 389 
 390     /* reconstruct i18n related properties */
 391     fillI18nProps(env, props, "user.language", sprops->display_language,
 392         sprops->format_language, putID, getPropID);
 393     fillI18nProps(env, props, "user.script",
 394         sprops->display_script, sprops->format_script, putID, getPropID);
 395     fillI18nProps(env, props, "user.country",
 396         sprops->display_country, sprops->format_country, putID, getPropID);
 397     fillI18nProps(env, props, "user.variant",
 398         sprops->display_variant, sprops->format_variant, putID, getPropID);
 399     GETPROP(props, "file.encoding", jVMVal);
 400     if (jVMVal == NULL) {
 401 #ifdef MACOSX
 402         /*
 403          * Since sun_jnu_encoding is now hard-coded to UTF-8 on Mac, we don't
 404          * want to use it to overwrite file.encoding
 405          */
 406         PUTPROP(props, "file.encoding", sprops->encoding);
 407 #else
 408         if (fmtdefault) {
 409             PUTPROP(props, "file.encoding", sprops->encoding);
 410         } else {
 411             PUTPROP(props, "file.encoding", sprops->sun_jnu_encoding);
 412         }
 413 #endif
 414     } else {
 415         (*env)->DeleteLocalRef(env, jVMVal);
 416     }
 417 
 418     return ret;
 419 }
 420 
 421 /*
 422  * The following three functions implement setter methods for
 423  * java.lang.System.{in, out, err}. They are natively implemented
 424  * because they violate the semantics of the language (i.e. set final
 425  * variable).
 426  */
 427 JNIEXPORT void JNICALL
 428 Java_java_lang_System_setIn0(JNIEnv *env, jclass cla, jobject stream)
 429 {
 430     jfieldID fid =
 431         (*env)->GetStaticFieldID(env,cla,"in","Ljava/io/InputStream;");
 432     if (fid == 0)
 433         return;
 434     (*env)->SetStaticObjectField(env,cla,fid,stream);
 435 }
 436 
 437 JNIEXPORT void JNICALL
 438 Java_java_lang_System_setOut0(JNIEnv *env, jclass cla, jobject stream)
 439 {
 440     jfieldID fid =
 441         (*env)->GetStaticFieldID(env,cla,"out","Ljava/io/PrintStream;");
 442     if (fid == 0)
 443         return;
 444     (*env)->SetStaticObjectField(env,cla,fid,stream);
 445 }
 446 
 447 JNIEXPORT void JNICALL
 448 Java_java_lang_System_setErr0(JNIEnv *env, jclass cla, jobject stream)
 449 {
 450     jfieldID fid =
 451         (*env)->GetStaticFieldID(env,cla,"err","Ljava/io/PrintStream;");
 452     if (fid == 0)
 453         return;
 454     (*env)->SetStaticObjectField(env,cla,fid,stream);
 455 }
 456 
 457 static void cpchars(jchar *dst, char *src, int n)
 458 {
 459     int i;
 460     for (i = 0; i < n; i++) {
 461         dst[i] = src[i];
 462     }
 463 }
 464 
 465 JNIEXPORT jstring JNICALL
 466 Java_java_lang_System_mapLibraryName(JNIEnv *env, jclass ign, jstring libname)
 467 {
 468     int len;
 469     int prefix_len = (int) strlen(JNI_LIB_PREFIX);
 470     int suffix_len = (int) strlen(JNI_LIB_SUFFIX);
 471 
 472     jchar chars[256];
 473     if (libname == NULL) {
 474         JNU_ThrowNullPointerException(env, 0);
 475         return NULL;
 476     }
 477     len = (*env)->GetStringLength(env, libname);
 478     if (len > 240) {
 479         JNU_ThrowIllegalArgumentException(env, "name too long");
 480         return NULL;
 481     }
 482     cpchars(chars, JNI_LIB_PREFIX, prefix_len);
 483     (*env)->GetStringRegion(env, libname, 0, len, chars + prefix_len);
 484     len += prefix_len;
 485     cpchars(chars + len, JNI_LIB_SUFFIX, suffix_len);
 486     len += suffix_len;
 487 
 488     return (*env)->NewString(env, chars, len);
 489 }