From: kramm Date: Wed, 12 Oct 2005 18:29:51 +0000 (+0000) Subject: moved from ../src/ X-Git-Tag: xpdf-3-01~49 X-Git-Url: http://git.asbjorn.biz/?p=swftools.git;a=commitdiff_plain;h=96f6f939bc6a9cf64967842d5e13f949110b2d22 moved from ../src/ --- diff --git a/lib/wav.c b/lib/wav.c new file mode 100644 index 0000000..1d6c67a --- /dev/null +++ b/lib/wav.c @@ -0,0 +1,255 @@ +/* wav.c + Routines for handling .wav files + + Part of the swftools package. + + Copyright (c) 2001 Matthias Kramm + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ + +#include +#include +#include +#include "wav.h" + +struct WAVBlock { + char id[4]; + unsigned int size; +}; + +int getWAVBlock(FILE*fi, struct WAVBlock*block) +{ + unsigned int size; + unsigned char b[4]; + if(fread(block->id,1,4,fi)<4) + return 0; + if(fread(b,1,4,fi)<4) + return 0; + block->size = b[0]|b[1]<<8|b[2]<<16|b[3]<<24; + /*printf("Chunk: [%c%c%c%c] (%d bytes)\n", + block->id[0],block->id[1], + block->id[2],block->id[3], + block->size);*/ + return 1; +} + +int readWAV(char* filename, struct WAV*wav) +{ + FILE*fi = fopen(filename, "rb"); + unsigned char b[16]; + long int filesize; + struct WAVBlock block; + long int pos; + if(!fi) + return 0; + fseek(fi, 0, SEEK_END); + filesize = ftell(fi); + fseek(fi, 0, SEEK_SET); + + //printf("Filesize: %d\n", filesize); + + if(!getWAVBlock (fi, &block)) + return 0; + if(strncmp(block.id,"RIFF",4)) { + fprintf(stderr, "readWAV: not a WAV file\n"); + return 0; + } + if(block.size + 8 < filesize) + fprintf(stderr, "readWAV: warning - more tags (%d extra bytes)\n", + filesize - block.size - 8); + if(block.size + 8 > filesize) + fprintf(stderr, "readWAV: warning - short file (%d bytes missing)\n", + block.size + 8 - filesize); + if(fread(b, 1, 4, fi) < 4) { + return 0; + } + if(strncmp(b, "WAVE", 4)) { + fprintf(stderr, "readWAV: not a WAV file (2)\n"); + return 0; + } + + do + { + getWAVBlock(fi, &block); + pos = ftell(fi); + if(!strncmp(block.id, "fmt ", 4)) { + if(fread(&b, 1, 16, fi)<16) + return 0; + wav->tag = b[0]|b[1]<<8; + wav->channels = b[2]|b[3]<<8; + wav->sampsPerSec = b[4]|b[5]<<8|b[6]<<16|b[7]<<24; + wav->bytesPerSec = b[8]|b[9]<<8|b[10]<<16|b[11]<<24; + wav->align = b[12]|b[13]<<8; + wav->bps = b[14]|b[15]<<8; + } else if (!strncmp(block.id, "LIST", 4)) { + // subchunk ICMT (comment) may exist + } else if (!strncmp(block.id, "data", 4)) { + wav->data = malloc(block.size); + if(!wav->data) { + fprintf(stderr, "Out of memory (%d bytes needed)", block.size); + return 0; + } + if(fread(wav->data, 1, block.size, fi) < block.size) + return 0; + wav->size = block.size; + } + pos+=block.size; + fseek(fi, pos, SEEK_SET); + } + while (pos < filesize); + + return 1; +} + +int writeWAV(char*filename, struct WAV*wav) +{ + FILE*fi = fopen(filename, "wb"); + char*b="RIFFWAVEfmt \x10\0\0\0data"; + char c[16]; + unsigned long int w32; + if(!fi) + return 0; + fwrite(b, 4, 1, fi); + w32=(/*fmt*/8+0x10+/*data*/8+wav->size); + c[0] = w32; + c[1] = w32>>8; + c[2] = w32>>16; + c[3] = w32>>24; + fwrite(c, 4, 1, fi); + fwrite(&b[4], 12, 1, fi); + c[0] = wav->tag; + c[1] = wav->tag>>8; + c[2] = wav->channels; + c[3] = wav->channels>>8; + c[4] = wav->sampsPerSec; + c[5] = wav->sampsPerSec>>8; + c[6] = wav->sampsPerSec>>16; + c[7] = wav->sampsPerSec>>24; + c[8] = wav->bytesPerSec; + c[9] = wav->bytesPerSec>>8; + c[10] = wav->bytesPerSec>>16; + c[11] = wav->bytesPerSec>>24; + c[12] = wav->align; + c[13] = wav->align>>8; + c[14] = wav->bps; + c[15] = wav->bps>>8; + fwrite(c, 16, 1, fi); + fwrite(&b[16], 4, 1, fi); + c[0] = wav->size; + c[1] = wav->size>>8; + c[2] = wav->size>>16; + c[3] = wav->size>>24; + fwrite(c,4,1,fi); + printf("writing %d converted bytes\n", wav->size); + fwrite(wav->data,wav->size,1,fi); + fclose(fi); + return 1; +} + +void printWAVInfo(struct WAV*wav) +{ + printf("tag:%04x channels:%d samples/sec:%d bytes/sec:%d align:%d bits/sample:%d size:%d\n", + wav->tag, wav->channels, wav->sampsPerSec, wav->bytesPerSec, + wav->align, wav->bps, wav->size); +} + +int convertWAV2mono(struct WAV*src, struct WAV*dest, int rate) +{ + int samplelen=src->size/src->align; + int bps=src->bps; + double ratio; + double pos = 0; + int pos2 = 0; + int channels=src->channels; + int i; + int fill; + + dest->sampsPerSec = rate; + dest->bps = 16; + dest->channels = 1; + dest->align = 2; + dest->tag = src->tag; + dest->bytesPerSec = dest->sampsPerSec*dest->align; + + ratio = (double)dest->sampsPerSec/(double)src->sampsPerSec; + fill = (int)(ratio+1)*2; + + dest->data = (unsigned char*)malloc((int)(samplelen*ratio*2)+128); + if(!dest->data) + return 0; + dest->size = (int)(samplelen*ratio)*2; + + if(bps == 8) { + if(ratio <= 1) { + for(i=0; isize; i+=channels) { + int pos2 = ((int)pos)*2; + dest->data[pos2] = 0; + dest->data[pos2+1] = src->data[i]+128; + pos += ratio; + } + } else { + for(i=0; isize; i+=channels) { + int j; + int pos2 = ((int)pos)*2; + for(j=0;jdata[pos2+j+0] = 0; + dest->data[pos2+j+1] = src->data[i]+128; + } + pos += ratio; + } + } + } else if(bps == 16) { + if(ratio <= 1) { + for(i=0; isize/2; i+=channels) { + int pos2 = ((int)pos)*2; + dest->data[pos2+0]=src->data[i*2]; + dest->data[pos2+1]=src->data[i*2+1]; + pos += ratio; + } + } else { + for(i=0; isize/2; i+=channels) { + int j; + int pos2 = ((int)pos)*2; + for(j=0;jdata[pos2+j+0] = src->data[i*2]; + dest->data[pos2+j+1] = src->data[i*2+1]; + } + pos += ratio; + } + } + } else if(bps == 32) { + if(ratio <= 1) { + for(i=0; isize/4; i+=channels) { + int pos2 = ((int)pos)*2; + dest->data[pos2+0]=src->data[i*4+2]; + dest->data[pos2+1]=src->data[i*4+3]; + pos += ratio; + } + } else { + for(i=0; isize/4; i+=channels) { + int j; + int pos2 = ((int)pos)*2; + for(j=0;jdata[pos2+j+0] = src->data[i*4+2]; + dest->data[pos2+j+1] = src->data[i*4+3]; + } + pos += ratio; + } + } + } + return 1; +} + + diff --git a/lib/wav.h b/lib/wav.h new file mode 100644 index 0000000..c671df8 --- /dev/null +++ b/lib/wav.h @@ -0,0 +1,26 @@ +/* wav.h + Header file for wav.c + + Part of the swftools package. + + Copyright (c) 2001 Matthias Kramm + + This file is distributed under the GPL, see file COPYING for details */ + +struct WAV { + unsigned short tag; + unsigned short channels; + unsigned long sampsPerSec; + unsigned long bytesPerSec; + unsigned short align; + unsigned short bps; + + unsigned char*data; + unsigned int size; +}; + +int readWAV(char* filename, struct WAV*wav); +int writeWAV(char*filename, struct WAV*wav); +void printWAVInfo(struct WAV*wav); +int convertWAV2mono(struct WAV*src, struct WAV*dest, int rate); +