/*** *crt0.c - C runtime initialization routine * * Copyright (c) 1989-2001, Microsoft Corporation. All rights reserved. * *Purpose: * This is the actual startup routine for apps. It calls the user's main * routine [w]main() or [w]WinMain after performing C Run-Time Library * initialization. * * With ifdefs, this source file also provides the source code for: * wcrt0.c the startup routine for console apps with wide chars * wincrt0.c the startup routine for Windows apps * wwincrt0.c the startup routine for Windows apps with wide chars * *Revision History: * 06-27-89 PHG Module created, based on asm version * 11-02-89 JCR Added DOS32QUERYSYSINFO to get osversion * 04-09-90 GJF Added #include . Put in explicit calling * types (_CALLTYPE1 or _CALLTYPE4) for __crt0(), * inherit(), __amsg_exit() and _cintDIV(). Also, fixed * the copyright and cleaned up the formatting a bit. * 04-10-90 GJF Fixed compiler warnings (-W3). * 08-08-90 GJF Added exception handling stuff (needed to support * runtime errors and signal()). * 08-31-90 GJF Removed 32 from API names. * 10-08-90 GJF New-style function declarators. * 12-05-90 GJF Fixed off-by-one error in inherit(). * 12-06-90 GJF Win32 version of inherit(). * 12-06-90 SRW Added _osfile back for win32. Changed _osfinfo from * an array of structures to an array of 32-bit handles * (_osfhnd) * 01-21-91 GJF ANSI naming. * 01-25-91 SRW Changed Win32 Process Startup [_WIN32_] * 02-01-91 SRW Removed usage of PPEB type [_WIN32_] * 02-05-91 SRW Changed to pass _osfile and _osfhnd arrays as binary * data to child process. [_WIN32_] * 04-02-91 GJF Need to get version number sooner so it can be used in * _heap_init. Prefixed an '_' onto BaseProcessStartup. * Version info now stored in _os[version|major|minor] and * _base[version|major|minor] (_WIN32_). * 04-10-91 PNT Added _MAC_ conditional * 04-26-91 SRW Removed level 3 warnings * 05-14-91 GJF Turn on exception handling for Dosx32. * 05-22-91 GJF Fixed careless errors. * 07-12-91 GJF Fixed one more careless error. * 08-13-91 GJF Removed definitions of _confh and _coninpfh. * 09-13-91 GJF Incorporated Stevewo's startup variations. * 11-07-91 GJF Revised try-except, fixed outdated comments on file * handle inheritance [_WIN32_]. * 12-02-91 SRW Fixed WinMain startup code to skip over first token * plus delimiters for the lpszCommandLine parameter. * 01-17-92 GJF Merge of NT and CRT version. Restored Stevewo's scheme * for unhandled exceptions. * 02-13-92 GJF For Win32, moved file inheritance stuff to ioinit.c. * Call to inherit() is replace by call to _ioinit(). * 03-23-92 OLM Created MAC version * 04-01-92 XY Add cinit call (MAC) * 04-16-92 DJM POSIX support * 06-10-92 PLM Added putenv support (MAC) * 08-26-92 SKS Add _osver, _winver, _winmajor, _winminor * 08-26-92 GJF Deleted version number(s) fetch from POSIX startup (it * involved a Win32 API call). * 09-30-92 SRW Call _heap_init before _mtinit * 03-20-93 SKS Remove obsolete variables _osmode, _cpumode, etc. * 04-01-93 CFW Change try-except to __try-__except * 04-05-93 JWM GUI apps now call MessageBox() from _amsg_exit(). * 04-06-93 SKS Replace _CRTAPI* with __cdecl * 04-19-93 SKS Remove obsolete variable _atopsp * 04-26-93 SKS Change _mtinit to return failure * remove a number of OS/2 (CRUISER) ifdefs * 04-26-93 GJF Made lpszCommandLine (unsigned char *) to deal with * chars > 127 in the command line. * 04-27-93 GJF Removed support for _RT_STACK, _RT_INTDIV, * _RT_INVALDISP and _RT_NONCONT. * 05-14-93 GJF Added support for quoted program names. * 09-08-93 CFW Added call to _initmbctable. * 09-15-93 CFW Use ANSI conformant "__" names. * 09-21-93 CFW Move _initmbctable call to _cinit(). * 11-05-93 CFW Undefine GetEnviromentStrings. * 11-08-93 GJF Guard as much init. code as possible with the __try - * __except statement, especially _cinit(). Also, * restored the call to __initmbctable to this module. * 11-19-93 CFW Add _wcmdln variable, enable wide char command line * only. * 11-23-93 CFW GetEnviromentStrings undef moved to internal.h. * 11-29-93 CFW Wide environment. * 12-21-93 CFW Fix API failure error handling. * 01-04-94 CFW Pass copy of environment to main. * 01-28-94 CFW Move environment copying to setenv.c. * 02-07-94 CFW POSIXify. * 03-30-93 CFW Use __crtXXX calls for Unicode model. * 04-08-93 CFW cinit() should be later. * 04-12-94 GJF Moved declaration of _[w]initenv to internal.h. * 04-14-94 GJF Enclosed whole source in #ifndef CRTDLL - #endif. * 09-02-94 SKS Fix inaccurate description in file header comment * 09-06-94 CFW Remove _MBCS_OS switch. * 09-06-94 GJF Added definitions of __error_mode and __app_type. * 10-14-94 BWT try->__try / except->__except for POSIX * 01-16-95 CFW Set default debug output for console. * 02-11-95 CFW PPC -> _M_MPPC. * 02-16-95 JWM Spliced _WIN32 & Mac versions. * 03-28-95 BWT Fail if unable to retrieve cmdline or envptr (fixes * stress bug). * 04-06-95 CFW Set default debug output for Mac. * 04-06-95 CFW Use __crtGetEnvironmentStringsA. * 04-26-95 CFW Change default debug output for Mac to debugger. * 07-04-95 GJF Interface to __crtGetEnvironmentStrings and _setenvp * changes slightly. * 07-07-95 CFW Simplify default report mode scheme. * 04-22-96 GJF Check for error on _heap_init. * 01-17-97 GJF For _heap_init() or _mtinit() failure, exit the * process without going through _exit(). * 07-24-97 GJF Moved building of lpszCommandLine to wincmdln.c. Also, * heap_init changed slightly to support option to use * heap running directly on Win32 API. * 08-06-97 GJF Moved __mbctype_initialized to crt0dat.c * 12-23-97 RKP Corrected posix use of _heap_init() * 02-27-98 RKP Added 64 bit support. * 10-02-98 GJF Use GetVersionEx instead of GetVersion and store OS ID * in _osplatform. * 11-13-98 KBF Moved RTC_Initialize from _cinit to just after * _heap_init * 05-11-99 KBF Wrap RTC support in #ifdef. * 05-17-99 PML Remove all Macintosh support. * 11-03-99 RDL Win64 POSIX warning fix. * 11-12-99 KBF Create 4 new COM+ specific entrypoints which return * instead of calling exit(). * 11-16-99 PML ... and remove them - linker problems mean new * entrypoints don't work. Instead, look directly at the * COM Descriptor Image Directory entry in the optional * header to see if we are a COM+ app. * 02-15-00 GB Changed GetModuleHandle to GetModuleHandleA in * check_complus_app. * 03-06-00 PML Call __crtExitProcess instead of ExitProcess. * 08-04-00 PML check_complus_app -> check_managed_app (VS7#117746). * 12-09-00 PML Tighten up check_managed_app tests (VS7#167293). * 03-17-01 PML _alloca the OSVERSIONINFO so /GS can work (vs7#224261) * 03-26-01 PML Use GetVersionExA, not GetVersionEx (vs7#230286) * 03-27-01 PML Call to _amsg_exit on startup failure now pushed up to * this level (vs7#231220) * 04-29-01 BWT Fix posix build * 10-11-01 BWT Replace GetModuleHandle(NULL) with &__ImageBase * 11-21-01 BWT Wrap ansi GetStartupInfo with try/except (it can raise * exceptions on failure) * 02-20-02 BWT prefast fixes - don't use alloca * *******************************************************************************/ #ifndef CRTDLL #include #include #include #include #include #include #ifndef _POSIX_ #include #include #else #include #include #include #endif #include #include #include #include /* * wWinMain is not yet defined in winbase.h. When it is, this should be * removed. */ #if defined(_WIN64) && defined(_M_IA64) #pragma section(".base", long, read, write) __declspec(allocate(".base")) extern IMAGE_DOS_HEADER __ImageBase; #else extern IMAGE_DOS_HEADER __ImageBase; #endif int WINAPI wWinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance, LPWSTR lpCmdLine, int nShowCmd ); #ifdef WPRFLAG _TUCHAR * __cdecl _wwincmdln(void); #else _TUCHAR * __cdecl _wincmdln(void); #endif /* * command line, environment, and a few other globals */ #ifdef WPRFLAG wchar_t *_wcmdln; /* points to wide command line */ #else char *_acmdln; /* points to command line */ #endif char *_aenvptr = NULL; /* points to environment block */ #ifndef _POSIX_ wchar_t *_wenvptr = NULL; /* points to wide environment block */ #endif #ifdef _POSIX_ char *_cmdlin; #endif void (__cdecl * _aexit_rtn)(int) = _exit; /* RT message return procedure */ static void __cdecl fast_error_exit(int); /* Error exit via ExitProcess */ static int __cdecl check_managed_app(void); /* Determine if a managed app */ /* * _error_mode and _apptype, together, determine how error messages are * written out. */ int __error_mode = _OUT_TO_DEFAULT; #ifdef _WINMAIN_ int __app_type = _GUI_APP; #else int __app_type = _CONSOLE_APP; #endif #ifdef _POSIX_ /*** *mainCRTStartup(void) * *Purpose: * This routine does the C runtime initialization, calls main(), and * then exits. It never returns. * *Entry: * *Exit: * This function never returns. * *******************************************************************************/ void mainCRTStartup( void ) { int mainret; int initret; char **ppch; extern char **environ; extern char * __PdxGetCmdLine(void); /* an API in the Posix SS */ extern main(int,char**); _cmdlin = __PdxGetCmdLine(); ppch = (char **)_cmdlin; __argv = ppch; // normalize argv pointers __argc = 0; while (NULL != *ppch) { *ppch += (int)(intptr_t)_cmdlin; ++__argc; ++ppch; } // normalize environ pointers ++ppch; environ = ppch; while (NULL != *ppch) { *ppch = *ppch + (int)(intptr_t)_cmdlin; ++ppch; } /* * If POSIX runtime needs to fetch and store POSIX verion info, * it should be done here. * * Get_and_save_version_info; */ #ifdef _MT _heap_init(1); /* initialize heap */ #else _heap_init(0); /* initialize heap */ #endif initret = _cinit(); /* do C data initialize */ if (initret != 0) _amsg_exit(initret); __try { mainret = main(__argc, __argv); } __except (EXCEPTION_EXECUTE_HANDLER) { switch (GetExceptionCode()) { case STATUS_ACCESS_VIOLATION: kill(getpid(), SIGSEGV); break; case STATUS_ILLEGAL_INSTRUCTION: case STATUS_PRIVILEGED_INSTRUCTION: kill(getpid(), SIGILL); break; case STATUS_FLOAT_DENORMAL_OPERAND: case STATUS_FLOAT_DIVIDE_BY_ZERO: case STATUS_FLOAT_INEXACT_RESULT: case STATUS_FLOAT_OVERFLOW: case STATUS_FLOAT_STACK_CHECK: case STATUS_FLOAT_UNDERFLOW: kill(getpid(), SIGFPE); break; default: kill(getpid(), SIGKILL); } mainret = -1; } exit(mainret); } #else /* ndef _POSIX_ */ /*** *mainCRTStartup(void) *wmainCRTStartup(void) *WinMainCRTStartup(void) *wWinMainCRTStartup(void) * *Purpose: * These routines do the C runtime initialization, call the appropriate * user entry function, and handle termination cleanup. For a managed * app, they then return the exit code back to the calling routine, which * is the managed startup code. For an unmanaged app, they call exit and * never return. * * Function: User entry called: * mainCRTStartup main * wmainCRTStartup wmain * WinMainCRTStartup WinMain * wWinMainCRTStartup wWinMain * *Entry: * *Exit: * Managed app: return value from main() et al, or the exception code if * execution was terminated by the __except guarding the call * to main(). * Unmanaged app: never return. * *******************************************************************************/ #ifdef _WINMAIN_ #ifdef WPRFLAG int wWinMainCRTStartup( #else int WinMainCRTStartup( #endif #else /* ndef _WINMAIN_ */ #ifdef WPRFLAG int wmainCRTStartup( #else int mainCRTStartup( #endif #endif /* _WINMAIN_ */ void ) { int initret; int mainret; OSVERSIONINFOA *posvi; int managedapp; #ifdef _WINMAIN_ _TUCHAR *lpszCommandLine; STARTUPINFO StartupInfo; #ifdef WPRFLAG GetStartupInfo(&StartupInfo); #else __try { GetStartupInfo( &StartupInfo ); } __except(EXCEPTION_EXECUTE_HANDLER) { return 255; } #endif #endif /* * Dynamically allocate the OSVERSIONINFOA buffer, so we avoid * triggering the /GS buffer overrun detection. That can't be * used here, since the guard cookie isn't available until we * initialize it from here! */ posvi = (OSVERSIONINFOA *)HeapAlloc(GetProcessHeap(), 0, sizeof(OSVERSIONINFOA)); if (!posvi) { return 255; } /* * Get the full Win32 version */ posvi->dwOSVersionInfoSize = sizeof(OSVERSIONINFOA); if ( !GetVersionExA(posvi) ) { HeapFree(GetProcessHeap(), 0, posvi); return 255; } _osplatform = posvi->dwPlatformId; _winmajor = posvi->dwMajorVersion; _winminor = posvi->dwMinorVersion; /* * The somewhat bizarre calculations of _osver and _winver are * required for backward compatibility (used to use GetVersion) */ _osver = (posvi->dwBuildNumber) & 0x07fff; HeapFree(GetProcessHeap(), 0, posvi); if ( _osplatform != VER_PLATFORM_WIN32_NT ) _osver |= 0x08000; _winver = (_winmajor << 8) + _winminor; /* * Determine if this is a managed application */ managedapp = check_managed_app(); #ifdef _MT if ( !_heap_init(1) ) /* initialize heap */ #else if ( !_heap_init(0) ) /* initialize heap */ #endif fast_error_exit(_RT_HEAPINIT); /* write message and die */ #ifdef _MT if( !_mtinit() ) /* initialize multi-thread */ fast_error_exit(_RT_THREAD); /* write message and die */ #endif /* * Initialize the Runtime Checks stuff */ #ifdef _RTC _RTC_Initialize(); #endif /* * Guard the remainder of the initialization code and the call * to user's main, or WinMain, function in a __try/__except * statement. */ __try { if ( _ioinit() < 0 ) /* initialize lowio */ _amsg_exit(_RT_LOWIOINIT); #ifdef WPRFLAG /* get wide cmd line info */ _wcmdln = (wchar_t *)__crtGetCommandLineW(); /* get wide environ info */ _wenvptr = (wchar_t *)__crtGetEnvironmentStringsW(); if ( _wsetargv() < 0 ) _amsg_exit(_RT_SPACEARG); if ( _wsetenvp() < 0 ) _amsg_exit(_RT_SPACEENV); #else /* get cmd line info */ _acmdln = (char *)GetCommandLineA(); /* get environ info */ _aenvptr = (char *)__crtGetEnvironmentStringsA(); if ( _setargv() < 0 ) _amsg_exit(_RT_SPACEARG); if ( _setenvp() < 0 ) _amsg_exit(_RT_SPACEENV); #endif initret = _cinit(); /* do C data initialize */ if (initret != 0) _amsg_exit(initret); #ifdef _WINMAIN_ #ifdef WPRFLAG lpszCommandLine = _wwincmdln(); mainret = wWinMain( #else lpszCommandLine = _wincmdln(); mainret = WinMain( #endif (HINSTANCE)&__ImageBase, NULL, lpszCommandLine, StartupInfo.dwFlags & STARTF_USESHOWWINDOW ? StartupInfo.wShowWindow : SW_SHOWDEFAULT ); #else /* _WINMAIN_ */ #ifdef WPRFLAG __winitenv = _wenviron; mainret = wmain(__argc, __wargv, _wenviron); #else __initenv = _environ; mainret = main(__argc, __argv, _environ); #endif #endif /* _WINMAIN_ */ if ( !managedapp ) exit(mainret); _cexit(); } __except ( _XcptFilter(GetExceptionCode(), GetExceptionInformation()) ) { /* * Should never reach here */ mainret = GetExceptionCode(); if ( !managedapp ) _exit(mainret); _c_exit(); } /* end of try - except */ return mainret; } #endif /* _POSIX_ */ /*** *_amsg_exit(rterrnum) - Fast exit fatal errors * *Purpose: * Exit the program with error code of 255 and appropriate error * message. * *Entry: * int rterrnum - error message number (amsg_exit only). * *Exit: * Calls exit() (for integer divide-by-0) or _exit() indirectly * through _aexit_rtn [amsg_exit]. * For multi-thread: calls _exit() function * *Exceptions: * *******************************************************************************/ void __cdecl _amsg_exit ( int rterrnum ) { #ifdef _WINMAIN_ if ( __error_mode == _OUT_TO_STDERR ) #else if ( __error_mode != _OUT_TO_MSGBOX ) #endif _FF_MSGBANNER(); /* write run-time error banner */ _NMSG_WRITE(rterrnum); /* write message */ _aexit_rtn(255); /* normally _exit(255) */ } /*** *fast_error_exit(rterrnum) - Faster exit fatal errors * *Purpose: * Exit the process with error code of 255 and appropriate error * message. * *Entry: * int rterrnum - error message number (amsg_exit only). * *Exit: * Calls ExitProcess (through __crtExitProcess). * *Exceptions: * *******************************************************************************/ static void __cdecl fast_error_exit ( int rterrnum ) { #ifdef _WINMAIN_ if ( __error_mode == _OUT_TO_STDERR ) #else if ( __error_mode != _OUT_TO_MSGBOX ) #endif _FF_MSGBANNER(); /* write run-time error banner */ _NMSG_WRITE(rterrnum); /* write message */ __crtExitProcess(255); /* normally _exit(255) */ } /*** *check_managed_app() - Check for a managed executable * *Purpose: * Determine if the EXE the startup code is linked into is a managed app * by looking for the COM Runtime Descriptor in the Image Data Directory * of the PE or PE+ header. * *Entry: * None * *Exit: * 1 if managed app, 0 if not. * *Exceptions: * *******************************************************************************/ static int __cdecl check_managed_app ( void ) { PIMAGE_DOS_HEADER pDOSHeader; PIMAGE_NT_HEADERS pPEHeader; PIMAGE_OPTIONAL_HEADER32 pNTHeader32; PIMAGE_OPTIONAL_HEADER64 pNTHeader64; pDOSHeader = (PIMAGE_DOS_HEADER)&__ImageBase; if ( pDOSHeader->e_magic != IMAGE_DOS_SIGNATURE ) return 0; pPEHeader = (PIMAGE_NT_HEADERS)((char *)pDOSHeader + pDOSHeader->e_lfanew); if ( pPEHeader->Signature != IMAGE_NT_SIGNATURE ) return 0; pNTHeader32 = (PIMAGE_OPTIONAL_HEADER32)&pPEHeader->OptionalHeader; switch ( pNTHeader32->Magic ) { case IMAGE_NT_OPTIONAL_HDR32_MAGIC: /* PE header */ if ( pNTHeader32->NumberOfRvaAndSizes <= IMAGE_DIRECTORY_ENTRY_COM_DESCRIPTOR ) return 0; return !! pNTHeader32 -> DataDirectory[IMAGE_DIRECTORY_ENTRY_COM_DESCRIPTOR] . VirtualAddress; case IMAGE_NT_OPTIONAL_HDR64_MAGIC: /* PE+ header */ pNTHeader64 = (PIMAGE_OPTIONAL_HEADER64)pNTHeader32; if ( pNTHeader64->NumberOfRvaAndSizes <= IMAGE_DIRECTORY_ENTRY_COM_DESCRIPTOR ) return 0; return !! pNTHeader64 -> DataDirectory[IMAGE_DIRECTORY_ENTRY_COM_DESCRIPTOR] . VirtualAddress; } /* Not PE or PE+, so not managed */ return 0; } #ifndef WPRFLAG #ifdef _POSIX_ /*** *RaiseException() - stub for posix FP routines * *Purpose: * Stub of a Win32 API that posix can't call * *Entry: * *Exit: * *Exceptions: * *******************************************************************************/ VOID WINAPI RaiseException( DWORD dwExceptionCode, DWORD dwExceptionFlags, DWORD nNumberOfArguments, const ULONG_PTR * lpArguments ) { } #endif /* _POSIX_ */ #endif /* WPRFLAG */ #endif /* CRTDLL */