SDL_sound_CoreAudio: decoders/mikmod.c annotate

annotate decoders/mikmod.c @ 474:c66080364dff

Most decoders now report total sample play time, now. Technically, this breaks binary compatibility with the 1.0 branch, since it extends the Sound_Sample struct, but most (all?) programs are just passing pointers allocated by SDL_sound around, and might be okay. Source-level compatibility is not broken...yet! :) --ryan. -------- Original Message -------- Subject: SDL_sound patch: Finding total length of time of sound file. Date: Sun, 26 Jan 2003 09:31:17 -0800 (PST) Hi Ryan, I am working with Eric Wing and helping him modify SDL_sound. AS part of our efforts in improving and enhancing SDL_sound, we like to submit this patch. We modified the codecs to find the total time of a sound file. Below is the explanation of the patch. The patch is appended as an attachment to this email. * MOTIVATION: We needed the ability to get the total play time of a sample (And we noticed that we're not the only ones). Since SDL_sound blocks direct access to the specific decoders, there is no way for a user to know this information short of decoding the whole thing. Because of this, we believe this will be a useful addition, even though the accuracy may not be perfect (subject to each decoder) or the information may not always be available. * CONTRIBUTORS: Wesley Leong (modified the majority of the codecs and verified the results) Eric Wing (showed everyone how to do modify codec, modified mikmod) Wang Lam (modified a handful of codecs, researched into specs and int overflow) Ahilan Anantha (modified a few codecs and helped with integer math) * GENERAL ISSUES: We chose the value to be milliseconds as an Sint32. Milliseconds because that's what Sound_Seek takes as a parameter and -1 to allow for instances/codecs where the value could not be determined. We are not sure if this is the final convention you want, so we are willing to work with you on this. We also expect the total_time field to be set on open and never again modified by SDL_sound. Users may access it directly much like the sample buffer and buffer_size. We thought about recomputing the time on DecodeAll, but since users may seek or decode small chunks first, not all the data may be there. So this is better done by the user. This may be good information to document. Currently, all the main codecs are implemented except for QuickTime.

author	Ryan C. Gordon <icculus@icculus.org>
date	Sat, 08 May 2004 08:19:50 +0000
parents	1edb89260487
children	3e705c9180e5

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>",
473 1edb89260487 Fixed MikMod URL. Ryan C. Gordon <icculus@icculus.org> parents: 434 diff changeset	84 "http://mikmod.raphnet.net/"
207 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 {
474 c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	205 /* SDL_sound will delete the RWops and sample at a higher level... */
207 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);
434 c09cf7c046cd Prevent a clash between SDL_mixer and SDL_sound in mikmod initialization. Ryan C. Gordon <icculus@icculus.org> parents: 397 diff changeset	215
474 c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	216 /*
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	217 * Quick and dirty hack to prevent an infinite loop problem
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	218 * found when using SDL_mixer and SDL_sound together and
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	219 * both have MikMod compiled in. So, check to see if
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	220 * MikMod has already been registered first before calling
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	221 * RegisterAllLoaders()
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	222 */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	223 if (MikMod_InfoLoader() == NULL)
434 c09cf7c046cd Prevent a clash between SDL_mixer and SDL_sound in mikmod initialization. Ryan C. Gordon <icculus@icculus.org> parents: 397 diff changeset	224 {
c09cf7c046cd Prevent a clash between SDL_mixer and SDL_sound in mikmod initialization. Ryan C. Gordon <icculus@icculus.org> parents: 397 diff changeset	225 MikMod_RegisterAllLoaders();
474 c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	226 } /* if */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	227
207 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 * 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	230 * 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	231 * 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	232 * sound quality.
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	233 */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	234 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	235 md_mixfreq = 0;
375 6095d0a52a20 Added a reverb setting, moved assert.h include out. Ryan C. Gordon <icculus@icculus.org> parents: 351 diff changeset	236 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	237
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	238 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	239
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	240 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	241 } /* MIKMOD_init */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	242
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	243
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	244 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	245 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	246 MikMod_Exit();
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	247 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	248 } /* MIKMOD_quit */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	249
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	250
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	251 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	252 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	253 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	254 MREADER *reader;
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	255 MODULE *module;
474 c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	256 Uint32 i; /* temp counter for time computation */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	257 double segment_time = 0.0; /* temp holder for time */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	258
207 857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	259 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	260 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	261 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	262 _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	263 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	264
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	265 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	266 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	267 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	268 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	269
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	270 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	271 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	272
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	273 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	274 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	275 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	276 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	277
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	278 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	279 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	280
312 498240aa76f1 Seek implementations. Ryan C. Gordon <icculus@icculus.org> parents: 306 diff changeset	281 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	282
474 c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	283 /*
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	284 * module->sngtime = current song time in 2^-10 seconds
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	285 * sample->total_time = (module->sngtime * 1000) / (1<<10)
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	286 */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	287 sample->total_time = (module->sngtime * 1000) / (1<<10);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	288
207 857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	289 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	290 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	291 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	292
474 c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	293
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	294 /*
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	295 * This is a quick and dirty way for getting the play time
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	296 * of a file. This will often be wrong because the tracker format
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	297 * allows for so much. If you want a better one, use ModPlug,
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	298 * demand that the Mikmod people write better functionality,
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	299 * or write a more complicated version of the code below.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	300 *
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	301 * There are two dumb ways to compute the length. The really
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	302 * dumb way is to look at the header and take the initial
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	303 * speed/tempo values. However, speed values can change throughout
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	304 * the file. The slightly smarter way is to iterate through
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	305 * all the positions and add up each segment's time based
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	306 * on the idea that each segment will give us its own
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	307 * speed value. The hope is that this is more accurate.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	308 * However, this demands that the file be seekable
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	309 * and that we can change the position of the sample.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	310 * Depending on the assumptions of SDL_sound, this block
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	311 * of code should be enabled or disabled. If disabled,
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	312 * you still can make the computations doing the first method.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	313 * For now, we will assume it's acceptable to seek a Mod file
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	314 * since this is essentially how Modplug also does it.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	315 *
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	316 * Keep in mind that this will be incorrect for loops, jumps, short
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	317 * patterns and other features.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	318 */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	319 sample->flags \|= SOUND_SAMPLEFLAG_CANSEEK;
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	320
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	321 /*
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	322 * For each position (which corresponds to a particular pattern),
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	323 * get the speed values and compute the time length of the segment
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	324 */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	325 sample->total_time = 0;
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	326 for (i = 0; i < module->numpos; i++)
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	327 {
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	328 Player_SetPosition(i);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	329 /* Must call update, or the speed values won't get reset */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	330 MikMod_Update();
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	331 /* Now the magic formula:
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	332 * Multiply the number of positions by the
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	333 * Number of rows (usually 64 but can be different) by the
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	334 * time it takes to read one row (1/50)
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	335 * by the speed by the
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	336 * magic reference beats per minute / the beats per minute
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	337 *
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	338 * We're using positions instead of patterns because in our
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	339 * test cases, this seems to be the correct value for the
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	340 * number of sections you hear during normal playback.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	341 * They typically map to a fewer number of patterns
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	342 * where some patterns get replayed multiple times
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	343 * in a song (think chorus). Since we're in a for-loop,
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	344 * the multiplication is implicit while we're adding
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	345 * all the segments.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	346 *
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	347 * From a tracker format spec, it seems that 64 rows
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	348 * is the normal (00-3F), but I've seen songs that
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	349 * either have less or are jumping positions in the
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	350 * middle of a pattern. It looks like Mikmod might
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	351 * reveal this number for us.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	352 *
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	353 * According to the spec, it seems that a speed of 1
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	354 * corresponds to reading 1 row in 50 ticks. However,
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	355 * I'm not sure if ticks are real seconds or this
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	356 * notion of second units:
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	357 * Assuming that it's just normal seconds, we get 1/50 = 0.02.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	358 *
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	359 * The current speed and current tempo (beats per minute)
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	360 * we can just grab. However, we need a magic number
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	361 * to figure out what the tempo is based on. Our primitive
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	362 * stopwatch results and intuition seem to imply 120-130bpm
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	363 * is the magic number. Looking at the majority of tracker
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	364 * files I have, 125 seems to be the common value. Furthermore
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	365 * most (if not all) of my Future Crew .S3M (Scream Tracker 3)
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	366 * files also use 125. Since they invented that format,
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	367 * I'll also assume that's the base number.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	368 */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	369 if(module->bpm == 0)
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	370 {
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	371 /*
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	372 * Should never get here, but I don't want any
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	373 * divide by zero errors
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	374 */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	375 continue;
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	376 } /* if */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	377 segment_time += (module->numrow * .02 * module->sngspd *
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	378 125.0 / module->bpm);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	379 } /* for */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	380 /* Now convert to milliseconds and store the value */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	381 sample->total_time = (Sint32)(segment_time * 1000);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	382
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	383 /* Reset the sample to the beginning */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	384 Player_SetPosition(0);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	385 MikMod_Update();
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	386
207 857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	387 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	388 } /* MIKMOD_open */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	389
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	390
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	391 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	392 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	393 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	394 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	395
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	396 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	397 } /* MIKMOD_close */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	398
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	399
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	400 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	401 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	402 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	403 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	404
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	405 /* 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	406 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	407 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	408 {
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	409 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	410 return(0);
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	411 } /* if */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	412 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	413 } /* MIKMOD_read */
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	414
221 c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups. Ryan C. Gordon <icculus@icculus.org> parents: 211 diff changeset	415
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups. Ryan C. Gordon <icculus@icculus.org> parents: 211 diff changeset	416 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	417 {
231 d3dc34315ac7 Rewind method implemented by Torbj�rn. Ryan C. Gordon <icculus@icculus.org> parents: 221 diff changeset	418 Sound_SampleInternal internal = (Sound_SampleInternal ) sample->opaque;
d3dc34315ac7 Rewind method implemented by Torbj�rn. Ryan C. Gordon <icculus@icculus.org> parents: 221 diff changeset	419 MODULE module = (MODULE ) internal->decoder_private;
d3dc34315ac7 Rewind method implemented by Torbj�rn. Ryan C. Gordon <icculus@icculus.org> parents: 221 diff changeset	420
d3dc34315ac7 Rewind method implemented by Torbj�rn. Ryan C. Gordon <icculus@icculus.org> parents: 221 diff changeset	421 Player_Start(module);
d3dc34315ac7 Rewind method implemented by Torbj�rn. Ryan C. Gordon <icculus@icculus.org> parents: 221 diff changeset	422 Player_SetPosition(0);
d3dc34315ac7 Rewind method implemented by Torbj�rn. Ryan C. Gordon <icculus@icculus.org> parents: 221 diff changeset	423 return(1);
221 c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups. Ryan C. Gordon <icculus@icculus.org> parents: 211 diff changeset	424 } /* MIKMOD_rewind */
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups. Ryan C. Gordon <icculus@icculus.org> parents: 211 diff changeset	425
c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups. Ryan C. Gordon <icculus@icculus.org> parents: 211 diff changeset	426
306 c97be6e1bd27 Added framework for Sound_Seek() support. Ryan C. Gordon <icculus@icculus.org> parents: 305 diff changeset	427 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	428 {
312 498240aa76f1 Seek implementations. Ryan C. Gordon <icculus@icculus.org> parents: 306 diff changeset	429 Sound_SampleInternal internal = (Sound_SampleInternal ) sample->opaque;
498240aa76f1 Seek implementations. Ryan C. Gordon <icculus@icculus.org> parents: 306 diff changeset	430 MODULE module = (MODULE ) internal->decoder_private;
474 c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	431 double last_time = 0.0;
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	432 double current_time = 0.0;
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	433 double target_time;
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	434 Uint32 i;
312 498240aa76f1 Seek implementations. Ryan C. Gordon <icculus@icculus.org> parents: 306 diff changeset	435
498240aa76f1 Seek implementations. Ryan C. Gordon <icculus@icculus.org> parents: 306 diff changeset	436 /*
498240aa76f1 Seek implementations. Ryan C. Gordon <icculus@icculus.org> parents: 306 diff changeset	437 * Heaven may know what the argument to Player_SetPosition() is.
498240aa76f1 Seek implementations. Ryan C. Gordon <icculus@icculus.org> parents: 306 diff changeset	438 * I, however, haven't the faintest idea.
498240aa76f1 Seek implementations. Ryan C. Gordon <icculus@icculus.org> parents: 306 diff changeset	439 */
498240aa76f1 Seek implementations. Ryan C. Gordon <icculus@icculus.org> parents: 306 diff changeset	440 Player_Start(module);
474 c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	441
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	442 /*
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	443 * Mikmod only lets you seek to the beginning of a pattern.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	444 * This means we'll get very coarse grain seeks. The
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	445 * value we pass to SetPosition is a value between 0
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	446 * and the number of positions in the file. The
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	447 * dumb approach would be to take our total_time that
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	448 * we've already calculated and divide it up by the
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	449 * number of positions and seek to the position that results.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	450 * However, because songs can alter their speed/tempo during
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	451 * playback, different patterns in the song can take
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	452 * up different amounts of time. So the slightly
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	453 * smarter approach is to repeat what was done in the
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	454 * total_time computation and traverse through the file
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	455 * until we find the closest position.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	456 * The follwing is basically cut and paste from the
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	457 * open function.
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	458 */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	459 if (ms == 0) /* Check end conditions to simplify things */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	460 {
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	461 Player_SetPosition(0);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	462 return(1);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	463 } /* if */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	464
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	465 if (ms >= sample->total_time)
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	466 Player_SetPosition(module->numpos);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	467
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	468 /* Convert time to seconds (double) to make comparisons easier */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	469 target_time = ms / 1000.0;
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	470
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	471 for (i = 0; i < module->numpos; i++)
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	472 {
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	473 Player_SetPosition(i);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	474 /* Must call update, or the speed values won't get reset */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	475 MikMod_Update();
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	476 /* Divide by zero check */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	477 if(module->bpm == 0)
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	478 continue;
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	479 last_time = current_time;
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	480 /* See the notes in the open function about the formula */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	481 current_time += (module->numrow * .02
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	482 * module->sngspd * 125.0 / module->bpm);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	483 if(target_time <= current_time)
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	484 break; /* We now have our interval, so break out */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	485 } /* for */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	486
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	487 if( (target_time-last_time) > (current_time-target_time) )
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	488 {
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	489 /* The target time is closer to the higher position, so go there */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	490 Player_SetPosition(i+1);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	491 } /* if */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	492 else
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	493 {
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	494 /* The target time is closer to the lower position, so go there */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	495 Player_SetPosition(i);
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	496 } /* else */
c66080364dff Most decoders now report total sample play time, now. Technically, this Ryan C. Gordon <icculus@icculus.org> parents: 473 diff changeset	497
312 498240aa76f1 Seek implementations. Ryan C. Gordon <icculus@icculus.org> parents: 306 diff changeset	498 return(1);
306 c97be6e1bd27 Added framework for Sound_Seek() support. Ryan C. Gordon <icculus@icculus.org> parents: 305 diff changeset	499 } /* MIKMOD_seek */
221 c9772a9f5271 Initial implementation or stubs for rewind method. Other cleanups. Ryan C. Gordon <icculus@icculus.org> parents: 211 diff changeset	500
207 857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	501 #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	502
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	503
857e53c5a2da Renamed from mod.c (see modplug.c for the OTHER mod decoder). Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	504 /* end of mikmod.c ... */

Mercurial > SDL_sound_CoreAudio

annotate decoders/mikmod.c @ 474:c66080364dff