1 /*
   2  * Copyright (c) 1994, 2017, 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, jval;                                          \
  62         jobject r;                                                   \
  63         jkey = (*env)->NewStringUTF(env, key);                       \
  64         if (jkey == NULL) return NULL;                               \
  65         jval = (*env)->NewStringUTF(env, val);                       \
  66         if (jval == NULL) return NULL;                               \
  67         r = (*env)->CallObjectMethod(env, props, putID, jkey, jval); \
  68         if ((*env)->ExceptionOccurred(env)) return NULL;             \
  69         (*env)->DeleteLocalRef(env, jkey);                           \
  70         (*env)->DeleteLocalRef(env, jval);                           \
  71         (*env)->DeleteLocalRef(env, r);                              \
  72     } else ((void) 0)
  73 
  74 /*  "key" is a char type string with only ASCII character in it.
  75     "val" is a nchar (typedefed in java_props.h) type string  */
  76 
  77 #define PUTPROP_ForPlatformNString(props, key, val)                  \
  78     if (1) {                                                         \
  79         jstring jkey, jval;                                          \
  80         jobject r;                                                   \
  81         jkey = (*env)->NewStringUTF(env, key);                       \
  82         if (jkey == NULL) return NULL;                               \
  83         jval = GetStringPlatform(env, val);                          \
  84         if (jval == NULL) return NULL;                               \
  85         r = (*env)->CallObjectMethod(env, props, putID, jkey, jval); \
  86         if ((*env)->ExceptionOccurred(env)) return NULL;             \
  87         (*env)->DeleteLocalRef(env, jkey);                           \
  88         (*env)->DeleteLocalRef(env, jval);                           \
  89         (*env)->DeleteLocalRef(env, r);                              \
  90     } else ((void) 0)
  91 #define REMOVEPROP(props, key)                                    \
  92     if (1) {                                                      \
  93         jstring jkey;                                             \
  94         jobject r;                                                \
  95         jkey = JNU_NewStringPlatform(env, key);                   \
  96         if (jkey == NULL) return NULL;                            \
  97         r = (*env)->CallObjectMethod(env, props, removeID, jkey); \
  98         if ((*env)->ExceptionOccurred(env)) return NULL;          \
  99         (*env)->DeleteLocalRef(env, jkey);                        \
 100         (*env)->DeleteLocalRef(env, r);                           \
 101     } else ((void) 0)
 102 #define GETPROP(props, key, jret)                                     \
 103     if (1) {                                                          \
 104         jstring jkey = JNU_NewStringPlatform(env, key);               \
 105         if (jkey == NULL) return NULL;                                \
 106         jret = (*env)->CallObjectMethod(env, props, getPropID, jkey); \
 107         if ((*env)->ExceptionOccurred(env)) return NULL;              \
 108         (*env)->DeleteLocalRef(env, jkey);                            \
 109     } else ((void) 0)
 110 
 111 /* Third party may overwrite these values. */
 112 #ifndef VENDOR
 113 #define VENDOR "Oracle Corporation"
 114 #endif
 115 #ifndef VENDOR_URL
 116 #define VENDOR_URL "http://java.oracle.com/"
 117 #endif
 118 #ifndef VENDOR_URL_BUG
 119 #define VENDOR_URL_BUG "http://bugreport.java.com/bugreport/"
 120 #endif
 121 
 122 #ifdef JAVA_SPECIFICATION_VENDOR /* Third party may NOT overwrite this. */
 123   #error "ERROR: No override of JAVA_SPECIFICATION_VENDOR is allowed"
 124 #else
 125   #define JAVA_SPECIFICATION_VENDOR "Oracle Corporation"
 126 #endif
 127 
 128 static int fmtdefault; // boolean value
 129 jobject fillI18nProps(JNIEnv *env, jobject props, char *baseKey,
 130                       char *platformDispVal, char *platformFmtVal,
 131                       jmethodID putID, jmethodID getPropID) {
 132     jstring jVMBaseVal = NULL;
 133 
 134     GETPROP(props, baseKey, jVMBaseVal);
 135     if (jVMBaseVal) {
 136         // user specified the base property.  there's nothing to do here.
 137         (*env)->DeleteLocalRef(env, jVMBaseVal);
 138     } else {
 139         char buf[64];
 140         jstring jVMVal = NULL;
 141         const char *baseVal = "";
 142 
 143         /* user.xxx base property */
 144         if (fmtdefault) {
 145             if (platformFmtVal) {
 146                 PUTPROP(props, baseKey, platformFmtVal);
 147                 baseVal = platformFmtVal;
 148             }
 149         } else {
 150             if (platformDispVal) {
 151                 PUTPROP(props, baseKey, platformDispVal);
 152                 baseVal = platformDispVal;
 153             }
 154         }
 155 
 156         /* user.xxx.display property */
 157         jio_snprintf(buf, sizeof(buf), "%s.display", baseKey);
 158         GETPROP(props, buf, jVMVal);
 159         if (jVMVal == NULL) {
 160             if (platformDispVal && (strcmp(baseVal, platformDispVal) != 0)) {
 161                 PUTPROP(props, buf, platformDispVal);
 162             }
 163         } else {
 164             (*env)->DeleteLocalRef(env, jVMVal);
 165         }
 166 
 167         /* user.xxx.format property */
 168         jio_snprintf(buf, sizeof(buf), "%s.format", baseKey);
 169         GETPROP(props, buf, jVMVal);
 170         if (jVMVal == NULL) {
 171             if (platformFmtVal && (strcmp(baseVal, platformFmtVal) != 0)) {
 172                 PUTPROP(props, buf, platformFmtVal);
 173             }
 174         } else {
 175             (*env)->DeleteLocalRef(env, jVMVal);
 176         }
 177     }
 178 
 179     return NULL;
 180 }
 181 
 182 JNIEXPORT jobject JNICALL
 183 Java_java_lang_System_initProperties(JNIEnv *env, jclass cla, jobject props)
 184 {
 185     char buf[128];
 186     java_props_t *sprops;
 187     jmethodID putID, removeID, getPropID;
 188     jobject ret = NULL;
 189     jstring jVMVal = NULL;
 190 
 191     if ((*env)->EnsureLocalCapacity(env, 50) < 0) {
 192         return NULL;
 193     }
 194     sprops = GetJavaProperties(env);
 195     CHECK_NULL_RETURN(sprops, NULL);
 196 
 197     putID = (*env)->GetMethodID(env,
 198                                 (*env)->GetObjectClass(env, props),
 199                                 "put",
 200             "(Ljava/lang/Object;Ljava/lang/Object;)Ljava/lang/Object;");
 201     CHECK_NULL_RETURN(putID, NULL);
 202 
 203     removeID = (*env)->GetMethodID(env,
 204                                    (*env)->GetObjectClass(env, props),
 205                                    "remove",
 206             "(Ljava/lang/Object;)Ljava/lang/Object;");
 207     CHECK_NULL_RETURN(removeID, NULL);
 208 
 209     getPropID = (*env)->GetMethodID(env,
 210                                     (*env)->GetObjectClass(env, props),
 211                                     "getProperty",
 212             "(Ljava/lang/String;)Ljava/lang/String;");
 213     CHECK_NULL_RETURN(getPropID, NULL);
 214 
 215     PUTPROP(props, "java.specification.version",
 216             VERSION_SPECIFICATION);
 217     PUTPROP(props, "java.specification.name",
 218             "Java Platform API Specification");
 219     PUTPROP(props, "java.specification.vendor",
 220             JAVA_SPECIFICATION_VENDOR);
 221 
 222     PUTPROP(props, "java.version", VERSION_SHORT);
 223     PUTPROP(props, "java.vendor", VENDOR);
 224     PUTPROP(props, "java.vendor.url", VENDOR_URL);
 225     PUTPROP(props, "java.vendor.url.bug", VENDOR_URL_BUG);
 226 
 227     jio_snprintf(buf, sizeof(buf), "%d.%d", JVM_CLASSFILE_MAJOR_VERSION,
 228                                             JVM_CLASSFILE_MINOR_VERSION);
 229     PUTPROP(props, "java.class.version", buf);
 230 
 231     if (sprops->awt_toolkit) {
 232         PUTPROP(props, "awt.toolkit", sprops->awt_toolkit);
 233     }
 234 #ifdef MACOSX
 235     if (sprops->awt_headless) {
 236         PUTPROP(props, "java.awt.headless", sprops->awt_headless);
 237     }
 238 #endif
 239 
 240     /* os properties */
 241     PUTPROP(props, "os.name", sprops->os_name);
 242     PUTPROP(props, "os.version", sprops->os_version);
 243     PUTPROP(props, "os.arch", sprops->os_arch);
 244 
 245 #ifdef JDK_ARCH_ABI_PROP_NAME
 246     PUTPROP(props, "sun.arch.abi", sprops->sun_arch_abi);
 247 #endif
 248 
 249     /* file system properties */
 250     PUTPROP(props, "file.separator", sprops->file_separator);
 251     PUTPROP(props, "path.separator", sprops->path_separator);
 252     PUTPROP(props, "line.separator", sprops->line_separator);
 253 
 254     /*
 255      *  user.language
 256      *  user.script, user.country, user.variant (if user's environment specifies them)
 257      *  file.encoding
 258      *  file.encoding.pkg
 259      */
 260     PUTPROP(props, "user.language", sprops->language);
 261     if (sprops->script) {
 262         PUTPROP(props, "user.script", sprops->script);
 263     }
 264     if (sprops->country) {
 265         PUTPROP(props, "user.country", sprops->country);
 266     }
 267     if (sprops->variant) {
 268         PUTPROP(props, "user.variant", sprops->variant);
 269     }
 270     PUTPROP(props, "file.encoding", sprops->encoding);
 271     PUTPROP(props, "sun.jnu.encoding", sprops->sun_jnu_encoding);
 272     if (sprops->sun_stdout_encoding != NULL) {
 273         PUTPROP(props, "sun.stdout.encoding", sprops->sun_stdout_encoding);
 274     }
 275     if (sprops->sun_stderr_encoding != NULL) {
 276         PUTPROP(props, "sun.stderr.encoding", sprops->sun_stderr_encoding);
 277     }
 278     PUTPROP(props, "file.encoding.pkg", "sun.io");
 279 
 280     /* unicode_encoding specifies the default endianness */
 281     PUTPROP(props, "sun.io.unicode.encoding", sprops->unicode_encoding);
 282     PUTPROP(props, "sun.cpu.isalist",
 283             (sprops->cpu_isalist ? sprops->cpu_isalist : ""));
 284     PUTPROP(props, "sun.cpu.endian",  sprops->cpu_endian);
 285 
 286 
 287 #ifdef MACOSX
 288     /* Proxy setting properties */
 289     if (sprops->httpProxyEnabled) {
 290         PUTPROP(props, "http.proxyHost", sprops->httpHost);
 291         PUTPROP(props, "http.proxyPort", sprops->httpPort);
 292     }
 293 
 294     if (sprops->httpsProxyEnabled) {
 295         PUTPROP(props, "https.proxyHost", sprops->httpsHost);
 296         PUTPROP(props, "https.proxyPort", sprops->httpsPort);
 297     }
 298 
 299     if (sprops->ftpProxyEnabled) {
 300         PUTPROP(props, "ftp.proxyHost", sprops->ftpHost);
 301         PUTPROP(props, "ftp.proxyPort", sprops->ftpPort);
 302     }
 303 
 304     if (sprops->socksProxyEnabled) {
 305         PUTPROP(props, "socksProxyHost", sprops->socksHost);
 306         PUTPROP(props, "socksProxyPort", sprops->socksPort);
 307     }
 308 
 309     if (sprops->gopherProxyEnabled) {
 310         // The gopher client is different in that it expects an 'is this set?' flag that the others don't.
 311         PUTPROP(props, "gopherProxySet", "true");
 312         PUTPROP(props, "gopherProxyHost", sprops->gopherHost);
 313         PUTPROP(props, "gopherProxyPort", sprops->gopherPort);
 314     } else {
 315         PUTPROP(props, "gopherProxySet", "false");
 316     }
 317 
 318     // Mac OS X only has a single proxy exception list which applies
 319     // to all protocols
 320     if (sprops->exceptionList) {
 321         PUTPROP(props, "http.nonProxyHosts", sprops->exceptionList);
 322         PUTPROP(props, "ftp.nonProxyHosts", sprops->exceptionList);
 323         PUTPROP(props, "socksNonProxyHosts", sprops->exceptionList);
 324     }
 325 #endif
 326 
 327     /* !!! DO NOT call PUTPROP_ForPlatformNString before this line !!!
 328      * !!! I18n properties have not been set up yet !!!
 329      */
 330 
 331     /* Printing properties */
 332     /* Note: java.awt.printerjob is an implementation private property which
 333      * just happens to have a java.* name because it is referenced in
 334      * a java.awt class. It is the mechanism by which the implementation
 335      * finds the appropriate class in the JRE for the platform.
 336      * It is explicitly not designed to be overridden by clients as
 337      * a way of replacing the implementation class, and in any case
 338      * the mechanism by which the class is loaded is constrained to only
 339      * find and load classes that are part of the JRE.
 340      * This property may be removed if that mechanism is redesigned
 341      */
 342     PUTPROP(props, "java.awt.printerjob", sprops->printerJob);
 343 
 344     /* data model */
 345     if (sizeof(sprops) == 4) {
 346         sprops->data_model = "32";
 347     } else if (sizeof(sprops) == 8) {
 348         sprops->data_model = "64";
 349     } else {
 350         sprops->data_model = "unknown";
 351     }
 352     PUTPROP(props, "sun.arch.data.model",  \
 353                     sprops->data_model);
 354 
 355     /* patch level */
 356     PUTPROP(props, "sun.os.patch.level",  \
 357                     sprops->patch_level);
 358 
 359     /* Java2D properties */
 360     /* Note: java.awt.graphicsenv is an implementation private property which
 361      * just happens to have a java.* name because it is referenced in
 362      * a java.awt class. It is the mechanism by which the implementation
 363      * finds the appropriate class in the JRE for the platform.
 364      * It is explicitly not designed to be overridden by clients as
 365      * a way of replacing the implementation class, and in any case
 366      * the mechanism by which the class is loaded is constrained to only
 367      * find and load classes that are part of the JRE.
 368      * This property may be removed if that mechanism is redesigned
 369      */
 370     PUTPROP(props, "java.awt.graphicsenv", sprops->graphics_env);
 371     if (sprops->font_dir != NULL) {
 372         PUTPROP_ForPlatformNString(props,
 373                                    "sun.java2d.fontpath", sprops->font_dir);
 374     }
 375 
 376     PUTPROP_ForPlatformNString(props, "java.io.tmpdir", sprops->tmp_dir);
 377 
 378     PUTPROP_ForPlatformNString(props, "user.name", sprops->user_name);
 379     PUTPROP_ForPlatformNString(props, "user.home", sprops->user_home);
 380 
 381     PUTPROP(props, "user.timezone", sprops->timezone);
 382 
 383     PUTPROP_ForPlatformNString(props, "user.dir", sprops->user_dir);
 384 
 385     /* This is a sun. property as it is currently only set for Gnome and
 386      * Windows desktops.
 387      */
 388     if (sprops->desktop != NULL) {
 389         PUTPROP(props, "sun.desktop", sprops->desktop);
 390     }
 391 
 392     /*
 393      * unset "user.language", "user.script", "user.country", and "user.variant"
 394      * in order to tell whether the command line option "-DXXXX=YYYY" is
 395      * specified or not.  They will be reset in fillI18nProps() below.
 396      */
 397     REMOVEPROP(props, "user.language");
 398     REMOVEPROP(props, "user.script");
 399     REMOVEPROP(props, "user.country");
 400     REMOVEPROP(props, "user.variant");
 401     REMOVEPROP(props, "file.encoding");
 402 
 403     ret = JVM_InitProperties(env, props);
 404 
 405     /* Check the compatibility flag */
 406     GETPROP(props, "sun.locale.formatasdefault", jVMVal);
 407     if (jVMVal) {
 408         const char * val = (*env)->GetStringUTFChars(env, jVMVal, 0);
 409         CHECK_NULL_RETURN(val, NULL);
 410         fmtdefault = !strcmp(val, "true");
 411         (*env)->ReleaseStringUTFChars(env, jVMVal, val);
 412         (*env)->DeleteLocalRef(env, jVMVal);
 413     }
 414 
 415     /* reconstruct i18n related properties */
 416     fillI18nProps(env, props, "user.language", sprops->display_language,
 417         sprops->format_language, putID, getPropID);
 418     fillI18nProps(env, props, "user.script",
 419         sprops->display_script, sprops->format_script, putID, getPropID);
 420     fillI18nProps(env, props, "user.country",
 421         sprops->display_country, sprops->format_country, putID, getPropID);
 422     fillI18nProps(env, props, "user.variant",
 423         sprops->display_variant, sprops->format_variant, putID, getPropID);
 424     GETPROP(props, "file.encoding", jVMVal);
 425     if (jVMVal == NULL) {
 426 #ifdef MACOSX
 427         /*
 428          * Since sun_jnu_encoding is now hard-coded to UTF-8 on Mac, we don't
 429          * want to use it to overwrite file.encoding
 430          */
 431         PUTPROP(props, "file.encoding", sprops->encoding);
 432 #else
 433         if (fmtdefault) {
 434             PUTPROP(props, "file.encoding", sprops->encoding);
 435         } else {
 436             PUTPROP(props, "file.encoding", sprops->sun_jnu_encoding);
 437         }
 438 #endif
 439     } else {
 440         (*env)->DeleteLocalRef(env, jVMVal);
 441     }
 442 
 443     return ret;
 444 }
 445 
 446 /*
 447  * The following three functions implement setter methods for
 448  * java.lang.System.{in, out, err}. They are natively implemented
 449  * because they violate the semantics of the language (i.e. set final
 450  * variable).
 451  */
 452 JNIEXPORT void JNICALL
 453 Java_java_lang_System_setIn0(JNIEnv *env, jclass cla, jobject stream)
 454 {
 455     jfieldID fid =
 456         (*env)->GetStaticFieldID(env,cla,"in","Ljava/io/InputStream;");
 457     if (fid == 0)
 458         return;
 459     (*env)->SetStaticObjectField(env,cla,fid,stream);
 460 }
 461 
 462 JNIEXPORT void JNICALL
 463 Java_java_lang_System_setOut0(JNIEnv *env, jclass cla, jobject stream)
 464 {
 465     jfieldID fid =
 466         (*env)->GetStaticFieldID(env,cla,"out","Ljava/io/PrintStream;");
 467     if (fid == 0)
 468         return;
 469     (*env)->SetStaticObjectField(env,cla,fid,stream);
 470 }
 471 
 472 JNIEXPORT void JNICALL
 473 Java_java_lang_System_setErr0(JNIEnv *env, jclass cla, jobject stream)
 474 {
 475     jfieldID fid =
 476         (*env)->GetStaticFieldID(env,cla,"err","Ljava/io/PrintStream;");
 477     if (fid == 0)
 478         return;
 479     (*env)->SetStaticObjectField(env,cla,fid,stream);
 480 }
 481 
 482 static void cpchars(jchar *dst, char *src, int n)
 483 {
 484     int i;
 485     for (i = 0; i < n; i++) {
 486         dst[i] = src[i];
 487     }
 488 }
 489 
 490 JNIEXPORT jstring JNICALL
 491 Java_java_lang_System_mapLibraryName(JNIEnv *env, jclass ign, jstring libname)
 492 {
 493     int len;
 494     int prefix_len = (int) strlen(JNI_LIB_PREFIX);
 495     int suffix_len = (int) strlen(JNI_LIB_SUFFIX);
 496 
 497     jchar chars[256];
 498     if (libname == NULL) {
 499         JNU_ThrowNullPointerException(env, 0);
 500         return NULL;
 501     }
 502     len = (*env)->GetStringLength(env, libname);
 503     if (len > 240) {
 504         JNU_ThrowIllegalArgumentException(env, "name too long");
 505         return NULL;
 506     }
 507     cpchars(chars, JNI_LIB_PREFIX, prefix_len);
 508     (*env)->GetStringRegion(env, libname, 0, len, chars + prefix_len);
 509     len += prefix_len;
 510     cpchars(chars + len, JNI_LIB_SUFFIX, suffix_len);
 511     len += suffix_len;
 512 
 513     return (*env)->NewString(env, chars, len);
 514 }