1152 |
* |
* |
1153 |
* Note: there is currently no support for writing compressed samples. |
* Note: there is currently no support for writing compressed samples. |
1154 |
* |
* |
1155 |
|
* For 16 bit samples, the data in the source buffer should be |
1156 |
|
* int16_t (using native endianness). For 24 bit, the buffer |
1157 |
|
* should contain three bytes per sample, little-endian. |
1158 |
|
* |
1159 |
* @param pBuffer - source buffer |
* @param pBuffer - source buffer |
1160 |
* @param SampleCount - number of sample points to write |
* @param SampleCount - number of sample points to write |
1161 |
* @throws DLS::Exception if current sample size is too small |
* @throws DLS::Exception if current sample size is too small |
1170 |
if (pCkData->GetPos() == 0) { |
if (pCkData->GetPos() == 0) { |
1171 |
crc.reset(); |
crc.reset(); |
1172 |
} |
} |
1173 |
unsigned long res = DLS::Sample::Write(pBuffer, SampleCount); |
if (GetSize() < SampleCount) throw Exception("Could not write sample data, current sample size to small"); |
1174 |
|
unsigned long res; |
1175 |
|
if (BitDepth == 24) { |
1176 |
|
res = pCkData->Write(pBuffer, SampleCount * FrameSize, 1) / FrameSize; |
1177 |
|
} else { // 16 bit |
1178 |
|
res = Channels == 2 ? pCkData->Write(pBuffer, SampleCount << 1, 2) >> 1 |
1179 |
|
: pCkData->Write(pBuffer, SampleCount, 2); |
1180 |
|
} |
1181 |
crc.update((unsigned char *)pBuffer, SampleCount * FrameSize); |
crc.update((unsigned char *)pBuffer, SampleCount * FrameSize); |
1182 |
|
|
1183 |
// if this is the last write, update the checksum chunk in the |
// if this is the last write, update the checksum chunk in the |
1267 |
|
|
1268 |
pSample = NULL; |
pSample = NULL; |
1269 |
|
|
1270 |
memcpy(&Crossfade, &SamplerOptions, 4); |
if (_3ewl->GetSubChunk(CHUNK_ID_WSMP)) memcpy(&Crossfade, &SamplerOptions, 4); |
1271 |
|
else memset(&Crossfade, 0, 4); |
1272 |
|
|
1273 |
if (!pVelocityTables) pVelocityTables = new VelocityTableMap; |
if (!pVelocityTables) pVelocityTables = new VelocityTableMap; |
1274 |
|
|
1275 |
RIFF::Chunk* _3ewa = _3ewl->GetSubChunk(CHUNK_ID_3EWA); |
RIFF::Chunk* _3ewa = _3ewl->GetSubChunk(CHUNK_ID_3EWA); |
1504 |
VCFVelocityDynamicRange = 0x04; |
VCFVelocityDynamicRange = 0x04; |
1505 |
VCFVelocityCurve = curve_type_linear; |
VCFVelocityCurve = curve_type_linear; |
1506 |
VCFType = vcf_type_lowpass; |
VCFType = vcf_type_lowpass; |
1507 |
memset(DimensionUpperLimits, 0, 8); |
memset(DimensionUpperLimits, 127, 8); |
1508 |
} |
} |
1509 |
|
|
1510 |
pVelocityAttenuationTable = GetVelocityTable(VelocityResponseCurve, |
pVelocityAttenuationTable = GetVelocityTable(VelocityResponseCurve, |
1550 |
* It will be called automatically when File::Save() was called. |
* It will be called automatically when File::Save() was called. |
1551 |
*/ |
*/ |
1552 |
void DimensionRegion::UpdateChunks() { |
void DimensionRegion::UpdateChunks() { |
1553 |
|
// check if wsmp is going to be created by |
1554 |
|
// DLS::Sampler::UpdateChunks |
1555 |
|
bool wsmp_created = !pParentList->GetSubChunk(CHUNK_ID_WSMP); |
1556 |
|
|
1557 |
// first update base class's chunk |
// first update base class's chunk |
1558 |
DLS::Sampler::UpdateChunks(); |
DLS::Sampler::UpdateChunks(); |
1559 |
|
|
1560 |
|
RIFF::Chunk* wsmp = pParentList->GetSubChunk(CHUNK_ID_WSMP); |
1561 |
|
uint8_t* pData = (uint8_t*) wsmp->LoadChunkData(); |
1562 |
|
pData[12] = Crossfade.in_start; |
1563 |
|
pData[13] = Crossfade.in_end; |
1564 |
|
pData[14] = Crossfade.out_start; |
1565 |
|
pData[15] = Crossfade.out_end; |
1566 |
|
|
1567 |
// make sure '3ewa' chunk exists |
// make sure '3ewa' chunk exists |
1568 |
RIFF::Chunk* _3ewa = pParentList->GetSubChunk(CHUNK_ID_3EWA); |
RIFF::Chunk* _3ewa = pParentList->GetSubChunk(CHUNK_ID_3EWA); |
1569 |
if (!_3ewa) _3ewa = pParentList->AddSubChunk(CHUNK_ID_3EWA, 140); |
if (!_3ewa) _3ewa = pParentList->AddSubChunk(CHUNK_ID_3EWA, 140); |
1570 |
uint8_t* pData = (uint8_t*) _3ewa->LoadChunkData(); |
else if (wsmp_created) { |
1571 |
|
// make sure the chunk order is: wsmp, 3ewa |
1572 |
|
pParentList->MoveSubChunk(_3ewa, 0); |
1573 |
|
} |
1574 |
|
pData = (uint8_t*) _3ewa->LoadChunkData(); |
1575 |
|
|
1576 |
// update '3ewa' chunk with DimensionRegion's current settings |
// update '3ewa' chunk with DimensionRegion's current settings |
1577 |
|
|
1617 |
pData[44] = eg1ctl; |
pData[44] = eg1ctl; |
1618 |
|
|
1619 |
const uint8_t eg1ctrloptions = |
const uint8_t eg1ctrloptions = |
1620 |
(EG1ControllerInvert) ? 0x01 : 0x00 | |
(EG1ControllerInvert ? 0x01 : 0x00) | |
1621 |
GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG1ControllerAttackInfluence) | |
GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG1ControllerAttackInfluence) | |
1622 |
GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG1ControllerDecayInfluence) | |
GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG1ControllerDecayInfluence) | |
1623 |
GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG1ControllerReleaseInfluence); |
GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG1ControllerReleaseInfluence); |
1627 |
pData[46] = eg2ctl; |
pData[46] = eg2ctl; |
1628 |
|
|
1629 |
const uint8_t eg2ctrloptions = |
const uint8_t eg2ctrloptions = |
1630 |
(EG2ControllerInvert) ? 0x01 : 0x00 | |
(EG2ControllerInvert ? 0x01 : 0x00) | |
1631 |
GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG2ControllerAttackInfluence) | |
GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG2ControllerAttackInfluence) | |
1632 |
GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG2ControllerDecayInfluence) | |
GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG2ControllerDecayInfluence) | |
1633 |
GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG2ControllerReleaseInfluence); |
GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG2ControllerReleaseInfluence); |
1805 |
const uint8_t eg1hold = (EG1Hold) ? 0x80 : 0x00; // bit 7 |
const uint8_t eg1hold = (EG1Hold) ? 0x80 : 0x00; // bit 7 |
1806 |
pData[131] = eg1hold; |
pData[131] = eg1hold; |
1807 |
|
|
1808 |
const uint8_t vcfcutoff = (VCFEnabled) ? 0x80 : 0x00 | /* bit 7 */ |
const uint8_t vcfcutoff = (VCFEnabled ? 0x80 : 0x00) | /* bit 7 */ |
1809 |
(VCFCutoff & 0x7f); /* lower 7 bits */ |
(VCFCutoff & 0x7f); /* lower 7 bits */ |
1810 |
pData[132] = vcfcutoff; |
pData[132] = vcfcutoff; |
1811 |
|
|
1812 |
pData[133] = VCFCutoffController; |
pData[133] = VCFCutoffController; |
1813 |
|
|
1814 |
const uint8_t vcfvelscale = (VCFCutoffControllerInvert) ? 0x80 : 0x00 | /* bit 7 */ |
const uint8_t vcfvelscale = (VCFCutoffControllerInvert ? 0x80 : 0x00) | /* bit 7 */ |
1815 |
(VCFVelocityScale & 0x7f); /* lower 7 bits */ |
(VCFVelocityScale & 0x7f); /* lower 7 bits */ |
1816 |
pData[134] = vcfvelscale; |
pData[134] = vcfvelscale; |
1817 |
|
|
1818 |
// next byte unknown |
// next byte unknown |
1819 |
|
|
1820 |
const uint8_t vcfresonance = (VCFResonanceDynamic) ? 0x00 : 0x80 | /* bit 7 */ |
const uint8_t vcfresonance = (VCFResonanceDynamic ? 0x00 : 0x80) | /* bit 7 */ |
1821 |
(VCFResonance & 0x7f); /* lower 7 bits */ |
(VCFResonance & 0x7f); /* lower 7 bits */ |
1822 |
pData[136] = vcfresonance; |
pData[136] = vcfresonance; |
1823 |
|
|
1824 |
const uint8_t vcfbreakpoint = (VCFKeyboardTracking) ? 0x80 : 0x00 | /* bit 7 */ |
const uint8_t vcfbreakpoint = (VCFKeyboardTracking ? 0x80 : 0x00) | /* bit 7 */ |
1825 |
(VCFKeyboardTrackingBreakpoint & 0x7f); /* lower 7 bits */ |
(VCFKeyboardTrackingBreakpoint & 0x7f); /* lower 7 bits */ |
1826 |
pData[137] = vcfbreakpoint; |
pData[137] = vcfbreakpoint; |
1827 |
|
|
2275 |
// first update base class's chunks |
// first update base class's chunks |
2276 |
DLS::Region::UpdateChunks(); |
DLS::Region::UpdateChunks(); |
2277 |
|
|
2278 |
|
File* pFile = (File*) GetParent()->GetParent(); |
2279 |
|
bool version3 = pFile->pVersion && pFile->pVersion->major == 3; |
2280 |
|
|
2281 |
// update dimension region's chunks |
// update dimension region's chunks |
2282 |
for (int i = 0; i < DimensionRegions; i++) { |
for (int i = 0; i < DimensionRegions; i++) { |
2283 |
pDimensionRegions[i]->UpdateChunks(); |
DimensionRegion* d = pDimensionRegions[i]; |
2284 |
|
|
2285 |
|
// make sure '3ewa' chunk exists (we need to this before |
2286 |
|
// calling DimensionRegion::UpdateChunks, as |
2287 |
|
// DimensionRegion doesn't know which file version it is) |
2288 |
|
RIFF::Chunk* _3ewa = d->pParentList->GetSubChunk(CHUNK_ID_3EWA); |
2289 |
|
if (!_3ewa) d->pParentList->AddSubChunk(CHUNK_ID_3EWA, version3 ? 148 : 140); |
2290 |
|
|
2291 |
|
d->UpdateChunks(); |
2292 |
} |
} |
2293 |
|
|
2294 |
File* pFile = (File*) GetParent()->GetParent(); |
const int iMaxDimensions = version3 ? 8 : 5; |
2295 |
const int iMaxDimensions = (pFile->pVersion && pFile->pVersion->major == 3) ? 8 : 5; |
const int iMaxDimensionRegions = version3 ? 256 : 32; |
|
const int iMaxDimensionRegions = (pFile->pVersion && pFile->pVersion->major == 3) ? 256 : 32; |
|
2296 |
|
|
2297 |
// make sure '3lnk' chunk exists |
// make sure '3lnk' chunk exists |
2298 |
RIFF::Chunk* _3lnk = pCkRegion->GetSubChunk(CHUNK_ID_3LNK); |
RIFF::Chunk* _3lnk = pCkRegion->GetSubChunk(CHUNK_ID_3LNK); |
2299 |
if (!_3lnk) { |
if (!_3lnk) { |
2300 |
const int _3lnkChunkSize = (pFile->pVersion && pFile->pVersion->major == 3) ? 1092 : 172; |
const int _3lnkChunkSize = version3 ? 1092 : 172; |
2301 |
_3lnk = pCkRegion->AddSubChunk(CHUNK_ID_3LNK, _3lnkChunkSize); |
_3lnk = pCkRegion->AddSubChunk(CHUNK_ID_3LNK, _3lnkChunkSize); |
2302 |
memset(_3lnk->LoadChunkData(), 0, _3lnkChunkSize); |
memset(_3lnk->LoadChunkData(), 0, _3lnkChunkSize); |
2303 |
|
|
2312 |
for (int i = 0; i < iMaxDimensions; i++) { |
for (int i = 0; i < iMaxDimensions; i++) { |
2313 |
pData[4 + i * 8] = (uint8_t) pDimensionDefinitions[i].dimension; |
pData[4 + i * 8] = (uint8_t) pDimensionDefinitions[i].dimension; |
2314 |
pData[5 + i * 8] = pDimensionDefinitions[i].bits; |
pData[5 + i * 8] = pDimensionDefinitions[i].bits; |
2315 |
pData[6 + i * 8] = shift; |
pData[6 + i * 8] = pDimensionDefinitions[i].dimension == dimension_none ? 0 : shift; |
2316 |
pData[7 + i * 8] = (1 << (shift + pDimensionDefinitions[i].bits)) - (1 << shift); |
pData[7 + i * 8] = (1 << (shift + pDimensionDefinitions[i].bits)) - (1 << shift); |
2317 |
pData[8 + i * 8] = pDimensionDefinitions[i].zones; |
pData[8 + i * 8] = pDimensionDefinitions[i].zones; |
2318 |
// next 3 bytes unknown, always zero? |
// next 3 bytes unknown, always zero? |
2321 |
} |
} |
2322 |
|
|
2323 |
// update wave pool table in '3lnk' chunk |
// update wave pool table in '3lnk' chunk |
2324 |
const int iWavePoolOffset = (pFile->pVersion && pFile->pVersion->major == 3) ? 68 : 44; |
const int iWavePoolOffset = version3 ? 68 : 44; |
2325 |
for (uint i = 0; i < iMaxDimensionRegions; i++) { |
for (uint i = 0; i < iMaxDimensionRegions; i++) { |
2326 |
int iWaveIndex = -1; |
int iWaveIndex = -1; |
2327 |
if (i < DimensionRegions) { |
if (i < DimensionRegions) { |
2334 |
break; |
break; |
2335 |
} |
} |
2336 |
} |
} |
|
if (iWaveIndex < 0) throw gig::Exception("Could not update gig::Region, could not find DimensionRegion's sample"); |
|
2337 |
} |
} |
2338 |
store32(&pData[iWavePoolOffset + i * 4], iWaveIndex); |
store32(&pData[iWavePoolOffset + i * 4], iWaveIndex); |
2339 |
} |
} |
2475 |
RIFF::List* _3prg = pCkRegion->GetSubList(LIST_TYPE_3PRG); |
RIFF::List* _3prg = pCkRegion->GetSubList(LIST_TYPE_3PRG); |
2476 |
RIFF::List* pNewDimRgnListChunk = _3prg->AddSubList(LIST_TYPE_3EWL); |
RIFF::List* pNewDimRgnListChunk = _3prg->AddSubList(LIST_TYPE_3EWL); |
2477 |
pDimensionRegions[i] = new DimensionRegion(pNewDimRgnListChunk); |
pDimensionRegions[i] = new DimensionRegion(pNewDimRgnListChunk); |
2478 |
|
|
2479 |
|
// copy the upper limits for the other dimensions |
2480 |
|
memcpy(pDimensionRegions[i]->DimensionUpperLimits, |
2481 |
|
pDimensionRegions[i & ((1 << iCurrentBits) - 1)]->DimensionUpperLimits, 8); |
2482 |
|
|
2483 |
DimensionRegions++; |
DimensionRegions++; |
2484 |
} |
} |
2485 |
|
|
2486 |
|
// initialize the upper limits for this dimension |
2487 |
|
for (int z = 0, j = 0 ; z < pDimDef->zones ; z++, j += 1 << iCurrentBits) { |
2488 |
|
uint8_t upperLimit = uint8_t((z + 1) * 128.0 / pDimDef->zones - 1); |
2489 |
|
for (int i = 0 ; i < 1 << iCurrentBits ; i++) { |
2490 |
|
pDimensionRegions[j + i]->DimensionUpperLimits[Dimensions] = upperLimit; |
2491 |
|
} |
2492 |
|
} |
2493 |
|
|
2494 |
Dimensions++; |
Dimensions++; |
2495 |
|
|
2496 |
// if this is a layer dimension, update 'Layers' attribute |
// if this is a layer dimension, update 'Layers' attribute |
2531 |
for (int i = iDimensionNr + 1; i < Dimensions; i++) |
for (int i = iDimensionNr + 1; i < Dimensions; i++) |
2532 |
iUpperBits += pDimensionDefinitions[i].bits; |
iUpperBits += pDimensionDefinitions[i].bits; |
2533 |
|
|
2534 |
|
RIFF::List* _3prg = pCkRegion->GetSubList(LIST_TYPE_3PRG); |
2535 |
|
|
2536 |
// delete dimension regions which belong to the given dimension |
// delete dimension regions which belong to the given dimension |
2537 |
// (that is where the dimension's bit > 0) |
// (that is where the dimension's bit > 0) |
2538 |
for (int iUpperBit = 0; iUpperBit < 1 << iUpperBits; iUpperBit++) { |
for (int iUpperBit = 0; iUpperBit < 1 << iUpperBits; iUpperBit++) { |
2541 |
int iToDelete = iUpperBit << (pDimensionDefinitions[iDimensionNr].bits + iLowerBits) | |
int iToDelete = iUpperBit << (pDimensionDefinitions[iDimensionNr].bits + iLowerBits) | |
2542 |
iObsoleteBit << iLowerBits | |
iObsoleteBit << iLowerBits | |
2543 |
iLowerBit; |
iLowerBit; |
2544 |
|
|
2545 |
|
_3prg->DeleteSubChunk(pDimensionRegions[iToDelete]->pParentList); |
2546 |
delete pDimensionRegions[iToDelete]; |
delete pDimensionRegions[iToDelete]; |
2547 |
pDimensionRegions[iToDelete] = NULL; |
pDimensionRegions[iToDelete] = NULL; |
2548 |
DimensionRegions--; |
DimensionRegions--; |
2563 |
} |
} |
2564 |
} |
} |
2565 |
|
|
2566 |
|
// remove the this dimension from the upper limits arrays |
2567 |
|
for (int j = 0 ; j < 256 && pDimensionRegions[j] ; j++) { |
2568 |
|
DimensionRegion* d = pDimensionRegions[j]; |
2569 |
|
for (int i = iDimensionNr + 1; i < Dimensions; i++) { |
2570 |
|
d->DimensionUpperLimits[i - 1] = d->DimensionUpperLimits[i]; |
2571 |
|
} |
2572 |
|
d->DimensionUpperLimits[Dimensions - 1] = 127; |
2573 |
|
} |
2574 |
|
|
2575 |
// 'remove' dimension definition |
// 'remove' dimension definition |
2576 |
for (int i = iDimensionNr + 1; i < Dimensions; i++) { |
for (int i = iDimensionNr + 1; i < Dimensions; i++) { |
2577 |
pDimensionDefinitions[i - 1] = pDimensionDefinitions[i]; |
pDimensionDefinitions[i - 1] = pDimensionDefinitions[i]; |
2803 |
if (!lart) lart = pCkInstrument->AddSubList(LIST_TYPE_LART); |
if (!lart) lart = pCkInstrument->AddSubList(LIST_TYPE_LART); |
2804 |
// make sure '3ewg' RIFF chunk exists |
// make sure '3ewg' RIFF chunk exists |
2805 |
RIFF::Chunk* _3ewg = lart->GetSubChunk(CHUNK_ID_3EWG); |
RIFF::Chunk* _3ewg = lart->GetSubChunk(CHUNK_ID_3EWG); |
2806 |
if (!_3ewg) _3ewg = lart->AddSubChunk(CHUNK_ID_3EWG, 12); |
if (!_3ewg) { |
2807 |
|
File* pFile = (File*) GetParent(); |
2808 |
|
|
2809 |
|
// 3ewg is bigger in gig3, as it includes the iMIDI rules |
2810 |
|
int size = (pFile->pVersion && pFile->pVersion->major == 3) ? 16416 : 12; |
2811 |
|
_3ewg = lart->AddSubChunk(CHUNK_ID_3EWG, size); |
2812 |
|
memset(_3ewg->LoadChunkData(), 0, size); |
2813 |
|
} |
2814 |
// update '3ewg' RIFF chunk |
// update '3ewg' RIFF chunk |
2815 |
uint8_t* pData = (uint8_t*) _3ewg->LoadChunkData(); |
uint8_t* pData = (uint8_t*) _3ewg->LoadChunkData(); |
2816 |
store16(&pData[0], EffectSend); |
store16(&pData[0], EffectSend); |
2817 |
store32(&pData[2], Attenuation); |
store32(&pData[2], Attenuation); |
2818 |
store16(&pData[6], FineTune); |
store16(&pData[6], FineTune); |
2819 |
store16(&pData[8], PitchbendRange); |
store16(&pData[8], PitchbendRange); |
2820 |
const uint8_t dimkeystart = (PianoReleaseMode) ? 0x01 : 0x00 | |
const uint8_t dimkeystart = (PianoReleaseMode ? 0x01 : 0x00) | |
2821 |
DimensionKeyRange.low << 1; |
DimensionKeyRange.low << 1; |
2822 |
pData[10] = dimkeystart; |
pData[10] = dimkeystart; |
2823 |
pData[11] = DimensionKeyRange.high; |
pData[11] = DimensionKeyRange.high; |
2928 |
} |
} |
2929 |
RIFF::List* _3gnl = _3gri->GetSubList(LIST_TYPE_3GNL); |
RIFF::List* _3gnl = _3gri->GetSubList(LIST_TYPE_3GNL); |
2930 |
if (!_3gnl) _3gnl = _3gri->AddSubList(LIST_TYPE_3GNL); |
if (!_3gnl) _3gnl = _3gri->AddSubList(LIST_TYPE_3GNL); |
2931 |
|
|
2932 |
|
if (!pNameChunk && pFile->pVersion && pFile->pVersion->major == 3) { |
2933 |
|
// v3 has a fixed list of 128 strings, find a free one |
2934 |
|
for (RIFF::Chunk* ck = _3gnl->GetFirstSubChunk() ; ck ; ck = _3gnl->GetNextSubChunk()) { |
2935 |
|
if (strcmp(static_cast<char*>(ck->LoadChunkData()), "") == 0) { |
2936 |
|
pNameChunk = ck; |
2937 |
|
break; |
2938 |
|
} |
2939 |
|
} |
2940 |
|
} |
2941 |
|
|
2942 |
// 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 |
2943 |
::SaveString(CHUNK_ID_3GNM, pNameChunk, _3gnl, Name, String("Unnamed Group"), true, 64); |
::SaveString(CHUNK_ID_3GNM, pNameChunk, _3gnl, Name, String("Unnamed Group"), true, 64); |
2944 |
} |
} |
3046 |
}; |
}; |
3047 |
|
|
3048 |
File::File() : DLS::File() { |
File::File() : DLS::File() { |
3049 |
|
*pVersion = VERSION_3; |
3050 |
pGroups = NULL; |
pGroups = NULL; |
3051 |
pInfo->FixedStringLengths = FixedStringLengths; |
pInfo->FixedStringLengths = FixedStringLengths; |
3052 |
pInfo->ArchivalLocation = String(256, ' '); |
pInfo->ArchivalLocation = String(256, ' '); |
3115 |
|
|
3116 |
/** @brief Delete a sample. |
/** @brief Delete a sample. |
3117 |
* |
* |
3118 |
* This will delete the given Sample object from the gig file. You have |
* This will delete the given Sample object from the gig file. Any |
3119 |
* to call Save() to make this persistent to the file. |
* references to this sample from Regions and DimensionRegions will be |
3120 |
|
* removed. You have to call Save() to make this persistent to the file. |
3121 |
* |
* |
3122 |
* @param pSample - sample to delete |
* @param pSample - sample to delete |
3123 |
* @throws gig::Exception if given sample could not be found |
* @throws gig::Exception if given sample could not be found |
3129 |
if (SamplesIterator != pSamples->end() && *SamplesIterator == pSample) ++SamplesIterator; // avoid iterator invalidation |
if (SamplesIterator != pSamples->end() && *SamplesIterator == pSample) ++SamplesIterator; // avoid iterator invalidation |
3130 |
pSamples->erase(iter); |
pSamples->erase(iter); |
3131 |
delete pSample; |
delete pSample; |
3132 |
|
|
3133 |
|
// remove all references to the sample |
3134 |
|
for (Instrument* instrument = GetFirstInstrument() ; instrument ; |
3135 |
|
instrument = GetNextInstrument()) { |
3136 |
|
for (Region* region = instrument->GetFirstRegion() ; region ; |
3137 |
|
region = instrument->GetNextRegion()) { |
3138 |
|
|
3139 |
|
if (region->GetSample() == pSample) region->SetSample(NULL); |
3140 |
|
|
3141 |
|
for (int i = 0 ; i < region->DimensionRegions ; i++) { |
3142 |
|
gig::DimensionRegion *d = region->pDimensionRegions[i]; |
3143 |
|
if (d->pSample == pSample) d->pSample = NULL; |
3144 |
|
} |
3145 |
|
} |
3146 |
|
} |
3147 |
} |
} |
3148 |
|
|
3149 |
void File::LoadSamples() { |
void File::LoadSamples() { |
3448 |
RIFF::Chunk* ck = lst3gnl->GetFirstSubChunk(); |
RIFF::Chunk* ck = lst3gnl->GetFirstSubChunk(); |
3449 |
while (ck) { |
while (ck) { |
3450 |
if (ck->GetChunkID() == CHUNK_ID_3GNM) { |
if (ck->GetChunkID() == CHUNK_ID_3GNM) { |
3451 |
|
if (pVersion && pVersion->major == 3 && |
3452 |
|
strcmp(static_cast<char*>(ck->LoadChunkData()), "") == 0) break; |
3453 |
|
|
3454 |
pGroups->push_back(new Group(this, ck)); |
pGroups->push_back(new Group(this, ck)); |
3455 |
} |
} |
3456 |
ck = lst3gnl->GetNextSubChunk(); |
ck = lst3gnl->GetNextSubChunk(); |
3478 |
void File::UpdateChunks() { |
void File::UpdateChunks() { |
3479 |
bool newFile = pRIFF->GetSubList(LIST_TYPE_INFO) == NULL; |
bool newFile = pRIFF->GetSubList(LIST_TYPE_INFO) == NULL; |
3480 |
|
|
3481 |
|
b64BitWavePoolOffsets = pVersion && pVersion->major == 3; |
3482 |
|
|
3483 |
// first update base class's chunks |
// first update base class's chunks |
3484 |
DLS::File::UpdateChunks(); |
DLS::File::UpdateChunks(); |
3485 |
|
|
3500 |
for (; iter != end; ++iter) { |
for (; iter != end; ++iter) { |
3501 |
(*iter)->UpdateChunks(); |
(*iter)->UpdateChunks(); |
3502 |
} |
} |
3503 |
|
|
3504 |
|
// v3: make sure the file has 128 3gnm chunks |
3505 |
|
if (pVersion && pVersion->major == 3) { |
3506 |
|
RIFF::List* _3gnl = pRIFF->GetSubList(LIST_TYPE_3GRI)->GetSubList(LIST_TYPE_3GNL); |
3507 |
|
RIFF::Chunk* _3gnm = _3gnl->GetFirstSubChunk(); |
3508 |
|
for (int i = 0 ; i < 128 ; i++) { |
3509 |
|
if (i >= pGroups->size()) ::SaveString(CHUNK_ID_3GNM, _3gnm, _3gnl, "", "", true, 64); |
3510 |
|
if (_3gnm) _3gnm = _3gnl->GetNextSubChunk(); |
3511 |
|
} |
3512 |
|
} |
3513 |
} |
} |
3514 |
|
|
3515 |
// update einf chunk |
// update einf chunk |
3553 |
int totnbusedchannels = 0; |
int totnbusedchannels = 0; |
3554 |
int totnbregions = 0; |
int totnbregions = 0; |
3555 |
int totnbdimregions = 0; |
int totnbdimregions = 0; |
3556 |
|
int totnbloops = 0; |
3557 |
int instrumentIdx = 0; |
int instrumentIdx = 0; |
3558 |
|
|
3559 |
memset(&pData[48], 0, sublen - 48); |
memset(&pData[48], 0, sublen - 48); |
3563 |
int nbusedsamples = 0; |
int nbusedsamples = 0; |
3564 |
int nbusedchannels = 0; |
int nbusedchannels = 0; |
3565 |
int nbdimregions = 0; |
int nbdimregions = 0; |
3566 |
|
int nbloops = 0; |
3567 |
|
|
3568 |
memset(&pData[(instrumentIdx + 1) * sublen + 48], 0, sublen - 48); |
memset(&pData[(instrumentIdx + 1) * sublen + 48], 0, sublen - 48); |
3569 |
|
|
3587 |
} |
} |
3588 |
} |
} |
3589 |
} |
} |
3590 |
|
if (d->SampleLoops) nbloops++; |
3591 |
} |
} |
3592 |
nbdimregions += region->DimensionRegions; |
nbdimregions += region->DimensionRegions; |
3593 |
} |
} |
3598 |
store32(&pData[(instrumentIdx + 1) * sublen + 12], 1); |
store32(&pData[(instrumentIdx + 1) * sublen + 12], 1); |
3599 |
store32(&pData[(instrumentIdx + 1) * sublen + 16], instrument->Regions); |
store32(&pData[(instrumentIdx + 1) * sublen + 16], instrument->Regions); |
3600 |
store32(&pData[(instrumentIdx + 1) * sublen + 20], nbdimregions); |
store32(&pData[(instrumentIdx + 1) * sublen + 20], nbdimregions); |
3601 |
// next 12 bytes unknown |
store32(&pData[(instrumentIdx + 1) * sublen + 24], nbloops); |
3602 |
|
// next 8 bytes unknown |
3603 |
store32(&pData[(instrumentIdx + 1) * sublen + 36], instrumentIdx); |
store32(&pData[(instrumentIdx + 1) * sublen + 36], instrumentIdx); |
3604 |
store32(&pData[(instrumentIdx + 1) * sublen + 40], pSamples->size()); |
store32(&pData[(instrumentIdx + 1) * sublen + 40], pSamples->size()); |
3605 |
// next 4 bytes unknown |
// next 4 bytes unknown |
3606 |
|
|
3607 |
totnbregions += instrument->Regions; |
totnbregions += instrument->Regions; |
3608 |
totnbdimregions += nbdimregions; |
totnbdimregions += nbdimregions; |
3609 |
|
totnbloops += nbloops; |
3610 |
instrumentIdx++; |
instrumentIdx++; |
3611 |
} |
} |
3612 |
// first 4 bytes unknown - sometimes 0, sometimes length of einf part |
// first 4 bytes unknown - sometimes 0, sometimes length of einf part |
3616 |
store32(&pData[12], Instruments); |
store32(&pData[12], Instruments); |
3617 |
store32(&pData[16], totnbregions); |
store32(&pData[16], totnbregions); |
3618 |
store32(&pData[20], totnbdimregions); |
store32(&pData[20], totnbdimregions); |
3619 |
// next 12 bytes unknown |
store32(&pData[24], totnbloops); |
3620 |
// next 4 bytes unknown, always 0? |
// next 8 bytes unknown |
3621 |
|
// next 4 bytes unknown, not always 0 |
3622 |
store32(&pData[40], pSamples->size()); |
store32(&pData[40], pSamples->size()); |
3623 |
// next 4 bytes unknown |
// next 4 bytes unknown |
3624 |
} |
} |
3635 |
} else if (newFile) { |
} else if (newFile) { |
3636 |
_3crc = pRIFF->AddSubChunk(CHUNK_ID_3CRC, pSamples->size() * 8); |
_3crc = pRIFF->AddSubChunk(CHUNK_ID_3CRC, pSamples->size() * 8); |
3637 |
_3crc->LoadChunkData(); |
_3crc->LoadChunkData(); |
3638 |
|
|
3639 |
|
// the order of einf and 3crc is not the same in v2 and v3 |
3640 |
|
if (einf && pVersion && pVersion->major == 3) pRIFF->MoveSubChunk(_3crc, einf); |
3641 |
} |
} |
3642 |
} |
} |
3643 |
|
|