X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~mdw/git/disorder/blobdiff_plain/a05e4467dee55248f2135dcb532b4729154d69c5..0cf685f6a9ce58259b542dc4102261205a53a6f4:/server/decode.c diff --git a/server/decode.c b/server/decode.c index 639ad15..8a09013 100644 --- a/server/decode.c +++ b/server/decode.c @@ -1,54 +1,32 @@ /* * This file is part of DisOrder - * Copyright (C) 2007 Richard Kettlewell + * Copyright (C) 2007-2010 Richard Kettlewell * - * This program is free software; you can redistribute it and/or modify + * 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 + * the Free Software Foundation, either version 3 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. - * + * 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 + * along with this program. If not, see . */ /** @file server/decode.c * @brief General-purpose decoder for use by speaker process */ +#include "decode.h" -#include -#include "types.h" - -#include -#include -#include -#include -#include -#include -#include -#include #include #include -/* libFLAC has had an API change and stupidly taken away the old API */ -#if HAVE_FLAC_FILE_DECODER_H -# include -#else -# include -#define FLAC__FileDecoder FLAC__StreamDecoder -#define FLAC__FileDecoderState FLAC__StreamDecoderState -#endif +#include -#include "log.h" -#include "syscalls.h" -#include "defs.h" #include "wav.h" -#include "speaker-protocol.h" + /** @brief Encoding lookup table type */ struct decoder { @@ -58,64 +36,10 @@ struct decoder { void (*decode)(void); }; -/** @brief Input file */ -static int inputfd; - -/** @brief Output file */ -static FILE *outputfp; - -/** @brief Filename */ -static const char *path; - -/** @brief Input buffer */ -static char input_buffer[1048576]; - -/** @brief Open the input file */ -static void open_input(void) { - if((inputfd = open(path, O_RDONLY)) < 0) - fatal(errno, "opening %s", path); -} - -/** @brief Fill the buffer - * @return Number of bytes read - */ -static size_t fill(void) { - int n = read(inputfd, input_buffer, sizeof input_buffer); - - if(n < 0) - fatal(errno, "reading from %s", path); - return n; -} - -/** @brief Write an 8-bit word */ -static inline void output_8(int n) { - if(putc(n, outputfp) < 0) - fatal(errno, "decoding %s: output error", path); -} - -/** @brief Write a 16-bit word in bigendian format */ -static inline void output_16(uint16_t n) { - if(putc(n >> 8, outputfp) < 0 - || putc(n, outputfp) < 0) - fatal(errno, "decoding %s: output error", path); -} - -/** @brief Write a 24-bit word in bigendian format */ -static inline void output_24(uint32_t n) { - if(putc(n >> 16, outputfp) < 0 - || putc(n >> 8, outputfp) < 0 - || putc(n, outputfp) < 0) - fatal(errno, "decoding %s: output error", path); -} - -/** @brief Write a 32-bit word in bigendian format */ -static inline void output_32(uint32_t n) { - if(putc(n >> 24, outputfp) < 0 - || putc(n >> 16, outputfp) < 0 - || putc(n >> 8, outputfp) < 0 - || putc(n, outputfp) < 0) - fatal(errno, "decoding %s: output error", path); -} +FILE *outputfp; +const char *path; +char input_buffer[INPUT_BUFFER_SIZE]; +int input_count; /** @brief Write a block header * @param rate Sample rate in Hz @@ -125,284 +49,30 @@ static inline void output_32(uint32_t n) { * @param endian @ref ENDIAN_BIG or @ref ENDIAN_LITTLE * * Checks that the sample format is a supported one (so other calls do not have - * to) and calls fatal() on error. + * to) and calls disorder_fatal() on error. */ -static void output_header(int rate, - int channels, - int bits, - int nbytes, - int endian) { +void output_header(int rate, + int channels, + int bits, + int nbytes, + int endian) { struct stream_header header; if(bits <= 0 || bits % 8 || bits > 64) - fatal(0, "decoding %s: unsupported sample size %d bits", path, bits); + disorder_fatal(0, "decoding %s: unsupported sample size %d bits", + path, bits); if(channels <= 0 || channels > 2) - fatal(0, "decoding %s: unsupported channel count %d", path, channels); + disorder_fatal(0, "decoding %s: unsupported channel count %d", + path, channels); if(rate <= 0) - fatal(0, "decoding %s: nonsensical sample rate %dHz", path, rate); + disorder_fatal(0, "decoding %s: nonsensical sample rate %dHz", path, rate); header.rate = rate; header.bits = bits; header.channels = channels; header.endian = endian; header.nbytes = nbytes; if(fwrite(&header, sizeof header, 1, outputfp) < 1) - fatal(errno, "decoding %s: writing format header", path); -} - -/** @brief Dithering state - * Filched from mpg321, which credits it to Robert Leslie */ -struct audio_dither { - mad_fixed_t error[3]; - mad_fixed_t random; -}; - -/** @brief 32-bit PRNG - * Filched from mpg321, which credits it to Robert Leslie */ -static inline unsigned long prng(unsigned long state) -{ - return (state * 0x0019660dL + 0x3c6ef35fL) & 0xffffffffL; -} - -/** @brief Generic linear sample quantize and dither routine - * Filched from mpg321, which credits it to Robert Leslie */ -#define bits 16 -static long audio_linear_dither(mad_fixed_t sample, - struct audio_dither *dither) { - unsigned int scalebits; - mad_fixed_t output, mask, rnd; - - enum { - MIN = -MAD_F_ONE, - MAX = MAD_F_ONE - 1 - }; - - /* noise shape */ - sample += dither->error[0] - dither->error[1] + dither->error[2]; - - dither->error[2] = dither->error[1]; - dither->error[1] = dither->error[0] / 2; - - /* bias */ - output = sample + (1L << (MAD_F_FRACBITS + 1 - bits - 1)); - - scalebits = MAD_F_FRACBITS + 1 - bits; - mask = (1L << scalebits) - 1; - - /* dither */ - rnd = prng(dither->random); - output += (rnd & mask) - (dither->random & mask); - - dither->random = rnd; - - /* clip */ - if (output > MAX) { - output = MAX; - - if (sample > MAX) - sample = MAX; - } - else if (output < MIN) { - output = MIN; - - if (sample < MIN) - sample = MIN; - } - - /* quantize */ - output &= ~mask; - - /* error feedback */ - dither->error[0] = sample - output; - - /* scale */ - return output >> scalebits; -} -#undef bits - -/** @brief MP3 output callback */ -static enum mad_flow mp3_output(void attribute((unused)) *data, - struct mad_header const *header, - struct mad_pcm *pcm) { - size_t n = pcm->length; - const mad_fixed_t *l = pcm->samples[0], *r = pcm->samples[1]; - static struct audio_dither ld[1], rd[1]; - - output_header(header->samplerate, - pcm->channels, - 16, - 2 * pcm->channels * pcm->length, - ENDIAN_BIG); - switch(pcm->channels) { - case 1: - while(n--) - output_16(audio_linear_dither(*l++, ld)); - break; - case 2: - while(n--) { - output_16(audio_linear_dither(*l++, ld)); - output_16(audio_linear_dither(*r++, rd)); - } - break; - } - return MAD_FLOW_CONTINUE; -} - -/** @brief MP3 input callback */ -static enum mad_flow mp3_input(void attribute((unused)) *data, - struct mad_stream *stream) { - const size_t n = fill(); - - if(!n) - return MAD_FLOW_STOP; - mad_stream_buffer(stream, (unsigned char *)input_buffer, n); - return MAD_FLOW_CONTINUE; -} - - -/** @brief MP3 error callback */ -static enum mad_flow mp3_error(void attribute((unused)) *data, - struct mad_stream *stream, - struct mad_frame attribute((unused)) *frame) { - if(0) - /* Just generates pointless verbosity l-( */ - error(0, "decoding %s: %s (%#04x)", - path, mad_stream_errorstr(stream), stream->error); - return MAD_FLOW_CONTINUE; -} - -/** @brief MP3 decoder */ -static void decode_mp3(void) { - struct mad_decoder mad[1]; - - open_input(); - mad_decoder_init(mad, 0/*data*/, mp3_input, 0/*header*/, 0/*filter*/, - mp3_output, mp3_error, 0/*message*/); - if(mad_decoder_run(mad, MAD_DECODER_MODE_SYNC)) - exit(1); - mad_decoder_finish(mad); -} - -/** @brief OGG decoder */ -static void decode_ogg(void) { - FILE *fp; - OggVorbis_File vf[1]; - int err; - long n; - int bitstream; - vorbis_info *vi; - - if(!(fp = fopen(path, "rb"))) - fatal(errno, "cannot open %s", path); - /* There doesn't seem to be any standard function for mapping the error codes - * to strings l-( */ - if((err = ov_open(fp, vf, 0/*initial*/, 0/*ibytes*/))) - fatal(0, "ov_fopen %s: %d", path, err); - if(!(vi = ov_info(vf, 0/*link*/))) - fatal(0, "ov_info %s: failed", path); - while((n = ov_read(vf, input_buffer, sizeof input_buffer, 1/*bigendianp*/, - 2/*bytes/word*/, 1/*signed*/, &bitstream))) { - if(n < 0) - fatal(0, "ov_read %s: %ld", path, n); - if(bitstream > 0) - fatal(0, "only single-bitstream ogg files are supported"); - output_header(vi->rate, vi->channels, 16/*bits*/, n, ENDIAN_BIG); - if(fwrite(input_buffer, 1, n, outputfp) < (size_t)n) - fatal(errno, "decoding %s: writing sample data", path); - } -} - -/** @brief Sample data callback used by decode_wav() */ -static int wav_write(struct wavfile attribute((unused)) *f, - const char *data, - size_t nbytes, - void attribute((unused)) *u) { - if(fwrite(data, 1, nbytes, outputfp) < nbytes) - fatal(errno, "decoding %s: writing sample data", path); - return 0; -} - -/** @brief WAV file decoder */ -static void decode_wav(void) { - struct wavfile f[1]; - int err; - - if((err = wav_init(f, path))) - fatal(err, "opening %s", path); - output_header(f->rate, f->channels, f->bits, f->datasize, ENDIAN_LITTLE); - if((err = wav_data(f, wav_write, 0))) - fatal(err, "error decoding %s", path); -} - -/** @brief Metadata callback for FLAC decoder - * - * This is a no-op here. - */ -static void flac_metadata(const FLAC__FileDecoder attribute((unused)) *decoder, - const FLAC__StreamMetadata attribute((unused)) *metadata, - void attribute((unused)) *client_data) { -} - -/** @brief Error callback for FLAC decoder */ -static void flac_error(const FLAC__FileDecoder attribute((unused)) *decoder, - FLAC__StreamDecoderErrorStatus status, - void attribute((unused)) *client_data) { - fatal(0, "error decoding %s: %s", path, - FLAC__StreamDecoderErrorStatusString[status]); -} - -/** @brief Write callback for FLAC decoder */ -static FLAC__StreamDecoderWriteStatus flac_write - (const FLAC__FileDecoder attribute((unused)) *decoder, - const FLAC__Frame *frame, - const FLAC__int32 *const buffer[], - void attribute((unused)) *client_data) { - size_t n, c; - - output_header(frame->header.sample_rate, - frame->header.channels, - frame->header.bits_per_sample, - (frame->header.channels * frame->header.blocksize - * frame->header.bits_per_sample) / 8, - ENDIAN_BIG); - for(n = 0; n < frame->header.blocksize; ++n) { - for(c = 0; c < frame->header.channels; ++c) { - switch(frame->header.bits_per_sample) { - case 8: output_8(buffer[c][n]); break; - case 16: output_16(buffer[c][n]); break; - case 24: output_24(buffer[c][n]); break; - case 32: output_32(buffer[c][n]); break; - } - } - } - return FLAC__STREAM_DECODER_WRITE_STATUS_CONTINUE; -} - - -/** @brief FLAC file decoder */ -static void decode_flac(void) { -#if HAVE_FLAC_FILE_DECODER_H - FLAC__FileDecoder *fd = 0; - FLAC__FileDecoderState fs; - - if(!(fd = FLAC__file_decoder_new())) - fatal(0, "FLAC__file_decoder_new failed"); - if(!(FLAC__file_decoder_set_filename(fd, path))) - fatal(0, "FLAC__file_set_filename failed"); - FLAC__file_decoder_set_metadata_callback(fd, flac_metadata); - FLAC__file_decoder_set_error_callback(fd, flac_error); - FLAC__file_decoder_set_write_callback(fd, flac_write); - if((fs = FLAC__file_decoder_init(fd))) - fatal(0, "FLAC__file_decoder_init: %s", FLAC__FileDecoderStateString[fs]); - FLAC__file_decoder_process_until_end_of_file(fd); -#else - FLAC__StreamDecoder *sd = 0; - FLAC__StreamDecoderInitStatus is; - - if((is = FLAC__stream_decoder_init_file(sd, path, flac_write, flac_metadata, - flac_error, 0))) - fatal(0, "FLAC__stream_decoder_init_file %s: %s", - path, FLAC__StreamDecoderInitStatusString[is]); -#endif + disorder_fatal(errno, "decoding %s: writing format header", path); } /** @brief Lookup table of decoders */ @@ -438,33 +108,26 @@ static void help(void) { exit(0); } -/* Display version number and terminate. */ -static void version(void) { - xprintf("%s", disorder_version_string); - xfclose(stdout); - exit(0); -} - int main(int argc, char **argv) { int n; const char *e; set_progname(argv); - if(!setlocale(LC_CTYPE, "")) fatal(errno, "calling setlocale"); + if(!setlocale(LC_CTYPE, "")) disorder_fatal(errno, "calling setlocale"); while((n = getopt_long(argc, argv, "hV", options, 0)) >= 0) { switch(n) { case 'h': help(); - case 'V': version(); - default: fatal(0, "invalid option"); + case 'V': version("disorder-decode"); + default: disorder_fatal(0, "invalid option"); } } if(optind >= argc) - fatal(0, "missing filename"); + disorder_fatal(0, "missing filename"); if(optind + 1 < argc) - fatal(0, "excess arguments"); + disorder_fatal(0, "excess arguments"); if((e = getenv("DISORDER_RAW_FD"))) { if(!(outputfp = fdopen(atoi(e), "wb"))) - fatal(errno, "fdopen"); + disorder_fatal(errno, "fdopen"); } else outputfp = stdout; path = argv[optind]; @@ -474,7 +137,7 @@ int main(int argc, char **argv) { ++n) ; if(!decoders[n].pattern) - fatal(0, "cannot determine file type for %s", path); + disorder_fatal(0, "cannot determine file type for %s", path); decoders[n].decode(); xfclose(outputfp); return 0;