370 lines
11 KiB
C
370 lines
11 KiB
C
/*
|
|
** Copyright (C) 1999-2009 Erik de Castro Lopo <erikd@mega-nerd.com>
|
|
**
|
|
** All rights reserved.
|
|
**
|
|
** Redistribution and use in source and binary forms, with or without
|
|
** modification, are permitted provided that the following conditions are
|
|
** met:
|
|
**
|
|
** * Redistributions of source code must retain the above copyright
|
|
** notice, this list of conditions and the following disclaimer.
|
|
** * Redistributions in binary form must reproduce the above copyright
|
|
** notice, this list of conditions and the following disclaimer in
|
|
** the documentation and/or other materials provided with the
|
|
** distribution.
|
|
** * Neither the author nor the names of any contributors may be used
|
|
** to endorse or promote products derived from this software without
|
|
** specific prior written permission.
|
|
**
|
|
** THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
|
** "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
|
** TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
|
** PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
|
|
** CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
|
|
** EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
|
|
** PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
|
|
** OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
|
|
** WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
|
|
** OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
|
|
** ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <ctype.h>
|
|
|
|
#include <sndfile.h>
|
|
|
|
#include "common.h"
|
|
|
|
|
|
typedef struct
|
|
{ char *infilename, *outfilename ;
|
|
SF_INFO infileinfo, outfileinfo ;
|
|
} OptionData ;
|
|
|
|
typedef struct
|
|
{ const char *ext ;
|
|
int len ;
|
|
int format ;
|
|
} OUTPUT_FORMAT_MAP ;
|
|
|
|
static void copy_metadata (SNDFILE *outfile, SNDFILE *infile) ;
|
|
|
|
static OUTPUT_FORMAT_MAP format_map [] =
|
|
{
|
|
{ "aif", 3, SF_FORMAT_AIFF },
|
|
{ "wav", 0, SF_FORMAT_WAV },
|
|
{ "au", 0, SF_FORMAT_AU },
|
|
{ "caf", 0, SF_FORMAT_CAF },
|
|
{ "flac", 0, SF_FORMAT_FLAC },
|
|
{ "snd", 0, SF_FORMAT_AU },
|
|
{ "svx", 0, SF_FORMAT_SVX },
|
|
{ "paf", 0, SF_ENDIAN_BIG | SF_FORMAT_PAF },
|
|
{ "fap", 0, SF_ENDIAN_LITTLE | SF_FORMAT_PAF },
|
|
{ "gsm", 0, SF_FORMAT_RAW },
|
|
{ "nist", 0, SF_FORMAT_NIST },
|
|
{ "htk", 0, SF_FORMAT_HTK },
|
|
{ "ircam", 0, SF_FORMAT_IRCAM },
|
|
{ "sf", 0, SF_FORMAT_IRCAM },
|
|
{ "voc", 0, SF_FORMAT_VOC },
|
|
{ "w64", 0, SF_FORMAT_W64 },
|
|
{ "raw", 0, SF_FORMAT_RAW },
|
|
{ "mat4", 0, SF_FORMAT_MAT4 },
|
|
{ "mat5", 0, SF_FORMAT_MAT5 },
|
|
{ "mat", 0, SF_FORMAT_MAT4 },
|
|
{ "pvf", 0, SF_FORMAT_PVF },
|
|
{ "sds", 0, SF_FORMAT_SDS },
|
|
{ "sd2", 0, SF_FORMAT_SD2 },
|
|
{ "vox", 0, SF_FORMAT_RAW },
|
|
{ "xi", 0, SF_FORMAT_XI },
|
|
{ "wve", 0, SF_FORMAT_WVE },
|
|
{ "oga", 0, SF_FORMAT_OGG },
|
|
{ "mpc", 0, SF_FORMAT_MPC2K },
|
|
{ "rf64", 0, SF_FORMAT_RF64 },
|
|
} ; /* format_map */
|
|
|
|
static int
|
|
guess_output_file_type (char *str, int format)
|
|
{ char buffer [16], *cptr ;
|
|
int k ;
|
|
|
|
format &= SF_FORMAT_SUBMASK ;
|
|
|
|
if ((cptr = strrchr (str, '.')) == NULL)
|
|
return 0 ;
|
|
|
|
strncpy (buffer, cptr + 1, 15) ;
|
|
buffer [15] = 0 ;
|
|
|
|
for (k = 0 ; buffer [k] ; k++)
|
|
buffer [k] = tolower ((buffer [k])) ;
|
|
|
|
if (strcmp (buffer, "gsm") == 0)
|
|
return SF_FORMAT_RAW | SF_FORMAT_GSM610 ;
|
|
|
|
if (strcmp (buffer, "vox") == 0)
|
|
return SF_FORMAT_RAW | SF_FORMAT_VOX_ADPCM ;
|
|
|
|
for (k = 0 ; k < (int) (sizeof (format_map) / sizeof (format_map [0])) ; k++)
|
|
{ if (format_map [k].len > 0 && strncmp (buffer, format_map [k].ext, format_map [k].len) == 0)
|
|
return format_map [k].format | format ;
|
|
else if (strcmp (buffer, format_map [k].ext) == 0)
|
|
return format_map [k].format | format ;
|
|
} ;
|
|
|
|
return 0 ;
|
|
} /* guess_output_file_type */
|
|
|
|
|
|
static void
|
|
print_usage (char *progname)
|
|
{ SF_FORMAT_INFO info ;
|
|
|
|
int k ;
|
|
|
|
printf ("\nUsage : %s [options] [encoding] <input file> <output file>\n", progname) ;
|
|
puts ("\n"
|
|
" where [option] may be:\n\n"
|
|
" -override-sample-rate=X : force sample rate of input to X\n\n"
|
|
) ;
|
|
|
|
puts ("\n"
|
|
" where [encoding] may be one of the following:\n\n"
|
|
" -pcms8 : force the output to signed 8 bit pcm\n"
|
|
" -pcmu8 : force the output to unsigned 8 bit pcm\n"
|
|
" -pcm16 : force the output to 16 bit pcm\n"
|
|
" -pcm24 : force the output to 24 bit pcm\n"
|
|
" -pcm32 : force the output to 32 bit pcm\n"
|
|
" -float32 : force the output to 32 bit floating point"
|
|
) ;
|
|
puts (
|
|
" -ulaw : force the output ULAW\n"
|
|
" -alaw : force the output ALAW\n"
|
|
" -ima-adpcm : force the output to IMA ADPCM (WAV only)\n"
|
|
" -ms-adpcm : force the output to MS ADPCM (WAV only)\n"
|
|
" -gsm610 : force the GSM6.10 (WAV only)\n"
|
|
" -dwvw12 : force the output to 12 bit DWVW (AIFF only)\n"
|
|
" -dwvw16 : force the output to 16 bit DWVW (AIFF only)\n"
|
|
" -dwvw24 : force the output to 24 bit DWVW (AIFF only)\n"
|
|
" -vorbis : force the output to Vorbis (OGG only)\n"
|
|
) ;
|
|
|
|
puts (
|
|
" The format of the output file is determined by the file extension of the\n"
|
|
" output file name. The following extensions are currently understood:\n"
|
|
) ;
|
|
|
|
for (k = 0 ; k < (int) (sizeof (format_map) / sizeof (format_map [0])) ; k++)
|
|
{ info.format = format_map [k].format ;
|
|
sf_command (NULL, SFC_GET_FORMAT_INFO, &info, sizeof (info)) ;
|
|
printf (" %-10s : %s\n", format_map [k].ext, info.name) ;
|
|
} ;
|
|
|
|
puts ("") ;
|
|
} /* print_usage */
|
|
|
|
int
|
|
main (int argc, char * argv [])
|
|
{ char *progname, *infilename, *outfilename ;
|
|
SNDFILE *infile = NULL, *outfile = NULL ;
|
|
SF_INFO sfinfo ;
|
|
int k, outfilemajor, outfileminor = 0, infileminor ;
|
|
int override_sample_rate = 0 ; /* assume no sample rate override. */
|
|
|
|
progname = strrchr (argv [0], '/') ;
|
|
progname = progname ? progname + 1 : argv [0] ;
|
|
|
|
if (argc < 3 || argc > 5)
|
|
{ print_usage (progname) ;
|
|
return 1 ;
|
|
} ;
|
|
|
|
infilename = argv [argc-2] ;
|
|
outfilename = argv [argc-1] ;
|
|
|
|
if (strcmp (infilename, outfilename) == 0)
|
|
{ printf ("Error : Input and output filenames are the same.\n\n") ;
|
|
print_usage (progname) ;
|
|
return 1 ;
|
|
} ;
|
|
|
|
if (infilename [0] == '-')
|
|
{ printf ("Error : Input filename (%s) looks like an option.\n\n", infilename) ;
|
|
print_usage (progname) ;
|
|
return 1 ;
|
|
} ;
|
|
|
|
if (outfilename [0] == '-')
|
|
{ printf ("Error : Output filename (%s) looks like an option.\n\n", outfilename) ;
|
|
print_usage (progname) ;
|
|
return 1 ;
|
|
} ;
|
|
|
|
for (k = 1 ; k < argc - 2 ; k++)
|
|
{ if (! strcmp (argv [k], "-pcms8"))
|
|
{ outfileminor = SF_FORMAT_PCM_S8 ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-pcmu8"))
|
|
{ outfileminor = SF_FORMAT_PCM_U8 ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-pcm16"))
|
|
{ outfileminor = SF_FORMAT_PCM_16 ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-pcm24"))
|
|
{ outfileminor = SF_FORMAT_PCM_24 ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-pcm32"))
|
|
{ outfileminor = SF_FORMAT_PCM_32 ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-float32"))
|
|
{ outfileminor = SF_FORMAT_FLOAT ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-ulaw"))
|
|
{ outfileminor = SF_FORMAT_ULAW ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-alaw"))
|
|
{ outfileminor = SF_FORMAT_ALAW ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-ima-adpcm"))
|
|
{ outfileminor = SF_FORMAT_IMA_ADPCM ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-ms-adpcm"))
|
|
{ outfileminor = SF_FORMAT_MS_ADPCM ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-gsm610"))
|
|
{ outfileminor = SF_FORMAT_GSM610 ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-dwvw12"))
|
|
{ outfileminor = SF_FORMAT_DWVW_12 ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-dwvw16"))
|
|
{ outfileminor = SF_FORMAT_DWVW_16 ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-dwvw24"))
|
|
{ outfileminor = SF_FORMAT_DWVW_24 ;
|
|
continue ;
|
|
} ;
|
|
if (! strcmp (argv [k], "-vorbis"))
|
|
{ outfileminor = SF_FORMAT_VORBIS ;
|
|
continue ;
|
|
} ;
|
|
|
|
if (strstr (argv [k], "-override-sample-rate=") == argv [k])
|
|
{ const char *ptr ;
|
|
|
|
ptr = argv [k] + strlen ("-override-sample-rate=") ;
|
|
override_sample_rate = atoi (ptr) ;
|
|
continue ;
|
|
} ;
|
|
|
|
printf ("Error : Not able to decode argunment '%s'.\n", argv [k]) ;
|
|
exit (1) ;
|
|
} ;
|
|
|
|
if ((infile = sf_open (infilename, SFM_READ, &sfinfo)) == NULL)
|
|
{ printf ("Not able to open input file %s.\n", infilename) ;
|
|
puts (sf_strerror (NULL)) ;
|
|
return 1 ;
|
|
} ;
|
|
|
|
/* Update sample rate if forced to something else. */
|
|
if (override_sample_rate)
|
|
sfinfo.samplerate = override_sample_rate ;
|
|
|
|
infileminor = sfinfo.format & SF_FORMAT_SUBMASK ;
|
|
|
|
if ((sfinfo.format = guess_output_file_type (outfilename, sfinfo.format)) == 0)
|
|
{ printf ("Error : Not able to determine output file type for %s.\n", outfilename) ;
|
|
return 1 ;
|
|
} ;
|
|
|
|
outfilemajor = sfinfo.format & (SF_FORMAT_TYPEMASK | SF_FORMAT_ENDMASK) ;
|
|
|
|
if (outfileminor == 0)
|
|
outfileminor = sfinfo.format & SF_FORMAT_SUBMASK ;
|
|
|
|
if (outfileminor != 0)
|
|
sfinfo.format = outfilemajor | outfileminor ;
|
|
else
|
|
sfinfo.format = outfilemajor | (sfinfo.format & SF_FORMAT_SUBMASK) ;
|
|
|
|
if ((sfinfo.format & SF_FORMAT_TYPEMASK) == SF_FORMAT_XI)
|
|
switch (sfinfo.format & SF_FORMAT_SUBMASK)
|
|
{ case SF_FORMAT_PCM_16 :
|
|
sfinfo.format = outfilemajor | SF_FORMAT_DPCM_16 ;
|
|
break ;
|
|
|
|
case SF_FORMAT_PCM_S8 :
|
|
case SF_FORMAT_PCM_U8 :
|
|
sfinfo.format = outfilemajor | SF_FORMAT_DPCM_8 ;
|
|
break ;
|
|
} ;
|
|
|
|
if (sf_format_check (&sfinfo) == 0)
|
|
{ printf ("Error : output file format is invalid (0x%08X).\n", sfinfo.format) ;
|
|
return 1 ;
|
|
} ;
|
|
|
|
/* Open the output file. */
|
|
if ((outfile = sf_open (outfilename, SFM_WRITE, &sfinfo)) == NULL)
|
|
{ printf ("Not able to open output file %s : %s\n", outfilename, sf_strerror (NULL)) ;
|
|
return 1 ;
|
|
} ;
|
|
|
|
/* Copy the metadata */
|
|
copy_metadata (outfile, infile) ;
|
|
|
|
if ((outfileminor == SF_FORMAT_DOUBLE) || (outfileminor == SF_FORMAT_FLOAT)
|
|
|| (infileminor == SF_FORMAT_DOUBLE) || (infileminor == SF_FORMAT_FLOAT)
|
|
|| (infileminor == SF_FORMAT_VORBIS) || (outfileminor == SF_FORMAT_VORBIS))
|
|
sfe_copy_data_fp (outfile, infile, sfinfo.channels) ;
|
|
else
|
|
sfe_copy_data_int (outfile, infile, sfinfo.channels) ;
|
|
|
|
sf_close (infile) ;
|
|
sf_close (outfile) ;
|
|
|
|
return 0 ;
|
|
} /* main */
|
|
|
|
static void
|
|
copy_metadata (SNDFILE *outfile, SNDFILE *infile)
|
|
{ SF_INSTRUMENT inst ;
|
|
SF_BROADCAST_INFO_2K binfo ;
|
|
const char *str ;
|
|
int k, err = 0 ;
|
|
|
|
for (k = SF_STR_FIRST ; k <= SF_STR_LAST ; k++)
|
|
{ str = sf_get_string (infile, k) ;
|
|
if (str != NULL)
|
|
err = sf_set_string (outfile, k, str) ;
|
|
} ;
|
|
|
|
memset (&inst, 0, sizeof (inst)) ;
|
|
memset (&binfo, 0, sizeof (binfo)) ;
|
|
|
|
if (sf_command (infile, SFC_GET_INSTRUMENT, &inst, sizeof (inst)) == SF_TRUE)
|
|
sf_command (outfile, SFC_SET_INSTRUMENT, &inst, sizeof (inst)) ;
|
|
|
|
if (sf_command (infile, SFC_GET_BROADCAST_INFO, &binfo, sizeof (binfo)) == SF_TRUE)
|
|
sf_command (outfile, SFC_SET_BROADCAST_INFO, &binfo, sizeof (binfo)) ;
|
|
|
|
} /* copy_metadata */
|
|
|