Chris@0: /*
Chris@0: ** Copyright (C) 2002-2011 Erik de Castro Lopo <erikd@mega-nerd.com>
Chris@0: **
Chris@0: ** This program is free software; you can redistribute it and/or modify
Chris@0: ** it under the terms of the GNU General Public License as published by
Chris@0: ** the Free Software Foundation; either version 2 of the License, or
Chris@0: ** (at your option) any later version.
Chris@0: **
Chris@0: ** This program is distributed in the hope that it will be useful,
Chris@0: ** but WITHOUT ANY WARRANTY; without even the implied warranty of
Chris@0: ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Chris@0: ** GNU General Public License for more details.
Chris@0: **
Chris@0: ** You should have received a copy of the GNU General Public License
Chris@0: ** along with this program; if not, write to the Free Software
Chris@0: ** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
Chris@0: */
Chris@0: 
Chris@0: #include "sfconfig.h"
Chris@0: 
Chris@0: #include <stdio.h>
Chris@0: #include <stdlib.h>
Chris@0: 
Chris@0: #if HAVE_UNISTD_H
Chris@0: #include <unistd.h>
Chris@0: #endif
Chris@0: 
Chris@0: #if (HAVE_DECL_S_IRGRP == 0)
Chris@0: #include <sf_unistd.h>
Chris@0: #endif
Chris@0: 
Chris@0: #include <string.h>
Chris@0: #include <math.h>
Chris@0: #include <time.h>
Chris@0: #include <fcntl.h>
Chris@0: #include <sys/stat.h>
Chris@0: 
Chris@0: #include <sndfile.h>
Chris@0: 
Chris@0: #ifndef		M_PI
Chris@0: #define		M_PI		3.14159265358979323846264338
Chris@0: #endif
Chris@0: 
Chris@0: /*
Chris@0: **	Neat solution to the Win32/OS2 binary file flage requirement.
Chris@0: **	If O_BINARY isn't already defined by the inclusion of the system
Chris@0: **	headers, set it to zero.
Chris@0: */
Chris@0: #ifndef O_BINARY
Chris@0: #define O_BINARY 0
Chris@0: #endif
Chris@0: 
Chris@0: #define	WRITE_FLAGS	(O_WRONLY | O_CREAT | O_TRUNC | O_BINARY)
Chris@0: #define	READ_FLAGS	(O_RDONLY | O_BINARY)
Chris@0: 
Chris@0: #if (defined (WIN32) || defined (_WIN32) || defined (__OS2__))
Chris@0: 	#define WRITE_PERMS	0777
Chris@0: #else
Chris@0: 	#define WRITE_PERMS	(S_IRUSR | S_IWUSR | S_IRGRP)
Chris@0: #endif
Chris@0: 
Chris@0: #define	BUFFER_SIZE		(1<<18)
Chris@0: #define	BLOCK_COUNT		(30)
Chris@0: #define	TEST_DURATION	(5)		/* 5 Seconds. */
Chris@0: 
Chris@0: typedef struct
Chris@0: {	double	write_rate ;
Chris@0: 	double	read_rate ;
Chris@0: } PERF_STATS ;
Chris@0: 
Chris@0: static void	*data = NULL ;
Chris@0: 
Chris@0: static void calc_raw_performance (PERF_STATS *stats) ;
Chris@0: 
Chris@0: static void	calc_short_performance (int format, double read_rate, double write_rate) ;
Chris@0: static void	calc_int_performance (int format, double read_rate, double write_rate) ;
Chris@0: static void	calc_float_performance (int format, double read_rate, double write_rate) ;
Chris@0: 
Chris@0: 
Chris@0: static int cpu_is_big_endian (void) ;
Chris@0: 
Chris@0: static const char* get_subtype_str (int subtype) ;
Chris@0: 
Chris@0: int
Chris@0: main (int argc, char *argv [])
Chris@0: {	PERF_STATS	stats ;
Chris@0: 	char		buffer [256] = "Benchmarking " ;
Chris@0: 	int			format_major ;
Chris@0: 
Chris@0: 	if (! (data = malloc (BUFFER_SIZE * sizeof (double))))
Chris@0: 	{	perror ("Error : malloc failed") ;
Chris@0: 		exit (1) ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	sf_command (NULL, SFC_GET_LIB_VERSION, buffer + strlen (buffer), sizeof (buffer) - strlen (buffer)) ;
Chris@0: 
Chris@0: 	puts (buffer) ;
Chris@0: 	memset (buffer, '-', strlen (buffer)) ;
Chris@0: 	puts (buffer) ;
Chris@0: 	printf ("Each test takes a little over %d seconds.\n\n", TEST_DURATION) ;
Chris@0: 
Chris@0: 	calc_raw_performance (&stats) ;
Chris@0: 
Chris@0: 	if (argc < 2 || strcmp ("--native-only", argv [1]) == 0)
Chris@0: 	{	puts ("\nNative endian I/O :") ;
Chris@0: 		format_major = cpu_is_big_endian () ? SF_FORMAT_AIFF : SF_FORMAT_WAV ;
Chris@0: 
Chris@0: 		calc_short_performance	(format_major | SF_FORMAT_PCM_16, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_int_performance	(format_major | SF_FORMAT_PCM_24, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_int_performance	(format_major | SF_FORMAT_PCM_32, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_float_performance	(format_major | SF_FORMAT_PCM_16, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_float_performance	(format_major | SF_FORMAT_PCM_24, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_float_performance	(format_major | SF_FORMAT_PCM_32, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_float_performance	(format_major | SF_FORMAT_FLOAT , stats.read_rate, stats.write_rate) ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	if (argc < 2 || strcmp ("--swap-only", argv [1]) == 0)
Chris@0: 	{	puts ("\nEndian swapped I/O :") ;
Chris@0: 		format_major = cpu_is_big_endian () ? SF_FORMAT_WAV : SF_FORMAT_AIFF ;
Chris@0: 
Chris@0: 		calc_short_performance	(format_major | SF_FORMAT_PCM_16, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_int_performance	(format_major | SF_FORMAT_PCM_24, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_int_performance	(format_major | SF_FORMAT_PCM_32, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_float_performance	(format_major | SF_FORMAT_PCM_16, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_float_performance	(format_major | SF_FORMAT_PCM_24, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_float_performance	(format_major | SF_FORMAT_PCM_32, stats.read_rate, stats.write_rate) ;
Chris@0: 		calc_float_performance	(format_major | SF_FORMAT_FLOAT , stats.read_rate, stats.write_rate) ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	puts ("") ;
Chris@0: 
Chris@0: 	free (data) ;
Chris@0: 
Chris@0: 	return 0 ;
Chris@0: } /* main */
Chris@0: 
Chris@0: /*==============================================================================
Chris@0: */
Chris@0: 
Chris@0: static void
Chris@0: calc_raw_performance (PERF_STATS *stats)
Chris@0: {	clock_t start_clock, clock_time ;
Chris@0: 	int fd, k, byte_count, retval, op_count ;
Chris@0: 	const char *filename ;
Chris@0: 
Chris@0: 	filename = "benchmark.dat" ;
Chris@0: 
Chris@0: 	byte_count = BUFFER_SIZE * sizeof (short) ;
Chris@0: 
Chris@0: 	/* Collect write stats */
Chris@0: 	printf ("    Raw write PCM_16  : ") ;
Chris@0: 	fflush (stdout) ;
Chris@0: 
Chris@0: 	clock_time = 0 ;
Chris@0: 	op_count = 0 ;
Chris@0: 	start_clock = clock () ;
Chris@0: 
Chris@0: 	while (clock_time < (CLOCKS_PER_SEC * TEST_DURATION))
Chris@0: 	{	if ((fd = open (filename, WRITE_FLAGS, WRITE_PERMS)) < 0)
Chris@0: 		{	printf ("Error : not able to open file : %s\n", filename) ;
Chris@0: 			perror ("") ;
Chris@0: 			exit (1) ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		for (k = 0 ; k < BLOCK_COUNT ; k++)
Chris@0: 		{	if ((retval = write (fd, data, byte_count)) != byte_count)
Chris@0: 			{	printf ("Error : write returned %d (should have been %d)\n", retval, byte_count) ;
Chris@0: 				exit (1) ;
Chris@0: 				} ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		close (fd) ;
Chris@0: 
Chris@0: 		clock_time = clock () - start_clock ;
Chris@0: 		op_count ++ ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	stats->write_rate = (1.0 * BUFFER_SIZE) * BLOCK_COUNT * op_count ;
Chris@0: 	stats->write_rate *= (1.0 * CLOCKS_PER_SEC) / clock_time ;
Chris@0: 	printf ("%10.0f samples per sec\n", stats->write_rate) ;
Chris@0: 
Chris@0: 	/* Collect read stats */
Chris@0: 	printf ("    Raw read  PCM_16  : ") ;
Chris@0: 	fflush (stdout) ;
Chris@0: 
Chris@0: 	clock_time = 0 ;
Chris@0: 	op_count = 0 ;
Chris@0: 	start_clock = clock () ;
Chris@0: 
Chris@0: 	while (clock_time < (CLOCKS_PER_SEC * TEST_DURATION))
Chris@0: 	{	if ((fd = open (filename, READ_FLAGS)) < 0)
Chris@0: 		{	printf ("Error : not able to open file : %s\n", filename) ;
Chris@0: 			perror ("") ;
Chris@0: 			exit (1) ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		for (k = 0 ; k < BLOCK_COUNT ; k++)
Chris@0: 		{	if ((retval = read (fd, data, byte_count)) != byte_count)
Chris@0: 			{	printf ("Error : write returned %d (should have been %d)\n", retval, byte_count) ;
Chris@0: 				exit (1) ;
Chris@0: 				} ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		close (fd) ;
Chris@0: 
Chris@0: 		clock_time = clock () - start_clock ;
Chris@0: 		op_count ++ ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	stats->read_rate = (1.0 * BUFFER_SIZE) * BLOCK_COUNT * op_count ;
Chris@0: 	stats->read_rate *= (1.0 * CLOCKS_PER_SEC) / clock_time ;
Chris@0: 	printf ("%10.0f samples per sec\n", stats->read_rate) ;
Chris@0: 
Chris@0: 	unlink (filename) ;
Chris@0: } /* calc_raw_performance */
Chris@0: 
Chris@0: /*------------------------------------------------------------------------------
Chris@0: */
Chris@0: 
Chris@0: static void
Chris@0: calc_short_performance (int format, double read_rate, double write_rate)
Chris@0: {	SNDFILE *file ;
Chris@0: 	SF_INFO	sfinfo ;
Chris@0: 	clock_t start_clock, clock_time ;
Chris@0: 	double	performance ;
Chris@0: 	int k, item_count, retval, op_count ;
Chris@0: 	const char* subtype ;
Chris@0: 	short *short_data ;
Chris@0: 	const char *filename ;
Chris@0: 
Chris@0: 	filename = "benchmark.dat" ;
Chris@0: 	subtype = get_subtype_str (format & SF_FORMAT_SUBMASK) ;
Chris@0: 
Chris@0: 	short_data = data ;
Chris@0: 	item_count = BUFFER_SIZE ;
Chris@0: 	for (k = 0 ; k < item_count ; k++)
Chris@0: 		short_data [k] = 32700.0 * sin (2 * M_PI * k / 32000.0) ;
Chris@0: 
Chris@0: 	/* Collect write stats */
Chris@0: 	printf ("    Write %-5s   to  %s : ", "short", subtype) ;
Chris@0: 	fflush (stdout) ;
Chris@0: 
Chris@0: 	sfinfo.channels = 1 ;
Chris@0: 	sfinfo.format = format ;
Chris@0: 	sfinfo.frames = 1 ;
Chris@0: 	sfinfo.samplerate = 32000 ;
Chris@0: 
Chris@0: 	clock_time = 0 ;
Chris@0: 	op_count = 0 ;
Chris@0: 	start_clock = clock () ;
Chris@0: 
Chris@0: 	while (clock_time < (CLOCKS_PER_SEC * TEST_DURATION))
Chris@0: 	{	if (! (file = sf_open (filename, SFM_WRITE, &sfinfo)))
Chris@0: 		{	printf ("Error : not able to open file : %s\n", filename) ;
Chris@0: 			perror ("") ;
Chris@0: 			exit (1) ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		/* Turn off the addition of a PEAK chunk. */
Chris@0: 		sf_command (file, SFC_SET_ADD_PEAK_CHUNK, NULL, SF_FALSE) ;
Chris@0: 
Chris@0: 		for (k = 0 ; k < BLOCK_COUNT ; k++)
Chris@0: 		{	if ((retval = sf_write_short (file, short_data, item_count)) != item_count)
Chris@0: 			{	printf ("Error : sf_write_short returned %d (should have been %d)\n", retval, item_count) ;
Chris@0: 				exit (1) ;
Chris@0: 				} ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		sf_close (file) ;
Chris@0: 
Chris@0: 		clock_time = clock () - start_clock ;
Chris@0: 		op_count ++ ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	performance = (1.0 * BUFFER_SIZE) * BLOCK_COUNT * op_count ;
Chris@0: 	performance *= (1.0 * CLOCKS_PER_SEC) / clock_time ;
Chris@0: 	printf ("%6.2f%% of raw write\n", 100.0 * performance / write_rate) ;
Chris@0: 
Chris@0: 	/* Collect read stats */
Chris@0: 	printf ("    Read  %-5s  from %s : ", "short", subtype) ;
Chris@0: 	fflush (stdout) ;
Chris@0: 
Chris@0: 	clock_time = 0 ;
Chris@0: 	op_count = 0 ;
Chris@0: 	start_clock = clock () ;
Chris@0: 
Chris@0: 	while (clock_time < (CLOCKS_PER_SEC * TEST_DURATION))
Chris@0: 	{	if (! (file = sf_open (filename, SFM_READ, &sfinfo)))
Chris@0: 		{	printf ("Error : not able to open file : %s\n", filename) ;
Chris@0: 			perror ("") ;
Chris@0: 			exit (1) ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		for (k = 0 ; k < BLOCK_COUNT ; k++)
Chris@0: 		{	if ((retval = sf_read_short (file, short_data, item_count)) != item_count)
Chris@0: 			{	printf ("Error : write returned %d (should have been %d)\n", retval, item_count) ;
Chris@0: 				exit (1) ;
Chris@0: 				} ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		sf_close (file) ;
Chris@0: 
Chris@0: 		clock_time = clock () - start_clock ;
Chris@0: 		op_count ++ ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	performance = (1.0 * item_count) * BLOCK_COUNT * op_count ;
Chris@0: 	performance *= (1.0 * CLOCKS_PER_SEC) / clock_time ;
Chris@0: 	printf ("%6.2f%% of raw read\n", 100.0 * performance / read_rate) ;
Chris@0: 
Chris@0: 	unlink (filename) ;
Chris@0: 
Chris@0: } /* calc_short_performance */
Chris@0: static void
Chris@0: calc_int_performance (int format, double read_rate, double write_rate)
Chris@0: {	SNDFILE *file ;
Chris@0: 	SF_INFO	sfinfo ;
Chris@0: 	clock_t start_clock, clock_time ;
Chris@0: 	double	performance ;
Chris@0: 	int k, item_count, retval, op_count ;
Chris@0: 	const char* subtype ;
Chris@0: 	int *int_data ;
Chris@0: 	const char *filename ;
Chris@0: 
Chris@0: 	filename = "benchmark.dat" ;
Chris@0: 	subtype = get_subtype_str (format & SF_FORMAT_SUBMASK) ;
Chris@0: 
Chris@0: 	int_data = data ;
Chris@0: 	item_count = BUFFER_SIZE ;
Chris@0: 	for (k = 0 ; k < item_count ; k++)
Chris@0: 		int_data [k] = 32700.0 * (1<<16) * sin (2 * M_PI * k / 32000.0) ;
Chris@0: 
Chris@0: 	/* Collect write stats */
Chris@0: 	printf ("    Write %-5s   to  %s : ", "int", subtype) ;
Chris@0: 	fflush (stdout) ;
Chris@0: 
Chris@0: 	sfinfo.channels = 1 ;
Chris@0: 	sfinfo.format = format ;
Chris@0: 	sfinfo.frames = 1 ;
Chris@0: 	sfinfo.samplerate = 32000 ;
Chris@0: 
Chris@0: 	clock_time = 0 ;
Chris@0: 	op_count = 0 ;
Chris@0: 	start_clock = clock () ;
Chris@0: 
Chris@0: 	while (clock_time < (CLOCKS_PER_SEC * TEST_DURATION))
Chris@0: 	{	if (! (file = sf_open (filename, SFM_WRITE, &sfinfo)))
Chris@0: 		{	printf ("Error : not able to open file : %s\n", filename) ;
Chris@0: 			perror ("") ;
Chris@0: 			exit (1) ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		/* Turn off the addition of a PEAK chunk. */
Chris@0: 		sf_command (file, SFC_SET_ADD_PEAK_CHUNK, NULL, SF_FALSE) ;
Chris@0: 
Chris@0: 		for (k = 0 ; k < BLOCK_COUNT ; k++)
Chris@0: 		{	if ((retval = sf_write_int (file, int_data, item_count)) != item_count)
Chris@0: 			{	printf ("Error : sf_write_short returned %d (should have been %d)\n", retval, item_count) ;
Chris@0: 				exit (1) ;
Chris@0: 				} ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		sf_close (file) ;
Chris@0: 
Chris@0: 		clock_time = clock () - start_clock ;
Chris@0: 		op_count ++ ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	performance = (1.0 * BUFFER_SIZE) * BLOCK_COUNT * op_count ;
Chris@0: 	performance *= (1.0 * CLOCKS_PER_SEC) / clock_time ;
Chris@0: 	printf ("%6.2f%% of raw write\n", 100.0 * performance / write_rate) ;
Chris@0: 
Chris@0: 	/* Collect read stats */
Chris@0: 	printf ("    Read  %-5s  from %s : ", "int", subtype) ;
Chris@0: 	fflush (stdout) ;
Chris@0: 
Chris@0: 	clock_time = 0 ;
Chris@0: 	op_count = 0 ;
Chris@0: 	start_clock = clock () ;
Chris@0: 
Chris@0: 	while (clock_time < (CLOCKS_PER_SEC * TEST_DURATION))
Chris@0: 	{	if (! (file = sf_open (filename, SFM_READ, &sfinfo)))
Chris@0: 		{	printf ("Error : not able to open file : %s\n", filename) ;
Chris@0: 			perror ("") ;
Chris@0: 			exit (1) ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		for (k = 0 ; k < BLOCK_COUNT ; k++)
Chris@0: 		{	if ((retval = sf_read_int (file, int_data, item_count)) != item_count)
Chris@0: 			{	printf ("Error : write returned %d (should have been %d)\n", retval, item_count) ;
Chris@0: 				exit (1) ;
Chris@0: 				} ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		sf_close (file) ;
Chris@0: 
Chris@0: 		clock_time = clock () - start_clock ;
Chris@0: 		op_count ++ ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	performance = (1.0 * item_count) * BLOCK_COUNT * op_count ;
Chris@0: 	performance *= (1.0 * CLOCKS_PER_SEC) / clock_time ;
Chris@0: 	printf ("%6.2f%% of raw read\n", 100.0 * performance / read_rate) ;
Chris@0: 
Chris@0: 	unlink (filename) ;
Chris@0: 
Chris@0: } /* calc_int_performance */
Chris@0: static void
Chris@0: calc_float_performance (int format, double read_rate, double write_rate)
Chris@0: {	SNDFILE *file ;
Chris@0: 	SF_INFO	sfinfo ;
Chris@0: 	clock_t start_clock, clock_time ;
Chris@0: 	double	performance ;
Chris@0: 	int k, item_count, retval, op_count ;
Chris@0: 	const char* subtype ;
Chris@0: 	float *float_data ;
Chris@0: 	const char *filename ;
Chris@0: 
Chris@0: 	filename = "benchmark.dat" ;
Chris@0: 	subtype = get_subtype_str (format & SF_FORMAT_SUBMASK) ;
Chris@0: 
Chris@0: 	float_data = data ;
Chris@0: 	item_count = BUFFER_SIZE ;
Chris@0: 	for (k = 0 ; k < item_count ; k++)
Chris@0: 		float_data [k] = 1.0 * sin (2 * M_PI * k / 32000.0) ;
Chris@0: 
Chris@0: 	/* Collect write stats */
Chris@0: 	printf ("    Write %-5s   to  %s : ", "float", subtype) ;
Chris@0: 	fflush (stdout) ;
Chris@0: 
Chris@0: 	sfinfo.channels = 1 ;
Chris@0: 	sfinfo.format = format ;
Chris@0: 	sfinfo.frames = 1 ;
Chris@0: 	sfinfo.samplerate = 32000 ;
Chris@0: 
Chris@0: 	clock_time = 0 ;
Chris@0: 	op_count = 0 ;
Chris@0: 	start_clock = clock () ;
Chris@0: 
Chris@0: 	while (clock_time < (CLOCKS_PER_SEC * TEST_DURATION))
Chris@0: 	{	if (! (file = sf_open (filename, SFM_WRITE, &sfinfo)))
Chris@0: 		{	printf ("Error : not able to open file : %s\n", filename) ;
Chris@0: 			perror ("") ;
Chris@0: 			exit (1) ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		/* Turn off the addition of a PEAK chunk. */
Chris@0: 		sf_command (file, SFC_SET_ADD_PEAK_CHUNK, NULL, SF_FALSE) ;
Chris@0: 
Chris@0: 		for (k = 0 ; k < BLOCK_COUNT ; k++)
Chris@0: 		{	if ((retval = sf_write_float (file, float_data, item_count)) != item_count)
Chris@0: 			{	printf ("Error : sf_write_short returned %d (should have been %d)\n", retval, item_count) ;
Chris@0: 				exit (1) ;
Chris@0: 				} ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		sf_close (file) ;
Chris@0: 
Chris@0: 		clock_time = clock () - start_clock ;
Chris@0: 		op_count ++ ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	performance = (1.0 * BUFFER_SIZE) * BLOCK_COUNT * op_count ;
Chris@0: 	performance *= (1.0 * CLOCKS_PER_SEC) / clock_time ;
Chris@0: 	printf ("%6.2f%% of raw write\n", 100.0 * performance / write_rate) ;
Chris@0: 
Chris@0: 	/* Collect read stats */
Chris@0: 	printf ("    Read  %-5s  from %s : ", "float", subtype) ;
Chris@0: 	fflush (stdout) ;
Chris@0: 
Chris@0: 	clock_time = 0 ;
Chris@0: 	op_count = 0 ;
Chris@0: 	start_clock = clock () ;
Chris@0: 
Chris@0: 	while (clock_time < (CLOCKS_PER_SEC * TEST_DURATION))
Chris@0: 	{	if (! (file = sf_open (filename, SFM_READ, &sfinfo)))
Chris@0: 		{	printf ("Error : not able to open file : %s\n", filename) ;
Chris@0: 			perror ("") ;
Chris@0: 			exit (1) ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		for (k = 0 ; k < BLOCK_COUNT ; k++)
Chris@0: 		{	if ((retval = sf_read_float (file, float_data, item_count)) != item_count)
Chris@0: 			{	printf ("Error : write returned %d (should have been %d)\n", retval, item_count) ;
Chris@0: 				exit (1) ;
Chris@0: 				} ;
Chris@0: 			} ;
Chris@0: 
Chris@0: 		sf_close (file) ;
Chris@0: 
Chris@0: 		clock_time = clock () - start_clock ;
Chris@0: 		op_count ++ ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	performance = (1.0 * item_count) * BLOCK_COUNT * op_count ;
Chris@0: 	performance *= (1.0 * CLOCKS_PER_SEC) / clock_time ;
Chris@0: 	printf ("%6.2f%% of raw read\n", 100.0 * performance / read_rate) ;
Chris@0: 
Chris@0: 	unlink (filename) ;
Chris@0: 
Chris@0: } /* calc_float_performance */
Chris@0: 
Chris@0: 
Chris@0: /*==============================================================================
Chris@0: */
Chris@0: 
Chris@0: static int
Chris@0: cpu_is_big_endian (void)
Chris@0: {	unsigned char 	*cptr ;
Chris@0: 	int 			endtest ;
Chris@0: 
Chris@0: 	endtest = 0x12345678 ;
Chris@0: 
Chris@0: 	cptr = (unsigned char*) (&endtest) ;
Chris@0: 
Chris@0: 	if (cptr [0] == 0x12 && cptr [1] == 0x34 && cptr [3] == 0x78)
Chris@0: 		return SF_TRUE ;
Chris@0: 
Chris@0: 	return SF_FALSE ;
Chris@0: } /* cpu_is_big_endian */
Chris@0: 
Chris@0: static const char*
Chris@0: get_subtype_str (int subtype)
Chris@0: {	switch (subtype)
Chris@0: 	{	case SF_FORMAT_PCM_16 :
Chris@0: 				return "PCM_16" ;
Chris@0: 
Chris@0: 		case SF_FORMAT_PCM_24 :
Chris@0: 				return "PCM_24" ;
Chris@0: 
Chris@0: 		case SF_FORMAT_PCM_32 :
Chris@0: 				return "PCM_32" ;
Chris@0: 
Chris@0: 		case SF_FORMAT_FLOAT :
Chris@0: 				return "FLOAT " ;
Chris@0: 
Chris@0: 		case SF_FORMAT_DOUBLE :
Chris@0: 				return "DOUBLE" ;
Chris@0: 
Chris@0: 		default : break ;
Chris@0: 		} ;
Chris@0: 
Chris@0: 	return "UNKNOWN" ;
Chris@0: } /* get_subtype_str */
Chris@0: