Mercurial > SDL_sound_CoreAudio
annotate decoders/modplug.c @ 274:9e7f9e09ea0e
Removed fprintf() calls. Replaced with SNDDBG() and Sound_SetError() calls.
author | Ryan C. Gordon <icculus@icculus.org> |
---|---|
date | Sun, 10 Mar 2002 19:15:25 +0000 |
parents | d3dc34315ac7 |
children | c97be6e1bd27 |
rev | line source |
---|---|
208 | 1 /* |
2 * SDL_sound -- An abstract sound format decoding API. | |
3 * Copyright (C) 2001 Ryan C. Gordon. | |
4 * | |
5 * This library is free software; you can redistribute it and/or | |
6 * modify it under the terms of the GNU Lesser General Public | |
7 * License as published by the Free Software Foundation; either | |
8 * version 2.1 of the License, or (at your option) any later version. | |
9 * | |
10 * This library is distributed in the hope that it will be useful, | |
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
13 * Lesser General Public License for more details. | |
14 * | |
15 * You should have received a copy of the GNU Lesser General Public | |
16 * License along with this library; if not, write to the Free Software | |
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
18 */ | |
19 | |
20 /* | |
21 * Module player for SDL_sound. This driver handles anything that ModPlug does. | |
22 * | |
23 * Please see the file COPYING in the source's root directory. | |
24 * | |
25 * This file written by Torbjörn Andersson (d91tan@Update.UU.SE) | |
26 */ | |
27 | |
28 #if HAVE_CONFIG_H | |
29 # include <config.h> | |
30 #endif | |
31 | |
32 #ifdef SOUND_SUPPORTS_MODPLUG | |
33 | |
34 #include <stdio.h> | |
35 #include <stdlib.h> | |
36 #include <string.h> | |
37 #include <assert.h> | |
38 | |
39 #include "SDL_sound.h" | |
40 | |
41 #define __SDL_SOUND_INTERNAL__ | |
42 #include "SDL_sound_internal.h" | |
43 | |
44 #include "modplug.h" | |
45 | |
46 | |
47 static int MODPLUG_init(void); | |
48 static void MODPLUG_quit(void); | |
49 static int MODPLUG_open(Sound_Sample *sample, const char *ext); | |
50 static void MODPLUG_close(Sound_Sample *sample); | |
51 static Uint32 MODPLUG_read(Sound_Sample *sample); | |
221
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
52 static int MODPLUG_rewind(Sound_Sample *sample); |
208 | 53 |
54 static const char *extensions_modplug[] = | |
55 { | |
211
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
56 /* The XMMS plugin is apparently able to load compressed modules as |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
57 * well, but libmodplug does not handle this. |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
58 */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
59 "669", /* Composer 669 / UNIS 669 module */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
60 "AMF", /* ASYLUM Music Format / Advanced Music Format(DSM) */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
61 "AMS", /* AMS module */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
62 "DBM", /* DigiBooster Pro Module */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
63 "DMF", /* DMF DELUSION DIGITAL MUSIC FILEFORMAT (X-Tracker) */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
64 "DSM", /* DSIK Internal Format module */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
65 "FAR", /* Farandole module */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
66 "IT", /* Impulse Tracker IT file */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
67 "MDL", /* DigiTracker module */ |
208 | 68 #if 0 |
211
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
69 "J2B", /* Not implemented? What is it anyway? */ |
208 | 70 #endif |
211
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
71 "MED", /* OctaMed MED file */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
72 "MOD", /* ProTracker / NoiseTracker MOD/NST file */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
73 "MT2", /* MadTracker 2.0 */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
74 "MTM", /* MTM file */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
75 "OKT", /* Oktalyzer module */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
76 "PTM", /* PTM PolyTracker module */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
77 "PSM", /* PSM module */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
78 "S3M", /* ScreamTracker file */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
79 "STM", /* ST 2.xx */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
80 "ULT", |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
81 "UMX", |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
82 "XM", /* FastTracker II */ |
208 | 83 NULL |
84 }; | |
85 | |
86 const Sound_DecoderFunctions __Sound_DecoderFunctions_MODPLUG = | |
87 { | |
88 { | |
89 extensions_modplug, | |
90 "Play modules through ModPlug", | |
91 "Torbjörn Andersson <d91tan@Update.UU.SE>", | |
92 "http://modplug-xmms.sourceforge.net/" | |
93 }, | |
94 | |
221
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
95 MODPLUG_init, /* init() method */ |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
96 MODPLUG_quit, /* quit() method */ |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
97 MODPLUG_open, /* open() method */ |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
98 MODPLUG_close, /* close() method */ |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
99 MODPLUG_read, /* read() method */ |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
100 MODPLUG_rewind /* rewind() method */ |
208 | 101 }; |
102 | |
103 | |
104 static int MODPLUG_init(void) | |
105 { | |
106 ModPlug_Settings settings; | |
107 | |
108 /* The settings will require some experimenting. I've borrowed some | |
109 * of them from the XMMS ModPlug plugin. | |
110 */ | |
111 settings.mFlags = | |
112 MODPLUG_ENABLE_OVERSAMPLING | |
113 | MODPLUG_ENABLE_NOISE_REDUCTION | |
114 | MODPLUG_ENABLE_REVERB | |
115 | MODPLUG_ENABLE_MEGABASS | |
116 | MODPLUG_ENABLE_SURROUND; | |
117 settings.mChannels = 2; | |
118 settings.mBits = 16; | |
119 settings.mFrequency = 44100; | |
120 settings.mResamplingMode = MODPLUG_RESAMPLE_FIR; | |
121 settings.mReverbDepth = 30; | |
122 settings.mReverbDelay = 100; | |
123 settings.mBassAmount = 40; | |
124 settings.mBassRange = 30; | |
125 settings.mSurroundDepth = 20; | |
126 settings.mSurroundDelay = 20; | |
127 settings.mLoopCount = 0; | |
128 | |
129 ModPlug_SetSettings(&settings); | |
130 return(1); /* success. */ | |
131 } /* MODPLUG_init */ | |
132 | |
133 | |
134 static void MODPLUG_quit(void) | |
135 { | |
211
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
136 /* it's a no-op. */ |
208 | 137 } /* MODPLUG_quit */ |
138 | |
139 | |
221
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
140 /* |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
141 * Most MOD files I've seen have tended to be a few hundred KB, even if some |
208 | 142 * of them were much smaller than that. |
143 */ | |
144 #define CHUNK_SIZE 65536 | |
145 | |
146 static int MODPLUG_open(Sound_Sample *sample, const char *ext) | |
147 { | |
148 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque; | |
149 ModPlugFile *module; | |
150 Uint8 *data; | |
151 size_t size; | |
152 Uint32 retval; | |
211
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
153 int has_extension = 0; |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
154 int i; |
208 | 155 |
221
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
156 /* |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
157 * Apparently ModPlug's loaders are too forgiving. They gladly accept |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
158 * streams that they shouldn't. For now, rely on file extension instead. |
211
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
159 */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
160 for (i = 0; extensions_modplug[i] != NULL; i++) |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
161 { |
221
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
162 if (__Sound_strcasecmp(ext, extensions_modplug[i]) == 0) |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
163 { |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
164 has_extension = 1; |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
165 break; |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
166 } /* if */ |
211
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
167 } /* for */ |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
168 |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
169 if (!has_extension) |
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
170 { |
221
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
171 SNDDBG(("MODPLUG: Unrecognized file type: %s\n", ext)); |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
172 Sound_SetError("MODPLUG: Not a module file."); |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
173 return(0); |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
174 } /* if */ |
211
b35c04e4691e
Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents:
208
diff
changeset
|
175 |
208 | 176 /* ModPlug needs the entire stream in one big chunk. I don't like it, |
177 * but I don't think there's any way around it. | |
178 */ | |
179 data = (Uint8 *) malloc(CHUNK_SIZE); | |
180 BAIL_IF_MACRO(data == NULL, ERR_OUT_OF_MEMORY, 0); | |
181 size = 0; | |
182 | |
183 do | |
184 { | |
185 retval = SDL_RWread(internal->rw, &data[size], 1, CHUNK_SIZE); | |
186 size += retval; | |
187 if (retval == CHUNK_SIZE) | |
188 { | |
189 data = (Uint8 *) realloc(data, size + CHUNK_SIZE); | |
190 BAIL_IF_MACRO(data == NULL, ERR_OUT_OF_MEMORY, 0); | |
191 } /* if */ | |
192 } while (retval > 0); | |
193 | |
194 /* The buffer may be a bit too large, but that doesn't matter. I think | |
195 * it's safe to free it as soon as ModPlug_Load() is finished anyway. | |
196 */ | |
197 module = ModPlug_Load((void *) data, size); | |
198 free(data); | |
199 BAIL_IF_MACRO(module == NULL, "MODPLUG: Not a module file.", 0); | |
200 | |
201 SNDDBG(("MODPLUG: [%d ms] %s\n", | |
202 ModPlug_GetLength(module), ModPlug_GetName(module))); | |
203 | |
204 sample->actual.channels = 2; | |
205 sample->actual.rate = 44100; | |
206 sample->actual.format = AUDIO_S16SYS; | |
207 | |
208 internal->decoder_private = (void *) module; | |
209 sample->flags = SOUND_SAMPLEFLAG_NONE; | |
210 | |
211 SNDDBG(("MODPLUG: Accepting data stream\n")); | |
212 return(1); /* we'll handle this data. */ | |
213 } /* MODPLUG_open */ | |
214 | |
215 | |
216 static void MODPLUG_close(Sound_Sample *sample) | |
217 { | |
218 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque; | |
219 ModPlugFile *module = (ModPlugFile *) internal->decoder_private; | |
220 | |
221 ModPlug_Unload(module); | |
222 } /* MODPLUG_close */ | |
223 | |
224 | |
225 static Uint32 MODPLUG_read(Sound_Sample *sample) | |
226 { | |
227 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque; | |
228 ModPlugFile *module = (ModPlugFile *) internal->decoder_private; | |
229 int retval; | |
230 | |
231 retval = ModPlug_Read(module, internal->buffer, internal->buffer_size); | |
232 if (retval == 0) | |
233 sample->flags |= SOUND_SAMPLEFLAG_EOF; | |
234 return(retval); | |
235 } /* MODPLUG_read */ | |
236 | |
221
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
237 |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
238 static int MODPLUG_rewind(Sound_Sample *sample) |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
239 { |
231
d3dc34315ac7
Rewind method implemented by Torbj�rn.
Ryan C. Gordon <icculus@icculus.org>
parents:
221
diff
changeset
|
240 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque; |
d3dc34315ac7
Rewind method implemented by Torbj�rn.
Ryan C. Gordon <icculus@icculus.org>
parents:
221
diff
changeset
|
241 ModPlugFile *module = (ModPlugFile *) internal->decoder_private; |
d3dc34315ac7
Rewind method implemented by Torbj�rn.
Ryan C. Gordon <icculus@icculus.org>
parents:
221
diff
changeset
|
242 |
d3dc34315ac7
Rewind method implemented by Torbj�rn.
Ryan C. Gordon <icculus@icculus.org>
parents:
221
diff
changeset
|
243 ModPlug_Seek(module, 0); |
d3dc34315ac7
Rewind method implemented by Torbj�rn.
Ryan C. Gordon <icculus@icculus.org>
parents:
221
diff
changeset
|
244 return(1); |
221
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
245 } /* MODPLUG_rewind */ |
c9772a9f5271
Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents:
211
diff
changeset
|
246 |
208 | 247 #endif /* SOUND_SUPPORTS_MODPLUG */ |
248 | |
249 | |
250 /* end of modplug.c ... */ |