/
SDL_win32_main.c
371 lines (329 loc) · 8.16 KB
1
2
3
/*
SDL_main.c, placed in the public domain by Sam Lantinga 4/13/98
4
The WinMain function -- calls your program's main() function
5
6
7
8
9
*/
#include <stdio.h>
#include <stdlib.h>
10
11
#include "SDL_windows.h"
12
13
#ifdef _WIN32_WCE
# define DIR_SEPERATOR TEXT("\\")
14
15
16
17
# undef _getcwd
# define _getcwd(str,len) wcscpy(str,TEXT(""))
# define setbuf(f,b)
# define setvbuf(w,x,y,z)
18
19
20
21
22
23
24
25
# define fopen _wfopen
# define freopen _wfreopen
# define remove(x) DeleteFile(x)
# define strcat wcscat
#else
# define DIR_SEPERATOR TEXT("/")
# include <direct.h>
#endif
26
27
28
29
30
/* Include the SDL main definition header */
#include "SDL.h"
#include "SDL_main.h"
31
32
33
34
35
#ifdef main
# ifndef _WIN32_WCE_EMULATION
# undef main
# endif /* _WIN32_WCE_EMULATION */
#endif /* main */
36
37
/* The standard output files */
38
39
40
#define STDOUT_FILE TEXT("stdout.txt")
#define STDERR_FILE TEXT("stderr.txt")
41
#ifndef NO_STDIO_REDIRECT
42
43
44
45
46
47
48
# ifdef _WIN32_WCE
static wchar_t stdoutPath[MAX_PATH];
static wchar_t stderrPath[MAX_PATH];
# else
static char stdoutPath[MAX_PATH];
static char stderrPath[MAX_PATH];
# endif
49
50
#endif
51
#if defined(_WIN32_WCE) && _WIN32_WCE < 300
52
53
54
55
/* seems to be undefined in Win CE although in online help */
#define isspace(a) (((CHAR)a == ' ') || ((CHAR)a == '\t'))
/* seems to be undefined in Win CE although in online help */
56
char *SDL_strrchr(char *str, int c)
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
{
char *p;
/* Skip to the end of the string */
p=str;
while (*p)
p++;
/* Look for the given character */
while ( (p >= str) && (*p != (CHAR)c) )
p--;
/* Return NULL if character not found */
if ( p < str ) {
p = NULL;
}
return p;
}
75
#endif /* _WIN32_WCE < 300 */
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
/* Parse a command line buffer into arguments */
static int ParseCommandLine(char *cmdline, char **argv)
{
char *bufp;
int argc;
argc = 0;
for ( bufp = cmdline; *bufp; ) {
/* Skip leading whitespace */
while ( isspace(*bufp) ) {
++bufp;
}
/* Skip over argument */
if ( *bufp == '"' ) {
++bufp;
if ( *bufp ) {
if ( argv ) {
argv[argc] = bufp;
}
++argc;
}
/* Skip over word */
while ( *bufp && (*bufp != '"') ) {
++bufp;
}
} else {
if ( *bufp ) {
if ( argv ) {
argv[argc] = bufp;
}
++argc;
}
/* Skip over word */
while ( *bufp && ! isspace(*bufp) ) {
++bufp;
}
}
if ( *bufp ) {
if ( argv ) {
*bufp = '\0';
}
++bufp;
}
}
if ( argv ) {
argv[argc] = NULL;
}
return(argc);
}
/* Show an error message */
static void ShowError(const char *title, const char *message)
{
/* If USE_MESSAGEBOX is defined, you need to link with user32.lib */
#ifdef USE_MESSAGEBOX
MessageBox(NULL, message, title, MB_ICONEXCLAMATION|MB_OK);
#else
fprintf(stderr, "%s: %s\n", title, message);
#endif
}
/* Pop up an out of memory message, returns to Windows */
static BOOL OutOfMemory(void)
{
ShowError("Fatal Error", "Out of memory - aborting");
return FALSE;
}
/* Remove the output files if there was no output written */
146
static void __cdecl cleanup_output(void)
147
{
148
#ifndef NO_STDIO_REDIRECT
149
150
FILE *file;
int empty;
151
#endif
152
153
154
155
156
/* Flush the output in case anything is queued */
fclose(stdout);
fclose(stderr);
157
#ifndef NO_STDIO_REDIRECT
158
/* See if the files have any output in them */
159
if ( stdoutPath[0] ) {
160
file = fopen(stdoutPath, TEXT("rb"));
161
162
163
164
165
166
if ( file ) {
empty = (fgetc(file) == EOF) ? 1 : 0;
fclose(file);
if ( empty ) {
remove(stdoutPath);
}
167
168
}
}
169
if ( stderrPath[0] ) {
170
file = fopen(stderrPath, TEXT("rb"));
171
172
173
174
175
176
if ( file ) {
empty = (fgetc(file) == EOF) ? 1 : 0;
fclose(file);
if ( empty ) {
remove(stderrPath);
}
177
178
}
}
179
#endif
180
181
}
182
183
#if defined(_MSC_VER) && !defined(_WIN32_WCE)
/* The VC++ compiler needs main defined */
184
185
186
187
188
189
190
191
192
193
194
#define console_main main
#endif
/* This is where execution begins [console apps] */
int console_main(int argc, char *argv[])
{
int n;
char *bufp, *appname;
/* Get the class name from argv[0] */
appname = argv[0];
195
if ( (bufp=SDL_strrchr(argv[0], '\\')) != NULL ) {
196
197
appname = bufp+1;
} else
198
if ( (bufp=SDL_strrchr(argv[0], '/')) != NULL ) {
199
200
201
appname = bufp+1;
}
202
203
if ( (bufp=SDL_strrchr(appname, '.')) == NULL )
n = SDL_strlen(appname);
204
205
206
207
208
209
210
else
n = (bufp-appname);
bufp = (char *)alloca(n+1);
if ( bufp == NULL ) {
return OutOfMemory();
}
211
SDL_strncpy(bufp, appname, n);
212
213
214
215
216
217
218
219
220
221
222
bufp[n] = '\0';
appname = bufp;
/* Load SDL dynamic link library */
if ( SDL_Init(SDL_INIT_NOPARACHUTE) < 0 ) {
ShowError("WinMain() error", SDL_GetError());
return(FALSE);
}
atexit(cleanup_output);
atexit(SDL_Quit);
223
#ifndef DISABLE_VIDEO
224
#if 0
225
/* Create and register our class *
226
227
228
229
DJM: If we do this here, the user nevers gets a chance to
putenv(SDL_WINDOWID). This is already called later by
the (DIB|DX5)_CreateWindow function, so it should be
safe to comment it out here.
230
231
232
233
if ( SDL_RegisterApp(appname, CS_BYTEALIGNCLIENT,
GetModuleHandle(NULL)) < 0 ) {
ShowError("WinMain() error", SDL_GetError());
exit(1);
234
}*/
235
236
237
238
239
240
241
242
#else
/* Sam:
We still need to pass in the application handle so that
DirectInput will initialize properly when SDL_RegisterApp()
is called later in the video initialization.
*/
SDL_SetModuleHandle(GetModuleHandle(NULL));
#endif /* 0 */
243
244
245
#endif /* !DISABLE_VIDEO */
/* Run the application main() code */
246
247
248
249
SDL_main(argc, argv);
/* Exit cleanly, calling atexit() functions */
exit(0);
250
251
252
/* Hush little compiler, don't you cry... */
return(0);
253
254
255
}
/* This is where execution begins [windowed apps] */
256
257
258
#ifdef _WIN32_WCE
int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrev, LPWSTR szCmdLine, int sw)
#else
259
int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrev, LPSTR szCmdLine, int sw)
260
#endif
261
262
263
264
265
{
HINSTANCE handle;
char **argv;
int argc;
char *cmdline;
266
267
268
269
270
271
DWORD pathlen;
#ifdef _WIN32_WCE
wchar_t path[MAX_PATH];
#else
char path[MAX_PATH];
#endif
272
273
274
275
#ifdef _WIN32_WCE
wchar_t *bufp;
int nLen;
#else
276
char *bufp;
277
#endif
278
279
280
281
282
283
284
285
#ifndef NO_STDIO_REDIRECT
FILE *newfp;
#endif
/* Start up DDHELP.EXE before opening any files, so DDHELP doesn't
keep them open. This is a hack.. hopefully it will be fixed
someday. DDHELP.EXE starts up the first time DDRAW.DLL is loaded.
*/
286
handle = LoadLibrary(TEXT("DDRAW.DLL"));
287
288
289
290
291
if ( handle != NULL ) {
FreeLibrary(handle);
}
#ifndef NO_STDIO_REDIRECT
292
293
294
295
296
297
pathlen = GetModuleFileName(NULL, path, SDL_TABLESIZE(path));
while ( pathlen > 0 && path[pathlen] != '\\' ) {
--pathlen;
}
path[pathlen] = '\0';
298
299
SDL_strcpy( stdoutPath, path );
SDL_strcat( stdoutPath, DIR_SEPERATOR STDOUT_FILE );
300
301
/* Redirect standard input and standard output */
302
303
304
newfp = freopen(stdoutPath, TEXT("w"), stdout);
#ifndef _WIN32_WCE
305
306
if ( newfp == NULL ) { /* This happens on NT */
#if !defined(stdout)
307
stdout = fopen(stdoutPath, TEXT("w"));
308
#else
309
newfp = fopen(stdoutPath, TEXT("w"));
310
311
312
313
314
if ( newfp ) {
*stdout = *newfp;
}
#endif
}
315
#endif /* _WIN32_WCE */
316
317
318
SDL_strcpy( stderrPath, path );
SDL_strcat( stderrPath, DIR_SEPERATOR STDERR_FILE );
319
320
321
newfp = freopen(stderrPath, TEXT("w"), stderr);
#ifndef _WIN32_WCE
322
323
if ( newfp == NULL ) { /* This happens on NT */
#if !defined(stderr)
324
stderr = fopen(stderrPath, TEXT("w"));
325
#else
326
newfp = fopen(stderrPath, TEXT("w"));
327
328
329
330
331
if ( newfp ) {
*stderr = *newfp;
}
#endif
}
332
333
#endif /* _WIN32_WCE */
334
335
336
337
setvbuf(stdout, NULL, _IOLBF, BUFSIZ); /* Line buffered */
setbuf(stderr, NULL); /* No buffering */
#endif /* !NO_STDIO_REDIRECT */
338
339
340
#ifdef _WIN32_WCE
nLen = wcslen(szCmdLine)+128+1;
bufp = (wchar_t *)alloca(nLen*2);
341
wcscpy (bufp, TEXT("\""));
342
GetModuleFileName(NULL, bufp+1, 128-3);
343
wcscpy (bufp+wcslen(bufp), TEXT("\" "));
344
wcsncpy(bufp+wcslen(bufp), szCmdLine,nLen-wcslen(bufp));
345
346
347
348
349
350
351
nLen = wcslen(bufp)+1;
cmdline = (char *)alloca(nLen);
if ( cmdline == NULL ) {
return OutOfMemory();
}
WideCharToMultiByte(CP_ACP, 0, bufp, -1, cmdline, nLen, NULL, NULL);
#else
352
353
/* Grab the command line (use alloca() on Windows) */
bufp = GetCommandLine();
354
cmdline = (char *)alloca(SDL_strlen(bufp)+1);
355
356
357
if ( cmdline == NULL ) {
return OutOfMemory();
}
358
SDL_strcpy(cmdline, bufp);
359
#endif
360
361
362
363
364
365
366
367
368
369
370
371
/* Parse it into argv and argc */
argc = ParseCommandLine(cmdline, NULL);
argv = (char **)alloca((argc+1)*(sizeof *argv));
if ( argv == NULL ) {
return OutOfMemory();
}
ParseCommandLine(cmdline, argv);
/* Run the main program (after a little SDL initialization) */
return(console_main(argc, argv));
}