Mercurial > hg > dmlib

annotate src/dmengine.c @ 846:05a3ee1ca964

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Cleanups.
author Matti Hamalainen <ccr@tnsp.org>
date Tue, 21 Oct 2014 10:42:08 +0300
parents 1d3d220fb5cc
children 00729394df6a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
642
0888971cbff8 Add comment headers to several files.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
1 /*
0888971cbff8 Add comment headers to several files.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
2 * dmlib
0888971cbff8 Add comment headers to several files.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
3 * -- Demo engine / editor common code and definitions
0888971cbff8 Add comment headers to several files.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
4 * Programmed and designed by Matti 'ccr' Hamalainen
0888971cbff8 Add comment headers to several files.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
5 * (C) Copyright 2012-2013 Tecnic Software productions (TNSP)
0888971cbff8 Add comment headers to several files.
Matti Hamalainen <ccr@tnsp.org>
parents: 573
diff changeset
6 */
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
7 #include "dmengine.h"
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
8 #include "dmimage.h"
846
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
9 #include <SDL_timer.h>
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
10
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
11
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
12 #ifdef DM_USE_TREMOR
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
13 #include <tremor/ivorbiscodec.h>
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
14 #include <tremor/ivorbisfile.h>
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
15 #endif
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
16
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
17
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
18 DMEngineData engine;
368
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
19 DMEffect *engineEffects = NULL;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
20 int nengineEffects = 0, nengineEffectsAlloc = 0;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
21
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
22
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
23 int engineRegisterEffect(const DMEffect *ef)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
24 {
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
25 if (ef == NULL)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
26 return DMERR_NULLPTR;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
27
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
28 // Allocate more space for effects
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
29 if (nengineEffects + 1 >= nengineEffectsAlloc)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
30 {
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
31 nengineEffectsAlloc += 16;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
32 engineEffects = dmRealloc(engineEffects, sizeof(DMEffect) * nengineEffectsAlloc);
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
33 if (engineEffects == NULL)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
34 {
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
35 dmError("Could not expand effects structure.\n");
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
36 return DMERR_INIT_FAIL;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
37 }
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
38 }
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
39
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
40 // Copy effects structure
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
41 memcpy(engineEffects + nengineEffects, ef, sizeof(DMEffect));
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
42 nengineEffects++;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
43
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
44 return DMERR_OK;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
45 }
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
46
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
47
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
48 int engineInitializeEffects(DMEngineData *engine)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
49 {
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
50 int i, res;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
51
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
52 dmFree(engine->effectData);
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
53 engine->effectData = dmCalloc(nengineEffectsAlloc, sizeof(void *));
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
54 if (engine->effectData == NULL)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
55 {
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
56 dmError("Could not expand effects data structure.\n");
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
57 return DMERR_INIT_FAIL;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
58 }
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
59
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
60 for (i = 0; i < nengineEffects; i++)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
61 {
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
62 if (engineEffects[i].init != NULL &&
369
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 368
diff changeset
63 (res = engineEffects[i].init(engine, &(engine->effectData[i]))) != DMERR_OK)
368
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
64 return res;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
65 }
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
66
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
67 return DMERR_OK;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
68 }
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
69
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
70
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
71 void engineShutdownEffects(DMEngineData *engine)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
72 {
369
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 368
diff changeset
73 if (engine != NULL && engine->effectData != NULL)
368
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
74 {
369
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 368
diff changeset
75 int i;
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 368
diff changeset
76 for (i = 0; i < nengineEffects; i++)
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 368
diff changeset
77 {
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 368
diff changeset
78 if (engineEffects[i].shutdown != NULL)
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 368
diff changeset
79 engineEffects[i].shutdown(engine, engine->effectData[i]);
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 368
diff changeset
80 }
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 368
diff changeset
81 dmFree(engine->effectData);
e1c984404b6b Re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 368
diff changeset
82 engine->effectData = NULL;
368
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
83 }
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
84 }
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
85
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
86
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
87 DMEffect *engineFindEffect(const char *name, const int nparams)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
88 {
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
89 int i;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
90 for (i = 0; i < nengineEffects; i++)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
91 {
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
92 if (strcmp(engineEffects[i].name, name) == 0 &&
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
93 engineEffects[i].nparams == nparams)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
94 return &engineEffects[i];
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
95 }
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
96 return NULL;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
97 }
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
98
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
99
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
100 DMEffect *engineFindEffectByName(const char *name)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
101 {
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
102 int i;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
103 for (i = 0; i < nengineEffects; i++)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
104 {
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
105 if (strcmp(engineEffects[i].name, name) == 0)
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
106 return &engineEffects[i];
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
107 }
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
108 return NULL;
08ea68abb1f8 Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 367
diff changeset
109 }
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
110
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
111
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
112 static int engineResImageLoad(DMResource *res)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
113 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
114 SDL_Surface *img = dmLoadImage(res);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
115 if (res != NULL)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
116 {
721
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
117 res->resData = img;
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
118 return DMERR_OK;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
119 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
120 else
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
121 return dmferror(res);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
122 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
123
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
124
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
125 static void engineResImageFree(DMResource *res)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
126 {
721
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
127 SDL_FreeSurface((SDL_Surface *)res->resData);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
128 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
129
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
130 static BOOL engineResImageProbe(DMResource *res, const char *fext)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
131 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
132 (void) res;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
133 return fext != NULL && (strcasecmp(fext, ".jpg") == 0 || strcasecmp(fext, ".png") == 0);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
134 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
135
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
136
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
137 #ifdef JSS_SUP_XM
779
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
138 static int engineResXMModuleLoad(DMResource *res)
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
139 {
796
97ecc0a9c21f Silence some "probing".
Matti Hamalainen <ccr@tnsp.org>
parents: 791
diff changeset
140 return jssLoadXM(res, (JSSModule **) &(res->resData), FALSE);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
141 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
142
779
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
143 static void engineResXMModuleFree(DMResource *res)
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
144 {
721
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
145 jssFreeModule((JSSModule *) res->resData);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
146 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
147
779
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
148 static BOOL engineResXMModuleProbe(DMResource *res, const char *fext)
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
149 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
150 (void) res;
779
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
151 return fext != NULL && strcasecmp(fext, ".xm") == 0;
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
152 }
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
153 #endif
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
154
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
155
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
156 #ifdef JSS_SUP_JSSMOD
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
157 static int engineResJSSModuleLoad(DMResource *res)
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
158 {
796
97ecc0a9c21f Silence some "probing".
Matti Hamalainen <ccr@tnsp.org>
parents: 791
diff changeset
159 return jssLoadJSSMOD(res, (JSSModule **) &(res->resData), FALSE);
779
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
160 }
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
161
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
162 static void engineResJSSModuleFree(DMResource *res)
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
163 {
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
164 jssFreeModule((JSSModule *) res->resData);
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
165 }
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
166
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
167 static BOOL engineResJSSModuleProbe(DMResource *res, const char *fext)
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
168 {
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
169 (void) res;
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
170 return fext != NULL &&
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
171 (strcasecmp(fext, ".jss") == 0 || strcasecmp(fext, ".jmod") == 0);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
172 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
173 #endif
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
174
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
175
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
176 #ifdef DM_USE_TREMOR
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
177 static size_t vorbisFileRead(void *ptr, size_t size, size_t nmemb, void *datasource)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
178 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
179 return dmfread(ptr, size, nmemb, (DMResource *) datasource);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
180 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
181
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
182 static int vorbisFileSeek(void *datasource, ogg_int64_t offset, int whence)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
183 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
184 return dmfseek((DMResource *) datasource, offset, whence);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
185 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
186
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
187 static int vorbisFileClose(void *datasource)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
188 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
189 (void) datasource;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
190 return 0;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
191 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
192
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
193 static long vorbisFileTell(void *datasource)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
194 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
195 return dmftell((DMResource *) datasource);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
196 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
197
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
198
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
199 static ov_callbacks vorbisFileCBS =
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
200 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
201 vorbisFileRead,
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
202 vorbisFileSeek,
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
203 vorbisFileClose,
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
204 vorbisFileTell
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
205 };
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
206
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
207 static int engineResVorbisLoad(DMResource *res)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
208 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
209 OggVorbis_File vf;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
210
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
211 dmMsg(1, "vorbisfile '%s', %d bytes resource loading\n",
721
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
212 res->filename, res->rawSize);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
213
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
214 if (ov_open_callbacks(res, &vf, NULL, 0, vorbisFileCBS) < 0)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
215 return DMERR_FOPEN;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
216
721
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
217 res->resSize = ov_pcm_total(&vf, -1) * 2 * 2;
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
218 if ((res->resData = dmMalloc(res->resSize + 16)) == NULL)
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
219 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
220 ov_clear(&vf);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
221 return DMERR_MALLOC;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
222 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
223
721
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
224 dmMsg(1, "rdataSize=%d bytes?\n", res->resSize);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
225
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
226 BOOL eof = FALSE;
721
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
227 int left = res->resSize;
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
228 char *ptr = res->resData;
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
229 int current_section;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
230 while (!eof && left > 0)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
231 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
232 int ret = ov_read(&vf, ptr, left > 4096 ? 4096 : left, &current_section);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
233 if (ret == 0)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
234 eof = TRUE;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
235 else
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
236 if (ret < 0)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
237 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
238 ov_clear(&vf);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
239 return DMERR_INVALID_DATA;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
240 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
241 else
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
242 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
243 left -= ret;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
244 ptr += ret;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
245 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
246 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
247
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
248 ov_clear(&vf);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
249 return DMERR_OK;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
250 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
251
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
252 static void engineResVorbisFree(DMResource *res)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
253 {
721
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
254 dmFree(res->resData);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
255 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
256
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
257 static BOOL engineResVorbisProbe(DMResource *res, const char *fext)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
258 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
259 (void) res;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
260 return fext != NULL && (strcasecmp(fext, ".ogg") == 0);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
261 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
262 #endif
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
263
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
264
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
265 static DMResourceDataOps engineResOps[] =
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
266 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
267 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
268 engineResImageProbe,
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
269 engineResImageLoad,
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
270 engineResImageFree
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
271 },
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
272
779
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
273 #ifdef JSS_SUP_JSSMOD
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
274 {
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
275 engineResJSSModuleProbe,
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
276 engineResJSSModuleLoad,
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
277 engineResJSSModuleFree
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
278 },
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
279 #endif
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
280
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
281 #ifdef JSS_SUP_XM
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
282 {
779
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
283 engineResXMModuleProbe,
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
284 engineResXMModuleLoad,
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
285 engineResXMModuleFree
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
286 },
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
287 #endif
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
288
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
289 #ifdef DM_USE_TREMOR
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
290 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
291 engineResVorbisProbe,
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
292 engineResVorbisLoad,
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
293 engineResVorbisFree
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
294 },
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
295 #endif
779
954b1b392c8b Restore old note frequency calculation for now.
Matti Hamalainen <ccr@tnsp.org>
parents: 763
diff changeset
296
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
297 };
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
298
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
299 static const int nengineResOps = sizeof(engineResOps) / sizeof(engineResOps[0]);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
300
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
301
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
302 int engineClassifier(DMResource *res)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
303 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
304 int i;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
305 char *fext;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
306
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
307 if (res == NULL)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
308 return DMERR_NULLPTR;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
309
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
310 fext = strrchr(res->filename, '.');
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
311 for (i = 0; i < nengineResOps; i++)
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
312 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
313 DMResourceDataOps *rops = &engineResOps[i];
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
314 if (rops->probe != NULL && rops->probe(res, fext))
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
315 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
316 res->rops = rops;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
317 return DMERR_OK;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
318 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
319 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
320
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
321 return DMERR_OK;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
322 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
323
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
324
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
325 void *engineGetResource(DMEngineData *eng, const char *name)
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
326 {
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
327 DMResource *res;
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
328 if (eng != NULL &&
721
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
329 (res = dmResourceFind(eng->resources, name)) != NULL &&
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
330 res->resData != NULL)
bb14d7907eb2 Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents: 642
diff changeset
331 return res->resData;
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
332 else
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
333 {
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
334 dmError("Could not find resource '%s'.\n", name);
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
335 return NULL;
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
336 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
337 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
338
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
339
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
340 #ifdef DM_USE_JSS
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
341 void engineGetJSSInfo(DMEngineData *eng, BOOL *playing, int *order, JSSPattern **pat, int *npattern, int *row)
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
342 {
763
ad512e54c689 Fix 10L in engine base code.
Matti Hamalainen <ccr@tnsp.org>
parents: 721
diff changeset
343 JSS_LOCK(eng->jssPlr);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
344
787
e8153e8a948e Merged.
Matti Hamalainen <ccr@tnsp.org>
parents: 785
diff changeset
345 *playing = eng->jssPlr->isPlaying;
e8153e8a948e Merged.
Matti Hamalainen <ccr@tnsp.org>
parents: 785
diff changeset
346 *row = eng->jssPlr->row;
e8153e8a948e Merged.
Matti Hamalainen <ccr@tnsp.org>
parents: 785
diff changeset
347 *pat = eng->jssPlr->pattern;
763
ad512e54c689 Fix 10L in engine base code.
Matti Hamalainen <ccr@tnsp.org>
parents: 721
diff changeset
348 *npattern = eng->jssPlr->npattern;
787
e8153e8a948e Merged.
Matti Hamalainen <ccr@tnsp.org>
parents: 785
diff changeset
349 *order = eng->jssPlr->order;
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
350
763
ad512e54c689 Fix 10L in engine base code.
Matti Hamalainen <ccr@tnsp.org>
parents: 721
diff changeset
351 JSS_UNLOCK(eng->jssPlr);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
352 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
353
785
dbf5772690a8 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 784
diff changeset
354
366
38e10b5f4e09 Work towards base engine re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 359
diff changeset
355 void engineGetJSSChannelInfo(DMEngineData *eng, const int channel, int *ninst, int *nextInst, int *freq, int *note)
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
356 {
763
ad512e54c689 Fix 10L in engine base code.
Matti Hamalainen <ccr@tnsp.org>
parents: 721
diff changeset
357 JSS_LOCK(eng->jssPlr);
787
e8153e8a948e Merged.
Matti Hamalainen <ccr@tnsp.org>
parents: 785
diff changeset
358
763
ad512e54c689 Fix 10L in engine base code.
Matti Hamalainen <ccr@tnsp.org>
parents: 721
diff changeset
359 JSSPlayerChannel *chn = &(eng->jssPlr->channels[channel]);
787
e8153e8a948e Merged.
Matti Hamalainen <ccr@tnsp.org>
parents: 785
diff changeset
360 *ninst = chn->ninstrument;
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
361 *nextInst = chn->nextInstrument;
787
e8153e8a948e Merged.
Matti Hamalainen <ccr@tnsp.org>
parents: 785
diff changeset
362 *freq = chn->freq;
e8153e8a948e Merged.
Matti Hamalainen <ccr@tnsp.org>
parents: 785
diff changeset
363 *note = chn->note;
e8153e8a948e Merged.
Matti Hamalainen <ccr@tnsp.org>
parents: 785
diff changeset
364
763
ad512e54c689 Fix 10L in engine base code.
Matti Hamalainen <ccr@tnsp.org>
parents: 721
diff changeset
365 JSS_UNLOCK(eng->jssPlr);
342
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
366 }
c6ec970dc3cf Separate some demo engine parts to two different modules.
Matti Hamalainen <ccr@tnsp.org>
parents:
diff changeset
367 #endif
367
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
368
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
369
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
370 int engineGetTick(DMEngineData *engine)
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
371 {
390
a7ee3567f718 Remove adjustTime variable, it is not needed anymore.
Matti Hamalainen <ccr@tnsp.org>
parents: 369
diff changeset
372 return engine->frameTime - engine->startTime;
367
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
373 }
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
374
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
375
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
376 float engineGetTimeDT(DMEngineData *engine)
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
377 {
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
378 return (float) engineGetTick(engine) / 1000.0f;
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
379 }
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
380
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
381
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
382 int engineGetTimeDTi(DMEngineData *engine)
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
383 {
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
384 return (float) engineGetTick(engine) / 1000;
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
385 }
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
386
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
387
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
388 int engineGetTime(DMEngineData *engine, int t)
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
389 {
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
390 return engineGetTick(engine) - (1000 * t);
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
391 }
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
392
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
393
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
394 int engineGetDT(DMEngineData *engine, int t)
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
395 {
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
396 return engineGetTime(engine, t) / 1000;
9875c65029af Work towards re-entrancy.
Matti Hamalainen <ccr@tnsp.org>
parents: 366
diff changeset
397 }
784
35b881454ea2 Move a function implementation.
Matti Hamalainen <ccr@tnsp.org>
parents: 779
diff changeset
398
35b881454ea2 Move a function implementation.
Matti Hamalainen <ccr@tnsp.org>
parents: 779
diff changeset
399
846
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
400 int engineGetVideoAspect(int width, int height)
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
401 {
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
402 if (width > 0 && height > 0)
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
403 return (width * 1000) / height;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
404 else
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
405 return 1;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
406 }
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
407
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
408
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
409 void enginePauseAudio(int status)
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
410 {
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
411 if (status)
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
412 engine.audioStatus = SDL_AUDIO_PAUSED;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
413 else
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
414 engine.audioStatus = SDL_AUDIO_PLAYING;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
415
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
416 SDL_PauseAudio(status);
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
417 }
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
418
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
419
791
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
420 void engineAudioCallback(void *userdata, Uint8 *stream, int len)
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
421 {
845
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
422 DMEngineData *engine = (DMEngineData *) userdata;
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
423
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
424 if (engine == NULL)
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
425 return;
791
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
426
845
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
427 dmMutexLock(engine->audioStreamMutex);
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
428 engine->audioStreamBuf = stream;
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
429 engine->audioStreamLen = len / engine->audioSampleSize;
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
430 engine->audioTimePos += (1000 * engine->audioStreamLen) / engine->optAfmt.freq;
791
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
431
845
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
432 if (engine->paused)
791
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
433 {
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
434 memset(stream, 0, len);
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
435 }
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
436 else
845
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
437 switch (engine->optAudioSetup)
791
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
438 {
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
439 #ifdef DM_USE_JSS
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
440 case DM_ASETUP_JSS:
845
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
441 if (engine->jssDev != NULL)
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
442 jvmRenderAudio(engine->jssDev, stream, len / engine->audioSampleSize);
791
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
443 break;
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
444 #endif
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
445 #ifdef DM_USE_TREMOR
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
446 case DM_ASETUP_TREMOR:
845
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
447 if (engine->audioPos + len >= engine->audioRes->resSize)
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
448 engine->exitFlag = TRUE;
791
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
449 else
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
450 {
845
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
451 memcpy(stream, engine->audioRes->resData + engine->audioPos, len);
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
452 engine->audioPos += len;
791
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
453 }
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
454 break;
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
455 #endif
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
456
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
457 default:
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
458 break;
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
459 }
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
460
845
1d3d220fb5cc Fix audio playback.
Matti Hamalainen <ccr@tnsp.org>
parents: 812
diff changeset
461 dmMutexUnlock(engine->audioStreamMutex);
791
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
462 }
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
463
7ea8775b265a Move audio callback code to dmengine.
Matti Hamalainen <ccr@tnsp.org>
parents: 787
diff changeset
464
846
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
465 static int engineAudioThreadFunc(void *userdata)
785
dbf5772690a8 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 784
diff changeset
466 {
846
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
467 DMEngineData *engine = (DMEngineData *) userdata;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
468 if (engine == NULL)
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
469 return 0;
785
dbf5772690a8 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 784
diff changeset
470
846
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
471 do
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
472 {
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
473 dmMutexLock(engine->audioStreamMutex);
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
474 if (engine->audioStatus == SDL_AUDIO_PLAYING)
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
475 {
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
476 engineAudioCallback(userdata, engine->audioSimBuf, engine->audioSimBufSize);
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
477 }
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
478 dmMutexUnlock(engine->audioStreamMutex);
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
479
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
480 SDL_Delay(engine->audioSimDelay);
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
481 } while (!engine->audioSimDone);
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
482
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
483 return 0;
785
dbf5772690a8 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 784
diff changeset
484 }
dbf5772690a8 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 784
diff changeset
485
dbf5772690a8 Cosmetics.
Matti Hamalainen <ccr@tnsp.org>
parents: 784
diff changeset
486
846
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
487 int engineInitAudioParts(DMEngineData *engine)
784
35b881454ea2 Move a function implementation.
Matti Hamalainen <ccr@tnsp.org>
parents: 779
diff changeset
488 {
846
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
489 if (engine == NULL)
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
490 return DMERR_NULLPTR;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
491
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
492 engine->audioStreamMutex = dmCreateMutex();
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
493 engine->audioStatus = SDL_AUDIO_STOPPED;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
494 engine->optAfmt.callback = engineAudioCallback;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
495 engine->optAfmt.userdata = (void *) engine;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
496
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
497 engine->audioSampleSize = engine->optAfmt.channels;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
498 switch (engine->optAfmt.format)
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
499 {
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
500 case AUDIO_S16SYS:
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
501 case AUDIO_U16SYS: engine->audioSampleSize *= 2; break;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
502 }
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
503
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
504 if (SDL_OpenAudio(&engine->optAfmt, NULL) < 0)
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
505 {
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
506 // We'll let this pass, as we want to support no-sound.
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
507 dmError("Couldn't open SDL audio, falling back to no sound: %s\n", SDL_GetError());
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
508
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
509 // Set up simulated audio thread
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
510 engine->audioSimDelay = 1000 / 45;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
511 engine->audioSimBufSize = (engine->optAfmt.freq / 45) * engine->audioSampleSize;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
512 engine->audioSimBuf = dmMalloc(engine->audioSimBufSize);
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
513 engine->audioSimDone = FALSE;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
514 engine->audioSimThread = SDL_CreateThread(engineAudioThreadFunc, NULL);
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
515 if (engine->audioSimThread == NULL)
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
516 return DMERR_INIT_FAIL;
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
517 }
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
518
05a3ee1ca964 Cleanups.
Matti Hamalainen <ccr@tnsp.org>
parents: 845
diff changeset
519 return DMERR_OK;
784
35b881454ea2 Move a function implementation.
Matti Hamalainen <ccr@tnsp.org>
parents: 779
diff changeset
520 }