Mercurial > SDL_sound_CoreAudio
annotate decoders/modplug.c @ 244:f8ac7389f3a0
Added Darrell Walisser to credits.
| author | Ryan C. Gordon <icculus@icculus.org> |
|---|---|
| date | Mon, 04 Feb 2002 18:48:33 +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 ... */ |