2 * Kernel initialization code
4 * Copyright 2000 Alexandre Julliard
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 #include "wine/port.h"
34 #include "wine/winbase16.h"
35 #include "wine/library.h"
42 #include "stackframe.h"
44 #include "console_private.h"
46 extern void LOCALE_Init(void);
47 extern BOOL RELAY_Init(void);
48 extern void COMPUTERNAME_Init(void);
50 extern int __wine_set_signal_handler(unsigned, int (*)(unsigned));
51 /* memory/environ.c */
52 extern void ENV_CopyStartupInformation(void);
54 extern int main_create_flags;
56 static CRITICAL_SECTION ldt_section;
57 static CRITICAL_SECTION_DEBUG critsect_debug =
60 { &critsect_debug.ProcessLocksList, &critsect_debug.ProcessLocksList },
61 0, 0, { 0, (DWORD)(__FILE__ ": ldt_section") }
63 static CRITICAL_SECTION ldt_section = { &critsect_debug, -1, 0, 0, 0, 0 };
65 /***********************************************************************
66 * locking for LDT routines
68 static void ldt_lock(void)
70 RtlEnterCriticalSection( &ldt_section );
73 static void ldt_unlock(void)
75 RtlLeaveCriticalSection( &ldt_section );
79 /***********************************************************************
80 * KERNEL thread initialisation routine
82 static void thread_attach(void)
84 /* allocate the 16-bit stack (FIXME: should be done lazily) */
85 HGLOBAL16 hstack = K32WOWGlobalAlloc16( GMEM_FIXED, 0x10000 );
86 NtCurrentTeb()->stack_sel = GlobalHandleToSel16( hstack );
87 NtCurrentTeb()->cur_stack = MAKESEGPTR( NtCurrentTeb()->stack_sel,
88 0x10000 - sizeof(STACK16FRAME) );
92 /***********************************************************************
93 * KERNEL thread finalisation routine
95 static void thread_detach(void)
97 /* free the 16-bit stack */
98 K32WOWGlobalFree16( NtCurrentTeb()->stack_sel );
99 NtCurrentTeb()->cur_stack = 0;
103 /***********************************************************************
104 * KERNEL process initialisation routine
106 static BOOL process_attach(void)
111 FILE_umask = umask(0777);
114 /* Setup codepage info */
117 /* Initialize relay entry points */
118 if (!RELAY_Init()) return FALSE;
120 /* Initialize DOS memory */
121 if (!DOSMEM_Init(0)) return FALSE;
123 /* Setup computer name */
126 /* copy process information from ntdll */
127 ENV_CopyStartupInformation();
129 if ((hModule = LoadLibrary16( "krnl386.exe" )) >= 32)
131 /* Initialize special KERNEL entry points */
133 /* Initialize KERNEL.178 (__WINFLAGS) with the correct flags value */
134 NE_SetEntryPoint( hModule, 178, GetWinFlags16() );
136 /* Initialize KERNEL.454/455 (__FLATCS/__FLATDS) */
137 NE_SetEntryPoint( hModule, 454, wine_get_cs() );
138 NE_SetEntryPoint( hModule, 455, wine_get_ds() );
140 /* Initialize KERNEL.THHOOK */
141 TASK_InstallTHHook(MapSL((SEGPTR)GetProcAddress16( hModule, (LPCSTR)332 )));
143 /* Initialize the real-mode selector entry points */
144 #define SET_ENTRY_POINT( num, addr ) \
145 NE_SetEntryPoint( hModule, (num), GLOBAL_CreateBlock( GMEM_FIXED, \
146 DOSMEM_MapDosToLinear(addr), 0x10000, hModule, \
147 WINE_LDT_FLAGS_DATA ))
149 SET_ENTRY_POINT( 174, 0xa0000 ); /* KERNEL.174: __A000H */
150 SET_ENTRY_POINT( 181, 0xb0000 ); /* KERNEL.181: __B000H */
151 SET_ENTRY_POINT( 182, 0xb8000 ); /* KERNEL.182: __B800H */
152 SET_ENTRY_POINT( 195, 0xc0000 ); /* KERNEL.195: __C000H */
153 SET_ENTRY_POINT( 179, 0xd0000 ); /* KERNEL.179: __D000H */
154 SET_ENTRY_POINT( 190, 0xe0000 ); /* KERNEL.190: __E000H */
155 NE_SetEntryPoint( hModule, 183, DOSMEM_0000H ); /* KERNEL.183: __0000H */
156 NE_SetEntryPoint( hModule, 173, DOSMEM_BiosSysSeg ); /* KERNEL.173: __ROMBIOS */
157 NE_SetEntryPoint( hModule, 193, DOSMEM_BiosDataSeg ); /* KERNEL.193: __0040H */
158 NE_SetEntryPoint( hModule, 194, DOSMEM_BiosSysSeg ); /* KERNEL.194: __F000H */
159 #undef SET_ENTRY_POINT
162 /* Force loading of some dlls */
163 LoadLibrary16( "system" );
165 /* Create 16-bit task */
166 TASK_CreateMainTask();
168 /* Create the shared heap for broken win95 native dlls */
169 HeapCreate( HEAP_SHARED, 0, 0 );
171 /* initialize LDT locking */
172 wine_ldt_init_locking( ldt_lock, ldt_unlock );
174 /* finish the process initialisation for console bits, if needed */
175 __wine_set_signal_handler(SIGINT, CONSOLE_HandleCtrlC);
177 if (main_create_flags & CREATE_NEW_CONSOLE)
179 HMODULE mod = GetModuleHandleA(0);
180 if (RtlImageNtHeader(mod)->OptionalHeader.Subsystem == IMAGE_SUBSYSTEM_WINDOWS_CUI)
183 else if (!(main_create_flags & DETACHED_PROCESS))
185 /* 1/ shall inherit console + handles
186 * 2/ shall create std handles, if handles are not inherited
187 * TBD when not using wineserver handles for console handles
191 if (main_create_flags & CREATE_NEW_PROCESS_GROUP)
192 SetConsoleCtrlHandler(NULL, TRUE);
198 /***********************************************************************
199 * KERNEL initialisation routine
201 BOOL WINAPI MAIN_KernelInit( HINSTANCE hinst, DWORD reason, LPVOID reserved )
205 case DLL_PROCESS_ATTACH:
206 return process_attach();
207 case DLL_THREAD_ATTACH:
210 case DLL_THREAD_DETACH:
213 case DLL_PROCESS_DETACH:
214 WriteOutProfiles16();
220 /***********************************************************************
221 * EnableDos (KERNEL.41)
222 * DisableDos (KERNEL.42)
223 * GetLastDiskChange (KERNEL.98)
224 * ValidateCodeSegments (KERNEL.100)
225 * KbdRst (KERNEL.123)
226 * EnableKernel (KERNEL.124)
227 * DisableKernel (KERNEL.125)
228 * ValidateFreeSpaces (KERNEL.200)
230 * BUNNY_351 (KERNEL.351)
231 * PIGLET_361 (KERNEL.361)
233 * Entry point for kernel functions that do nothing.
235 LONG WINAPI KERNEL_nop(void)
240 /***********************************************************************
241 * SwitchToThread (KERNEL32.@)
244 BOOL WINAPI SwitchToThread(void)