1

#include "stdafx.h"

     2

#include "ttd.h"

     3

#include "map.h"

     4

#include "mixer.h"

     5

#include "sound.h"

     6

#include "vehicle.h"

     7

#include "window.h"

     8

#include "viewport.h"

     9

#include "fileio.h"

    10

    11

typedef struct FileEntry {

    12

	uint32 file_offset;

    13

	uint32 file_size;

    14

	uint16 rate;

    15

	uint8 bits_per_sample;

    16

	uint8 channels;

    17

} FileEntry;

    18

    19

static uint _file_count;

    20

static FileEntry* _files;

    21

    22

#define SOUND_SLOT 31

    23

    24

    25

static void OpenBankFile(const char *filename)

    26

{

    27

	uint count, i;

    28

	uint32 size, tag;

    29

	FileEntry *fe;

    30

    31

	FioOpenFile(SOUND_SLOT, filename);

    32

	_file_count = count = FioReadDword() >> 3;

    33

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

    34

    35

	FioSeekTo(0, SEEK_SET);

    36

    37

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

    38

		fe[i].file_offset = FioReadDword();

    39

		fe[i].file_size = FioReadDword();

    40

	}

    41

    42

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

    43

		char name[255];

    44

    45

		FioSeekTo(fe->file_offset, SEEK_SET);

    46

    47

		// Check for special case, see else case

    48

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

    49

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

    50

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

    51

    52

			// Read riff tags

    53

			for (;;) {

    54

				tag = FioReadDword();

    55

				size = FioReadDword();

    56

    57

				if (tag == ' tmf') {

    58

					FioReadWord(); // wFormatTag

    59

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

    60

					FioReadDword();   // samples per second

    61

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

    62

					FioReadDword();   // avg bytes per second

    63

					FioReadWord();    // alignment

    64

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

    65

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

    66

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

    67

					fe->file_size = size;

    68

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

    69

					break;

    70

				} else {

    71

					fe->file_size = 0;

    72

					break;

    73

				}

    74

			}

    75

		} else {

    76

			/*

    77

			 * Special case for the jackhammer sound

    78

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

    79

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

    80

			 */

    81

			fe->channels = 1;

    82

			fe->rate = 11025;

    83

			fe->bits_per_sample = 8;

    84

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

    85

		}

    86

	}

    87

}

    88

    89

static bool SetBankSource(MixerChannel *mc, uint bank)

    90

{

    91

	FileEntry *fe = &_files[bank];

    92

	int8 *mem;

    93

	uint i;

    94

    95

	if (fe->file_size == 0)

    96

		return false;

    97

    98

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

    99

	FioSeekToFile(fe->file_offset);

   100

	FioReadBlock(mem, fe->file_size);

   101

   102

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

   103

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

   104

   105

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

   106

   107

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

   108

   109

	return true;

   110

}

   111

   112

bool SoundInitialize(const char *filename)

   113

{

   114

	OpenBankFile(filename);

   115

	return true;

   116

}

   117

   118

// Low level sound player

   119

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

   120

{

   121

	if (volume != 0) {

   122

		MixerChannel *mc = MxAllocateChannel(_mixer);

   123

		if (mc == NULL)

   124

			return;

   125

		if (SetBankSource(mc, sound)) {

   126

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

   127

			MxActivateChannel(mc);

   128

		}

   129

	}

   130

}

   131

   132

   133

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

   134

   135

static const byte _sound_base_vol[] = {

   136

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

   137

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

   138

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

   139

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

   140

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

   141

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

   142

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

   143

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

   144

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

   145

	 90,

   146

};

   147

   148

static const byte _sound_idx[] = {

   149

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

   150

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

   151

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

   152

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

   153

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

   154

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

   155

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

   156

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

   157

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

   158

	72,

   159

};

   160

   161

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

   162

{

   163

	Window *w;

   164

	ViewPort *vp;

   165

	int left;

   166

   167

	if (msf.effect_vol == 0)

   168

		return;

   169

   170

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

   171

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

   172

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

   173

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

   174

   175

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

   176

			StartSound(

   177

				_sound_idx[sound],

   178

				clamp(left / 71, 0, 8),

   179

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

   180

			);

   181

			return;

   182

		}

   183

	}

   184

   185

}

   186

   187

void SndPlayTileFx(SoundFx sound, TileIndex tile)

   188

{

   189

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

   190

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

   191

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

   192

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

   193

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

   194

}

   195

   196

void SndPlayVehicleFx(SoundFx sound, const Vehicle *v)

   197

{

   198

	SndPlayScreenCoordFx(sound,

   199

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

   200

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

   201

	);

   202

}

   203

   204

void SndPlayFx(SoundFx sound)

   205

{

   206

	StartSound(

   207

		_sound_idx[sound],

   208

		4,

   209

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

   210

	);

   211

}