annotate dmsimple.c @ 603:36b544eb6f4b

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