File: imc2wav.cpp

package info (click to toggle)
scummvm-tools 2.9.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 6,940 kB
  • sloc: cpp: 76,819; python: 6,550; sh: 4,661; perl: 1,530; ansic: 646; makefile: 360
file content (83 lines) | stat: -rw-r--r-- 2,537 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
/* ScummVM Tools
 *
 * ScummVM Tools is the legal property of its developers, whose names
 * are too numerous to list here. Please refer to the COPYRIGHT
 * file distributed with this source distribution.
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 *
 */

#include <cstdio>
#include <cstring>

int get_be_uint32(char *pos) {
	unsigned char *ucpos = reinterpret_cast<unsigned char *>(pos);
	return (ucpos[0] << 24) | (ucpos[1] << 16) | (ucpos[2] << 8) | ucpos[3];
}

void write_le_uint32(unsigned val) {
	putc(val, stdout);
	putc(val >> 8, stdout);
	putc(val >> 16, stdout);
	putc(val >> 24, stdout);
}

void write_le_uint16(unsigned short val) {
	putc(val, stdout);
	putc(val >> 8, stdout);
}

int main() {
	char block[1024];
	fread(block, 8, 1, stdin);  // skip iMUS header
	fread(block, 8, 1, stdin);  // read MAP header
	int mapSize = get_be_uint32(block + 4);
	int numBits = 16, rate = 22050, channels = 2;
	for (int mapPos = 0; mapPos < mapSize;) {
		fread(block, 8, 1, stdin);
		int blockSize = get_be_uint32(block + 4);
		if (memcmp(block, "FRMT", 4) == 0) {
			fread(block, blockSize, 1, stdin);
			numBits = get_be_uint32(block + 8);
			rate = get_be_uint32(block + 12);
			channels = get_be_uint32(block + 16);
		} else {
			fread(block, blockSize, 1, stdin);
		}
		mapPos += (blockSize + 8);
	}
	fread(block, 8, 1, stdin);
	int dataSize = get_be_uint32(block + 4);
	fputs("RIFF", stdout);
	write_le_uint32(dataSize + 36);
	fputs("WAVEfmt ", stdout);
	write_le_uint32(16);
	write_le_uint16(1);
	write_le_uint16(channels);
	write_le_uint32(rate);
	write_le_uint32(channels * rate * (numBits / 8));
	write_le_uint16(channels * (numBits / 8));
	write_le_uint16(numBits);
	fputs("data", stdout);
	write_le_uint32(dataSize);
	while (dataSize > 1024) {
		fread(block, 1024, 1, stdin);
		fwrite(block, 1024, 1, stdout);
		dataSize -= 1024;
	}
	fread(block, dataSize, 1, stdin);
	fwrite(block, dataSize, 1, stdout);
	return 0;
}