Release Win16Lock during PROCESS_Create.
[wine] / loader / main.c
1 /*
2  * Main initialization code
3  */
4
5 #include <stdlib.h>
6 #include <sys/types.h>
7 #include <sys/stat.h>
8 #include <fcntl.h>
9 #include <unistd.h>
10 #include <string.h>
11 #include <errno.h>
12 #include "wine/winbase16.h"
13 #include "wine/winuser16.h"
14 #include "bitmap.h"
15 #include "comm.h"
16 #include "neexe.h"
17 #include "main.h"
18 #include "menu.h"
19 #include "message.h"
20 #include "dialog.h"
21 #include "drive.h"
22 #include "queue.h"
23 #include "sysmetrics.h"
24 #include "file.h"
25 #include "heap.h"
26 #include "keyboard.h"
27 #include "mouse.h"
28 #include "input.h"
29 #include "display.h"
30 #include "miscemu.h"
31 #include "options.h"
32 #include "process.h"
33 #include "spy.h"
34 #include "tweak.h"
35 #include "user.h"
36 #include "cursoricon.h"
37 #include "global.h"
38 #include "dce.h"
39 #include "shell.h"
40 #include "win.h"
41 #include "winproc.h"
42 #include "syslevel.h"
43 #include "services.h"
44 #include "winsock.h"
45 #include "thread.h"
46 #include "task.h"
47 #include "debug.h"
48 #include "psdrv.h"
49 #include "server.h"
50 #include "cursoricon.h"
51 #include "loadorder.h"
52
53 DEFAULT_DEBUG_CHANNEL(server)
54
55 int __winelib = 1;  /* Winelib run-time flag */
56
57 /***********************************************************************
58  *           Main initialisation routine
59  */
60 BOOL MAIN_MainInit(void)
61 {
62     /* Set server debug level */
63     CLIENT_SetDebug( TRACE_ON(server) );
64
65     /* Initialize syslevel handling */
66     SYSLEVEL_Init();
67
68     /* Initialize signal handling */
69     if (!SIGNAL_Init()) return FALSE;
70
71     /* Initialize kernel services thread */
72     if (!SERVICE_Init()) return FALSE;
73
74     /* Load the configuration file */
75     if (!PROFILE_LoadWineIni()) return FALSE;
76
77     /* Initialize module loadorder */
78     if (!MODULE_InitLoadOrder()) return FALSE;
79
80       /* Initialize DOS memory */
81     if (!DOSMEM_Init(0)) return FALSE;
82
83     /* Initialise DOS drives */
84     if (!DRIVE_Init()) return FALSE;
85
86     /* Initialise DOS directories */
87     if (!DIR_Init()) return FALSE;
88
89     /* Initialize event handling */
90     if (!EVENT_Init()) return FALSE;
91
92     /* Initialise WINSOCK handling */
93     if (!WINSOCK_Init()) return FALSE;
94
95     /* Initialize communications */
96     COMM_Init();
97
98     /* Initialize IO-port permissions */
99     IO_port_init();
100
101     /* registry initialisation */
102     SHELL_LoadRegistry();
103     
104     /* Read DOS config.sys */
105     if (!DOSCONF_ReadConfig()) return FALSE;
106
107     return TRUE;
108 }
109
110 /***********************************************************************
111  *           KERNEL initialisation routine
112  */
113 BOOL WINAPI MAIN_KernelInit(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
114 {
115     static BOOL initDone = FALSE;
116
117     HMODULE16 hModule;
118
119     if ( initDone ) return TRUE;
120     initDone = TRUE;
121
122     /* Initialize special KERNEL entry points */
123     hModule = GetModuleHandle16( "KERNEL" );
124     if ( hModule )
125     {
126         WORD cs, ds;
127
128         /* Initialize KERNEL.178 (__WINFLAGS) with the correct flags value */
129         NE_SetEntryPoint( hModule, 178, GetWinFlags16() );
130
131         /* Initialize KERNEL.454/455 (__FLATCS/__FLATDS) */
132         GET_CS(cs); GET_DS(ds);
133         NE_SetEntryPoint( hModule, 454, cs );
134         NE_SetEntryPoint( hModule, 455, ds );
135
136         /* Initialize KERNEL.THHOOK */
137         TASK_InstallTHHook((THHOOK *)PTR_SEG_TO_LIN(
138                                   (SEGPTR)NE_GetEntryPoint( hModule, 332 )));
139
140         /* Initialize the real-mode selector entry points */
141 #define SET_ENTRY_POINT( num, addr ) \
142         NE_SetEntryPoint( hModule, (num), GLOBAL_CreateBlock( GMEM_FIXED, \
143                           DOSMEM_MapDosToLinear(addr), 0x10000, hModule, \
144                           FALSE, FALSE, FALSE, NULL ))
145
146         SET_ENTRY_POINT( 183, 0x00000 );  /* KERNEL.183: __0000H */
147         SET_ENTRY_POINT( 174, 0xa0000 );  /* KERNEL.174: __A000H */
148         SET_ENTRY_POINT( 181, 0xb0000 );  /* KERNEL.181: __B000H */
149         SET_ENTRY_POINT( 182, 0xb8000 );  /* KERNEL.182: __B800H */
150         SET_ENTRY_POINT( 195, 0xc0000 );  /* KERNEL.195: __C000H */
151         SET_ENTRY_POINT( 179, 0xd0000 );  /* KERNEL.179: __D000H */
152         SET_ENTRY_POINT( 190, 0xe0000 );  /* KERNEL.190: __E000H */
153         NE_SetEntryPoint( hModule, 173, DOSMEM_BiosSysSeg );  /* KERNEL.173: __ROMBIOS */
154         NE_SetEntryPoint( hModule, 193, DOSMEM_BiosDataSeg ); /* KERNEL.193: __0040H */
155         NE_SetEntryPoint( hModule, 194, DOSMEM_BiosSysSeg );  /* KERNEL.194: __F000H */
156 #undef SET_ENTRY_POINT
157     }
158     return TRUE;
159 }
160
161 /***********************************************************************
162  *           GDI initialisation routine
163  */
164 BOOL WINAPI MAIN_GdiInit(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
165 {
166     NE_MODULE *pModule;
167
168     if ( GDI_HeapSel ) return TRUE;
169
170     /* Create GDI heap */
171     pModule = NE_GetPtr( GetModuleHandle16( "GDI" ) );
172     if ( pModule )
173     {
174         GDI_HeapSel = GlobalHandleToSel16( (NE_SEG_TABLE( pModule ) + 
175                                           pModule->dgroup - 1)->hSeg );
176     }
177     else
178     {
179         GDI_HeapSel = GlobalAlloc16( GMEM_FIXED, GDI_HEAP_SIZE );
180         LocalInit16( GDI_HeapSel, 0, GDI_HEAP_SIZE-1 );
181     }
182
183     if (!TWEAK_Init()) return FALSE;
184
185     /* GDI initialisation */
186     if(!GDI_Init()) return FALSE;
187
188
189     /* PSDRV initialization */
190     if(!PSDRV_Init()) return FALSE;
191
192     return TRUE;
193 }
194
195 /***********************************************************************
196  *           USER initialisation routine
197  */
198 BOOL WINAPI MAIN_UserInit(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
199 {
200     NE_MODULE *pModule;
201     int queueSize;
202
203     if ( USER_HeapSel ) return TRUE;
204
205     /* Create USER heap */
206     pModule = NE_GetPtr( GetModuleHandle16( "USER" ) );
207     if ( pModule )
208     {
209         USER_HeapSel = GlobalHandleToSel16( (NE_SEG_TABLE( pModule ) + 
210                                            pModule->dgroup - 1)->hSeg );
211     }
212     else
213     {
214         USER_HeapSel = GlobalAlloc16( GMEM_FIXED, 0x10000 );
215         LocalInit16( USER_HeapSel, 0, 0xffff );
216     }
217
218      /* Global atom table initialisation */
219     if (!ATOM_Init( USER_HeapSel )) return FALSE;
220
221     /* Initialize window handling (critical section) */
222     WIN_Init();
223
224     /* Initialize system colors and metrics*/
225     SYSMETRICS_Init();
226     SYSCOLOR_Init();
227
228     /* Create the DCEs */
229     DCE_Init();
230
231     /* Initialize timers */
232     if (!TIMER_Init()) return FALSE;
233     
234     /* Initialize window procedures */
235     if (!WINPROC_Init()) return FALSE;
236
237     /* Initialize built-in window classes */
238     if (!WIDGETS_Init()) return FALSE;
239
240     /* Initialize dialog manager */
241     if (!DIALOG_Init()) return FALSE;
242
243     /* Initialize menus */
244     if (!MENU_Init()) return FALSE;
245
246     /* Initialize cursor/icons */
247     CURSORICON_Init();
248
249     /* Initialize message spying */
250     if (!SPY_Init()) return FALSE;
251
252     /* Check wine.conf for old/bad entries */
253     if (!TWEAK_CheckConfiguration()) return FALSE;
254
255     /* Create system message queue */
256     queueSize = GetProfileIntA( "windows", "TypeAhead", 120 );
257     if (!QUEUE_CreateSysMsgQueue( queueSize )) return FALSE;
258
259     /* Set double click time */
260     SetDoubleClickTime( GetProfileIntA("windows","DoubleClickSpeed",452) );
261
262     /* Create task message queue for the initial task */
263     queueSize = GetProfileIntA( "windows", "DefaultQueueSize", 8 );
264     if (!SetMessageQueue( queueSize )) return FALSE;
265
266     /* Create desktop window */
267     if (!WIN_CreateDesktopWindow()) return FALSE;
268
269     /* Initialize keyboard driver */
270     KEYBOARD_Enable( keybd_event, InputKeyStateTable );
271
272     /* Initialize mouse driver */
273     MOUSE_Enable( mouse_event );
274
275     /* Start processing X events */
276     UserRepaintDisable16( FALSE );
277
278     return TRUE;
279 }
280
281
282 /***********************************************************************
283  *           Winelib initialisation routine
284  */
285 HINSTANCE MAIN_WinelibInit( int *argc, char *argv[] )
286 {
287     WINE_MODREF *wm;
288     NE_MODULE *pModule;
289     OFSTRUCT ofs;
290     HMODULE16 hModule;
291
292     /* Create the initial process */
293     if (!PROCESS_Init()) return 0;
294
295     /* Parse command line arguments */
296     MAIN_WineInit( argc, argv );
297
298     /* Main initialization */
299     if (!MAIN_MainInit()) return 0;
300
301     /* Initialize KERNEL */
302     if (!LoadLibraryA( "KERNEL32" )) return 0;
303
304     /* Create and switch to initial task */
305     if (!(wm = ELF_CreateDummyModule( argv[0], argv[0] )))
306         return 0;
307     PROCESS_Current()->exe_modref = wm;
308
309     strcpy( ofs.szPathName, wm->modname );
310     if ((hModule = MODULE_CreateDummyModule( &ofs, NULL )) < 32) return 0;
311     pModule = (NE_MODULE *)GlobalLock16( hModule );
312     pModule->flags = NE_FFLAGS_WIN32;
313     pModule->module32 = wm->module;
314
315     if (!TASK_Create( THREAD_Current(), pModule, 0, 0, FALSE )) return 0;
316
317     /* Initialize GDI and USER */
318     if (!LoadLibraryA( "GDI32.DLL" )) return 0;
319     if (!LoadLibraryA( "USER32.DLL" )) return 0;
320
321     return wm->module;
322 }
323
324 /***********************************************************************
325  *           ExitKernel16 (KERNEL.2)
326  *
327  * Clean-up everything and exit the Wine process.
328  *
329  */
330 void WINAPI ExitKernel16( void )
331 {
332     /* Do the clean-up stuff */
333
334     WriteOutProfiles16();
335     SHELL_SaveRegistry();
336
337     TerminateProcess( GetCurrentProcess(), 0 );
338 }
339