annotate decoders/mikmod.c @ 429:df1839d62fd0

Updated.
author Ryan C. Gordon <icculus@icculus.org>
date Wed, 09 Oct 2002 16:20:33 +0000
parents 077cdba5d5f6
children c09cf7c046cd
rev   line source
207
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
1 /*
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
2 * SDL_sound -- An abstract sound format decoding API.
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
3 * Copyright (C) 2001 Ryan C. Gordon.
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
4 *
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
5 * This library is free software; you can redistribute it and/or
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
6 * modify it under the terms of the GNU Lesser General Public
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
7 * License as published by the Free Software Foundation; either
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
8 * version 2.1 of the License, or (at your option) any later version.
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
9 *
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
10 * This library is distributed in the hope that it will be useful,
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
13 * Lesser General Public License for more details.
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
14 *
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
15 * You should have received a copy of the GNU Lesser General Public
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
16 * License along with this library; if not, write to the Free Software
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
18 */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
19
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
20 /*
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
21 * Module player for SDL_sound. This driver handles anything MikMod does, and
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
22 * is based on SDL_mixer.
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
23 *
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
24 * Please see the file COPYING in the source's root directory.
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
25 *
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
26 * This file written by Torbjörn Andersson (d91tan@Update.UU.SE)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
27 */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
28
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
29 #if HAVE_CONFIG_H
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
30 # include <config.h>
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
31 #endif
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
32
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
33 #ifdef SOUND_SUPPORTS_MIKMOD
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
34
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
35 #include <stdio.h>
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
36 #include <stdlib.h>
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
37 #include <string.h>
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
38
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
39 #include "SDL_sound.h"
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
40
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
41 #define __SDL_SOUND_INTERNAL__
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
42 #include "SDL_sound_internal.h"
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
43
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
44 #include "mikmod.h"
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
45
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
46
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
47 static int MIKMOD_init(void);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
48 static void MIKMOD_quit(void);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
49 static int MIKMOD_open(Sound_Sample *sample, const char *ext);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
50 static void MIKMOD_close(Sound_Sample *sample);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
51 static Uint32 MIKMOD_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 MIKMOD_rewind(Sound_Sample *sample);
306
c97be6e1bd27 Added framework for Sound_Seek() support.
Ryan C. Gordon <icculus@icculus.org>
parents: 305
diff changeset
53 static int MIKMOD_seek(Sound_Sample *sample, Uint32 ms);
207
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
54
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
55 static const char *extensions_mikmod[] =
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
56 {
211
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
57 "669", /* Composer 669 */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
58 "AMF", /* DMP Advanced Module Format */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
59 "DSM", /* DSIK internal format */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
60 "FAR", /* Farandole module */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
61 "GDM", /* General DigiMusic module */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
62 "IMF", /* Imago Orpheus module */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
63 "IT", /* Impulse tracker */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
64 "M15", /* 15 instrument MOD / Ultimate Sound Tracker (old M15 format) */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
65 "MED", /* Amiga MED module */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
66 "MOD", /* Generic MOD (Protracker, StarTracker, FastTracker, etc) */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
67 "MTM", /* MTM module */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
68 "OKT", /* Oktalyzer module */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
69 "S3M", /* Screamtracker module */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
70 "STM", /* Screamtracker 2 module */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
71 "STX", /* STMIK 0.2 module */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
72 "ULT", /* Ultratracker module */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
73 "UNI", /* UNIMOD - libmikmod's and APlayer's internal module format */
b35c04e4691e Patched to select streams to handle more carefully.
Ryan C. Gordon <icculus@icculus.org>
parents: 207
diff changeset
74 "XM", /* Fasttracker module */
207
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
75 NULL
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
76 };
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
77
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
78 const Sound_DecoderFunctions __Sound_DecoderFunctions_MIKMOD =
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
79 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
80 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
81 extensions_mikmod,
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
82 "Play modules through MikMod",
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
83 "Torbjörn Andersson <d91tan@Update.UU.SE>",
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
84 "http://www.mikmod.org/"
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
85 },
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
86
221
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
87 MIKMOD_init, /* init() method */
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
88 MIKMOD_quit, /* quit() method */
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
89 MIKMOD_open, /* open() method */
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
90 MIKMOD_close, /* close() method */
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
91 MIKMOD_read, /* read() method */
306
c97be6e1bd27 Added framework for Sound_Seek() support.
Ryan C. Gordon <icculus@icculus.org>
parents: 305
diff changeset
92 MIKMOD_rewind, /* rewind() method */
c97be6e1bd27 Added framework for Sound_Seek() support.
Ryan C. Gordon <icculus@icculus.org>
parents: 305
diff changeset
93 MIKMOD_seek /* seek() method */
207
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
94 };
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
95
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
96
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
97 /* Make MikMod read from a RWops... */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
98
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
99 typedef struct MRWOPSREADER {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
100 MREADER core;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
101 Sound_Sample *sample;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
102 int end;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
103 } MRWOPSREADER;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
104
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
105 static BOOL _mm_RWopsReader_eof(MREADER *reader)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
106 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
107 MRWOPSREADER *rwops_reader = (MRWOPSREADER *) reader;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
108 Sound_Sample *sample = rwops_reader->sample;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
109 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
110 int pos = SDL_RWtell(internal->rw);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
111
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
112 if (rwops_reader->end == pos)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
113 return(1);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
114
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
115 return(0);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
116 } /* _mm_RWopsReader_eof */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
117
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
118
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
119 static BOOL _mm_RWopsReader_read(MREADER *reader, void *ptr, size_t size)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
120 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
121 MRWOPSREADER *rwops_reader = (MRWOPSREADER *) reader;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
122 Sound_Sample *sample = rwops_reader->sample;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
123 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
124 return(SDL_RWread(internal->rw, ptr, size, 1));
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
125 } /* _mm_RWopsReader_Read */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
126
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
127
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
128 static int _mm_RWopsReader_get(MREADER *reader)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
129 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
130 char buf;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
131 MRWOPSREADER *rwops_reader = (MRWOPSREADER *) reader;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
132 Sound_Sample *sample = rwops_reader->sample;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
133 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
134
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
135 if (SDL_RWread(internal->rw, &buf, 1, 1) != 1)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
136 return(EOF);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
137
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
138 return((int) buf);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
139 } /* _mm_RWopsReader_get */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
140
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
141
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
142 static BOOL _mm_RWopsReader_seek(MREADER *reader, long offset, int whence)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
143 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
144 MRWOPSREADER *rwops_reader = (MRWOPSREADER *) reader;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
145 Sound_Sample *sample = rwops_reader->sample;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
146 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
147
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
148 return(SDL_RWseek(internal->rw, offset, whence));
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
149 } /* _mm_RWopsReader_seek */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
150
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
151
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
152 static long _mm_RWopsReader_tell(MREADER *reader)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
153 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
154 MRWOPSREADER *rwops_reader = (MRWOPSREADER *) reader;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
155 Sound_Sample *sample = rwops_reader->sample;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
156 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
157
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
158 return(SDL_RWtell(internal->rw));
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
159 } /* _mm_RWopsReader_tell */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
160
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
161
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
162 static MREADER *_mm_new_rwops_reader(Sound_Sample *sample)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
163 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
164 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
165
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
166 MRWOPSREADER *reader = (MRWOPSREADER *) malloc(sizeof (MRWOPSREADER));
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
167 if (reader != NULL)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
168 {
397
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
169 int failed_seek = 1;
207
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
170 int here;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
171 reader->core.Eof = _mm_RWopsReader_eof;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
172 reader->core.Read = _mm_RWopsReader_read;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
173 reader->core.Get = _mm_RWopsReader_get;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
174 reader->core.Seek = _mm_RWopsReader_seek;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
175 reader->core.Tell = _mm_RWopsReader_tell;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
176 reader->sample = sample;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
177
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
178 /* RWops does not explicitly support an eof check, so we shall find
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
179 the end manually - this requires seek support for the RWop */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
180 here = SDL_RWtell(internal->rw);
397
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
181 if (here != -1)
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
182 {
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
183 reader->end = SDL_RWseek(internal->rw, 0, SEEK_END);
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
184 if (reader->end != -1)
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
185 {
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
186 /* Move back */
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
187 if (SDL_RWseek(internal->rw, here, SEEK_SET) != -1)
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
188 failed_seek = 0;
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
189 } /* if */
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
190 } /* if */
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
191
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
192 if (failed_seek)
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
193 {
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
194 free(reader);
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
195 reader = NULL;
077cdba5d5f6 FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 375
diff changeset
196 } /* if */
207
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
197 } /* if */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
198
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
199 return((MREADER *) reader);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
200 } /* _mm_new_rwops_reader */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
201
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
202
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
203 static void _mm_delete_rwops_reader(MREADER *reader)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
204 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
205 /* SDL_sound will delete the RWops and sample at a higher level... */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
206 if (reader != NULL)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
207 free(reader);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
208 } /* _mm_delete_rwops_reader */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
209
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
210
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
211
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
212 static int MIKMOD_init(void)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
213 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
214 MikMod_RegisterDriver(&drv_nos);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
215 MikMod_RegisterAllLoaders();
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
216
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
217 /*
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
218 * Both DMODE_SOFT_MUSIC and DMODE_16BITS should be set by default,
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
219 * so this is just for clarity. I haven't experimented with any of
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
220 * the other flags. There are a few which are said to give better
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
221 * sound quality.
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
222 */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
223 md_mode |= (DMODE_SOFT_MUSIC | DMODE_16BITS);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
224 md_mixfreq = 0;
375
6095d0a52a20 Added a reverb setting, moved assert.h include out.
Ryan C. Gordon <icculus@icculus.org>
parents: 351
diff changeset
225 md_reverb = 1;
207
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
226
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
227 BAIL_IF_MACRO(MikMod_Init(""), MikMod_strerror(MikMod_errno), 0);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
228
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
229 return(1); /* success. */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
230 } /* MIKMOD_init */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
231
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
232
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
233 static void MIKMOD_quit(void)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
234 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
235 MikMod_Exit();
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
236 md_mixfreq = 0;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
237 } /* MIKMOD_quit */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
238
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
239
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
240 static int MIKMOD_open(Sound_Sample *sample, const char *ext)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
241 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
242 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
243 MREADER *reader;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
244 MODULE *module;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
245
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
246 reader = _mm_new_rwops_reader(sample);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
247 BAIL_IF_MACRO(reader == NULL, ERR_OUT_OF_MEMORY, 0);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
248 module = Player_LoadGeneric(reader, 64, 0);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
249 _mm_delete_rwops_reader(reader);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
250 BAIL_IF_MACRO(module == NULL, "MIKMOD: Not a module file.", 0);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
251
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
252 module->extspd = 1;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
253 module->panflag = 1;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
254 module->wrap = 0;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
255 module->loop = 0;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
256
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
257 if (md_mixfreq == 0)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
258 md_mixfreq = (!sample->desired.rate) ? 44100 : sample->desired.rate;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
259
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
260 sample->actual.channels = 2;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
261 sample->actual.rate = md_mixfreq;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
262 sample->actual.format = AUDIO_S16SYS;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
263 internal->decoder_private = (void *) module;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
264
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
265 Player_Start(module);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
266 Player_SetPosition(0);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
267
312
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
268 sample->flags = SOUND_SAMPLEFLAG_NONE;
207
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
269
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
270 SNDDBG(("MIKMOD: Name: %s\n", module->songname));
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
271 SNDDBG(("MIKMOD: Type: %s\n", module->modtype));
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
272 SNDDBG(("MIKMOD: Accepting data stream\n"));
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
273
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
274 return(1); /* we'll handle this data. */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
275 } /* MIKMOD_open */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
276
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
277
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
278 static void MIKMOD_close(Sound_Sample *sample)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
279 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
280 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
281 MODULE *module = (MODULE *) internal->decoder_private;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
282
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
283 Player_Free(module);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
284 } /* MIKMOD_close */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
285
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
286
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
287 static Uint32 MIKMOD_read(Sound_Sample *sample)
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
288 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
289 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
290 MODULE *module = (MODULE *) internal->decoder_private;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
291
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
292 /* Switch to the current module, stopping any previous one. */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
293 Player_Start(module);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
294 if (!Player_Active())
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
295 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
296 sample->flags |= SOUND_SAMPLEFLAG_EOF;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
297 return(0);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
298 } /* if */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
299 return((Uint32) VC_WriteBytes(internal->buffer, internal->buffer_size));
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
300 } /* MIKMOD_read */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
301
221
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
302
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
303 static int MIKMOD_rewind(Sound_Sample *sample)
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
304 {
231
d3dc34315ac7 Rewind method implemented by Torbj�rn.
Ryan C. Gordon <icculus@icculus.org>
parents: 221
diff changeset
305 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
d3dc34315ac7 Rewind method implemented by Torbj�rn.
Ryan C. Gordon <icculus@icculus.org>
parents: 221
diff changeset
306 MODULE *module = (MODULE *) internal->decoder_private;
d3dc34315ac7 Rewind method implemented by Torbj�rn.
Ryan C. Gordon <icculus@icculus.org>
parents: 221
diff changeset
307
d3dc34315ac7 Rewind method implemented by Torbj�rn.
Ryan C. Gordon <icculus@icculus.org>
parents: 221
diff changeset
308 Player_Start(module);
d3dc34315ac7 Rewind method implemented by Torbj�rn.
Ryan C. Gordon <icculus@icculus.org>
parents: 221
diff changeset
309 Player_SetPosition(0);
d3dc34315ac7 Rewind method implemented by Torbj�rn.
Ryan C. Gordon <icculus@icculus.org>
parents: 221
diff changeset
310 return(1);
221
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
311 } /* MIKMOD_rewind */
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
312
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
313
306
c97be6e1bd27 Added framework for Sound_Seek() support.
Ryan C. Gordon <icculus@icculus.org>
parents: 305
diff changeset
314 static int MIKMOD_seek(Sound_Sample *sample, Uint32 ms)
c97be6e1bd27 Added framework for Sound_Seek() support.
Ryan C. Gordon <icculus@icculus.org>
parents: 305
diff changeset
315 {
312
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
316 #if 0
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
317 Sound_SampleInternal *internal = (Sound_SampleInternal *) sample->opaque;
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
318 MODULE *module = (MODULE *) internal->decoder_private;
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
319
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
320 /*
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
321 * Heaven may know what the argument to Player_SetPosition() is.
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
322 * I, however, haven't the faintest idea.
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
323 */
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
324 Player_Start(module);
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
325 Player_SetPosition(ms);
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
326 return(1);
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
327 #else
351
069ce624d6cf FIXME cleanup.
Ryan C. Gordon <icculus@icculus.org>
parents: 312
diff changeset
328 BAIL_MACRO("MIKMOD: Seeking not implemented", 0);
312
498240aa76f1 Seek implementations.
Ryan C. Gordon <icculus@icculus.org>
parents: 306
diff changeset
329 #endif
306
c97be6e1bd27 Added framework for Sound_Seek() support.
Ryan C. Gordon <icculus@icculus.org>
parents: 305
diff changeset
330 } /* MIKMOD_seek */
221
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups.
Ryan C. Gordon <icculus@icculus.org>
parents: 211
diff changeset
331
207
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
332 #endif /* SOUND_SUPPORTS_MIKMOD */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
333
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
334
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder).
Ryan C. Gordon <icculus@icculus.org>
parents:
diff changeset
335 /* end of mikmod.c ... */