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

	FileEntry* fe;

    31

	uint count;

    32

	uint i;

    33

    34

	FioOpenFile(SOUND_SLOT, filename);

    35

	count = FioReadDword() / 8;

    36

	fe = calloc(sizeof(*fe), count);

    37

    38

	if (fe == NULL) {

    39

		_file_count = 0;

    40

		_files = NULL;

    41

		return;

    42

	}

    43

    44

	_file_count = count;

    45

	_files = fe;

    46

    47

	FioSeekTo(0, SEEK_SET);

    48

    49

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

    50

		fe[i].file_offset = FioReadDword();

    51

		fe[i].file_size = FioReadDword();

    52

	}

    53

    54

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

    55

		char name[255];

    56

    57

		FioSeekTo(fe->file_offset, SEEK_SET);

    58

    59

		// Check for special case, see else case

    60

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

    61

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

    62

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

    63

    64

			// Read riff tags

    65

			for (;;) {

    66

				uint32 tag = FioReadDword();

    67

				uint32 size = FioReadDword();

    68

    69

				if (tag == ' tmf') {

    70

					FioReadWord(); // wFormatTag

    71

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

    72

					FioReadDword();   // samples per second

    73

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

    74

					FioReadDword();   // avg bytes per second

    75

					FioReadWord();    // alignment

    76

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

    77

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

    78

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

    79

					fe->file_size = size;

    80

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

    81

					break;

    82

				} else {

    83

					fe->file_size = 0;

    84

					break;

    85

				}

    86

			}

    87

		} else {

    88

			/*

    89

			 * Special case for the jackhammer sound

    90

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

    91

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

    92

			 */

    93

			fe->channels = 1;

    94

			fe->rate = 11025;

    95

			fe->bits_per_sample = 8;

    96

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

    97

		}

    98

	}

    99

}

   100

   101

static bool SetBankSource(MixerChannel *mc, uint bank)

   102

{

   103

	FileEntry* fe;

   104

	int8* mem;

   105

	uint i;

   106

   107

	if (bank >= _file_count) return false;

   108

	fe = &_files[bank];

   109

   110

	if (fe->file_size == 0) return false;

   111

   112

	mem = malloc(fe->file_size);

   113

	if (mem == NULL) return false;

   114

   115

	FioSeekToFile(fe->file_offset);

   116

	FioReadBlock(mem, fe->file_size);

   117

   118

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

   119

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

   120

   121

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

   122

   123

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

   124

   125

	return true;

   126

}

   127

   128

bool SoundInitialize(const char *filename)

   129

{

   130

	OpenBankFile(filename);

   131

	return true;

   132

}

   133

   134

// Low level sound player

   135

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

   136

{

   137

	MixerChannel* mc;

   138

   139

	if (volume == 0) return;

   140

	mc = MxAllocateChannel(_mixer);

   141

	if (mc == NULL) return;

   142

	if (!SetBankSource(mc, sound)) return;

   143

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

   144

	MxActivateChannel(mc);

   145

}

   146

   147

   148

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

   149

   150

static const byte _sound_base_vol[] = {

   151

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

   152

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

   153

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

   154

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

   155

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

   156

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

   157

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

   158

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

   159

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

   160

	 90,

   161

};

   162

   163

static const byte _sound_idx[] = {

   164

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

   165

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

   166

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

   167

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

   168

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

   169

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

   170

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

   171

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

   172

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

   173

	72,

   174

};

   175

   176

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

   177

{

   178

	const Window* w;

   179

   180

	if (msf.effect_vol == 0) return;

   181

   182

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

   183

		const ViewPort* vp = w->viewport;

   184

   185

		if (vp != NULL &&

   186

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

   187

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

   188

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

   189

   190

			StartSound(

   191

				_sound_idx[sound],

   192

				clamp(left / 71, 0, 8),

   193

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

   194

			);

   195

			return;

   196

		}

   197

	}

   198

   199

}

   200

   201

void SndPlayTileFx(SoundFx sound, TileIndex tile)

   202

{

   203

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

   204

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

   205

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

   206

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

   207

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

   208

}

   209

   210

void SndPlayVehicleFx(SoundFx sound, const Vehicle *v)

   211

{

   212

	SndPlayScreenCoordFx(sound,

   213

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

   214

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

   215

	);

   216

}

   217

   218

void SndPlayFx(SoundFx sound)

   219

{

   220

	StartSound(

   221

		_sound_idx[sound],

   222

		4,

   223

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

   224

	);

   225

}