out_common.c

   1 /*
   2
   3     Ann Hell Ex Machina - Music Software
   4     Copyright (C) 2003/2004 Angel Ortega <angel@triptico.com>
   5
   6     out_common.c - Driver for output not depending on external libraries
   7
   8     This program is free software; you can redistribute it and/or
   9     modify it under the terms of the GNU General Public License
  10     as published by the Free Software Foundation; either version 2
  11     of the License, or (at your option) any later version.
  12
  13     This program is distributed in the hope that it will be useful,
  14     but WITHOUT ANY WARRANTY; without even the implied warranty of
  15     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16     GNU General Public License for more details.
  17
  18     You should have received a copy of the GNU General Public License
  19     along with this program; if not, write to the Free Software
  20     Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  21
  22     http://www.triptico.com
  23
  24 */
  25
  26 #include "config.h"
  27 #include <stdio.h>
  28 #include "output.h"
  29
  30 #include "core.h"
  31
  32 /*******************
  33         Data
  34 ********************/
  35
  36 static FILE * f;
  37
  38 /* file positions where total number of samples is stored */
  39 static long _p1, _p2;
  40
  41 /* frame size */
  42 static int _frame_size;
  43
  44 /*******************
  45         Code
  46 ********************/
  47
  48 /*
  49         usual channel mapping:
  50
  51         mono: all
  52         stereo: left | right
  53         3 channel: left | right | center
  54         quad: front left | front right | rear left | rear right
  55         4 channel: left | center | right | surround
  56         6 channel: left center | left | center | right center | right | surround
  57 */
  58
  59
  60 static void _fput16(short int i, FILE * f)
  61 {
  62         fputc(i & 0x00ff, f);
  63         fputc((i & 0xff00) >> 8, f);
  64 }
  65
  66
  67 static void _fput32(int i, FILE * f)
  68 {
  69         fputc(i & 0x000000ff, f);
  70         fputc((i & 0x0000ff00) >> 8, f);
  71         fputc((i & 0x00ff0000) >> 16, f);
  72         fputc((i & 0xff000000) >> 24, f);
  73 }
  74
  75
  76 static int _out_write_file(short int * buffer, int size)
  77 {
  78         int n;
  79
  80         for(n=0;n < size;n++)
  81                 _fput16(buffer[n], f);
  82
  83         return(0);
  84 }
  85
  86
  87 /* raw files */
  88
  89 static int _out_open_raw(char * file)
  90 {
  91         if((f=fopen(file, "w"))==NULL)
  92                 return(-100);
  93
  94         return(0);
  95 }
  96
  97
  98 static int _out_close_raw(void)
  99 {
 100         fclose(f);
 101         return(0);
 102 }
 103
 104
 105 /* pipes */
 106
 107 static int _out_open_pipe(char * file)
 108 {
 109         /* as there is no default pipe output,
 110            file can arrive here as NULL; fail */
 111         if(file == NULL)
 112                 return(-101);
 113
 114         if((f=popen(file, "w"))==NULL)
 115                 return(-100);
 116
 117         return(0);
 118 }
 119
 120
 121 static int _out_close_pipe(void)
 122 {
 123         pclose(f);
 124         return(0);
 125 }
 126
 127
 128 /* wav files */
 129
 130 static int _out_open_wav(char * file)
 131 {
 132         if((f=fopen(file, "w"))==NULL)
 133                 return(-100);
 134
 135         _frame_size=_n_channels * 2;
 136
 137         /* write wav header */
 138
 139         fwrite("RIFF",1,4,f);
 140         _p1=ftell(f);
 141         _fput32(36, f);
 142         fwrite("WAVE",1,4,f);
 143         fwrite("fmt ",1,4,f);
 144         _fput32(16,f);                  /* chunk size */
 145         _fput16(1, f);                  /* 1: uncompressed PCM */
 146         _fput16(_n_channels, f);        /* # of channels */
 147         _fput32(_frequency, f);         /* sample rate */
 148         _fput32(_frequency * _frame_size,f); /* bytes per second */
 149         _fput16(_frame_size, f);        /* 'block align' */
 150         _fput16(16, f);                 /* 16 bits per sample */
 151         fwrite("data",1,4,f);
 152         _p2=ftell(f);
 153         _fput32(0, f);
 154
 155         return(0);
 156 }
 157
 158
 159 static int _out_close_wav(void)
 160 {
 161         /* rewind file and write total size */
 162         fseek(f, _p1, SEEK_SET);
 163         _fput32((_output_frames * _frame_size) + 36, f);
 164
 165         fseek(f, _p2, SEEK_SET);
 166         _fput32(_output_frames * _frame_size, f);
 167
 168         fclose(f);
 169
 170         return(0);
 171 }
 172
 173
 174 /* drivers */
 175
 176 struct _output_driver _out_driver_wav=
 177 { "wav", "output.wav", _out_open_wav, _out_write_file, _out_close_wav };
 178
 179 struct _output_driver _out_driver_raw=
 180 { "raw", "output.raw", _out_open_raw, _out_write_file, _out_close_raw };
 181
 182 struct _output_driver _out_driver_pipe=
 183 { "pipe", NULL, _out_open_pipe, _out_write_file, _out_close_pipe };