SDL_sound_CoreAudio: decoders/aiff.c annotate

author	Ryan C. Gordon <icculus@icculus.org>
date	Thu, 20 Sep 2001 07:51:42 +0000
parents
children	0d5ff5679523

rev	line source
34 938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	1 /*
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	2 * SDL_sound -- An abstract sound format decoding API.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	3 * Copyright (C) 2001 Ryan C. Gordon.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	4 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	5 * This library is free software; you can redistribute it and/or
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	6 * modify it under the terms of the GNU Lesser General Public
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	7 * License as published by the Free Software Foundation; either
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	8 * version 2.1 of the License, or (at your option) any later version.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	9 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	10 * This library is distributed in the hope that it will be useful,
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	13 * Lesser General Public License for more details.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	14 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	15 * You should have received a copy of the GNU Lesser General Public
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	16 * License along with this library; if not, write to the Free Software
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	18 */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	19
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	20 /*
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	21 * AIFF decoder for SDL_sound
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	22 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	23 * [Insert something profound about the AIFF file format here.]
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	24 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	25 * This code was ripped from a decoder I had written for SDL_mixer, which was
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	26 * based on SDL_mixer's old AIFF music loader. (This loader was unfortunately
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	27 * completely broken, but it was still useful because all the pieces were
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	28 * still there, so to speak.)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	29 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	30 * When rewriting it for SDL_sound, I changed its structure to be more like
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	31 * the WAV loader Ryan wrote. Had they not both been part of the same project
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	32 * it would have been embarrassing how similar they are.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	33 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	34 * It is not the most feature-complete AIFF loader the world has ever seen.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	35 * For instance, it only makes a token attempt at implementing the AIFF-C
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	36 * standard; basically the parts of it that I can easily understand and test.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	37 * It's a start, though.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	38 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	39 * Please see the file LICENSE in the source's root directory.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	40 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	41 * This file was written by Torbj�rn Andersson. (d91tan@Update.UU.SE)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	42 */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	43
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	44 #include <stdio.h>
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	45 #include <stdlib.h>
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	46 #include <string.h>
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	47 #include <assert.h>
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	48
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	49 #include "SDL.h"
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	50 #include "SDL_endian.h"
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	51 #include "SDL_sound.h"
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	52
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	53 #define __SDL_SOUND_INTERNAL__
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	54 #include "SDL_sound_internal.h"
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	55
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	56 #if (!defined SOUND_SUPPORTS_AIFF)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	57 #error SOUND_SUPPORTS_AIFF must be defined.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	58 #endif
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	59
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	60
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	61 static int AIFF_open(Sound_Sample sample, const char ext);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	62 static void AIFF_close(Sound_Sample *sample);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	63 static Uint32 AIFF_read(Sound_Sample *sample);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	64
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	65 const Sound_DecoderFunctions __Sound_DecoderFunctions_AIFF =
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	66 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	67 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	68 "AIFF",
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	69 "Audio Interchange File Format",
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	70 "Torbj�rn Andersson <d91tan@Update.UU.SE>",
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	71 "http://www.icculus.org/SDL_sound/"
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	72 },
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	73
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	74 AIFF_open, /* open() method */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	75 AIFF_close, /* close() method */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	76 AIFF_read /* read() method */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	77 };
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	78
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	79
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	80 /* this is what we store in our internal->decoder_private field... */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	81 typedef struct {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	82 Sint32 bytesLeft;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	83 } aiff_t;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	84
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	85
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	86 /* Chunk management code... */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	87
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	88 #define formID 0x4d524f46 /* "FORM", in ascii. */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	89 #define aiffID 0x46464941 /* "AIFF", in ascii. */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	90 #define aifcID 0x43464941 /* "AIFC", in ascii. */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	91 #define ssndID 0x444e5353 /* "SSND", in ascii. */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	92 #define commID 0x4d4d4f43 /* "COMM", in ascii. */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	93
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	94 #define noneID 0x454e4f4e /* "NONE", in ascii. */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	95
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	96 typedef struct
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	97 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	98 Uint32 ckID;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	99 Uint32 ckDataSize;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	100 Uint16 numChannels;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	101 Uint32 numSampleFrames;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	102 Uint16 sampleSize;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	103 Uint32 sampleRate;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	104 /*
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	105 * We don't handle AIFF-C compressed audio yet, but for those
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	106 * interested the allowed compression types are supposed to be
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	107 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	108 * compressionType compressionName meaning
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	109 * ---------------------------------------------------------------
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	110 * 'NONE' "not compressed" uncompressed, that is,
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	111 * straight digitized samples
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	112 * 'ACE2' "ACE 2-to-1" 2-to-1 IIGS ACE (Audio
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	113 * Compression / Expansion)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	114 * 'ACE8' "ACE 8-to-3" 8-to-3 IIGS ACE (Audio
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	115 * Compression / Expansion)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	116 * 'MAC3' "MACE 3-to-1" 3-to-1 Macintosh Audio
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	117 * Compression / Expansion
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	118 * 'MAC6' "MACE 6-to-1" 6-to-1 Macintosh Audio
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	119 * Compression / Expansion
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	120 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	121 * A pstring is a "Pascal-style string", that is, "one byte followed
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	122 * by test bytes followed when needed by one pad byte. The total
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	123 * number of bytes in a pstring must be even. The pad byte is
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	124 * included when the number of text bytes is even, so the total of
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	125 * text bytes + one count byte + one pad byte will be even. This pad
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	126 * byte is not reflected in the count."
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	127 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	128 * As for how these compression algorithms work, your guess is as
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	129 * good as mine.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	130 */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	131 Uint32 compressionType;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	132 #if 0
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	133 pstring compressionName;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	134 #endif
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	135 } comm_t;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	136
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	137
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	138 /*
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	139 * Sample rate is encoded as an "80 bit IEEE Standard 754 floating point
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	140 * number (Standard Apple Numeric Environment [SANE] data type Extended)".
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	141 * Whose bright idea was that?
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	142 *
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	143 * This function was adapted from libsndfile, and while I do know a little
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	144 * bit about the IEEE floating point standard I don't pretend to fully
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	145 * understand this.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	146 */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	147
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	148 static Uint32 SANE_to_Uint32 (Uint8 *sanebuf)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	149 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	150 /* Is the frequency outside of what we can represent with Uint32? */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	151 if ( (sanebuf[0] & 0x80)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	152 \|\| (sanebuf[0] <= 0x3F)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	153 \|\| (sanebuf[0] > 0x40)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	154 \|\| (sanebuf[0] == 0x40 && sanebuf[1] > 0x1C) )
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	155 return 0;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	156
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	157 return ((sanebuf[2] << 23) \| (sanebuf[3] << 15) \| (sanebuf[4] << 7)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	158 \| (sanebuf[5] >> 1)) >> (29 - sanebuf[1]);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	159 } /* SANE_to_Uint32 */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	160
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	161
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	162 /*
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	163 * Read in a comm_t from disk. This makes this process safe regardless of
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	164 * the processor's byte order or how the comm_t structure is packed.
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	165 */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	166
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	167 static int read_comm_chunk(SDL_RWops rw, comm_t comm)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	168 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	169 Uint8 sampleRate[10];
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	170
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	171 /* skip reading the chunk ID, since it was already read at this point... */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	172 comm->ckID = commID;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	173
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	174 if (SDL_RWread(rw, &comm->ckDataSize, sizeof (comm->ckDataSize), 1) != 1)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	175 return(0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	176 comm->ckDataSize = SDL_SwapBE32(comm->ckDataSize);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	177
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	178 if (SDL_RWread(rw, &comm->numChannels, sizeof (comm->numChannels), 1) != 1)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	179 return(0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	180 comm->numChannels = SDL_SwapBE16(comm->numChannels);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	181
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	182 if (SDL_RWread(rw, &comm->numSampleFrames, sizeof (comm->numSampleFrames), 1) != 1)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	183 return(0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	184 comm->numSampleFrames = SDL_SwapBE32(comm->numSampleFrames);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	185
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	186 if (SDL_RWread(rw, &comm->sampleSize, sizeof (comm->sampleSize), 1) != 1)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	187 return(0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	188 comm->sampleSize = SDL_SwapBE16(comm->sampleSize);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	189
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	190 if (SDL_RWread(rw, sampleRate, sizeof(sampleRate), 1) != 1)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	191 return(0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	192 comm->sampleRate = SANE_to_Uint32(sampleRate);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	193
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	194 if (comm->ckDataSize > sizeof(comm->numChannels)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	195 + sizeof(comm->numSampleFrames)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	196 + sizeof(comm->sampleSize)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	197 + sizeof(sampleRate))
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	198 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	199 if (SDL_RWread(rw, &comm->compressionType, sizeof (comm->compressionType), 1) != 1)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	200 return(0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	201 comm->compressionType = SDL_SwapBE32(comm->compressionType);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	202 } /* if */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	203 else
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	204 comm->compressionType = noneID;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	205
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	206 return(1);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	207 } /* read_comm_chunk */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	208
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	209 typedef struct
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	210 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	211 Uint32 ckID;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	212 Uint32 ckDataSize;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	213 Uint32 offset;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	214 Uint32 blockSize;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	215 /*
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	216 * Then, comm->numSampleFrames sample frames. (It's better to get the
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	217 * length from numSampleFrames than from ckDataSize.)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	218 */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	219 } ssnd_t;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	220
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	221
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	222 static int read_ssnd_chunk(SDL_RWops rw, ssnd_t ssnd)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	223 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	224 /* skip reading the chunk ID, since it was already read at this point... */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	225 ssnd->ckID = ssndID;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	226
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	227 if (SDL_RWread(rw, &ssnd->ckDataSize, sizeof (ssnd->ckDataSize), 1) != 1)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	228 return(0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	229 ssnd->ckDataSize = SDL_SwapBE32(ssnd->ckDataSize);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	230
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	231 if (SDL_RWread(rw, &ssnd->offset, sizeof(ssnd->offset), 1) != 1)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	232 return(0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	233 ssnd->offset = SDL_SwapBE32(ssnd->offset);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	234
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	235 if (SDL_RWread(rw, &ssnd->blockSize, sizeof(ssnd->blockSize), 1) != 1)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	236 return(0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	237 ssnd->blockSize = SDL_SwapBE32(ssnd->blockSize);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	238
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	239 /* Leave the SDL_RWops position indicator at the start of the samples */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	240 if (SDL_RWseek(rw, (int) ssnd->offset, SEEK_CUR) == -1) /* !!! FIXME: Int? Really? */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	241 return(0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	242
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	243 return(1);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	244 } /* read_ssnd_chunk */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	245
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	246
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	247 static int find_chunk(SDL_RWops *rw, Uint32 id)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	248 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	249 Sint32 siz = 0;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	250 Uint32 _id = 0;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	251
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	252 while (1)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	253 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	254 BAIL_IF_MACRO(SDL_RWread(rw, &_id, sizeof (_id), 1) != 1, NULL, 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	255 if (SDL_SwapLE32(_id) == id)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	256 return(1);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	257
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	258 BAIL_IF_MACRO(SDL_RWread(rw, &siz, sizeof (siz), 1) != 1, NULL, 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	259 siz = SDL_SwapBE32(siz);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	260 assert(siz > 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	261 BAIL_IF_MACRO(SDL_RWseek(rw, siz, SEEK_CUR) == -1, NULL, 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	262 } /* while */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	263
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	264 return(0); /* shouldn't hit this, but just in case... */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	265 } /* find_chunk */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	266
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	267
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	268 static int AIFF_open(Sound_Sample sample, const char ext)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	269 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	270 Sound_SampleInternal internal = (Sound_SampleInternal ) sample->opaque;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	271 SDL_RWops *rw = internal->rw;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	272 Uint32 chunk_id;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	273 int bytes_per_sample;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	274 long pos;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	275 comm_t c;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	276 ssnd_t s;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	277 aiff_t *a;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	278
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	279 BAIL_IF_MACRO(SDL_ReadLE32(rw) != formID, "AIFF: Not a FORM file.", 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	280 SDL_ReadBE32(rw); /* throw the length away; we don't need it. */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	281
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	282 chunk_id = SDL_ReadLE32(rw);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	283 BAIL_IF_MACRO(chunk_id != aiffID && chunk_id != aifcID,
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	284 "AIFF: Not an AIFF or AIFC file.", 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	285
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	286 /* Chunks may appear in any order, so we establish base camp here. */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	287 pos = SDL_RWtell(rw);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	288
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	289 BAIL_IF_MACRO(!find_chunk(rw, commID), "AIFF: No common chunk.", 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	290 BAIL_IF_MACRO(!read_comm_chunk(rw, &c), "AIFF: Can't read common chunk.", 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	291
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	292 /* !!! FIXME: This will have to change for compression types... */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	293 BAIL_IF_MACRO(c.compressionType != noneID, "AIFF: Unsupported encoding.", 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	294
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	295 BAIL_IF_MACRO(c.sampleRate == 0, "AIFF: Unsupported sample rate.", 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	296
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	297 sample->actual.channels = (Uint8) c.numChannels;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	298 sample->actual.rate = c.sampleRate;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	299
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	300 if (c.sampleSize <= 8)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	301 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	302 sample->actual.format = AUDIO_S8;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	303 bytes_per_sample = 1;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	304 } /* if */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	305 else if (c.sampleSize <= 16)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	306 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	307 sample->actual.format = AUDIO_S16MSB;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	308 bytes_per_sample = 2;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	309 } /* if */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	310 else
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	311 BAIL_MACRO("AIFF: Unsupported sample size.", 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	312
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	313 SDL_RWseek(rw, pos, SEEK_SET);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	314
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	315 BAIL_IF_MACRO(!find_chunk(rw, ssndID), "AIFF: No sound data chunk.", 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	316 BAIL_IF_MACRO(!read_ssnd_chunk(rw, &s), "AIFF: Can't read sound data chunk.", 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	317
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	318 a = (aiff_t *) malloc(sizeof(aiff_t));
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	319 BAIL_IF_MACRO(a == NULL, ERR_OUT_OF_MEMORY, 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	320 a->bytesLeft = bytes_per_sample * c.numSampleFrames;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	321 internal->decoder_private = (void *) a;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	322
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	323 _D(("AIFF: Accepting data stream.\n"));
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	324 return(1); /* we'll handle this data. */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	325 } /* AIFF_open */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	326
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	327
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	328 static void AIFF_close(Sound_Sample *sample)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	329 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	330 Sound_SampleInternal internal = (Sound_SampleInternal ) sample->opaque;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	331 free(internal->decoder_private);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	332 } /* WAV_close */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	333
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	334
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	335 static Uint32 AIFF_read(Sound_Sample *sample)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	336 {
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	337 Uint32 retval;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	338 Sound_SampleInternal internal = (Sound_SampleInternal ) sample->opaque;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	339 aiff_t a = (aiff_t ) internal->decoder_private;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	340 Uint32 max = (internal->buffer_size < (Uint32) a->bytesLeft) ?
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	341 internal->buffer_size : (Uint32) a->bytesLeft;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	342
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	343 assert(max > 0);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	344
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	345 /*
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	346 * We don't actually do any decoding, so we read the AIFF data
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	347 * directly into the internal buffer...
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	348 */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	349 retval = SDL_RWread(internal->rw, internal->buffer, 1, max);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	350
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	351 a->bytesLeft -= retval;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	352
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	353 /* Make sure the read went smoothly... */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	354 if ((retval == 0) \|\| (a->bytesLeft == 0))
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	355 sample->flags \|= SOUND_SAMPLEFLAG_EOF;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	356
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	357 else if (retval == -1)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	358 sample->flags \|= SOUND_SAMPLEFLAG_ERROR;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	359
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	360 /* (next call this EAGAIN may turn into an EOF or error.) */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	361 else if (retval < internal->buffer_size)
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	362 sample->flags \|= SOUND_SAMPLEFLAG_EAGAIN;
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	363
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	364 return(retval);
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	365 } /* AIFF_read */
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	366
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	367
938ef560c7bf Initial add. Thanks, Torbj�rn! Ryan C. Gordon <icculus@icculus.org> parents: diff changeset	368 /* end of aiff.c ... */

34

938ef560c7bf Initial add. Thanks, Torbj�rn!