annotate dmsimple.c @ 599:71539fc4ba5a

Use dmres_find() instead of dmf_open().
author Matti Hamalainen <ccr@tnsp.org>
date Fri, 12 Apr 2013 08:01:00 +0300
parents 8a9361179a1a
children 663ae037bc00
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
310
713c8018c3ce Fix includes in the dmsimple engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 278
diff changeset
1 #include <SDL.h>
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
2 #include "dmengine.h"
310
713c8018c3ce Fix includes in the dmsimple engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 278
diff changeset
3 #include "dmargs.h"
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
4 #include "dmtext.h"
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
5 #include "dmimage.h"
591
f165883c2ea6 #include the default setup image and font.
Matti Hamalainen <ccr@tnsp.org>
parents: 578
diff changeset
6 #include "setupfont.h"
f165883c2ea6 #include the default setup image and font.
Matti Hamalainen <ccr@tnsp.org>
parents: 578
diff changeset
7 #include "setupimage.h"
f165883c2ea6 #include the default setup image and font.
Matti Hamalainen <ccr@tnsp.org>
parents: 578
diff changeset
8
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
9
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
10 static DMEngineData engine;
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
11
121
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
12 static DMOptArg optList[] =
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
13 {
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
14 { 0, '?', "help", "Show this help", OPT_NONE },
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
15 { 1, 'v', "verbose", "Be more verbose", OPT_NONE },
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
16 { 2, 'f', "fs", "Fullscreen", OPT_NONE },
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
17 };
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
18
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
19 const int optListN = sizeof(optList) / sizeof(optList[0]);
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
20
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
21
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
22
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
23 static void argShowHelp()
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
24 {
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
25 dmPrintBanner(stdout, dmProgName, "[options]");
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
26 dmArgsPrintHelp(stdout, optList, optListN);
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
27 }
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
28
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
29
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
30 static BOOL argHandleOpt(const int optN, char *optArg, char *currArg)
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
31 {
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
32 (void) optArg;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
33
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
34 switch (optN)
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
35 {
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
36 case 0:
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
37 argShowHelp();
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
38 exit(0);
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
39 break;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
40
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
41 case 1:
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
42 dmVerbosity++;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
43 break;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
44
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
45 case 2:
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
46 engine.optVFlags |= SDL_FULLSCREEN;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
47 break;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
48
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
49 default:
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
50 dmError("Unknown option '%s'.\n", currArg);
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
51 return FALSE;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
52 }
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
53
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
54 return TRUE;
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
55 }
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
56
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
57
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
58 static void engineAudioCallback(void *userdata, Uint8 *stream, int len)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
59 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
60 (void) userdata;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
61
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
62 if (engine.paused)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
63 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
64 memset(stream, 0, len);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
65 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
66 else
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
67 #ifdef DM_USE_JSS
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
68 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
69 if (engine.dev != NULL)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
70 jvmRenderAudio(engine.dev, stream, len / jvmGetSampleSize(engine.dev));
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
71 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
72 #endif
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
73 #ifdef DM_USE_TREMOR
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
74 if (engine.audioPos + len >= engine.audioRes->rdataSize)
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
75 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
76 engine.exitFlag = TRUE;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
77 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
78 else
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
79 {
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
80 memcpy(stream, engine.audioRes->rdata + engine.audioPos, len);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
81 engine.audioPos += len;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
82 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
83 #endif
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
84 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
85
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
86
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
87 static int engineShowProgress(int loaded, int total)
40
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
88 {
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
89 int dx = 60,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
90 dh = 20,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
91 dw = engine.screen->w - (2 * dx),
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
92 dy = (engine.screen->h - dh) / 2;
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
93
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
94 if (SDL_MUSTLOCK(engine.screen) != 0 && SDL_LockSurface(engine.screen) != 0)
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
95 return DMERR_INIT_FAIL;
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
96
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
97 // Draw the progress bar
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
98 dmClearSurface(engine.screen, dmMapRGBA(engine.screen, 0,0,0,0));
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
99 dmFillRect(engine.screen, dx, dy, dx+dw, dy+dh, dmMapRGB(engine.screen, 255,255,255));
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
100 dmFillRect(engine.screen, dx+1, dy+1, dx+dw-1, dy+dh-1, dmMapRGB(engine.screen, 0,0,0));
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
101
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
102 if (total > 0)
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
103 {
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
104 dmFillRect(engine.screen,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
105 dx+3, dy+3,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
106 dx + 3 + ((dw - 3) * loaded) / total,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
107 dy + dh - 3,
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
108 dmMapRGB(engine.screen, 200,200,200));
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
109 }
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
110
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
111 // Flip screen
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
112 if (SDL_MUSTLOCK(engine.screen) != 0)
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
113 SDL_UnlockSurface(engine.screen);
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
114
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
115 SDL_Flip(engine.screen);
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
116 return DMERR_OK;
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
117 }
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
118
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
119
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
120 static int engineLoadResources()
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
121 {
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
122 int err, loaded = 0, total = 0;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
123
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
124 // First preload outside of the loop
359
59045853853d Make resource management re-entrant.
Matti Hamalainen <ccr@tnsp.org>
parents: 354
diff changeset
125 err = dmres_preload(engine.resources, TRUE, &loaded, &total);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
126
359
59045853853d Make resource management re-entrant.
Matti Hamalainen <ccr@tnsp.org>
parents: 354
diff changeset
127 while ((err = dmres_preload(engine.resources, FALSE, &loaded, &total)) == DMERR_PROGRESS)
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
128 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
129 // Show a nice progress bar while loading
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
130 if (total > 0 && (loaded % 2) == 0)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
131 {
40
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
132 if ((err = engineShowProgress(loaded, total)) != DMERR_OK)
a239b7d4e13b Modularize progress meter.
Matti Hamalainen <ccr@tnsp.org>
parents: 32
diff changeset
133 return err;
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
134 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
135 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
136
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
137 return err;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
138 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
139
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
140
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
141 static BOOL engineGenInitializeVideo(int width, int height, int depth, Uint32 flags)
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
142 {
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
143 dmPrint(1, "Initializing SDL video %d x %d x %dbpp, flags=0x%08x\n",
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
144 width, height, depth, flags);
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
145
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
146 SDL_FreeSurface(engine.screen);
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
147
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
148 engine.screen = SDL_SetVideoMode(width, height, depth, flags);
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
149 if (engine.screen == NULL)
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
150 {
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
151 dmError("Can't SDL_SetVideoMode(): %s\n", SDL_GetError());
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
152 return FALSE;
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
153 }
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
154
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
155 SDL_WM_SetCaption(dmProgDesc, dmProgName);
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
156
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
157 return TRUE;
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
158 }
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
159
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
160
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
161 static BOOL engineInitializeVideo()
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
162 {
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
163 return engineGenInitializeVideo(engine.optVidWidth, engine.optVidHeight,
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
164 engine.optVidDepth, engine.optVFlags);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
165 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
166
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
167
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
168 int engineVideoSetup()
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
169 {
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
170 DMBitmapFont *menuFont = NULL;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
171 DMResource *file = NULL;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
172 SDL_Surface *menuBgImage = NULL;
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
173 int result, menuState = -1, nmenuList, menuChoice = 0;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
174 DMScaledBlitFunc menuBgBlit;
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
175 char menuStr[128];
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
176
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
177 // Compute a list of valid modes
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
178
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
179
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
180 // Open video temporarily
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
181 if (!engineGenInitializeVideo(DM_VSETUP_WIDTH, DM_VSETUP_HEIGHT, 32, SDL_SWSURFACE | SDL_DOUBLEBUF))
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
182 goto out;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
183
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
184 // Fetch and decompress setup image, try regular resources first
599
71539fc4ba5a Use dmres_find() instead of dmf_open().
Matti Hamalainen <ccr@tnsp.org>
parents: 597
diff changeset
185 file = dmres_find(engine.resources, "SetupImage.png");
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
186 if (file == NULL)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
187 file = dmf_create_memio(NULL, "SetupImage", engineSetupImage, sizeof(engineSetupImage));
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
188
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
189 menuBgImage = dmLoadImage(file);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
190 dmf_close(file);
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
191 if (menuBgImage == NULL)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
192 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
193 dmError("Could not instantiate setup screen image, %d: %s\n",
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
194 result, dmErrorStr(result));
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
195 goto out;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
196 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
197
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
198 if (menuBgImage->w != DM_VSETUP_WIDTH ||
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
199 menuBgImage->h != DM_VSETUP_HEIGHT)
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
200 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
201 dmError("Setup screen background image does not match "
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
202 "required dimensions (%dx%d vs %dx%d)\n",
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
203 menuBgImage->w, menuBgImage->h,
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
204 DM_VSETUP_WIDTH, DM_VSETUP_HEIGHT);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
205 goto out;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
206 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
207
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
208
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
209 // Load up the bitmap font
599
71539fc4ba5a Use dmres_find() instead of dmf_open().
Matti Hamalainen <ccr@tnsp.org>
parents: 597
diff changeset
210 file = dmres_find(engine.resources, "SetupFont.dmf");
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
211 if (file == NULL)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
212 file = dmf_create_memio(NULL, "SetupFont", engineSetupFont, sizeof(engineSetupFont));
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
213
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
214 result = dmLoadBitmapFont(file, &menuFont);
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
215 dmf_close(file);
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
216 if (result != DMERR_OK)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
217 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
218 dmError("Could not instantiate setup screen font, %d: %s\n",
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
219 result, dmErrorStr(result));
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
220 goto out;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
221 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
222
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
223 SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
224 menuBgBlit = dmGetScaledBlitFunc(menuBgImage->format, engine.screen->format, DMD_NONE);
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
225 int menuEntryHeight = menuFont->height + 1,
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
226 menuHeight = DM_VSETUP_MENU_HEIGHT / menuEntryHeight;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
227
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
228 // Enter the main loop of the menu
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
229 menuState = 0;
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
230 while (!menuState)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
231 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
232 while (SDL_PollEvent(&engine.event))
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
233 switch (engine.event.type)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
234 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
235 case SDL_KEYDOWN:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
236 switch (engine.event.key.keysym.sym)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
237 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
238 case SDLK_ESCAPE:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
239 menuState = -1;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
240 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
241
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
242 case SDLK_SPACE:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
243 case SDLK_RETURN:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
244 menuState = 1;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
245 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
246
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
247 case SDLK_UP:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
248 if (menuChoice > 0)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
249 menuChoice--;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
250 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
251
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
252 case SDLK_DOWN:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
253 if (menuChoice < nmenuList - 1)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
254 menuChoice++;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
255 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
256
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
257 default:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
258 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
259 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
260
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
261 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
262
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
263 case SDL_QUIT:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
264 menuState = -1;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
265 break;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
266 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
267
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
268 // Draw frame
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
269 if (SDL_MUSTLOCK(engine.screen) != 0 && SDL_LockSurface(engine.screen) != 0)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
270 {
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
271 dmError("Can't lock surface.\n");
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
272 goto out;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
273 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
274
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
275 // Render the menu
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
276 dmClearSurface(engine.screen, dmMapRGB(engine.screen, 0,0,0));
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
277 menuBgBlit(menuBgImage, 0, 0, engine.screen->w, engine.screen->h, engine.screen);
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
278
597
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
279 // XXX/TODO: Some hardcoded bits here ...
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
280 int entry, yc = 0;
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
281 nmenuList = 5;
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
282
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
283 dmFillRect(engine.screen,
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
284 DM_VSETUP_MENU_XC,
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
285 DM_VSETUP_MENU_YC + (menuChoice * menuEntryHeight),
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
286 DM_VSETUP_MENU_XC + DM_VSETUP_MENU_WIDTH,
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
287 DM_VSETUP_MENU_YC + (menuChoice * menuEntryHeight) + menuEntryHeight + 2,
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
288 dmMapRGBA(engine.screen, 255, 255, 255, 100));
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
289
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
290 for (entry = 0; entry < nmenuList && entry < menuHeight; entry++)
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
291 {
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
292 snprintf(menuStr, sizeof(menuStr), "SUPERMEGA %d", menuHeight);
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
293 dmDrawBMTextConst(
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
294 engine.screen, menuFont, DMD_TRANSPARENT,
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
295 DM_VSETUP_MENU_XC + 2,
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
296 DM_VSETUP_MENU_YC + 2 + entry * menuEntryHeight,
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
297 menuStr);
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
298 }
8a9361179a1a More work on the video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 595
diff changeset
299
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
300
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
301 // Flip screen
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
302 if (SDL_MUSTLOCK(engine.screen) != 0)
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
303 SDL_UnlockSurface(engine.screen);
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
304
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
305 SDL_Flip(engine.screen);
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
306 SDL_Delay(20);
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
307 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
308
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
309 out:
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
310 return menuState;
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
311 }
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
312
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
313
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
314 int engineGetVideoAspect(int width, int height)
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
315 {
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
316 if (width > 0 && height > 0)
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
317 return (width * 1000) / height;
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
318 else
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
319 return 1;
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
320 }
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
321
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
322
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
323 int main(int argc, char *argv[])
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
324 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
325 int err;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
326 BOOL initSDL = FALSE;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
327
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
328 memset(&engine, 0, sizeof(engine));
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
329
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
330 // Pre-initialization
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
331 if ((err = demoPreInit(&engine)) != DMERR_OK)
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
332 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
333
121
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
334 if (!dmArgsProcess(argc, argv, optList, optListN,
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
335 argHandleOpt, NULL, FALSE))
16fc6e6cf3b5 Move option handling to the simple demo engine.
Matti Hamalainen <ccr@tnsp.org>
parents: 113
diff changeset
336 return DMERR_INIT_FAIL;
123
6f7356f3b91c Add engine startup messages showing prod name and "TNSP simple demoengine blurb".
Matti Hamalainen <ccr@tnsp.org>
parents: 122
diff changeset
337
6f7356f3b91c Add engine startup messages showing prod name and "TNSP simple demoengine blurb".
Matti Hamalainen <ccr@tnsp.org>
parents: 122
diff changeset
338 dmPrint(0,
6f7356f3b91c Add engine startup messages showing prod name and "TNSP simple demoengine blurb".
Matti Hamalainen <ccr@tnsp.org>
parents: 122
diff changeset
339 "%s\n"
312
99dc5d012081 Change startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 310
diff changeset
340 "%s\n"
99dc5d012081 Change startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 310
diff changeset
341 "TNSP simple demoengine initializing.\n",
123
6f7356f3b91c Add engine startup messages showing prod name and "TNSP simple demoengine blurb".
Matti Hamalainen <ccr@tnsp.org>
parents: 122
diff changeset
342 dmProgDesc, dmProgAuthor);
125
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
343
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
344 dmPrint(0,
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
345 "Using libSDL, "
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
346 #ifdef DM_USE_PACKFS
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
347 "zlib, "
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
348 #endif
125
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
349 #ifdef DM_USE_TREMOR
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
350 "Tremor Vorbis codec"
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
351 #endif
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
352 " and modified stb_image.\n"
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
353 "See README.txt for more information.\n");
5102ec9e9bce Add a blurb about used features/3rd party code (zlib, Tremor, SDL).
Matti Hamalainen <ccr@tnsp.org>
parents: 123
diff changeset
354
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
355 // Initialize resource subsystem
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
356 dmPrint(1, "Initializing resources subsystem.\n");
359
59045853853d Make resource management re-entrant.
Matti Hamalainen <ccr@tnsp.org>
parents: 354
diff changeset
357 if ((err = dmres_init(&engine.resources, engine.optPackFilename, engine.optDataPath, engine.optResFlags, engineClassifier)) != DMERR_OK)
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
358 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
359 dmError("Could not initialize resource manager, #%d: %s.\n", err, dmErrorStr(err));
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
360 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
361 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
362
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
363 // Initialize SDL components
122
5ba672ebe014 Add some verbose engine startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 121
diff changeset
364 dmPrint(1, "Initializing libSDL.\n");
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
365 if (SDL_Init(SDL_INIT_VIDEO | SDL_INIT_AUDIO | SDL_INIT_TIMER) != 0)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
366 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
367 dmError("Could not initialize SDL: %s\n", SDL_GetError());
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
368 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
369 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
370 initSDL = TRUE;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
371
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
372
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
373 // Present video mode selector
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
374 if (engine.optVidAspect <= 0)
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
375 engine.optVidAspect = engineGetVideoAspect(engine.optVidWidth, engine.optVidHeight);
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
376
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
377 if (engine.optVidSetup)
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
378 {
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
379 if ((err = engineVideoSetup()) <= 0)
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
380 goto error_exit;
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
381 }
578
cf5d44b36851 Add some initial code for video setup screen.
Matti Hamalainen <ccr@tnsp.org>
parents: 574
diff changeset
382
122
5ba672ebe014 Add some verbose engine startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 121
diff changeset
383 // Initialize audio parts
126
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
384 if (engine.optAfmt.freq == 0 && engine.optAfmt.channels == 0)
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
385 {
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
386 // Defaults, if none seem to be set
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
387 engine.optAfmt.freq = 44100;
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
388 engine.optAfmt.format = AUDIO_S16SYS;
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
389 engine.optAfmt.channels = 2;
316
a03e604f4e75 Adjust audio buffer size.
Matti Hamalainen <ccr@tnsp.org>
parents: 312
diff changeset
390 engine.optAfmt.samples = engine.optAfmt.freq / 16;
126
97488948215c Allow setting audio format settings.
Matti Hamalainen <ccr@tnsp.org>
parents: 125
diff changeset
391 }
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
392
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
393 #ifdef DM_USE_JSS
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
394 jssInit();
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
395
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
396 switch (engine.optAfmt.format)
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
397 {
110
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
398 case AUDIO_S16SYS: engine.jss_format = JSS_AUDIO_S16; break;
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
399 case AUDIO_U16SYS: engine.jss_format = JSS_AUDIO_U16; break;
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
400 case AUDIO_S8: engine.jss_format = JSS_AUDIO_S8; break;
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
401 case AUDIO_U8: engine.jss_format = JSS_AUDIO_U8; break;
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
402 }
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
403
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
404 dmPrint(1, "Initializing miniJSS mixer with fmt=%d, chn=%d, freq=%d\n",
110
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
405 engine.jss_format, engine.optAfmt.channels, engine.optAfmt.freq);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
406
110
8db49a23b393 Fixes to make the JSS audio subsystem support work again in the engine framework.
Matti Hamalainen <ccr@tnsp.org>
parents: 109
diff changeset
407 if ((engine.dev = jvmInit(engine.jss_format, engine.optAfmt.channels, engine.optAfmt.freq, JMIX_AUTO)) == NULL)
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
408 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
409 dmError("jvmInit() returned NULL, voi perkele.\n");
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
410 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
411 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
412
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
413 if ((engine.plr = jmpInit(engine.dev)) == NULL)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
414 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
415 dmError("jmpInit() returned NULL\n");
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
416 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
417 }
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
418 #endif
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
419
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
420 // Initialize SDL audio
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
421 dmPrint(1, "Trying to init SDL audio with: fmt=%d, chn=%d, freq=%d\n",
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
422 engine.optAfmt.format, engine.optAfmt.channels, engine.optAfmt.freq);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
423
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents: 336
diff changeset
424 engine.optAfmt.callback = engineAudioCallback;
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
425
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
426 if (SDL_OpenAudio(&engine.optAfmt, NULL) < 0)
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
427 {
122
5ba672ebe014 Add some verbose engine startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 121
diff changeset
428 dmError("Couldn't open SDL audio: %s\n", SDL_GetError());
595
695a623eed63 Add a comment about no-sound support to the relevant part in audio setup
Matti Hamalainen <ccr@tnsp.org>
parents: 593
diff changeset
429 // We'll let this pass, as we want to support no-sound.
695a623eed63 Add a comment about no-sound support to the relevant part in audio setup
Matti Hamalainen <ccr@tnsp.org>
parents: 593
diff changeset
430 // goto error_exit;
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
431 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
432
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
433 // Initialize SDL video
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
434 if (engine.demoInitPreVideo != NULL &&
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
435 (err = engine.demoInitPreVideo(&engine)) != DMERR_OK)
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
436 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
437 dmError("demoInitPreVideo() failed, #%d: %s\n", err, dmErrorStr(err));
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
438 goto error_exit;
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
439 }
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
440
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
441 if (!engineInitializeVideo())
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
442 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
443
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
444 if (engine.demoInitPostVideo != NULL &&
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
445 (err = engine.demoInitPostVideo(&engine)) != DMERR_OK)
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
446 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
447 dmError("demoInitPostVideo() failed, #%d: %s\n", err, dmErrorStr(err));
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
448 goto error_exit;
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
449 }
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
450
593
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
451 // Hide cursor
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
452 SDL_ShowCursor(SDL_DISABLE);
17bf1704d42e More work on video setup.
Matti Hamalainen <ccr@tnsp.org>
parents: 591
diff changeset
453
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
454 // Load resources
122
5ba672ebe014 Add some verbose engine startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 121
diff changeset
455 dmPrint(1, "Loading resources, please wait...\n");
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
456 if ((err = engineLoadResources()) != DMERR_OK)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
457 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
458 dmError("Error loading resources, #%d: %s.\n",
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
459 err, dmErrorStr(err));
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
460 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
461 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
462
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
463 // Final initializations
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
464 if ((err = engine.demoInit(&engine)) != DMERR_OK)
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
465 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
466 dmError("Failure in demoInit(), #%d: %s\n",
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
467 err, dmErrorStr(err));
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
468 goto error_exit;
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
469 }
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
470
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
471 // Initialize effects
369
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
472 if ((err = engineInitializeEffects(&engine)) != DMERR_OK)
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
473 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
474 dmError("Effects initialization failed, #%d: %s\n",
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
475 err, dmErrorStr(err));
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
476 goto error_exit;
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
477 }
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
478
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
479 // Use a timeline, if set
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
480 #ifdef DM_USE_TIMELINE
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
481 if (engine.timeline != NULL)
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
482 {
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
483 if ((err = dmLoadTimeline(engine.timeline, &engine.tl)) != DMERR_OK)
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
484 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
485 dmError("Error loading timeline, #%d: %s\n", err,
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
486 dmErrorStr(err));
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
487 goto error_exit;
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
488 }
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
489
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
490 if ((err = dmPrepareTimeline(engine.tl, engine.ptl)) != DMERR_OK)
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
491 {
574
2c3afff104c6 Fix some error messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
492 dmError("Error creating prepared timeline, #%d: %s\n",
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
493 err, dmErrorStr(err));
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
494 goto error_exit;
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
495 }
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
496 }
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
497 #endif
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
498
122
5ba672ebe014 Add some verbose engine startup messages.
Matti Hamalainen <ccr@tnsp.org>
parents: 121
diff changeset
499 dmPrint(1, "Starting up.\n");
278
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
500
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
501 SDL_LockAudio();
41
780300a8d322 Move SDL_PauseAudio(0) to the "engine" instead of the demo code.
Matti Hamalainen <ccr@tnsp.org>
parents: 40
diff changeset
502 SDL_PauseAudio(0);
278
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
503 SDL_UnlockAudio();
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
504
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
505 engine.startTime = SDL_GetTicks();
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
506
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
507 while (!engine.exitFlag)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
508 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
509 while (SDL_PollEvent(&engine.event))
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
510 switch (engine.event.type)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
511 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
512 case SDL_KEYDOWN:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
513 switch (engine.event.key.keysym.sym)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
514 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
515 case SDLK_ESCAPE:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
516 engine.exitFlag = TRUE;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
517 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
518
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
519 case SDLK_SPACE:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
520 engine.pauseFlag = !engine.pauseFlag;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
521 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
522
336
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
523 case SDLK_f:
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
524 engine.optVFlags ^= SDL_FULLSCREEN;
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
525 if (!engineInitializeVideo())
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
526 goto error_exit;
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
527 break;
13dba73cf28e Add 'F' key to fullscreen toggling, in addition to alt+enter.
Matti Hamalainen <ccr@tnsp.org>
parents: 335
diff changeset
528
109
3de6301dcfe1 Implement fullscrene toggling via alt+enter
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
529 case SDLK_RETURN:
3de6301dcfe1 Implement fullscrene toggling via alt+enter
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
530 if (engine.event.key.keysym.mod & KMOD_ALT)
3de6301dcfe1 Implement fullscrene toggling via alt+enter
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
531 {
332
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
532 engine.optVFlags ^= SDL_FULLSCREEN;
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
533 if (!engineInitializeVideo())
d4802335cbbc Clean up video (re)initialization.
Matti Hamalainen <ccr@tnsp.org>
parents: 316
diff changeset
534 goto error_exit;
109
3de6301dcfe1 Implement fullscrene toggling via alt+enter
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
535 }
3de6301dcfe1 Implement fullscrene toggling via alt+enter
Matti Hamalainen <ccr@tnsp.org>
parents: 105
diff changeset
536 break;
93
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
537
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
538 default:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
539 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
540 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
541
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
542 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
543
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
544 case SDL_VIDEOEXPOSE:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
545 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
546
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
547 case SDL_QUIT:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
548 engine.exitFlag = TRUE;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
549 break;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
550 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
551
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
552 // Draw frame
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
553 engine.frameTime = SDL_GetTicks();
93
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
554 if (engine.pauseFlag != engine.paused)
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
555 {
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
556 engine.paused = engine.pauseFlag;
367
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
557 engine.pauseTime = engineGetTick(&engine);
93
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
558 }
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
559
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
560 if (engine.paused)
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
561 {
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
562 engine.startTime = engine.frameTime - engine.pauseTime;
93
15fdd5573344 Add simple (and buggy / not really working) debug mode.
Matti Hamalainen <ccr@tnsp.org>
parents: 42
diff changeset
563 }
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
564
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
565 if (SDL_MUSTLOCK(engine.screen) != 0 && SDL_LockSurface(engine.screen) != 0)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
566 {
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
567 dmError("Can't lock surface.\n");
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
568 goto error_exit;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
569 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
570
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
571 // Call main tick
345
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
572 if (engine.demoRender != NULL)
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
573 {
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
574 if ((err = engine.demoRender(&engine)) != DMERR_OK)
345
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
575 goto error_exit;
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
576 }
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
577 #ifdef DM_USE_TIMELINE
345
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
578 else
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
579 {
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
580 if ((err = dmExecuteTimeline(engine.ptl, engine.screen, engineGetTick(&engine))) != DMERR_OK)
345
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
581 goto error_exit;
cac13f180169 Work towards timeline support.
Matti Hamalainen <ccr@tnsp.org>
parents: 342
diff changeset
582 }
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
583 #endif
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
584
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
585 // Flip screen
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
586 if (SDL_MUSTLOCK(engine.screen) != 0)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
587 SDL_UnlockSurface(engine.screen);
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
588
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
589 SDL_Flip(engine.screen);
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
590 SDL_Delay(engine.paused ? 100 : 20);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
591
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
592 engine.frameCount++;
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
593 }
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
594
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
595 // Print benchmark results
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
596 engine.endTime = SDL_GetTicks();
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
597 dmPrint(1, "%d frames in %d ms, fps = %1.3f\n",
361
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
598 engine.frameCount, engine.endTime - engine.startTime,
bf60f60cafba Fix engine breakage.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
599 (float) (engine.frameCount * 1000.0f) / (float) (engine.endTime - engine.startTime));
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
600
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
601
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
602 error_exit:
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
603
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
604 dmPrint(1, "Shutting down.\n");
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
605 SDL_ShowCursor(SDL_ENABLE);
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
606
278
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
607 SDL_LockAudio();
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
608 SDL_PauseAudio(1);
105
d5d27f262227 Beging merging of dmsimple2-fork into the main "engine".
Matti Hamalainen <ccr@tnsp.org>
parents: 94
diff changeset
609 #ifdef DM_USE_JSS
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
610 jmpClose(engine.plr);
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
611 jvmClose(engine.dev);
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
612 jssClose();
278
919e7de91758 Improve locking.
Matti Hamalainen <ccr@tnsp.org>
parents: 277
diff changeset
613 #endif
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
614 SDL_UnlockAudio();
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
615
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
616 #ifdef DM_USE_TIMELINE
354
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
617 dmFreeTimeline(engine.tl);
ba284f5e7ea5 More work on editor, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 351
diff changeset
618 dmFreePreparedTimelineData(engine.ptl);
573
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
619 #endif
14640d0688d3 Make timeline stuff optional.
Matti Hamalainen <ccr@tnsp.org>
parents: 571
diff changeset
620
369
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
621 engineShutdownEffects(&engine);
359
59045853853d Make resource management re-entrant.
Matti Hamalainen <ccr@tnsp.org>
parents: 354
diff changeset
622 dmres_close(engine.resources);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
623
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
624 if (engine.demoShutdown != NULL)
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
625 engine.demoShutdown(&engine);
94
4bbfc0274b29 Change some function names, etc.
Matti Hamalainen <ccr@tnsp.org>
parents: 93
diff changeset
626
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
627 if (initSDL)
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
628 SDL_Quit();
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
629
127
ab4086db7dad Various improvements in modularity.
Matti Hamalainen <ccr@tnsp.org>
parents: 126
diff changeset
630 if (engine.demoQuit != NULL)
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 361
diff changeset
631 engine.demoQuit(&engine);
32
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
632
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
633 return 0;
d1a6833a5d67 Added a simple demo engine core.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
634 }