Merge branch 'libsndfile'

[Faustine.git] / interpretor / lib / src / libsndfile-1.0.25 / tests / stdio_test.c

diff --git a/interpretor/lib/src/libsndfile-1.0.25/tests/stdio_test.c b/interpretor/lib/src/libsndfile-1.0.25/tests/stdio_test.c
new file mode 100644 (file)
index 0000000..80a696c
--- /dev/null
+++ b/interpretor/lib/src/libsndfile-1.0.25/tests/stdio_test.c
@@ -0,0 +1,153 @@
+/*
+** Copyright (C) 2001-2011 Erik de Castro Lopo <erikd@mega-nerd.com>
+**
+** This program is free software; you can redistribute it and/or modify
+** it under the terms of the GNU General Public License as published by
+** the Free Software Foundation; either version 2 of the License, or
+** (at your option) any later version.
+**
+** This program is distributed in the hope that it will be useful,
+** but WITHOUT ANY WARRANTY; without even the implied warranty of
+** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+** GNU General Public License for more details.
+**
+** You should have received a copy of the GNU General Public License
+** along with this program; if not, write to the Free Software
+** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+*/
+
+/*==========================================================================
+** This is a test program which tests reading from stdin and writing to
+** stdout.
+*/
+
+#include "sfconfig.h"
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#if HAVE_UNISTD_H
+#include <unistd.h>
+#endif
+
+#include <sys/types.h>
+#include <sys/stat.h>
+
+#if HAVE_SYS_WAIT_H
+#include <sys/wait.h>
+#endif
+
+#include "utils.h"
+
+/* EMX is OS/2. */
+#if (OS_IS_WIN32) || defined (__EMX__)
+
+int
+main (void)
+{
+       puts ("    stdio_test : this test doesn't work on win32.") ;
+       return 0 ;
+} /* main */
+
+#else
+
+#ifndef WIFEXITED
+#define WIFEXITED(s) (((s) & 0xff) == 0)
+#endif
+#ifndef WEXITSTATUS
+#define WEXITSTATUS(s) (((s) & 0xff00) >> 8)
+#endif
+
+
+static size_t  file_length (const char *filename) ;
+static int             file_exists (const char *filename) ;
+static void            stdio_test (const char *filetype) ;
+
+static const char *filetypes [] =
+{      "raw", "wav", "aiff", "au", "paf", "svx", "nist", "ircam",
+       "voc", "w64", "mat4", "mat5", "pvf",
+       NULL
+} ;
+
+int
+main (void)
+{      int k ;
+
+       if (file_exists ("libsndfile.spec.in"))
+               exit_if_true (chdir ("tests") != 0, "\n    Error : chdir ('tests') failed.\n") ;
+
+       for (k = 0 ; filetypes [k] ; k++)
+               stdio_test (filetypes [k]) ;
+
+       return 0 ;
+} /* main */
+
+
+static void
+stdio_test (const char *filetype)
+{      static char buffer [256] ;
+
+       int file_size, retval ;
+
+       print_test_name ("stdio_test", filetype) ;
+
+       snprintf (buffer, sizeof (buffer), "./stdout_test %s > stdio.%s", filetype, filetype) ;
+       if ((retval = system (buffer)))
+       {       retval = WIFEXITED (retval) ? WEXITSTATUS (retval) : 1 ;
+               printf ("%s : %s", buffer, (strerror (retval))) ;
+               exit (1) ;
+               } ;
+
+       snprintf (buffer, sizeof (buffer), "stdio.%s", filetype) ;
+       if ((file_size = file_length (buffer)) < PIPE_TEST_LEN)
+       {       printf ("\n    Error : test file '%s' too small (%d).\n\n", buffer, file_size) ;
+               exit (1) ;
+               } ;
+
+       snprintf (buffer, sizeof (buffer), "./stdin_test %s < stdio.%s", filetype, filetype) ;
+       if ((retval = system (buffer)))
+       {       retval = WIFEXITED (retval) ? WEXITSTATUS (retval) : 1 ;
+               printf ("%s : %s", buffer, (strerror (retval))) ;
+               exit (1) ;
+               } ;
+
+       snprintf (buffer, sizeof (buffer), "rm stdio.%s", filetype) ;
+       if ((retval = system (buffer)))
+       {       retval = WIFEXITED (retval) ? WEXITSTATUS (retval) : 1 ;
+               printf ("%s : %s", buffer, (strerror (retval))) ;
+               exit (1) ;
+               } ;
+
+       puts ("ok") ;
+
+       return ;
+} /* stdio_test */
+
+
+
+
+static size_t
+file_length (const char *filename)
+{      struct stat buf ;
+
+       if (stat (filename, &buf))
+       {       perror (filename) ;
+               exit (1) ;
+               } ;
+
+       return buf.st_size ;
+} /* file_length */
+
+static int
+file_exists (const char *filename)
+{      struct stat buf ;
+
+       if (stat (filename, &buf))
+               return 0 ;
+
+       return 1 ;
+} /* file_exists */
+
+#endif
+