jdk-sandbox: jdk/src/java.base/windows/native/libjava/jni_util

3111 fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	1	/*
27184 2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	2	* Copyright (c) 2004, 2014 Oracle and/or its affiliates. All rights reserved.
3111 fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	3	* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	4	*
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	5	* This code is free software; you can redistribute it and/or modify it
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	6	* under the terms of the GNU General Public License version 2 only, as
5506 202f599c92aa 6943119: Rebrand source copyright notices ohair parents: 3111 diff changeset	7	* published by the Free Software Foundation. Oracle designates this
3111 fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	8	* particular file as subject to the "Classpath" exception as provided
5506 202f599c92aa 6943119: Rebrand source copyright notices ohair parents: 3111 diff changeset	9	* by Oracle in the LICENSE file that accompanied this code.
3111 fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	10	*
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	11	* This code is distributed in the hope that it will be useful, but WITHOUT
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	12	* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	13	* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	14	* version 2 for more details (a copy is included in the LICENSE file that
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	15	* accompanied this code).
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	16	*
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	17	* You should have received a copy of the GNU General Public License version
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	18	* 2 along with this work; if not, write to the Free Software Foundation,
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	19	* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	20	*
5506 202f599c92aa 6943119: Rebrand source copyright notices ohair parents: 3111 diff changeset	21	* Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
202f599c92aa 6943119: Rebrand source copyright notices ohair parents: 3111 diff changeset	22	* or visit www.oracle.com if you need additional information or have any
202f599c92aa 6943119: Rebrand source copyright notices ohair parents: 3111 diff changeset	23	* questions.
3111 fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	24	*/
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	25
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	26	#include <stdlib.h>
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	27	#include <string.h>
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	28	#include <windows.h>
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	29	#include <locale.h>
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	30
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	31	#include "jni.h"
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	32	#include "jni_util.h"
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	33
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	34	static void getParent(const TCHAR path, TCHAR dest) {
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	35	char* lastSlash = max(strrchr(path, '\\'), strrchr(path, '/'));
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	36	if (lastSlash == NULL) {
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	37	*dest = 0;
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	38	return;
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	39	}
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	40	if (path != dest)
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	41	strcpy(dest, path);
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	42	*lastSlash = 0;
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	43	}
fefdeafb7ab9 6797688: Umbrella: Merge all JDK 6u4 - 6u12 deployment code into JDK7 herrick parents: diff changeset	44
16479 d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	45	void* getProcessHandle() {
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	46	return (void*)GetModuleHandle(NULL);
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	47	}
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	48
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	49	/*
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	50	* Windows symbols can be simple like JNI_OnLoad or __stdcall format
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	51	* like _JNI_OnLoad@8. We need to handle both.
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	52	*/
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	53	void buildJniFunctionName(const char sym, const char cname,
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	54	char *jniEntryName) {
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	55	if (cname != NULL) {
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	56	char *p = strrchr(sym, '@');
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	57	if (p != NULL && p != sym) {
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	58	// sym == _JNI_OnLoad@8
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	59	strncpy(jniEntryName, sym, (p - sym));
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	60	jniEntryName[(p-sym)] = '\0';
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	61	// jniEntryName == _JNI_OnLoad
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	62	strcat(jniEntryName, "_");
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	63	strcat(jniEntryName, cname);
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	64	strcat(jniEntryName, p);
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	65	//jniEntryName == _JNI_OnLoad_cname@8
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	66	} else {
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	67	strcpy(jniEntryName, sym);
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	68	strcat(jniEntryName, "_");
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	69	strcat(jniEntryName, cname);
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	70	}
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	71	} else {
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	72	strcpy(jniEntryName, sym);
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	73	}
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	74	return;
d845c18d13f2 8005716: Enhance JNI specification to allow support of static JNI libraries in Embedded JREs alanb parents: 7668 diff changeset	75	}
27184 2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	76
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	77	size_t
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	78	getLastErrorString(char *utf8_jvmErrorMsg, size_t cbErrorMsg)
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	79	{
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	80	size_t n = 0;
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	81	if (cbErrorMsg > 0) {
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	82	BOOLEAN noError = FALSE;
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	83	WCHAR utf16_osErrorMsg = (WCHAR )malloc(cbErrorMsg*sizeof(WCHAR));
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	84	if (utf16_osErrorMsg == NULL) {
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	85	// OOM accident
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	86	strncpy(utf8_jvmErrorMsg, "Out of memory", cbErrorMsg);
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	87	// truncate if too long
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	88	utf8_jvmErrorMsg[cbErrorMsg - 1] = '\0';
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	89	n = strlen(utf8_jvmErrorMsg);
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	90	} else {
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	91	DWORD errval = GetLastError();
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	92	if (errval != 0) {
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	93	// WIN32 error
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	94	n = (size_t)FormatMessageW(
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	95	FORMAT_MESSAGE_FROM_SYSTEM\|FORMAT_MESSAGE_IGNORE_INSERTS,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	96	NULL,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	97	errval,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	98	0,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	99	utf16_osErrorMsg,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	100	(DWORD)cbErrorMsg,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	101	NULL);
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	102	if (n > 3) {
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	103	// Drop final '.', CR, LF
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	104	if (utf16_osErrorMsg[n - 1] == L'\n') --n;
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	105	if (utf16_osErrorMsg[n - 1] == L'\r') --n;
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	106	if (utf16_osErrorMsg[n - 1] == L'.') --n;
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	107	utf16_osErrorMsg[n] = L'\0';
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	108	}
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	109	} else if (errno != 0) {
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	110	// C runtime error that has no corresponding WIN32 error code
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	111	const WCHAR *rtError = _wcserror(errno);
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	112	if (rtError != NULL) {
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	113	wcsncpy(utf16_osErrorMsg, rtError, cbErrorMsg);
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	114	// truncate if too long
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	115	utf16_osErrorMsg[cbErrorMsg - 1] = L'\0';
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	116	n = wcslen(utf16_osErrorMsg);
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	117	}
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	118	} else
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	119	noError = TRUE; //OS has no error to report
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	120
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	121	if (!noError) {
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	122	if (n > 0) {
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	123	n = WideCharToMultiByte(
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	124	CP_UTF8,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	125	0,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	126	utf16_osErrorMsg,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	127	n,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	128	utf8_jvmErrorMsg,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	129	cbErrorMsg,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	130	NULL,
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	131	NULL);
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	132
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	133	// no way to die
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	134	if (n > 0)
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	135	utf8_jvmErrorMsg[min(cbErrorMsg - 1, n)] = '\0';
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	136	}
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	137
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	138	if (n <= 0) {
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	139	strncpy(utf8_jvmErrorMsg, "Secondary error while OS message extraction", cbErrorMsg);
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	140	// truncate if too long
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	141	utf8_jvmErrorMsg[cbErrorMsg - 1] = '\0';
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	142	n = strlen(utf8_jvmErrorMsg);
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	143	}
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	144	}
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	145	free(utf16_osErrorMsg);
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	146	}
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	147	}
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	148	return n;
2996674bd701 8057777: Cleanup of old and unused VM interfaces fparain parents: 25859 diff changeset	149	}

author	fparain
	Thu, 09 Oct 2014 04:48:12 -0700
changeset 27184	2996674bd701
parent 25859	3317bb8137f4
child 30784	28105f71beb2
permissions	-rw-r--r--