410 lines
9.2 KiB
C
410 lines
9.2 KiB
C
/*
|
|
Copyright (C) 1994-1995 Apogee Software, Ltd.
|
|
|
|
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.
|
|
|
|
*/
|
|
/**********************************************************************
|
|
module: PS.C
|
|
|
|
author: James R. Dose
|
|
date: December 12, 1995
|
|
|
|
Simple sound player.
|
|
|
|
(c) Copyright 1995 James R. Dose. All Rights Reserved.
|
|
**********************************************************************/
|
|
|
|
#include <conio.h>
|
|
#include <dos.h>
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include "fx_man.h"
|
|
|
|
|
|
/*---------------------------------------------------------------------
|
|
Function prototypes
|
|
---------------------------------------------------------------------*/
|
|
|
|
char *LoadFile( char *filename, int *length );
|
|
char *GetUserText( const char *parameter );
|
|
int CheckUserParm( const char *parameter );
|
|
void DefaultExtension( char *path, char *extension );
|
|
|
|
#define TRUE ( 1 == 1 )
|
|
#define FALSE ( !TRUE )
|
|
|
|
#define NUMCARDS 8
|
|
|
|
char *SoundCardNames[] =
|
|
{
|
|
"Sound Blaster", "Awe 32", "Pro AudioSpectrum",
|
|
"Sound Man 16", "Ensoniq SoundScape", "Gravis UltraSound",
|
|
"Disney SoundSource", "Tandy SoundSource"
|
|
};
|
|
|
|
int SoundCardNums[] =
|
|
{
|
|
SoundBlaster, Awe32, ProAudioSpectrum, SoundMan16,
|
|
SoundScape, UltraSound, SoundSource, TandySoundSource
|
|
};
|
|
|
|
/*---------------------------------------------------------------------
|
|
Function: main
|
|
|
|
Sets up sound cards, calls the demo, and then cleans up.
|
|
---------------------------------------------------------------------*/
|
|
|
|
void main
|
|
(
|
|
int argc,
|
|
char *argv[]
|
|
)
|
|
|
|
{
|
|
int card;
|
|
int voices;
|
|
int rate;
|
|
int bits;
|
|
int channels;
|
|
int reverb;
|
|
int status;
|
|
int length;
|
|
int voice;
|
|
fx_device device;
|
|
char *SoundPtr = NULL;
|
|
char *ptr;
|
|
char filename[ 128 ];
|
|
char ch;
|
|
|
|
printf( "\nPS Version 1.0 by Jim Dose\n" );
|
|
|
|
if ( ( CheckUserParm( "?" ) ) || ( argc < 2 ) )
|
|
{
|
|
int index;
|
|
|
|
printf(
|
|
"Usage: PS [ soundfile ] CARD=[ card # ] VOICES=[ # of voices ]\n"
|
|
" BITS=[ 8 or 16 ] [MONO/STEREO] RATE=[ mixing rate ]\n"
|
|
" REVERB=[ reverb amount]\n\n"
|
|
" sound card # = \n" );
|
|
for( index = 0; index < NUMCARDS; index++ )
|
|
{
|
|
printf( " %d : %s\n", index, SoundCardNames[ index ] );
|
|
}
|
|
|
|
printf( "\nDefault: PS [ soundfile ] CARD=0 VOICES=4 "
|
|
"BITS=8 MONO RATE=11000\n\n" );
|
|
exit( 0 );
|
|
}
|
|
|
|
// Default is Sound Blaster
|
|
card = 0;
|
|
voices = 4;
|
|
bits = 8;
|
|
channels = 1;
|
|
reverb = 0;
|
|
rate = 11000;
|
|
|
|
ptr = GetUserText( "VOICES" );
|
|
if ( ptr != NULL )
|
|
{
|
|
sscanf( ptr, "%d", &voices );
|
|
}
|
|
|
|
ptr = GetUserText( "BITS" );
|
|
if ( ptr != NULL )
|
|
{
|
|
sscanf( ptr, "%d", &bits );
|
|
}
|
|
|
|
ptr = GetUserText( "RATE" );
|
|
if ( ptr != NULL )
|
|
{
|
|
sscanf( ptr, "%d", &rate );
|
|
}
|
|
|
|
ptr = GetUserText( "REVERB" );
|
|
if ( ptr != NULL )
|
|
{
|
|
sscanf( ptr, "%d", &reverb );
|
|
}
|
|
|
|
ptr = GetUserText( "MONO" );
|
|
if ( ptr != NULL )
|
|
{
|
|
channels = 1;
|
|
}
|
|
|
|
ptr = GetUserText( "STEREO" );
|
|
if ( ptr != NULL )
|
|
{
|
|
channels = 2;
|
|
}
|
|
|
|
ptr = GetUserText( "CARD" );
|
|
if ( ptr != NULL )
|
|
{
|
|
sscanf( ptr, "%d", &card );
|
|
}
|
|
|
|
if ( ( card < 0 ) || ( card >= NUMCARDS ) )
|
|
{
|
|
printf( "Value out of range for sound card #: %d\n", card );
|
|
exit( 1 );
|
|
}
|
|
|
|
strcpy( filename, argv[ 1 ] );
|
|
DefaultExtension( filename, ".wav" );
|
|
SoundPtr = LoadFile( filename, &length );
|
|
if ( !SoundPtr )
|
|
{
|
|
strcpy( filename, argv[ 1 ] );
|
|
DefaultExtension( filename, ".voc" );
|
|
SoundPtr = LoadFile( filename, &length );
|
|
if ( !SoundPtr )
|
|
{
|
|
strcpy( filename, argv[ 1 ] );
|
|
SoundPtr = LoadFile( filename, &length );
|
|
if ( !SoundPtr )
|
|
{
|
|
printf( "Cannot open '%s' for read.\n", argv[ 1 ] );
|
|
exit( 1 );
|
|
}
|
|
}
|
|
}
|
|
|
|
status = FX_SetupCard( card, &device );
|
|
if ( status != FX_Ok )
|
|
{
|
|
printf( "%s\n", FX_ErrorString( status ) );
|
|
exit( 1 );
|
|
}
|
|
|
|
status = FX_Init( card, voices, channels, bits, rate );
|
|
if ( status != FX_Ok )
|
|
{
|
|
printf( "%s\n", FX_ErrorString( status ) );
|
|
exit( 1 );
|
|
}
|
|
|
|
FX_SetReverb( reverb );
|
|
|
|
FX_SetVolume( 255 );
|
|
|
|
printf( "Playing file '%s'.\n\n", filename );
|
|
printf( "Press any key to play the sound.\n"
|
|
"Press ESCape to end.\n\n" );
|
|
|
|
ch = 0;
|
|
while( ch != 27 )
|
|
{
|
|
if ( stricmp( &filename[ strlen( filename ) - 3 ], "WAV" ) == 0 )
|
|
{
|
|
voice = FX_PlayWAV( SoundPtr, 0, 255, 255, 255, 0, 0 );
|
|
}
|
|
else if ( stricmp( &filename[ strlen( filename ) - 3 ], "VOC" ) == 0 )
|
|
{
|
|
voice = FX_PlayVOC( SoundPtr, 0, 255, 255, 255, 0, 0 );
|
|
}
|
|
else
|
|
{
|
|
voice = FX_PlayRaw( SoundPtr, length, rate, 0, 255, 255, 255, 0, 0 );
|
|
}
|
|
|
|
if ( voice < FX_Ok )
|
|
{
|
|
printf( "Sound error - %s\n", FX_ErrorString( status ) );
|
|
}
|
|
|
|
ch = getch();
|
|
}
|
|
|
|
FX_StopAllSounds();
|
|
free( SoundPtr );
|
|
FX_Shutdown();
|
|
|
|
printf( "\n" );
|
|
}
|
|
|
|
|
|
/*---------------------------------------------------------------------
|
|
Function: LoadFile
|
|
|
|
Loads a file from disk.
|
|
---------------------------------------------------------------------*/
|
|
|
|
char *LoadFile
|
|
(
|
|
char *filename,
|
|
int *length
|
|
)
|
|
|
|
{
|
|
FILE *in;
|
|
long size;
|
|
char *ptr;
|
|
|
|
if ( ( in = fopen( filename, "rb" ) ) == NULL )
|
|
{
|
|
return NULL;
|
|
}
|
|
|
|
fseek( in, 0, SEEK_END );
|
|
size = ftell( in );
|
|
fseek( in, 0, SEEK_SET );
|
|
|
|
ptr = ( char * )malloc( size );
|
|
if ( ptr == NULL )
|
|
{
|
|
printf( "Out of memory while reading '%s'.\n", filename );
|
|
exit( 1 );
|
|
}
|
|
|
|
if ( fread( ptr, size, 1, in ) != 1 )
|
|
{
|
|
printf( "Unexpected end of file while reading '%s'.\n", filename );
|
|
exit(1);
|
|
}
|
|
|
|
fclose( in );
|
|
|
|
*length = size;
|
|
|
|
return( ptr );
|
|
}
|
|
|
|
|
|
/*---------------------------------------------------------------------
|
|
Function: GetUserText
|
|
|
|
Checks if the specified string is present in the command line
|
|
and returns a pointer to the text following it.
|
|
---------------------------------------------------------------------*/
|
|
|
|
char *GetUserText
|
|
(
|
|
const char *parameter
|
|
)
|
|
|
|
{
|
|
int i;
|
|
int length;
|
|
char *text;
|
|
char *ptr;
|
|
|
|
extern int _argc;
|
|
extern char **_argv;
|
|
|
|
text = NULL;
|
|
length = strlen( parameter );
|
|
i = 1;
|
|
while( i < _argc )
|
|
{
|
|
ptr = _argv[ i ];
|
|
|
|
if ( ( strnicmp( parameter, ptr, length ) == 0 ) &&
|
|
( *( ptr + length ) == '=' ) )
|
|
{
|
|
text = ptr + length + 1;
|
|
break;
|
|
}
|
|
|
|
i++;
|
|
}
|
|
|
|
return( text );
|
|
}
|
|
|
|
|
|
/*---------------------------------------------------------------------
|
|
Function: CheckUserParm
|
|
|
|
Checks if the specified string is present in the command line.
|
|
---------------------------------------------------------------------*/
|
|
|
|
int CheckUserParm
|
|
(
|
|
const char *parameter
|
|
)
|
|
|
|
{
|
|
int i;
|
|
int found;
|
|
char *ptr;
|
|
|
|
extern int _argc;
|
|
extern char **_argv;
|
|
|
|
found = FALSE;
|
|
i = 1;
|
|
while( i < _argc )
|
|
{
|
|
ptr = _argv[ i ];
|
|
|
|
// Only check parameters preceded by - or /
|
|
if ( ( *ptr == '-' ) || ( *ptr == '/' ) )
|
|
{
|
|
ptr++;
|
|
if ( stricmp( parameter, ptr ) == 0 )
|
|
{
|
|
found = TRUE;
|
|
break;
|
|
}
|
|
}
|
|
|
|
i++;
|
|
}
|
|
|
|
return( found );
|
|
}
|
|
|
|
|
|
/*---------------------------------------------------------------------
|
|
Function: DefaultExtension
|
|
|
|
Checks if the specified filename contains an extension and adds
|
|
one if it doesn't.
|
|
---------------------------------------------------------------------*/
|
|
|
|
void DefaultExtension
|
|
(
|
|
char *path,
|
|
char *extension
|
|
)
|
|
|
|
{
|
|
char *src;
|
|
|
|
//
|
|
// if path doesn't have a .EXT, append extension
|
|
// (extension should include the .)
|
|
//
|
|
src = path + strlen( path ) - 1;
|
|
|
|
while( ( *src != '\\' ) && ( src != path ) )
|
|
{
|
|
if ( *src == '.' )
|
|
{
|
|
// it has an extension
|
|
return;
|
|
}
|
|
src--;
|
|
}
|
|
|
|
strcat( path, extension );
|
|
}
|