Skip to content

Latest commit

 

History

History
1472 lines (1369 loc) · 31.5 KB

music.c

File metadata and controls

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