ref: 8ab40e817a66502cc801ae5d0844583b01d0a8d6
dir: /src/avr.c/
/* 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, (size_t)26, SEEK_SET);
lsx_writedw (ft, size);
/* Fix lend */
lsx_seeki(ft, (size_t)34, SEEK_SET);
lsx_writedw (ft, size);
return(SOX_SUCCESS);
}
SOX_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;
}