21 #include "vorbis/vorbisfile.h" |
21 #include "vorbis/vorbisfile.h" |
22 |
22 |
23 #ifdef __CPLUSPLUS |
23 #ifdef __CPLUSPLUS |
24 extern "C" { |
24 extern "C" { |
25 #endif |
25 #endif |
26 |
26 |
27 int load_wavpcm (const char *filename, ALenum *format, char ** data, ALsizei *bitsize, ALsizei *freq) { |
27 int load_wavpcm (const char *filename, ALenum *format, char ** data, ALsizei *bitsize, ALsizei *freq) { |
28 WAV_header_t WAVHeader; |
28 WAV_header_t WAVHeader; |
29 FILE *wavfile; |
29 FILE *wavfile; |
30 int32_t t; |
30 int32_t t; |
31 uint32_t n = 0; |
31 uint32_t n = 0; |
32 uint8_t sub0, sub1, sub2, sub3; |
32 uint8_t sub0, sub1, sub2, sub3; |
33 |
33 |
34 wavfile = Fopen(filename, "rb"); |
34 wavfile = Fopen(filename, "rb"); |
35 |
35 |
36 fread(&WAVHeader.ChunkID, sizeof(uint32_t), 1, wavfile); /*RIFF*/ |
36 fread(&WAVHeader.ChunkID, sizeof(uint32_t), 1, wavfile); /*RIFF*/ |
37 fread(&WAVHeader.ChunkSize, sizeof(uint32_t), 1, wavfile); |
37 fread(&WAVHeader.ChunkSize, sizeof(uint32_t), 1, wavfile); |
38 fread(&WAVHeader.Format, sizeof(uint32_t), 1, wavfile); /*WAVE*/ |
38 fread(&WAVHeader.Format, sizeof(uint32_t), 1, wavfile); /*WAVE*/ |
39 |
39 |
40 #ifdef DEBUG |
40 #ifdef DEBUG |
41 fprintf(stderr, "ChunkID: %X\n", ENDIAN_BIG_32(WAVHeader.ChunkID)); |
41 fprintf(stderr, "ChunkID: %X\n", ENDIAN_BIG_32(WAVHeader.ChunkID)); |
42 fprintf(stderr, "ChunkSize: %d\n", ENDIAN_LITTLE_32(WAVHeader.ChunkSize)); |
42 fprintf(stderr, "ChunkSize: %d\n", ENDIAN_LITTLE_32(WAVHeader.ChunkSize)); |
43 fprintf(stderr, "Format: %X\n", ENDIAN_BIG_32(WAVHeader.Format)); |
43 fprintf(stderr, "Format: %X\n", ENDIAN_BIG_32(WAVHeader.Format)); |
44 #endif |
44 #endif |
45 |
45 |
46 fread(&WAVHeader.Subchunk1ID, sizeof(uint32_t), 1, wavfile); /*fmt */ |
46 fread(&WAVHeader.Subchunk1ID, sizeof(uint32_t), 1, wavfile); /*fmt */ |
47 fread(&WAVHeader.Subchunk1Size, sizeof(uint32_t), 1, wavfile); |
47 fread(&WAVHeader.Subchunk1Size, sizeof(uint32_t), 1, wavfile); |
48 fread(&WAVHeader.AudioFormat, sizeof(uint16_t), 1, wavfile); |
48 fread(&WAVHeader.AudioFormat, sizeof(uint16_t), 1, wavfile); |
49 fread(&WAVHeader.NumChannels, sizeof(uint16_t), 1, wavfile); |
49 fread(&WAVHeader.NumChannels, sizeof(uint16_t), 1, wavfile); |
50 fread(&WAVHeader.SampleRate, sizeof(uint32_t), 1, wavfile); |
50 fread(&WAVHeader.SampleRate, sizeof(uint32_t), 1, wavfile); |
51 fread(&WAVHeader.ByteRate, sizeof(uint32_t), 1, wavfile); |
51 fread(&WAVHeader.ByteRate, sizeof(uint32_t), 1, wavfile); |
52 fread(&WAVHeader.BlockAlign, sizeof(uint16_t), 1, wavfile); |
52 fread(&WAVHeader.BlockAlign, sizeof(uint16_t), 1, wavfile); |
53 fread(&WAVHeader.BitsPerSample, sizeof(uint16_t), 1, wavfile); |
53 fread(&WAVHeader.BitsPerSample, sizeof(uint16_t), 1, wavfile); |
54 |
54 |
55 #ifdef DEBUG |
55 #ifdef DEBUG |
56 fprintf(stderr, "Subchunk1ID: %X\n", ENDIAN_BIG_32(WAVHeader.Subchunk1ID)); |
56 fprintf(stderr, "Subchunk1ID: %X\n", ENDIAN_BIG_32(WAVHeader.Subchunk1ID)); |
57 fprintf(stderr, "Subchunk1Size: %d\n", ENDIAN_LITTLE_32(WAVHeader.Subchunk1Size)); |
57 fprintf(stderr, "Subchunk1Size: %d\n", ENDIAN_LITTLE_32(WAVHeader.Subchunk1Size)); |
58 fprintf(stderr, "AudioFormat: %d\n", ENDIAN_LITTLE_16(WAVHeader.AudioFormat)); |
58 fprintf(stderr, "AudioFormat: %d\n", ENDIAN_LITTLE_16(WAVHeader.AudioFormat)); |
59 fprintf(stderr, "NumChannels: %d\n", ENDIAN_LITTLE_16(WAVHeader.NumChannels)); |
59 fprintf(stderr, "NumChannels: %d\n", ENDIAN_LITTLE_16(WAVHeader.NumChannels)); |
60 fprintf(stderr, "SampleRate: %d\n", ENDIAN_LITTLE_32(WAVHeader.SampleRate)); |
60 fprintf(stderr, "SampleRate: %d\n", ENDIAN_LITTLE_32(WAVHeader.SampleRate)); |
61 fprintf(stderr, "ByteRate: %d\n", ENDIAN_LITTLE_32(WAVHeader.ByteRate)); |
61 fprintf(stderr, "ByteRate: %d\n", ENDIAN_LITTLE_32(WAVHeader.ByteRate)); |
62 fprintf(stderr, "BlockAlign: %d\n", ENDIAN_LITTLE_16(WAVHeader.BlockAlign)); |
62 fprintf(stderr, "BlockAlign: %d\n", ENDIAN_LITTLE_16(WAVHeader.BlockAlign)); |
63 fprintf(stderr, "BitsPerSample: %d\n", ENDIAN_LITTLE_16(WAVHeader.BitsPerSample)); |
63 fprintf(stderr, "BitsPerSample: %d\n", ENDIAN_LITTLE_16(WAVHeader.BitsPerSample)); |
64 #endif |
64 #endif |
65 |
65 |
66 /*remove useless header chunks by looking for the WAV_HEADER_SUBCHUNK2ID integer */ |
66 /*remove useless header chunks by looking for the WAV_HEADER_SUBCHUNK2ID integer */ |
67 do { |
67 do { |
68 t = fread(&sub0, sizeof(uint8_t), 1, wavfile); |
68 t = fread(&sub0, sizeof(uint8_t), 1, wavfile); |
69 if(sub0 == 0x64) { |
69 if(sub0 == 0x64) { |
70 t = fread(&sub1, sizeof(uint8_t), 1, wavfile); |
70 t = fread(&sub1, sizeof(uint8_t), 1, wavfile); |
71 if(sub1 == 0x61) { |
71 if(sub1 == 0x61) { |
72 t = fread(&sub2, sizeof(uint8_t), 1, wavfile); |
72 t = fread(&sub2, sizeof(uint8_t), 1, wavfile); |
73 if(sub2 == 0x74) { |
73 if(sub2 == 0x74) { |
74 t = fread(&sub3, sizeof(uint8_t), 1, wavfile); |
74 t = fread(&sub3, sizeof(uint8_t), 1, wavfile); |
75 if(sub3 == 0x61) { |
75 if(sub3 == 0x61) { |
76 WAVHeader.Subchunk2ID = WAV_HEADER_SUBCHUNK2ID; |
76 WAVHeader.Subchunk2ID = WAV_HEADER_SUBCHUNK2ID; |
77 break; |
77 break; |
78 } |
|
79 } |
|
80 } |
|
81 } |
|
82 |
|
83 if (t <= 0) { |
|
84 /*eof*/ |
|
85 errno = EILSEQ; |
|
86 err_ret("(%s) ERROR - wrong WAV header", prog); |
|
87 return AL_FALSE; |
|
88 } |
|
89 } while (1); |
|
90 |
|
91 fread(&WAVHeader.Subchunk2Size, sizeof(uint32_t), 1, wavfile); |
|
92 |
|
93 #ifdef DEBUG |
|
94 fprintf(stderr, "Subchunk2ID: %X\n", ENDIAN_LITTLE_32(WAVHeader.Subchunk2ID)); |
|
95 fprintf(stderr, "Subchunk2Size: %d\n", ENDIAN_LITTLE_32(WAVHeader.Subchunk2Size)); |
|
96 #endif |
|
97 |
|
98 *data = (char*) Malloc (sizeof(char) * ENDIAN_LITTLE_32(WAVHeader.Subchunk2Size)); |
|
99 |
|
100 /*read the actual sound data*/ |
|
101 do { |
|
102 n += fread(&((*data)[n]), sizeof(uint8_t), 4, wavfile); |
|
103 } while (n < ENDIAN_LITTLE_32(WAVHeader.Subchunk2Size)); |
|
104 |
|
105 fclose(wavfile); |
|
106 |
|
107 #ifdef DEBUG |
|
108 err_msg("(%s) INFO - WAV data loaded", prog); |
|
109 #endif |
|
110 |
|
111 /*set parameters for OpenAL*/ |
|
112 /*Valid formats are AL_FORMAT_MONO8, AL_FORMAT_MONO16, AL_FORMAT_STEREO8, and AL_FORMAT_STEREO16*/ |
|
113 if (ENDIAN_LITTLE_16(WAVHeader.NumChannels) == 1) { |
|
114 if (ENDIAN_LITTLE_16(WAVHeader.BitsPerSample) == 8) |
|
115 *format = AL_FORMAT_MONO8; |
|
116 else { |
|
117 if (ENDIAN_LITTLE_16(WAVHeader.BitsPerSample) == 16) |
|
118 *format = AL_FORMAT_MONO16; |
|
119 else { |
|
120 errno = EILSEQ; |
|
121 err_ret("(%s) ERROR - wrong WAV header [bitsample value]", prog); |
|
122 return AL_FALSE; |
|
123 } |
|
124 } |
78 } |
125 } else { |
79 } |
126 if (ENDIAN_LITTLE_16(WAVHeader.NumChannels) == 2) { |
80 } |
127 if (ENDIAN_LITTLE_16(WAVHeader.BitsPerSample) == 8) |
81 } |
128 *format = AL_FORMAT_STEREO8; |
82 |
129 else { |
83 if (t <= 0) { |
130 if (ENDIAN_LITTLE_16(WAVHeader.BitsPerSample) == 16) |
84 /*eof*/ |
131 *format = AL_FORMAT_STEREO16; |
85 errno = EILSEQ; |
132 else { |
86 err_ret("(%s) ERROR - wrong WAV header", prog); |
133 errno = EILSEQ; |
87 return AL_FALSE; |
134 err_ret("(%s) ERROR - wrong WAV header [bitsample value]", prog); |
88 } |
135 return AL_FALSE; |
89 } while (1); |
136 } |
90 |
137 } |
91 fread(&WAVHeader.Subchunk2Size, sizeof(uint32_t), 1, wavfile); |
138 } else { |
92 |
139 errno = EILSEQ; |
93 #ifdef DEBUG |
140 err_ret("(%s) ERROR - wrong WAV header [format value]", prog); |
94 fprintf(stderr, "Subchunk2ID: %X\n", ENDIAN_LITTLE_32(WAVHeader.Subchunk2ID)); |
141 return AL_FALSE; |
95 fprintf(stderr, "Subchunk2Size: %d\n", ENDIAN_LITTLE_32(WAVHeader.Subchunk2Size)); |
142 } |
96 #endif |
143 } |
97 |
144 |
98 *data = (char*) Malloc (sizeof(char) * ENDIAN_LITTLE_32(WAVHeader.Subchunk2Size)); |
145 *bitsize = ENDIAN_LITTLE_32(WAVHeader.Subchunk2Size); |
99 |
146 *freq = ENDIAN_LITTLE_32(WAVHeader.SampleRate); |
100 /*read the actual sound data*/ |
147 return AL_TRUE; |
101 do { |
148 } |
102 n += fread(&((*data)[n]), sizeof(uint8_t), 4, wavfile); |
149 |
103 } while (n < ENDIAN_LITTLE_32(WAVHeader.Subchunk2Size)); |
150 |
104 |
151 int load_oggvorbis (const char *filename, ALenum *format, char **data, ALsizei *bitsize, ALsizei *freq) { |
105 fclose(wavfile); |
152 /*implementation inspired from http://www.devmaster.net/forums/showthread.php?t=1153 */ |
106 |
153 |
107 #ifdef DEBUG |
154 /*stream handle*/ |
108 err_msg("(%s) INFO - WAV data loaded", prog); |
155 OggVorbis_File oggStream; |
109 #endif |
156 /*some formatting data*/ |
110 |
157 vorbis_info *vorbisInfo; |
111 /*set parameters for OpenAL*/ |
158 /*length of the decoded data*/ |
112 /*Valid formats are AL_FORMAT_MONO8, AL_FORMAT_MONO16, AL_FORMAT_STEREO8, and AL_FORMAT_STEREO16*/ |
159 int64_t pcm_length; |
113 if (ENDIAN_LITTLE_16(WAVHeader.NumChannels) == 1) { |
160 /*other vars*/ |
114 if (ENDIAN_LITTLE_16(WAVHeader.BitsPerSample) == 8) |
161 int section, result, size, endianness; |
115 *format = AL_FORMAT_MONO8; |
162 #ifdef DEBUG |
116 else { |
163 int i; |
117 if (ENDIAN_LITTLE_16(WAVHeader.BitsPerSample) == 16) |
164 /*other less useful data*/ |
118 *format = AL_FORMAT_MONO16; |
165 vorbis_comment *vorbisComment; |
119 else { |
166 #endif |
120 errno = EILSEQ; |
167 |
121 err_ret("(%s) ERROR - wrong WAV header [bitsample value]", prog); |
168 result = ov_fopen((char*) filename, &oggStream); |
122 return AL_FALSE; |
169 if (result < 0) { |
123 } |
170 errno = EINVAL; |
124 } |
171 err_ret("(%s) ERROR - ov_fopen() failed with %X", prog, result); |
125 } else { |
172 ov_clear(&oggStream); |
126 if (ENDIAN_LITTLE_16(WAVHeader.NumChannels) == 2) { |
|
127 if (ENDIAN_LITTLE_16(WAVHeader.BitsPerSample) == 8) |
|
128 *format = AL_FORMAT_STEREO8; |
|
129 else { |
|
130 if (ENDIAN_LITTLE_16(WAVHeader.BitsPerSample) == 16) |
|
131 *format = AL_FORMAT_STEREO16; |
|
132 else { |
|
133 errno = EILSEQ; |
|
134 err_ret("(%s) ERROR - wrong WAV header [bitsample value]", prog); |
173 return AL_FALSE; |
135 return AL_FALSE; |
174 } |
136 } |
175 |
137 } |
176 /*load OGG header and determine the decoded data size*/ |
138 } else { |
177 vorbisInfo = ov_info(&oggStream, -1); |
139 errno = EILSEQ; |
178 pcm_length = ov_pcm_total(&oggStream, -1) << vorbisInfo->channels; |
140 err_ret("(%s) ERROR - wrong WAV header [format value]", prog); |
179 |
141 return AL_FALSE; |
180 #ifdef DEBUG |
142 } |
181 vorbisComment = ov_comment(&oggStream, -1); |
143 } |
182 fprintf(stderr, "Version: %d\n", vorbisInfo->version); |
144 |
183 fprintf(stderr, "Channels: %d\n", vorbisInfo->channels); |
145 *bitsize = ENDIAN_LITTLE_32(WAVHeader.Subchunk2Size); |
184 fprintf(stderr, "Rate (Hz): %ld\n", vorbisInfo->rate); |
146 *freq = ENDIAN_LITTLE_32(WAVHeader.SampleRate); |
185 fprintf(stderr, "Bitrate Upper: %ld\n", vorbisInfo->bitrate_upper); |
147 return AL_TRUE; |
186 fprintf(stderr, "Bitrate Nominal: %ld\n", vorbisInfo->bitrate_nominal); |
148 } |
187 fprintf(stderr, "Bitrate Lower: %ld\n", vorbisInfo->bitrate_lower); |
149 |
188 fprintf(stderr, "Bitrate Windows: %ld\n", vorbisInfo->bitrate_window); |
150 |
189 fprintf(stderr, "Vendor: %s\n", vorbisComment->vendor); |
151 int load_oggvorbis (const char *filename, ALenum *format, char **data, ALsizei *bitsize, ALsizei *freq) { |
190 fprintf(stderr, "PCM data size: %lld\n", pcm_length); |
152 /*implementation inspired from http://www.devmaster.net/forums/showthread.php?t=1153 */ |
191 fprintf(stderr, "# comment: %d\n", vorbisComment->comments); |
153 |
192 for (i = 0; i < vorbisComment->comments; i++) |
154 /*ogg handle*/ |
193 fprintf(stderr, "\tComment %d: %s\n", i, vorbisComment->user_comments[i]); |
155 FILE *oggFile; |
194 #endif |
156 /*stream handle*/ |
195 |
157 OggVorbis_File oggStream; |
196 /*allocates enough room for the decoded data*/ |
158 /*some formatting data*/ |
197 *data = (char*) Malloc (sizeof(char) * pcm_length); |
159 vorbis_info *vorbisInfo; |
198 |
160 /*length of the decoded data*/ |
199 /*there *should* not be ogg at 8 bits*/ |
161 int64_t pcm_length; |
200 if (vorbisInfo->channels == 1) |
162 /*other vars*/ |
201 *format = AL_FORMAT_MONO16; |
163 int section, result, size, endianness; |
202 else { |
164 #ifdef DEBUG |
203 if (vorbisInfo->channels == 2) |
165 int i; |
204 *format = AL_FORMAT_STEREO16; |
166 /*other less useful data*/ |
205 else { |
167 vorbis_comment *vorbisComment; |
206 errno = EILSEQ; |
168 #endif |
207 err_ret("(%s) ERROR - wrong OGG header [channel %d]", prog, vorbisInfo->channels); |
169 |
208 ov_clear(&oggStream); |
170 oggFile = Fopen(filename, "rb"); |
209 return AL_FALSE; |
171 result = ov_open_callbacks(oggFile, &oggStream, NULL, 0, OV_CALLBACKS_DEFAULT); |
210 } |
172 if (result < 0) { |
211 } |
173 errno = EINVAL; |
212 |
174 err_ret("(%s) ERROR - ov_fopen() failed with %X", prog, result); |
213 size = 0; |
175 ov_clear(&oggStream); |
|
176 return AL_FALSE; |
|
177 } |
|
178 |
|
179 /*load OGG header and determine the decoded data size*/ |
|
180 vorbisInfo = ov_info(&oggStream, -1); |
|
181 pcm_length = ov_pcm_total(&oggStream, -1) << vorbisInfo->channels; |
|
182 |
|
183 #ifdef DEBUG |
|
184 vorbisComment = ov_comment(&oggStream, -1); |
|
185 fprintf(stderr, "Version: %d\n", vorbisInfo->version); |
|
186 fprintf(stderr, "Channels: %d\n", vorbisInfo->channels); |
|
187 fprintf(stderr, "Rate (Hz): %ld\n", vorbisInfo->rate); |
|
188 fprintf(stderr, "Bitrate Upper: %ld\n", vorbisInfo->bitrate_upper); |
|
189 fprintf(stderr, "Bitrate Nominal: %ld\n", vorbisInfo->bitrate_nominal); |
|
190 fprintf(stderr, "Bitrate Lower: %ld\n", vorbisInfo->bitrate_lower); |
|
191 fprintf(stderr, "Bitrate Windows: %ld\n", vorbisInfo->bitrate_window); |
|
192 fprintf(stderr, "Vendor: %s\n", vorbisComment->vendor); |
|
193 fprintf(stderr, "PCM data size: %lld\n", pcm_length); |
|
194 fprintf(stderr, "# comment: %d\n", vorbisComment->comments); |
|
195 for (i = 0; i < vorbisComment->comments; i++) |
|
196 fprintf(stderr, "\tComment %d: %s\n", i, vorbisComment->user_comments[i]); |
|
197 #endif |
|
198 |
|
199 /*allocates enough room for the decoded data*/ |
|
200 *data = (char*) Malloc (sizeof(char) * pcm_length); |
|
201 |
|
202 /*there *should* not be ogg at 8 bits*/ |
|
203 if (vorbisInfo->channels == 1) |
|
204 *format = AL_FORMAT_MONO16; |
|
205 else { |
|
206 if (vorbisInfo->channels == 2) |
|
207 *format = AL_FORMAT_STEREO16; |
|
208 else { |
|
209 errno = EILSEQ; |
|
210 err_ret("(%s) ERROR - wrong OGG header [channel %d]", prog, vorbisInfo->channels); |
|
211 ov_clear(&oggStream); |
|
212 return AL_FALSE; |
|
213 } |
|
214 } |
|
215 |
|
216 size = 0; |
214 #ifdef __LITTLE_ENDIAN__ |
217 #ifdef __LITTLE_ENDIAN__ |
215 endianness = 0; |
218 endianness = 0; |
216 #elif __BIG_ENDIAN__ |
219 #elif __BIG_ENDIAN__ |
217 endianness = 1; |
220 endianness = 1; |
218 #endif |
221 #endif |
219 while (size < pcm_length) { |
222 while (size < pcm_length) { |
220 /*ov_read decodes the ogg stream and storse the pcm in data*/ |
223 /*ov_read decodes the ogg stream and storse the pcm in data*/ |
221 result = ov_read (&oggStream, *data + size, pcm_length - size, endianness, 2, 1, §ion); |
224 result = ov_read (&oggStream, *data + size, pcm_length - size, endianness, 2, 1, §ion); |
222 if (result > 0) { |
225 if (result > 0) { |
223 size += result; |
226 size += result; |
224 } else { |
227 } else { |
225 if (result == 0) |
228 if (result == 0) |
226 break; |
229 break; |
227 else { |
230 else { |
228 errno = EILSEQ; |
231 errno = EILSEQ; |
229 err_ret("(%s) ERROR - End of file from OGG stream", prog); |
232 err_ret("(%s) ERROR - End of file from OGG stream", prog); |
230 ov_clear(&oggStream); |
233 ov_clear(&oggStream); |
231 return AL_FALSE; |
234 return AL_FALSE; |
232 } |
235 } |
233 } |
236 } |
234 } |
237 } |
235 |
238 |
236 /*set the last fields*/ |
239 /*set the last fields*/ |
237 *bitsize = size; |
240 *bitsize = size; |
238 *freq = vorbisInfo->rate; |
241 *freq = vorbisInfo->rate; |
239 |
242 |
240 /*cleaning time*/ |
243 /*cleaning time*/ |
241 ov_clear(&oggStream); |
244 ov_clear(&oggStream); |
242 |
245 |
243 return AL_TRUE; |
246 return AL_TRUE; |
244 } |
247 } |
245 |
248 |
246 #ifdef __CPLUSPLUS |
249 #ifdef __CPLUSPLUS |
247 } |
250 } |
248 #endif |
251 #endif |