/
SDL_win32_main.c
360 lines (317 loc) · 7.85 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
# define fopen _wfopen
# define freopen _wfreopen
# define remove(x) DeleteFile(x)
#else
# define DIR_SEPERATOR TEXT("/")
# include <direct.h>
#endif
25
26
27
28
29
/* Include the SDL main definition header */
#include "SDL.h"
#include "SDL_main.h"
30
31
32
33
34
#ifdef main
# ifndef _WIN32_WCE_EMULATION
# undef main
# endif /* _WIN32_WCE_EMULATION */
#endif /* main */
35
36
/* The standard output files */
37
38
39
#define STDOUT_FILE TEXT("stdout.txt")
#define STDERR_FILE TEXT("stderr.txt")
40
#ifndef NO_STDIO_REDIRECT
41
42
43
44
45
46
47
# 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
48
49
#endif
50
#if defined(_WIN32_WCE) && _WIN32_WCE < 300
51
52
53
54
/* 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 */
55
char *SDL_strrchr(char *str, int c)
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
{
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;
}
74
#endif /* _WIN32_WCE < 300 */
75
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
/* 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 */
145
static void __cdecl cleanup_output(void)
146
{
147
#ifndef NO_STDIO_REDIRECT
148
149
FILE *file;
int empty;
150
#endif
151
152
153
154
155
/* Flush the output in case anything is queued */
fclose(stdout);
fclose(stderr);
156
#ifndef NO_STDIO_REDIRECT
157
/* See if the files have any output in them */
158
if ( stdoutPath[0] ) {
159
file = fopen(stdoutPath, TEXT("rb"));
160
161
162
163
164
165
if ( file ) {
empty = (fgetc(file) == EOF) ? 1 : 0;
fclose(file);
if ( empty ) {
remove(stdoutPath);
}
166
167
}
}
168
if ( stderrPath[0] ) {
169
file = fopen(stderrPath, TEXT("rb"));
170
171
172
173
174
175
if ( file ) {
empty = (fgetc(file) == EOF) ? 1 : 0;
fclose(file);
if ( empty ) {
remove(stderrPath);
}
176
177
}
}
178
#endif
179
180
}
181
182
#if defined(_MSC_VER) && !defined(_WIN32_WCE)
/* The VC++ compiler needs main defined */
183
184
185
186
187
188
189
190
#define console_main main
#endif
/* This is where execution begins [console apps] */
int console_main(int argc, char *argv[])
{
int n;
char *bufp, *appname;
191
int status;
192
193
194
/* 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
else
n = (bufp-appname);
207
bufp = SDL_stack_alloc(char, n+1);
208
209
210
if ( bufp == NULL ) {
return OutOfMemory();
}
211
SDL_strlcpy(bufp, appname, n);
212
213
214
215
216
217
218
219
220
221
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);
222
223
224
225
226
227
/* 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));
228
229
/* Run the application main() code */
230
status = SDL_main(argc, argv);
231
232
/* Exit cleanly, calling atexit() functions */
233
exit(status);
234
235
/* Hush little compiler, don't you cry... */
236
return 0;
237
238
239
}
/* This is where execution begins [windowed apps] */
240
241
242
#ifdef _WIN32_WCE
int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrev, LPWSTR szCmdLine, int sw)
#else
243
int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrev, LPSTR szCmdLine, int sw)
244
#endif
245
246
247
248
249
{
HINSTANCE handle;
char **argv;
int argc;
char *cmdline;
250
251
252
253
254
255
DWORD pathlen;
#ifdef _WIN32_WCE
wchar_t path[MAX_PATH];
#else
char path[MAX_PATH];
#endif
256
257
258
259
#ifdef _WIN32_WCE
wchar_t *bufp;
int nLen;
#else
260
char *bufp;
261
size_t nLen;
262
#endif
263
264
265
266
267
268
269
270
#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.
*/
271
handle = LoadLibrary(TEXT("DDRAW.DLL"));
272
273
274
275
276
if ( handle != NULL ) {
FreeLibrary(handle);
}
#ifndef NO_STDIO_REDIRECT
277
pathlen = GetModuleFileName(NULL, path, SDL_arraysize(path));
278
279
280
281
282
while ( pathlen > 0 && path[pathlen] != '\\' ) {
--pathlen;
}
path[pathlen] = '\0';
283
284
SDL_strlcpy( stdoutPath, path, SDL_arraysize(stdoutPath) );
SDL_strlcat( stdoutPath, DIR_SEPERATOR STDOUT_FILE, SDL_arraysize(stdoutPath) );
285
286
/* Redirect standard input and standard output */
287
288
289
newfp = freopen(stdoutPath, TEXT("w"), stdout);
#ifndef _WIN32_WCE
290
291
if ( newfp == NULL ) { /* This happens on NT */
#if !defined(stdout)
292
stdout = fopen(stdoutPath, TEXT("w"));
293
#else
294
newfp = fopen(stdoutPath, TEXT("w"));
295
296
297
298
299
if ( newfp ) {
*stdout = *newfp;
}
#endif
}
300
#endif /* _WIN32_WCE */
301
302
303
SDL_strlcpy( stderrPath, path, SDL_arraysize(stderrPath) );
SDL_strlcat( stderrPath, DIR_SEPERATOR STDERR_FILE, SDL_arraysize(stderrPath) );
304
305
306
newfp = freopen(stderrPath, TEXT("w"), stderr);
#ifndef _WIN32_WCE
307
308
if ( newfp == NULL ) { /* This happens on NT */
#if !defined(stderr)
309
stderr = fopen(stderrPath, TEXT("w"));
310
#else
311
newfp = fopen(stderrPath, TEXT("w"));
312
313
314
315
316
if ( newfp ) {
*stderr = *newfp;
}
#endif
}
317
318
#endif /* _WIN32_WCE */
319
320
321
322
setvbuf(stdout, NULL, _IOLBF, BUFSIZ); /* Line buffered */
setbuf(stderr, NULL); /* No buffering */
#endif /* !NO_STDIO_REDIRECT */
323
324
#ifdef _WIN32_WCE
nLen = wcslen(szCmdLine)+128+1;
325
bufp = SDL_stack_alloc(wchar_t, nLen*2);
326
wcscpy (bufp, TEXT("\""));
327
GetModuleFileName(NULL, bufp+1, 128-3);
328
wcscpy (bufp+wcslen(bufp), TEXT("\" "));
329
wcsncpy(bufp+wcslen(bufp), szCmdLine,nLen-wcslen(bufp));
330
nLen = wcslen(bufp)+1;
331
cmdline = SDL_stack_alloc(wchar_t, nLen);
332
333
334
335
336
if ( cmdline == NULL ) {
return OutOfMemory();
}
WideCharToMultiByte(CP_ACP, 0, bufp, -1, cmdline, nLen, NULL, NULL);
#else
337
/* Grab the command line */
338
bufp = GetCommandLine();
339
340
nLen = SDL_strlen(bufp)+1;
cmdline = SDL_stack_alloc(char, nLen);
341
342
343
if ( cmdline == NULL ) {
return OutOfMemory();
}
344
SDL_strlcpy(cmdline, bufp, nLen);
345
#endif
346
347
348
/* Parse it into argv and argc */
argc = ParseCommandLine(cmdline, NULL);
349
argv = SDL_stack_alloc(char*, argc+1);
350
351
352
353
354
355
if ( argv == NULL ) {
return OutOfMemory();
}
ParseCommandLine(cmdline, argv);
/* Run the main program (after a little SDL initialization) */
356
console_main(argc, argv);
357
358
359
/* Hush little compiler, don't you cry... */
return 0;
360
}