1

/* $Id$ */

     2

     3

#include "../stdafx.h"

     4

#include "../openttd.h"

     5

#include "../driver.h"

     6

#include "../mixer.h"

     7

#include "../core/alloc_func.hpp"

     8

#include "win32_s.h"

     9

#include <windows.h>

    10

#include <mmsystem.h>

    11

    12

static FSoundDriver_Win32 iFSoundDriver_Win32;

    13

    14

static HWAVEOUT _waveout;

    15

static WAVEHDR _wave_hdr[2];

    16

static int _bufsize;

    17

    18

static void PrepareHeader(WAVEHDR *hdr)

    19

{

    20

	hdr->dwBufferLength = _bufsize * 4;

    21

	hdr->dwFlags = 0;

    22

	hdr->lpData = MallocT<char>(_bufsize * 4);

    23

	if (hdr->lpData == NULL ||

    24

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

    25

		error("waveOutPrepareHeader failed");

    26

}

    27

    28

static void FillHeaders()

    29

{

    30

	WAVEHDR *hdr;

    31

    32

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

    33

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

    34

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

    35

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

    36

				error("waveOutWrite failed");

    37

		}

    38

	}

    39

}

    40

    41

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

    42

	DWORD dwParam1, DWORD dwParam2)

    43

{

    44

	switch (uMsg) {

    45

		case WOM_DONE:

    46

			if (_waveout != NULL) FillHeaders();

    47

			break;

    48

		default: break;

    49

	}

    50

}

    51

    52

const char *SoundDriver_Win32::Start(const char* const* parm)

    53

{

    54

	WAVEFORMATEX wfex;

    55

	wfex.wFormatTag = WAVE_FORMAT_PCM;

    56

	wfex.nChannels = 2;

    57

	wfex.wBitsPerSample = 16;

    58

	wfex.nSamplesPerSec = GetDriverParamInt(parm, "hz", 11025);

    59

	wfex.nBlockAlign = (wfex.nChannels * wfex.wBitsPerSample) / 8;

    60

	wfex.nAvgBytesPerSec = wfex.nSamplesPerSec * wfex.nBlockAlign;

    61

    62

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

    63

    64

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

    65

		return "waveOutOpen failed";

    66

    67

	PrepareHeader(&_wave_hdr[0]);

    68

	PrepareHeader(&_wave_hdr[1]);

    69

	FillHeaders();

    70

	return NULL;

    71

}

    72

    73

void SoundDriver_Win32::Stop()

    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

}