audiotest.c

#ifdef _WIN32
//#define _WIN32_WINNT	0x500	// for GetConsoleWindow()
#include <windows.h>
#ifdef _DEBUG
#include <crtdbg.h>
#endif
#endif

#include <stdlib.h>
#include <stdio.h>
#include <ctype.h>

#ifdef _WIN32
int __cdecl _getch(void);	// from conio.h
#else
#define _getch	getchar
#endif

#include <common_def.h>
#include "audio/AudioStream.h"
#include "audio/AudioStream_SpcDrvFuns.h"


int main(int argc, char* argv[]);
#ifdef AUDDRV_DSOUND
static void SetupDirectSound(void* audDrv);
#endif
static UINT32 FillBuffer(void* drvStruct, void* userParam, UINT32 bufSize, void* Data);


#pragma pack(1)
typedef struct
{
	UINT16 lsb16;
	INT8 msb8;
} SMPL24BIT;
#pragma pack()


static UINT32 smplSize;
static void* audDrv;
static void* audDrvLog;

int main(int argc, char* argv[])
{
	UINT8 retVal;
	UINT32 drvCount;
	UINT32 curDrv;
	UINT32 idWavOut;
	UINT32 idWavOutDev;
	UINT32 idWavWrt;
	AUDDRV_INFO* drvInfo;
	AUDIO_OPTS* opts;
	AUDIO_OPTS* optsLog;
	const AUDIO_DEV_LIST* devList;
	
	Audio_Init();
	drvCount = Audio_GetDriverCount();
	if (! drvCount)
		goto Exit_Deinit;
	
#if 0
	idWavOut = (UINT32)-1;
	idWavOutDev = 0;
	idWavWrt = (UINT32)-1;
	for (curDrv = 0; curDrv < drvCount; curDrv ++)
	{
		Audio_GetDriverInfo(curDrv, &drvInfo);
		if (drvInfo->drvType == ADRVTYPE_OUT /*&& idWavOut == (UINT32)-1*/)
			idWavOut = curDrv;
		else if (drvInfo->drvType == ADRVTYPE_DISK && idWavWrt == (UINT32)-1)
			idWavWrt = curDrv;
	}
	if (idWavOut == (UINT32)-1)
	{
		printf("Unable to find output driver\n");
		goto Exit_Deinit;
	}
#endif
	
	printf("Available Drivers:\n");
	for (curDrv = 0; curDrv < drvCount; curDrv ++)
	{
		Audio_GetDriverInfo(curDrv, &drvInfo);
		printf("    Driver %u: Type: %02X, Sig: %02X, Name: %s\n",
				curDrv, drvInfo->drvType, drvInfo->drvSig, drvInfo->drvName);
	}
	if (argc <= 1)
	{
		Audio_Deinit();
		printf("Usage:\n");
		printf("audiotest DriverID [DeviceID] [WaveLogDriverID]\n");
		return 0;
	}
	
	idWavOut = (UINT32)-1;
	idWavOutDev = 0;
	idWavWrt = (UINT32)-1;
	if (argc >= 2)
		idWavOut = strtoul(argv[1], NULL, 0);
	if (argc >= 3)
		idWavOutDev = strtoul(argv[2], NULL, 0);
	if (argc >= 4)
		idWavWrt = strtoul(argv[3], NULL, 0);
	if (idWavOut >= drvCount)
		idWavOut = drvCount - 1;
	
	Audio_GetDriverInfo(idWavOut, &drvInfo);
	printf("Using driver %s.\n", drvInfo->drvName);
	retVal = AudioDrv_Init(idWavOut, &audDrv);
	if (retVal)
	{
		printf("WaveOut: Drv Init Error: %02X\n", retVal);
		goto Exit_Deinit;
	}

#ifdef AUDDRV_PULSE
	if (drvInfo->drvSig == ADRVSIG_PULSE)
	{
		void* pulseDrv;
		pulseDrv = AudioDrv_GetDrvData(audDrv);
		Pulse_SetStreamDesc(pulseDrv, "audiotest");
	}
#endif

#ifdef AUDDRV_DSOUND
	if (drvInfo->drvSig == ADRVSIG_DSOUND)
		SetupDirectSound(audDrv);
#endif
	
	if (idWavWrt == (UINT32)-1)
	{
		audDrvLog = NULL;
	}
	else
	{
		void* aDrv;
		
		Audio_GetDriverInfo(idWavWrt, &drvInfo);
		retVal = AudioDrv_Init(idWavWrt, &audDrvLog);
		if (retVal)
		{
			printf("DiskWrt: Drv Init Error: %02X\n", retVal);
			audDrvLog = NULL;
		}
		if (audDrvLog != NULL)
		{
			if (drvInfo->drvSig == ADRVSIG_WAVEWRT)
			{
#ifdef AUDDRV_WAVEWRITE
				aDrv = AudioDrv_GetDrvData(audDrvLog);
				WavWrt_SetFileName(aDrv, "waveOut.wav");
#endif
			}
			else if (drvInfo->drvSig == ADRVSIG_DSOUND)
			{
#ifdef AUDDRV_DSOUND
				SetupDirectSound(audDrvLog);
#endif
			}
		}
	}
	
	opts = AudioDrv_GetOptions(audDrv);
	opts->numChannels = 1;
	opts->numBitsPerSmpl = 16;
	smplSize = opts->numChannels * opts->numBitsPerSmpl / 8;
	if (audDrvLog != NULL)
	{
		optsLog = AudioDrv_GetOptions(audDrvLog);
		*optsLog = *opts;
	}
	
	devList = AudioDrv_GetDeviceList(audDrv);
	printf("%u device%s found.\n", devList->devCount, (devList->devCount == 1) ? "" : "s");
	for (curDrv = 0; curDrv < devList->devCount; curDrv ++)
		printf("    Device %u: %s\n", curDrv, devList->devNames[curDrv]);
	
	AudioDrv_SetCallback(audDrv, FillBuffer, NULL);
	printf("Opening Device %u ...\n", idWavOutDev);
	retVal = AudioDrv_Start(audDrv, idWavOutDev);
	if (retVal)
	{
		printf("Dev Init Error: %02X\n", retVal);
		goto Exit_DrvDeinit;
	}
	
	if (audDrvLog != NULL)
	{
		retVal = AudioDrv_Start(audDrvLog, 0);
		if (retVal)
		{
			printf("DiskWrt: Dev Init Error: %02X\n", retVal);
			AudioDrv_Deinit(&audDrvLog);
		}
		if (audDrvLog != NULL)
			AudioDrv_DataForward_Add(audDrv, audDrvLog);
	}
	printf("Buffer Size: %u bytes\n", AudioDrv_GetBufferSize(audDrv));
	
	while(1)
	{
		int inkey = getchar();
		if (toupper(inkey) == 'P')
			AudioDrv_Pause(audDrv);
		else if (toupper(inkey) == 'R')
			AudioDrv_Resume(audDrv);
		else
			break;
		while(getchar() != '\n')
			;
	}
	printf("Current Latency: %u ms\n", AudioDrv_GetLatency(audDrv));
	
	retVal = AudioDrv_Stop(audDrv);
	if (audDrvLog != NULL)
		retVal = AudioDrv_Stop(audDrvLog);
	
Exit_DrvDeinit:
	AudioDrv_Deinit(&audDrv);
	if (audDrvLog != NULL)
		AudioDrv_Deinit(&audDrvLog);
Exit_Deinit:
	Audio_Deinit();
	printf("Done.\n");
	
#if defined(_DEBUG) && (_MSC_VER >= 1400)
	if (_CrtDumpMemoryLeaks())
		_getch();
#endif
	
	return 0;
}

static UINT32 FillBuffer(void* drvStruct, void* userParam, UINT32 bufSize, void* data)
{
	UINT32 smplCount;
	UINT8* SmplPtr8;
	INT16* SmplPtr16;
	SMPL24BIT* SmplPtr24;
	INT32* SmplPtr32;
	UINT32 curSmpl;
	
	smplCount = bufSize / smplSize;
	switch(smplSize)
	{
	case 2:
		SmplPtr16 = (INT16*)data;
		for (curSmpl = 0; curSmpl < smplCount; curSmpl ++)
		{
			if ((curSmpl / (smplCount / 16)) < 15)
				SmplPtr16[curSmpl] = +0x1000;
			else
				SmplPtr16[curSmpl] = -0x1000;
		}
		break;
	case 1:
		SmplPtr8 = (UINT8*)data;
		for (curSmpl = 0; curSmpl < smplCount; curSmpl ++)
		{
			if ((curSmpl / (smplCount / 16)) < 15)
				SmplPtr8[curSmpl] = 0x90;
			else
				SmplPtr8[curSmpl] = 0x70;
		}
		break;
	case 3:
		SmplPtr24 = (SMPL24BIT*)data;
		for (curSmpl = 0; curSmpl < smplCount; curSmpl ++)
		{
			SmplPtr24[curSmpl].lsb16 = 0x00;
			if ((curSmpl / (smplCount / 16)) < 15)
				SmplPtr24[curSmpl].msb8 = +0x10;
			else
				SmplPtr24[curSmpl].msb8 = -0x10;
		}
		break;
	case 4:
		SmplPtr32 = (INT32*)data;
		for (curSmpl = 0; curSmpl < smplCount; curSmpl ++)
		{
			if ((curSmpl / (smplCount / 16)) < 15)
				SmplPtr32[curSmpl] = +0x10000000;
			else
				SmplPtr32[curSmpl] = -0x10000000;
		}
		break;
	default:
		curSmpl = 0;
		break;
	}
	
	return curSmpl * smplSize;
}

#ifdef AUDDRV_DSOUND
static void SetupDirectSound(void* audDrv)
{
#ifdef _WIN32
	void* aDrv;
	HWND hWndConsole;
	
	aDrv = AudioDrv_GetDrvData(audDrv);
#if _WIN32_WINNT >= 0x500
	hWndConsole = GetConsoleWindow();
#else
	hWndConsole = GetDesktopWindow();	// not as nice, but works
#endif
	DSound_SetHWnd(aDrv, hWndConsole);
#endif	// _WIN32
	
	return;
}
#endif