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