cannam@125: /* cannam@125: ** Copyright (C) 2009-2015 Erik de Castro Lopo cannam@125: ** cannam@125: ** All rights reserved. cannam@125: ** cannam@125: ** Redistribution and use in source and binary forms, with or without cannam@125: ** modification, are permitted provided that the following conditions are cannam@125: ** met: cannam@125: ** cannam@125: ** * Redistributions of source code must retain the above copyright cannam@125: ** notice, this list of conditions and the following disclaimer. cannam@125: ** * Redistributions in binary form must reproduce the above copyright cannam@125: ** notice, this list of conditions and the following disclaimer in cannam@125: ** the documentation and/or other materials provided with the cannam@125: ** distribution. cannam@125: ** * Neither the author nor the names of any contributors may be used cannam@125: ** to endorse or promote products derived from this software without cannam@125: ** specific prior written permission. cannam@125: ** cannam@125: ** THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS cannam@125: ** "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED cannam@125: ** TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR cannam@125: ** PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR cannam@125: ** CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, cannam@125: ** EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, cannam@125: ** PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; cannam@125: ** OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, cannam@125: ** WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR cannam@125: ** OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF cannam@125: ** ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. cannam@125: */ cannam@125: cannam@125: #include cannam@125: #include cannam@125: #include cannam@125: #include cannam@125: cannam@125: #include "common.h" cannam@125: cannam@125: #define BUFFER_LEN 4096 cannam@125: #define MAX_INPUTS 16 cannam@125: cannam@125: cannam@125: typedef struct cannam@125: { SNDFILE * infile [MAX_INPUTS] ; cannam@125: SNDFILE * outfile ; cannam@125: cannam@125: union cannam@125: { double d [BUFFER_LEN] ; cannam@125: int i [BUFFER_LEN] ; cannam@125: } din ; cannam@125: cannam@125: union cannam@125: cannam@125: { double d [MAX_INPUTS * BUFFER_LEN] ; cannam@125: int i [MAX_INPUTS * BUFFER_LEN] ; cannam@125: } dout ; cannam@125: cannam@125: int channels ; cannam@125: } STATE ; cannam@125: cannam@125: cannam@125: static void usage_exit (void) ; cannam@125: static void interleave_int (STATE * state) ; cannam@125: static void interleave_double (STATE * state) ; cannam@125: cannam@125: cannam@125: int cannam@125: main (int argc, char **argv) cannam@125: { STATE state ; cannam@125: SF_INFO sfinfo ; cannam@125: int k, double_merge = 0 ; cannam@125: cannam@125: if (argc < 5) cannam@125: { if (argc > 1) cannam@125: puts ("\nError : need at least 2 input files.") ; cannam@125: usage_exit () ; cannam@125: } ; cannam@125: cannam@125: if (strcmp (argv [argc - 2], "-o") != 0) cannam@125: { puts ("\nError : second last command line parameter should be '-o'.\n") ; cannam@125: usage_exit () ; cannam@125: } ; cannam@125: cannam@125: if (argc - 3 > MAX_INPUTS) cannam@125: { printf ("\nError : Cannot handle more than %d input channels.\n\n", MAX_INPUTS) ; cannam@125: exit (1) ; cannam@125: } ; cannam@125: cannam@125: memset (&state, 0, sizeof (state)) ; cannam@125: memset (&sfinfo, 0, sizeof (sfinfo)) ; cannam@125: cannam@125: for (k = 1 ; k < argc - 2 ; k++) cannam@125: { cannam@125: if ((state.infile [k - 1] = sf_open (argv [k], SFM_READ, &sfinfo)) == NULL) cannam@125: { printf ("\nError : Not able to open input file '%s'\n%s\n", argv [k], sf_strerror (NULL)) ; cannam@125: exit (1) ; cannam@125: } ; cannam@125: cannam@125: if (sfinfo.channels != 1) cannam@125: { printf ("\bError : Input file '%s' should be mono (has %d channels).\n", argv [k], sfinfo.channels) ; cannam@125: exit (1) ; cannam@125: } ; cannam@125: cannam@125: switch (sfinfo.format & SF_FORMAT_SUBMASK) cannam@125: { case SF_FORMAT_FLOAT : cannam@125: case SF_FORMAT_DOUBLE : cannam@125: case SF_FORMAT_VORBIS : cannam@125: double_merge = 1 ; cannam@125: break ; cannam@125: cannam@125: default : cannam@125: break ; cannam@125: } ; cannam@125: cannam@125: state.channels ++ ; cannam@125: } ; cannam@125: cannam@125: sfinfo.channels = state.channels ; cannam@125: sfinfo.format = sfe_file_type_of_ext (argv [argc - 1], sfinfo.format) ; cannam@125: cannam@125: if ((state.outfile = sf_open (argv [argc - 1], SFM_WRITE, &sfinfo)) == NULL) cannam@125: { printf ("Not able to open output file '%s'\n%s\n", argv [argc - 1], sf_strerror (NULL)) ; cannam@125: exit (1) ; cannam@125: } ; cannam@125: cannam@125: if (double_merge) cannam@125: interleave_double (&state) ; cannam@125: else cannam@125: interleave_int (&state) ; cannam@125: cannam@125: for (k = 0 ; k < MAX_INPUTS ; k++) cannam@125: if (state.infile [k] != NULL) cannam@125: sf_close (state.infile [k]) ; cannam@125: sf_close (state.outfile) ; cannam@125: cannam@125: return 0 ; cannam@125: } /* main */ cannam@125: cannam@125: /*------------------------------------------------------------------------------ cannam@125: */ cannam@125: cannam@125: cannam@125: static void cannam@125: usage_exit (void) cannam@125: { puts ("\nUsage : sndfile-interleave ... -o \n") ; cannam@125: puts ("Merge two or more mono files into a single multi-channel file.\n") ; cannam@125: printf ("Using %s.\n\n", sf_version_string ()) ; cannam@125: exit (1) ; cannam@125: } /* usage_exit */ cannam@125: cannam@125: cannam@125: static void cannam@125: interleave_int (STATE * state) cannam@125: { int max_read_len, read_len ; cannam@125: int ch, k ; cannam@125: cannam@125: do cannam@125: { max_read_len = 0 ; cannam@125: cannam@125: for (ch = 0 ; ch < state->channels ; ch ++) cannam@125: { read_len = sf_read_int (state->infile [ch], state->din.i, BUFFER_LEN) ; cannam@125: if (read_len < BUFFER_LEN) cannam@125: memset (state->din.i + read_len, 0, sizeof (state->din.i [0]) * (BUFFER_LEN - read_len)) ; cannam@125: cannam@125: for (k = 0 ; k < BUFFER_LEN ; k++) cannam@125: state->dout.i [k * state->channels + ch] = state->din.i [k] ; cannam@125: cannam@125: max_read_len = MAX (max_read_len, read_len) ; cannam@125: } ; cannam@125: cannam@125: sf_writef_int (state->outfile, state->dout.i, max_read_len) ; cannam@125: } cannam@125: while (max_read_len > 0) ; cannam@125: cannam@125: } /* interleave_int */ cannam@125: cannam@125: cannam@125: static void cannam@125: interleave_double (STATE * state) cannam@125: { int max_read_len, read_len ; cannam@125: int ch, k ; cannam@125: cannam@125: do cannam@125: { max_read_len = 0 ; cannam@125: cannam@125: for (ch = 0 ; ch < state->channels ; ch ++) cannam@125: { read_len = sf_read_double (state->infile [ch], state->din.d, BUFFER_LEN) ; cannam@125: if (read_len < BUFFER_LEN) cannam@125: memset (state->din.d + read_len, 0, sizeof (state->din.d [0]) * (BUFFER_LEN - read_len)) ; cannam@125: cannam@125: for (k = 0 ; k < BUFFER_LEN ; k++) cannam@125: state->dout.d [k * state->channels + ch] = state->din.d [k] ; cannam@125: cannam@125: max_read_len = MAX (max_read_len, read_len) ; cannam@125: } ; cannam@125: cannam@125: sf_writef_double (state->outfile, state->dout.d, max_read_len) ; cannam@125: } cannam@125: while (max_read_len > 0) ; cannam@125: cannam@125: } /* interleave_double */