1 /*
2 * Copyright (c) 1997, 2019, 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 <windows.h>
27 #include <io.h>
28 #include <process.h>
29 #include <stdlib.h>
30 #include <stdio.h>
31 #include <stdarg.h>
32 #include <string.h>
33 #include <sys/types.h>
34 #include <sys/stat.h>
35 #include <wtypes.h>
36 #include <commctrl.h>
37
38 #include <jni.h>
39 #include "java.h"
40
41 #define JVM_DLL "jvm.dll"
42 #define JAVA_DLL "java.dll"
43
44 /*
45 * Prototypes.
46 */
47 static jboolean GetJVMPath(const char *jrepath, const char *jvmtype,
48 char *jvmpath, jint jvmpathsize);
49 static jboolean GetJREPath(char *path, jint pathsize);
50
51 #ifdef USE_REGISTRY_LOOKUP
52 jboolean GetPublicJREHome(char *buf, jint bufsize);
53 #endif
54
55 /* We supports warmup for UI stack that is performed in parallel
56 * to VM initialization.
57 * This helps to improve startup of UI application as warmup phase
58 * might be long due to initialization of OS or hardware resources.
59 * It is not CPU bound and therefore it does not interfere with VM init.
60 * Obviously such warmup only has sense for UI apps and therefore it needs
61 * to be explicitly requested by passing -Dsun.awt.warmup=true property
62 * (this is always the case for plugin/javaws).
63 *
64 * Implementation launches new thread after VM starts and use it to perform
65 * warmup code (platform dependent).
66 * This thread is later reused as AWT toolkit thread as graphics toolkit
67 * often assume that they are used from the same thread they were launched on.
68 *
69 * At the moment we only support warmup for D3D. It only possible on windows
70 * and only if other flags do not prohibit this (e.g. OpenGL support requested).
71 */
72 #undef ENABLE_AWT_PRELOAD
73 #ifndef JAVA_ARGS /* turn off AWT preloading for javac, jar, etc */
74 /* CR6999872: fastdebug crashes if awt library is loaded before JVM is
75 * initialized*/
76 #if !defined(DEBUG)
77 #define ENABLE_AWT_PRELOAD
78 #endif
79 #endif
80
81 #ifdef ENABLE_AWT_PRELOAD
82 /* "AWT was preloaded" flag;
83 * turned on by AWTPreload().
84 */
85 int awtPreloaded = 0;
86
87 /* Calls a function with the name specified
88 * the function must be int(*fn)(void).
89 */
90 int AWTPreload(const char *funcName);
91 /* stops AWT preloading */
92 void AWTPreloadStop();
93
94 /* D3D preloading */
95 /* -1: not initialized; 0: OFF, 1: ON */
96 int awtPreloadD3D = -1;
97 /* command line parameter to swith D3D preloading on */
98 #define PARAM_PRELOAD_D3D "-Dsun.awt.warmup"
99 /* D3D/OpenGL management parameters */
100 #define PARAM_NODDRAW "-Dsun.java2d.noddraw"
101 #define PARAM_D3D "-Dsun.java2d.d3d"
102 #define PARAM_OPENGL "-Dsun.java2d.opengl"
103 /* funtion in awt.dll (src/windows/native/sun/java2d/d3d/D3DPipelineManager.cpp) */
104 #define D3D_PRELOAD_FUNC "preloadD3D"
105
106 /* Extracts value of a parameter with the specified name
107 * from command line argument (returns pointer in the argument).
108 * Returns NULL if the argument does not contains the parameter.
109 * e.g.:
110 * GetParamValue("theParam", "theParam=value") returns pointer to "value".
111 */
112 const char * GetParamValue(const char *paramName, const char *arg) {
113 size_t nameLen = JLI_StrLen(paramName);
114 if (JLI_StrNCmp(paramName, arg, nameLen) == 0) {
115 /* arg[nameLen] is valid (may contain final NULL) */
116 if (arg[nameLen] == '=') {
117 return arg + nameLen + 1;
118 }
119 }
120 return NULL;
121 }
122
123 /* Checks if commandline argument contains property specified
124 * and analyze it as boolean property (true/false).
125 * Returns -1 if the argument does not contain the parameter;
126 * Returns 1 if the argument contains the parameter and its value is "true";
127 * Returns 0 if the argument contains the parameter and its value is "false".
128 */
129 int GetBoolParamValue(const char *paramName, const char *arg) {
130 const char * paramValue = GetParamValue(paramName, arg);
131 if (paramValue != NULL) {
132 if (JLI_StrCaseCmp(paramValue, "true") == 0) {
133 return 1;
134 }
135 if (JLI_StrCaseCmp(paramValue, "false") == 0) {
136 return 0;
137 }
138 }
139 return -1;
140 }
141 #endif /* ENABLE_AWT_PRELOAD */
142
143
144 static jboolean _isjavaw = JNI_FALSE;
145
146
147 jboolean
148 IsJavaw()
149 {
150 return _isjavaw;
151 }
152
153 /*
154 *
155 */
156 void
157 CreateExecutionEnvironment(int *pargc, char ***pargv,
158 char *jrepath, jint so_jrepath,
159 char *jvmpath, jint so_jvmpath,
160 char *jvmcfg, jint so_jvmcfg) {
161
162 char *jvmtype;
163 int i = 0;
164 char** argv = *pargv;
165
166 /* Find out where the JRE is that we will be using. */
167 if (!GetJREPath(jrepath, so_jrepath)) {
168 JLI_ReportErrorMessage(JRE_ERROR1);
169 exit(2);
170 }
171
172 JLI_Snprintf(jvmcfg, so_jvmcfg, "%s%slib%sjvm.cfg",
173 jrepath, FILESEP, FILESEP);
174
175 /* Find the specified JVM type */
176 if (ReadKnownVMs(jvmcfg, JNI_FALSE) < 1) {
177 JLI_ReportErrorMessage(CFG_ERROR7);
178 exit(1);
179 }
180
181 jvmtype = CheckJvmType(pargc, pargv, JNI_FALSE);
182 if (JLI_StrCmp(jvmtype, "ERROR") == 0) {
183 JLI_ReportErrorMessage(CFG_ERROR9);
184 exit(4);
185 }
186
187 jvmpath[0] = '\0';
188 if (!GetJVMPath(jrepath, jvmtype, jvmpath, so_jvmpath)) {
189 JLI_ReportErrorMessage(CFG_ERROR8, jvmtype, jvmpath);
190 exit(4);
191 }
192 /* If we got here, jvmpath has been correctly initialized. */
193
194 /* Check if we need preload AWT */
195 #ifdef ENABLE_AWT_PRELOAD
196 argv = *pargv;
197 for (i = 0; i < *pargc ; i++) {
198 /* Tests the "turn on" parameter only if not set yet. */
199 if (awtPreloadD3D < 0) {
200 if (GetBoolParamValue(PARAM_PRELOAD_D3D, argv[i]) == 1) {
201 awtPreloadD3D = 1;
202 }
203 }
204 /* Test parameters which can disable preloading if not already disabled. */
205 if (awtPreloadD3D != 0) {
206 if (GetBoolParamValue(PARAM_NODDRAW, argv[i]) == 1
207 || GetBoolParamValue(PARAM_D3D, argv[i]) == 0
208 || GetBoolParamValue(PARAM_OPENGL, argv[i]) == 1)
209 {
210 awtPreloadD3D = 0;
211 /* no need to test the rest of the parameters */
212 break;
213 }
214 }
215 }
216 #endif /* ENABLE_AWT_PRELOAD */
217 }
218
219
220 static jboolean
221 LoadMSVCRT()
222 {
223 // Only do this once
224 static int loaded = 0;
225 char crtpath[MAXPATHLEN];
226
227 if (!loaded) {
228 /*
229 * The Microsoft C Runtime Library needs to be loaded first. A copy is
230 * assumed to be present in the "JRE path" directory. If it is not found
231 * there (or "JRE path" fails to resolve), skip the explicit load and let
232 * nature take its course, which is likely to be a failure to execute.
233 * The makefiles will provide the correct lib contained in quotes in the
234 * macro MSVCR_DLL_NAME.
235 */
236 #ifdef MSVCR_DLL_NAME
237 if (GetJREPath(crtpath, MAXPATHLEN)) {
238 if (JLI_StrLen(crtpath) + JLI_StrLen("\\bin\\") +
239 JLI_StrLen(MSVCR_DLL_NAME) >= MAXPATHLEN) {
240 JLI_ReportErrorMessage(JRE_ERROR11);
241 return JNI_FALSE;
242 }
243 (void)JLI_StrCat(crtpath, "\\bin\\" MSVCR_DLL_NAME); /* Add crt dll */
244 JLI_TraceLauncher("CRT path is %s\n", crtpath);
245 if (_access(crtpath, 0) == 0) {
246 if (LoadLibrary(crtpath) == 0) {
247 JLI_ReportErrorMessage(DLL_ERROR4, crtpath);
248 return JNI_FALSE;
249 }
250 }
251 }
252 #endif /* MSVCR_DLL_NAME */
253 #ifdef MSVCP_DLL_NAME
254 if (GetJREPath(crtpath, MAXPATHLEN)) {
255 if (JLI_StrLen(crtpath) + JLI_StrLen("\\bin\\") +
256 JLI_StrLen(MSVCP_DLL_NAME) >= MAXPATHLEN) {
257 JLI_ReportErrorMessage(JRE_ERROR11);
258 return JNI_FALSE;
259 }
260 (void)JLI_StrCat(crtpath, "\\bin\\" MSVCP_DLL_NAME); /* Add prt dll */
261 JLI_TraceLauncher("PRT path is %s\n", crtpath);
262 if (_access(crtpath, 0) == 0) {
263 if (LoadLibrary(crtpath) == 0) {
264 JLI_ReportErrorMessage(DLL_ERROR4, crtpath);
265 return JNI_FALSE;
266 }
267 }
268 }
269 #endif /* MSVCP_DLL_NAME */
270 loaded = 1;
271 }
272 return JNI_TRUE;
273 }
274
275
276 /*
277 * Find path to JRE based on .exe's location or registry settings.
278 */
279 jboolean
280 GetJREPath(char *path, jint pathsize)
281 {
282 char javadll[MAXPATHLEN];
283 struct stat s;
284
285 if (GetApplicationHome(path, pathsize)) {
286 /* Is JRE co-located with the application? */
287 JLI_Snprintf(javadll, sizeof(javadll), "%s\\bin\\" JAVA_DLL, path);
288 if (stat(javadll, &s) == 0) {
289 JLI_TraceLauncher("JRE path is %s\n", path);
290 return JNI_TRUE;
291 }
292 /* ensure storage for path + \jre + NULL */
293 if ((JLI_StrLen(path) + 4 + 1) > (size_t) pathsize) {
294 JLI_TraceLauncher("Insufficient space to store JRE path\n");
295 return JNI_FALSE;
296 }
297 /* Does this app ship a private JRE in <apphome>\jre directory? */
298 JLI_Snprintf(javadll, sizeof (javadll), "%s\\jre\\bin\\" JAVA_DLL, path);
299 if (stat(javadll, &s) == 0) {
300 JLI_StrCat(path, "\\jre");
301 JLI_TraceLauncher("JRE path is %s\n", path);
302 return JNI_TRUE;
303 }
304 }
305
306 /* Try getting path to JRE from path to JLI.DLL */
307 if (GetApplicationHomeFromDll(path, pathsize)) {
308 JLI_Snprintf(javadll, sizeof(javadll), "%s\\bin\\" JAVA_DLL, path);
309 if (stat(javadll, &s) == 0) {
310 JLI_TraceLauncher("JRE path is %s\n", path);
311 return JNI_TRUE;
312 }
313 }
314
315 #ifdef USE_REGISTRY_LOOKUP
316 /* Lookup public JRE using Windows registry. */
317 if (GetPublicJREHome(path, pathsize)) {
318 JLI_TraceLauncher("JRE path is %s\n", path);
319 return JNI_TRUE;
320 }
321 #endif
322
323 JLI_ReportErrorMessage(JRE_ERROR8 JAVA_DLL);
324 return JNI_FALSE;
325 }
326
327 /*
328 * Given a JRE location and a JVM type, construct what the name the
329 * JVM shared library will be. Return true, if such a library
330 * exists, false otherwise.
331 */
332 static jboolean
333 GetJVMPath(const char *jrepath, const char *jvmtype,
334 char *jvmpath, jint jvmpathsize)
335 {
336 struct stat s;
337 if (JLI_StrChr(jvmtype, '/') || JLI_StrChr(jvmtype, '\\')) {
338 JLI_Snprintf(jvmpath, jvmpathsize, "%s\\" JVM_DLL, jvmtype);
339 } else {
340 JLI_Snprintf(jvmpath, jvmpathsize, "%s\\bin\\%s\\" JVM_DLL,
341 jrepath, jvmtype);
342 }
343 if (stat(jvmpath, &s) == 0) {
344 return JNI_TRUE;
345 } else {
346 return JNI_FALSE;
347 }
348 }
349
350 /*
351 * Load a jvm from "jvmpath" and initialize the invocation functions.
352 */
353 jboolean
354 LoadJavaVM(const char *jvmpath, InvocationFunctions *ifn)
355 {
356 HINSTANCE handle;
357
358 JLI_TraceLauncher("JVM path is %s\n", jvmpath);
359
360 /*
361 * The Microsoft C Runtime Library needs to be loaded first. A copy is
362 * assumed to be present in the "JRE path" directory. If it is not found
363 * there (or "JRE path" fails to resolve), skip the explicit load and let
364 * nature take its course, which is likely to be a failure to execute.
365 *
366 */
367 LoadMSVCRT();
368
369 /* Load the Java VM DLL */
370 if ((handle = LoadLibrary(jvmpath)) == 0) {
371 JLI_ReportErrorMessage(DLL_ERROR4, (char *)jvmpath);
372 return JNI_FALSE;
373 }
374
375 /* Now get the function addresses */
376 ifn->CreateJavaVM =
377 (void *)GetProcAddress(handle, "JNI_CreateJavaVM");
378 ifn->GetDefaultJavaVMInitArgs =
379 (void *)GetProcAddress(handle, "JNI_GetDefaultJavaVMInitArgs");
380 if (ifn->CreateJavaVM == 0 || ifn->GetDefaultJavaVMInitArgs == 0) {
381 JLI_ReportErrorMessage(JNI_ERROR1, (char *)jvmpath);
382 return JNI_FALSE;
383 }
384
385 return JNI_TRUE;
386 }
387
388 /*
389 * Removes the trailing file name and one sub-folder from a path.
390 * If buf is "c:\foo\bin\javac", then put "c:\foo" into buf.
391 */
392 jboolean
393 TruncatePath(char *buf)
394 {
395 char *cp;
396 *JLI_StrRChr(buf, '\\') = '\0'; /* remove .exe file name */
397 if ((cp = JLI_StrRChr(buf, '\\')) == 0) {
398 /* This happens if the application is in a drive root, and
399 * there is no bin directory. */
400 buf[0] = '\0';
401 return JNI_FALSE;
402 }
403 *cp = '\0'; /* remove the bin\ part */
404 return JNI_TRUE;
405 }
406
407 /*
408 * Retrieves the path to the JRE home by locating the executable file
409 * of the current process and then truncating the path to the executable
410 */
411 jboolean
412 GetApplicationHome(char *buf, jint bufsize)
413 {
414 GetModuleFileName(NULL, buf, bufsize);
415 return TruncatePath(buf);
416 }
417
418 /*
419 * Retrieves the path to the JRE home by locating JLI.DLL and
420 * then truncating the path to JLI.DLL
421 */
422 jboolean
423 GetApplicationHomeFromDll(char *buf, jint bufsize)
424 {
425 HMODULE module;
426 DWORD flags = GET_MODULE_HANDLE_EX_FLAG_FROM_ADDRESS |
427 GET_MODULE_HANDLE_EX_FLAG_UNCHANGED_REFCOUNT;
428
429 if (GetModuleHandleEx(flags, (LPCSTR)&GetJREPath, &module) != 0) {
430 if (GetModuleFileName(module, buf, bufsize) != 0) {
431 return TruncatePath(buf);
432 }
433 }
434 return JNI_FALSE;
435 }
436
437 /*
438 * Support for doing cheap, accurate interval timing.
439 */
440 static jboolean counterAvailable = JNI_FALSE;
441 static jboolean counterInitialized = JNI_FALSE;
442 static LARGE_INTEGER counterFrequency;
443
444 jlong CounterGet()
445 {
446 LARGE_INTEGER count;
447
448 if (!counterInitialized) {
449 counterAvailable = QueryPerformanceFrequency(&counterFrequency);
450 counterInitialized = JNI_TRUE;
451 }
452 if (!counterAvailable) {
453 return 0;
454 }
455 QueryPerformanceCounter(&count);
456 return (jlong)(count.QuadPart);
457 }
458
459 jlong Counter2Micros(jlong counts)
460 {
461 if (!counterAvailable || !counterInitialized) {
462 return 0;
463 }
464 return (counts * 1000 * 1000)/counterFrequency.QuadPart;
465 }
466 /*
467 * windows snprintf does not guarantee a null terminator in the buffer,
468 * if the computed size is equal to or greater than the buffer size,
469 * as well as error conditions. This function guarantees a null terminator
470 * under all these conditions. An unreasonable buffer or size will return
471 * an error value. Under all other conditions this function will return the
472 * size of the bytes actually written minus the null terminator, similar
473 * to ansi snprintf api. Thus when calling this function the caller must
474 * ensure storage for the null terminator.
475 */
476 int
477 JLI_Snprintf(char* buffer, size_t size, const char* format, ...) {
478 int rc;
479 va_list vl;
480 if (size == 0 || buffer == NULL)
481 return -1;
482 buffer[0] = '\0';
483 va_start(vl, format);
484 rc = vsnprintf(buffer, size, format, vl);
485 va_end(vl);
486 /* force a null terminator, if something is amiss */
487 if (rc < 0) {
488 /* apply ansi semantics */
489 buffer[size - 1] = '\0';
490 return (int)size;
491 } else if (rc == size) {
492 /* force a null terminator */
493 buffer[size - 1] = '\0';
494 }
495 return rc;
496 }
497
498 /* taken from hotspot and slightly adjusted for jli lib;
499 * creates a UNC/ELP path from input 'path'
500 * the return buffer is allocated in C heap and needs to be freed using
501 * JLI_MemFree by the caller.
502 */
503 static wchar_t* create_unc_path(const char* path, errno_t* err) {
504 wchar_t* wpath = NULL;
505 size_t converted_chars = 0;
506 size_t path_len = strlen(path) + 1; /* includes the terminating NULL */
507 if (path[0] == '\\' && path[1] == '\\') {
508 if (path[2] == '?' && path[3] == '\\') {
509 /* if it already has a \\?\ don't do the prefix */
510 wpath = (wchar_t*) JLI_MemAlloc(path_len * sizeof(wchar_t));
511 if (wpath != NULL) {
512 *err = mbstowcs_s(&converted_chars, wpath, path_len, path, path_len);
513 } else {
514 *err = ENOMEM;
515 }
516 } else {
517 /* only UNC pathname includes double slashes here */
518 wpath = (wchar_t*) JLI_MemAlloc((path_len + 7) * sizeof(wchar_t));
519 if (wpath != NULL) {
520 wcscpy(wpath, L"\\\\?\\UNC\0");
521 *err = mbstowcs_s(&converted_chars, &wpath[7], path_len, path, path_len);
522 } else {
523 *err = ENOMEM;
524 }
525 }
526 } else {
527 wpath = (wchar_t*) JLI_MemAlloc((path_len + 4) * sizeof(wchar_t));
528 if (wpath != NULL) {
529 wcscpy(wpath, L"\\\\?\\\0");
530 *err = mbstowcs_s(&converted_chars, &wpath[4], path_len, path, path_len);
531 } else {
532 *err = ENOMEM;
533 }
534 }
535 return wpath;
536 }
537
538 int JLI_Open(const char* name, int flags) {
539 int fd;
540 if (strlen(name) < MAX_PATH) {
541 fd = _open(name, flags);
542 } else {
543 errno_t err = ERROR_SUCCESS;
544 wchar_t* wpath = create_unc_path(name, &err);
545 if (err != ERROR_SUCCESS) {
546 if (wpath != NULL) JLI_MemFree(wpath);
547 errno = err;
548 return -1;
549 }
550 fd = _wopen(wpath, flags);
551 if (fd == -1) {
552 errno = GetLastError();
553 }
554 JLI_MemFree(wpath);
555 }
556 return fd;
557 }
558
559 JNIEXPORT void JNICALL
560 JLI_ReportErrorMessage(const char* fmt, ...) {
561 va_list vl;
562 va_start(vl,fmt);
563
564 if (IsJavaw()) {
565 char *message;
566
567 /* get the length of the string we need */
568 int n = _vscprintf(fmt, vl);
569
570 message = (char *)JLI_MemAlloc(n + 1);
571 _vsnprintf(message, n, fmt, vl);
572 message[n]='\0';
573 MessageBox(NULL, message, "Java Virtual Machine Launcher",
574 (MB_OK|MB_ICONSTOP|MB_APPLMODAL));
575 JLI_MemFree(message);
576 } else {
577 vfprintf(stderr, fmt, vl);
578 fprintf(stderr, "\n");
579 }
580 va_end(vl);
581 }
582
583 /*
584 * Just like JLI_ReportErrorMessage, except that it concatenates the system
585 * error message if any, its upto the calling routine to correctly
586 * format the separation of the messages.
587 */
588 JNIEXPORT void JNICALL
589 JLI_ReportErrorMessageSys(const char *fmt, ...)
590 {
591 va_list vl;
592
593 int save_errno = errno;
594 DWORD errval;
595 jboolean freeit = JNI_FALSE;
596 char *errtext = NULL;
597
598 va_start(vl, fmt);
599
600 if ((errval = GetLastError()) != 0) { /* Platform SDK / DOS Error */
601 int n = FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM|
602 FORMAT_MESSAGE_IGNORE_INSERTS|FORMAT_MESSAGE_ALLOCATE_BUFFER,
603 NULL, errval, 0, (LPTSTR)&errtext, 0, NULL);
604 if (errtext == NULL || n == 0) { /* Paranoia check */
605 errtext = "";
606 n = 0;
607 } else {
608 freeit = JNI_TRUE;
609 if (n > 2) { /* Drop final CR, LF */
610 if (errtext[n - 1] == '\n') n--;
611 if (errtext[n - 1] == '\r') n--;
612 errtext[n] = '\0';
613 }
614 }
615 } else { /* C runtime error that has no corresponding DOS error code */
616 errtext = strerror(save_errno);
617 }
618
619 if (IsJavaw()) {
620 char *message;
621 int mlen;
622 /* get the length of the string we need */
623 int len = mlen = _vscprintf(fmt, vl) + 1;
624 if (freeit) {
625 mlen += (int)JLI_StrLen(errtext);
626 }
627
628 message = (char *)JLI_MemAlloc(mlen);
629 _vsnprintf(message, len, fmt, vl);
630 message[len]='\0';
631
632 if (freeit) {
633 JLI_StrCat(message, errtext);
634 }
635
636 MessageBox(NULL, message, "Java Virtual Machine Launcher",
637 (MB_OK|MB_ICONSTOP|MB_APPLMODAL));
638
639 JLI_MemFree(message);
640 } else {
641 vfprintf(stderr, fmt, vl);
642 if (freeit) {
643 fprintf(stderr, "%s", errtext);
644 }
645 }
646 if (freeit) {
647 (void)LocalFree((HLOCAL)errtext);
648 }
649 va_end(vl);
650 }
651
652 JNIEXPORT void JNICALL
653 JLI_ReportExceptionDescription(JNIEnv * env) {
654 if (IsJavaw()) {
655 /*
656 * This code should be replaced by code which opens a window with
657 * the exception detail message, for now atleast put a dialog up.
658 */
659 MessageBox(NULL, "A Java Exception has occurred.", "Java Virtual Machine Launcher",
660 (MB_OK|MB_ICONSTOP|MB_APPLMODAL));
661 } else {
662 (*env)->ExceptionDescribe(env);
663 }
664 }
665
666 /*
667 * Wrapper for platform dependent unsetenv function.
668 */
669 int
670 UnsetEnv(char *name)
671 {
672 int ret;
673 char *buf = JLI_MemAlloc(JLI_StrLen(name) + 2);
674 buf = JLI_StrCat(JLI_StrCpy(buf, name), "=");
675 ret = _putenv(buf);
676 JLI_MemFree(buf);
677 return (ret);
678 }
679
680 /* --- Splash Screen shared library support --- */
681
682 static const char* SPLASHSCREEN_SO = "\\bin\\splashscreen.dll";
683
684 static HMODULE hSplashLib = NULL;
685
686 void* SplashProcAddress(const char* name) {
687 char libraryPath[MAXPATHLEN]; /* some extra space for JLI_StrCat'ing SPLASHSCREEN_SO */
688
689 if (!GetJREPath(libraryPath, MAXPATHLEN)) {
690 return NULL;
691 }
692 if (JLI_StrLen(libraryPath)+JLI_StrLen(SPLASHSCREEN_SO) >= MAXPATHLEN) {
693 return NULL;
694 }
695 JLI_StrCat(libraryPath, SPLASHSCREEN_SO);
696
697 if (!hSplashLib) {
698 hSplashLib = LoadLibrary(libraryPath);
699 }
700 if (hSplashLib) {
701 return GetProcAddress(hSplashLib, name);
702 } else {
703 return NULL;
704 }
705 }
706
707 void SplashFreeLibrary() {
708 if (hSplashLib) {
709 FreeLibrary(hSplashLib);
710 hSplashLib = NULL;
711 }
712 }
713
714 /*
715 * Signature adapter for _beginthreadex().
716 */
717 static unsigned __stdcall ThreadJavaMain(void* args) {
718 return (unsigned)JavaMain(args);
719 }
720
721 /*
722 * Block current thread and continue execution in a new thread.
723 */
724 int
725 CallJavaMainInNewThread(jlong stack_size, void* args) {
726 int rslt = 0;
727 unsigned thread_id;
728
729 #ifndef STACK_SIZE_PARAM_IS_A_RESERVATION
730 #define STACK_SIZE_PARAM_IS_A_RESERVATION (0x10000)
731 #endif
732
733 /*
734 * STACK_SIZE_PARAM_IS_A_RESERVATION is what we want, but it's not
735 * supported on older version of Windows. Try first with the flag; and
736 * if that fails try again without the flag. See MSDN document or HotSpot
737 * source (os_win32.cpp) for details.
738 */
739 HANDLE thread_handle =
740 (HANDLE)_beginthreadex(NULL,
741 (unsigned)stack_size,
742 ThreadJavaMain,
743 args,
744 STACK_SIZE_PARAM_IS_A_RESERVATION,
745 &thread_id);
746 if (thread_handle == NULL) {
747 thread_handle =
748 (HANDLE)_beginthreadex(NULL,
749 (unsigned)stack_size,
750 ThreadJavaMain,
751 args,
752 0,
753 &thread_id);
754 }
755
756 /* AWT preloading (AFTER main thread start) */
757 #ifdef ENABLE_AWT_PRELOAD
758 /* D3D preloading */
759 if (awtPreloadD3D != 0) {
760 char *envValue;
761 /* D3D routines checks env.var J2D_D3D if no appropriate
762 * command line params was specified
763 */
764 envValue = getenv("J2D_D3D");
765 if (envValue != NULL && JLI_StrCaseCmp(envValue, "false") == 0) {
766 awtPreloadD3D = 0;
767 }
768 /* Test that AWT preloading isn't disabled by J2D_D3D_PRELOAD env.var */
769 envValue = getenv("J2D_D3D_PRELOAD");
770 if (envValue != NULL && JLI_StrCaseCmp(envValue, "false") == 0) {
771 awtPreloadD3D = 0;
772 }
773 if (awtPreloadD3D < 0) {
774 /* If awtPreloadD3D is still undefined (-1), test
775 * if it is turned on by J2D_D3D_PRELOAD env.var.
776 * By default it's turned OFF.
777 */
778 awtPreloadD3D = 0;
779 if (envValue != NULL && JLI_StrCaseCmp(envValue, "true") == 0) {
780 awtPreloadD3D = 1;
781 }
782 }
783 }
784 if (awtPreloadD3D) {
785 AWTPreload(D3D_PRELOAD_FUNC);
786 }
787 #endif /* ENABLE_AWT_PRELOAD */
788
789 if (thread_handle) {
790 WaitForSingleObject(thread_handle, INFINITE);
791 GetExitCodeThread(thread_handle, &rslt);
792 CloseHandle(thread_handle);
793 } else {
794 rslt = JavaMain(args);
795 }
796
797 #ifdef ENABLE_AWT_PRELOAD
798 if (awtPreloaded) {
799 AWTPreloadStop();
800 }
801 #endif /* ENABLE_AWT_PRELOAD */
802
803 return rslt;
804 }
805
806 /*
807 * The implementation for finding classes from the bootstrap
808 * class loader, refer to java.h
809 */
810 static FindClassFromBootLoader_t *findBootClass = NULL;
811
812 jclass FindBootStrapClass(JNIEnv *env, const char *classname)
813 {
814 HMODULE hJvm;
815
816 if (findBootClass == NULL) {
817 hJvm = GetModuleHandle(JVM_DLL);
818 if (hJvm == NULL) return NULL;
819 /* need to use the demangled entry point */
820 findBootClass = (FindClassFromBootLoader_t *)GetProcAddress(hJvm,
821 "JVM_FindClassFromBootLoader");
822 if (findBootClass == NULL) {
823 JLI_ReportErrorMessage(DLL_ERROR4, "JVM_FindClassFromBootLoader");
824 return NULL;
825 }
826 }
827 return findBootClass(env, classname);
828 }
829
830 void
831 InitLauncher(boolean javaw)
832 {
833 INITCOMMONCONTROLSEX icx;
834
835 /*
836 * Required for javaw mode MessageBox output as well as for
837 * HotSpot -XX:+ShowMessageBoxOnError in java mode, an empty
838 * flag field is sufficient to perform the basic UI initialization.
839 */
840 memset(&icx, 0, sizeof(INITCOMMONCONTROLSEX));
841 icx.dwSize = sizeof(INITCOMMONCONTROLSEX);
842 InitCommonControlsEx(&icx);
843 _isjavaw = javaw;
844 JLI_SetTraceLauncher();
845 }
846
847
848 /* ============================== */
849 /* AWT preloading */
850 #ifdef ENABLE_AWT_PRELOAD
851
852 typedef int FnPreloadStart(void);
853 typedef void FnPreloadStop(void);
854 static FnPreloadStop *fnPreloadStop = NULL;
855 static HMODULE hPreloadAwt = NULL;
856
857 /*
858 * Starts AWT preloading
859 */
860 int AWTPreload(const char *funcName)
861 {
862 int result = -1;
863 /* load AWT library once (if several preload function should be called) */
864 if (hPreloadAwt == NULL) {
865 /* awt.dll is not loaded yet */
866 char libraryPath[MAXPATHLEN];
867 size_t jrePathLen = 0;
868 HMODULE hJava = NULL;
869 HMODULE hVerify = NULL;
870
871 while (1) {
872 /* awt.dll depends on jvm.dll & java.dll;
873 * jvm.dll is already loaded, so we need only java.dll;
874 * java.dll depends on MSVCRT lib & verify.dll.
875 */
876 if (!GetJREPath(libraryPath, MAXPATHLEN)) {
877 break;
878 }
879
880 /* save path length */
881 jrePathLen = JLI_StrLen(libraryPath);
882
883 if (jrePathLen + JLI_StrLen("\\bin\\verify.dll") >= MAXPATHLEN) {
884 /* jre path is too long, the library path will not fit there;
885 * report and abort preloading
886 */
887 JLI_ReportErrorMessage(JRE_ERROR11);
888 break;
889 }
890
891 /* load msvcrt 1st */
892 LoadMSVCRT();
893
894 /* load verify.dll */
895 JLI_StrCat(libraryPath, "\\bin\\verify.dll");
896 hVerify = LoadLibrary(libraryPath);
897 if (hVerify == NULL) {
898 break;
899 }
900
901 /* restore jrePath */
902 libraryPath[jrePathLen] = 0;
903 /* load java.dll */
904 JLI_StrCat(libraryPath, "\\bin\\" JAVA_DLL);
905 hJava = LoadLibrary(libraryPath);
906 if (hJava == NULL) {
907 break;
908 }
909
910 /* restore jrePath */
911 libraryPath[jrePathLen] = 0;
912 /* load awt.dll */
913 JLI_StrCat(libraryPath, "\\bin\\awt.dll");
914 hPreloadAwt = LoadLibrary(libraryPath);
915 if (hPreloadAwt == NULL) {
916 break;
917 }
918
919 /* get "preloadStop" func ptr */
920 fnPreloadStop = (FnPreloadStop *)GetProcAddress(hPreloadAwt, "preloadStop");
921
922 break;
923 }
924 }
925
926 if (hPreloadAwt != NULL) {
927 FnPreloadStart *fnInit = (FnPreloadStart *)GetProcAddress(hPreloadAwt, funcName);
928 if (fnInit != NULL) {
929 /* don't forget to stop preloading */
930 awtPreloaded = 1;
931
932 result = fnInit();
933 }
934 }
935
936 return result;
937 }
938
939 /*
940 * Terminates AWT preloading
941 */
942 void AWTPreloadStop() {
943 if (fnPreloadStop != NULL) {
944 fnPreloadStop();
945 }
946 }
947
948 #endif /* ENABLE_AWT_PRELOAD */
949
950 int
951 JVMInit(InvocationFunctions* ifn, jlong threadStackSize,
952 int argc, char **argv,
953 int mode, char *what, int ret)
954 {
955 ShowSplashScreen();
956 return ContinueInNewThread(ifn, threadStackSize, argc, argv, mode, what, ret);
957 }
958
959 void
960 PostJVMInit(JNIEnv *env, jclass mainClass, JavaVM *vm)
961 {
962 // stubbed out for windows and *nixes.
963 }
964
965 void
966 RegisterThread()
967 {
968 // stubbed out for windows and *nixes.
969 }
970
971 /*
972 * on windows, we return a false to indicate this option is not applicable
973 */
974 jboolean
975 ProcessPlatformOption(const char *arg)
976 {
977 return JNI_FALSE;
978 }
979
980 /*
981 * At this point we have the arguments to the application, and we need to
982 * check with original stdargs in order to compare which of these truly
983 * needs expansion. cmdtoargs will specify this if it finds a bare
984 * (unquoted) argument containing a glob character(s) ie. * or ?
985 */
986 jobjectArray
987 CreateApplicationArgs(JNIEnv *env, char **strv, int argc)
988 {
989 int i, j, idx;
990 size_t tlen;
991 jobjectArray outArray, inArray;
992 char *arg, **nargv;
993 jboolean needs_expansion = JNI_FALSE;
994 jmethodID mid;
995 int stdargc;
996 StdArg *stdargs;
997 int *appArgIdx;
998 int isTool;
999 jclass cls = GetLauncherHelperClass(env);
1000 NULL_CHECK0(cls);
1001
1002 if (argc == 0) {
1003 return NewPlatformStringArray(env, strv, argc);
1004 }
1005 // the holy grail we need to compare with.
1006 stdargs = JLI_GetStdArgs();
1007 stdargc = JLI_GetStdArgc();
1008
1009 // sanity check, this should never happen
1010 if (argc > stdargc) {
1011 JLI_TraceLauncher("Warning: app args is larger than the original, %d %d\n", argc, stdargc);
1012 JLI_TraceLauncher("passing arguments as-is.\n");
1013 return NewPlatformStringArray(env, strv, argc);
1014 }
1015
1016 // sanity check, match the args we have, to the holy grail
1017 idx = JLI_GetAppArgIndex();
1018 isTool = (idx == 0);
1019 if (isTool) { idx++; } // skip tool name
1020 JLI_TraceLauncher("AppArgIndex: %d points to %s\n", idx, stdargs[idx].arg);
1021
1022 appArgIdx = calloc(argc, sizeof(int));
1023 for (i = idx, j = 0; i < stdargc; i++) {
1024 if (isTool) { // filter -J used by tools to pass JVM options
1025 arg = stdargs[i].arg;
1026 if (arg[0] == '-' && arg[1] == 'J') {
1027 continue;
1028 }
1029 }
1030 appArgIdx[j++] = i;
1031 }
1032 // sanity check, ensure same number of arguments for application
1033 if (j != argc) {
1034 JLI_TraceLauncher("Warning: app args count doesn't match, %d %d\n", j, argc);
1035 JLI_TraceLauncher("passing arguments as-is.\n");
1036 JLI_MemFree(appArgIdx);
1037 return NewPlatformStringArray(env, strv, argc);
1038 }
1039
1040 // make a copy of the args which will be expanded in java if required.
1041 nargv = (char **)JLI_MemAlloc(argc * sizeof(char*));
1042 for (i = 0; i < argc; i++) {
1043 jboolean arg_expand;
1044 j = appArgIdx[i];
1045 arg_expand = (JLI_StrCmp(stdargs[j].arg, strv[i]) == 0)
1046 ? stdargs[j].has_wildcard
1047 : JNI_FALSE;
1048 if (needs_expansion == JNI_FALSE)
1049 needs_expansion = arg_expand;
1050
1051 // indicator char + String + NULL terminator, the java method will strip
1052 // out the first character, the indicator character, so no matter what
1053 // we add the indicator
1054 tlen = 1 + JLI_StrLen(strv[i]) + 1;
1055 nargv[i] = (char *) JLI_MemAlloc(tlen);
1056 if (JLI_Snprintf(nargv[i], tlen, "%c%s", arg_expand ? 'T' : 'F',
1057 strv[i]) < 0) {
1058 return NULL;
1059 }
1060 JLI_TraceLauncher("%s\n", nargv[i]);
1061 }
1062
1063 if (!needs_expansion) {
1064 // clean up any allocated memory and return back the old arguments
1065 for (i = 0 ; i < argc ; i++) {
1066 JLI_MemFree(nargv[i]);
1067 }
1068 JLI_MemFree(nargv);
1069 JLI_MemFree(appArgIdx);
1070 return NewPlatformStringArray(env, strv, argc);
1071 }
1072 NULL_CHECK0(mid = (*env)->GetStaticMethodID(env, cls,
1073 "expandArgs",
1074 "([Ljava/lang/String;)[Ljava/lang/String;"));
1075
1076 // expand the arguments that require expansion, the java method will strip
1077 // out the indicator character.
1078 NULL_CHECK0(inArray = NewPlatformStringArray(env, nargv, argc));
1079 outArray = (*env)->CallStaticObjectMethod(env, cls, mid, inArray);
1080 for (i = 0; i < argc; i++) {
1081 JLI_MemFree(nargv[i]);
1082 }
1083 JLI_MemFree(nargv);
1084 JLI_MemFree(appArgIdx);
1085 return outArray;
1086 }