278 |
|
|
279 |
|
|
280 |
|
|
281 |
|
// *************** CRC *************** |
282 |
|
// * |
283 |
|
|
284 |
|
const uint32_t* CRC::table(initTable()); |
285 |
|
|
286 |
|
uint32_t* CRC::initTable() { |
287 |
|
uint32_t* res = new uint32_t[256]; |
288 |
|
|
289 |
|
for (int i = 0 ; i < 256 ; i++) { |
290 |
|
uint32_t c = i; |
291 |
|
for (int j = 0 ; j < 8 ; j++) { |
292 |
|
c = (c & 1) ? 0xedb88320 ^ (c >> 1) : c >> 1; |
293 |
|
} |
294 |
|
res[i] = c; |
295 |
|
} |
296 |
|
return res; |
297 |
|
} |
298 |
|
|
299 |
|
|
300 |
|
|
301 |
// *************** Sample *************** |
// *************** Sample *************** |
302 |
// * |
// * |
303 |
|
|
1160 |
*/ |
*/ |
1161 |
unsigned long Sample::Write(void* pBuffer, unsigned long SampleCount) { |
unsigned long Sample::Write(void* pBuffer, unsigned long SampleCount) { |
1162 |
if (Compressed) throw gig::Exception("There is no support for writing compressed gig samples (yet)"); |
if (Compressed) throw gig::Exception("There is no support for writing compressed gig samples (yet)"); |
1163 |
return DLS::Sample::Write(pBuffer, SampleCount); |
if (pCkData->GetPos() == 0) { |
1164 |
|
crc.reset(); |
1165 |
|
} |
1166 |
|
unsigned long res = DLS::Sample::Write(pBuffer, SampleCount); |
1167 |
|
crc.update((unsigned char *)pBuffer, SampleCount * FrameSize); |
1168 |
|
|
1169 |
|
if (pCkData->GetPos() == pCkData->GetSize()) { |
1170 |
|
File* pFile = static_cast<File*>(GetParent()); |
1171 |
|
pFile->SetSampleChecksum(this, crc.getValue()); |
1172 |
|
} |
1173 |
|
return res; |
1174 |
} |
} |
1175 |
|
|
1176 |
/** |
/** |
2163 |
for (int i = 0; i < dimensionBits; i++) { |
for (int i = 0; i < dimensionBits; i++) { |
2164 |
dimension_t dimension = static_cast<dimension_t>(_3lnk->ReadUint8()); |
dimension_t dimension = static_cast<dimension_t>(_3lnk->ReadUint8()); |
2165 |
uint8_t bits = _3lnk->ReadUint8(); |
uint8_t bits = _3lnk->ReadUint8(); |
2166 |
_3lnk->ReadUint8(); // probably the position of the dimension |
_3lnk->ReadUint8(); // bit position of the dimension (bits[0] + bits[1] + ... + bits[i-1]) |
2167 |
_3lnk->ReadUint8(); // unknown |
_3lnk->ReadUint8(); // (1 << bit position of next dimension) - (1 << bit position of this dimension) |
2168 |
uint8_t zones = _3lnk->ReadUint8(); // new for v3: number of zones doesn't have to be == pow(2,bits) |
uint8_t zones = _3lnk->ReadUint8(); // new for v3: number of zones doesn't have to be == pow(2,bits) |
2169 |
if (dimension == dimension_none) { // inactive dimension |
if (dimension == dimension_none) { // inactive dimension |
2170 |
pDimensionDefinitions[i].dimension = dimension_none; |
pDimensionDefinitions[i].dimension = dimension_none; |
2257 |
const int _3lnkChunkSize = (pFile->pVersion && pFile->pVersion->major == 3) ? 1092 : 172; |
const int _3lnkChunkSize = (pFile->pVersion && pFile->pVersion->major == 3) ? 1092 : 172; |
2258 |
_3lnk = pCkRegion->AddSubChunk(CHUNK_ID_3LNK, _3lnkChunkSize); |
_3lnk = pCkRegion->AddSubChunk(CHUNK_ID_3LNK, _3lnkChunkSize); |
2259 |
memset(_3lnk->LoadChunkData(), 0, _3lnkChunkSize); |
memset(_3lnk->LoadChunkData(), 0, _3lnkChunkSize); |
2260 |
|
|
2261 |
|
// move 3prg to last position |
2262 |
|
pCkRegion->MoveSubChunk(pCkRegion->GetSubList(LIST_TYPE_3PRG), 0); |
2263 |
} |
} |
2264 |
|
|
2265 |
// update dimension definitions in '3lnk' chunk |
// update dimension definitions in '3lnk' chunk |
2266 |
uint8_t* pData = (uint8_t*) _3lnk->LoadChunkData(); |
uint8_t* pData = (uint8_t*) _3lnk->LoadChunkData(); |
2267 |
store32(&pData[0], DimensionRegions); |
store32(&pData[0], DimensionRegions); |
2268 |
|
int shift = 0; |
2269 |
for (int i = 0; i < iMaxDimensions; i++) { |
for (int i = 0; i < iMaxDimensions; i++) { |
2270 |
pData[4 + i * 8] = (uint8_t) pDimensionDefinitions[i].dimension; |
pData[4 + i * 8] = (uint8_t) pDimensionDefinitions[i].dimension; |
2271 |
pData[5 + i * 8] = pDimensionDefinitions[i].bits; |
pData[5 + i * 8] = pDimensionDefinitions[i].bits; |
2272 |
// next 2 bytes unknown |
pData[6 + i * 8] = shift; |
2273 |
|
pData[7 + i * 8] = (1 << (shift + pDimensionDefinitions[i].bits)) - (1 << shift); |
2274 |
pData[8 + i * 8] = pDimensionDefinitions[i].zones; |
pData[8 + i * 8] = pDimensionDefinitions[i].zones; |
2275 |
// next 3 bytes unknown |
// next 3 bytes unknown, always zero? |
2276 |
|
|
2277 |
|
shift += pDimensionDefinitions[i].bits; |
2278 |
} |
} |
2279 |
|
|
2280 |
// update wave pool table in '3lnk' chunk |
// update wave pool table in '3lnk' chunk |
2430 |
// create new dimension region(s) for this new dimension |
// create new dimension region(s) for this new dimension |
2431 |
for (int i = 1 << iCurrentBits; i < 1 << iNewBits; i++) { |
for (int i = 1 << iCurrentBits; i < 1 << iNewBits; i++) { |
2432 |
//TODO: maybe we should copy existing dimension regions if possible instead of simply creating new ones with default values |
//TODO: maybe we should copy existing dimension regions if possible instead of simply creating new ones with default values |
2433 |
RIFF::List* pNewDimRgnListChunk = pCkRegion->AddSubList(LIST_TYPE_3EWL); |
RIFF::List* _3prg = pCkRegion->GetSubList(LIST_TYPE_3PRG); |
2434 |
|
RIFF::List* pNewDimRgnListChunk = _3prg->AddSubList(LIST_TYPE_3EWL); |
2435 |
pDimensionRegions[i] = new DimensionRegion(pNewDimRgnListChunk); |
pDimensionRegions[i] = new DimensionRegion(pNewDimRgnListChunk); |
2436 |
DimensionRegions++; |
DimensionRegions++; |
2437 |
} |
} |
2847 |
void Group::UpdateChunks() { |
void Group::UpdateChunks() { |
2848 |
// make sure <3gri> and <3gnl> list chunks exist |
// make sure <3gri> and <3gnl> list chunks exist |
2849 |
RIFF::List* _3gri = pFile->pRIFF->GetSubList(LIST_TYPE_3GRI); |
RIFF::List* _3gri = pFile->pRIFF->GetSubList(LIST_TYPE_3GRI); |
2850 |
if (!_3gri) _3gri = pFile->pRIFF->AddSubList(LIST_TYPE_3GRI); |
if (!_3gri) { |
2851 |
|
_3gri = pFile->pRIFF->AddSubList(LIST_TYPE_3GRI); |
2852 |
|
pFile->pRIFF->MoveSubChunk(_3gri, pFile->pRIFF->GetSubChunk(CHUNK_ID_PTBL)); |
2853 |
|
} |
2854 |
RIFF::List* _3gnl = _3gri->GetSubList(LIST_TYPE_3GNL); |
RIFF::List* _3gnl = _3gri->GetSubList(LIST_TYPE_3GNL); |
2855 |
if (!_3gnl) _3gnl = _3gri->AddSubList(LIST_TYPE_3GNL); |
if (!_3gnl) _3gnl = _3gri->AddSubList(LIST_TYPE_3GNL); |
2856 |
// now store the name of this group as <3gnm> chunk as subchunk of the <3gnl> list chunk |
// now store the name of this group as <3gnm> chunk as subchunk of the <3gnl> list chunk |
2928 |
// *************** File *************** |
// *************** File *************** |
2929 |
// * |
// * |
2930 |
|
|
2931 |
|
// File version 2.0, 1998-06-28 |
2932 |
|
const DLS::version_t File::VERSION_2 = { |
2933 |
|
0, 2, 19980628 & 0xffff, 19980628 >> 16 |
2934 |
|
}; |
2935 |
|
|
2936 |
|
// File version 3.0, 2003-03-31 |
2937 |
|
const DLS::version_t File::VERSION_3 = { |
2938 |
|
0, 3, 20030331 & 0xffff, 20030331 >> 16 |
2939 |
|
}; |
2940 |
|
|
2941 |
const DLS::Info::FixedStringLength File::FixedStringLengths[] = { |
const DLS::Info::FixedStringLength File::FixedStringLengths[] = { |
2942 |
{ CHUNK_ID_IARL, 256 }, |
{ CHUNK_ID_IARL, 256 }, |
2943 |
{ CHUNK_ID_IART, 128 }, |
{ CHUNK_ID_IART, 128 }, |
2963 |
pGroups = NULL; |
pGroups = NULL; |
2964 |
pInfo->FixedStringLengths = FixedStringLengths; |
pInfo->FixedStringLengths = FixedStringLengths; |
2965 |
pInfo->ArchivalLocation = String(256, ' '); |
pInfo->ArchivalLocation = String(256, ' '); |
2966 |
|
|
2967 |
|
// add some mandatory chunks to get the file chunks in right |
2968 |
|
// order (INFO chunk will be moved to first position later) |
2969 |
|
pRIFF->AddSubChunk(CHUNK_ID_VERS, 8); |
2970 |
|
pRIFF->AddSubChunk(CHUNK_ID_COLH, 4); |
2971 |
} |
} |
2972 |
|
|
2973 |
File::File(RIFF::File* pRIFF) : DLS::File(pRIFF) { |
File::File(RIFF::File* pRIFF) : DLS::File(pRIFF) { |
3014 |
// create new Sample object and its respective 'wave' list chunk |
// create new Sample object and its respective 'wave' list chunk |
3015 |
RIFF::List* wave = wvpl->AddSubList(LIST_TYPE_WAVE); |
RIFF::List* wave = wvpl->AddSubList(LIST_TYPE_WAVE); |
3016 |
Sample* pSample = new Sample(this, wave, 0 /*arbitrary value, we update offsets when we save*/); |
Sample* pSample = new Sample(this, wave, 0 /*arbitrary value, we update offsets when we save*/); |
3017 |
|
|
3018 |
|
// add mandatory chunks to get the chunks in right order |
3019 |
|
wave->AddSubChunk(CHUNK_ID_FMT, 16); |
3020 |
|
wave->AddSubList(LIST_TYPE_INFO); |
3021 |
|
|
3022 |
pSamples->push_back(pSample); |
pSamples->push_back(pSample); |
3023 |
return pSample; |
return pSample; |
3024 |
} |
} |
3161 |
__ensureMandatoryChunksExist(); |
__ensureMandatoryChunksExist(); |
3162 |
RIFF::List* lstInstruments = pRIFF->GetSubList(LIST_TYPE_LINS); |
RIFF::List* lstInstruments = pRIFF->GetSubList(LIST_TYPE_LINS); |
3163 |
RIFF::List* lstInstr = lstInstruments->AddSubList(LIST_TYPE_INS); |
RIFF::List* lstInstr = lstInstruments->AddSubList(LIST_TYPE_INS); |
3164 |
|
|
3165 |
|
// add mandatory chunks to get the chunks in right order |
3166 |
|
lstInstr->AddSubList(LIST_TYPE_INFO); |
3167 |
|
|
3168 |
Instrument* pInstrument = new Instrument(this, lstInstr); |
Instrument* pInstrument = new Instrument(this, lstInstr); |
3169 |
|
|
3170 |
|
lstInstr->AddSubChunk(CHUNK_ID_INSH, 12); |
3171 |
|
|
3172 |
// this string is needed for the gig to be loadable in GSt: |
// this string is needed for the gig to be loadable in GSt: |
3173 |
pInstrument->pInfo->Software = "Endless Wave"; |
pInstrument->pInfo->Software = "Endless Wave"; |
3174 |
|
|
3222 |
} |
} |
3223 |
} |
} |
3224 |
|
|
3225 |
|
void File::SetSampleChecksum(Sample* pSample, uint32_t crc) { |
3226 |
|
RIFF::Chunk* _3crc = pRIFF->GetSubChunk(CHUNK_ID_3CRC); |
3227 |
|
if (!_3crc) return; |
3228 |
|
int iWaveIndex = -1; |
3229 |
|
File::SampleList::iterator iter = pSamples->begin(); |
3230 |
|
File::SampleList::iterator end = pSamples->end(); |
3231 |
|
for (int index = 0; iter != end; ++iter, ++index) { |
3232 |
|
if (*iter == pSample) { |
3233 |
|
iWaveIndex = index; |
3234 |
|
break; |
3235 |
|
} |
3236 |
|
} |
3237 |
|
if (iWaveIndex < 0) throw gig::Exception("Could not update crc, could not find sample"); |
3238 |
|
|
3239 |
|
_3crc->SetPos(iWaveIndex * 8); |
3240 |
|
uint32_t tmp = 1; |
3241 |
|
_3crc->WriteUint32(&tmp); // unknown, always 1? |
3242 |
|
_3crc->WriteUint32(&crc); |
3243 |
|
} |
3244 |
|
|
3245 |
Group* File::GetFirstGroup() { |
Group* File::GetFirstGroup() { |
3246 |
if (!pGroups) LoadGroups(); |
if (!pGroups) LoadGroups(); |
3247 |
// there must always be at least one group |
// there must always be at least one group |
3359 |
* @throws Exception - on errors |
* @throws Exception - on errors |
3360 |
*/ |
*/ |
3361 |
void File::UpdateChunks() { |
void File::UpdateChunks() { |
3362 |
|
bool newFile = pRIFF->GetSubList(LIST_TYPE_INFO) == NULL; |
3363 |
|
|
3364 |
// first update base class's chunks |
// first update base class's chunks |
3365 |
DLS::File::UpdateChunks(); |
DLS::File::UpdateChunks(); |
3366 |
|
|
3367 |
|
if (newFile) { |
3368 |
|
// INFO was added by Resource::UpdateChunks - make sure it |
3369 |
|
// is placed first in file |
3370 |
|
RIFF::Chunk* info = pRIFF->GetSubList(LIST_TYPE_INFO); |
3371 |
|
RIFF::Chunk* first = pRIFF->GetFirstSubChunk(); |
3372 |
|
if (first != info) { |
3373 |
|
pRIFF->MoveSubChunk(info, first); |
3374 |
|
} |
3375 |
|
} |
3376 |
|
|
3377 |
// update group's chunks |
// update group's chunks |
3378 |
if (pGroups) { |
if (pGroups) { |
3379 |
std::list<Group*>::iterator iter = pGroups->begin(); |
std::list<Group*>::iterator iter = pGroups->begin(); |
3382 |
(*iter)->UpdateChunks(); |
(*iter)->UpdateChunks(); |
3383 |
} |
} |
3384 |
} |
} |
3385 |
|
|
3386 |
|
// update einf chunk |
3387 |
|
|
3388 |
|
// The einf chunk contains statistics about the gig file, such |
3389 |
|
// as the number of regions and samples used by each |
3390 |
|
// instrument. It is divided in equally sized parts, where the |
3391 |
|
// first part contains information about the whole gig file, |
3392 |
|
// and the rest of the parts map to each instrument in the |
3393 |
|
// file. |
3394 |
|
// |
3395 |
|
// At the end of each part there is a bit map of each sample |
3396 |
|
// in the file, where a set bit means that the sample is used |
3397 |
|
// by the file/instrument. |
3398 |
|
// |
3399 |
|
// Note that there are several fields with unknown use. These |
3400 |
|
// are set to zero. |
3401 |
|
|
3402 |
|
int sublen = pSamples->size() / 8 + 49; |
3403 |
|
int einfSize = (Instruments + 1) * sublen; |
3404 |
|
|
3405 |
|
RIFF::Chunk* einf = pRIFF->GetSubChunk(CHUNK_ID_EINF); |
3406 |
|
if (einf) { |
3407 |
|
if (einf->GetSize() != einfSize) { |
3408 |
|
einf->Resize(einfSize); |
3409 |
|
memset(einf->LoadChunkData(), 0, einfSize); |
3410 |
|
} |
3411 |
|
} else if (newFile) { |
3412 |
|
einf = pRIFF->AddSubChunk(CHUNK_ID_EINF, einfSize); |
3413 |
|
} |
3414 |
|
if (einf) { |
3415 |
|
uint8_t* pData = (uint8_t*) einf->LoadChunkData(); |
3416 |
|
|
3417 |
|
std::map<gig::Sample*,int> sampleMap; |
3418 |
|
int sampleIdx = 0; |
3419 |
|
for (Sample* pSample = GetFirstSample(); pSample; pSample = GetNextSample()) { |
3420 |
|
sampleMap[pSample] = sampleIdx++; |
3421 |
|
} |
3422 |
|
|
3423 |
|
int totnbusedsamples = 0; |
3424 |
|
int totnbusedchannels = 0; |
3425 |
|
int totnbregions = 0; |
3426 |
|
int totnbdimregions = 0; |
3427 |
|
int instrumentIdx = 0; |
3428 |
|
|
3429 |
|
memset(&pData[48], 0, sublen - 48); |
3430 |
|
|
3431 |
|
for (Instrument* instrument = GetFirstInstrument() ; instrument ; |
3432 |
|
instrument = GetNextInstrument()) { |
3433 |
|
int nbusedsamples = 0; |
3434 |
|
int nbusedchannels = 0; |
3435 |
|
int nbdimregions = 0; |
3436 |
|
|
3437 |
|
memset(&pData[(instrumentIdx + 1) * sublen + 48], 0, sublen - 48); |
3438 |
|
|
3439 |
|
for (Region* region = instrument->GetFirstRegion() ; region ; |
3440 |
|
region = instrument->GetNextRegion()) { |
3441 |
|
for (int i = 0 ; i < region->DimensionRegions ; i++) { |
3442 |
|
gig::DimensionRegion *d = region->pDimensionRegions[i]; |
3443 |
|
if (d->pSample) { |
3444 |
|
int sampleIdx = sampleMap[d->pSample]; |
3445 |
|
int byte = 48 + sampleIdx / 8; |
3446 |
|
int bit = 1 << (sampleIdx & 7); |
3447 |
|
if ((pData[(instrumentIdx + 1) * sublen + byte] & bit) == 0) { |
3448 |
|
pData[(instrumentIdx + 1) * sublen + byte] |= bit; |
3449 |
|
nbusedsamples++; |
3450 |
|
nbusedchannels += d->pSample->Channels; |
3451 |
|
|
3452 |
|
if ((pData[byte] & bit) == 0) { |
3453 |
|
pData[byte] |= bit; |
3454 |
|
totnbusedsamples++; |
3455 |
|
totnbusedchannels += d->pSample->Channels; |
3456 |
|
} |
3457 |
|
} |
3458 |
|
} |
3459 |
|
} |
3460 |
|
nbdimregions += region->DimensionRegions; |
3461 |
|
} |
3462 |
|
// first 4 bytes unknown - sometimes 0, sometimes length of einf part |
3463 |
|
// store32(&pData[(instrumentIdx + 1) * sublen], sublen); |
3464 |
|
store32(&pData[(instrumentIdx + 1) * sublen + 4], nbusedchannels); |
3465 |
|
store32(&pData[(instrumentIdx + 1) * sublen + 8], nbusedsamples); |
3466 |
|
store32(&pData[(instrumentIdx + 1) * sublen + 12], 1); |
3467 |
|
store32(&pData[(instrumentIdx + 1) * sublen + 16], instrument->Regions); |
3468 |
|
store32(&pData[(instrumentIdx + 1) * sublen + 20], nbdimregions); |
3469 |
|
// next 12 bytes unknown |
3470 |
|
store32(&pData[(instrumentIdx + 1) * sublen + 36], instrumentIdx); |
3471 |
|
store32(&pData[(instrumentIdx + 1) * sublen + 40], pSamples->size()); |
3472 |
|
// next 4 bytes unknown |
3473 |
|
|
3474 |
|
totnbregions += instrument->Regions; |
3475 |
|
totnbdimregions += nbdimregions; |
3476 |
|
instrumentIdx++; |
3477 |
|
} |
3478 |
|
// first 4 bytes unknown - sometimes 0, sometimes length of einf part |
3479 |
|
// store32(&pData[0], sublen); |
3480 |
|
store32(&pData[4], totnbusedchannels); |
3481 |
|
store32(&pData[8], totnbusedsamples); |
3482 |
|
store32(&pData[12], Instruments); |
3483 |
|
store32(&pData[16], totnbregions); |
3484 |
|
store32(&pData[20], totnbdimregions); |
3485 |
|
// next 12 bytes unknown |
3486 |
|
// next 4 bytes unknown, always 0? |
3487 |
|
store32(&pData[40], pSamples->size()); |
3488 |
|
// next 4 bytes unknown |
3489 |
|
} |
3490 |
|
|
3491 |
|
// update 3crc chunk |
3492 |
|
|
3493 |
|
// The 3crc chunk contains CRC-32 checksums for the |
3494 |
|
// samples. The actual checksum values will be filled in |
3495 |
|
// later, by Sample::Write. |
3496 |
|
|
3497 |
|
RIFF::Chunk* _3crc = pRIFF->GetSubChunk(CHUNK_ID_3CRC); |
3498 |
|
if (_3crc) { |
3499 |
|
_3crc->Resize(pSamples->size() * 8); |
3500 |
|
} else if (newFile) { |
3501 |
|
_3crc = pRIFF->AddSubChunk(CHUNK_ID_3CRC, pSamples->size() * 8); |
3502 |
|
_3crc->LoadChunkData(); |
3503 |
|
} |
3504 |
} |
} |
3505 |
|
|
3506 |
|
|