xufulong
3 years ago
parent
ce2b7d3b24
commit
7cb01e9171
@ -1,287 +0,0 @@ |
|||||||
/* AVR file format handler for SoX
|
|
||||||
* Copyright (C) 1999 Jan Paul Schmidt <jps@fundament.org> |
|
||||||
* |
|
||||||
* This library is free software; you can redistribute it and/or modify it |
|
||||||
* under the terms of the GNU Lesser General Public License as published by |
|
||||||
* the Free Software Foundation; either version 2.1 of the License, or (at |
|
||||||
* your option) any later version. |
|
||||||
* |
|
||||||
* This library 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 Lesser |
|
||||||
* General Public License for more details. |
|
||||||
* |
|
||||||
* You should have received a copy of the GNU Lesser General Public License |
|
||||||
* along with this library; if not, write to the Free Software Foundation, |
|
||||||
* Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
|
||||||
*/ |
|
||||||
|
|
||||||
#include "sox_i.h" |
|
||||||
|
|
||||||
#include <stdio.h> |
|
||||||
#include <string.h> |
|
||||||
|
|
||||||
#define AVR_MAGIC "2BIT" |
|
||||||
|
|
||||||
/* Taken from the Audio File Formats FAQ */ |
|
||||||
|
|
||||||
typedef struct { |
|
||||||
char magic [5]; /* 2BIT */ |
|
||||||
char name [8]; /* null-padded sample name */ |
|
||||||
unsigned short mono; /* 0 = mono, 0xffff = stereo */ |
|
||||||
unsigned short rez; /* 8 = 8 bit, 16 = 16 bit */ |
|
||||||
unsigned short sign; /* 0 = unsigned, 0xffff = signed */ |
|
||||||
unsigned short loop; /* 0 = no loop, 0xffff = looping sample */ |
|
||||||
unsigned short midi; /* 0xffff = no MIDI note assigned,
|
|
||||||
0xffXX = single key note assignment |
|
||||||
0xLLHH = key split, low/hi note */ |
|
||||||
uint32_t rate; /* sample frequency in hertz */ |
|
||||||
uint32_t size; /* sample length in bytes or words (see rez) */ |
|
||||||
uint32_t lbeg; /* offset to start of loop in bytes or words.
|
|
||||||
set to zero if unused. */ |
|
||||||
uint32_t lend; /* offset to end of loop in bytes or words.
|
|
||||||
set to sample length if unused. */ |
|
||||||
unsigned short res1; /* Reserved, MIDI keyboard split */ |
|
||||||
unsigned short res2; /* Reserved, sample compression */ |
|
||||||
unsigned short res3; /* Reserved */ |
|
||||||
char ext[20]; /* Additional filename space, used
|
|
||||||
if (name[7] != 0) */ |
|
||||||
char user[64]; /* User defined. Typically ASCII message. */ |
|
||||||
} priv_t; |
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Do anything required before you start reading samples. |
|
||||||
* Read file header. |
|
||||||
* Find out sampling rate, |
|
||||||
* size and encoding of samples, |
|
||||||
* mono/stereo/quad. |
|
||||||
*/ |
|
||||||
|
|
||||||
|
|
||||||
static int startread(sox_format_t * ft) |
|
||||||
{ |
|
||||||
priv_t * avr = (priv_t *)ft->priv; |
|
||||||
int rc; |
|
||||||
|
|
||||||
lsx_reads(ft, avr->magic, (size_t)4); |
|
||||||
|
|
||||||
if (strncmp (avr->magic, AVR_MAGIC, (size_t)4)) { |
|
||||||
lsx_fail_errno(ft,SOX_EHDR,"AVR: unknown header"); |
|
||||||
return(SOX_EOF); |
|
||||||
} |
|
||||||
|
|
||||||
lsx_readbuf(ft, avr->name, sizeof(avr->name)); |
|
||||||
|
|
||||||
lsx_readw (ft, &(avr->mono)); |
|
||||||
if (avr->mono) { |
|
||||||
ft->signal.channels = 2; |
|
||||||
} |
|
||||||
else { |
|
||||||
ft->signal.channels = 1; |
|
||||||
} |
|
||||||
|
|
||||||
lsx_readw (ft, &(avr->rez)); |
|
||||||
if (avr->rez == 8) { |
|
||||||
ft->encoding.bits_per_sample = 8; |
|
||||||
} |
|
||||||
else if (avr->rez == 16) { |
|
||||||
ft->encoding.bits_per_sample = 16; |
|
||||||
} |
|
||||||
else { |
|
||||||
lsx_fail_errno(ft,SOX_EFMT,"AVR: unsupported sample resolution"); |
|
||||||
return(SOX_EOF); |
|
||||||
} |
|
||||||
|
|
||||||
lsx_readw (ft, &(avr->sign)); |
|
||||||
if (avr->sign) { |
|
||||||
ft->encoding.encoding = SOX_ENCODING_SIGN2; |
|
||||||
} |
|
||||||
else { |
|
||||||
ft->encoding.encoding = SOX_ENCODING_UNSIGNED; |
|
||||||
} |
|
||||||
|
|
||||||
lsx_readw (ft, &(avr->loop)); |
|
||||||
|
|
||||||
lsx_readw (ft, &(avr->midi)); |
|
||||||
|
|
||||||
lsx_readdw (ft, &(avr->rate)); |
|
||||||
/*
|
|
||||||
* No support for AVRs created by ST-Replay, |
|
||||||
* Replay Proffesional and PRO-Series 12. |
|
||||||
* |
|
||||||
* Just masking the upper byte out. |
|
||||||
*/ |
|
||||||
ft->signal.rate = (avr->rate & 0x00ffffff); |
|
||||||
|
|
||||||
lsx_readdw (ft, &(avr->size)); |
|
||||||
|
|
||||||
lsx_readdw (ft, &(avr->lbeg)); |
|
||||||
|
|
||||||
lsx_readdw (ft, &(avr->lend)); |
|
||||||
|
|
||||||
lsx_readw (ft, &(avr->res1)); |
|
||||||
|
|
||||||
lsx_readw (ft, &(avr->res2)); |
|
||||||
|
|
||||||
lsx_readw (ft, &(avr->res3)); |
|
||||||
|
|
||||||
lsx_readbuf(ft, avr->ext, sizeof(avr->ext)); |
|
||||||
|
|
||||||
lsx_readbuf(ft, avr->user, sizeof(avr->user)); |
|
||||||
|
|
||||||
rc = lsx_rawstartread (ft); |
|
||||||
if (rc) |
|
||||||
return rc; |
|
||||||
|
|
||||||
return(SOX_SUCCESS); |
|
||||||
} |
|
||||||
|
|
||||||
static int startwrite(sox_format_t * ft) |
|
||||||
{ |
|
||||||
priv_t * avr = (priv_t *)ft->priv; |
|
||||||
int rc; |
|
||||||
|
|
||||||
if (!ft->seekable) { |
|
||||||
lsx_fail_errno(ft,SOX_EOF,"AVR: file is not seekable"); |
|
||||||
return(SOX_EOF); |
|
||||||
} |
|
||||||
|
|
||||||
rc = lsx_rawstartwrite (ft); |
|
||||||
if (rc) |
|
||||||
return rc; |
|
||||||
|
|
||||||
/* magic */ |
|
||||||
lsx_writes(ft, AVR_MAGIC); |
|
||||||
|
|
||||||
/* name */ |
|
||||||
lsx_writeb(ft, 0); |
|
||||||
lsx_writeb(ft, 0); |
|
||||||
lsx_writeb(ft, 0); |
|
||||||
lsx_writeb(ft, 0); |
|
||||||
lsx_writeb(ft, 0); |
|
||||||
lsx_writeb(ft, 0); |
|
||||||
lsx_writeb(ft, 0); |
|
||||||
lsx_writeb(ft, 0); |
|
||||||
|
|
||||||
/* mono */ |
|
||||||
if (ft->signal.channels == 1) { |
|
||||||
lsx_writew (ft, 0); |
|
||||||
} |
|
||||||
else if (ft->signal.channels == 2) { |
|
||||||
lsx_writew (ft, 0xffff); |
|
||||||
} |
|
||||||
else { |
|
||||||
lsx_fail_errno(ft,SOX_EFMT,"AVR: number of channels not supported"); |
|
||||||
return(0); |
|
||||||
} |
|
||||||
|
|
||||||
/* rez */ |
|
||||||
if (ft->encoding.bits_per_sample == 8) { |
|
||||||
lsx_writew (ft, 8); |
|
||||||
} |
|
||||||
else if (ft->encoding.bits_per_sample == 16) { |
|
||||||
lsx_writew (ft, 16); |
|
||||||
} |
|
||||||
else { |
|
||||||
lsx_fail_errno(ft,SOX_EFMT,"AVR: unsupported sample resolution"); |
|
||||||
return(SOX_EOF); |
|
||||||
} |
|
||||||
|
|
||||||
/* sign */ |
|
||||||
if (ft->encoding.encoding == SOX_ENCODING_SIGN2) { |
|
||||||
lsx_writew (ft, 0xffff); |
|
||||||
} |
|
||||||
else if (ft->encoding.encoding == SOX_ENCODING_UNSIGNED) { |
|
||||||
lsx_writew (ft, 0); |
|
||||||
} |
|
||||||
else { |
|
||||||
lsx_fail_errno(ft,SOX_EFMT,"AVR: unsupported encoding"); |
|
||||||
return(SOX_EOF); |
|
||||||
} |
|
||||||
|
|
||||||
/* loop */ |
|
||||||
lsx_writew (ft, 0xffff); |
|
||||||
|
|
||||||
/* midi */ |
|
||||||
lsx_writew (ft, 0xffff); |
|
||||||
|
|
||||||
/* rate */ |
|
||||||
lsx_writedw(ft, (unsigned)(ft->signal.rate + .5)); |
|
||||||
|
|
||||||
/* size */ |
|
||||||
/* Don't know the size yet. */ |
|
||||||
lsx_writedw (ft, 0); |
|
||||||
|
|
||||||
/* lbeg */ |
|
||||||
lsx_writedw (ft, 0); |
|
||||||
|
|
||||||
/* lend */ |
|
||||||
/* Don't know the size yet, so we can't set lend, either. */ |
|
||||||
lsx_writedw (ft, 0); |
|
||||||
|
|
||||||
/* res1 */ |
|
||||||
lsx_writew (ft, 0); |
|
||||||
|
|
||||||
/* res2 */ |
|
||||||
lsx_writew (ft, 0); |
|
||||||
|
|
||||||
/* res3 */ |
|
||||||
lsx_writew (ft, 0); |
|
||||||
|
|
||||||
/* ext */ |
|
||||||
lsx_writebuf(ft, "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0", sizeof(avr->ext)); |
|
||||||
|
|
||||||
/* user */ |
|
||||||
lsx_writebuf(ft, |
|
||||||
"\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" |
|
||||||
"\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" |
|
||||||
"\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" |
|
||||||
"\0\0\0\0", sizeof (avr->user)); |
|
||||||
|
|
||||||
return(SOX_SUCCESS); |
|
||||||
} |
|
||||||
|
|
||||||
static size_t write_samples(sox_format_t * ft, const sox_sample_t *buf, size_t nsamp) |
|
||||||
{ |
|
||||||
priv_t * avr = (priv_t *)ft->priv; |
|
||||||
|
|
||||||
avr->size += nsamp; |
|
||||||
|
|
||||||
return (lsx_rawwrite (ft, buf, nsamp)); |
|
||||||
} |
|
||||||
|
|
||||||
static int stopwrite(sox_format_t * ft) |
|
||||||
{ |
|
||||||
priv_t * avr = (priv_t *)ft->priv; |
|
||||||
|
|
||||||
unsigned size = avr->size / ft->signal.channels; |
|
||||||
|
|
||||||
/* Fix size */ |
|
||||||
lsx_seeki(ft, (off_t)26, SEEK_SET); |
|
||||||
lsx_writedw (ft, size); |
|
||||||
|
|
||||||
/* Fix lend */ |
|
||||||
lsx_seeki(ft, (off_t)34, SEEK_SET); |
|
||||||
lsx_writedw (ft, size); |
|
||||||
|
|
||||||
return(SOX_SUCCESS); |
|
||||||
} |
|
||||||
|
|
||||||
LSX_FORMAT_HANDLER(avr) |
|
||||||
{ |
|
||||||
static char const * const names[] = { "avr", NULL }; |
|
||||||
static unsigned const write_encodings[] = { |
|
||||||
SOX_ENCODING_SIGN2, 16, 8, 0, |
|
||||||
SOX_ENCODING_UNSIGNED, 16, 8, 0, |
|
||||||
0}; |
|
||||||
static sox_format_handler_t handler = {SOX_LIB_VERSION_CODE, |
|
||||||
"Audio Visual Research format; used on the Mac", |
|
||||||
names, SOX_FILE_BIG_END | SOX_FILE_MONO | SOX_FILE_STEREO, |
|
||||||
startread, lsx_rawread, NULL, |
|
||||||
startwrite, write_samples, stopwrite, |
|
||||||
NULL, write_encodings, NULL, sizeof(priv_t) |
|
||||||
}; |
|
||||||
return &handler; |
|
||||||
} |
|
||||||
Loading…
Reference in new issue