1

/* $Id$ */

     2

     3

#include "../stdafx.h"

     4

#include "../openttd.h"

     5

#include "../driver.h"

     6

#include "../functions.h"

     7

#include "../mixer.h"

     8

#include "win32_s.h"

     9

#include <windows.h>

    10

#include <mmsystem.h>

    11

    12

static HWAVEOUT _waveout;

    13

static WAVEHDR _wave_hdr[2];

    14

static int _bufsize;

    15

    16

static void PrepareHeader(WAVEHDR *hdr)

    17

{

    18

	hdr->dwBufferLength = _bufsize * 4;

    19

	hdr->dwFlags = 0;

    20

	hdr->lpData = malloc(_bufsize * 4);

    21

	if (hdr->lpData == NULL ||

    22

			waveOutPrepareHeader(_waveout, hdr, sizeof(WAVEHDR)) != MMSYSERR_NOERROR)

    23

		error("waveOutPrepareHeader failed");

    24

}

    25

    26

static void FillHeaders(void)

    27

{

    28

	WAVEHDR *hdr;

    29

    30

	for (hdr = _wave_hdr; hdr != endof(_wave_hdr); hdr++) {

    31

		if (!(hdr->dwFlags & WHDR_INQUEUE)) {

    32

			MxMixSamples(hdr->lpData, hdr->dwBufferLength / 4);

    33

			if (waveOutWrite(_waveout, hdr, sizeof(WAVEHDR)) != MMSYSERR_NOERROR)

    34

				error("waveOutWrite failed");

    35

		}

    36

	}

    37

}

    38

    39

static void CALLBACK waveOutProc(HWAVEOUT hwo, UINT uMsg, DWORD_PTR dwInstance,

    40

	DWORD dwParam1, DWORD dwParam2)

    41

{

    42

	switch (uMsg) {

    43

		case WOM_DONE:

    44

			if (_waveout) FillHeaders();

    45

			break;

    46

    47

		default:

    48

			break;

    49

	}

    50

}

    51

    52

static const char *Win32SoundStart(const char* const* parm)

    53

{

    54

	WAVEFORMATEX wfex;

    55

	int hz;

    56

    57

	_bufsize = GetDriverParamInt(parm, "bufsize", 1024);

    58

	hz = GetDriverParamInt(parm, "hz", 11025);

    59

	wfex.wFormatTag = WAVE_FORMAT_PCM;

    60

	wfex.nChannels = 2;

    61

	wfex.nSamplesPerSec = hz;

    62

	wfex.nAvgBytesPerSec = hz * 2 * 2;

    63

	wfex.nBlockAlign = 4;

    64

	wfex.wBitsPerSample = 16;

    65

	if (waveOutOpen(&_waveout, WAVE_MAPPER, &wfex, (DWORD_PTR)&waveOutProc, 0, CALLBACK_FUNCTION) != MMSYSERR_NOERROR)

    66

		return "waveOutOpen failed";

    67

	PrepareHeader(&_wave_hdr[0]);

    68

	PrepareHeader(&_wave_hdr[1]);

    69

	FillHeaders();

    70

	return NULL;

    71

}

    72

    73

static void Win32SoundStop(void)

    74

{

    75

	HWAVEOUT waveout = _waveout;

    76

    77

	_waveout = NULL;

    78

	waveOutReset(waveout);

    79

	waveOutUnprepareHeader(waveout, &_wave_hdr[0], sizeof(WAVEHDR));

    80

	waveOutUnprepareHeader(waveout, &_wave_hdr[1], sizeof(WAVEHDR));

    81

	waveOutClose(waveout);

    82

}

    83

    84

const HalSoundDriver _win32_sound_driver = {

    85

	Win32SoundStart,

    86

	Win32SoundStop,

    87

};