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
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
#ifndef LOAD_BNK2_H
#define LOAD_BNK2_H
#include "../progs_cache.h"
inline int stdstoi(const std::string& str)
{
return std::atoi(str.c_str());
}
bool BankFormats::LoadBNK2(BanksDump &db, const char *fn, unsigned bank,
const std::string &bankTitle, const char *prefix,
const std::string &melo_filter,
const std::string &perc_filter)
{
#ifdef HARD_BANKS
writeIni("AdLibGold", fn, prefix, bank, INI_Both, melo_filter.c_str(), perc_filter.c_str());
#endif
FILE *fp = std::fopen(fn, "rb");
if(!fp)
return false;
std::fseek(fp, 0, SEEK_END);
std::vector<unsigned char> data(size_t(std::ftell(fp)));
std::rewind(fp);
if(std::fread(&data[0], 1, data.size(), fp) != data.size())
{
std::fclose(fp);
return false;
}
std::fclose(fp);
size_t bankDb = db.initBank(bank, bankTitle, BanksDump::BankEntry::SETUP_Generic);
BanksDump::MidiBank bnkMelodic;
BanksDump::MidiBank bnkPercussion;
unsigned short ins_entries = *(unsigned short *)&data[28 + 2 + 10];
unsigned char *records = &data[48];
for(unsigned n = 0; n < ins_entries; ++n)
{
const size_t offset1 = n * 28;
int used = records[offset1 + 15];
//int attrib = *(int*)&records[offset1 + 16];
int offset2 = *(int *)&records[offset1 + 20];
if(used == 0) continue;
std::string name;
for(unsigned p = 0; p < 12; ++p)
{
if(records[offset1 + 3 + p] == '\0') break;
name += char(records[offset1 + 3 + p]);
}
int gmno = 0;
int patchId = 0;
bool isPercussion = false;
if(name.substr(0, melo_filter.size()) == melo_filter)
{
gmno = patchId = stdstoi(name.substr(melo_filter.size()));
isPercussion = false;
}
else if(name.substr(0, perc_filter.size()) == perc_filter)
{
patchId = stdstoi(name.substr(perc_filter.size()));
gmno = patchId + 128;
isPercussion = true;
}
else
continue;
BanksDump::MidiBank &bnk = isPercussion ? bnkPercussion : bnkMelodic;
const unsigned char *insdata = &data[size_t(offset2)];
const unsigned char *ops[4] = { insdata + 0, insdata + 6, insdata + 12, insdata + 18 };
unsigned char C4xxxFFFC = insdata[24];
unsigned char xxP24NNN = insdata[25];
unsigned char TTTTTTTT = insdata[26];
//unsigned char xxxxxxxx = insdata[27];
char name2[512];
sprintf(name2, "%s%c%u", prefix, (gmno & 128) ? 'P' : 'M', gmno & 127);
BanksDump::InstrumentEntry inst;
BanksDump::Operator opsD[5];
InstBuffer tmp[2];
for(unsigned a = 0; a < 2; ++a)
{
tmp[a].data[0] = ops[a * 2 + 0][0];
tmp[a].data[1] = ops[a * 2 + 1][0];
tmp[a].data[2] = ops[a * 2 + 0][2];
tmp[a].data[3] = ops[a * 2 + 1][2];
tmp[a].data[4] = ops[a * 2 + 0][3];
tmp[a].data[5] = ops[a * 2 + 1][3];
tmp[a].data[6] = ops[a * 2 + 0][4] & 0x07;
tmp[a].data[7] = ops[a * 2 + 1][4] & 0x07;
tmp[a].data[8] = ops[a * 2 + 0][1];
tmp[a].data[9] = ops[a * 2 + 1][1];
db.toOps(tmp[a].d, opsD, a * 2);
}
tmp[0].data[10] = C4xxxFFFC & 0x0F;
tmp[1].data[10] = (tmp[0].data[10] & 0x0E) | (C4xxxFFFC >> 7);
inst.setFbConn(C4xxxFFFC & 0x0F, (tmp[0].data[10] & 0x0E) | (C4xxxFFFC >> 7));
inst.noteOffset1 = (int8_t)TTTTTTTT;
inst.percussionKeyNumber = (gmno & 128) ? 35 : 0;
if(xxP24NNN & 8)
{
// dual-op
inst.instFlags |= BanksDump::InstrumentEntry::WOPL_Ins_4op;
db.addInstrument(bnk, patchId, inst, opsD, fn);
}
else
{
// single-op
db.addInstrument(bnk, patchId, inst, opsD, fn);
}
}
db.addMidiBank(bankDb, false, bnkMelodic);
db.addMidiBank(bankDb, true, bnkPercussion);
return true;
}
#endif // LOAD_BNK2_H
|