cannam@85
|
1 /*
|
cannam@85
|
2 ** Copyright (C) 2009-2011 Erik de Castro Lopo <erikd@mega-nerd.com>
|
cannam@85
|
3 **
|
cannam@85
|
4 ** All rights reserved.
|
cannam@85
|
5 **
|
cannam@85
|
6 ** Redistribution and use in source and binary forms, with or without
|
cannam@85
|
7 ** modification, are permitted provided that the following conditions are
|
cannam@85
|
8 ** met:
|
cannam@85
|
9 **
|
cannam@85
|
10 ** * Redistributions of source code must retain the above copyright
|
cannam@85
|
11 ** notice, this list of conditions and the following disclaimer.
|
cannam@85
|
12 ** * Redistributions in binary form must reproduce the above copyright
|
cannam@85
|
13 ** notice, this list of conditions and the following disclaimer in
|
cannam@85
|
14 ** the documentation and/or other materials provided with the
|
cannam@85
|
15 ** distribution.
|
cannam@85
|
16 ** * Neither the author nor the names of any contributors may be used
|
cannam@85
|
17 ** to endorse or promote products derived from this software without
|
cannam@85
|
18 ** specific prior written permission.
|
cannam@85
|
19 **
|
cannam@85
|
20 ** THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
cannam@85
|
21 ** "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
cannam@85
|
22 ** TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
cannam@85
|
23 ** PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
|
cannam@85
|
24 ** CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
|
cannam@85
|
25 ** EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
|
cannam@85
|
26 ** PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
|
cannam@85
|
27 ** OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
|
cannam@85
|
28 ** WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
|
cannam@85
|
29 ** OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
|
cannam@85
|
30 ** ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
cannam@85
|
31 */
|
cannam@85
|
32
|
cannam@85
|
33 #include <stdio.h>
|
cannam@85
|
34 #include <stdlib.h>
|
cannam@85
|
35 #include <string.h>
|
cannam@85
|
36 #include <sndfile.h>
|
cannam@85
|
37
|
cannam@85
|
38 #include "common.h"
|
cannam@85
|
39
|
cannam@85
|
40 #define BUFFER_LEN 4096
|
cannam@85
|
41 #define MAX_CHANNELS 16
|
cannam@85
|
42
|
cannam@85
|
43
|
cannam@85
|
44 typedef struct
|
cannam@85
|
45 { SNDFILE * infile ;
|
cannam@85
|
46 SNDFILE * outfile [MAX_CHANNELS] ;
|
cannam@85
|
47
|
cannam@85
|
48 union
|
cannam@85
|
49 { double d [MAX_CHANNELS * BUFFER_LEN] ;
|
cannam@85
|
50 int i [MAX_CHANNELS * BUFFER_LEN] ;
|
cannam@85
|
51 } din ;
|
cannam@85
|
52
|
cannam@85
|
53 union
|
cannam@85
|
54 { double d [BUFFER_LEN] ;
|
cannam@85
|
55 int i [BUFFER_LEN] ;
|
cannam@85
|
56 } dout ;
|
cannam@85
|
57
|
cannam@85
|
58 int channels ;
|
cannam@85
|
59 } STATE ;
|
cannam@85
|
60
|
cannam@85
|
61 static void usage_exit (void) ;
|
cannam@85
|
62
|
cannam@85
|
63 static void deinterleave_int (STATE * state) ;
|
cannam@85
|
64 static void deinterleave_double (STATE * state) ;
|
cannam@85
|
65
|
cannam@85
|
66 int
|
cannam@85
|
67 main (int argc, char **argv)
|
cannam@85
|
68 { STATE state ;
|
cannam@85
|
69 SF_INFO sfinfo ;
|
cannam@85
|
70 char pathname [512], ext [32], *cptr ;
|
cannam@85
|
71 int ch, double_split ;
|
cannam@85
|
72
|
cannam@85
|
73 if (argc != 2)
|
cannam@85
|
74 { if (argc != 1)
|
cannam@85
|
75 puts ("\nError : need a single input file.\n") ;
|
cannam@85
|
76 usage_exit () ;
|
cannam@85
|
77 } ;
|
cannam@85
|
78
|
cannam@85
|
79 memset (&state, 0, sizeof (state)) ;
|
cannam@85
|
80 memset (&sfinfo, 0, sizeof (sfinfo)) ;
|
cannam@85
|
81
|
cannam@85
|
82 if ((state.infile = sf_open (argv [1], SFM_READ, &sfinfo)) == NULL)
|
cannam@85
|
83 { printf ("\nError : Not able to open input file '%s'\n%s\n", argv [1], sf_strerror (NULL)) ;
|
cannam@85
|
84 exit (1) ;
|
cannam@85
|
85 } ;
|
cannam@85
|
86
|
cannam@85
|
87 if (sfinfo.channels < 2)
|
cannam@85
|
88 { printf ("\nError : Input file '%s' only has one channel.\n", argv [1]) ;
|
cannam@85
|
89 exit (1) ;
|
cannam@85
|
90 } ;
|
cannam@85
|
91
|
cannam@85
|
92 state.channels = sfinfo.channels ;
|
cannam@85
|
93 sfinfo.channels = 1 ;
|
cannam@85
|
94
|
cannam@85
|
95 snprintf (pathname, sizeof (pathname), "%s", argv [1]) ;
|
cannam@85
|
96 if ((cptr = strrchr (pathname, '.')) == NULL)
|
cannam@85
|
97 ext [0] = 0 ;
|
cannam@85
|
98 else
|
cannam@85
|
99 { snprintf (ext, sizeof (ext), "%s", cptr) ;
|
cannam@85
|
100 cptr [0] = 0 ;
|
cannam@85
|
101 } ;
|
cannam@85
|
102
|
cannam@85
|
103 printf ("Input file : %s\n", pathname) ;
|
cannam@85
|
104 puts ("Output files :") ;
|
cannam@85
|
105
|
cannam@85
|
106 for (ch = 0 ; ch < state.channels ; ch++)
|
cannam@85
|
107 { char filename [520] ;
|
cannam@85
|
108
|
cannam@85
|
109 snprintf (filename, sizeof (filename), "%s_%02d%s", pathname, ch, ext) ;
|
cannam@85
|
110
|
cannam@85
|
111 if ((state.outfile [ch] = sf_open (filename, SFM_WRITE, &sfinfo)) == NULL)
|
cannam@85
|
112 { printf ("Not able to open output file '%s'\n%s\n", filename, sf_strerror (NULL)) ;
|
cannam@85
|
113 exit (1) ;
|
cannam@85
|
114 } ;
|
cannam@85
|
115
|
cannam@85
|
116 printf (" %s\n", filename) ;
|
cannam@85
|
117 } ;
|
cannam@85
|
118
|
cannam@85
|
119 switch (sfinfo.format & SF_FORMAT_SUBMASK)
|
cannam@85
|
120 { case SF_FORMAT_FLOAT :
|
cannam@85
|
121 case SF_FORMAT_DOUBLE :
|
cannam@85
|
122 case SF_FORMAT_VORBIS :
|
cannam@85
|
123 double_split = 1 ;
|
cannam@85
|
124 break ;
|
cannam@85
|
125
|
cannam@85
|
126 default :
|
cannam@85
|
127 double_split = 0 ;
|
cannam@85
|
128 break ;
|
cannam@85
|
129 } ;
|
cannam@85
|
130
|
cannam@85
|
131 if (double_split)
|
cannam@85
|
132 deinterleave_double (&state) ;
|
cannam@85
|
133 else
|
cannam@85
|
134 deinterleave_int (&state) ;
|
cannam@85
|
135
|
cannam@85
|
136 sf_close (state.infile) ;
|
cannam@85
|
137 for (ch = 0 ; ch < MAX_CHANNELS ; ch++)
|
cannam@85
|
138 if (state.outfile [ch] != NULL)
|
cannam@85
|
139 sf_close (state.outfile [ch]) ;
|
cannam@85
|
140
|
cannam@85
|
141 return 0 ;
|
cannam@85
|
142 } /* main */
|
cannam@85
|
143
|
cannam@85
|
144 /*------------------------------------------------------------------------------
|
cannam@85
|
145 */
|
cannam@85
|
146
|
cannam@85
|
147 static void
|
cannam@85
|
148 usage_exit (void)
|
cannam@85
|
149 { puts ("\nUsage : sndfile-deinterleave <filename>\n") ;
|
cannam@85
|
150 puts (
|
cannam@85
|
151 "Split a mutli-channel file into a set of mono files.\n"
|
cannam@85
|
152 "\n"
|
cannam@85
|
153 "If the input file is named 'a.wav', the output files will be named\n"
|
cannam@85
|
154 "a_00.wav, a_01.wav and so on.\n"
|
cannam@85
|
155 ) ;
|
cannam@85
|
156 printf ("Using %s.\n\n", sf_version_string ()) ;
|
cannam@85
|
157 exit (0) ;
|
cannam@85
|
158 } /* usage_exit */
|
cannam@85
|
159
|
cannam@85
|
160 static void
|
cannam@85
|
161 deinterleave_int (STATE * state)
|
cannam@85
|
162 { int read_len ;
|
cannam@85
|
163 int ch, k ;
|
cannam@85
|
164
|
cannam@85
|
165 do
|
cannam@85
|
166 { read_len = sf_readf_int (state->infile, state->din.i, BUFFER_LEN) ;
|
cannam@85
|
167
|
cannam@85
|
168 for (ch = 0 ; ch < state->channels ; ch ++)
|
cannam@85
|
169 { for (k = 0 ; k < read_len ; k++)
|
cannam@85
|
170 state->dout.i [k] = state->din.i [k * state->channels + ch] ;
|
cannam@85
|
171 sf_write_int (state->outfile [ch], state->dout.i, read_len) ;
|
cannam@85
|
172 } ;
|
cannam@85
|
173 }
|
cannam@85
|
174 while (read_len > 0) ;
|
cannam@85
|
175
|
cannam@85
|
176 } /* deinterleave_int */
|
cannam@85
|
177
|
cannam@85
|
178 static void
|
cannam@85
|
179 deinterleave_double (STATE * state)
|
cannam@85
|
180 { int read_len ;
|
cannam@85
|
181 int ch, k ;
|
cannam@85
|
182
|
cannam@85
|
183 do
|
cannam@85
|
184 { read_len = sf_readf_double (state->infile, state->din.d, BUFFER_LEN) ;
|
cannam@85
|
185
|
cannam@85
|
186 for (ch = 0 ; ch < state->channels ; ch ++)
|
cannam@85
|
187 { for (k = 0 ; k < read_len ; k++)
|
cannam@85
|
188 state->dout.d [k] = state->din.d [k * state->channels + ch] ;
|
cannam@85
|
189 sf_write_double (state->outfile [ch], state->dout.d, read_len) ;
|
cannam@85
|
190 } ;
|
cannam@85
|
191 }
|
cannam@85
|
192 while (read_len > 0) ;
|
cannam@85
|
193
|
cannam@85
|
194 } /* deinterleave_double */
|