1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include "openttd.h"

     5

#include "functions.h"

     6

#include "map.h"

     7

#include "mixer.h"

     8

#include "sound.h"

     9

#include "vehicle.h"

    10

#include "window.h"

    11

#include "viewport.h"

    12

#include "fileio.h"

    13

    14

typedef struct FileEntry {

    15

	uint32 file_offset;

    16

	uint32 file_size;

    17

	uint16 rate;

    18

	uint8 bits_per_sample;

    19

	uint8 channels;

    20

} FileEntry;

    21

    22

static uint _file_count;

    23

static FileEntry* _files;

    24

    25

#define SOUND_SLOT 31

    26

    27

    28

static void OpenBankFile(const char *filename)

    29

{

    30

	uint count, i;

    31

	uint32 size, tag;

    32

	FileEntry *fe;

    33

    34

	FioOpenFile(SOUND_SLOT, filename);

    35

	_file_count = count = FioReadDword() >> 3;

    36

	fe = _files = calloc(sizeof(FileEntry), count);

    37

    38

	FioSeekTo(0, SEEK_SET);

    39

    40

	for (i = 0; i != count; i++) {

    41

		fe[i].file_offset = FioReadDword();

    42

		fe[i].file_size = FioReadDword();

    43

	}

    44

    45

	for (i = 0; i != count; i++, fe++) {

    46

		char name[255];

    47

    48

		FioSeekTo(fe->file_offset, SEEK_SET);

    49

    50

		// Check for special case, see else case

    51

		FioReadBlock(name, FioReadByte()); // Read the name of the sound

    52

		if (strcmp(name, "Corrupt sound") != 0) {

    53

			FioSeekTo(12, SEEK_CUR); // Skip past RIFF header

    54

    55

			// Read riff tags

    56

			for (;;) {

    57

				tag = FioReadDword();

    58

				size = FioReadDword();

    59

    60

				if (tag == ' tmf') {

    61

					FioReadWord(); // wFormatTag

    62

					fe->channels = FioReadWord(); // wChannels

    63

					FioReadDword();   // samples per second

    64

					fe->rate = 11025; // seems like all samples should be played at this rate.

    65

					FioReadDword();   // avg bytes per second

    66

					FioReadWord();    // alignment

    67

					fe->bits_per_sample = FioReadByte(); // bits per sample

    68

					FioSeekTo(size - (2 + 2 + 4 + 4 + 2 + 1), SEEK_CUR);

    69

				} else if (tag == 'atad') {

    70

					fe->file_size = size;

    71

					fe->file_offset = FioGetPos() | (SOUND_SLOT << 24);

    72

					break;

    73

				} else {

    74

					fe->file_size = 0;

    75

					break;

    76

				}

    77

			}

    78

		} else {

    79

			/*

    80

			 * Special case for the jackhammer sound

    81

			 * (name in sample.cat is "Corrupt sound")

    82

			 * It's no RIFF file, but raw PCM data

    83

			 */

    84

			fe->channels = 1;

    85

			fe->rate = 11025;

    86

			fe->bits_per_sample = 8;

    87

			fe->file_offset = FioGetPos() | (SOUND_SLOT << 24);

    88

		}

    89

	}

    90

}

    91

    92

static bool SetBankSource(MixerChannel *mc, uint bank)

    93

{

    94

	FileEntry *fe = &_files[bank];

    95

	int8 *mem;

    96

	uint i;

    97

    98

	if (fe->file_size == 0)

    99

		return false;

   100

   101

	mem = malloc(fe->file_size); /* XXX unchecked malloc */

   102

	FioSeekToFile(fe->file_offset);

   103

	FioReadBlock(mem, fe->file_size);

   104

   105

	for (i = 0; i != fe->file_size; i++)

   106

		mem[i] += -128; // Convert unsigned sound data to signed

   107

   108

	assert(fe->bits_per_sample == 8 && fe->channels == 1 && fe->file_size != 0 && fe->rate != 0);

   109

   110

	MxSetChannelRawSrc(mc, mem, fe->file_size, fe->rate, MX_AUTOFREE);

   111

   112

	return true;

   113

}

   114

   115

bool SoundInitialize(const char *filename)

   116

{

   117

	OpenBankFile(filename);

   118

	return true;

   119

}

   120

   121

// Low level sound player

   122

static void StartSound(uint sound, uint panning, uint volume)

   123

{

   124

	if (volume != 0) {

   125

		MixerChannel *mc = MxAllocateChannel(_mixer);

   126

		if (mc == NULL)

   127

			return;

   128

		if (SetBankSource(mc, sound)) {

   129

			MxSetChannelVolume(mc, volume << 8, volume << 8);

   130

			MxActivateChannel(mc);

   131

		}

   132

	}

   133

}

   134

   135

   136

static const byte _vol_factor_by_zoom[] = {255, 190, 134};

   137

   138

static const byte _sound_base_vol[] = {

   139

	128,  90, 128, 128, 128, 128, 128, 128,

   140

	128,  90,  90, 128, 128, 128, 128, 128,

   141

	128, 128, 128,  80, 128, 128, 128, 128,

   142

	128, 128, 128, 128, 128, 128, 128, 128,

   143

	128, 128,  90,  90,  90, 128,  90, 128,

   144

	128,  90, 128, 128, 128,  90, 128, 128,

   145

	128, 128, 128, 128,  90, 128, 128, 128,

   146

	128,  90, 128, 128, 128, 128, 128, 128,

   147

	128, 128,  90,  90,  90, 128, 128, 128,

   148

	 90,

   149

};

   150

   151

static const byte _sound_idx[] = {

   152

	2, 3, 4, 5, 6, 7, 8, 9,

   153

	10, 11, 12, 13, 14, 15, 16, 17,

   154

	18, 19, 20, 21, 22, 23, 24, 25,

   155

	26, 27, 28, 29, 30, 31, 32, 33,

   156

	34, 35, 36, 37, 38, 39, 40, 0,

   157

	1, 41, 42, 43, 44, 45, 46, 47,

   158

	48, 49, 50, 51, 52, 53, 54, 55,

   159

	56, 57, 58, 59, 60, 61, 62, 63,

   160

	64, 65, 66, 67, 68, 69, 70, 71,

   161

	72,

   162

};

   163

   164

static void SndPlayScreenCoordFx(SoundFx sound, int x, int y)

   165

{

   166

	Window *w;

   167

	ViewPort *vp;

   168

	int left;

   169

   170

	if (msf.effect_vol == 0)

   171

		return;

   172

   173

	for (w = _windows; w != _last_window; w++) {

   174

		if ((vp = w->viewport) != NULL &&

   175

				IS_INSIDE_1D(x, vp->virtual_left, vp->virtual_width) &&

   176

				IS_INSIDE_1D(y, vp->virtual_top, vp->virtual_height)) {

   177

   178

			left = ((x - vp->virtual_left) >> vp->zoom) + vp->left;

   179

			StartSound(

   180

				_sound_idx[sound],

   181

				clamp(left / 71, 0, 8),

   182

				(_sound_base_vol[sound] * msf.effect_vol * _vol_factor_by_zoom[vp->zoom]) >> 15

   183

			);

   184

			return;

   185

		}

   186

	}

   187

   188

}

   189

   190

void SndPlayTileFx(SoundFx sound, TileIndex tile)

   191

{

   192

	/* emits sound from center (+ 8) of the tile */

   193

	int x = TileX(tile) * 16 + 8;

   194

	int y = TileY(tile) * 16 + 8;

   195

	Point pt = RemapCoords(x, y, GetSlopeZ(x, y));

   196

	SndPlayScreenCoordFx(sound, pt.x, pt.y);

   197

}

   198

   199

void SndPlayVehicleFx(SoundFx sound, const Vehicle *v)

   200

{

   201

	SndPlayScreenCoordFx(sound,

   202

		(v->left_coord + v->right_coord) / 2,

   203

		(v->top_coord + v->bottom_coord) / 2

   204

	);

   205

}

   206

   207

void SndPlayFx(SoundFx sound)

   208

{

   209

	StartSound(

   210

		_sound_idx[sound],

   211

		4,

   212

		(_sound_base_vol[sound] * msf.effect_vol) >> 7

   213

	);

   214

}