mirror of
https://github.com/openjdk/jdk.git
synced 2025-08-28 07:14:30 +02:00
537 lines
16 KiB
C
537 lines
16 KiB
C
/*
|
|
* Copyright (c) 1998, 2022, Oracle and/or its affiliates. All rights reserved.
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* This code is free software; you can redistribute it and/or modify it
|
|
* under the terms of the GNU General Public License version 2 only, as
|
|
* published by the Free Software Foundation. Oracle designates this
|
|
* particular file as subject to the "Classpath" exception as provided
|
|
* by Oracle in the LICENSE file that accompanied this code.
|
|
*
|
|
* This code is distributed in the hope that it will be useful, but WITHOUT
|
|
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
* version 2 for more details (a copy is included in the LICENSE file that
|
|
* accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU General Public License version
|
|
* 2 along with this work; if not, write to the Free Software Foundation,
|
|
* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
*
|
|
* Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
|
|
* or visit www.oracle.com if you need additional information or have any
|
|
* questions.
|
|
*/
|
|
|
|
#if defined(__linux__) || defined(_ALLBSD_SOURCE)
|
|
#include <stdio.h>
|
|
#include <ctype.h>
|
|
#endif
|
|
#include <pwd.h>
|
|
#include <locale.h>
|
|
#ifndef ARCHPROPNAME
|
|
#error "The macro ARCHPROPNAME has not been defined"
|
|
#endif
|
|
#include <sys/utsname.h> /* For os_name and os_version */
|
|
#include <langinfo.h> /* For nl_langinfo */
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <sys/types.h>
|
|
#include <unistd.h>
|
|
#include <sys/param.h>
|
|
#include <time.h>
|
|
#include <errno.h>
|
|
|
|
#ifdef MACOSX
|
|
#include "java_props_macosx.h"
|
|
#endif
|
|
|
|
#if defined(_ALLBSD_SOURCE)
|
|
#if !defined(P_tmpdir)
|
|
#include <paths.h>
|
|
#define P_tmpdir _PATH_VARTMP
|
|
#endif
|
|
#endif
|
|
|
|
#include "locale_str.h"
|
|
#include "java_props.h"
|
|
|
|
#if !defined(_ALLBSD_SOURCE)
|
|
#ifdef __linux__
|
|
#ifndef CODESET
|
|
#define CODESET _NL_CTYPE_CODESET_NAME
|
|
#endif
|
|
#else
|
|
#ifdef ALT_CODESET_KEY
|
|
#define CODESET ALT_CODESET_KEY
|
|
#endif
|
|
#endif
|
|
#endif /* !_ALLBSD_SOURCE */
|
|
|
|
/* Take an array of string pairs (map of key->value) and a string (key).
|
|
* Examine each pair in the map to see if the first string (key) matches the
|
|
* string. If so, store the second string of the pair (value) in the value and
|
|
* return 1. Otherwise do nothing and return 0. The end of the map is
|
|
* indicated by an empty string at the start of a pair (key of "").
|
|
*/
|
|
static int
|
|
mapLookup(char* map[], const char* key, char** value) {
|
|
int i;
|
|
for (i = 0; strcmp(map[i], ""); i += 2){
|
|
if (!strcmp(key, map[i])){
|
|
*value = map[i + 1];
|
|
return 1;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
#ifndef P_tmpdir
|
|
#define P_tmpdir "/var/tmp"
|
|
#endif
|
|
|
|
static int ParseLocale(JNIEnv* env, int cat, char ** std_language, char ** std_script,
|
|
char ** std_country, char ** std_variant, char ** std_encoding) {
|
|
char *temp = NULL;
|
|
char *language = NULL, *country = NULL, *variant = NULL,
|
|
*encoding = NULL;
|
|
char *p, *encoding_variant, *old_temp, *old_ev;
|
|
char *lc;
|
|
|
|
/* Query the locale set for the category */
|
|
|
|
#ifdef MACOSX
|
|
lc = setupMacOSXLocale(cat); // malloc'd memory, need to free
|
|
#else
|
|
lc = setlocale(cat, NULL);
|
|
#endif
|
|
|
|
#ifndef __linux__
|
|
if (lc == NULL) {
|
|
return 0;
|
|
}
|
|
|
|
temp = malloc(strlen(lc) + 1);
|
|
if (temp == NULL) {
|
|
#ifdef MACOSX
|
|
free(lc); // malloced memory
|
|
#endif
|
|
JNU_ThrowOutOfMemoryError(env, NULL);
|
|
return 0;
|
|
}
|
|
|
|
if (cat == LC_CTYPE) {
|
|
/*
|
|
* Workaround for Solaris bug 4201684: Xlib doesn't like @euro
|
|
* locales. Since we don't depend on the libc @euro behavior,
|
|
* we just remove the qualifier.
|
|
* On Linux, the bug doesn't occur; on the other hand, @euro
|
|
* is needed there because it's a shortcut that also determines
|
|
* the encoding - without it, we wouldn't get ISO-8859-15.
|
|
* Therefore, this code section is Solaris-specific.
|
|
*/
|
|
strcpy(temp, lc);
|
|
p = strstr(temp, "@euro");
|
|
if (p != NULL) {
|
|
*p = '\0';
|
|
setlocale(LC_ALL, temp);
|
|
}
|
|
}
|
|
#else
|
|
if (lc == NULL || !strcmp(lc, "C") || !strcmp(lc, "POSIX")) {
|
|
lc = "en_US";
|
|
}
|
|
|
|
temp = malloc(strlen(lc) + 1);
|
|
if (temp == NULL) {
|
|
JNU_ThrowOutOfMemoryError(env, NULL);
|
|
return 0;
|
|
}
|
|
|
|
#endif
|
|
|
|
/*
|
|
* locale string format in Solaris is
|
|
* <language name>_<country name>.<encoding name>@<variant name>
|
|
* <country name>, <encoding name>, and <variant name> are optional.
|
|
*/
|
|
|
|
strcpy(temp, lc);
|
|
#ifdef MACOSX
|
|
free(lc); // malloced memory
|
|
#endif
|
|
/* Parse the language, country, encoding, and variant from the
|
|
* locale. Any of the elements may be missing, but they must occur
|
|
* in the order language_country.encoding@variant, and must be
|
|
* preceded by their delimiter (except for language).
|
|
*
|
|
* If the locale name (without .encoding@variant, if any) matches
|
|
* any of the names in the locale_aliases list, map it to the
|
|
* corresponding full locale name. Most of the entries in the
|
|
* locale_aliases list are locales that include a language name but
|
|
* no country name, and this facility is used to map each language
|
|
* to a default country if that's possible. It's also used to map
|
|
* the Solaris locale aliases to their proper Java locale IDs.
|
|
*/
|
|
|
|
encoding_variant = malloc(strlen(temp)+1);
|
|
if (encoding_variant == NULL) {
|
|
free(temp);
|
|
JNU_ThrowOutOfMemoryError(env, NULL);
|
|
return 0;
|
|
}
|
|
|
|
if ((p = strchr(temp, '.')) != NULL) {
|
|
strcpy(encoding_variant, p); /* Copy the leading '.' */
|
|
*p = '\0';
|
|
} else if ((p = strchr(temp, '@')) != NULL) {
|
|
strcpy(encoding_variant, p); /* Copy the leading '@' */
|
|
*p = '\0';
|
|
} else {
|
|
*encoding_variant = '\0';
|
|
}
|
|
|
|
if (mapLookup(locale_aliases, temp, &p)) {
|
|
old_temp = temp;
|
|
temp = realloc(temp, strlen(p)+1);
|
|
if (temp == NULL) {
|
|
free(old_temp);
|
|
free(encoding_variant);
|
|
JNU_ThrowOutOfMemoryError(env, NULL);
|
|
return 0;
|
|
}
|
|
strcpy(temp, p);
|
|
old_ev = encoding_variant;
|
|
encoding_variant = realloc(encoding_variant, strlen(temp)+1);
|
|
if (encoding_variant == NULL) {
|
|
free(old_ev);
|
|
free(temp);
|
|
JNU_ThrowOutOfMemoryError(env, NULL);
|
|
return 0;
|
|
}
|
|
// check the "encoding_variant" again, if any.
|
|
if ((p = strchr(temp, '.')) != NULL) {
|
|
strcpy(encoding_variant, p); /* Copy the leading '.' */
|
|
*p = '\0';
|
|
} else if ((p = strchr(temp, '@')) != NULL) {
|
|
strcpy(encoding_variant, p); /* Copy the leading '@' */
|
|
*p = '\0';
|
|
}
|
|
}
|
|
|
|
language = temp;
|
|
if ((country = strchr(temp, '_')) != NULL) {
|
|
*country++ = '\0';
|
|
}
|
|
|
|
p = encoding_variant;
|
|
if ((encoding = strchr(p, '.')) != NULL) {
|
|
p[encoding++ - p] = '\0';
|
|
p = encoding;
|
|
}
|
|
if ((variant = strchr(p, '@')) != NULL) {
|
|
p[variant++ - p] = '\0';
|
|
}
|
|
|
|
/* Normalize the language name */
|
|
if (std_language != NULL) {
|
|
*std_language = "en";
|
|
if (language != NULL && mapLookup(language_names, language, std_language) == 0) {
|
|
*std_language = malloc(strlen(language)+1);
|
|
strcpy(*std_language, language);
|
|
}
|
|
}
|
|
|
|
/* Normalize the country name */
|
|
if (std_country != NULL && country != NULL) {
|
|
if (mapLookup(country_names, country, std_country) == 0) {
|
|
*std_country = malloc(strlen(country)+1);
|
|
strcpy(*std_country, country);
|
|
}
|
|
}
|
|
|
|
/* Normalize the script and variant name. Note that we only use
|
|
* variants listed in the mapping array; others are ignored.
|
|
*/
|
|
if (variant != NULL) {
|
|
if (std_script != NULL) {
|
|
mapLookup(script_names, variant, std_script);
|
|
}
|
|
|
|
if (std_variant != NULL) {
|
|
mapLookup(variant_names, variant, std_variant);
|
|
}
|
|
}
|
|
|
|
/* Normalize the encoding name. Note that we IGNORE the string
|
|
* 'encoding' extracted from the locale name above. Instead, we use the
|
|
* more reliable method of calling nl_langinfo(CODESET). This function
|
|
* returns an empty string if no encoding is set for the given locale
|
|
* (e.g., the C or POSIX locales); we use the default ISO 8859-1
|
|
* converter for such locales.
|
|
*/
|
|
if (std_encoding != NULL) {
|
|
/* OK, not so reliable - nl_langinfo() gives wrong answers on
|
|
* Euro locales, in particular. */
|
|
if (strcmp(p, "ISO8859-15") == 0)
|
|
p = "ISO8859-15";
|
|
else
|
|
p = nl_langinfo(CODESET);
|
|
|
|
/* Convert the bare "646" used on Solaris to a proper IANA name */
|
|
if (strcmp(p, "646") == 0)
|
|
p = "ISO646-US";
|
|
|
|
/* return same result nl_langinfo would return for en_UK,
|
|
* in order to use optimizations. */
|
|
*std_encoding = (*p != '\0') ? p : "ISO8859-1";
|
|
|
|
#ifdef __linux__
|
|
/*
|
|
* Remap the encoding string to a different value for japanese
|
|
* locales on linux so that customized converters are used instead
|
|
* of the default converter for "EUC-JP". The customized converters
|
|
* omit support for the JIS0212 encoding which is not supported by
|
|
* the variant of "EUC-JP" encoding used on linux
|
|
*/
|
|
if (strcmp(p, "EUC-JP") == 0) {
|
|
*std_encoding = "EUC-JP-LINUX";
|
|
}
|
|
#endif
|
|
|
|
#ifdef _AIX
|
|
if (strcmp(p, "big5") == 0) {
|
|
/* On AIX Traditional Chinese Big5 codeset is mapped to IBM-950 */
|
|
*std_encoding = "IBM-950";
|
|
} else if (strcmp(p, "IBM-943") == 0) {
|
|
/*
|
|
* On AIX, IBM-943 is mapped to IBM-943C in which symbol 'yen' and
|
|
* 'overline' are replaced with 'backslash' and 'tilde' from ASCII
|
|
* making first 96 code points same as ASCII.
|
|
*/
|
|
*std_encoding = "IBM-943C";
|
|
}
|
|
#endif
|
|
|
|
#ifdef MACOSX
|
|
/*
|
|
* For the case on MacOS X where encoding is set to US-ASCII, but we
|
|
* don't have any encoding hints from LANG/LC_ALL/LC_CTYPE, use UTF-8
|
|
* instead.
|
|
*
|
|
* The contents of ASCII files will still be read and displayed
|
|
* correctly, but so will files containing UTF-8 characters beyond the
|
|
* standard ASCII range.
|
|
*
|
|
* Specifically, this allows apps launched by double-clicking a .jar
|
|
* file to correctly read UTF-8 files using the default encoding (see
|
|
* 8011194).
|
|
*/
|
|
const char* env_lang = getenv("LANG");
|
|
const char* env_lc_all = getenv("LC_ALL");
|
|
const char* env_lc_ctype = getenv("LC_CTYPE");
|
|
|
|
if (strcmp(p,"US-ASCII") == 0 &&
|
|
(env_lang == NULL || strlen(env_lang) == 0) &&
|
|
(env_lc_all == NULL || strlen(env_lc_all) == 0) &&
|
|
(env_lc_ctype == NULL || strlen(env_lc_ctype) == 0)) {
|
|
*std_encoding = "UTF-8";
|
|
}
|
|
#endif
|
|
}
|
|
|
|
free(temp);
|
|
free(encoding_variant);
|
|
|
|
return 1;
|
|
}
|
|
|
|
/* This function gets called very early, before VM_CALLS are setup.
|
|
* Do not use any of the VM_CALLS entries!!!
|
|
*/
|
|
java_props_t *
|
|
GetJavaProperties(JNIEnv *env)
|
|
{
|
|
static java_props_t sprops;
|
|
char *v; /* tmp var */
|
|
|
|
if (sprops.user_dir) {
|
|
return &sprops;
|
|
}
|
|
|
|
/* tmp dir */
|
|
sprops.tmp_dir = P_tmpdir;
|
|
#ifdef MACOSX
|
|
/* darwin has a per-user temp dir */
|
|
static char tmp_path[PATH_MAX];
|
|
int pathSize = confstr(_CS_DARWIN_USER_TEMP_DIR, tmp_path, PATH_MAX);
|
|
if (pathSize > 0 && pathSize <= PATH_MAX) {
|
|
sprops.tmp_dir = tmp_path;
|
|
}
|
|
#endif /* MACOSX */
|
|
|
|
/* patches/service packs installed */
|
|
sprops.patch_level = NULL; // leave it undefined
|
|
|
|
#ifdef SI_ISALIST
|
|
/* supported instruction sets */
|
|
{
|
|
char list[258];
|
|
sysinfo(SI_ISALIST, list, sizeof(list));
|
|
sprops.cpu_isalist = strdup(list);
|
|
}
|
|
#else
|
|
sprops.cpu_isalist = NULL;
|
|
#endif
|
|
|
|
/* endianness of platform */
|
|
{
|
|
unsigned int endianTest = 0xff000000;
|
|
if (((char*)(&endianTest))[0] != 0)
|
|
sprops.cpu_endian = "big";
|
|
else
|
|
sprops.cpu_endian = "little";
|
|
}
|
|
|
|
/* os properties */
|
|
{
|
|
#ifdef MACOSX
|
|
setOSNameAndVersion(&sprops);
|
|
#else
|
|
struct utsname name;
|
|
uname(&name);
|
|
sprops.os_name = strdup(name.sysname);
|
|
#ifdef _AIX
|
|
{
|
|
char *os_version = malloc(strlen(name.version) +
|
|
strlen(name.release) + 2);
|
|
if (os_version != NULL) {
|
|
strcpy(os_version, name.version);
|
|
strcat(os_version, ".");
|
|
strcat(os_version, name.release);
|
|
}
|
|
sprops.os_version = os_version;
|
|
}
|
|
#else
|
|
sprops.os_version = strdup(name.release);
|
|
#endif /* _AIX */
|
|
#endif /* MACOSX */
|
|
|
|
sprops.os_arch = ARCHPROPNAME;
|
|
}
|
|
|
|
/* ABI property (optional) */
|
|
#ifdef JDK_ARCH_ABI_PROP_NAME
|
|
sprops.sun_arch_abi = JDK_ARCH_ABI_PROP_NAME;
|
|
#endif
|
|
|
|
/* Determine the language, country, variant, and encoding from the host,
|
|
* and store these in the user.language, user.country, user.variant and
|
|
* file.encoding system properties. */
|
|
setlocale(LC_ALL, "");
|
|
if (ParseLocale(env, LC_CTYPE,
|
|
&(sprops.format_language),
|
|
&(sprops.format_script),
|
|
&(sprops.format_country),
|
|
&(sprops.format_variant),
|
|
&(sprops.encoding))) {
|
|
ParseLocale(env, LC_MESSAGES,
|
|
&(sprops.display_language),
|
|
&(sprops.display_script),
|
|
&(sprops.display_country),
|
|
&(sprops.display_variant),
|
|
NULL);
|
|
} else {
|
|
sprops.display_language = "en";
|
|
sprops.encoding = "ISO8859-1";
|
|
}
|
|
|
|
/* ParseLocale failed with OOME */
|
|
JNU_CHECK_EXCEPTION_RETURN(env, NULL);
|
|
|
|
#ifdef MACOSX
|
|
sprops.sun_jnu_encoding = "UTF-8";
|
|
#else
|
|
sprops.sun_jnu_encoding = sprops.encoding;
|
|
#endif
|
|
if (isatty(STDOUT_FILENO) == 1) {
|
|
sprops.stdout_encoding = sprops.encoding;
|
|
}
|
|
if (isatty(STDERR_FILENO) == 1) {
|
|
sprops.stderr_encoding = sprops.encoding;
|
|
}
|
|
|
|
#ifdef _ALLBSD_SOURCE
|
|
#if BYTE_ORDER == _LITTLE_ENDIAN
|
|
sprops.unicode_encoding = "UnicodeLittle";
|
|
#else
|
|
sprops.unicode_encoding = "UnicodeBig";
|
|
#endif
|
|
#else /* !_ALLBSD_SOURCE */
|
|
#ifdef __linux__
|
|
#if __BYTE_ORDER == __LITTLE_ENDIAN
|
|
sprops.unicode_encoding = "UnicodeLittle";
|
|
#else
|
|
sprops.unicode_encoding = "UnicodeBig";
|
|
#endif
|
|
#else
|
|
sprops.unicode_encoding = "UnicodeBig";
|
|
#endif
|
|
#endif /* _ALLBSD_SOURCE */
|
|
|
|
/* user properties */
|
|
{
|
|
struct passwd *pwent = getpwuid(getuid());
|
|
sprops.user_name = pwent ? strdup(pwent->pw_name) : "?";
|
|
#ifdef MACOSX
|
|
setUserHome(&sprops);
|
|
#else
|
|
sprops.user_home = pwent ? strdup(pwent->pw_dir) : NULL;
|
|
#endif
|
|
if (sprops.user_home == NULL || sprops.user_home[0] == '\0' ||
|
|
sprops.user_home[1] == '\0') {
|
|
// If the OS supplied home directory is not defined or less than two characters long
|
|
// $HOME is the backup source for the home directory, if defined
|
|
char* user_home = getenv("HOME");
|
|
if ((user_home != NULL) && (user_home[0] != '\0')) {
|
|
sprops.user_home = user_home;
|
|
} else {
|
|
sprops.user_home = "?";
|
|
}
|
|
}
|
|
}
|
|
|
|
/* User TIMEZONE
|
|
* We defer setting up timezone until it's actually necessary.
|
|
* Refer to TimeZone.getDefault(). The system property
|
|
* is able to be set by the command line interface -Duser.timezone.
|
|
*/
|
|
tzset(); /* for compatibility */
|
|
|
|
/* Current directory */
|
|
{
|
|
char buf[MAXPATHLEN];
|
|
errno = 0;
|
|
if (getcwd(buf, sizeof(buf)) == NULL)
|
|
JNU_ThrowByName(env, "java/lang/Error",
|
|
"Properties init: Could not determine current working directory.");
|
|
else
|
|
sprops.user_dir = strdup(buf);
|
|
}
|
|
|
|
sprops.file_separator = "/";
|
|
sprops.path_separator = ":";
|
|
sprops.line_separator = "\n";
|
|
|
|
#ifdef MACOSX
|
|
setProxyProperties(&sprops);
|
|
#endif
|
|
|
|
return &sprops;
|
|
}
|
|
|
|
jstring
|
|
GetStringPlatform(JNIEnv *env, nchar* cstr)
|
|
{
|
|
return JNU_NewStringPlatform(env, cstr);
|
|
}
|