skip allowed for analyze mode
[flac.git] / src / flac / main.c
1 /* flac - Command-line FLAC encoder/decoder
2  * Copyright (C) 2000,2001  Josh Coalson
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License
6  * as published by the Free Software Foundation; either version 2
7  * of the License, or (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software
16  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
17  */
18
19 #include <assert.h>
20 #include <ctype.h>
21 #include <stdarg.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include "FLAC/all.h"
26 #include "analyze.h"
27 #include "decode.h"
28 #include "encode.h"
29
30 static int usage(const char *message, ...);
31 static int encode_file(const char *infilename, const char *forced_outfilename);
32 static int decode_file(const char *infilename, const char *forced_outfilename);
33
34 bool verify = false, verbose = true, lax = false, test_only = false, analyze = false;
35 bool do_mid_side = true, loose_mid_side = false, do_exhaustive_model_search = false, do_qlp_coeff_prec_search = false;
36 bool force_to_stdout = false;
37 analysis_options aopts = { false, false };
38 unsigned padding = 0;
39 unsigned max_lpc_order = 8;
40 unsigned qlp_coeff_precision = 0;
41 uint64 skip = 0;
42 int format_is_wave = -1, format_is_big_endian = -1, format_is_unsigned_samples = false;
43 int format_channels = -1, format_bps = -1, format_sample_rate = -1;
44 int blocksize = -1, min_residual_partition_order = -1, max_residual_partition_order = -1, rice_parameter_search_dist = -1;
45 char requested_seek_points[50000]; /* @@@ bad MAGIC NUMBER */
46 int num_requested_seek_points = -1; /* -1 => no -S options were given, 0 => -S- was given */
47
48 int main(int argc, char *argv[])
49 {
50         int i, retval = 0;
51         bool mode_decode = false;
52
53         if(argc <= 1)
54                 return usage(0);
55
56         /* get the options */
57         for(i = 1; i < argc; i++) {
58                 if(argv[i][0] != '-' || argv[i][1] == 0)
59                         break;
60                 if(0 == strcmp(argv[i], "-d"))
61                         mode_decode = true;
62                 else if(0 == strcmp(argv[i], "-a")) {
63                         mode_decode = true;
64                         analyze = true;
65                 }
66                 else if(0 == strcmp(argv[i], "-t")) {
67                         mode_decode = true;
68                         test_only = true;
69                 }
70                 else if(0 == strcmp(argv[i], "-c"))
71                         force_to_stdout = true;
72                 else if(0 == strcmp(argv[i], "-s"))
73                         verbose = false;
74                 else if(0 == strcmp(argv[i], "-s-"))
75                         verbose = true;
76                 else if(0 == strcmp(argv[i], "-S")) {
77                         if(num_requested_seek_points < 0)
78                                 num_requested_seek_points = 0;
79                         num_requested_seek_points++;
80                         strcat(requested_seek_points, argv[++i]);
81                         strcat(requested_seek_points, "<");
82                 }
83                 else if(0 == strcmp(argv[i], "-S-")) {
84                         num_requested_seek_points = 0;
85                         requested_seek_points[0] = '\0';
86                 }
87                 else if(0 == strcmp(argv[i], "--skip"))
88                         skip = (uint64)atoi(argv[++i]); /* @@@ takes a pretty damn big file to overflow atoi() here, but it could happen */
89                 else if(0 == strcmp(argv[i], "--lax"))
90                         lax = true;
91                 else if(0 == strcmp(argv[i], "--lax-"))
92                         lax = false;
93                 else if(0 == strcmp(argv[i], "-b"))
94                         blocksize = atoi(argv[++i]);
95                 else if(0 == strcmp(argv[i], "-e"))
96                         do_exhaustive_model_search = true;
97                 else if(0 == strcmp(argv[i], "-e-"))
98                         do_exhaustive_model_search = false;
99                 else if(0 == strcmp(argv[i], "-l"))
100                         max_lpc_order = atoi(argv[++i]);
101                 else if(0 == strcmp(argv[i], "-m"))
102                         do_mid_side = true;
103                 else if(0 == strcmp(argv[i], "-m-"))
104                         do_mid_side = false;
105                 else if(0 == strcmp(argv[i], "-M"))
106                         loose_mid_side = do_mid_side = true;
107                 else if(0 == strcmp(argv[i], "-M-"))
108                         loose_mid_side = do_mid_side = false;
109                 else if(0 == strcmp(argv[i], "-p"))
110                         do_qlp_coeff_prec_search = true;
111                 else if(0 == strcmp(argv[i], "-p-"))
112                         do_qlp_coeff_prec_search = false;
113                 else if(0 == strcmp(argv[i], "-P"))
114                         padding = atoi(argv[++i]);
115                 else if(0 == strcmp(argv[i], "-q"))
116                         qlp_coeff_precision = atoi(argv[++i]);
117                 else if(0 == strcmp(argv[i], "-r")) {
118                         char *p = strchr(argv[++i], ',');
119                         if(0 == p) {
120                                 min_residual_partition_order = 0;
121                                 max_residual_partition_order = atoi(argv[i]);
122                         }
123                         else {
124                                 min_residual_partition_order = atoi(argv[i]);
125                                 max_residual_partition_order = atoi(++p);
126                         }
127                 }
128                 else if(0 == strcmp(argv[i], "-R"))
129                         rice_parameter_search_dist = atoi(argv[++i]);
130                 else if(0 == strcmp(argv[i], "-V"))
131                         verify = true;
132                 else if(0 == strcmp(argv[i], "-V-"))
133                         verify = false;
134                 else if(0 == strcmp(argv[i], "-fb"))
135                         format_is_big_endian = true;
136                 else if(0 == strcmp(argv[i], "-fl"))
137                         format_is_big_endian = false;
138                 else if(0 == strcmp(argv[i], "-fc"))
139                         format_channels = atoi(argv[++i]);
140                 else if(0 == strcmp(argv[i], "-fp"))
141                         format_bps = atoi(argv[++i]);
142                 else if(0 == strcmp(argv[i], "-fs"))
143                         format_sample_rate = atoi(argv[++i]);
144                 else if(0 == strcmp(argv[i], "-fu"))
145                         format_is_unsigned_samples = true;
146                 else if(0 == strcmp(argv[i], "-fr"))
147                         format_is_wave = false;
148                 else if(0 == strcmp(argv[i], "-fw"))
149                         format_is_wave = true;
150                 else if(0 == strcmp(argv[i], "--a-rgp"))
151                         aopts.do_residual_gnuplot = true;
152                 else if(0 == strcmp(argv[i], "--a-rgp-"))
153                         aopts.do_residual_gnuplot = false;
154                 else if(0 == strcmp(argv[i], "--a-rtext"))
155                         aopts.do_residual_text = true;
156                 else if(0 == strcmp(argv[i], "--a-rtext-"))
157                         aopts.do_residual_text = false;
158                 else if(0 == strcmp(argv[i], "-0")) {
159                         do_exhaustive_model_search = false;
160                         do_mid_side = false;
161                         loose_mid_side = false;
162                         qlp_coeff_precision = 0;
163                         min_residual_partition_order = max_residual_partition_order = 0;
164                         rice_parameter_search_dist = 0;
165                         max_lpc_order = 0;
166                 }
167                 else if(0 == strcmp(argv[i], "-1")) {
168                         do_exhaustive_model_search = false;
169                         do_mid_side = true;
170                         loose_mid_side = true;
171                         qlp_coeff_precision = 0;
172                         min_residual_partition_order = max_residual_partition_order = 0;
173                         rice_parameter_search_dist = 0;
174                         max_lpc_order = 0;
175                 }
176                 else if(0 == strcmp(argv[i], "-2")) {
177                         do_exhaustive_model_search = false;
178                         do_mid_side = true;
179                         loose_mid_side = false;
180                         qlp_coeff_precision = 0;
181                         rice_parameter_search_dist = 0;
182                         max_lpc_order = 0;
183                 }
184                 else if(0 == strcmp(argv[i], "-4")) {
185                         do_exhaustive_model_search = false;
186                         do_mid_side = false;
187                         loose_mid_side = false;
188                         qlp_coeff_precision = 0;
189                         min_residual_partition_order = max_residual_partition_order = 0;
190                         rice_parameter_search_dist = 0;
191                         max_lpc_order = 8;
192                 }
193                 else if(0 == strcmp(argv[i], "-5")) {
194                         do_exhaustive_model_search = false;
195                         do_mid_side = true;
196                         loose_mid_side = true;
197                         qlp_coeff_precision = 0;
198                         min_residual_partition_order = max_residual_partition_order = 0;
199                         rice_parameter_search_dist = 0;
200                         max_lpc_order = 8;
201                 }
202                 else if(0 == strcmp(argv[i], "-6")) {
203                         do_exhaustive_model_search = false;
204                         do_mid_side = true;
205                         loose_mid_side = false;
206                         qlp_coeff_precision = 0;
207                         rice_parameter_search_dist = 0;
208                         max_lpc_order = 8;
209                 }
210                 else if(0 == strcmp(argv[i], "-8")) {
211                         do_exhaustive_model_search = false;
212                         do_mid_side = true;
213                         loose_mid_side = false;
214                         qlp_coeff_precision = 0;
215                         rice_parameter_search_dist = 0;
216                         max_lpc_order = 32;
217                 }
218                 else if(0 == strcmp(argv[i], "-9")) {
219                         do_exhaustive_model_search = true;
220                         do_mid_side = true;
221                         loose_mid_side = false;
222                         do_qlp_coeff_prec_search = true;
223                         min_residual_partition_order = 0;
224                         max_residual_partition_order = 16;
225                         rice_parameter_search_dist = 32;
226                         max_lpc_order = 32;
227                 }
228                 else if(isdigit((int)(argv[i][1]))) {
229                         return usage("ERROR: compression level '%s' is still reserved\n", argv[i]);
230                 }
231                 else {
232                         return usage("ERROR: invalid option '%s'\n", argv[i]);
233                 }
234         }
235
236         /* tweak options; validate the values */
237         if(!mode_decode) {
238                 if(blocksize < 0) {
239                         if(max_lpc_order == 0)
240                                 blocksize = 1152;
241                         else
242                                 blocksize = 4608;
243                 }
244                 if(min_residual_partition_order < 0) {
245                         min_residual_partition_order = 0;
246                         if(blocksize <= 1152)
247                                 max_residual_partition_order = 4;
248                         else if(blocksize <= 2304)
249                                 max_residual_partition_order = 4;
250                         else if(blocksize <= 4608)
251                                 max_residual_partition_order = 4;
252                         else
253                                 max_residual_partition_order = 5;
254                 }
255                 if(rice_parameter_search_dist < 0) {
256                         rice_parameter_search_dist = 0;
257                 }
258         }
259         else {
260                 if(test_only) {
261                         if(skip > 0)
262                                 return usage("ERROR: --skip is not allowed in test mode\n");
263                 }
264         }
265
266         assert(blocksize >= 0 || mode_decode);
267
268         if(format_channels >= 0) {
269                 if(format_channels == 0 || (unsigned)format_channels > FLAC__MAX_CHANNELS)
270                         return usage("ERROR: invalid number of channels '%u', must be > 0 and <= %u\n", format_channels, FLAC__MAX_CHANNELS);
271         }
272         if(format_bps >= 0) {
273                 if(format_bps != 8 && format_bps != 16 && format_bps != 24)
274                         return usage("ERROR: invalid bits per sample '%u' (must be 8/16/24)\n", format_bps);
275         }
276         if(format_sample_rate >= 0) {
277                 if(format_sample_rate == 0 || (unsigned)format_sample_rate > FLAC__MAX_SAMPLE_RATE)
278                         return usage("ERROR: invalid sample rate '%u', must be > 0 and <= %u\n", format_sample_rate, FLAC__MAX_SAMPLE_RATE);
279         }
280         if(!mode_decode && ((unsigned)blocksize < FLAC__MIN_BLOCK_SIZE || (unsigned)blocksize > FLAC__MAX_BLOCK_SIZE)) {
281                 return usage("ERROR: invalid blocksize '%u', must be >= %u and <= %u\n", (unsigned)blocksize, FLAC__MIN_BLOCK_SIZE, FLAC__MAX_BLOCK_SIZE);
282         }
283         if(qlp_coeff_precision > 0 && qlp_coeff_precision < FLAC__MIN_QLP_COEFF_PRECISION) {
284                 return usage("ERROR: invalid value for -q '%u', must be 0 or >= %u\n", qlp_coeff_precision, FLAC__MIN_QLP_COEFF_PRECISION);
285         }
286
287         if(verbose) {
288                 fprintf(stderr, "\n");
289                 fprintf(stderr, "flac %s, Copyright (C) 2000,2001 Josh Coalson\n", FLAC__VERSION_STRING);
290                 fprintf(stderr, "flac comes with ABSOLUTELY NO WARRANTY.  This is free software, and you are\n");
291                 fprintf(stderr, "welcome to redistribute it under certain conditions.  Type `flac' for details.\n\n");
292
293                 if(!mode_decode) {
294                         fprintf(stderr, "options:%s -P %u -b %u%s -l %u%s%s -q %u -r %u,%u -R %u%s\n",
295                                 lax?" --lax":"", padding, (unsigned)blocksize, loose_mid_side?" -M":do_mid_side?" -m":"", max_lpc_order,
296                                 do_exhaustive_model_search?" -e":"", do_qlp_coeff_prec_search?" -p":"",
297                                 qlp_coeff_precision,
298                                 (unsigned)min_residual_partition_order, (unsigned)max_residual_partition_order, (unsigned)rice_parameter_search_dist,
299                                 verify? " -V":""
300                         );
301                 }
302         }
303
304         if(mode_decode) {
305                 bool first = true;
306                 int save_format;
307
308                 if(i == argc)
309                         retval = decode_file("-", 0);
310                 else if(i + 2 == argc && 0 == strcmp(argv[i], "-"))
311                         retval = decode_file("-", argv[i+1]);
312                 else {
313                         for(retval = 0; i < argc && retval == 0; i++) {
314                                 if(0 == strcmp(argv[i], "-") && !first)
315                                         continue;
316                                 save_format = format_is_wave;
317                                 retval = decode_file(argv[i], 0);
318                                 format_is_wave = save_format;
319                                 first = false;
320                         }
321                 }
322         }
323         else { /* encode */
324                 bool first = true;
325                 int save_format;
326
327                 if(i == argc)
328                         retval = encode_file("-", 0);
329                 else if(i + 2 == argc && 0 == strcmp(argv[i], "-"))
330                         retval = encode_file("-", argv[i+1]);
331                 else {
332                         for(retval = 0; i < argc && retval == 0; i++) {
333                                 if(0 == strcmp(argv[i], "-") && !first)
334                                         continue;
335                                 save_format = format_is_wave;
336                                 retval = encode_file(argv[i], 0);
337                                 format_is_wave = save_format;
338                                 first = false;
339                         }
340                 }
341         }
342
343         return retval;
344 }
345
346 int usage(const char *message, ...)
347 {
348         va_list args;
349
350         if(message) {
351                 va_start(args, message);
352
353                 (void) vfprintf(stderr, message, args);
354
355                 va_end(args);
356
357         }
358         fprintf(stderr, "===============================================================================\n");
359         fprintf(stderr, "flac - Command-line FLAC encoder/decoder version %s\n", FLAC__VERSION_STRING);
360         fprintf(stderr, "Copyright (C) 2000,2001  Josh Coalson\n");
361         fprintf(stderr, "\n");
362         fprintf(stderr, "This program is free software; you can redistribute it and/or\n");
363         fprintf(stderr, "modify it under the terms of the GNU General Public License\n");
364         fprintf(stderr, "as published by the Free Software Foundation; either version 2\n");
365         fprintf(stderr, "of the License, or (at your option) any later version.\n");
366         fprintf(stderr, "\n");
367         fprintf(stderr, "This program is distributed in the hope that it will be useful,\n");
368         fprintf(stderr, "but WITHOUT ANY WARRANTY; without even the implied warranty of\n");
369         fprintf(stderr, "MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\n");
370         fprintf(stderr, "GNU General Public License for more details.\n");
371         fprintf(stderr, "\n");
372         fprintf(stderr, "You should have received a copy of the GNU General Public License\n");
373         fprintf(stderr, "along with this program; if not, write to the Free Software\n");
374         fprintf(stderr, "Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.\n");
375         fprintf(stderr, "===============================================================================\n");
376         fprintf(stderr, "Usage:\n");
377         fprintf(stderr, "  flac [options] [infile [...]]\n");
378         fprintf(stderr, "\n");
379         fprintf(stderr, "For encoding:\n");
380         fprintf(stderr, "  the input file(s) may be a PCM RIFF WAVE file or raw samples\n");
381         fprintf(stderr, "  the output file(s) will be in FLAC format\n");
382         fprintf(stderr, "For decoding, the reverse is true\n");
383         fprintf(stderr, "\n");
384         fprintf(stderr, "A single 'infile' may be - for stdin.  No 'infile' implies stdin.  Use of\n");
385         fprintf(stderr, "stdin implies -c (write to stdout).  However, flac allows the special\n");
386         fprintf(stderr, "encoding/decoding forms:\n");
387         fprintf(stderr, "   flac [options] - outfilename   or  flac -d [options] - outfilename\n");
388         fprintf(stderr, "which is better than:\n");
389         fprintf(stderr, "   flac [options] > outfilename   or  flac -d [options] > outfilename\n");
390         fprintf(stderr, "since the former allows flac to seek backwards to write the STREAMINFO or\n");
391         fprintf(stderr, "RIFF WAVE header contents when necessary.\n");
392         fprintf(stderr, "\n");
393         fprintf(stderr, "If the unencoded filename ends with '.wav' or -fw is used, it's assumed to be\n");
394         fprintf(stderr, "RIFF WAVE.  Otherwise, flac will check for the presence of a RIFF header.  If\n");
395         fprintf(stderr, "any infile is raw you must specify the format options {-fb|fl} -fc -fp and -fs,\n");
396         fprintf(stderr, "which will apply to all raw files.  You can force a .wav file to be treated as\n");
397         fprintf(stderr, "a raw file using -fr.\n");
398         fprintf(stderr, "\n");
399         fprintf(stderr, "generic options:\n");
400         fprintf(stderr, "  -d : decode (default behavior is encode)\n");
401         fprintf(stderr, "  -t : test (same as -d except no decoded file is written)\n");
402         fprintf(stderr, "  -a : analyze (same as -d except an analysis file is written)\n");
403         fprintf(stderr, "  -c : write output to stdout\n");
404         fprintf(stderr, "  -s : silent (do not write runtime encode/decode statistics)\n");
405         fprintf(stderr, "  --skip samples : can be used both for encoding and decoding\n");
406         fprintf(stderr, "analyze options:\n");
407         fprintf(stderr, "  --a-rtext : include residual signal in text output\n");
408         fprintf(stderr, "  --a-rgp : generate gnuplot files of residual distribution of each subframe\n");
409         fprintf(stderr, "encoding options:\n");
410         fprintf(stderr, "  --lax : allow encoder to generate non-Subset files\n");
411         fprintf(stderr, "  -S { # | X | #x } : include a point or points in a SEEKTABLE\n");
412         fprintf(stderr, "       #  : a specific sample number for a seek point\n");
413         fprintf(stderr, "       X  : a placeholder point (always goes at the end of the SEEKTABLE)\n");
414         fprintf(stderr, "       #x : # evenly spaced seekpoints, the first being at sample 0\n");
415         fprintf(stderr, "     You may use many -S options; the resulting SEEKTABLE will be the unique-\n");
416         fprintf(stderr, "           ified union of all such values.\n");
417         fprintf(stderr, "     With no -S options, flac defaults to '-S 100x'.  Use -S- for no SEEKTABLE.\n");
418         fprintf(stderr, "     Note: -S #x will not work if the encoder can't determine the input size\n");
419         fprintf(stderr, "           before starting.\n");
420         fprintf(stderr, "     Note: if you use -S # and # is >= samples in the input, there will be\n");
421         fprintf(stderr, "           either no seek point entered (if the input size is determinable\n");
422         fprintf(stderr, "           before encoding starts) or a placeholder point (if input size is not\n");
423         fprintf(stderr, "           determinable)\n");
424         fprintf(stderr, "  -P # : write a PADDING block of # bytes (goes after SEEKTABLE)\n");
425         fprintf(stderr, "         (0 => no PADDING block, default is -P 0)\n");
426         fprintf(stderr, "  -b # : specify blocksize in samples; default is 1152 for -l 0, else 4608;\n");
427         fprintf(stderr, "         must be 192/576/1152/2304/4608/256/512/1024/2048/4096/8192/16384/32768\n");
428         fprintf(stderr, "         (unless --lax is used)\n");
429         fprintf(stderr, "  -m   : try mid-side coding for each frame (stereo input only)\n");
430         fprintf(stderr, "  -M   : loose mid-side coding for all frames (stereo input only)\n");
431         fprintf(stderr, "  -0 .. -9 : fastest compression .. highest compression, default is -6\n");
432         fprintf(stderr, "             these are synonyms for other options:\n");
433         fprintf(stderr, "  -0   : synonymous with -l 0 -b 1152\n");
434         fprintf(stderr, "  -1   : synonymous with -l 0 -b 1152 -M\n");
435         fprintf(stderr, "  -2   : synonymous with -l 0 -b 1152 -m -r 4\n");
436         fprintf(stderr, "  -3   : reserved\n");
437         fprintf(stderr, "  -4   : synonymous with -l 8 -b 4608 \n");
438         fprintf(stderr, "  -5   : synonymous with -l 8 -b 4608 -M\n");
439         fprintf(stderr, "  -6   : synonymous with -l 8 -b 4608 -m -r 4\n");
440         fprintf(stderr, "  -7   : reserved\n");
441         fprintf(stderr, "  -8   : synonymous with -l 32 -b 4608 -m -r 4\n");
442         fprintf(stderr, "  -9   : synonymous with -l 32 -m -e -r 16 -R 32 -p (very slow!)\n");
443         fprintf(stderr, "  -e   : do exhaustive model search (expensive!)\n");
444         fprintf(stderr, "  -l # : specify max LPC order; 0 => use only fixed predictors\n");
445         fprintf(stderr, "  -p   : do exhaustive search of LP coefficient quantization (expensive!);\n");
446         fprintf(stderr, "         overrides -q, does nothing if using -l 0\n");
447         fprintf(stderr, "  -q # : specify precision in bits of quantized linear-predictor coefficients;\n");
448         fprintf(stderr, "         0 => let encoder decide (min is %u, default is -q 0)\n", FLAC__MIN_QLP_COEFF_PRECISION);
449         fprintf(stderr, "  -r [#,]# : [min,]max residual partition order (# is 0..16; min defaults to 0;\n");
450         fprintf(stderr, "         default is -r 0; above 4 doesn't usually help much)\n");
451         fprintf(stderr, "  -R # : Rice parameter search distance (# is 0..32; above 2 doesn't help much\n");
452         fprintf(stderr, "  -V   : verify a correct encoding by decoding the output in parallel and\n");
453         fprintf(stderr, "         comparing to the original\n");
454         fprintf(stderr, "  -S-, -m-, -M-, -e-, -p-, -V-, --lax- can all be used to turn off a particular\n");
455         fprintf(stderr, "  option\n");
456         fprintf(stderr, "format options:\n");
457         fprintf(stderr, "  -fb | -fl : big-endian | little-endian byte order\n");
458         fprintf(stderr, "  -fc channels\n");
459         fprintf(stderr, "  -fp bits_per_sample\n");
460         fprintf(stderr, "  -fs sample_rate : in Hz\n");
461         fprintf(stderr, "  -fu : unsigned samples (default is signed)\n");
462         fprintf(stderr, "  -fr : force to raw format (even if filename ends in .wav)\n");
463         fprintf(stderr, "  -fw : force to RIFF WAVE\n");
464         return 1;
465 }
466
467 int encode_file(const char *infilename, const char *forced_outfilename)
468 {
469         FILE *encode_infile;
470         char outfilename[4096]; /* @@@ bad MAGIC NUMBER */
471         char *p;
472
473         if(0 == strcmp(infilename, "-")) {
474                 encode_infile = stdin;
475         }
476         else {
477                 if(0 == (encode_infile = fopen(infilename, "rb"))) {
478                         fprintf(stderr, "ERROR: can't open input file %s\n", infilename);
479                         return 1;
480                 }
481         }
482
483         if(verbose)
484                 fprintf(stderr, "%s:\n", infilename);
485
486         if(format_is_wave < 0) {
487                 /* lamely attempt to guess the file type based on the first 4 bytes (which is all ungetc will guarantee us) */
488                 char head[4];
489                 int h, n;
490                 /* first set format based on name */
491                 if(strstr(infilename, ".wav") == infilename + (strlen(infilename) - strlen(".wav")))
492                         format_is_wave = true;
493                 else
494                         format_is_wave = false;
495                 if((n = fread(head, 1, 4, encode_infile)) < 4) {
496                         if(format_is_wave)
497                                 fprintf(stderr, "WARNING: %s is not a WAVE file, treating as a raw file\n", infilename);
498                         format_is_wave = false;
499                 }
500                 else {
501                         if(strncmp(head, "RIFF", 4)) {
502                                 if(format_is_wave)
503                                         fprintf(stderr, "WARNING: %s is not a WAVE file, treating as a raw file\n", infilename);
504                                 format_is_wave = false;
505                         }
506                         else
507                                 format_is_wave = true;
508                 }
509                 for(h = n-1; h >= 0; h--)
510                         ungetc(head[h], encode_infile);
511         }
512
513         if(!format_is_wave) {
514                 if(format_is_big_endian < 0 || format_channels < 0 || format_bps < 0 || format_sample_rate < 0)
515                         return usage("ERROR: for encoding a raw file you must specify { -fb or -fl }, -fc, -fp, and -fs\n");
516         }
517
518         if(encode_infile == stdin || force_to_stdout)
519                 strcpy(outfilename, "-");
520         else {
521                 strcpy(outfilename, infilename);
522                 if(0 == (p = strrchr(outfilename, '.')))
523                         strcat(outfilename, ".flac");
524                 else {
525                         if(0 == strcmp(p, ".flac"))
526                                 strcpy(p, "_new.flac");
527                         else
528                                 strcpy(p, ".flac");
529                 }
530         }
531         if(0 == forced_outfilename)
532                 forced_outfilename = outfilename;
533
534         if(format_is_wave)
535                 return encode_wav(encode_infile, infilename, forced_outfilename, verbose, skip, verify, lax, do_mid_side, loose_mid_side, do_exhaustive_model_search, do_qlp_coeff_prec_search, min_residual_partition_order, max_residual_partition_order, rice_parameter_search_dist, max_lpc_order, (unsigned)blocksize, qlp_coeff_precision, padding, requested_seek_points, num_requested_seek_points);
536         else
537                 return encode_raw(encode_infile, infilename, forced_outfilename, verbose, skip, verify, lax, do_mid_side, loose_mid_side, do_exhaustive_model_search, do_qlp_coeff_prec_search, min_residual_partition_order, max_residual_partition_order, rice_parameter_search_dist, max_lpc_order, (unsigned)blocksize, qlp_coeff_precision, padding, requested_seek_points, num_requested_seek_points, format_is_big_endian, format_is_unsigned_samples, format_channels, format_bps, format_sample_rate);
538 }
539
540 int decode_file(const char *infilename, const char *forced_outfilename)
541 {
542         static const char *suffixes[] = { ".wav", ".raw" };
543         char outfilename[4096]; /* @@@ bad MAGIC NUMBER */
544         char *p;
545
546         if(!test_only && !analyze) {
547                 if(format_is_wave < 0) {
548                         format_is_wave = true;
549                 }
550                 if(!format_is_wave) {
551                         if(format_is_big_endian < 0)
552                                 return usage("ERROR: for decoding to a raw file you must specify -fb or -fl\n");
553                 }
554         }
555
556         if(0 == strcmp(infilename, "-") || force_to_stdout)
557                 strcpy(outfilename, "-");
558         else {
559                 const char *suffix = suffixes[format_is_wave? 0:1];
560                 strcpy(outfilename, infilename);
561                 if(0 == (p = strrchr(outfilename, '.')))
562                         strcat(outfilename, suffix);
563                 else {
564                         if(0 == strcmp(p, suffix)) {
565                                 strcpy(p, "_new");
566                                 strcat(p, suffix);
567                         }
568                         else
569                                 strcpy(p, suffix);
570                 }
571         }
572         if(0 == forced_outfilename)
573                 forced_outfilename = outfilename;
574
575         if(format_is_wave)
576                 return decode_wav(infilename, test_only? 0 : forced_outfilename, analyze, aopts, verbose, skip);
577         else
578                 return decode_raw(infilename, test_only? 0 : forced_outfilename, analyze, aopts, verbose, skip, format_is_big_endian, format_is_unsigned_samples);
579 }