out_common.c

   1 /*
   2
   3     Ann Hell Ex Machina - Music Software
   4     Copyright (C) 2003/2005 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 "ss_output.h"
  29
  30 #include "ss_core.h"
  31
  32 /*******************
  33         Data
  34 ********************/
  35
  36 static FILE * f;
  37
  38 /* frame size */
  39 static int frame_size;
  40
  41 /*******************
  42         Code
  43 ********************/
  44
  45 /*
  46         usual channel mapping:
  47
  48         mono: all
  49         stereo: left | right
  50         3 channel: left | right | center
  51         quad: front left | front right | rear left | rear right
  52         4 channel: left | center | right | surround
  53         6 channel: left center | left | center | right center | right | surround
  54 */
  55
  56
  57 static void fput16(short int i, FILE * f)
  58 {
  59         fputc(i & 0x00ff, f);
  60         fputc((i & 0xff00) >> 8, f);
  61 }
  62
  63
  64 static void fput32(int i, FILE * f)
  65 {
  66         fputc(i & 0x000000ff, f);
  67         fputc((i & 0x0000ff00) >> 8, f);
  68         fputc((i & 0x00ff0000) >> 16, f);
  69         fputc((i & 0xff000000) >> 24, f);
  70 }
  71
  72
  73 static int _out_write_file(short int * buffer, int size)
  74 {
  75         int n;
  76
  77         for(n=0;n < size;n++)
  78                 fput16(buffer[n], f);
  79
  80         return(0);
  81 }
  82
  83
  84 /* raw files */
  85
  86 static int _out_open_raw(char * file)
  87 {
  88         if((f=fopen(file, "w"))==NULL)
  89                 return(-100);
  90
  91         return(0);
  92 }
  93
  94
  95 static int _out_close_raw(void)
  96 {
  97         fclose(f);
  98         return(0);
  99 }
 100
 101
 102 /* pipes */
 103
 104 static int _out_open_pipe(char * file)
 105 {
 106         /* as there is no default pipe output,
 107            file can arrive here as NULL; fail */
 108         if(file == NULL)
 109                 return(-101);
 110
 111         if((f=popen(file, "w"))==NULL)
 112                 return(-100);
 113
 114         return(0);
 115 }
 116
 117
 118 static int _out_close_pipe(void)
 119 {
 120         pclose(f);
 121         return(0);
 122 }
 123
 124
 125 /* wav files */
 126
 127 static int _out_open_wav(char * file)
 128 {
 129         if((f=fopen(file, "w"))==NULL)
 130                 return(-100);
 131
 132         frame_size=ss_nchannels * 2;
 133
 134         /* write wav header */
 135
 136         fwrite("RIFF",1,4,f);
 137         /* first checkpoint (offset: 4) */
 138         fput32(36, f);
 139         fwrite("WAVE",1,4,f);
 140         fwrite("fmt ",1,4,f);
 141         fput32(16,f);                           /* chunk size */
 142         fput16(1, f);                           /* 1: uncompressed PCM */
 143         fput16(ss_nchannels, f);                /* # of channels */
 144         fput32(ss_frequency, f);                /* sample rate */
 145         fput32(ss_frequency * frame_size, f);   /* bytes per second */
 146         fput16(frame_size, f);                  /* 'block align' */
 147         fput16(16, f);                          /* 16 bits per sample */
 148         fwrite("data",1,4,f);
 149         /* second checkpoint (offset: 40) */
 150         fput32(0, f);
 151
 152         return(0);
 153 }
 154
 155
 156 static int _out_close_wav(void)
 157 {
 158         /* rewind file and write total size */
 159         fseek(f, 4, SEEK_SET);
 160         fput32((ss_output_frames * frame_size) + 36, f);
 161
 162         fseek(f, 40, SEEK_SET);
 163         fput32(ss_output_frames * frame_size, f);
 164
 165         fclose(f);
 166
 167         return(0);
 168 }
 169
 170
 171 /* drivers */
 172
 173 struct _output_driver _out_driver_wav=
 174 { "wav", "output.wav", _out_open_wav, _out_write_file, _out_close_wav };
 175
 176 struct _output_driver _out_driver_raw=
 177 { "raw", "output.raw", _out_open_raw, _out_write_file, _out_close_raw };
 178
 179 struct _output_driver _out_driver_pipe=
 180 { "pipe", NULL, _out_open_pipe, _out_write_file, _out_close_pipe };