Skip to content

Latest commit

 

History

History
1261 lines (1172 loc) · 26.2 KB

music.c

File metadata and controls

1261 lines (1172 loc) · 26.2 KB
 
Oct 21, 1999
Oct 21, 1999
1
/*
Dec 14, 2001
Dec 14, 2001
2
SDL_mixer: An audio mixer library based on the SDL library
Jan 4, 2004
Jan 4, 2004
3
Copyright (C) 1997-2004 Sam Lantinga
Dec 26, 1999
Dec 26, 1999
4
Dec 14, 2001
Dec 14, 2001
5
6
7
8
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation; either
version 2 of the License, or (at your option) any later version.
Dec 26, 1999
Dec 26, 1999
9
Dec 14, 2001
Dec 14, 2001
10
11
12
13
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Library General Public License for more details.
Dec 26, 1999
Dec 26, 1999
14
Dec 14, 2001
Dec 14, 2001
15
16
17
You should have received a copy of the GNU Library General Public
License along with this library; if not, write to the Free
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
Dec 26, 1999
Dec 26, 1999
18
Dec 14, 2001
Dec 14, 2001
19
20
Sam Lantinga
slouken@libsdl.org
Oct 21, 1999
Oct 21, 1999
21
22
*/
Dec 14, 2001
Dec 14, 2001
23
/* $Id$ */
Dec 14, 2001
Dec 14, 2001
24
Oct 23, 1999
Oct 23, 1999
25
26
#include <stdlib.h>
#include <string.h>
Oct 16, 2001
Oct 16, 2001
27
#include <ctype.h>
Dec 21, 1999
Dec 21, 1999
28
29
#include "SDL_endian.h"
#include "SDL_audio.h"
Dec 27, 1999
Dec 27, 1999
30
#include "SDL_timer.h"
Oct 21, 1999
Oct 21, 1999
31
Jan 14, 2000
Jan 14, 2000
32
#include "SDL_mixer.h"
Oct 21, 1999
Oct 21, 1999
33
Aug 21, 2004
Aug 21, 2004
34
35
36
37
38
39
40
41
#define SDL_SURROUND
#ifdef SDL_SURROUND
#define MAX_OUTPUT_CHANNELS 6
#else
#define MAX_OUTPUT_CHANNELS 2
#endif
Oct 21, 1999
Oct 21, 1999
42
43
44
45
46
47
48
49
50
51
52
53
/* The music command hack is UNIX specific */
#ifndef unix
#undef CMD_MUSIC
#endif
#ifdef CMD_MUSIC
#include "music_cmd.h"
#endif
#ifdef WAV_MUSIC
#include "wavestream.h"
#endif
#ifdef MOD_MUSIC
Dec 27, 1999
Dec 27, 1999
54
55
56
57
58
# include "mikmod.h"
# if defined(LIBMIKMOD_VERSION) /* libmikmod 3.1.8 */
# define UNIMOD MODULE
# define MikMod_Init() MikMod_Init(NULL)
# define MikMod_LoadSong(a,b) Player_Load(a,b,0)
Jun 28, 2003
Jun 28, 2003
59
60
61
# ifdef USE_RWOPS
# define MikMod_LoadSongRW(a,b) Player_LoadRW(a,b,0)
# endif
Dec 27, 1999
Dec 27, 1999
62
63
64
65
66
67
# define MikMod_FreeSong Player_Free
extern int MikMod_errno;
# else /* old MikMod 3.0.3 */
# define MikMod_strerror(x) _mm_errmsg[x])
# define MikMod_errno _mm_errno
# endif
Oct 21, 1999
Oct 21, 1999
68
69
#endif
#ifdef MID_MUSIC
Sep 5, 2001
Sep 5, 2001
70
71
72
73
74
75
76
77
78
79
80
# ifdef USE_TIMIDITY_MIDI
# include "timidity.h"
# endif
# ifdef USE_NATIVE_MIDI
# include "native_midi.h"
# endif
# if defined(USE_TIMIDITY_MIDI) && defined(USE_NATIVE_MIDI)
# define MIDI_ELSE else
# else
# define MIDI_ELSE
# endif
Oct 21, 1999
Oct 21, 1999
81
#endif
Jul 3, 2000
Jul 3, 2000
82
83
84
#ifdef OGG_MUSIC
#include "music_ogg.h"
#endif
Oct 21, 1999
Oct 21, 1999
85
#ifdef MP3_MUSIC
Apr 5, 2001
Apr 5, 2001
86
#include "smpeg.h"
Oct 21, 1999
Oct 21, 1999
87
88
89
90
static SDL_AudioSpec used_mixer;
#endif
Feb 1, 2000
Feb 1, 2000
91
92
int volatile music_active = 1;
static int volatile music_stopped = 0;
Oct 21, 1999
Oct 21, 1999
93
94
static int music_loops = 0;
static char *music_cmd = NULL;
Feb 1, 2000
Feb 1, 2000
95
static Mix_Music * volatile music_playing = NULL;
Nov 11, 1999
Nov 11, 1999
96
static int music_volume = MIX_MAX_VOLUME;
Oct 21, 1999
Oct 21, 1999
97
98
static int music_swap8;
static int music_swap16;
Oct 23, 1999
Oct 23, 1999
99
Oct 21, 1999
Oct 21, 1999
100
struct _Mix_Music {
May 19, 2002
May 19, 2002
101
Mix_MusicType type;
Oct 21, 1999
Oct 21, 1999
102
103
104
105
106
107
108
109
110
111
112
union {
#ifdef CMD_MUSIC
MusicCMD *cmd;
#endif
#ifdef WAV_MUSIC
WAVStream *wave;
#endif
#ifdef MOD_MUSIC
UNIMOD *module;
#endif
#ifdef MID_MUSIC
Sep 5, 2001
Sep 5, 2001
113
#ifdef USE_TIMIDITY_MIDI
Oct 21, 1999
Oct 21, 1999
114
MidiSong *midi;
Sep 5, 2001
Sep 5, 2001
115
#endif
Aug 19, 2001
Aug 19, 2001
116
117
118
#ifdef USE_NATIVE_MIDI
NativeMidiSong *nativemidi;
#endif
Oct 21, 1999
Oct 21, 1999
119
#endif
Jul 3, 2000
Jul 3, 2000
120
121
122
#ifdef OGG_MUSIC
OGG_music *ogg;
#endif
Oct 21, 1999
Oct 21, 1999
123
124
125
126
#ifdef MP3_MUSIC
SMPEG *mp3;
#endif
} data;
Oct 23, 1999
Oct 23, 1999
127
Mix_Fading fading;
Nov 11, 1999
Nov 11, 1999
128
129
int fade_step;
int fade_steps;
Oct 21, 1999
Oct 21, 1999
130
131
int error;
};
Dec 27, 1999
Dec 27, 1999
132
#ifdef MID_MUSIC
Sep 5, 2001
Sep 5, 2001
133
#ifdef USE_TIMIDITY_MIDI
Oct 21, 1999
Oct 21, 1999
134
static int timidity_ok;
Dec 17, 2001
Dec 17, 2001
135
static int samplesize;
Sep 5, 2001
Sep 5, 2001
136
#endif
Aug 19, 2001
Aug 19, 2001
137
138
139
#ifdef USE_NATIVE_MIDI
static int native_midi_ok;
#endif
Dec 27, 1999
Dec 27, 1999
140
#endif
Oct 21, 1999
Oct 21, 1999
141
Aug 21, 2004
Aug 21, 2004
142
143
144
145
/* Reference for converting mikmod output to 4/6 channels */
static int current_output_channels;
static Uint16 current_output_format;
Nov 11, 1999
Nov 11, 1999
146
147
148
/* Used to calculate fading steps */
static int ms_per_step;
Oct 30, 1999
Oct 30, 1999
149
/* Local low-level functions prototypes */
Nov 9, 2003
Nov 9, 2003
150
static void music_internal_initialize_volume(void);
May 16, 2002
May 16, 2002
151
152
153
154
155
static void music_internal_volume(int volume);
static int music_internal_play(Mix_Music *music, double position);
static int music_internal_position(double position);
static int music_internal_playing();
static void music_internal_halt(void);
Oct 26, 1999
Oct 26, 1999
156
Dec 27, 1999
Dec 27, 1999
157
158
159
160
161
162
163
164
165
166
167
168
/* Support for hooking when the music has finished */
static void (*music_finished_hook)(void) = NULL;
void Mix_HookMusicFinished(void (*music_finished)(void))
{
SDL_LockAudio();
music_finished_hook = music_finished;
SDL_UnlockAudio();
}
Oct 21, 1999
Oct 21, 1999
169
170
171
/* Mixing function */
void music_mixer(void *udata, Uint8 *stream, int len)
{
May 16, 2002
May 16, 2002
172
if ( music_playing && music_active ) {
Nov 1, 1999
Nov 1, 1999
173
/* Handle fading */
Nov 11, 1999
Nov 11, 1999
174
175
if ( music_playing->fading != MIX_NO_FADING ) {
if ( music_playing->fade_step++ < music_playing->fade_steps ) {
May 16, 2002
May 16, 2002
176
int volume;
Dec 26, 1999
Dec 26, 1999
177
178
int fade_step = music_playing->fade_step;
int fade_steps = music_playing->fade_steps;
Nov 11, 1999
Nov 11, 1999
179
Oct 23, 1999
Oct 23, 1999
180
if ( music_playing->fading == MIX_FADING_OUT ) {
May 16, 2002
May 16, 2002
181
volume = (music_volume * (fade_steps-fade_step)) / fade_steps;
Nov 11, 1999
Nov 11, 1999
182
} else { /* Fading in */
May 16, 2002
May 16, 2002
183
volume = (music_volume * fade_step) / fade_steps;
Oct 23, 1999
Oct 23, 1999
184
}
May 16, 2002
May 16, 2002
185
music_internal_volume(volume);
Oct 23, 1999
Oct 23, 1999
186
187
} else {
if ( music_playing->fading == MIX_FADING_OUT ) {
May 16, 2002
May 16, 2002
188
189
190
191
music_internal_halt();
if ( music_finished_hook ) {
music_finished_hook();
}
Nov 11, 1999
Nov 11, 1999
192
return;
Oct 23, 1999
Oct 23, 1999
193
}
Nov 11, 1999
Nov 11, 1999
194
music_playing->fading = MIX_NO_FADING;
Oct 23, 1999
Oct 23, 1999
195
196
}
}
Nov 1, 1999
Nov 1, 1999
197
/* Restart music if it has to loop */
May 16, 2002
May 16, 2002
198
199
if ( !music_internal_playing() ) {
/* Restart music if it has to loop at a high level */
Dec 27, 1999
Dec 27, 1999
200
if ( music_loops && --music_loops ) {
Feb 12, 2003
Feb 12, 2003
201
Mix_Fading current_fade = music_playing->fading;
May 16, 2002
May 16, 2002
202
music_internal_play(music_playing, 0.0);
Feb 12, 2003
Feb 12, 2003
203
music_playing->fading = current_fade;
May 16, 2002
May 16, 2002
204
205
206
207
} else {
music_internal_halt();
if ( music_finished_hook ) {
music_finished_hook();
Oct 30, 1999
Oct 30, 1999
208
}
May 16, 2002
May 16, 2002
209
return;
Dec 27, 1999
Dec 27, 1999
210
}
Oct 30, 1999
Oct 30, 1999
211
}
Oct 21, 1999
Oct 21, 1999
212
213
214
215
216
217
218
219
switch (music_playing->type) {
#ifdef CMD_MUSIC
case MUS_CMD:
/* The playing is done externally */
break;
#endif
#ifdef WAV_MUSIC
case MUS_WAV:
Jul 3, 2000
Jul 3, 2000
220
WAVStream_PlaySome(stream, len);
Oct 21, 1999
Oct 21, 1999
221
222
223
224
break;
#endif
#ifdef MOD_MUSIC
case MUS_MOD:
Aug 21, 2004
Aug 21, 2004
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
if (current_output_channels > 2) {
int small_len = 2 * len / current_output_channels;
int i;
Uint8 *src, *dst;
VC_WriteBytes((SBYTE *)stream, small_len);
/* and extend to len by copying channels */
src = stream + small_len;
dst = stream + len;
switch (current_output_format & 0xFF) {
case 8:
for ( i=small_len/2; i; --i ) {
src -= 2;
dst -= current_output_channels;
dst[0] = src[0];
dst[1] = src[1];
dst[2] = src[0];
dst[3] = src[1];
if (current_output_channels == 6) {
dst[4] = src[0];
dst[5] = src[1];
}
}
break;
case 16:
for ( i=small_len/4; i; --i ) {
src -= 4;
dst -= 2 * current_output_channels;
dst[0] = src[0];
dst[1] = src[1];
dst[2] = src[2];
dst[3] = src[3];
dst[4] = src[0];
dst[5] = src[1];
dst[6] = src[2];
dst[7] = src[3];
if (current_output_channels == 6) {
dst[8] = src[0];
dst[9] = src[1];
dst[10] = src[2];
dst[11] = src[3];
}
}
break;
}
}
else VC_WriteBytes((SBYTE *)stream, len);
Oct 21, 1999
Oct 21, 1999
276
277
if ( music_swap8 ) {
Uint8 *dst;
Feb 1, 2000
Feb 1, 2000
278
int i;
Oct 21, 1999
Oct 21, 1999
279
280
281
282
283
284
285
286
dst = stream;
for ( i=len; i; --i ) {
*dst++ ^= 0x80;
}
} else
if ( music_swap16 ) {
Uint8 *dst, tmp;
Feb 1, 2000
Feb 1, 2000
287
int i;
Oct 21, 1999
Oct 21, 1999
288
289
290
291
292
293
294
295
296
297
298
299
dst = stream;
for ( i=(len/2); i; --i ) {
tmp = dst[0];
dst[0] = dst[1];
dst[1] = tmp;
dst += 2;
}
}
break;
#endif
#ifdef MID_MUSIC
Sep 5, 2001
Sep 5, 2001
300
#ifdef USE_TIMIDITY_MIDI
Oct 21, 1999
Oct 21, 1999
301
case MUS_MID:
Aug 19, 2001
Aug 19, 2001
302
303
304
305
if ( timidity_ok ) {
int samples = len / samplesize;
Timidity_PlaySome(stream, samples);
}
Oct 21, 1999
Oct 21, 1999
306
307
break;
#endif
Sep 5, 2001
Sep 5, 2001
308
#endif
Jul 3, 2000
Jul 3, 2000
309
310
311
312
313
#ifdef OGG_MUSIC
case MUS_OGG:
OGG_playAudio(music_playing->data.ogg, stream, len);
break;
#endif
Oct 21, 1999
Oct 21, 1999
314
#ifdef MP3_MUSIC
Dec 26, 1999
Dec 26, 1999
315
316
case MUS_MP3:
SMPEG_playAudio(music_playing->data.mp3, stream, len);
Oct 21, 1999
Oct 21, 1999
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
break;
#endif
default:
/* Unknown music type?? */
break;
}
}
}
/* Initialize the music players with a certain desired audio format */
int open_music(SDL_AudioSpec *mixer)
{
int music_error;
music_error = 0;
#ifdef WAV_MUSIC
if ( WAVStream_Init(mixer) < 0 ) {
++music_error;
}
#endif
#ifdef MOD_MUSIC
/* Set the MikMod music format */
music_swap8 = 0;
music_swap16 = 0;
switch (mixer->format) {
case AUDIO_U8:
case AUDIO_S8: {
if ( mixer->format == AUDIO_S8 ) {
music_swap8 = 1;
}
md_mode = 0;
}
break;
case AUDIO_S16LSB:
case AUDIO_S16MSB: {
/* See if we need to correct MikMod mixing */
#if SDL_BYTEORDER == SDL_LIL_ENDIAN
if ( mixer->format == AUDIO_S16MSB ) {
#else
if ( mixer->format == AUDIO_S16LSB ) {
#endif
music_swap16 = 1;
}
md_mode = DMODE_16BITS;
}
break;
default: {
Dec 26, 1999
Dec 26, 1999
367
Mix_SetError("Unknown hardware audio format");
Oct 21, 1999
Oct 21, 1999
368
369
370
++music_error;
}
}
Aug 21, 2004
Aug 21, 2004
371
372
current_output_channels = mixer->channels;
current_output_format = mixer->format;
Oct 21, 1999
Oct 21, 1999
373
if ( mixer->channels > 1 ) {
Aug 21, 2004
Aug 21, 2004
374
if ( mixer->channels > MAX_OUTPUT_CHANNELS ) {
Dec 26, 1999
Dec 26, 1999
375
Mix_SetError("Hardware uses more channels than mixer");
Oct 21, 1999
Oct 21, 1999
376
377
378
379
++music_error;
}
md_mode |= DMODE_STEREO;
}
Dec 26, 1999
Dec 26, 1999
380
381
382
md_mixfreq = mixer->freq;
md_device = 0;
md_volume = 96;
Oct 21, 1999
Oct 21, 1999
383
384
md_musicvolume = 128;
md_sndfxvolume = 128;
Dec 26, 1999
Dec 26, 1999
385
386
md_pansep = 128;
md_reverb = 0;
Oct 21, 1999
Oct 21, 1999
387
388
389
MikMod_RegisterAllLoaders();
MikMod_RegisterAllDrivers();
if ( MikMod_Init() ) {
Dec 27, 1999
Dec 27, 1999
390
Mix_SetError("%s", MikMod_strerror(MikMod_errno));
Oct 21, 1999
Oct 21, 1999
391
392
393
394
++music_error;
}
#endif
#ifdef MID_MUSIC
Sep 5, 2001
Sep 5, 2001
395
#ifdef USE_TIMIDITY_MIDI
Dec 17, 2001
Dec 17, 2001
396
samplesize = mixer->size / mixer->samples;
Aug 19, 2001
Aug 19, 2001
397
if ( Timidity_Init(mixer->freq, mixer->format,
Aug 20, 2001
Aug 20, 2001
398
mixer->channels, mixer->samples) == 0 ) {
Aug 19, 2001
Aug 19, 2001
399
timidity_ok = 1;
Oct 21, 1999
Oct 21, 1999
400
401
402
} else {
timidity_ok = 0;
}
Sep 5, 2001
Sep 5, 2001
403
#endif
Aug 19, 2001
Aug 19, 2001
404
#ifdef USE_NATIVE_MIDI
Sep 5, 2001
Sep 5, 2001
405
#ifdef USE_TIMIDITY_MIDI
Aug 19, 2001
Aug 19, 2001
406
native_midi_ok = !timidity_ok;
Sep 5, 2001
Sep 5, 2001
407
408
if ( native_midi_ok )
#endif
Aug 19, 2001
Aug 19, 2001
409
native_midi_ok = native_midi_detect();
Aug 19, 2001
Aug 19, 2001
410
#endif
Oct 21, 1999
Oct 21, 1999
411
#endif
Jul 3, 2000
Jul 3, 2000
412
413
414
415
416
#ifdef OGG_MUSIC
if ( OGG_init(mixer) < 0 ) {
++music_error;
}
#endif
Oct 21, 1999
Oct 21, 1999
417
418
419
420
#ifdef MP3_MUSIC
/* Keep a copy of the mixer */
used_mixer = *mixer;
#endif
Feb 1, 2000
Feb 1, 2000
421
music_playing = NULL;
Oct 26, 1999
Oct 26, 1999
422
music_stopped = 0;
Oct 21, 1999
Oct 21, 1999
423
424
425
426
427
if ( music_error ) {
return(-1);
}
Mix_VolumeMusic(SDL_MIX_MAXVOLUME);
Dec 26, 1999
Dec 26, 1999
428
/* Calculate the number of ms for each callback */
Feb 2, 2000
Feb 2, 2000
429
ms_per_step = (int) (((float)mixer->samples * 1000.0) / mixer->freq);
Nov 11, 1999
Nov 11, 1999
430
Oct 21, 1999
Oct 21, 1999
431
432
433
return(0);
}
Oct 16, 2001
Oct 16, 2001
434
435
436
437
438
439
440
441
442
443
444
445
446
/* Portable case-insensitive string compare function */
int MIX_string_equals(const char *str1, const char *str2)
{
while ( *str1 && *str2 ) {
if ( toupper((unsigned char)*str1) !=
toupper((unsigned char)*str2) )
break;
++str1;
++str2;
}
return (!*str1 && !*str2);
}
Oct 21, 1999
Oct 21, 1999
447
448
449
450
/* Load a music file */
Mix_Music *Mix_LoadMUS(const char *file)
{
FILE *fp;
Oct 16, 2001
Oct 16, 2001
451
char *ext;
Aug 21, 2004
Aug 21, 2004
452
Uint8 magic[5], moremagic[9];
Oct 21, 1999
Oct 21, 1999
453
454
455
456
457
458
459
460
Mix_Music *music;
/* Figure out what kind of file this is */
fp = fopen(file, "rb");
if ( (fp == NULL) || !fread(magic, 4, 1, fp) ) {
if ( fp != NULL ) {
fclose(fp);
}
Dec 26, 1999
Dec 26, 1999
461
Mix_SetError("Couldn't read from '%s'", file);
Oct 21, 1999
Oct 21, 1999
462
463
return(NULL);
}
Aug 21, 2004
Aug 21, 2004
464
465
466
467
if (!fread(moremagic, 8, 1, fp)) {
Mix_SetError("Couldn't read from '%s'", file);
return(NULL);
}
Oct 21, 1999
Oct 21, 1999
468
magic[4] = '\0';
Aug 21, 2004
Aug 21, 2004
469
moremagic[8] = '\0';
Oct 21, 1999
Oct 21, 1999
470
471
fclose(fp);
Oct 16, 2001
Oct 16, 2001
472
473
474
475
/* Figure out the file extension, so we can determine the type */
ext = strrchr(file, '.');
if ( ext ) ++ext; /* skip the dot in the extension */
Oct 21, 1999
Oct 21, 1999
476
477
478
/* Allocate memory for the music structure */
music = (Mix_Music *)malloc(sizeof(Mix_Music));
if ( music == NULL ) {
Dec 26, 1999
Dec 26, 1999
479
Mix_SetError("Out of memory");
Oct 21, 1999
Oct 21, 1999
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
return(NULL);
}
music->error = 0;
#ifdef CMD_MUSIC
if ( music_cmd ) {
music->type = MUS_CMD;
music->data.cmd = MusicCMD_LoadSong(music_cmd, file);
if ( music->data.cmd == NULL ) {
music->error = 1;
}
} else
#endif
#ifdef WAV_MUSIC
/* WAVE files have the magic four bytes "RIFF"
AIFF files have the magic 12 bytes "FORM" XXXX "AIFF"
*/
Nov 30, 2001
Nov 30, 2001
497
if ( (ext && MIX_string_equals(ext, "WAV")) ||
Aug 21, 2004
Aug 21, 2004
498
((strcmp((char *)magic, "RIFF") == 0) && (strcmp((char *)(moremagic+4), "WAVE") == 0)) ||
Mar 4, 2000
Mar 4, 2000
499
(strcmp((char *)magic, "FORM") == 0) ) {
Oct 21, 1999
Oct 21, 1999
500
music->type = MUS_WAV;
Mar 4, 2000
Mar 4, 2000
501
music->data.wave = WAVStream_LoadSong(file, (char *)magic);
Oct 21, 1999
Oct 21, 1999
502
if ( music->data.wave == NULL ) {
Nov 30, 2001
Nov 30, 2001
503
Mix_SetError("Unable to load WAV file");
Oct 21, 1999
Oct 21, 1999
504
505
506
507
508
509
music->error = 1;
}
} else
#endif
#ifdef MID_MUSIC
/* MIDI files have the magic four bytes "MThd" */
Nov 30, 2001
Nov 30, 2001
510
511
if ( (ext && MIX_string_equals(ext, "MID")) ||
(ext && MIX_string_equals(ext, "MIDI")) ||
Aug 21, 2004
Aug 21, 2004
512
513
514
strcmp((char *)magic, "MThd") == 0 ||
( strcmp((char *)magic, "RIFF") == 0 &&
strcmp((char *)(moremagic+4), "RMID") == 0 ) ) {
Oct 21, 1999
Oct 21, 1999
515
music->type = MUS_MID;
Aug 19, 2001
Aug 19, 2001
516
517
518
519
520
521
522
#ifdef USE_NATIVE_MIDI
if ( native_midi_ok ) {
music->data.nativemidi = native_midi_loadsong((char *)file);
if ( music->data.nativemidi == NULL ) {
Mix_SetError("%s", native_midi_error());
music->error = 1;
}
Sep 5, 2001
Sep 5, 2001
523
} MIDI_ELSE
Aug 19, 2001
Aug 19, 2001
524
#endif
Sep 5, 2001
Sep 5, 2001
525
#ifdef USE_TIMIDITY_MIDI
Oct 21, 1999
Oct 21, 1999
526
527
528
if ( timidity_ok ) {
music->data.midi = Timidity_LoadSong((char *)file);
if ( music->data.midi == NULL ) {
Dec 26, 1999
Dec 26, 1999
529
Mix_SetError("%s", Timidity_Error());
Oct 21, 1999
Oct 21, 1999
530
531
music->error = 1;
}
Aug 19, 2001
Aug 19, 2001
532
} else {
Dec 26, 1999
Dec 26, 1999
533
Mix_SetError("%s", Timidity_Error());
Oct 21, 1999
Oct 21, 1999
534
535
music->error = 1;
}
Sep 5, 2001
Sep 5, 2001
536
#endif
Oct 21, 1999
Oct 21, 1999
537
538
} else
#endif
Jul 3, 2000
Jul 3, 2000
539
540
#ifdef OGG_MUSIC
/* Ogg Vorbis files have the magic four bytes "OggS" */
Nov 30, 2001
Nov 30, 2001
541
if ( (ext && MIX_string_equals(ext, "OGG")) ||
Nov 30, 2001
Nov 30, 2001
542
strcmp((char *)magic, "OggS") == 0 ) {
Jul 3, 2000
Jul 3, 2000
543
544
545
546
547
548
549
music->type = MUS_OGG;
music->data.ogg = OGG_new(file);
if ( music->data.ogg == NULL ) {
music->error = 1;
}
} else
#endif
Oct 21, 1999
Oct 21, 1999
550
#ifdef MP3_MUSIC
Nov 30, 2001
Nov 30, 2001
551
if ( (ext && MIX_string_equals(ext, "MPG")) ||
Jun 26, 2002
Jun 26, 2002
552
(ext && MIX_string_equals(ext, "MP3")) ||
Nov 30, 2001
Nov 30, 2001
553
(ext && MIX_string_equals(ext, "MPEG")) ||
Oct 16, 2001
Oct 16, 2001
554
magic[0]==0xFF && (magic[1]&0xF0)==0xF0) {
Oct 21, 1999
Oct 21, 1999
555
556
557
558
SMPEG_Info info;
music->type = MUS_MP3;
music->data.mp3 = SMPEG_new(file, &info, 0);
if(!info.has_audio){
Dec 26, 1999
Dec 26, 1999
559
Mix_SetError("MPEG file does not have any audio stream.");
Oct 21, 1999
Oct 21, 1999
560
561
562
563
564
565
566
567
568
569
570
music->error = 1;
}else{
SMPEG_actualSpec(music->data.mp3, &used_mixer);
}
} else
#endif
#ifdef MOD_MUSIC
if ( 1 ) {
music->type = MUS_MOD;
music->data.module = MikMod_LoadSong((char *)file, 64);
if ( music->data.module == NULL ) {
Dec 27, 1999
Dec 27, 1999
571
Mix_SetError("%s", MikMod_strerror(MikMod_errno));
Oct 21, 1999
Oct 21, 1999
572
music->error = 1;
Oct 18, 2001
Oct 18, 2001
573
574
575
576
577
578
} else {
/* Stop implicit looping, fade out and other flags. */
music->data.module->extspd = 1;
music->data.module->panflag = 1;
music->data.module->wrap = 0;
music->data.module->loop = 0;
Oct 26, 2001
Oct 26, 2001
579
580
#if 0 /* Don't set fade out by default - unfortunately there's no real way
to query the status of the song or set trigger actions. Hum. */
Oct 18, 2001
Oct 18, 2001
581
music->data.module->fadeout = 1;
Oct 26, 2001
Oct 26, 2001
582
#endif
Oct 21, 1999
Oct 21, 1999
583
584
585
586
}
} else
#endif
{
Dec 26, 1999
Dec 26, 1999
587
Mix_SetError("Unrecognized music format");
Oct 21, 1999
Oct 21, 1999
588
589
590
591
592
593
594
595
596
597
598
599
600
music->error = 1;
}
if ( music->error ) {
free(music);
music = NULL;
}
return(music);
}
/* Free a music chunk previously loaded */
void Mix_FreeMusic(Mix_Music *music)
{
if ( music ) {
May 16, 2002
May 16, 2002
601
602
603
604
605
606
607
608
609
610
611
/* Stop the music if it's currently playing */
SDL_LockAudio();
if ( music == music_playing ) {
/* Wait for any fade out to finish */
while ( music->fading == MIX_FADING_OUT ) {
SDL_UnlockAudio();
SDL_Delay(100);
SDL_LockAudio();
}
if ( music == music_playing ) {
music_internal_halt();
Oct 23, 1999
Oct 23, 1999
612
}
Oct 21, 1999
Oct 21, 1999
613
}
May 16, 2002
May 16, 2002
614
SDL_UnlockAudio();
Oct 21, 1999
Oct 21, 1999
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
switch (music->type) {
#ifdef CMD_MUSIC
case MUS_CMD:
MusicCMD_FreeSong(music->data.cmd);
break;
#endif
#ifdef WAV_MUSIC
case MUS_WAV:
WAVStream_FreeSong(music->data.wave);
break;
#endif
#ifdef MOD_MUSIC
case MUS_MOD:
MikMod_FreeSong(music->data.module);
break;
#endif
#ifdef MID_MUSIC
case MUS_MID:
Aug 19, 2001
Aug 19, 2001
633
634
635
#ifdef USE_NATIVE_MIDI
if ( native_midi_ok ) {
native_midi_freesong(music->data.nativemidi);
Sep 5, 2001
Sep 5, 2001
636
} MIDI_ELSE
Aug 19, 2001
Aug 19, 2001
637
#endif
Sep 5, 2001
Sep 5, 2001
638
#ifdef USE_TIMIDITY_MIDI
Aug 19, 2001
Aug 19, 2001
639
640
641
if ( timidity_ok ) {
Timidity_FreeSong(music->data.midi);
}
Sep 5, 2001
Sep 5, 2001
642
#endif
Oct 21, 1999
Oct 21, 1999
643
644
break;
#endif
Jul 3, 2000
Jul 3, 2000
645
646
647
648
649
#ifdef OGG_MUSIC
case MUS_OGG:
OGG_delete(music->data.ogg);
break;
#endif
Oct 21, 1999
Oct 21, 1999
650
#ifdef MP3_MUSIC
Dec 26, 1999
Dec 26, 1999
651
case MUS_MP3:
Oct 21, 1999
Oct 21, 1999
652
653
654
655
656
657
658
659
660
661
662
SMPEG_delete(music->data.mp3);
break;
#endif
default:
/* Unknown music type?? */
break;
}
free(music);
}
}
May 19, 2002
May 19, 2002
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
/* Find out the music format of a mixer music, or the currently playing
music, if 'music' is NULL.
*/
Mix_MusicType Mix_GetMusicType(const Mix_Music *music)
{
Mix_MusicType type = MUS_NONE;
if ( music ) {
type = music->type;
} else {
SDL_LockAudio();
if ( music_playing ) {
type = music_playing->type;
}
SDL_UnlockAudio();
}
return(type);
}
May 16, 2002
May 16, 2002
682
683
684
/* Play a music chunk. Returns 0, or -1 if there was an error.
*/
static int music_internal_play(Mix_Music *music, double position)
Oct 21, 1999
Oct 21, 1999
685
{
May 16, 2002
May 16, 2002
686
687
688
689
690
691
692
int retval = 0;
/* Note the music we're playing */
if ( music_playing ) {
music_internal_halt();
}
music_playing = music;
Oct 30, 1999
Oct 30, 1999
693
May 16, 2002
May 16, 2002
694
/* Set the initial volume */
Nov 9, 2003
Nov 9, 2003
695
696
if ( music->type != MUS_MOD ) {
music_internal_initialize_volume();
May 16, 2002
May 16, 2002
697
698
699
}
/* Set up for playback */
Oct 21, 1999
Oct 21, 1999
700
701
switch (music->type) {
#ifdef CMD_MUSIC
May 16, 2002
May 16, 2002
702
703
704
case MUS_CMD:
MusicCMD_Start(music->data.cmd);
break;
Oct 21, 1999
Oct 21, 1999
705
706
#endif
#ifdef WAV_MUSIC
May 16, 2002
May 16, 2002
707
708
709
case MUS_WAV:
WAVStream_Start(music->data.wave);
break;
Oct 21, 1999
Oct 21, 1999
710
711
#endif
#ifdef MOD_MUSIC
May 16, 2002
May 16, 2002
712
713
case MUS_MOD:
Player_Start(music->data.module);
Nov 9, 2003
Nov 9, 2003
714
715
/* Player_SetVolume() does nothing before Player_Start() */
music_internal_initialize_volume();
May 16, 2002
May 16, 2002
716
break;
Oct 21, 1999
Oct 21, 1999
717
718
#endif
#ifdef MID_MUSIC
May 16, 2002
May 16, 2002
719
case MUS_MID:
Aug 19, 2001
Aug 19, 2001
720
#ifdef USE_NATIVE_MIDI
May 16, 2002
May 16, 2002
721
722
723
if ( native_midi_ok ) {
native_midi_start(music->data.nativemidi);
} MIDI_ELSE
Aug 19, 2001
Aug 19, 2001
724
#endif
Sep 5, 2001
Sep 5, 2001
725
#ifdef USE_TIMIDITY_MIDI
May 16, 2002
May 16, 2002
726
727
728
if ( timidity_ok ) {
Timidity_Start(music->data.midi);
}
Sep 5, 2001
Sep 5, 2001
729
#endif
May 16, 2002
May 16, 2002
730
break;
Oct 21, 1999
Oct 21, 1999
731
#endif
Jul 3, 2000
Jul 3, 2000
732
#ifdef OGG_MUSIC
May 16, 2002
May 16, 2002
733
734
735
case MUS_OGG:
OGG_play(music->data.ogg);
break;
Jul 3, 2000
Jul 3, 2000
736
#endif
Oct 21, 1999
Oct 21, 1999
737
#ifdef MP3_MUSIC
May 16, 2002
May 16, 2002
738
739
740
case MUS_MP3:
SMPEG_enableaudio(music->data.mp3,1);
SMPEG_enablevideo(music->data.mp3,0);
May 19, 2002
May 19, 2002
741
SMPEG_play(music_playing->data.mp3);
May 16, 2002
May 16, 2002
742
break;
Oct 21, 1999
Oct 21, 1999
743
#endif
May 16, 2002
May 16, 2002
744
745
746
747
default:
Mix_SetError("Can't play unknown music type");
retval = -1;
break;
Oct 21, 1999
Oct 21, 1999
748
}
Oct 30, 1999
Oct 30, 1999
749
May 16, 2002
May 16, 2002
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
/* Set the playback position, note any errors if an offset is used */
if ( retval == 0 ) {
if ( position > 0.0 ) {
if ( music_internal_position(position) < 0 ) {
Mix_SetError("Position not implemented for music type");
retval = -1;
}
} else {
music_internal_position(0.0);
}
}
/* If the setup failed, we're not playing any music anymore */
if ( retval < 0 ) {
music_playing = NULL;
}
return(retval);
}
int Mix_FadeInMusicPos(Mix_Music *music, int loops, int ms, double position)
Oct 30, 1999
Oct 30, 1999
769
{
May 16, 2002
May 16, 2002
770
771
int retval;
Oct 30, 1999
Oct 30, 1999
772
773
/* Don't play null pointers :-) */
if ( music == NULL ) {
May 16, 2002
May 16, 2002
774
Mix_SetError("music parameter was NULL");
Oct 30, 1999
Oct 30, 1999
775
776
return(-1);
}
May 16, 2002
May 16, 2002
777
778
779
780
781
782
/* Setup the data */
if ( ms ) {
music->fading = MIX_FADING_IN;
} else {
music->fading = MIX_NO_FADING;
Oct 30, 1999
Oct 30, 1999
783
}
May 16, 2002
May 16, 2002
784
785
music->fade_step = 0;
music->fade_steps = ms/ms_per_step;
Oct 30, 1999
Oct 30, 1999
786
May 16, 2002
May 16, 2002
787
788
789
790
791
792
793
/* Play the puppy */
SDL_LockAudio();
/* If the current music is fading out, wait for the fade to complete */
while ( music_playing && (music_playing->fading == MIX_FADING_OUT) ) {
SDL_UnlockAudio();
SDL_Delay(100);
SDL_LockAudio();
Dec 26, 1999
Dec 26, 1999
794
}
Oct 21, 1999
Oct 21, 1999
795
music_active = 1;
Oct 30, 1999
Oct 30, 1999
796
music_loops = loops;
May 16, 2002
May 16, 2002
797
798
799
800
801
802
803
804
805
806
807
808
retval = music_internal_play(music, position);
SDL_UnlockAudio();
return(retval);
}
int Mix_FadeInMusic(Mix_Music *music, int loops, int ms)
{
return Mix_FadeInMusicPos(music, loops, ms, 0.0);
}
int Mix_PlayMusic(Mix_Music *music, int loops)
{
return Mix_FadeInMusicPos(music, loops, 0, 0.0);
Oct 23, 1999
Oct 23, 1999
809
810
}
May 16, 2002
May 16, 2002
811
812
/* Set the playing music position */
int music_internal_position(double position)
Dec 19, 2001
Dec 19, 2001
813
{
May 16, 2002
May 16, 2002
814
815
816
int retval = 0;
switch (music_playing->type) {
Dec 19, 2001
Dec 19, 2001
817
#ifdef MOD_MUSIC
May 16, 2002
May 16, 2002
818
819
820
case MUS_MOD:
Player_SetPosition((UWORD)position);
break;
Dec 20, 2001
Dec 20, 2001
821
822
#endif
#ifdef OGG_MUSIC
May 16, 2002
May 16, 2002
823
824
825
case MUS_OGG:
OGG_jump_to_time(music_playing->data.ogg, position);
break;
Jan 14, 2002
Jan 14, 2002
826
827
#endif
#ifdef MP3_MUSIC
May 16, 2002
May 16, 2002
828
case MUS_MP3:
May 19, 2002
May 19, 2002
829
if ( position > 0.0 ) {
Jan 14, 2002
Jan 14, 2002
830
SMPEG_skip(music_playing->data.mp3, position);
May 19, 2002
May 19, 2002
831
832
833
} else {
SMPEG_rewind(music_playing->data.mp3);
SMPEG_play(music_playing->data.mp3);
Dec 19, 2001
Dec 19, 2001
834
}
May 16, 2002
May 16, 2002
835
836
837
838
839
840
break;
#endif
default:
/* TODO: Implement this for other music backends */
retval = -1;
break;
Dec 19, 2001
Dec 19, 2001
841
}
May 16, 2002
May 16, 2002
842
return(retval);
Dec 19, 2001
Dec 19, 2001
843
}
May 16, 2002
May 16, 2002
844
int Mix_SetMusicPosition(double position)
Oct 23, 1999
Oct 23, 1999
845
{
May 16, 2002
May 16, 2002
846
847
848
849
850
851
852
int retval;
SDL_LockAudio();
if ( music_playing ) {
retval = music_internal_position(position);
if ( retval < 0 ) {
Mix_SetError("Position not implemented for music type");
Dec 19, 2001
Dec 19, 2001
853
}
May 16, 2002
May 16, 2002
854
855
856
} else {
Mix_SetError("Music isn't playing");
retval = -1;
Oct 23, 1999
Oct 23, 1999
857
}
May 16, 2002
May 16, 2002
858
SDL_UnlockAudio();
Oct 21, 1999
Oct 21, 1999
859
May 16, 2002
May 16, 2002
860
return(retval);
Dec 19, 2001
Dec 19, 2001
861
862
}
Nov 9, 2003
Nov 9, 2003
863
864
865
866
867
868
869
870
871
872
/* Set the music's initial volume */
static void music_internal_initialize_volume(void)
{
if ( music_playing->fading == MIX_FADING_IN ) {
music_internal_volume(0);
} else {
music_internal_volume(music_volume);
}
}
Oct 21, 1999
Oct 21, 1999
873
/* Set the music volume */
May 16, 2002
May 16, 2002
874
static void music_internal_volume(int volume)
Oct 21, 1999
Oct 21, 1999
875
{
May 16, 2002
May 16, 2002
876
switch (music_playing->type) {
Oct 21, 1999
Oct 21, 1999
877
#ifdef CMD_MUSIC
May 16, 2002
May 16, 2002
878
879
880
case MUS_CMD:
MusicCMD_SetVolume(volume);
break;
Oct 21, 1999
Oct 21, 1999
881
882
#endif
#ifdef WAV_MUSIC
May 16, 2002
May 16, 2002
883
884
885
case MUS_WAV:
WAVStream_SetVolume(volume);
break;
Oct 21, 1999
Oct 21, 1999
886
887
#endif
#ifdef MOD_MUSIC
May 16, 2002
May 16, 2002
888
889
890
case MUS_MOD:
Player_SetVolume((SWORD)volume);
break;
Oct 21, 1999
Oct 21, 1999
891
892
#endif
#ifdef MID_MUSIC
May 16, 2002
May 16, 2002
893
case MUS_MID:
Aug 19, 2001
Aug 19, 2001
894
#ifdef USE_NATIVE_MIDI
May 16, 2002
May 16, 2002
895
896
897
if ( native_midi_ok ) {
native_midi_setvolume(volume);
} MIDI_ELSE
Aug 19, 2001
Aug 19, 2001
898
#endif
Sep 5, 2001
Sep 5, 2001
899
#ifdef USE_TIMIDITY_MIDI
May 16, 2002
May 16, 2002
900
901
902
if ( timidity_ok ) {
Timidity_SetVolume(volume);
}
Sep 5, 2001
Sep 5, 2001
903
#endif
May 16, 2002
May 16, 2002
904
break;
Oct 21, 1999
Oct 21, 1999
905
#endif
Jul 3, 2000
Jul 3, 2000
906
#ifdef OGG_MUSIC
May 16, 2002
May 16, 2002
907
908
909
case MUS_OGG:
OGG_setvolume(music_playing->data.ogg, volume);
break;
Jul 3, 2000
Jul 3, 2000
910
#endif
Oct 21, 1999
Oct 21, 1999
911
#ifdef MP3_MUSIC
May 16, 2002
May 16, 2002
912
913
914
case MUS_MP3:
SMPEG_setvolume(music_playing->data.mp3,(int)(((float)volume/(float)MIX_MAX_VOLUME)*100.0));
break;
Oct 21, 1999
Oct 21, 1999
915
#endif
May 16, 2002
May 16, 2002
916
917
918
919
920
921
922
923
924
925
926
927
default:
/* Unknown music type?? */
break;
}
}
int Mix_VolumeMusic(int volume)
{
int prev_volume;
prev_volume = music_volume;
if ( volume < 0 ) {
return prev_volume;
Oct 21, 1999
Oct 21, 1999
928
}
May 16, 2002
May 16, 2002
929
930
931
932
933
934
935
936
937
if ( volume > SDL_MIX_MAXVOLUME ) {
volume = SDL_MIX_MAXVOLUME;
}
music_volume = volume;
SDL_LockAudio();
if ( music_playing ) {
music_internal_volume(music_volume);
}
SDL_UnlockAudio();
Oct 21, 1999
Oct 21, 1999
938
939
940
return(prev_volume);
}
May 16, 2002
May 16, 2002
941
942
/* Halt playing of music */
static void music_internal_halt(void)
Oct 21, 1999
Oct 21, 1999
943
{
Oct 26, 1999
Oct 26, 1999
944
switch (music_playing->type) {
Oct 21, 1999
Oct 21, 1999
945
#ifdef CMD_MUSIC
May 16, 2002
May 16, 2002
946
case MUS_CMD:
Oct 26, 1999
Oct 26, 1999
947
948
MusicCMD_Stop(music_playing->data.cmd);
break;
Oct 21, 1999
Oct 21, 1999
949
950
#endif
#ifdef WAV_MUSIC
May 16, 2002
May 16, 2002
951
case MUS_WAV:
Oct 26, 1999
Oct 26, 1999
952
953
WAVStream_Stop();
break;
Oct 21, 1999
Oct 21, 1999
954
955
#endif
#ifdef MOD_MUSIC
May 16, 2002
May 16, 2002
956
case MUS_MOD:
Oct 26, 1999
Oct 26, 1999
957
958
Player_Stop();
break;
Oct 21, 1999
Oct 21, 1999
959
960
#endif
#ifdef MID_MUSIC
May 16, 2002
May 16, 2002
961
case MUS_MID:
Aug 19, 2001
Aug 19, 2001
962
963
964
#ifdef USE_NATIVE_MIDI
if ( native_midi_ok ) {
native_midi_stop();
Sep 5, 2001
Sep 5, 2001
965
} MIDI_ELSE
Aug 19, 2001
Aug 19, 2001
966
#endif
Sep 5, 2001
Sep 5, 2001
967
#ifdef USE_TIMIDITY_MIDI
Aug 19, 2001
Aug 19, 2001
968
969
970
if ( timidity_ok ) {
Timidity_Stop();
}
Sep 5, 2001
Sep 5, 2001
971
#endif
Oct 26, 1999
Oct 26, 1999
972
break;
Oct 21, 1999
Oct 21, 1999
973
#endif
Jul 3, 2000
Jul 3, 2000
974
#ifdef OGG_MUSIC
May 16, 2002
May 16, 2002
975
case MUS_OGG:
Jul 3, 2000
Jul 3, 2000
976
977
978
OGG_stop(music_playing->data.ogg);
break;
#endif
Oct 21, 1999
Oct 21, 1999
979
#ifdef MP3_MUSIC
May 16, 2002
May 16, 2002
980
case MUS_MP3:
Oct 26, 1999
Oct 26, 1999
981
982
SMPEG_stop(music_playing->data.mp3);
break;
Oct 21, 1999
Oct 21, 1999
983
#endif
May 16, 2002
May 16, 2002
984
default:
Oct 26, 1999
Oct 26, 1999
985
986
987
988
/* Unknown music type?? */
return;
}
music_playing->fading = MIX_NO_FADING;
Nov 11, 1999
Nov 11, 1999
989
music_playing = NULL;
Oct 26, 1999
Oct 26, 1999
990
991
992
}
int Mix_HaltMusic(void)
{
May 16, 2002
May 16, 2002
993
994
995
SDL_LockAudio();
if ( music_playing ) {
music_internal_halt();
Oct 21, 1999
Oct 21, 1999
996
}
May 16, 2002
May 16, 2002
997
998
SDL_UnlockAudio();
Oct 21, 1999
Oct 21, 1999
999
1000
return(0);
}