| /* |
| * Copyright (c) 2004, 2013, 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. |
| */ |
| |
| #include <stdlib.h> |
| #include <string.h> |
| #include <windows.h> |
| #include <locale.h> |
| |
| #include "jni.h" |
| #include "jni_util.h" |
| |
| static void getParent(const TCHAR *path, TCHAR *dest) { |
| char* lastSlash = max(strrchr(path, '\\'), strrchr(path, '/')); |
| if (lastSlash == NULL) { |
| *dest = 0; |
| return; |
| } |
| if (path != dest) |
| strcpy(dest, path); |
| *lastSlash = 0; |
| } |
| |
| BOOL useNativeConverter(JNIEnv *env) { |
| static BOOL initialized; |
| static BOOL useNative; |
| if (!initialized) { |
| HMODULE jvm = GetModuleHandle("jvm"); |
| useNative = FALSE; |
| if (jvm != NULL) { |
| TCHAR *jvmPath = NULL; |
| int bufferSize = MAX_PATH; |
| while (jvmPath == NULL) { |
| DWORD result; |
| jvmPath = malloc(bufferSize); |
| if (jvmPath == NULL) |
| return FALSE; |
| result = GetModuleFileName(jvm, jvmPath, bufferSize); |
| if (result == 0) |
| return FALSE; |
| if (result == bufferSize) { // didn't fit |
| bufferSize += MAX_PATH; // increase buffer size, try again |
| free(jvmPath); |
| jvmPath = NULL; |
| } |
| } |
| |
| getParent(jvmPath, jvmPath); |
| useNative = (!strcmp("kernel", jvmPath + strlen(jvmPath) - |
| strlen("kernel"))); // true if jvm.dll lives in "kernel" |
| if (useNative) |
| setlocale(LC_ALL, ""); |
| free(jvmPath); |
| } |
| initialized = TRUE; |
| } |
| return useNative; |
| } |
| |
| jstring nativeNewStringPlatform(JNIEnv *env, const char *str) { |
| static jmethodID String_char_constructor; |
| if (useNativeConverter(env)) { |
| // use native Unicode conversion so Kernel isn't required during |
| // System.initProperties |
| jcharArray chars = 0; |
| wchar_t *utf16; |
| int len; |
| jstring result = NULL; |
| |
| if (getFastEncoding() == NO_ENCODING_YET) |
| initializeEncoding(env); |
| |
| len = mbstowcs(NULL, str, strlen(str)); |
| if (len == -1) |
| return NULL; |
| utf16 = calloc(len + 1, 2); |
| if (mbstowcs(utf16, str, len) == -1) |
| return NULL; |
| chars = (*env)->NewCharArray(env, len); |
| if (chars == NULL) |
| return NULL; |
| (*env)->SetCharArrayRegion(env, chars, 0, len, utf16); |
| if (String_char_constructor == NULL) |
| String_char_constructor = (*env)->GetMethodID(env, |
| JNU_ClassString(env), "<init>", "([C)V"); |
| result = (*env)->NewObject(env, JNU_ClassString(env), |
| String_char_constructor, chars); |
| free(utf16); |
| return result; |
| } |
| else |
| return NULL; |
| } |
| |
| |
| char* nativeGetStringPlatformChars(JNIEnv *env, jstring jstr, jboolean *isCopy) { |
| if (useNativeConverter(env)) { |
| // use native Unicode conversion so Kernel isn't required during |
| // System.initProperties |
| char *result = NULL; |
| size_t len; |
| const jchar* utf16 = (*env)->GetStringChars(env, jstr, NULL); |
| len = wcstombs(NULL, utf16, (*env)->GetStringLength(env, jstr) * 4) + 1; |
| if (len == -1) |
| return NULL; |
| result = (char*) malloc(len); |
| if (result != NULL) { |
| if (wcstombs(result, utf16, len) == -1) |
| return NULL; |
| (*env)->ReleaseStringChars(env, jstr, utf16); |
| if (isCopy) |
| *isCopy = JNI_TRUE; |
| } |
| return result; |
| } |
| else |
| return NULL; |
| } |
| |
| void* getProcessHandle() { |
| return (void*)GetModuleHandle(NULL); |
| } |
| |
| /* |
| * Windows symbols can be simple like JNI_OnLoad or __stdcall format |
| * like _JNI_OnLoad@8. We need to handle both. |
| */ |
| void buildJniFunctionName(const char *sym, const char *cname, |
| char *jniEntryName) { |
| if (cname != NULL) { |
| char *p = strrchr(sym, '@'); |
| if (p != NULL && p != sym) { |
| // sym == _JNI_OnLoad@8 |
| strncpy(jniEntryName, sym, (p - sym)); |
| jniEntryName[(p-sym)] = '\0'; |
| // jniEntryName == _JNI_OnLoad |
| strcat(jniEntryName, "_"); |
| strcat(jniEntryName, cname); |
| strcat(jniEntryName, p); |
| //jniEntryName == _JNI_OnLoad_cname@8 |
| } else { |
| strcpy(jniEntryName, sym); |
| strcat(jniEntryName, "_"); |
| strcat(jniEntryName, cname); |
| } |
| } else { |
| strcpy(jniEntryName, sym); |
| } |
| return; |
| } |