/
SDL_win32_main.c
356 lines (314 loc) · 7.68 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
224
225
226
227
228
/* 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));
229
230
/* Run the application main() code */
231
232
233
234
SDL_main(argc, argv);
/* Exit cleanly, calling atexit() functions */
exit(0);
235
236
237
/* Hush little compiler, don't you cry... */
return(0);
238
239
240
}
/* This is where execution begins [windowed apps] */
241
242
243
#ifdef _WIN32_WCE
int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrev, LPWSTR szCmdLine, int sw)
#else
244
int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrev, LPSTR szCmdLine, int sw)
245
#endif
246
247
248
249
250
{
HINSTANCE handle;
char **argv;
int argc;
char *cmdline;
251
252
253
254
255
256
DWORD pathlen;
#ifdef _WIN32_WCE
wchar_t path[MAX_PATH];
#else
char path[MAX_PATH];
#endif
257
258
259
260
#ifdef _WIN32_WCE
wchar_t *bufp;
int nLen;
#else
261
char *bufp;
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
278
279
280
281
282
pathlen = GetModuleFileName(NULL, path, SDL_TABLESIZE(path));
while ( pathlen > 0 && path[pathlen] != '\\' ) {
--pathlen;
}
path[pathlen] = '\0';
283
284
SDL_strcpy( stdoutPath, path );
SDL_strcat( stdoutPath, DIR_SEPERATOR STDOUT_FILE );
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_strcpy( stderrPath, path );
SDL_strcat( stderrPath, DIR_SEPERATOR STDERR_FILE );
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
325
#ifdef _WIN32_WCE
nLen = wcslen(szCmdLine)+128+1;
bufp = (wchar_t *)alloca(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
331
332
333
334
335
336
nLen = wcslen(bufp)+1;
cmdline = (char *)alloca(nLen);
if ( cmdline == NULL ) {
return OutOfMemory();
}
WideCharToMultiByte(CP_ACP, 0, bufp, -1, cmdline, nLen, NULL, NULL);
#else
337
338
/* Grab the command line (use alloca() on Windows) */
bufp = GetCommandLine();
339
cmdline = (char *)alloca(SDL_strlen(bufp)+1);
340
341
342
if ( cmdline == NULL ) {
return OutOfMemory();
}
343
SDL_strcpy(cmdline, bufp);
344
#endif
345
346
347
348
349
350
351
352
353
354
355
356
/* 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));
}