142 |
const int iEntrySize = 12; // 12 bytes per connection block |
const int iEntrySize = 12; // 12 bytes per connection block |
143 |
pArticulationCk->Resize(HeaderSize + Connections * iEntrySize); |
pArticulationCk->Resize(HeaderSize + Connections * iEntrySize); |
144 |
uint8_t* pData = (uint8_t*) pArticulationCk->LoadChunkData(); |
uint8_t* pData = (uint8_t*) pArticulationCk->LoadChunkData(); |
145 |
memcpy(&pData[0], &HeaderSize, 2); |
store16(&pData[0], HeaderSize); |
146 |
memcpy(&pData[2], &Connections, 2); |
store16(&pData[2], Connections); |
147 |
for (uint32_t i = 0; i < Connections; i++) { |
for (uint32_t i = 0; i < Connections; i++) { |
148 |
Connection::conn_block_t c = pConnections[i].ToConnBlock(); |
Connection::conn_block_t c = pConnections[i].ToConnBlock(); |
149 |
memcpy(&pData[HeaderSize + i * iEntrySize], &c.source, 2); |
store16(&pData[HeaderSize + i * iEntrySize], c.source); |
150 |
memcpy(&pData[HeaderSize + i * iEntrySize + 2], &c.control, 2); |
store16(&pData[HeaderSize + i * iEntrySize + 2], c.control); |
151 |
memcpy(&pData[HeaderSize + i * iEntrySize + 4], &c.destination, 2); |
store16(&pData[HeaderSize + i * iEntrySize + 4], c.destination); |
152 |
memcpy(&pData[HeaderSize + i * iEntrySize + 6], &c.transform, 2); |
store16(&pData[HeaderSize + i * iEntrySize + 6], c.transform); |
153 |
memcpy(&pData[HeaderSize + i * iEntrySize + 8], &c.scale, 4); |
store32(&pData[HeaderSize + i * iEntrySize + 8], c.scale); |
154 |
} |
} |
155 |
} |
} |
156 |
|
|
233 |
* @param list - pointer to a list chunk which contains an INFO list chunk |
* @param list - pointer to a list chunk which contains an INFO list chunk |
234 |
*/ |
*/ |
235 |
Info::Info(RIFF::List* list) { |
Info::Info(RIFF::List* list) { |
236 |
UseFixedLengthStrings = false; |
FixedStringLengths = NULL; |
237 |
pResourceListChunk = list; |
pResourceListChunk = list; |
238 |
if (list) { |
if (list) { |
239 |
RIFF::List* lstINFO = list->GetSubList(LIST_TYPE_INFO); |
RIFF::List* lstINFO = list->GetSubList(LIST_TYPE_INFO); |
286 |
* @param lstINFO - parent (INFO) RIFF list chunk |
* @param lstINFO - parent (INFO) RIFF list chunk |
287 |
* @param s - current value of info field |
* @param s - current value of info field |
288 |
* @param sDefault - default value |
* @param sDefault - default value |
|
* @param bUseFixedLengthStrings - should a specific string size be forced in the chunk? |
|
|
* @param size - wanted size of the INFO chunk. This is ignored if bUseFixedLengthStrings is false. |
|
289 |
*/ |
*/ |
290 |
void Info::SaveString(uint32_t ChunkID, RIFF::List* lstINFO, const String& s, const String& sDefault, bool bUseFixedLengthStrings, int size) { |
void Info::SaveString(uint32_t ChunkID, RIFF::List* lstINFO, const String& s, const String& sDefault) { |
291 |
|
int size = 0; |
292 |
|
if (FixedStringLengths) { |
293 |
|
for (int i = 0 ; FixedStringLengths[i].length ; i++) { |
294 |
|
if (FixedStringLengths[i].chunkId == ChunkID) { |
295 |
|
size = FixedStringLengths[i].length; |
296 |
|
} |
297 |
|
} |
298 |
|
} |
299 |
RIFF::Chunk* ck = lstINFO->GetSubChunk(ChunkID); |
RIFF::Chunk* ck = lstINFO->GetSubChunk(ChunkID); |
300 |
::SaveString(ChunkID, ck, lstINFO, s, sDefault, bUseFixedLengthStrings, size); // function from helper.h |
::SaveString(ChunkID, ck, lstINFO, s, sDefault, size != 0, size); // function from helper.h |
301 |
} |
} |
302 |
|
|
303 |
/** @brief Update chunks with current info values. |
/** @brief Update chunks with current info values. |
342 |
|
|
343 |
// save values |
// save values |
344 |
|
|
345 |
// (the string size values are for gig files; they are only |
SaveString(CHUNK_ID_IARL, lstINFO, ArchivalLocation, String("")); |
346 |
// used if UseFixedLengthStrings is set to true) |
SaveString(CHUNK_ID_IART, lstINFO, Artists, String("")); |
347 |
SaveString(CHUNK_ID_INAM, lstINFO, Name, defaultName, UseFixedLengthStrings, |
SaveString(CHUNK_ID_ICMS, lstINFO, Commissioned, String("")); |
348 |
resourceType == RIFF_TYPE_DLS ? 128 : 64); |
SaveString(CHUNK_ID_ICMT, lstINFO, Comments, defaultComments); |
349 |
SaveString(CHUNK_ID_IARL, lstINFO, ArchivalLocation, String(""), UseFixedLengthStrings, 256); |
SaveString(CHUNK_ID_ICOP, lstINFO, Copyright, String("")); |
350 |
SaveString(CHUNK_ID_ICRD, lstINFO, CreationDate, defaultCreationDate, UseFixedLengthStrings, 128); |
SaveString(CHUNK_ID_ICRD, lstINFO, CreationDate, defaultCreationDate); |
351 |
SaveString(CHUNK_ID_ICMT, lstINFO, Comments, defaultComments, UseFixedLengthStrings, 1024); |
SaveString(CHUNK_ID_IENG, lstINFO, Engineer, String("")); |
352 |
SaveString(CHUNK_ID_IPRD, lstINFO, Product, String(""), UseFixedLengthStrings, 128); |
SaveString(CHUNK_ID_IGNR, lstINFO, Genre, String("")); |
353 |
SaveString(CHUNK_ID_ICOP, lstINFO, Copyright, String(""), UseFixedLengthStrings, 128); |
SaveString(CHUNK_ID_IKEY, lstINFO, Keywords, String("")); |
354 |
SaveString(CHUNK_ID_IART, lstINFO, Artists, String(""), UseFixedLengthStrings, 128); |
SaveString(CHUNK_ID_IMED, lstINFO, Medium, String("")); |
355 |
SaveString(CHUNK_ID_IGNR, lstINFO, Genre, String(""), UseFixedLengthStrings, 128); |
SaveString(CHUNK_ID_INAM, lstINFO, Name, defaultName); |
356 |
SaveString(CHUNK_ID_IKEY, lstINFO, Keywords, String(""), UseFixedLengthStrings, 128); |
SaveString(CHUNK_ID_IPRD, lstINFO, Product, String("")); |
357 |
SaveString(CHUNK_ID_IENG, lstINFO, Engineer, String(""), UseFixedLengthStrings, 128); |
SaveString(CHUNK_ID_ISBJ, lstINFO, Subject, String("")); |
358 |
SaveString(CHUNK_ID_ITCH, lstINFO, Technician, String(""), UseFixedLengthStrings, 128); |
SaveString(CHUNK_ID_ISFT, lstINFO, Software, defaultSoftware); |
359 |
SaveString(CHUNK_ID_ISFT, lstINFO, Software, defaultSoftware, UseFixedLengthStrings, |
SaveString(CHUNK_ID_ISRC, lstINFO, Source, String("")); |
360 |
resourceType == LIST_TYPE_INS ? |
SaveString(CHUNK_ID_ISRF, lstINFO, SourceForm, String("")); |
361 |
(Software == "" ? defaultSoftware.length()+1 : Software.length()+1) : 128); |
SaveString(CHUNK_ID_ITCH, lstINFO, Technician, String("")); |
|
SaveString(CHUNK_ID_IMED, lstINFO, Medium, String(""), UseFixedLengthStrings, 128); |
|
|
SaveString(CHUNK_ID_ISRC, lstINFO, Source, String(""), UseFixedLengthStrings, 128); |
|
|
SaveString(CHUNK_ID_ISRF, lstINFO, SourceForm, String(""), UseFixedLengthStrings, 128); |
|
|
SaveString(CHUNK_ID_ICMS, lstINFO, Commissioned, String(""), UseFixedLengthStrings, 128); |
|
|
SaveString(CHUNK_ID_ISBJ, lstINFO, Subject, String(""), UseFixedLengthStrings, 128); |
|
362 |
} |
} |
363 |
|
|
364 |
|
|
464 |
} |
} |
465 |
uint8_t* pData = (uint8_t*) wsmp->LoadChunkData(); |
uint8_t* pData = (uint8_t*) wsmp->LoadChunkData(); |
466 |
// update headers size |
// update headers size |
467 |
memcpy(&pData[0], &uiHeaderSize, 4); |
store32(&pData[0], uiHeaderSize); |
468 |
// update respective sampler options bits |
// update respective sampler options bits |
469 |
SamplerOptions = (NoSampleDepthTruncation) ? SamplerOptions | F_WSMP_NO_TRUNCATION |
SamplerOptions = (NoSampleDepthTruncation) ? SamplerOptions | F_WSMP_NO_TRUNCATION |
470 |
: SamplerOptions & (~F_WSMP_NO_TRUNCATION); |
: SamplerOptions & (~F_WSMP_NO_TRUNCATION); |
471 |
SamplerOptions = (NoSampleCompression) ? SamplerOptions | F_WSMP_NO_COMPRESSION |
SamplerOptions = (NoSampleCompression) ? SamplerOptions | F_WSMP_NO_COMPRESSION |
472 |
: SamplerOptions & (~F_WSMP_NO_COMPRESSION); |
: SamplerOptions & (~F_WSMP_NO_COMPRESSION); |
473 |
memcpy(&pData[4], &UnityNote, 2); |
store16(&pData[4], UnityNote); |
474 |
memcpy(&pData[6], &FineTune, 2); |
store16(&pData[6], FineTune); |
475 |
memcpy(&pData[8], &Gain, 4); |
store32(&pData[8], Gain); |
476 |
memcpy(&pData[12], &SamplerOptions, 4); |
store32(&pData[12], SamplerOptions); |
477 |
memcpy(&pData[16], &SampleLoops, 4); |
store32(&pData[16], SampleLoops); |
478 |
// update loop definitions |
// update loop definitions |
479 |
for (uint32_t i = 0; i < SampleLoops; i++) { |
for (uint32_t i = 0; i < SampleLoops; i++) { |
480 |
//FIXME: this does not handle extended loop structs correctly |
//FIXME: this does not handle extended loop structs correctly |
481 |
memcpy(&pData[uiHeaderSize + i * 16], pSampleLoops + i, 4 * 4); |
store32(&pData[uiHeaderSize + i * 16], pSampleLoops[i].Size); |
482 |
|
store32(&pData[uiHeaderSize + i * 16 + 4], pSampleLoops[i].LoopType); |
483 |
|
store32(&pData[uiHeaderSize + i * 16 + 8], pSampleLoops[i].LoopStart); |
484 |
|
store32(&pData[uiHeaderSize + i * 16 + 12], pSampleLoops[i].LoopLength); |
485 |
} |
} |
486 |
} |
} |
487 |
|
|
488 |
|
/** |
489 |
|
* Adds a new sample loop with the provided loop definition. |
490 |
|
* |
491 |
|
* @param pLoopDef - points to a loop definition that is to be copied |
492 |
|
*/ |
493 |
|
void Sampler::AddSampleLoop(sample_loop_t* pLoopDef) { |
494 |
|
sample_loop_t* pNewLoops = new sample_loop_t[SampleLoops + 1]; |
495 |
|
// copy old loops array |
496 |
|
for (int i = 0; i < SampleLoops; i++) { |
497 |
|
pNewLoops[i] = pSampleLoops[i]; |
498 |
|
} |
499 |
|
// add the new loop |
500 |
|
pNewLoops[SampleLoops] = *pLoopDef; |
501 |
|
// auto correct size field |
502 |
|
pNewLoops[SampleLoops].Size = sizeof(DLS::sample_loop_t); |
503 |
|
// free the old array and update the member variables |
504 |
|
if (SampleLoops) delete[] pSampleLoops; |
505 |
|
pSampleLoops = pNewLoops; |
506 |
|
SampleLoops++; |
507 |
|
} |
508 |
|
|
509 |
|
/** |
510 |
|
* Deletes an existing sample loop. |
511 |
|
* |
512 |
|
* @param pLoopDef - pointer to existing loop definition |
513 |
|
* @throws Exception - if given loop definition does not exist |
514 |
|
*/ |
515 |
|
void Sampler::DeleteSampleLoop(sample_loop_t* pLoopDef) { |
516 |
|
sample_loop_t* pNewLoops = new sample_loop_t[SampleLoops - 1]; |
517 |
|
// copy old loops array (skipping given loop) |
518 |
|
for (int i = 0, o = 0; i < SampleLoops; i++) { |
519 |
|
if (&pSampleLoops[i] == pLoopDef) continue; |
520 |
|
if (o == SampleLoops - 1) |
521 |
|
throw Exception("Could not delete Sample Loop, because it does not exist"); |
522 |
|
pNewLoops[o] = pSampleLoops[i]; |
523 |
|
o++; |
524 |
|
} |
525 |
|
// free the old array and update the member variables |
526 |
|
if (SampleLoops) delete[] pSampleLoops; |
527 |
|
pSampleLoops = pNewLoops; |
528 |
|
SampleLoops--; |
529 |
|
} |
530 |
|
|
531 |
|
|
532 |
|
|
533 |
// *************** Sample *************** |
// *************** Sample *************** |
763 |
if (!pCkFormat) pCkFormat = pWaveList->AddSubChunk(CHUNK_ID_FMT, 16); // assumes PCM format |
if (!pCkFormat) pCkFormat = pWaveList->AddSubChunk(CHUNK_ID_FMT, 16); // assumes PCM format |
764 |
uint8_t* pData = (uint8_t*) pCkFormat->LoadChunkData(); |
uint8_t* pData = (uint8_t*) pCkFormat->LoadChunkData(); |
765 |
// update 'fmt' chunk |
// update 'fmt' chunk |
766 |
memcpy(&pData[0], &FormatTag, 2); |
store16(&pData[0], FormatTag); |
767 |
memcpy(&pData[2], &Channels, 2); |
store16(&pData[2], Channels); |
768 |
memcpy(&pData[4], &SamplesPerSecond, 4); |
store32(&pData[4], SamplesPerSecond); |
769 |
memcpy(&pData[8], &AverageBytesPerSecond, 4); |
store32(&pData[8], AverageBytesPerSecond); |
770 |
memcpy(&pData[12], &BlockAlign, 2); |
store16(&pData[12], BlockAlign); |
771 |
memcpy(&pData[14], &BitDepth, 2); // assuming PCM format |
store16(&pData[14], BitDepth); // assuming PCM format |
772 |
} |
} |
773 |
|
|
774 |
|
|
866 |
? FormatOptionFlags | F_RGN_OPTION_SELFNONEXCLUSIVE |
? FormatOptionFlags | F_RGN_OPTION_SELFNONEXCLUSIVE |
867 |
: FormatOptionFlags & (~F_RGN_OPTION_SELFNONEXCLUSIVE); |
: FormatOptionFlags & (~F_RGN_OPTION_SELFNONEXCLUSIVE); |
868 |
// update 'rgnh' chunk |
// update 'rgnh' chunk |
869 |
memcpy(&pData[0], &KeyRange, 2 * 2); |
store16(&pData[0], KeyRange.low); |
870 |
memcpy(&pData[4], &VelocityRange, 2 * 2); |
store16(&pData[2], KeyRange.high); |
871 |
memcpy(&pData[8], &FormatOptionFlags, 2); |
store16(&pData[4], VelocityRange.low); |
872 |
memcpy(&pData[10], &KeyGroup, 2); |
store16(&pData[6], VelocityRange.high); |
873 |
if (rgnh->GetSize() >= 14) memcpy(&pData[12], &Layer, 2); |
store16(&pData[8], FormatOptionFlags); |
874 |
|
store16(&pData[10], KeyGroup); |
875 |
|
if (rgnh->GetSize() >= 14) store16(&pData[12], Layer); |
876 |
|
|
877 |
// update chunks of base classes as well (but skip Resource, |
// update chunks of base classes as well (but skip Resource, |
878 |
// as a rgn doesn't seem to have dlid and INFO chunks) |
// as a rgn doesn't seem to have dlid and INFO chunks) |
905 |
if (index < 0) throw Exception("Could not save Region, could not find Region's sample"); |
if (index < 0) throw Exception("Could not save Region, could not find Region's sample"); |
906 |
WavePoolTableIndex = index; |
WavePoolTableIndex = index; |
907 |
// update 'wlnk' chunk |
// update 'wlnk' chunk |
908 |
memcpy(&pData[0], &WaveLinkOptionFlags, 2); |
store16(&pData[0], WaveLinkOptionFlags); |
909 |
memcpy(&pData[2], &PhaseGroup, 2); |
store16(&pData[2], PhaseGroup); |
910 |
memcpy(&pData[4], &Channel, 4); |
store32(&pData[4], Channel); |
911 |
memcpy(&pData[8], &WavePoolTableIndex, 4); |
store32(&pData[8], WavePoolTableIndex); |
912 |
} |
} |
913 |
|
|
914 |
|
|
1030 |
locale.bank = MIDI_BANK_ENCODE(MIDIBankCoarse, MIDIBankFine); |
locale.bank = MIDI_BANK_ENCODE(MIDIBankCoarse, MIDIBankFine); |
1031 |
locale.bank = (IsDrum) ? locale.bank | DRUM_TYPE_MASK : locale.bank & (~DRUM_TYPE_MASK); |
locale.bank = (IsDrum) ? locale.bank | DRUM_TYPE_MASK : locale.bank & (~DRUM_TYPE_MASK); |
1032 |
MIDIBank = MIDI_BANK_MERGE(MIDIBankCoarse, MIDIBankFine); // just a sync, when we're at it |
MIDIBank = MIDI_BANK_MERGE(MIDIBankCoarse, MIDIBankFine); // just a sync, when we're at it |
1033 |
memcpy(&pData[0], &Regions, 4); |
store32(&pData[0], Regions); |
1034 |
memcpy(&pData[4], &locale, 2 * 4); |
store32(&pData[4], locale.bank); |
1035 |
|
store32(&pData[8], locale.instrument); |
1036 |
// update Region's chunks |
// update Region's chunks |
1037 |
if (!pRegions) return; |
if (!pRegions) return; |
1038 |
RegionList::iterator iter = pRegions->begin(); |
RegionList::iterator iter = pRegions->begin(); |
1074 |
* a DLS file. |
* a DLS file. |
1075 |
*/ |
*/ |
1076 |
File::File() : Resource(NULL, pRIFF = new RIFF::File(RIFF_TYPE_DLS)) { |
File::File() : Resource(NULL, pRIFF = new RIFF::File(RIFF_TYPE_DLS)) { |
1077 |
|
pRIFF->SetByteOrder(RIFF::endian_little); |
1078 |
pVersion = new version_t; |
pVersion = new version_t; |
1079 |
pVersion->major = 0; |
pVersion->major = 0; |
1080 |
pVersion->minor = 0; |
pVersion->minor = 0; |
1329 |
RIFF::Chunk* ckVersion = pRIFF->GetSubChunk(CHUNK_ID_VERS); |
RIFF::Chunk* ckVersion = pRIFF->GetSubChunk(CHUNK_ID_VERS); |
1330 |
if (!ckVersion) ckVersion = pRIFF->AddSubChunk(CHUNK_ID_VERS, 8); |
if (!ckVersion) ckVersion = pRIFF->AddSubChunk(CHUNK_ID_VERS, 8); |
1331 |
uint8_t* pData = (uint8_t*) ckVersion->LoadChunkData(); |
uint8_t* pData = (uint8_t*) ckVersion->LoadChunkData(); |
1332 |
memcpy(pData, pVersion, 2 * 4); |
store16(&pData[0], pVersion->minor); |
1333 |
|
store16(&pData[2], pVersion->major); |
1334 |
|
store16(&pData[4], pVersion->build); |
1335 |
|
store16(&pData[6], pVersion->release); |
1336 |
} |
} |
1337 |
|
|
1338 |
// update 'colh' chunk |
// update 'colh' chunk |
1340 |
RIFF::Chunk* colh = pRIFF->GetSubChunk(CHUNK_ID_COLH); |
RIFF::Chunk* colh = pRIFF->GetSubChunk(CHUNK_ID_COLH); |
1341 |
if (!colh) colh = pRIFF->AddSubChunk(CHUNK_ID_COLH, 4); |
if (!colh) colh = pRIFF->AddSubChunk(CHUNK_ID_COLH, 4); |
1342 |
uint8_t* pData = (uint8_t*) colh->LoadChunkData(); |
uint8_t* pData = (uint8_t*) colh->LoadChunkData(); |
1343 |
memcpy(pData, &Instruments, 4); |
store32(pData, Instruments); |
1344 |
|
|
1345 |
// update instrument's chunks |
// update instrument's chunks |
1346 |
if (pInstruments) { |
if (pInstruments) { |
1360 |
ptbl->Resize(iPtblSize); |
ptbl->Resize(iPtblSize); |
1361 |
pData = (uint8_t*) ptbl->LoadChunkData(); |
pData = (uint8_t*) ptbl->LoadChunkData(); |
1362 |
WavePoolCount = iSamples; |
WavePoolCount = iSamples; |
1363 |
memcpy(&pData[4], &WavePoolCount, 4); |
store32(&pData[4], WavePoolCount); |
1364 |
// we actually update the sample offsets in the pool table when we Save() |
// we actually update the sample offsets in the pool table when we Save() |
1365 |
memset(&pData[WavePoolHeaderSize], 0, iPtblSize - WavePoolHeaderSize); |
memset(&pData[WavePoolHeaderSize], 0, iPtblSize - WavePoolHeaderSize); |
1366 |
|
|
1449 |
unsigned long ulOriginalPos = ptbl->GetPos(); |
unsigned long ulOriginalPos = ptbl->GetPos(); |
1450 |
// update headers |
// update headers |
1451 |
ptbl->SetPos(0); |
ptbl->SetPos(0); |
1452 |
ptbl->WriteUint32(&WavePoolHeaderSize); |
uint32_t tmp = WavePoolHeaderSize; |
1453 |
ptbl->WriteUint32(&WavePoolCount); |
ptbl->WriteUint32(&tmp); |
1454 |
|
tmp = WavePoolCount; |
1455 |
|
ptbl->WriteUint32(&tmp); |
1456 |
// update offsets |
// update offsets |
1457 |
ptbl->SetPos(WavePoolHeaderSize); |
ptbl->SetPos(WavePoolHeaderSize); |
1458 |
if (b64BitWavePoolOffsets) { |
if (b64BitWavePoolOffsets) { |
1459 |
for (int i = 0 ; i < WavePoolCount ; i++) { |
for (int i = 0 ; i < WavePoolCount ; i++) { |
1460 |
ptbl->WriteUint32(&pWavePoolTableHi[i]); |
tmp = pWavePoolTableHi[i]; |
1461 |
ptbl->WriteUint32(&pWavePoolTable[i]); |
ptbl->WriteUint32(&tmp); |
1462 |
|
tmp = pWavePoolTable[i]; |
1463 |
|
ptbl->WriteUint32(&tmp); |
1464 |
} |
} |
1465 |
} else { // conventional 32 bit offsets |
} else { // conventional 32 bit offsets |
1466 |
for (int i = 0 ; i < WavePoolCount ; i++) |
for (int i = 0 ; i < WavePoolCount ; i++) { |
1467 |
ptbl->WriteUint32(&pWavePoolTable[i]); |
tmp = pWavePoolTable[i]; |
1468 |
|
ptbl->WriteUint32(&tmp); |
1469 |
|
} |
1470 |
} |
} |
1471 |
// restore 'ptbl' chunk's original read/write position |
// restore 'ptbl' chunk's original read/write position |
1472 |
ptbl->SetPos(ulOriginalPos); |
ptbl->SetPos(ulOriginalPos); |