libsndfile source files.
[Faustine.git] / interpretor / libsndfile-1.0.25 / examples / sndfile-to-text.c
diff --git a/interpretor/libsndfile-1.0.25/examples/sndfile-to-text.c b/interpretor/libsndfile-1.0.25/examples/sndfile-to-text.c
new file mode 100644 (file)
index 0000000..7a7a219
--- /dev/null
@@ -0,0 +1,126 @@
+/*
+** Copyright (C) 2008-2011 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>
+
+#define        BLOCK_SIZE 512
+
+static void
+print_usage (char *progname)
+{      printf ("\nUsage : %s <input file> <output file>\n", progname) ;
+       puts ("\n"
+               "    Where the output file will contain a line for each frame\n"
+               "    and a column for each channel.\n"
+               ) ;
+
+} /* print_usage */
+
+static void
+convert_to_text (SNDFILE * infile, FILE * outfile, int channels)
+{      float buf [channels * BLOCK_SIZE] ;
+       int k, m, readcount ;
+
+       while ((readcount = sf_readf_float (infile, buf, BLOCK_SIZE)) > 0)
+       {       for (k = 0 ; k < readcount ; k++)
+               {       for (m = 0 ; m < channels ; m++)
+                               fprintf (outfile, " % 12.10f", buf [k * channels + m]) ;
+                       fprintf (outfile, "\n") ;
+                       } ;
+               } ;
+
+       return ;
+} /* convert_to_text */
+
+int
+main (int argc, char * argv [])
+{      char            *progname, *infilename, *outfilename ;
+       SNDFILE         *infile = NULL ;
+       FILE            *outfile = NULL ;
+       SF_INFO         sfinfo ;
+
+       progname = strrchr (argv [0], '/') ;
+       progname = progname ? progname + 1 : argv [0] ;
+
+       if (argc != 3)
+       {       print_usage (progname) ;
+               return 1 ;
+               } ;
+
+       infilename = argv [1] ;
+       outfilename = argv [2] ;
+
+       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 ;
+               } ;
+
+       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 ;
+               } ;
+
+       /* Open the output file. */
+       if ((outfile = fopen (outfilename, "w")) == NULL)
+       {       printf ("Not able to open output file %s : %s\n", outfilename, sf_strerror (NULL)) ;
+               return 1 ;
+               } ;
+
+       fprintf (outfile, "# Converted from file %s.\n", infilename) ;
+       fprintf (outfile, "# Channels %d, Sample rate %d\n", sfinfo.channels, sfinfo.samplerate) ;
+
+       convert_to_text (infile, outfile, sfinfo.channels) ;
+
+       sf_close (infile) ;
+       fclose (outfile) ;
+
+       return 0 ;
+} /* main */
+