2 |
* * |
* * |
3 |
* libgig - C++ cross-platform Gigasampler format file access library * |
* libgig - C++ cross-platform Gigasampler format file access library * |
4 |
* * |
* * |
5 |
* Copyright (C) 2003-2014 by Christian Schoenebeck * |
* Copyright (C) 2003-2017 by Christian Schoenebeck * |
6 |
* <cuse@users.sourceforge.net> * |
* <cuse@users.sourceforge.net> * |
7 |
* * |
* * |
8 |
* This library is free software; you can redistribute it and/or modify * |
* This library is free software; you can redistribute it and/or modify * |
24 |
#include "gig.h" |
#include "gig.h" |
25 |
|
|
26 |
#include "helper.h" |
#include "helper.h" |
27 |
|
#include "Serialization.h" |
28 |
|
|
29 |
#include <algorithm> |
#include <algorithm> |
30 |
#include <math.h> |
#include <math.h> |
31 |
#include <iostream> |
#include <iostream> |
32 |
#include <assert.h> |
#include <assert.h> |
33 |
|
|
34 |
|
/// libgig's current file format version (for extending the original Giga file |
35 |
|
/// format with libgig's own custom data / custom features). |
36 |
|
#define GIG_FILE_EXT_VERSION 2 |
37 |
|
|
38 |
/// Initial size of the sample buffer which is used for decompression of |
/// Initial size of the sample buffer which is used for decompression of |
39 |
/// compressed sample wave streams - this value should always be bigger than |
/// compressed sample wave streams - this value should always be bigger than |
40 |
/// the biggest sample piece expected to be read by the sampler engine, |
/// the biggest sample piece expected to be read by the sampler engine, |
56 |
#define GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(x) ((x & 0x03) << 3) |
#define GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(x) ((x & 0x03) << 3) |
57 |
#define GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(x) ((x & 0x03) << 5) |
#define GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(x) ((x & 0x03) << 5) |
58 |
|
|
59 |
namespace gig { |
#define SRLZ(member) \ |
60 |
|
archive->serializeMember(*this, member, #member); |
|
// *************** progress_t *************** |
|
|
// * |
|
|
|
|
|
progress_t::progress_t() { |
|
|
callback = NULL; |
|
|
custom = NULL; |
|
|
__range_min = 0.0f; |
|
|
__range_max = 1.0f; |
|
|
} |
|
|
|
|
|
// private helper function to convert progress of a subprocess into the global progress |
|
|
static void __notify_progress(progress_t* pProgress, float subprogress) { |
|
|
if (pProgress && pProgress->callback) { |
|
|
const float totalrange = pProgress->__range_max - pProgress->__range_min; |
|
|
const float totalprogress = pProgress->__range_min + subprogress * totalrange; |
|
|
pProgress->factor = totalprogress; |
|
|
pProgress->callback(pProgress); // now actually notify about the progress |
|
|
} |
|
|
} |
|
|
|
|
|
// private helper function to divide a progress into subprogresses |
|
|
static void __divide_progress(progress_t* pParentProgress, progress_t* pSubProgress, float totalTasks, float currentTask) { |
|
|
if (pParentProgress && pParentProgress->callback) { |
|
|
const float totalrange = pParentProgress->__range_max - pParentProgress->__range_min; |
|
|
pSubProgress->callback = pParentProgress->callback; |
|
|
pSubProgress->custom = pParentProgress->custom; |
|
|
pSubProgress->__range_min = pParentProgress->__range_min + totalrange * currentTask / totalTasks; |
|
|
pSubProgress->__range_max = pSubProgress->__range_min + totalrange / totalTasks; |
|
|
} |
|
|
} |
|
61 |
|
|
62 |
|
namespace gig { |
63 |
|
|
64 |
// *************** Internal functions for sample decompression *************** |
// *************** Internal functions for sample decompression *************** |
65 |
// * |
// * |
99 |
void Decompress16(int compressionmode, const unsigned char* params, |
void Decompress16(int compressionmode, const unsigned char* params, |
100 |
int srcStep, int dstStep, |
int srcStep, int dstStep, |
101 |
const unsigned char* pSrc, int16_t* pDst, |
const unsigned char* pSrc, int16_t* pDst, |
102 |
unsigned long currentframeoffset, |
file_offset_t currentframeoffset, |
103 |
unsigned long copysamples) |
file_offset_t copysamples) |
104 |
{ |
{ |
105 |
switch (compressionmode) { |
switch (compressionmode) { |
106 |
case 0: // 16 bit uncompressed |
case 0: // 16 bit uncompressed |
136 |
|
|
137 |
void Decompress24(int compressionmode, const unsigned char* params, |
void Decompress24(int compressionmode, const unsigned char* params, |
138 |
int dstStep, const unsigned char* pSrc, uint8_t* pDst, |
int dstStep, const unsigned char* pSrc, uint8_t* pDst, |
139 |
unsigned long currentframeoffset, |
file_offset_t currentframeoffset, |
140 |
unsigned long copysamples, int truncatedBits) |
file_offset_t copysamples, int truncatedBits) |
141 |
{ |
{ |
142 |
int y, dy, ddy, dddy; |
int y, dy, ddy, dddy; |
143 |
|
|
273 |
* steps. |
* steps. |
274 |
* |
* |
275 |
* Once the whole data was processed by __calculateCRC(), one should |
* Once the whole data was processed by __calculateCRC(), one should |
276 |
* call __encodeCRC() to get the final CRC result. |
* call __finalizeCRC() to get the final CRC result. |
277 |
* |
* |
278 |
* @param buf - pointer to data the CRC shall be calculated of |
* @param buf - pointer to data the CRC shall be calculated of |
279 |
* @param bufSize - size of the data to be processed |
* @param bufSize - size of the data to be processed |
280 |
* @param crc - variable the CRC sum shall be stored to |
* @param crc - variable the CRC sum shall be stored to |
281 |
*/ |
*/ |
282 |
static void __calculateCRC(unsigned char* buf, int bufSize, uint32_t& crc) { |
static void __calculateCRC(unsigned char* buf, size_t bufSize, uint32_t& crc) { |
283 |
for (int i = 0 ; i < bufSize ; i++) { |
for (size_t i = 0 ; i < bufSize ; i++) { |
284 |
crc = __CRCTable[(crc ^ buf[i]) & 0xff] ^ (crc >> 8); |
crc = __CRCTable[(crc ^ buf[i]) & 0xff] ^ (crc >> 8); |
285 |
} |
} |
286 |
} |
} |
290 |
* |
* |
291 |
* @param crc - variable previously passed to __calculateCRC() |
* @param crc - variable previously passed to __calculateCRC() |
292 |
*/ |
*/ |
293 |
inline static uint32_t __encodeCRC(const uint32_t& crc) { |
inline static void __finalizeCRC(uint32_t& crc) { |
294 |
return crc ^ 0xffffffff; |
crc ^= 0xffffffff; |
295 |
} |
} |
296 |
|
|
297 |
|
|
319 |
|
|
320 |
|
|
321 |
|
|
322 |
|
// *************** leverage_ctrl_t *************** |
323 |
|
// * |
324 |
|
|
325 |
|
void leverage_ctrl_t::serialize(Serialization::Archive* archive) { |
326 |
|
SRLZ(type); |
327 |
|
SRLZ(controller_number); |
328 |
|
} |
329 |
|
|
330 |
|
|
331 |
|
|
332 |
|
// *************** crossfade_t *************** |
333 |
|
// * |
334 |
|
|
335 |
|
void crossfade_t::serialize(Serialization::Archive* archive) { |
336 |
|
SRLZ(in_start); |
337 |
|
SRLZ(in_end); |
338 |
|
SRLZ(out_start); |
339 |
|
SRLZ(out_end); |
340 |
|
} |
341 |
|
|
342 |
|
|
343 |
|
|
344 |
|
// *************** eg_opt_t *************** |
345 |
|
// * |
346 |
|
|
347 |
|
eg_opt_t::eg_opt_t() { |
348 |
|
AttackCancel = true; |
349 |
|
AttackHoldCancel = true; |
350 |
|
DecayCancel = true; |
351 |
|
ReleaseCancel = true; |
352 |
|
} |
353 |
|
|
354 |
|
void eg_opt_t::serialize(Serialization::Archive* archive) { |
355 |
|
SRLZ(AttackCancel); |
356 |
|
SRLZ(AttackHoldCancel); |
357 |
|
SRLZ(DecayCancel); |
358 |
|
SRLZ(ReleaseCancel); |
359 |
|
} |
360 |
|
|
361 |
|
|
362 |
|
|
363 |
// *************** Sample *************** |
// *************** Sample *************** |
364 |
// * |
// * |
365 |
|
|
366 |
unsigned int Sample::Instances = 0; |
size_t Sample::Instances = 0; |
367 |
buffer_t Sample::InternalDecompressionBuffer; |
buffer_t Sample::InternalDecompressionBuffer; |
368 |
|
|
369 |
/** @brief Constructor. |
/** @brief Constructor. |
383 |
* ('wvpl') list chunk |
* ('wvpl') list chunk |
384 |
* @param fileNo - number of an extension file where this sample |
* @param fileNo - number of an extension file where this sample |
385 |
* is located, 0 otherwise |
* is located, 0 otherwise |
386 |
|
* @param index - wave pool index of sample (may be -1 on new sample) |
387 |
*/ |
*/ |
388 |
Sample::Sample(File* pFile, RIFF::List* waveList, unsigned long WavePoolOffset, unsigned long fileNo) : DLS::Sample((DLS::File*) pFile, waveList, WavePoolOffset) { |
Sample::Sample(File* pFile, RIFF::List* waveList, file_offset_t WavePoolOffset, unsigned long fileNo, int index) |
389 |
|
: DLS::Sample((DLS::File*) pFile, waveList, WavePoolOffset) |
390 |
|
{ |
391 |
static const DLS::Info::string_length_t fixedStringLengths[] = { |
static const DLS::Info::string_length_t fixedStringLengths[] = { |
392 |
{ CHUNK_ID_INAM, 64 }, |
{ CHUNK_ID_INAM, 64 }, |
393 |
{ 0, 0 } |
{ 0, 0 } |
397 |
FileNo = fileNo; |
FileNo = fileNo; |
398 |
|
|
399 |
__resetCRC(crc); |
__resetCRC(crc); |
400 |
|
// if this is not a new sample, try to get the sample's already existing |
401 |
|
// CRC32 checksum from disk, this checksum will reflect the sample's CRC32 |
402 |
|
// checksum of the time when the sample was consciously modified by the |
403 |
|
// user for the last time (by calling Sample::Write() that is). |
404 |
|
if (index >= 0) { // not a new file ... |
405 |
|
try { |
406 |
|
uint32_t crc = pFile->GetSampleChecksumByIndex(index); |
407 |
|
this->crc = crc; |
408 |
|
} catch (...) {} |
409 |
|
} |
410 |
|
|
411 |
pCk3gix = waveList->GetSubChunk(CHUNK_ID_3GIX); |
pCk3gix = waveList->GetSubChunk(CHUNK_ID_3GIX); |
412 |
if (pCk3gix) { |
if (pCk3gix) { |
539 |
const int iReadAtOnce = 32*1024; |
const int iReadAtOnce = 32*1024; |
540 |
char* buf = new char[iReadAtOnce * orig->FrameSize]; |
char* buf = new char[iReadAtOnce * orig->FrameSize]; |
541 |
Sample* pOrig = (Sample*) orig; //HACK: remove constness for now |
Sample* pOrig = (Sample*) orig; //HACK: remove constness for now |
542 |
unsigned long restorePos = pOrig->GetPos(); |
file_offset_t restorePos = pOrig->GetPos(); |
543 |
pOrig->SetPos(0); |
pOrig->SetPos(0); |
544 |
SetPos(0); |
SetPos(0); |
545 |
for (unsigned long n = pOrig->Read(buf, iReadAtOnce); n; |
for (file_offset_t n = pOrig->Read(buf, iReadAtOnce); n; |
546 |
n = pOrig->Read(buf, iReadAtOnce)) |
n = pOrig->Read(buf, iReadAtOnce)) |
547 |
{ |
{ |
548 |
Write(buf, n); |
Write(buf, n); |
558 |
* Usually there is absolutely no need to call this method explicitly. |
* Usually there is absolutely no need to call this method explicitly. |
559 |
* It will be called automatically when File::Save() was called. |
* It will be called automatically when File::Save() was called. |
560 |
* |
* |
561 |
|
* @param pProgress - callback function for progress notification |
562 |
* @throws DLS::Exception if FormatTag != DLS_WAVE_FORMAT_PCM or no sample data |
* @throws DLS::Exception if FormatTag != DLS_WAVE_FORMAT_PCM or no sample data |
563 |
* was provided yet |
* was provided yet |
564 |
* @throws gig::Exception if there is any invalid sample setting |
* @throws gig::Exception if there is any invalid sample setting |
565 |
*/ |
*/ |
566 |
void Sample::UpdateChunks() { |
void Sample::UpdateChunks(progress_t* pProgress) { |
567 |
// first update base class's chunks |
// first update base class's chunks |
568 |
DLS::Sample::UpdateChunks(); |
DLS::Sample::UpdateChunks(pProgress); |
569 |
|
|
570 |
// make sure 'smpl' chunk exists |
// make sure 'smpl' chunk exists |
571 |
pCkSmpl = pWaveList->GetSubChunk(CHUNK_ID_SMPL); |
pCkSmpl = pWaveList->GetSubChunk(CHUNK_ID_SMPL); |
627 |
void Sample::ScanCompressedSample() { |
void Sample::ScanCompressedSample() { |
628 |
//TODO: we have to add some more scans here (e.g. determine compression rate) |
//TODO: we have to add some more scans here (e.g. determine compression rate) |
629 |
this->SamplesTotal = 0; |
this->SamplesTotal = 0; |
630 |
std::list<unsigned long> frameOffsets; |
std::list<file_offset_t> frameOffsets; |
631 |
|
|
632 |
SamplesPerFrame = BitDepth == 24 ? 256 : 2048; |
SamplesPerFrame = BitDepth == 24 ? 256 : 2048; |
633 |
WorstCaseFrameSize = SamplesPerFrame * FrameSize + Channels; // +Channels for compression flag |
WorstCaseFrameSize = SamplesPerFrame * FrameSize + Channels; // +Channels for compression flag |
643 |
const int mode_l = pCkData->ReadUint8(); |
const int mode_l = pCkData->ReadUint8(); |
644 |
const int mode_r = pCkData->ReadUint8(); |
const int mode_r = pCkData->ReadUint8(); |
645 |
if (mode_l > 5 || mode_r > 5) throw gig::Exception("Unknown compression mode"); |
if (mode_l > 5 || mode_r > 5) throw gig::Exception("Unknown compression mode"); |
646 |
const unsigned long frameSize = bytesPerFrame[mode_l] + bytesPerFrame[mode_r]; |
const file_offset_t frameSize = bytesPerFrame[mode_l] + bytesPerFrame[mode_r]; |
647 |
|
|
648 |
if (pCkData->RemainingBytes() <= frameSize) { |
if (pCkData->RemainingBytes() <= frameSize) { |
649 |
SamplesInLastFrame = |
SamplesInLastFrame = |
662 |
|
|
663 |
const int mode = pCkData->ReadUint8(); |
const int mode = pCkData->ReadUint8(); |
664 |
if (mode > 5) throw gig::Exception("Unknown compression mode"); |
if (mode > 5) throw gig::Exception("Unknown compression mode"); |
665 |
const unsigned long frameSize = bytesPerFrame[mode]; |
const file_offset_t frameSize = bytesPerFrame[mode]; |
666 |
|
|
667 |
if (pCkData->RemainingBytes() <= frameSize) { |
if (pCkData->RemainingBytes() <= frameSize) { |
668 |
SamplesInLastFrame = |
SamplesInLastFrame = |
678 |
|
|
679 |
// Build the frames table (which is used for fast resolving of a frame's chunk offset) |
// Build the frames table (which is used for fast resolving of a frame's chunk offset) |
680 |
if (FrameTable) delete[] FrameTable; |
if (FrameTable) delete[] FrameTable; |
681 |
FrameTable = new unsigned long[frameOffsets.size()]; |
FrameTable = new file_offset_t[frameOffsets.size()]; |
682 |
std::list<unsigned long>::iterator end = frameOffsets.end(); |
std::list<file_offset_t>::iterator end = frameOffsets.end(); |
683 |
std::list<unsigned long>::iterator iter = frameOffsets.begin(); |
std::list<file_offset_t>::iterator iter = frameOffsets.begin(); |
684 |
for (int i = 0; iter != end; i++, iter++) { |
for (int i = 0; iter != end; i++, iter++) { |
685 |
FrameTable[i] = *iter; |
FrameTable[i] = *iter; |
686 |
} |
} |
721 |
* the cached sample data in bytes |
* the cached sample data in bytes |
722 |
* @see ReleaseSampleData(), Read(), SetPos() |
* @see ReleaseSampleData(), Read(), SetPos() |
723 |
*/ |
*/ |
724 |
buffer_t Sample::LoadSampleData(unsigned long SampleCount) { |
buffer_t Sample::LoadSampleData(file_offset_t SampleCount) { |
725 |
return LoadSampleDataWithNullSamplesExtension(SampleCount, 0); // 0 amount of NullSamples |
return LoadSampleDataWithNullSamplesExtension(SampleCount, 0); // 0 amount of NullSamples |
726 |
} |
} |
727 |
|
|
780 |
* size of the cached sample data in bytes |
* size of the cached sample data in bytes |
781 |
* @see ReleaseSampleData(), Read(), SetPos() |
* @see ReleaseSampleData(), Read(), SetPos() |
782 |
*/ |
*/ |
783 |
buffer_t Sample::LoadSampleDataWithNullSamplesExtension(unsigned long SampleCount, uint NullSamplesCount) { |
buffer_t Sample::LoadSampleDataWithNullSamplesExtension(file_offset_t SampleCount, uint NullSamplesCount) { |
784 |
if (SampleCount > this->SamplesTotal) SampleCount = this->SamplesTotal; |
if (SampleCount > this->SamplesTotal) SampleCount = this->SamplesTotal; |
785 |
if (RAMCache.pStart) delete[] (int8_t*) RAMCache.pStart; |
if (RAMCache.pStart) delete[] (int8_t*) RAMCache.pStart; |
786 |
unsigned long allocationsize = (SampleCount + NullSamplesCount) * this->FrameSize; |
file_offset_t allocationsize = (SampleCount + NullSamplesCount) * this->FrameSize; |
787 |
SetPos(0); // reset read position to begin of sample |
SetPos(0); // reset read position to begin of sample |
788 |
RAMCache.pStart = new int8_t[allocationsize]; |
RAMCache.pStart = new int8_t[allocationsize]; |
789 |
RAMCache.Size = Read(RAMCache.pStart, SampleCount) * this->FrameSize; |
RAMCache.Size = Read(RAMCache.pStart, SampleCount) * this->FrameSize; |
847 |
* FormatTag must be DLS_WAVE_FORMAT_PCM. Trying to resize samples with |
* FormatTag must be DLS_WAVE_FORMAT_PCM. Trying to resize samples with |
848 |
* other formats will fail! |
* other formats will fail! |
849 |
* |
* |
850 |
* @param iNewSize - new sample wave data size in sample points (must be |
* @param NewSize - new sample wave data size in sample points (must be |
851 |
* greater than zero) |
* greater than zero) |
852 |
* @throws DLS::Excecption if FormatTag != DLS_WAVE_FORMAT_PCM |
* @throws DLS::Excecption if FormatTag != DLS_WAVE_FORMAT_PCM |
853 |
* or if \a iNewSize is less than 1 |
* @throws DLS::Exception if \a NewSize is less than 1 or unrealistic large |
854 |
* @throws gig::Exception if existing sample is compressed |
* @throws gig::Exception if existing sample is compressed |
855 |
* @see DLS::Sample::GetSize(), DLS::Sample::FrameSize, |
* @see DLS::Sample::GetSize(), DLS::Sample::FrameSize, |
856 |
* DLS::Sample::FormatTag, File::Save() |
* DLS::Sample::FormatTag, File::Save() |
857 |
*/ |
*/ |
858 |
void Sample::Resize(int iNewSize) { |
void Sample::Resize(file_offset_t NewSize) { |
859 |
if (Compressed) throw gig::Exception("There is no support for modifying compressed samples (yet)"); |
if (Compressed) throw gig::Exception("There is no support for modifying compressed samples (yet)"); |
860 |
DLS::Sample::Resize(iNewSize); |
DLS::Sample::Resize(NewSize); |
861 |
} |
} |
862 |
|
|
863 |
/** |
/** |
881 |
* @returns the new sample position |
* @returns the new sample position |
882 |
* @see Read() |
* @see Read() |
883 |
*/ |
*/ |
884 |
unsigned long Sample::SetPos(unsigned long SampleCount, RIFF::stream_whence_t Whence) { |
file_offset_t Sample::SetPos(file_offset_t SampleCount, RIFF::stream_whence_t Whence) { |
885 |
if (Compressed) { |
if (Compressed) { |
886 |
switch (Whence) { |
switch (Whence) { |
887 |
case RIFF::stream_curpos: |
case RIFF::stream_curpos: |
899 |
} |
} |
900 |
if (this->SamplePos > this->SamplesTotal) this->SamplePos = this->SamplesTotal; |
if (this->SamplePos > this->SamplesTotal) this->SamplePos = this->SamplesTotal; |
901 |
|
|
902 |
unsigned long frame = this->SamplePos / 2048; // to which frame to jump |
file_offset_t frame = this->SamplePos / 2048; // to which frame to jump |
903 |
this->FrameOffset = this->SamplePos % 2048; // offset (in sample points) within that frame |
this->FrameOffset = this->SamplePos % 2048; // offset (in sample points) within that frame |
904 |
pCkData->SetPos(FrameTable[frame]); // set chunk pointer to the start of sought frame |
pCkData->SetPos(FrameTable[frame]); // set chunk pointer to the start of sought frame |
905 |
return this->SamplePos; |
return this->SamplePos; |
906 |
} |
} |
907 |
else { // not compressed |
else { // not compressed |
908 |
unsigned long orderedBytes = SampleCount * this->FrameSize; |
file_offset_t orderedBytes = SampleCount * this->FrameSize; |
909 |
unsigned long result = pCkData->SetPos(orderedBytes, Whence); |
file_offset_t result = pCkData->SetPos(orderedBytes, Whence); |
910 |
return (result == orderedBytes) ? SampleCount |
return (result == orderedBytes) ? SampleCount |
911 |
: result / this->FrameSize; |
: result / this->FrameSize; |
912 |
} |
} |
915 |
/** |
/** |
916 |
* Returns the current position in the sample (in sample points). |
* Returns the current position in the sample (in sample points). |
917 |
*/ |
*/ |
918 |
unsigned long Sample::GetPos() const { |
file_offset_t Sample::GetPos() const { |
919 |
if (Compressed) return SamplePos; |
if (Compressed) return SamplePos; |
920 |
else return pCkData->GetPos() / FrameSize; |
else return pCkData->GetPos() / FrameSize; |
921 |
} |
} |
954 |
* @returns number of successfully read sample points |
* @returns number of successfully read sample points |
955 |
* @see CreateDecompressionBuffer() |
* @see CreateDecompressionBuffer() |
956 |
*/ |
*/ |
957 |
unsigned long Sample::ReadAndLoop(void* pBuffer, unsigned long SampleCount, playback_state_t* pPlaybackState, |
file_offset_t Sample::ReadAndLoop(void* pBuffer, file_offset_t SampleCount, playback_state_t* pPlaybackState, |
958 |
DimensionRegion* pDimRgn, buffer_t* pExternalDecompressionBuffer) { |
DimensionRegion* pDimRgn, buffer_t* pExternalDecompressionBuffer) { |
959 |
unsigned long samplestoread = SampleCount, totalreadsamples = 0, readsamples, samplestoloopend; |
file_offset_t samplestoread = SampleCount, totalreadsamples = 0, readsamples, samplestoloopend; |
960 |
uint8_t* pDst = (uint8_t*) pBuffer; |
uint8_t* pDst = (uint8_t*) pBuffer; |
961 |
|
|
962 |
SetPos(pPlaybackState->position); // recover position from the last time |
SetPos(pPlaybackState->position); // recover position from the last time |
994 |
// reading, swap all sample frames so it reflects |
// reading, swap all sample frames so it reflects |
995 |
// backward playback |
// backward playback |
996 |
|
|
997 |
unsigned long swapareastart = totalreadsamples; |
file_offset_t swapareastart = totalreadsamples; |
998 |
unsigned long loopoffset = GetPos() - loop.LoopStart; |
file_offset_t loopoffset = GetPos() - loop.LoopStart; |
999 |
unsigned long samplestoreadinloop = Min(samplestoread, loopoffset); |
file_offset_t samplestoreadinloop = Min(samplestoread, loopoffset); |
1000 |
unsigned long reverseplaybackend = GetPos() - samplestoreadinloop; |
file_offset_t reverseplaybackend = GetPos() - samplestoreadinloop; |
1001 |
|
|
1002 |
SetPos(reverseplaybackend); |
SetPos(reverseplaybackend); |
1003 |
|
|
1045 |
// reading, swap all sample frames so it reflects |
// reading, swap all sample frames so it reflects |
1046 |
// backward playback |
// backward playback |
1047 |
|
|
1048 |
unsigned long swapareastart = totalreadsamples; |
file_offset_t swapareastart = totalreadsamples; |
1049 |
unsigned long loopoffset = GetPos() - loop.LoopStart; |
file_offset_t loopoffset = GetPos() - loop.LoopStart; |
1050 |
unsigned long samplestoreadinloop = (this->LoopPlayCount) ? Min(samplestoread, pPlaybackState->loop_cycles_left * loop.LoopLength - loopoffset) |
file_offset_t samplestoreadinloop = (this->LoopPlayCount) ? Min(samplestoread, pPlaybackState->loop_cycles_left * loop.LoopLength - loopoffset) |
1051 |
: samplestoread; |
: samplestoread; |
1052 |
unsigned long reverseplaybackend = loop.LoopStart + Abs((loopoffset - samplestoreadinloop) % loop.LoopLength); |
file_offset_t reverseplaybackend = loop.LoopStart + Abs((loopoffset - samplestoreadinloop) % loop.LoopLength); |
1053 |
|
|
1054 |
SetPos(reverseplaybackend); |
SetPos(reverseplaybackend); |
1055 |
|
|
1129 |
* @returns number of successfully read sample points |
* @returns number of successfully read sample points |
1130 |
* @see SetPos(), CreateDecompressionBuffer() |
* @see SetPos(), CreateDecompressionBuffer() |
1131 |
*/ |
*/ |
1132 |
unsigned long Sample::Read(void* pBuffer, unsigned long SampleCount, buffer_t* pExternalDecompressionBuffer) { |
file_offset_t Sample::Read(void* pBuffer, file_offset_t SampleCount, buffer_t* pExternalDecompressionBuffer) { |
1133 |
if (SampleCount == 0) return 0; |
if (SampleCount == 0) return 0; |
1134 |
if (!Compressed) { |
if (!Compressed) { |
1135 |
if (BitDepth == 24) { |
if (BitDepth == 24) { |
1144 |
else { |
else { |
1145 |
if (this->SamplePos >= this->SamplesTotal) return 0; |
if (this->SamplePos >= this->SamplesTotal) return 0; |
1146 |
//TODO: efficiency: maybe we should test for an average compression rate |
//TODO: efficiency: maybe we should test for an average compression rate |
1147 |
unsigned long assumedsize = GuessSize(SampleCount), |
file_offset_t assumedsize = GuessSize(SampleCount), |
1148 |
remainingbytes = 0, // remaining bytes in the local buffer |
remainingbytes = 0, // remaining bytes in the local buffer |
1149 |
remainingsamples = SampleCount, |
remainingsamples = SampleCount, |
1150 |
copysamples, skipsamples, |
copysamples, skipsamples, |
1167 |
remainingbytes = pCkData->Read(pSrc, assumedsize, 1); |
remainingbytes = pCkData->Read(pSrc, assumedsize, 1); |
1168 |
|
|
1169 |
while (remainingsamples && remainingbytes) { |
while (remainingsamples && remainingbytes) { |
1170 |
unsigned long framesamples = SamplesPerFrame; |
file_offset_t framesamples = SamplesPerFrame; |
1171 |
unsigned long framebytes, rightChannelOffset = 0, nextFrameOffset; |
file_offset_t framebytes, rightChannelOffset = 0, nextFrameOffset; |
1172 |
|
|
1173 |
int mode_l = *pSrc++, mode_r = 0; |
int mode_l = *pSrc++, mode_r = 0; |
1174 |
|
|
1318 |
* @throws gig::Exception if sample is compressed |
* @throws gig::Exception if sample is compressed |
1319 |
* @see DLS::LoadSampleData() |
* @see DLS::LoadSampleData() |
1320 |
*/ |
*/ |
1321 |
unsigned long Sample::Write(void* pBuffer, unsigned long SampleCount) { |
file_offset_t Sample::Write(void* pBuffer, file_offset_t SampleCount) { |
1322 |
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)"); |
1323 |
|
|
1324 |
// if this is the first write in this sample, reset the |
// if this is the first write in this sample, reset the |
1327 |
__resetCRC(crc); |
__resetCRC(crc); |
1328 |
} |
} |
1329 |
if (GetSize() < SampleCount) throw Exception("Could not write sample data, current sample size to small"); |
if (GetSize() < SampleCount) throw Exception("Could not write sample data, current sample size to small"); |
1330 |
unsigned long res; |
file_offset_t res; |
1331 |
if (BitDepth == 24) { |
if (BitDepth == 24) { |
1332 |
res = pCkData->Write(pBuffer, SampleCount * FrameSize, 1) / FrameSize; |
res = pCkData->Write(pBuffer, SampleCount * FrameSize, 1) / FrameSize; |
1333 |
} else { // 16 bit |
} else { // 16 bit |
1339 |
// if this is the last write, update the checksum chunk in the |
// if this is the last write, update the checksum chunk in the |
1340 |
// file |
// file |
1341 |
if (pCkData->GetPos() == pCkData->GetSize()) { |
if (pCkData->GetPos() == pCkData->GetSize()) { |
1342 |
|
__finalizeCRC(crc); |
1343 |
File* pFile = static_cast<File*>(GetParent()); |
File* pFile = static_cast<File*>(GetParent()); |
1344 |
pFile->SetSampleChecksum(this, __encodeCRC(crc)); |
pFile->SetSampleChecksum(this, crc); |
1345 |
} |
} |
1346 |
return res; |
return res; |
1347 |
} |
} |
1362 |
* @returns allocated decompression buffer |
* @returns allocated decompression buffer |
1363 |
* @see DestroyDecompressionBuffer() |
* @see DestroyDecompressionBuffer() |
1364 |
*/ |
*/ |
1365 |
buffer_t Sample::CreateDecompressionBuffer(unsigned long MaxReadSize) { |
buffer_t Sample::CreateDecompressionBuffer(file_offset_t MaxReadSize) { |
1366 |
buffer_t result; |
buffer_t result; |
1367 |
const double worstCaseHeaderOverhead = |
const double worstCaseHeaderOverhead = |
1368 |
(256.0 /*frame size*/ + 12.0 /*header*/ + 2.0 /*compression type flag (stereo)*/) / 256.0; |
(256.0 /*frame size*/ + 12.0 /*header*/ + 2.0 /*compression type flag (stereo)*/) / 256.0; |
1369 |
result.Size = (unsigned long) (double(MaxReadSize) * 3.0 /*(24 Bit)*/ * 2.0 /*stereo*/ * worstCaseHeaderOverhead); |
result.Size = (file_offset_t) (double(MaxReadSize) * 3.0 /*(24 Bit)*/ * 2.0 /*stereo*/ * worstCaseHeaderOverhead); |
1370 |
result.pStart = new int8_t[result.Size]; |
result.pStart = new int8_t[result.Size]; |
1371 |
result.NullExtensionSize = 0; |
result.NullExtensionSize = 0; |
1372 |
return result; |
return result; |
1400 |
return pGroup; |
return pGroup; |
1401 |
} |
} |
1402 |
|
|
1403 |
|
/** |
1404 |
|
* Returns the CRC-32 checksum of the sample's raw wave form data at the |
1405 |
|
* time when this sample's wave form data was modified for the last time |
1406 |
|
* by calling Write(). This checksum only covers the raw wave form data, |
1407 |
|
* not any meta informations like i.e. bit depth or loop points. Since |
1408 |
|
* this method just returns the checksum stored for this sample i.e. when |
1409 |
|
* the gig file was loaded, this method returns immediately. So it does no |
1410 |
|
* recalcuation of the checksum with the currently available sample wave |
1411 |
|
* form data. |
1412 |
|
* |
1413 |
|
* @see VerifyWaveData() |
1414 |
|
*/ |
1415 |
|
uint32_t Sample::GetWaveDataCRC32Checksum() { |
1416 |
|
return crc; |
1417 |
|
} |
1418 |
|
|
1419 |
|
/** |
1420 |
|
* Checks the integrity of this sample's raw audio wave data. Whenever a |
1421 |
|
* Sample's raw wave data is intentionally modified (i.e. by calling |
1422 |
|
* Write() and supplying the new raw audio wave form data) a CRC32 checksum |
1423 |
|
* is calculated and stored/updated for this sample, along to the sample's |
1424 |
|
* meta informations. |
1425 |
|
* |
1426 |
|
* Now by calling this method the current raw audio wave data is checked |
1427 |
|
* against the already stored CRC32 check sum in order to check whether the |
1428 |
|
* sample data had been damaged unintentionally for some reason. Since by |
1429 |
|
* calling this method always the entire raw audio wave data has to be |
1430 |
|
* read, verifying all samples this way may take a long time accordingly. |
1431 |
|
* And that's also the reason why the sample integrity is not checked by |
1432 |
|
* default whenever a gig file is loaded. So this method must be called |
1433 |
|
* explicitly to fulfill this task. |
1434 |
|
* |
1435 |
|
* @param pActually - (optional) if provided, will be set to the actually |
1436 |
|
* calculated checksum of the current raw wave form data, |
1437 |
|
* you can get the expected checksum instead by calling |
1438 |
|
* GetWaveDataCRC32Checksum() |
1439 |
|
* @returns true if sample is OK or false if the sample is damaged |
1440 |
|
* @throws Exception if no checksum had been stored to disk for this |
1441 |
|
* sample yet, or on I/O issues |
1442 |
|
* @see GetWaveDataCRC32Checksum() |
1443 |
|
*/ |
1444 |
|
bool Sample::VerifyWaveData(uint32_t* pActually) { |
1445 |
|
//File* pFile = static_cast<File*>(GetParent()); |
1446 |
|
uint32_t crc = CalculateWaveDataChecksum(); |
1447 |
|
if (pActually) *pActually = crc; |
1448 |
|
return crc == this->crc; |
1449 |
|
} |
1450 |
|
|
1451 |
|
uint32_t Sample::CalculateWaveDataChecksum() { |
1452 |
|
const size_t sz = 20*1024; // 20kB buffer size |
1453 |
|
std::vector<uint8_t> buffer(sz); |
1454 |
|
buffer.resize(sz); |
1455 |
|
|
1456 |
|
const size_t n = sz / FrameSize; |
1457 |
|
SetPos(0); |
1458 |
|
uint32_t crc = 0; |
1459 |
|
__resetCRC(crc); |
1460 |
|
while (true) { |
1461 |
|
file_offset_t nRead = Read(&buffer[0], n); |
1462 |
|
if (nRead <= 0) break; |
1463 |
|
__calculateCRC(&buffer[0], nRead * FrameSize, crc); |
1464 |
|
} |
1465 |
|
__finalizeCRC(crc); |
1466 |
|
return crc; |
1467 |
|
} |
1468 |
|
|
1469 |
Sample::~Sample() { |
Sample::~Sample() { |
1470 |
Instances--; |
Instances--; |
1471 |
if (!Instances && InternalDecompressionBuffer.Size) { |
if (!Instances && InternalDecompressionBuffer.Size) { |
1482 |
// *************** DimensionRegion *************** |
// *************** DimensionRegion *************** |
1483 |
// * |
// * |
1484 |
|
|
1485 |
uint DimensionRegion::Instances = 0; |
size_t DimensionRegion::Instances = 0; |
1486 |
DimensionRegion::VelocityTableMap* DimensionRegion::pVelocityTables = NULL; |
DimensionRegion::VelocityTableMap* DimensionRegion::pVelocityTables = NULL; |
1487 |
|
|
1488 |
DimensionRegion::DimensionRegion(Region* pParent, RIFF::List* _3ewl) : DLS::Sampler(_3ewl) { |
DimensionRegion::DimensionRegion(Region* pParent, RIFF::List* _3ewl) : DLS::Sampler(_3ewl) { |
1676 |
EG2Attack = 0.0; |
EG2Attack = 0.0; |
1677 |
EG2Decay1 = 0.005; |
EG2Decay1 = 0.005; |
1678 |
EG2Sustain = 1000; |
EG2Sustain = 1000; |
1679 |
EG2Release = 0.3; |
EG2Release = 60; |
1680 |
LFO2ControlDepth = 0; |
LFO2ControlDepth = 0; |
1681 |
LFO2Frequency = 1.0; |
LFO2Frequency = 1.0; |
1682 |
LFO2InternalDepth = 0; |
LFO2InternalDepth = 0; |
1730 |
VCFType = vcf_type_lowpass; |
VCFType = vcf_type_lowpass; |
1731 |
memset(DimensionUpperLimits, 127, 8); |
memset(DimensionUpperLimits, 127, 8); |
1732 |
} |
} |
1733 |
|
// format extension for EG behavior options, these will *NOT* work with |
1734 |
|
// Gigasampler/GigaStudio ! |
1735 |
|
RIFF::Chunk* lsde = _3ewl->GetSubChunk(CHUNK_ID_LSDE); |
1736 |
|
if (lsde) { |
1737 |
|
unsigned char byte = lsde->ReadUint8(); |
1738 |
|
EGOptions.AttackCancel = byte & 1; |
1739 |
|
EGOptions.AttackHoldCancel = byte & (1 << 1); |
1740 |
|
EGOptions.DecayCancel = byte & (1 << 2); |
1741 |
|
EGOptions.ReleaseCancel = byte & (1 << 3); |
1742 |
|
} |
1743 |
|
|
1744 |
pVelocityAttenuationTable = GetVelocityTable(VelocityResponseCurve, |
pVelocityAttenuationTable = GetVelocityTable(VelocityResponseCurve, |
1745 |
VelocityResponseDepth, |
VelocityResponseDepth, |
1845 |
} |
} |
1846 |
} |
} |
1847 |
|
|
1848 |
|
void DimensionRegion::serialize(Serialization::Archive* archive) { |
1849 |
|
// in case this class will become backward incompatible one day, |
1850 |
|
// then set a version and minimum version for this class like: |
1851 |
|
//archive->setVersion(*this, 2); |
1852 |
|
//archive->setMinVersion(*this, 1); |
1853 |
|
|
1854 |
|
SRLZ(VelocityUpperLimit); |
1855 |
|
SRLZ(EG1PreAttack); |
1856 |
|
SRLZ(EG1Attack); |
1857 |
|
SRLZ(EG1Decay1); |
1858 |
|
SRLZ(EG1Decay2); |
1859 |
|
SRLZ(EG1InfiniteSustain); |
1860 |
|
SRLZ(EG1Sustain); |
1861 |
|
SRLZ(EG1Release); |
1862 |
|
SRLZ(EG1Hold); |
1863 |
|
SRLZ(EG1Controller); |
1864 |
|
SRLZ(EG1ControllerInvert); |
1865 |
|
SRLZ(EG1ControllerAttackInfluence); |
1866 |
|
SRLZ(EG1ControllerDecayInfluence); |
1867 |
|
SRLZ(EG1ControllerReleaseInfluence); |
1868 |
|
SRLZ(LFO1Frequency); |
1869 |
|
SRLZ(LFO1InternalDepth); |
1870 |
|
SRLZ(LFO1ControlDepth); |
1871 |
|
SRLZ(LFO1Controller); |
1872 |
|
SRLZ(LFO1FlipPhase); |
1873 |
|
SRLZ(LFO1Sync); |
1874 |
|
SRLZ(EG2PreAttack); |
1875 |
|
SRLZ(EG2Attack); |
1876 |
|
SRLZ(EG2Decay1); |
1877 |
|
SRLZ(EG2Decay2); |
1878 |
|
SRLZ(EG2InfiniteSustain); |
1879 |
|
SRLZ(EG2Sustain); |
1880 |
|
SRLZ(EG2Release); |
1881 |
|
SRLZ(EG2Controller); |
1882 |
|
SRLZ(EG2ControllerInvert); |
1883 |
|
SRLZ(EG2ControllerAttackInfluence); |
1884 |
|
SRLZ(EG2ControllerDecayInfluence); |
1885 |
|
SRLZ(EG2ControllerReleaseInfluence); |
1886 |
|
SRLZ(LFO2Frequency); |
1887 |
|
SRLZ(LFO2InternalDepth); |
1888 |
|
SRLZ(LFO2ControlDepth); |
1889 |
|
SRLZ(LFO2Controller); |
1890 |
|
SRLZ(LFO2FlipPhase); |
1891 |
|
SRLZ(LFO2Sync); |
1892 |
|
SRLZ(EG3Attack); |
1893 |
|
SRLZ(EG3Depth); |
1894 |
|
SRLZ(LFO3Frequency); |
1895 |
|
SRLZ(LFO3InternalDepth); |
1896 |
|
SRLZ(LFO3ControlDepth); |
1897 |
|
SRLZ(LFO3Controller); |
1898 |
|
SRLZ(LFO3Sync); |
1899 |
|
SRLZ(VCFEnabled); |
1900 |
|
SRLZ(VCFType); |
1901 |
|
SRLZ(VCFCutoffController); |
1902 |
|
SRLZ(VCFCutoffControllerInvert); |
1903 |
|
SRLZ(VCFCutoff); |
1904 |
|
SRLZ(VCFVelocityCurve); |
1905 |
|
SRLZ(VCFVelocityScale); |
1906 |
|
SRLZ(VCFVelocityDynamicRange); |
1907 |
|
SRLZ(VCFResonance); |
1908 |
|
SRLZ(VCFResonanceDynamic); |
1909 |
|
SRLZ(VCFResonanceController); |
1910 |
|
SRLZ(VCFKeyboardTracking); |
1911 |
|
SRLZ(VCFKeyboardTrackingBreakpoint); |
1912 |
|
SRLZ(VelocityResponseCurve); |
1913 |
|
SRLZ(VelocityResponseDepth); |
1914 |
|
SRLZ(VelocityResponseCurveScaling); |
1915 |
|
SRLZ(ReleaseVelocityResponseCurve); |
1916 |
|
SRLZ(ReleaseVelocityResponseDepth); |
1917 |
|
SRLZ(ReleaseTriggerDecay); |
1918 |
|
SRLZ(Crossfade); |
1919 |
|
SRLZ(PitchTrack); |
1920 |
|
SRLZ(DimensionBypass); |
1921 |
|
SRLZ(Pan); |
1922 |
|
SRLZ(SelfMask); |
1923 |
|
SRLZ(AttenuationController); |
1924 |
|
SRLZ(InvertAttenuationController); |
1925 |
|
SRLZ(AttenuationControllerThreshold); |
1926 |
|
SRLZ(ChannelOffset); |
1927 |
|
SRLZ(SustainDefeat); |
1928 |
|
SRLZ(MSDecode); |
1929 |
|
//SRLZ(SampleStartOffset); |
1930 |
|
SRLZ(SampleAttenuation); |
1931 |
|
SRLZ(EGOptions); |
1932 |
|
|
1933 |
|
// derived attributes from DLS::Sampler |
1934 |
|
SRLZ(FineTune); |
1935 |
|
SRLZ(Gain); |
1936 |
|
} |
1937 |
|
|
1938 |
/** |
/** |
1939 |
* Updates the respective member variable and updates @c SampleAttenuation |
* Updates the respective member variable and updates @c SampleAttenuation |
1940 |
* which depends on this value. |
* which depends on this value. |
1950 |
* |
* |
1951 |
* Usually there is absolutely no need to call this method explicitly. |
* Usually there is absolutely no need to call this method explicitly. |
1952 |
* It will be called automatically when File::Save() was called. |
* It will be called automatically when File::Save() was called. |
1953 |
|
* |
1954 |
|
* @param pProgress - callback function for progress notification |
1955 |
*/ |
*/ |
1956 |
void DimensionRegion::UpdateChunks() { |
void DimensionRegion::UpdateChunks(progress_t* pProgress) { |
1957 |
// first update base class's chunk |
// first update base class's chunk |
1958 |
DLS::Sampler::UpdateChunks(); |
DLS::Sampler::UpdateChunks(pProgress); |
1959 |
|
|
1960 |
RIFF::Chunk* wsmp = pParentList->GetSubChunk(CHUNK_ID_WSMP); |
RIFF::Chunk* wsmp = pParentList->GetSubChunk(CHUNK_ID_WSMP); |
1961 |
uint8_t* pData = (uint8_t*) wsmp->LoadChunkData(); |
uint8_t* pData = (uint8_t*) wsmp->LoadChunkData(); |
1975 |
|
|
1976 |
// update '3ewa' chunk with DimensionRegion's current settings |
// update '3ewa' chunk with DimensionRegion's current settings |
1977 |
|
|
1978 |
const uint32_t chunksize = _3ewa->GetNewSize(); |
const uint32_t chunksize = (uint32_t) _3ewa->GetNewSize(); |
1979 |
store32(&pData[0], chunksize); // unknown, always chunk size? |
store32(&pData[0], chunksize); // unknown, always chunk size? |
1980 |
|
|
1981 |
const int32_t lfo3freq = (int32_t) GIG_EXP_ENCODE(LFO3Frequency); |
const int32_t lfo3freq = (int32_t) GIG_EXP_ENCODE(LFO3Frequency); |
2235 |
if (chunksize >= 148) { |
if (chunksize >= 148) { |
2236 |
memcpy(&pData[140], DimensionUpperLimits, 8); |
memcpy(&pData[140], DimensionUpperLimits, 8); |
2237 |
} |
} |
2238 |
|
|
2239 |
|
// format extension for EG behavior options, these will *NOT* work with |
2240 |
|
// Gigasampler/GigaStudio ! |
2241 |
|
RIFF::Chunk* lsde = pParentList->GetSubChunk(CHUNK_ID_LSDE); |
2242 |
|
if (!lsde) { |
2243 |
|
// only add this "LSDE" chunk if the EG options do not match the |
2244 |
|
// default EG behavior |
2245 |
|
eg_opt_t defaultOpt; |
2246 |
|
if (memcmp(&EGOptions, &defaultOpt, sizeof(eg_opt_t))) { |
2247 |
|
lsde = pParentList->AddSubChunk(CHUNK_ID_LSDE, 1); |
2248 |
|
// move LSDE chunk to the end of parent list |
2249 |
|
pParentList->MoveSubChunk(lsde, (RIFF::Chunk*)NULL); |
2250 |
|
} |
2251 |
|
} |
2252 |
|
if (lsde) { |
2253 |
|
unsigned char* pByte = (unsigned char*) lsde->LoadChunkData(); |
2254 |
|
*pByte = |
2255 |
|
(EGOptions.AttackCancel ? 1 : 0) | |
2256 |
|
(EGOptions.AttackHoldCancel ? (1<<1) : 0) | |
2257 |
|
(EGOptions.DecayCancel ? (1<<2) : 0) | |
2258 |
|
(EGOptions.ReleaseCancel ? (1<<3) : 0); |
2259 |
|
} |
2260 |
} |
} |
2261 |
|
|
2262 |
double* DimensionRegion::GetReleaseVelocityTable(curve_type_t releaseVelocityResponseCurve, uint8_t releaseVelocityResponseDepth) { |
double* DimensionRegion::GetReleaseVelocityTable(curve_type_t releaseVelocityResponseCurve, uint8_t releaseVelocityResponseDepth) { |
2671 |
|
|
2672 |
// unknown controller type |
// unknown controller type |
2673 |
default: |
default: |
2674 |
throw gig::Exception("Unknown leverage controller type."); |
decodedcontroller.type = leverage_ctrl_t::type_none; |
2675 |
|
decodedcontroller.controller_number = 0; |
2676 |
|
printf("Warning: Unknown leverage controller type (0x%x).\n", EncodedController); |
2677 |
|
break; |
2678 |
} |
} |
2679 |
return decodedcontroller; |
return decodedcontroller; |
2680 |
} |
} |
3251 |
* Usually there is absolutely no need to call this method explicitly. |
* Usually there is absolutely no need to call this method explicitly. |
3252 |
* It will be called automatically when File::Save() was called. |
* It will be called automatically when File::Save() was called. |
3253 |
* |
* |
3254 |
|
* @param pProgress - callback function for progress notification |
3255 |
* @throws gig::Exception if samples cannot be dereferenced |
* @throws gig::Exception if samples cannot be dereferenced |
3256 |
*/ |
*/ |
3257 |
void Region::UpdateChunks() { |
void Region::UpdateChunks(progress_t* pProgress) { |
3258 |
// in the gig format we don't care about the Region's sample reference |
// in the gig format we don't care about the Region's sample reference |
3259 |
// but we still have to provide some existing one to not corrupt the |
// but we still have to provide some existing one to not corrupt the |
3260 |
// file, so to avoid the latter we simply always assign the sample of |
// file, so to avoid the latter we simply always assign the sample of |
3262 |
pSample = pDimensionRegions[0]->pSample; |
pSample = pDimensionRegions[0]->pSample; |
3263 |
|
|
3264 |
// first update base class's chunks |
// first update base class's chunks |
3265 |
DLS::Region::UpdateChunks(); |
DLS::Region::UpdateChunks(pProgress); |
3266 |
|
|
3267 |
// update dimension region's chunks |
// update dimension region's chunks |
3268 |
for (int i = 0; i < DimensionRegions; i++) { |
for (int i = 0; i < DimensionRegions; i++) { |
3269 |
pDimensionRegions[i]->UpdateChunks(); |
pDimensionRegions[i]->UpdateChunks(pProgress); |
3270 |
} |
} |
3271 |
|
|
3272 |
File* pFile = (File*) GetParent()->GetParent(); |
File* pFile = (File*) GetParent()->GetParent(); |
3282 |
memset(_3lnk->LoadChunkData(), 0, _3lnkChunkSize); |
memset(_3lnk->LoadChunkData(), 0, _3lnkChunkSize); |
3283 |
|
|
3284 |
// move 3prg to last position |
// move 3prg to last position |
3285 |
pCkRegion->MoveSubChunk(pCkRegion->GetSubList(LIST_TYPE_3PRG), 0); |
pCkRegion->MoveSubChunk(pCkRegion->GetSubList(LIST_TYPE_3PRG), (RIFF::Chunk*)NULL); |
3286 |
} |
} |
3287 |
|
|
3288 |
// update dimension definitions in '3lnk' chunk |
// update dimension definitions in '3lnk' chunk |
3356 |
int step = 1; |
int step = 1; |
3357 |
for (int i = 0 ; i < veldim ; i++) step <<= pDimensionDefinitions[i].bits; |
for (int i = 0 ; i < veldim ; i++) step <<= pDimensionDefinitions[i].bits; |
3358 |
int skipveldim = (step << pDimensionDefinitions[veldim].bits) - step; |
int skipveldim = (step << pDimensionDefinitions[veldim].bits) - step; |
|
int end = step * pDimensionDefinitions[veldim].zones; |
|
3359 |
|
|
3360 |
// loop through all dimension regions for all dimensions except the velocity dimension |
// loop through all dimension regions for all dimensions except the velocity dimension |
3361 |
int dim[8] = { 0 }; |
int dim[8] = { 0 }; |
3362 |
for (int i = 0 ; i < DimensionRegions ; i++) { |
for (int i = 0 ; i < DimensionRegions ; i++) { |
3363 |
|
const int end = i + step * pDimensionDefinitions[veldim].zones; |
3364 |
|
|
3365 |
|
// create a velocity table for all cases where the velocity zone is zero |
3366 |
if (pDimensionRegions[i]->DimensionUpperLimits[veldim] || |
if (pDimensionRegions[i]->DimensionUpperLimits[veldim] || |
3367 |
pDimensionRegions[i]->VelocityUpperLimit) { |
pDimensionRegions[i]->VelocityUpperLimit) { |
3368 |
// create the velocity table |
// create the velocity table |
3393 |
} |
} |
3394 |
} |
} |
3395 |
|
|
3396 |
|
// jump to the next case where the velocity zone is zero |
3397 |
int j; |
int j; |
3398 |
int shift = 0; |
int shift = 0; |
3399 |
for (j = 0 ; j < Dimensions ; j++) { |
for (j = 0 ; j < Dimensions ; j++) { |
3880 |
UpdateVelocityTable(); |
UpdateVelocityTable(); |
3881 |
} |
} |
3882 |
|
|
3883 |
|
/** @brief Change type of an existing dimension. |
3884 |
|
* |
3885 |
|
* Alters the dimension type of a dimension already existing on this |
3886 |
|
* region. If there is currently no dimension on this Region with type |
3887 |
|
* @a oldType, then this call with throw an Exception. Likewise there are |
3888 |
|
* cases where the requested dimension type cannot be performed. For example |
3889 |
|
* if the new dimension type shall be gig::dimension_samplechannel, and the |
3890 |
|
* current dimension has more than 2 zones. In such cases an Exception is |
3891 |
|
* thrown as well. |
3892 |
|
* |
3893 |
|
* @param oldType - identifies the existing dimension to be changed |
3894 |
|
* @param newType - to which dimension type it should be changed to |
3895 |
|
* @throws gig::Exception if requested change cannot be performed |
3896 |
|
*/ |
3897 |
|
void Region::SetDimensionType(dimension_t oldType, dimension_t newType) { |
3898 |
|
if (oldType == newType) return; |
3899 |
|
dimension_def_t* def = GetDimensionDefinition(oldType); |
3900 |
|
if (!def) |
3901 |
|
throw gig::Exception("No dimension with provided old dimension type exists on this region"); |
3902 |
|
if (newType == dimension_samplechannel && def->zones != 2) |
3903 |
|
throw gig::Exception("Cannot change to dimension type 'sample channel', because existing dimension does not have 2 zones"); |
3904 |
|
if (GetDimensionDefinition(newType)) |
3905 |
|
throw gig::Exception("There is already a dimension with requested new dimension type on this region"); |
3906 |
|
def->dimension = newType; |
3907 |
|
def->split_type = __resolveSplitType(newType); |
3908 |
|
} |
3909 |
|
|
3910 |
DimensionRegion* Region::GetDimensionRegionByBit(const std::map<dimension_t,int>& DimCase) { |
DimensionRegion* Region::GetDimensionRegionByBit(const std::map<dimension_t,int>& DimCase) { |
3911 |
uint8_t bits[8] = {}; |
uint8_t bits[8] = {}; |
3912 |
for (std::map<dimension_t,int>::const_iterator it = DimCase.begin(); |
for (std::map<dimension_t,int>::const_iterator it = DimCase.begin(); |
3968 |
DimensionRegion* Region::GetDimensionRegionByValue(const uint DimValues[8]) { |
DimensionRegion* Region::GetDimensionRegionByValue(const uint DimValues[8]) { |
3969 |
uint8_t bits; |
uint8_t bits; |
3970 |
int veldim = -1; |
int veldim = -1; |
3971 |
int velbitpos; |
int velbitpos = 0; |
3972 |
int bitpos = 0; |
int bitpos = 0; |
3973 |
int dimregidx = 0; |
int dimregidx = 0; |
3974 |
for (uint i = 0; i < Dimensions; i++) { |
for (uint i = 0; i < Dimensions; i++) { |
3998 |
} |
} |
3999 |
bitpos += pDimensionDefinitions[i].bits; |
bitpos += pDimensionDefinitions[i].bits; |
4000 |
} |
} |
4001 |
DimensionRegion* dimreg = pDimensionRegions[dimregidx]; |
DimensionRegion* dimreg = pDimensionRegions[dimregidx & 255]; |
4002 |
|
if (!dimreg) return NULL; |
4003 |
if (veldim != -1) { |
if (veldim != -1) { |
4004 |
// (dimreg is now the dimension region for the lowest velocity) |
// (dimreg is now the dimension region for the lowest velocity) |
4005 |
if (dimreg->VelocityTable) // custom defined zone ranges |
if (dimreg->VelocityTable) // custom defined zone ranges |
4006 |
bits = dimreg->VelocityTable[DimValues[veldim]]; |
bits = dimreg->VelocityTable[DimValues[veldim] & 127]; |
4007 |
else // normal split type |
else // normal split type |
4008 |
bits = uint8_t(DimValues[veldim] / pDimensionDefinitions[veldim].zone_size); |
bits = uint8_t((DimValues[veldim] & 127) / pDimensionDefinitions[veldim].zone_size); |
4009 |
|
|
4010 |
dimregidx |= bits << velbitpos; |
const uint8_t limiter_mask = (1 << pDimensionDefinitions[veldim].bits) - 1; |
4011 |
dimreg = pDimensionRegions[dimregidx]; |
dimregidx |= (bits & limiter_mask) << velbitpos; |
4012 |
|
dimreg = pDimensionRegions[dimregidx & 255]; |
4013 |
} |
} |
4014 |
return dimreg; |
return dimreg; |
4015 |
} |
} |
4016 |
|
|
4017 |
|
int Region::GetDimensionRegionIndexByValue(const uint DimValues[8]) { |
4018 |
|
uint8_t bits; |
4019 |
|
int veldim = -1; |
4020 |
|
int velbitpos = 0; |
4021 |
|
int bitpos = 0; |
4022 |
|
int dimregidx = 0; |
4023 |
|
for (uint i = 0; i < Dimensions; i++) { |
4024 |
|
if (pDimensionDefinitions[i].dimension == dimension_velocity) { |
4025 |
|
// the velocity dimension must be handled after the other dimensions |
4026 |
|
veldim = i; |
4027 |
|
velbitpos = bitpos; |
4028 |
|
} else { |
4029 |
|
switch (pDimensionDefinitions[i].split_type) { |
4030 |
|
case split_type_normal: |
4031 |
|
if (pDimensionRegions[0]->DimensionUpperLimits[i]) { |
4032 |
|
// gig3: all normal dimensions (not just the velocity dimension) have custom zone ranges |
4033 |
|
for (bits = 0 ; bits < pDimensionDefinitions[i].zones ; bits++) { |
4034 |
|
if (DimValues[i] <= pDimensionRegions[bits << bitpos]->DimensionUpperLimits[i]) break; |
4035 |
|
} |
4036 |
|
} else { |
4037 |
|
// gig2: evenly sized zones |
4038 |
|
bits = uint8_t(DimValues[i] / pDimensionDefinitions[i].zone_size); |
4039 |
|
} |
4040 |
|
break; |
4041 |
|
case split_type_bit: // the value is already the sought dimension bit number |
4042 |
|
const uint8_t limiter_mask = (0xff << pDimensionDefinitions[i].bits) ^ 0xff; |
4043 |
|
bits = DimValues[i] & limiter_mask; // just make sure the value doesn't use more bits than allowed |
4044 |
|
break; |
4045 |
|
} |
4046 |
|
dimregidx |= bits << bitpos; |
4047 |
|
} |
4048 |
|
bitpos += pDimensionDefinitions[i].bits; |
4049 |
|
} |
4050 |
|
dimregidx &= 255; |
4051 |
|
DimensionRegion* dimreg = pDimensionRegions[dimregidx]; |
4052 |
|
if (!dimreg) return -1; |
4053 |
|
if (veldim != -1) { |
4054 |
|
// (dimreg is now the dimension region for the lowest velocity) |
4055 |
|
if (dimreg->VelocityTable) // custom defined zone ranges |
4056 |
|
bits = dimreg->VelocityTable[DimValues[veldim] & 127]; |
4057 |
|
else // normal split type |
4058 |
|
bits = uint8_t((DimValues[veldim] & 127) / pDimensionDefinitions[veldim].zone_size); |
4059 |
|
|
4060 |
|
const uint8_t limiter_mask = (1 << pDimensionDefinitions[veldim].bits) - 1; |
4061 |
|
dimregidx |= (bits & limiter_mask) << velbitpos; |
4062 |
|
dimregidx &= 255; |
4063 |
|
} |
4064 |
|
return dimregidx; |
4065 |
|
} |
4066 |
|
|
4067 |
/** |
/** |
4068 |
* Returns the appropriate DimensionRegion for the given dimension bit |
* Returns the appropriate DimensionRegion for the given dimension bit |
4069 |
* numbers (zone index). You usually use <i>GetDimensionRegionByValue</i> |
* numbers (zone index). You usually use <i>GetDimensionRegionByValue</i> |
4102 |
if ((int32_t)WavePoolTableIndex == -1) return NULL; |
if ((int32_t)WavePoolTableIndex == -1) return NULL; |
4103 |
File* file = (File*) GetParent()->GetParent(); |
File* file = (File*) GetParent()->GetParent(); |
4104 |
if (!file->pWavePoolTable) return NULL; |
if (!file->pWavePoolTable) return NULL; |
4105 |
unsigned long soughtoffset = file->pWavePoolTable[WavePoolTableIndex]; |
// for new files or files >= 2 GB use 64 bit wave pool offsets |
4106 |
unsigned long soughtfileno = file->pWavePoolTableHi[WavePoolTableIndex]; |
if (file->pRIFF->IsNew() || (file->pRIFF->GetCurrentFileSize() >> 31)) { |
4107 |
Sample* sample = file->GetFirstSample(pProgress); |
// use 64 bit wave pool offsets (treating this as large file) |
4108 |
while (sample) { |
uint64_t soughtoffset = |
4109 |
if (sample->ulWavePoolOffset == soughtoffset && |
uint64_t(file->pWavePoolTable[WavePoolTableIndex]) | |
4110 |
sample->FileNo == soughtfileno) return static_cast<gig::Sample*>(sample); |
uint64_t(file->pWavePoolTableHi[WavePoolTableIndex]) << 32; |
4111 |
sample = file->GetNextSample(); |
Sample* sample = file->GetFirstSample(pProgress); |
4112 |
|
while (sample) { |
4113 |
|
if (sample->ullWavePoolOffset == soughtoffset) |
4114 |
|
return static_cast<gig::Sample*>(sample); |
4115 |
|
sample = file->GetNextSample(); |
4116 |
|
} |
4117 |
|
} else { |
4118 |
|
// use extension files and 32 bit wave pool offsets |
4119 |
|
file_offset_t soughtoffset = file->pWavePoolTable[WavePoolTableIndex]; |
4120 |
|
file_offset_t soughtfileno = file->pWavePoolTableHi[WavePoolTableIndex]; |
4121 |
|
Sample* sample = file->GetFirstSample(pProgress); |
4122 |
|
while (sample) { |
4123 |
|
if (sample->ullWavePoolOffset == soughtoffset && |
4124 |
|
sample->FileNo == soughtfileno) return static_cast<gig::Sample*>(sample); |
4125 |
|
sample = file->GetNextSample(); |
4126 |
|
} |
4127 |
} |
} |
4128 |
return NULL; |
return NULL; |
4129 |
} |
} |
4345 |
} |
} |
4346 |
} |
} |
4347 |
|
|
4348 |
|
// *************** Script *************** |
4349 |
|
// * |
4350 |
|
|
4351 |
|
Script::Script(ScriptGroup* group, RIFF::Chunk* ckScri) { |
4352 |
|
pGroup = group; |
4353 |
|
pChunk = ckScri; |
4354 |
|
if (ckScri) { // object is loaded from file ... |
4355 |
|
// read header |
4356 |
|
uint32_t headerSize = ckScri->ReadUint32(); |
4357 |
|
Compression = (Compression_t) ckScri->ReadUint32(); |
4358 |
|
Encoding = (Encoding_t) ckScri->ReadUint32(); |
4359 |
|
Language = (Language_t) ckScri->ReadUint32(); |
4360 |
|
Bypass = (Language_t) ckScri->ReadUint32() & 1; |
4361 |
|
crc = ckScri->ReadUint32(); |
4362 |
|
uint32_t nameSize = ckScri->ReadUint32(); |
4363 |
|
Name.resize(nameSize, ' '); |
4364 |
|
for (int i = 0; i < nameSize; ++i) |
4365 |
|
Name[i] = ckScri->ReadUint8(); |
4366 |
|
// to handle potential future extensions of the header |
4367 |
|
ckScri->SetPos(sizeof(int32_t) + headerSize); |
4368 |
|
// read actual script data |
4369 |
|
uint32_t scriptSize = uint32_t(ckScri->GetSize() - ckScri->GetPos()); |
4370 |
|
data.resize(scriptSize); |
4371 |
|
for (int i = 0; i < scriptSize; ++i) |
4372 |
|
data[i] = ckScri->ReadUint8(); |
4373 |
|
} else { // this is a new script object, so just initialize it as such ... |
4374 |
|
Compression = COMPRESSION_NONE; |
4375 |
|
Encoding = ENCODING_ASCII; |
4376 |
|
Language = LANGUAGE_NKSP; |
4377 |
|
Bypass = false; |
4378 |
|
crc = 0; |
4379 |
|
Name = "Unnamed Script"; |
4380 |
|
} |
4381 |
|
} |
4382 |
|
|
4383 |
|
Script::~Script() { |
4384 |
|
} |
4385 |
|
|
4386 |
|
/** |
4387 |
|
* Returns the current script (i.e. as source code) in text format. |
4388 |
|
*/ |
4389 |
|
String Script::GetScriptAsText() { |
4390 |
|
String s; |
4391 |
|
s.resize(data.size(), ' '); |
4392 |
|
memcpy(&s[0], &data[0], data.size()); |
4393 |
|
return s; |
4394 |
|
} |
4395 |
|
|
4396 |
|
/** |
4397 |
|
* Replaces the current script with the new script source code text given |
4398 |
|
* by @a text. |
4399 |
|
* |
4400 |
|
* @param text - new script source code |
4401 |
|
*/ |
4402 |
|
void Script::SetScriptAsText(const String& text) { |
4403 |
|
data.resize(text.size()); |
4404 |
|
memcpy(&data[0], &text[0], text.size()); |
4405 |
|
} |
4406 |
|
|
4407 |
|
/** |
4408 |
|
* Apply this script to the respective RIFF chunks. You have to call |
4409 |
|
* File::Save() to make changes persistent. |
4410 |
|
* |
4411 |
|
* Usually there is absolutely no need to call this method explicitly. |
4412 |
|
* It will be called automatically when File::Save() was called. |
4413 |
|
* |
4414 |
|
* @param pProgress - callback function for progress notification |
4415 |
|
*/ |
4416 |
|
void Script::UpdateChunks(progress_t* pProgress) { |
4417 |
|
// recalculate CRC32 check sum |
4418 |
|
__resetCRC(crc); |
4419 |
|
__calculateCRC(&data[0], data.size(), crc); |
4420 |
|
__finalizeCRC(crc); |
4421 |
|
// make sure chunk exists and has the required size |
4422 |
|
const file_offset_t chunkSize = (file_offset_t) 7*sizeof(int32_t) + Name.size() + data.size(); |
4423 |
|
if (!pChunk) pChunk = pGroup->pList->AddSubChunk(CHUNK_ID_SCRI, chunkSize); |
4424 |
|
else pChunk->Resize(chunkSize); |
4425 |
|
// fill the chunk data to be written to disk |
4426 |
|
uint8_t* pData = (uint8_t*) pChunk->LoadChunkData(); |
4427 |
|
int pos = 0; |
4428 |
|
store32(&pData[pos], uint32_t(6*sizeof(int32_t) + Name.size())); // total header size |
4429 |
|
pos += sizeof(int32_t); |
4430 |
|
store32(&pData[pos], Compression); |
4431 |
|
pos += sizeof(int32_t); |
4432 |
|
store32(&pData[pos], Encoding); |
4433 |
|
pos += sizeof(int32_t); |
4434 |
|
store32(&pData[pos], Language); |
4435 |
|
pos += sizeof(int32_t); |
4436 |
|
store32(&pData[pos], Bypass ? 1 : 0); |
4437 |
|
pos += sizeof(int32_t); |
4438 |
|
store32(&pData[pos], crc); |
4439 |
|
pos += sizeof(int32_t); |
4440 |
|
store32(&pData[pos], (uint32_t) Name.size()); |
4441 |
|
pos += sizeof(int32_t); |
4442 |
|
for (int i = 0; i < Name.size(); ++i, ++pos) |
4443 |
|
pData[pos] = Name[i]; |
4444 |
|
for (int i = 0; i < data.size(); ++i, ++pos) |
4445 |
|
pData[pos] = data[i]; |
4446 |
|
} |
4447 |
|
|
4448 |
|
/** |
4449 |
|
* Move this script from its current ScriptGroup to another ScriptGroup |
4450 |
|
* given by @a pGroup. |
4451 |
|
* |
4452 |
|
* @param pGroup - script's new group |
4453 |
|
*/ |
4454 |
|
void Script::SetGroup(ScriptGroup* pGroup) { |
4455 |
|
if (this->pGroup == pGroup) return; |
4456 |
|
if (pChunk) |
4457 |
|
pChunk->GetParent()->MoveSubChunk(pChunk, pGroup->pList); |
4458 |
|
this->pGroup = pGroup; |
4459 |
|
} |
4460 |
|
|
4461 |
|
/** |
4462 |
|
* Returns the script group this script currently belongs to. Each script |
4463 |
|
* is a member of exactly one ScriptGroup. |
4464 |
|
* |
4465 |
|
* @returns current script group |
4466 |
|
*/ |
4467 |
|
ScriptGroup* Script::GetGroup() const { |
4468 |
|
return pGroup; |
4469 |
|
} |
4470 |
|
|
4471 |
|
/** |
4472 |
|
* Make a (semi) deep copy of the Script object given by @a orig |
4473 |
|
* and assign it to this object. Note: the ScriptGroup this Script |
4474 |
|
* object belongs to remains untouched by this call. |
4475 |
|
* |
4476 |
|
* @param orig - original Script object to be copied from |
4477 |
|
*/ |
4478 |
|
void Script::CopyAssign(const Script* orig) { |
4479 |
|
Name = orig->Name; |
4480 |
|
Compression = orig->Compression; |
4481 |
|
Encoding = orig->Encoding; |
4482 |
|
Language = orig->Language; |
4483 |
|
Bypass = orig->Bypass; |
4484 |
|
data = orig->data; |
4485 |
|
} |
4486 |
|
|
4487 |
|
void Script::RemoveAllScriptReferences() { |
4488 |
|
File* pFile = pGroup->pFile; |
4489 |
|
for (int i = 0; pFile->GetInstrument(i); ++i) { |
4490 |
|
Instrument* instr = pFile->GetInstrument(i); |
4491 |
|
instr->RemoveScript(this); |
4492 |
|
} |
4493 |
|
} |
4494 |
|
|
4495 |
|
// *************** ScriptGroup *************** |
4496 |
|
// * |
4497 |
|
|
4498 |
|
ScriptGroup::ScriptGroup(File* file, RIFF::List* lstRTIS) { |
4499 |
|
pFile = file; |
4500 |
|
pList = lstRTIS; |
4501 |
|
pScripts = NULL; |
4502 |
|
if (lstRTIS) { |
4503 |
|
RIFF::Chunk* ckName = lstRTIS->GetSubChunk(CHUNK_ID_LSNM); |
4504 |
|
::LoadString(ckName, Name); |
4505 |
|
} else { |
4506 |
|
Name = "Default Group"; |
4507 |
|
} |
4508 |
|
} |
4509 |
|
|
4510 |
|
ScriptGroup::~ScriptGroup() { |
4511 |
|
if (pScripts) { |
4512 |
|
std::list<Script*>::iterator iter = pScripts->begin(); |
4513 |
|
std::list<Script*>::iterator end = pScripts->end(); |
4514 |
|
while (iter != end) { |
4515 |
|
delete *iter; |
4516 |
|
++iter; |
4517 |
|
} |
4518 |
|
delete pScripts; |
4519 |
|
} |
4520 |
|
} |
4521 |
|
|
4522 |
|
/** |
4523 |
|
* Apply this script group to the respective RIFF chunks. You have to call |
4524 |
|
* File::Save() to make changes persistent. |
4525 |
|
* |
4526 |
|
* Usually there is absolutely no need to call this method explicitly. |
4527 |
|
* It will be called automatically when File::Save() was called. |
4528 |
|
* |
4529 |
|
* @param pProgress - callback function for progress notification |
4530 |
|
*/ |
4531 |
|
void ScriptGroup::UpdateChunks(progress_t* pProgress) { |
4532 |
|
if (pScripts) { |
4533 |
|
if (!pList) |
4534 |
|
pList = pFile->pRIFF->GetSubList(LIST_TYPE_3LS)->AddSubList(LIST_TYPE_RTIS); |
4535 |
|
|
4536 |
|
// now store the name of this group as <LSNM> chunk as subchunk of the <RTIS> list chunk |
4537 |
|
::SaveString(CHUNK_ID_LSNM, NULL, pList, Name, String("Unnamed Group"), true, 64); |
4538 |
|
|
4539 |
|
for (std::list<Script*>::iterator it = pScripts->begin(); |
4540 |
|
it != pScripts->end(); ++it) |
4541 |
|
{ |
4542 |
|
(*it)->UpdateChunks(pProgress); |
4543 |
|
} |
4544 |
|
} |
4545 |
|
} |
4546 |
|
|
4547 |
|
/** @brief Get instrument script. |
4548 |
|
* |
4549 |
|
* Returns the real-time instrument script with the given index. |
4550 |
|
* |
4551 |
|
* @param index - number of the sought script (0..n) |
4552 |
|
* @returns sought script or NULL if there's no such script |
4553 |
|
*/ |
4554 |
|
Script* ScriptGroup::GetScript(uint index) { |
4555 |
|
if (!pScripts) LoadScripts(); |
4556 |
|
std::list<Script*>::iterator it = pScripts->begin(); |
4557 |
|
for (uint i = 0; it != pScripts->end(); ++i, ++it) |
4558 |
|
if (i == index) return *it; |
4559 |
|
return NULL; |
4560 |
|
} |
4561 |
|
|
4562 |
|
/** @brief Add new instrument script. |
4563 |
|
* |
4564 |
|
* Adds a new real-time instrument script to the file. The script is not |
4565 |
|
* actually used / executed unless it is referenced by an instrument to be |
4566 |
|
* used. This is similar to samples, which you can add to a file, without |
4567 |
|
* an instrument necessarily actually using it. |
4568 |
|
* |
4569 |
|
* You have to call Save() to make this persistent to the file. |
4570 |
|
* |
4571 |
|
* @return new empty script object |
4572 |
|
*/ |
4573 |
|
Script* ScriptGroup::AddScript() { |
4574 |
|
if (!pScripts) LoadScripts(); |
4575 |
|
Script* pScript = new Script(this, NULL); |
4576 |
|
pScripts->push_back(pScript); |
4577 |
|
return pScript; |
4578 |
|
} |
4579 |
|
|
4580 |
|
/** @brief Delete an instrument script. |
4581 |
|
* |
4582 |
|
* This will delete the given real-time instrument script. References of |
4583 |
|
* instruments that are using that script will be removed accordingly. |
4584 |
|
* |
4585 |
|
* You have to call Save() to make this persistent to the file. |
4586 |
|
* |
4587 |
|
* @param pScript - script to delete |
4588 |
|
* @throws gig::Exception if given script could not be found |
4589 |
|
*/ |
4590 |
|
void ScriptGroup::DeleteScript(Script* pScript) { |
4591 |
|
if (!pScripts) LoadScripts(); |
4592 |
|
std::list<Script*>::iterator iter = |
4593 |
|
find(pScripts->begin(), pScripts->end(), pScript); |
4594 |
|
if (iter == pScripts->end()) |
4595 |
|
throw gig::Exception("Could not delete script, could not find given script"); |
4596 |
|
pScripts->erase(iter); |
4597 |
|
pScript->RemoveAllScriptReferences(); |
4598 |
|
if (pScript->pChunk) |
4599 |
|
pScript->pChunk->GetParent()->DeleteSubChunk(pScript->pChunk); |
4600 |
|
delete pScript; |
4601 |
|
} |
4602 |
|
|
4603 |
|
void ScriptGroup::LoadScripts() { |
4604 |
|
if (pScripts) return; |
4605 |
|
pScripts = new std::list<Script*>; |
4606 |
|
if (!pList) return; |
4607 |
|
|
4608 |
|
for (RIFF::Chunk* ck = pList->GetFirstSubChunk(); ck; |
4609 |
|
ck = pList->GetNextSubChunk()) |
4610 |
|
{ |
4611 |
|
if (ck->GetChunkID() == CHUNK_ID_SCRI) { |
4612 |
|
pScripts->push_back(new Script(this, ck)); |
4613 |
|
} |
4614 |
|
} |
4615 |
|
} |
4616 |
|
|
4617 |
// *************** Instrument *************** |
// *************** Instrument *************** |
4618 |
// * |
// * |
4619 |
|
|
4630 |
EffectSend = 0; |
EffectSend = 0; |
4631 |
Attenuation = 0; |
Attenuation = 0; |
4632 |
FineTune = 0; |
FineTune = 0; |
4633 |
PitchbendRange = 0; |
PitchbendRange = 2; |
4634 |
PianoReleaseMode = false; |
PianoReleaseMode = false; |
4635 |
DimensionKeyRange.low = 0; |
DimensionKeyRange.low = 0; |
4636 |
DimensionKeyRange.high = 0; |
DimensionKeyRange.high = 0; |
4637 |
pMidiRules = new MidiRule*[3]; |
pMidiRules = new MidiRule*[3]; |
4638 |
pMidiRules[0] = NULL; |
pMidiRules[0] = NULL; |
4639 |
|
pScriptRefs = NULL; |
4640 |
|
|
4641 |
// Loading |
// Loading |
4642 |
RIFF::List* lart = insList->GetSubList(LIST_TYPE_LART); |
RIFF::List* lart = insList->GetSubList(LIST_TYPE_LART); |
4697 |
} |
} |
4698 |
} |
} |
4699 |
|
|
4700 |
|
// own gig format extensions |
4701 |
|
RIFF::List* lst3LS = insList->GetSubList(LIST_TYPE_3LS); |
4702 |
|
if (lst3LS) { |
4703 |
|
RIFF::Chunk* ckSCSL = lst3LS->GetSubChunk(CHUNK_ID_SCSL); |
4704 |
|
if (ckSCSL) { |
4705 |
|
int headerSize = ckSCSL->ReadUint32(); |
4706 |
|
int slotCount = ckSCSL->ReadUint32(); |
4707 |
|
if (slotCount) { |
4708 |
|
int slotSize = ckSCSL->ReadUint32(); |
4709 |
|
ckSCSL->SetPos(headerSize); // in case of future header extensions |
4710 |
|
int unknownSpace = slotSize - 2*sizeof(uint32_t); // in case of future slot extensions |
4711 |
|
for (int i = 0; i < slotCount; ++i) { |
4712 |
|
_ScriptPooolEntry e; |
4713 |
|
e.fileOffset = ckSCSL->ReadUint32(); |
4714 |
|
e.bypass = ckSCSL->ReadUint32() & 1; |
4715 |
|
if (unknownSpace) ckSCSL->SetPos(unknownSpace, RIFF::stream_curpos); // in case of future extensions |
4716 |
|
scriptPoolFileOffsets.push_back(e); |
4717 |
|
} |
4718 |
|
} |
4719 |
|
} |
4720 |
|
} |
4721 |
|
|
4722 |
__notify_progress(pProgress, 1.0f); // notify done |
__notify_progress(pProgress, 1.0f); // notify done |
4723 |
} |
} |
4724 |
|
|
4739 |
delete pMidiRules[i]; |
delete pMidiRules[i]; |
4740 |
} |
} |
4741 |
delete[] pMidiRules; |
delete[] pMidiRules; |
4742 |
|
if (pScriptRefs) delete pScriptRefs; |
4743 |
} |
} |
4744 |
|
|
4745 |
/** |
/** |
4749 |
* Usually there is absolutely no need to call this method explicitly. |
* Usually there is absolutely no need to call this method explicitly. |
4750 |
* It will be called automatically when File::Save() was called. |
* It will be called automatically when File::Save() was called. |
4751 |
* |
* |
4752 |
|
* @param pProgress - callback function for progress notification |
4753 |
* @throws gig::Exception if samples cannot be dereferenced |
* @throws gig::Exception if samples cannot be dereferenced |
4754 |
*/ |
*/ |
4755 |
void Instrument::UpdateChunks() { |
void Instrument::UpdateChunks(progress_t* pProgress) { |
4756 |
// first update base classes' chunks |
// first update base classes' chunks |
4757 |
DLS::Instrument::UpdateChunks(); |
DLS::Instrument::UpdateChunks(pProgress); |
4758 |
|
|
4759 |
// update Regions' chunks |
// update Regions' chunks |
4760 |
{ |
{ |
4761 |
RegionList::iterator iter = pRegions->begin(); |
RegionList::iterator iter = pRegions->begin(); |
4762 |
RegionList::iterator end = pRegions->end(); |
RegionList::iterator end = pRegions->end(); |
4763 |
for (; iter != end; ++iter) |
for (; iter != end; ++iter) |
4764 |
(*iter)->UpdateChunks(); |
(*iter)->UpdateChunks(pProgress); |
4765 |
} |
} |
4766 |
|
|
4767 |
// make sure 'lart' RIFF list chunk exists |
// make sure 'lart' RIFF list chunk exists |
4796 |
pMidiRules[i]->UpdateChunks(pData); |
pMidiRules[i]->UpdateChunks(pData); |
4797 |
} |
} |
4798 |
} |
} |
4799 |
|
|
4800 |
|
// own gig format extensions |
4801 |
|
if (ScriptSlotCount()) { |
4802 |
|
// make sure we have converted the original loaded script file |
4803 |
|
// offsets into valid Script object pointers |
4804 |
|
LoadScripts(); |
4805 |
|
|
4806 |
|
RIFF::List* lst3LS = pCkInstrument->GetSubList(LIST_TYPE_3LS); |
4807 |
|
if (!lst3LS) lst3LS = pCkInstrument->AddSubList(LIST_TYPE_3LS); |
4808 |
|
const int slotCount = (int) pScriptRefs->size(); |
4809 |
|
const int headerSize = 3 * sizeof(uint32_t); |
4810 |
|
const int slotSize = 2 * sizeof(uint32_t); |
4811 |
|
const int totalChunkSize = headerSize + slotCount * slotSize; |
4812 |
|
RIFF::Chunk* ckSCSL = lst3LS->GetSubChunk(CHUNK_ID_SCSL); |
4813 |
|
if (!ckSCSL) ckSCSL = lst3LS->AddSubChunk(CHUNK_ID_SCSL, totalChunkSize); |
4814 |
|
else ckSCSL->Resize(totalChunkSize); |
4815 |
|
uint8_t* pData = (uint8_t*) ckSCSL->LoadChunkData(); |
4816 |
|
int pos = 0; |
4817 |
|
store32(&pData[pos], headerSize); |
4818 |
|
pos += sizeof(uint32_t); |
4819 |
|
store32(&pData[pos], slotCount); |
4820 |
|
pos += sizeof(uint32_t); |
4821 |
|
store32(&pData[pos], slotSize); |
4822 |
|
pos += sizeof(uint32_t); |
4823 |
|
for (int i = 0; i < slotCount; ++i) { |
4824 |
|
// arbitrary value, the actual file offset will be updated in |
4825 |
|
// UpdateScriptFileOffsets() after the file has been resized |
4826 |
|
int bogusFileOffset = 0; |
4827 |
|
store32(&pData[pos], bogusFileOffset); |
4828 |
|
pos += sizeof(uint32_t); |
4829 |
|
store32(&pData[pos], (*pScriptRefs)[i].bypass ? 1 : 0); |
4830 |
|
pos += sizeof(uint32_t); |
4831 |
|
} |
4832 |
|
} else { |
4833 |
|
// no script slots, so get rid of any LS custom RIFF chunks (if any) |
4834 |
|
RIFF::List* lst3LS = pCkInstrument->GetSubList(LIST_TYPE_3LS); |
4835 |
|
if (lst3LS) pCkInstrument->DeleteSubChunk(lst3LS); |
4836 |
|
} |
4837 |
|
} |
4838 |
|
|
4839 |
|
void Instrument::UpdateScriptFileOffsets() { |
4840 |
|
// own gig format extensions |
4841 |
|
if (pScriptRefs && pScriptRefs->size() > 0) { |
4842 |
|
RIFF::List* lst3LS = pCkInstrument->GetSubList(LIST_TYPE_3LS); |
4843 |
|
RIFF::Chunk* ckSCSL = lst3LS->GetSubChunk(CHUNK_ID_SCSL); |
4844 |
|
const int slotCount = (int) pScriptRefs->size(); |
4845 |
|
const int headerSize = 3 * sizeof(uint32_t); |
4846 |
|
ckSCSL->SetPos(headerSize); |
4847 |
|
for (int i = 0; i < slotCount; ++i) { |
4848 |
|
uint32_t fileOffset = uint32_t( |
4849 |
|
(*pScriptRefs)[i].script->pChunk->GetFilePos() - |
4850 |
|
(*pScriptRefs)[i].script->pChunk->GetPos() - |
4851 |
|
CHUNK_HEADER_SIZE(ckSCSL->GetFile()->GetFileOffsetSize()) |
4852 |
|
); |
4853 |
|
ckSCSL->WriteUint32(&fileOffset); |
4854 |
|
// jump over flags entry (containing the bypass flag) |
4855 |
|
ckSCSL->SetPos(sizeof(uint32_t), RIFF::stream_curpos); |
4856 |
|
} |
4857 |
|
} |
4858 |
} |
} |
4859 |
|
|
4860 |
/** |
/** |
4909 |
RIFF::List* rgn = lrgn->AddSubList(LIST_TYPE_RGN); |
RIFF::List* rgn = lrgn->AddSubList(LIST_TYPE_RGN); |
4910 |
Region* pNewRegion = new Region(this, rgn); |
Region* pNewRegion = new Region(this, rgn); |
4911 |
pRegions->push_back(pNewRegion); |
pRegions->push_back(pNewRegion); |
4912 |
Regions = pRegions->size(); |
Regions = (uint32_t) pRegions->size(); |
4913 |
// update Region key table for fast lookup |
// update Region key table for fast lookup |
4914 |
UpdateRegionKeyTable(); |
UpdateRegionKeyTable(); |
4915 |
// done |
// done |
4924 |
} |
} |
4925 |
|
|
4926 |
/** |
/** |
4927 |
|
* Move this instrument at the position before @arg dst. |
4928 |
|
* |
4929 |
|
* This method can be used to reorder the sequence of instruments in a |
4930 |
|
* .gig file. This might be helpful especially on large .gig files which |
4931 |
|
* contain a large number of instruments within the same .gig file. So |
4932 |
|
* grouping such instruments to similar ones, can help to keep track of them |
4933 |
|
* when working with such complex .gig files. |
4934 |
|
* |
4935 |
|
* When calling this method, this instrument will be removed from in its |
4936 |
|
* current position in the instruments list and moved to the requested |
4937 |
|
* target position provided by @param dst. You may also pass NULL as |
4938 |
|
* argument to this method, in that case this intrument will be moved to the |
4939 |
|
* very end of the .gig file's instrument list. |
4940 |
|
* |
4941 |
|
* You have to call Save() to make the order change persistent to the .gig |
4942 |
|
* file. |
4943 |
|
* |
4944 |
|
* Currently this method is limited to moving the instrument within the same |
4945 |
|
* .gig file. Trying to move it to another .gig file by calling this method |
4946 |
|
* will throw an exception. |
4947 |
|
* |
4948 |
|
* @param dst - destination instrument at which this instrument will be |
4949 |
|
* moved to, or pass NULL for moving to end of list |
4950 |
|
* @throw gig::Exception if this instrument and target instrument are not |
4951 |
|
* part of the same file |
4952 |
|
*/ |
4953 |
|
void Instrument::MoveTo(Instrument* dst) { |
4954 |
|
if (dst && GetParent() != dst->GetParent()) |
4955 |
|
throw Exception( |
4956 |
|
"gig::Instrument::MoveTo() can only be used for moving within " |
4957 |
|
"the same gig file." |
4958 |
|
); |
4959 |
|
|
4960 |
|
File* pFile = (File*) GetParent(); |
4961 |
|
|
4962 |
|
// move this instrument within the instrument list |
4963 |
|
{ |
4964 |
|
File::InstrumentList& list = *pFile->pInstruments; |
4965 |
|
|
4966 |
|
File::InstrumentList::iterator itFrom = |
4967 |
|
std::find(list.begin(), list.end(), static_cast<DLS::Instrument*>(this)); |
4968 |
|
|
4969 |
|
File::InstrumentList::iterator itTo = |
4970 |
|
std::find(list.begin(), list.end(), static_cast<DLS::Instrument*>(dst)); |
4971 |
|
|
4972 |
|
list.splice(itTo, list, itFrom); |
4973 |
|
} |
4974 |
|
|
4975 |
|
// move the instrument's actual list RIFF chunk appropriately |
4976 |
|
RIFF::List* lstCkInstruments = pFile->pRIFF->GetSubList(LIST_TYPE_LINS); |
4977 |
|
lstCkInstruments->MoveSubChunk( |
4978 |
|
this->pCkInstrument, |
4979 |
|
(RIFF::Chunk*) ((dst) ? dst->pCkInstrument : NULL) |
4980 |
|
); |
4981 |
|
} |
4982 |
|
|
4983 |
|
/** |
4984 |
* Returns a MIDI rule of the instrument. |
* Returns a MIDI rule of the instrument. |
4985 |
* |
* |
4986 |
* The list of MIDI rules, at least in gig v3, always contains at |
* The list of MIDI rules, at least in gig v3, always contains at |
5043 |
pMidiRules[i] = 0; |
pMidiRules[i] = 0; |
5044 |
} |
} |
5045 |
|
|
5046 |
|
void Instrument::LoadScripts() { |
5047 |
|
if (pScriptRefs) return; |
5048 |
|
pScriptRefs = new std::vector<_ScriptPooolRef>; |
5049 |
|
if (scriptPoolFileOffsets.empty()) return; |
5050 |
|
File* pFile = (File*) GetParent(); |
5051 |
|
for (uint k = 0; k < scriptPoolFileOffsets.size(); ++k) { |
5052 |
|
uint32_t soughtOffset = scriptPoolFileOffsets[k].fileOffset; |
5053 |
|
for (uint i = 0; pFile->GetScriptGroup(i); ++i) { |
5054 |
|
ScriptGroup* group = pFile->GetScriptGroup(i); |
5055 |
|
for (uint s = 0; group->GetScript(s); ++s) { |
5056 |
|
Script* script = group->GetScript(s); |
5057 |
|
if (script->pChunk) { |
5058 |
|
uint32_t offset = uint32_t( |
5059 |
|
script->pChunk->GetFilePos() - |
5060 |
|
script->pChunk->GetPos() - |
5061 |
|
CHUNK_HEADER_SIZE(script->pChunk->GetFile()->GetFileOffsetSize()) |
5062 |
|
); |
5063 |
|
if (offset == soughtOffset) |
5064 |
|
{ |
5065 |
|
_ScriptPooolRef ref; |
5066 |
|
ref.script = script; |
5067 |
|
ref.bypass = scriptPoolFileOffsets[k].bypass; |
5068 |
|
pScriptRefs->push_back(ref); |
5069 |
|
break; |
5070 |
|
} |
5071 |
|
} |
5072 |
|
} |
5073 |
|
} |
5074 |
|
} |
5075 |
|
// we don't need that anymore |
5076 |
|
scriptPoolFileOffsets.clear(); |
5077 |
|
} |
5078 |
|
|
5079 |
|
/** @brief Get instrument script (gig format extension). |
5080 |
|
* |
5081 |
|
* Returns the real-time instrument script of instrument script slot |
5082 |
|
* @a index. |
5083 |
|
* |
5084 |
|
* @note This is an own format extension which did not exist i.e. in the |
5085 |
|
* GigaStudio 4 software. It will currently only work with LinuxSampler and |
5086 |
|
* gigedit. |
5087 |
|
* |
5088 |
|
* @param index - instrument script slot index |
5089 |
|
* @returns script or NULL if index is out of bounds |
5090 |
|
*/ |
5091 |
|
Script* Instrument::GetScriptOfSlot(uint index) { |
5092 |
|
LoadScripts(); |
5093 |
|
if (index >= pScriptRefs->size()) return NULL; |
5094 |
|
return pScriptRefs->at(index).script; |
5095 |
|
} |
5096 |
|
|
5097 |
|
/** @brief Add new instrument script slot (gig format extension). |
5098 |
|
* |
5099 |
|
* Add the given real-time instrument script reference to this instrument, |
5100 |
|
* which shall be executed by the sampler for for this instrument. The |
5101 |
|
* script will be added to the end of the script list of this instrument. |
5102 |
|
* The positions of the scripts in the Instrument's Script list are |
5103 |
|
* relevant, because they define in which order they shall be executed by |
5104 |
|
* the sampler. For this reason it is also legal to add the same script |
5105 |
|
* twice to an instrument, for example you might have a script called |
5106 |
|
* "MyFilter" which performs an event filter task, and you might have |
5107 |
|
* another script called "MyNoteTrigger" which triggers new notes, then you |
5108 |
|
* might for example have the following list of scripts on the instrument: |
5109 |
|
* |
5110 |
|
* 1. Script "MyFilter" |
5111 |
|
* 2. Script "MyNoteTrigger" |
5112 |
|
* 3. Script "MyFilter" |
5113 |
|
* |
5114 |
|
* Which would make sense, because the 2nd script launched new events, which |
5115 |
|
* you might need to filter as well. |
5116 |
|
* |
5117 |
|
* There are two ways to disable / "bypass" scripts. You can either disable |
5118 |
|
* a script locally for the respective script slot on an instrument (i.e. by |
5119 |
|
* passing @c false to the 2nd argument of this method, or by calling |
5120 |
|
* SetScriptBypassed()). Or you can disable a script globally for all slots |
5121 |
|
* and all instruments by setting Script::Bypass. |
5122 |
|
* |
5123 |
|
* @note This is an own format extension which did not exist i.e. in the |
5124 |
|
* GigaStudio 4 software. It will currently only work with LinuxSampler and |
5125 |
|
* gigedit. |
5126 |
|
* |
5127 |
|
* @param pScript - script that shall be executed for this instrument |
5128 |
|
* @param bypass - if enabled, the sampler shall skip executing this |
5129 |
|
* script (in the respective list position) |
5130 |
|
* @see SetScriptBypassed() |
5131 |
|
*/ |
5132 |
|
void Instrument::AddScriptSlot(Script* pScript, bool bypass) { |
5133 |
|
LoadScripts(); |
5134 |
|
_ScriptPooolRef ref = { pScript, bypass }; |
5135 |
|
pScriptRefs->push_back(ref); |
5136 |
|
} |
5137 |
|
|
5138 |
|
/** @brief Flip two script slots with each other (gig format extension). |
5139 |
|
* |
5140 |
|
* Swaps the position of the two given scripts in the Instrument's Script |
5141 |
|
* list. The positions of the scripts in the Instrument's Script list are |
5142 |
|
* relevant, because they define in which order they shall be executed by |
5143 |
|
* the sampler. |
5144 |
|
* |
5145 |
|
* @note This is an own format extension which did not exist i.e. in the |
5146 |
|
* GigaStudio 4 software. It will currently only work with LinuxSampler and |
5147 |
|
* gigedit. |
5148 |
|
* |
5149 |
|
* @param index1 - index of the first script slot to swap |
5150 |
|
* @param index2 - index of the second script slot to swap |
5151 |
|
*/ |
5152 |
|
void Instrument::SwapScriptSlots(uint index1, uint index2) { |
5153 |
|
LoadScripts(); |
5154 |
|
if (index1 >= pScriptRefs->size() || index2 >= pScriptRefs->size()) |
5155 |
|
return; |
5156 |
|
_ScriptPooolRef tmp = (*pScriptRefs)[index1]; |
5157 |
|
(*pScriptRefs)[index1] = (*pScriptRefs)[index2]; |
5158 |
|
(*pScriptRefs)[index2] = tmp; |
5159 |
|
} |
5160 |
|
|
5161 |
|
/** @brief Remove script slot. |
5162 |
|
* |
5163 |
|
* Removes the script slot with the given slot index. |
5164 |
|
* |
5165 |
|
* @param index - index of script slot to remove |
5166 |
|
*/ |
5167 |
|
void Instrument::RemoveScriptSlot(uint index) { |
5168 |
|
LoadScripts(); |
5169 |
|
if (index >= pScriptRefs->size()) return; |
5170 |
|
pScriptRefs->erase( pScriptRefs->begin() + index ); |
5171 |
|
} |
5172 |
|
|
5173 |
|
/** @brief Remove reference to given Script (gig format extension). |
5174 |
|
* |
5175 |
|
* This will remove all script slots on the instrument which are referencing |
5176 |
|
* the given script. |
5177 |
|
* |
5178 |
|
* @note This is an own format extension which did not exist i.e. in the |
5179 |
|
* GigaStudio 4 software. It will currently only work with LinuxSampler and |
5180 |
|
* gigedit. |
5181 |
|
* |
5182 |
|
* @param pScript - script reference to remove from this instrument |
5183 |
|
* @see RemoveScriptSlot() |
5184 |
|
*/ |
5185 |
|
void Instrument::RemoveScript(Script* pScript) { |
5186 |
|
LoadScripts(); |
5187 |
|
for (ssize_t i = pScriptRefs->size() - 1; i >= 0; --i) { |
5188 |
|
if ((*pScriptRefs)[i].script == pScript) { |
5189 |
|
pScriptRefs->erase( pScriptRefs->begin() + i ); |
5190 |
|
} |
5191 |
|
} |
5192 |
|
} |
5193 |
|
|
5194 |
|
/** @brief Instrument's amount of script slots. |
5195 |
|
* |
5196 |
|
* This method returns the amount of script slots this instrument currently |
5197 |
|
* uses. |
5198 |
|
* |
5199 |
|
* A script slot is a reference of a real-time instrument script to be |
5200 |
|
* executed by the sampler. The scripts will be executed by the sampler in |
5201 |
|
* sequence of the slots. One (same) script may be referenced multiple |
5202 |
|
* times in different slots. |
5203 |
|
* |
5204 |
|
* @note This is an own format extension which did not exist i.e. in the |
5205 |
|
* GigaStudio 4 software. It will currently only work with LinuxSampler and |
5206 |
|
* gigedit. |
5207 |
|
*/ |
5208 |
|
uint Instrument::ScriptSlotCount() const { |
5209 |
|
return uint(pScriptRefs ? pScriptRefs->size() : scriptPoolFileOffsets.size()); |
5210 |
|
} |
5211 |
|
|
5212 |
|
/** @brief Whether script execution shall be skipped. |
5213 |
|
* |
5214 |
|
* Defines locally for the Script reference slot in the Instrument's Script |
5215 |
|
* list, whether the script shall be skipped by the sampler regarding |
5216 |
|
* execution. |
5217 |
|
* |
5218 |
|
* It is also possible to ignore exeuction of the script globally, for all |
5219 |
|
* slots and for all instruments by setting Script::Bypass. |
5220 |
|
* |
5221 |
|
* @note This is an own format extension which did not exist i.e. in the |
5222 |
|
* GigaStudio 4 software. It will currently only work with LinuxSampler and |
5223 |
|
* gigedit. |
5224 |
|
* |
5225 |
|
* @param index - index of the script slot on this instrument |
5226 |
|
* @see Script::Bypass |
5227 |
|
*/ |
5228 |
|
bool Instrument::IsScriptSlotBypassed(uint index) { |
5229 |
|
if (index >= ScriptSlotCount()) return false; |
5230 |
|
return pScriptRefs ? pScriptRefs->at(index).bypass |
5231 |
|
: scriptPoolFileOffsets.at(index).bypass; |
5232 |
|
|
5233 |
|
} |
5234 |
|
|
5235 |
|
/** @brief Defines whether execution shall be skipped. |
5236 |
|
* |
5237 |
|
* You can call this method to define locally whether or whether not the |
5238 |
|
* given script slot shall be executed by the sampler. |
5239 |
|
* |
5240 |
|
* @note This is an own format extension which did not exist i.e. in the |
5241 |
|
* GigaStudio 4 software. It will currently only work with LinuxSampler and |
5242 |
|
* gigedit. |
5243 |
|
* |
5244 |
|
* @param index - script slot index on this instrument |
5245 |
|
* @param bBypass - if true, the script slot will be skipped by the sampler |
5246 |
|
* @see Script::Bypass |
5247 |
|
*/ |
5248 |
|
void Instrument::SetScriptSlotBypassed(uint index, bool bBypass) { |
5249 |
|
if (index >= ScriptSlotCount()) return; |
5250 |
|
if (pScriptRefs) |
5251 |
|
pScriptRefs->at(index).bypass = bBypass; |
5252 |
|
else |
5253 |
|
scriptPoolFileOffsets.at(index).bypass = bBypass; |
5254 |
|
} |
5255 |
|
|
5256 |
/** |
/** |
5257 |
* Make a (semi) deep copy of the Instrument object given by @a orig |
* Make a (semi) deep copy of the Instrument object given by @a orig |
5258 |
* and assign it to this object. |
* and assign it to this object. |
5286 |
PitchbendRange = orig->PitchbendRange; |
PitchbendRange = orig->PitchbendRange; |
5287 |
PianoReleaseMode = orig->PianoReleaseMode; |
PianoReleaseMode = orig->PianoReleaseMode; |
5288 |
DimensionKeyRange = orig->DimensionKeyRange; |
DimensionKeyRange = orig->DimensionKeyRange; |
5289 |
|
scriptPoolFileOffsets = orig->scriptPoolFileOffsets; |
5290 |
|
pScriptRefs = orig->pScriptRefs; |
5291 |
|
|
5292 |
// free old midi rules |
// free old midi rules |
5293 |
for (int i = 0 ; pMidiRules[i] ; i++) { |
for (int i = 0 ; pMidiRules[i] ; i++) { |
5342 |
* |
* |
5343 |
* Usually there is absolutely no need to call this method explicitly. |
* Usually there is absolutely no need to call this method explicitly. |
5344 |
* It will be called automatically when File::Save() was called. |
* It will be called automatically when File::Save() was called. |
5345 |
|
* |
5346 |
|
* @param pProgress - callback function for progress notification |
5347 |
*/ |
*/ |
5348 |
void Group::UpdateChunks() { |
void Group::UpdateChunks(progress_t* pProgress) { |
5349 |
// make sure <3gri> and <3gnl> list chunks exist |
// make sure <3gri> and <3gnl> list chunks exist |
5350 |
RIFF::List* _3gri = pFile->pRIFF->GetSubList(LIST_TYPE_3GRI); |
RIFF::List* _3gri = pFile->pRIFF->GetSubList(LIST_TYPE_3GRI); |
5351 |
if (!_3gri) { |
if (!_3gri) { |
5475 |
bAutoLoad = true; |
bAutoLoad = true; |
5476 |
*pVersion = VERSION_3; |
*pVersion = VERSION_3; |
5477 |
pGroups = NULL; |
pGroups = NULL; |
5478 |
|
pScriptGroups = NULL; |
5479 |
pInfo->SetFixedStringLengths(_FileFixedStringLengths); |
pInfo->SetFixedStringLengths(_FileFixedStringLengths); |
5480 |
pInfo->ArchivalLocation = String(256, ' '); |
pInfo->ArchivalLocation = String(256, ' '); |
5481 |
|
|
5491 |
File::File(RIFF::File* pRIFF) : DLS::File(pRIFF) { |
File::File(RIFF::File* pRIFF) : DLS::File(pRIFF) { |
5492 |
bAutoLoad = true; |
bAutoLoad = true; |
5493 |
pGroups = NULL; |
pGroups = NULL; |
5494 |
|
pScriptGroups = NULL; |
5495 |
pInfo->SetFixedStringLengths(_FileFixedStringLengths); |
pInfo->SetFixedStringLengths(_FileFixedStringLengths); |
5496 |
} |
} |
5497 |
|
|
5505 |
} |
} |
5506 |
delete pGroups; |
delete pGroups; |
5507 |
} |
} |
5508 |
|
if (pScriptGroups) { |
5509 |
|
std::list<ScriptGroup*>::iterator iter = pScriptGroups->begin(); |
5510 |
|
std::list<ScriptGroup*>::iterator end = pScriptGroups->end(); |
5511 |
|
while (iter != end) { |
5512 |
|
delete *iter; |
5513 |
|
++iter; |
5514 |
|
} |
5515 |
|
delete pScriptGroups; |
5516 |
|
} |
5517 |
} |
} |
5518 |
|
|
5519 |
Sample* File::GetFirstSample(progress_t* pProgress) { |
Sample* File::GetFirstSample(progress_t* pProgress) { |
5622 |
int iTotalSamples = WavePoolCount; |
int iTotalSamples = WavePoolCount; |
5623 |
|
|
5624 |
// check if samples should be loaded from extension files |
// check if samples should be loaded from extension files |
5625 |
|
// (only for old gig files < 2 GB) |
5626 |
int lastFileNo = 0; |
int lastFileNo = 0; |
5627 |
for (int i = 0 ; i < WavePoolCount ; i++) { |
if (!file->IsNew() && !(file->GetCurrentFileSize() >> 31)) { |
5628 |
if (pWavePoolTableHi[i] > lastFileNo) lastFileNo = pWavePoolTableHi[i]; |
for (int i = 0 ; i < WavePoolCount ; i++) { |
5629 |
|
if (pWavePoolTableHi[i] > lastFileNo) lastFileNo = pWavePoolTableHi[i]; |
5630 |
|
} |
5631 |
} |
} |
5632 |
String name(pRIFF->GetFileName()); |
String name(pRIFF->GetFileName()); |
5633 |
int nameLen = name.length(); |
int nameLen = (int) name.length(); |
5634 |
char suffix[6]; |
char suffix[6]; |
5635 |
if (nameLen > 4 && name.substr(nameLen - 4) == ".gig") nameLen -= 4; |
if (nameLen > 4 && name.substr(nameLen - 4) == ".gig") nameLen -= 4; |
5636 |
|
|
5637 |
for (int fileNo = 0 ; ; ) { |
for (int fileNo = 0 ; ; ) { |
5638 |
RIFF::List* wvpl = file->GetSubList(LIST_TYPE_WVPL); |
RIFF::List* wvpl = file->GetSubList(LIST_TYPE_WVPL); |
5639 |
if (wvpl) { |
if (wvpl) { |
5640 |
unsigned long wvplFileOffset = wvpl->GetFilePos(); |
file_offset_t wvplFileOffset = wvpl->GetFilePos(); |
5641 |
RIFF::List* wave = wvpl->GetFirstSubList(); |
RIFF::List* wave = wvpl->GetFirstSubList(); |
5642 |
while (wave) { |
while (wave) { |
5643 |
if (wave->GetListType() == LIST_TYPE_WAVE) { |
if (wave->GetListType() == LIST_TYPE_WAVE) { |
5645 |
const float subprogress = (float) iSampleIndex / (float) iTotalSamples; |
const float subprogress = (float) iSampleIndex / (float) iTotalSamples; |
5646 |
__notify_progress(pProgress, subprogress); |
__notify_progress(pProgress, subprogress); |
5647 |
|
|
5648 |
unsigned long waveFileOffset = wave->GetFilePos(); |
file_offset_t waveFileOffset = wave->GetFilePos(); |
5649 |
pSamples->push_back(new Sample(this, wave, waveFileOffset - wvplFileOffset, fileNo)); |
pSamples->push_back(new Sample(this, wave, waveFileOffset - wvplFileOffset, fileNo, iSampleIndex)); |
5650 |
|
|
5651 |
iSampleIndex++; |
iSampleIndex++; |
5652 |
} |
} |
5799 |
mGroups[pFile->GetSample(i)->GetGroup()]->AddSample(s); |
mGroups[pFile->GetSample(i)->GetGroup()]->AddSample(s); |
5800 |
mSamples[pFile->GetSample(i)] = s; |
mSamples[pFile->GetSample(i)] = s; |
5801 |
} |
} |
5802 |
|
|
5803 |
|
// clone script groups and their scripts |
5804 |
|
for (int iGroup = 0; pFile->GetScriptGroup(iGroup); ++iGroup) { |
5805 |
|
ScriptGroup* sg = pFile->GetScriptGroup(iGroup); |
5806 |
|
ScriptGroup* dg = AddScriptGroup(); |
5807 |
|
dg->Name = "COPY" + ToString(iCallCount) + "_" + sg->Name; |
5808 |
|
for (int iScript = 0; sg->GetScript(iScript); ++iScript) { |
5809 |
|
Script* ss = sg->GetScript(iScript); |
5810 |
|
Script* ds = dg->AddScript(); |
5811 |
|
ds->CopyAssign(ss); |
5812 |
|
} |
5813 |
|
} |
5814 |
|
|
5815 |
//BUG: For some reason this method only works with this additional |
//BUG: For some reason this method only works with this additional |
5816 |
// Save() call in between here. |
// Save() call in between here. |
5817 |
// |
// |
5896 |
if (!_3crc) return; |
if (!_3crc) return; |
5897 |
|
|
5898 |
// get the index of the sample |
// get the index of the sample |
5899 |
int iWaveIndex = -1; |
int iWaveIndex = GetWaveTableIndexOf(pSample); |
|
File::SampleList::iterator iter = pSamples->begin(); |
|
|
File::SampleList::iterator end = pSamples->end(); |
|
|
for (int index = 0; iter != end; ++iter, ++index) { |
|
|
if (*iter == pSample) { |
|
|
iWaveIndex = index; |
|
|
break; |
|
|
} |
|
|
} |
|
5900 |
if (iWaveIndex < 0) throw gig::Exception("Could not update crc, could not find sample"); |
if (iWaveIndex < 0) throw gig::Exception("Could not update crc, could not find sample"); |
5901 |
|
|
5902 |
// write the CRC-32 checksum to disk |
// write the CRC-32 checksum to disk |
5903 |
_3crc->SetPos(iWaveIndex * 8); |
_3crc->SetPos(iWaveIndex * 8); |
5904 |
uint32_t tmp = 1; |
uint32_t one = 1; |
5905 |
_3crc->WriteUint32(&tmp); // unknown, always 1? |
_3crc->WriteUint32(&one); // always 1 |
5906 |
_3crc->WriteUint32(&crc); |
_3crc->WriteUint32(&crc); |
5907 |
} |
} |
5908 |
|
|
5909 |
|
uint32_t File::GetSampleChecksum(Sample* pSample) { |
5910 |
|
// get the index of the sample |
5911 |
|
int iWaveIndex = GetWaveTableIndexOf(pSample); |
5912 |
|
if (iWaveIndex < 0) throw gig::Exception("Could not retrieve reference crc of sample, could not resolve sample's wave table index"); |
5913 |
|
|
5914 |
|
return GetSampleChecksumByIndex(iWaveIndex); |
5915 |
|
} |
5916 |
|
|
5917 |
|
uint32_t File::GetSampleChecksumByIndex(int index) { |
5918 |
|
if (index < 0) throw gig::Exception("Could not retrieve reference crc of sample, invalid wave pool index of sample"); |
5919 |
|
|
5920 |
|
RIFF::Chunk* _3crc = pRIFF->GetSubChunk(CHUNK_ID_3CRC); |
5921 |
|
if (!_3crc) throw gig::Exception("Could not retrieve reference crc of sample, no checksums stored for this file yet"); |
5922 |
|
uint8_t* pData = (uint8_t*) _3crc->LoadChunkData(); |
5923 |
|
if (!pData) throw gig::Exception("Could not retrieve reference crc of sample, no checksums stored for this file yet"); |
5924 |
|
|
5925 |
|
// read the CRC-32 checksum directly from disk |
5926 |
|
size_t pos = index * 8; |
5927 |
|
if (pos + 8 > _3crc->GetNewSize()) |
5928 |
|
throw gig::Exception("Could not retrieve reference crc of sample, could not seek to required position in crc chunk"); |
5929 |
|
|
5930 |
|
uint32_t one = load32(&pData[pos]); // always 1 |
5931 |
|
if (one != 1) |
5932 |
|
throw gig::Exception("Could not retrieve reference crc of sample, because reference checksum table is damaged"); |
5933 |
|
|
5934 |
|
return load32(&pData[pos+4]); |
5935 |
|
} |
5936 |
|
|
5937 |
|
int File::GetWaveTableIndexOf(gig::Sample* pSample) { |
5938 |
|
if (!pSamples) GetFirstSample(); // make sure sample chunks were scanned |
5939 |
|
File::SampleList::iterator iter = pSamples->begin(); |
5940 |
|
File::SampleList::iterator end = pSamples->end(); |
5941 |
|
for (int index = 0; iter != end; ++iter, ++index) |
5942 |
|
if (*iter == pSample) |
5943 |
|
return index; |
5944 |
|
return -1; |
5945 |
|
} |
5946 |
|
|
5947 |
|
/** |
5948 |
|
* Checks whether the file's "3CRC" chunk was damaged. This chunk contains |
5949 |
|
* the CRC32 check sums of all samples' raw wave data. |
5950 |
|
* |
5951 |
|
* @return true if 3CRC chunk is OK, or false if 3CRC chunk is damaged |
5952 |
|
*/ |
5953 |
|
bool File::VerifySampleChecksumTable() { |
5954 |
|
RIFF::Chunk* _3crc = pRIFF->GetSubChunk(CHUNK_ID_3CRC); |
5955 |
|
if (!_3crc) return false; |
5956 |
|
if (_3crc->GetNewSize() <= 0) return false; |
5957 |
|
if (_3crc->GetNewSize() % 8) return false; |
5958 |
|
if (!pSamples) GetFirstSample(); // make sure sample chunks were scanned |
5959 |
|
if (_3crc->GetNewSize() != pSamples->size() * 8) return false; |
5960 |
|
|
5961 |
|
const file_offset_t n = _3crc->GetNewSize() / 8; |
5962 |
|
|
5963 |
|
uint32_t* pData = (uint32_t*) _3crc->LoadChunkData(); |
5964 |
|
if (!pData) return false; |
5965 |
|
|
5966 |
|
for (file_offset_t i = 0; i < n; ++i) { |
5967 |
|
uint32_t one = pData[i*2]; |
5968 |
|
if (one != 1) return false; |
5969 |
|
} |
5970 |
|
|
5971 |
|
return true; |
5972 |
|
} |
5973 |
|
|
5974 |
|
/** |
5975 |
|
* Recalculates CRC32 checksums for all samples and rebuilds this gig |
5976 |
|
* file's checksum table with those new checksums. This might usually |
5977 |
|
* just be necessary if the checksum table was damaged. |
5978 |
|
* |
5979 |
|
* @e IMPORTANT: The current implementation of this method only works |
5980 |
|
* with files that have not been modified since it was loaded, because |
5981 |
|
* it expects that no externally caused file structure changes are |
5982 |
|
* required! |
5983 |
|
* |
5984 |
|
* Due to the expectation above, this method is currently protected |
5985 |
|
* and actually only used by the command line tool "gigdump" yet. |
5986 |
|
* |
5987 |
|
* @returns true if Save() is required to be called after this call, |
5988 |
|
* false if no further action is required |
5989 |
|
*/ |
5990 |
|
bool File::RebuildSampleChecksumTable() { |
5991 |
|
// make sure sample chunks were scanned |
5992 |
|
if (!pSamples) GetFirstSample(); |
5993 |
|
|
5994 |
|
bool bRequiresSave = false; |
5995 |
|
|
5996 |
|
// make sure "3CRC" chunk exists with required size |
5997 |
|
RIFF::Chunk* _3crc = pRIFF->GetSubChunk(CHUNK_ID_3CRC); |
5998 |
|
if (!_3crc) { |
5999 |
|
_3crc = pRIFF->AddSubChunk(CHUNK_ID_3CRC, pSamples->size() * 8); |
6000 |
|
// the order of einf and 3crc is not the same in v2 and v3 |
6001 |
|
RIFF::Chunk* einf = pRIFF->GetSubChunk(CHUNK_ID_EINF); |
6002 |
|
if (einf && pVersion && pVersion->major == 3) pRIFF->MoveSubChunk(_3crc, einf); |
6003 |
|
bRequiresSave = true; |
6004 |
|
} else if (_3crc->GetNewSize() != pSamples->size() * 8) { |
6005 |
|
_3crc->Resize(pSamples->size() * 8); |
6006 |
|
bRequiresSave = true; |
6007 |
|
} |
6008 |
|
|
6009 |
|
if (bRequiresSave) { // refill CRC table for all samples in RAM ... |
6010 |
|
uint32_t* pData = (uint32_t*) _3crc->LoadChunkData(); |
6011 |
|
{ |
6012 |
|
File::SampleList::iterator iter = pSamples->begin(); |
6013 |
|
File::SampleList::iterator end = pSamples->end(); |
6014 |
|
for (; iter != end; ++iter) { |
6015 |
|
gig::Sample* pSample = (gig::Sample*) *iter; |
6016 |
|
int index = GetWaveTableIndexOf(pSample); |
6017 |
|
if (index < 0) throw gig::Exception("Could not rebuild crc table for samples, wave table index of a sample could not be resolved"); |
6018 |
|
pData[index*2] = 1; // always 1 |
6019 |
|
pData[index*2+1] = pSample->CalculateWaveDataChecksum(); |
6020 |
|
} |
6021 |
|
} |
6022 |
|
} else { // no file structure changes necessary, so directly write to disk and we are done ... |
6023 |
|
// make sure file is in write mode |
6024 |
|
pRIFF->SetMode(RIFF::stream_mode_read_write); |
6025 |
|
{ |
6026 |
|
File::SampleList::iterator iter = pSamples->begin(); |
6027 |
|
File::SampleList::iterator end = pSamples->end(); |
6028 |
|
for (; iter != end; ++iter) { |
6029 |
|
gig::Sample* pSample = (gig::Sample*) *iter; |
6030 |
|
int index = GetWaveTableIndexOf(pSample); |
6031 |
|
if (index < 0) throw gig::Exception("Could not rebuild crc table for samples, wave table index of a sample could not be resolved"); |
6032 |
|
pSample->crc = pSample->CalculateWaveDataChecksum(); |
6033 |
|
SetSampleChecksum(pSample, pSample->crc); |
6034 |
|
} |
6035 |
|
} |
6036 |
|
} |
6037 |
|
|
6038 |
|
return bRequiresSave; |
6039 |
|
} |
6040 |
|
|
6041 |
Group* File::GetFirstGroup() { |
Group* File::GetFirstGroup() { |
6042 |
if (!pGroups) LoadGroups(); |
if (!pGroups) LoadGroups(); |
6043 |
// there must always be at least one group |
// there must always be at least one group |
6165 |
} |
} |
6166 |
} |
} |
6167 |
|
|
6168 |
|
/** @brief Get instrument script group (by index). |
6169 |
|
* |
6170 |
|
* Returns the real-time instrument script group with the given index. |
6171 |
|
* |
6172 |
|
* @param index - number of the sought group (0..n) |
6173 |
|
* @returns sought script group or NULL if there's no such group |
6174 |
|
*/ |
6175 |
|
ScriptGroup* File::GetScriptGroup(uint index) { |
6176 |
|
if (!pScriptGroups) LoadScriptGroups(); |
6177 |
|
std::list<ScriptGroup*>::iterator it = pScriptGroups->begin(); |
6178 |
|
for (uint i = 0; it != pScriptGroups->end(); ++i, ++it) |
6179 |
|
if (i == index) return *it; |
6180 |
|
return NULL; |
6181 |
|
} |
6182 |
|
|
6183 |
|
/** @brief Get instrument script group (by name). |
6184 |
|
* |
6185 |
|
* Returns the first real-time instrument script group found with the given |
6186 |
|
* group name. Note that group names may not necessarily be unique. |
6187 |
|
* |
6188 |
|
* @param name - name of the sought script group |
6189 |
|
* @returns sought script group or NULL if there's no such group |
6190 |
|
*/ |
6191 |
|
ScriptGroup* File::GetScriptGroup(const String& name) { |
6192 |
|
if (!pScriptGroups) LoadScriptGroups(); |
6193 |
|
std::list<ScriptGroup*>::iterator it = pScriptGroups->begin(); |
6194 |
|
for (uint i = 0; it != pScriptGroups->end(); ++i, ++it) |
6195 |
|
if ((*it)->Name == name) return *it; |
6196 |
|
return NULL; |
6197 |
|
} |
6198 |
|
|
6199 |
|
/** @brief Add new instrument script group. |
6200 |
|
* |
6201 |
|
* Adds a new, empty real-time instrument script group to the file. |
6202 |
|
* |
6203 |
|
* You have to call Save() to make this persistent to the file. |
6204 |
|
* |
6205 |
|
* @return new empty script group |
6206 |
|
*/ |
6207 |
|
ScriptGroup* File::AddScriptGroup() { |
6208 |
|
if (!pScriptGroups) LoadScriptGroups(); |
6209 |
|
ScriptGroup* pScriptGroup = new ScriptGroup(this, NULL); |
6210 |
|
pScriptGroups->push_back(pScriptGroup); |
6211 |
|
return pScriptGroup; |
6212 |
|
} |
6213 |
|
|
6214 |
|
/** @brief Delete an instrument script group. |
6215 |
|
* |
6216 |
|
* This will delete the given real-time instrument script group and all its |
6217 |
|
* instrument scripts it contains. References inside instruments that are |
6218 |
|
* using the deleted scripts will be removed from the respective instruments |
6219 |
|
* accordingly. |
6220 |
|
* |
6221 |
|
* You have to call Save() to make this persistent to the file. |
6222 |
|
* |
6223 |
|
* @param pScriptGroup - script group to delete |
6224 |
|
* @throws gig::Exception if given script group could not be found |
6225 |
|
*/ |
6226 |
|
void File::DeleteScriptGroup(ScriptGroup* pScriptGroup) { |
6227 |
|
if (!pScriptGroups) LoadScriptGroups(); |
6228 |
|
std::list<ScriptGroup*>::iterator iter = |
6229 |
|
find(pScriptGroups->begin(), pScriptGroups->end(), pScriptGroup); |
6230 |
|
if (iter == pScriptGroups->end()) |
6231 |
|
throw gig::Exception("Could not delete script group, could not find given script group"); |
6232 |
|
pScriptGroups->erase(iter); |
6233 |
|
for (int i = 0; pScriptGroup->GetScript(i); ++i) |
6234 |
|
pScriptGroup->DeleteScript(pScriptGroup->GetScript(i)); |
6235 |
|
if (pScriptGroup->pList) |
6236 |
|
pScriptGroup->pList->GetParent()->DeleteSubChunk(pScriptGroup->pList); |
6237 |
|
delete pScriptGroup; |
6238 |
|
} |
6239 |
|
|
6240 |
|
void File::LoadScriptGroups() { |
6241 |
|
if (pScriptGroups) return; |
6242 |
|
pScriptGroups = new std::list<ScriptGroup*>; |
6243 |
|
RIFF::List* lstLS = pRIFF->GetSubList(LIST_TYPE_3LS); |
6244 |
|
if (lstLS) { |
6245 |
|
for (RIFF::List* lst = lstLS->GetFirstSubList(); lst; |
6246 |
|
lst = lstLS->GetNextSubList()) |
6247 |
|
{ |
6248 |
|
if (lst->GetListType() == LIST_TYPE_RTIS) { |
6249 |
|
pScriptGroups->push_back(new ScriptGroup(this, lst)); |
6250 |
|
} |
6251 |
|
} |
6252 |
|
} |
6253 |
|
} |
6254 |
|
|
6255 |
/** |
/** |
6256 |
* Apply all the gig file's current instruments, samples, groups and settings |
* Apply all the gig file's current instruments, samples, groups and settings |
6257 |
* to the respective RIFF chunks. You have to call Save() to make changes |
* to the respective RIFF chunks. You have to call Save() to make changes |
6260 |
* Usually there is absolutely no need to call this method explicitly. |
* Usually there is absolutely no need to call this method explicitly. |
6261 |
* It will be called automatically when File::Save() was called. |
* It will be called automatically when File::Save() was called. |
6262 |
* |
* |
6263 |
|
* @param pProgress - callback function for progress notification |
6264 |
* @throws Exception - on errors |
* @throws Exception - on errors |
6265 |
*/ |
*/ |
6266 |
void File::UpdateChunks() { |
void File::UpdateChunks(progress_t* pProgress) { |
6267 |
bool newFile = pRIFF->GetSubList(LIST_TYPE_INFO) == NULL; |
bool newFile = pRIFF->GetSubList(LIST_TYPE_INFO) == NULL; |
6268 |
|
|
6269 |
b64BitWavePoolOffsets = pVersion && pVersion->major == 3; |
// update own gig format extension chunks |
6270 |
|
// (not part of the GigaStudio 4 format) |
6271 |
|
RIFF::List* lst3LS = pRIFF->GetSubList(LIST_TYPE_3LS); |
6272 |
|
if (!lst3LS) { |
6273 |
|
lst3LS = pRIFF->AddSubList(LIST_TYPE_3LS); |
6274 |
|
} |
6275 |
|
// Make sure <3LS > chunk is placed before <ptbl> chunk. The precise |
6276 |
|
// location of <3LS > is irrelevant, however it should be located |
6277 |
|
// before the actual wave data |
6278 |
|
RIFF::Chunk* ckPTBL = pRIFF->GetSubChunk(CHUNK_ID_PTBL); |
6279 |
|
pRIFF->MoveSubChunk(lst3LS, ckPTBL); |
6280 |
|
|
6281 |
|
// This must be performed before writing the chunks for instruments, |
6282 |
|
// because the instruments' script slots will write the file offsets |
6283 |
|
// of the respective instrument script chunk as reference. |
6284 |
|
if (pScriptGroups) { |
6285 |
|
// Update instrument script (group) chunks. |
6286 |
|
for (std::list<ScriptGroup*>::iterator it = pScriptGroups->begin(); |
6287 |
|
it != pScriptGroups->end(); ++it) |
6288 |
|
{ |
6289 |
|
(*it)->UpdateChunks(pProgress); |
6290 |
|
} |
6291 |
|
} |
6292 |
|
|
6293 |
|
// in case no libgig custom format data was added, then remove the |
6294 |
|
// custom "3LS " chunk again |
6295 |
|
if (!lst3LS->CountSubChunks()) { |
6296 |
|
pRIFF->DeleteSubChunk(lst3LS); |
6297 |
|
lst3LS = NULL; |
6298 |
|
} |
6299 |
|
|
6300 |
// first update base class's chunks |
// first update base class's chunks |
6301 |
DLS::File::UpdateChunks(); |
DLS::File::UpdateChunks(pProgress); |
6302 |
|
|
6303 |
if (newFile) { |
if (newFile) { |
6304 |
// INFO was added by Resource::UpdateChunks - make sure it |
// INFO was added by Resource::UpdateChunks - make sure it |
6335 |
std::list<Group*>::iterator iter = pGroups->begin(); |
std::list<Group*>::iterator iter = pGroups->begin(); |
6336 |
std::list<Group*>::iterator end = pGroups->end(); |
std::list<Group*>::iterator end = pGroups->end(); |
6337 |
for (; iter != end; ++iter) { |
for (; iter != end; ++iter) { |
6338 |
(*iter)->UpdateChunks(); |
(*iter)->UpdateChunks(pProgress); |
6339 |
} |
} |
6340 |
} |
} |
6341 |
|
|
6355 |
// Note that there are several fields with unknown use. These |
// Note that there are several fields with unknown use. These |
6356 |
// are set to zero. |
// are set to zero. |
6357 |
|
|
6358 |
int sublen = pSamples->size() / 8 + 49; |
int sublen = int(pSamples->size() / 8 + 49); |
6359 |
int einfSize = (Instruments + 1) * sublen; |
int einfSize = (Instruments + 1) * sublen; |
6360 |
|
|
6361 |
RIFF::Chunk* einf = pRIFF->GetSubChunk(CHUNK_ID_EINF); |
RIFF::Chunk* einf = pRIFF->GetSubChunk(CHUNK_ID_EINF); |
6428 |
store32(&pData[(instrumentIdx + 1) * sublen + 24], nbloops); |
store32(&pData[(instrumentIdx + 1) * sublen + 24], nbloops); |
6429 |
// next 8 bytes unknown |
// next 8 bytes unknown |
6430 |
store32(&pData[(instrumentIdx + 1) * sublen + 36], instrumentIdx); |
store32(&pData[(instrumentIdx + 1) * sublen + 36], instrumentIdx); |
6431 |
store32(&pData[(instrumentIdx + 1) * sublen + 40], pSamples->size()); |
store32(&pData[(instrumentIdx + 1) * sublen + 40], (uint32_t) pSamples->size()); |
6432 |
// next 4 bytes unknown |
// next 4 bytes unknown |
6433 |
|
|
6434 |
totnbregions += instrument->Regions; |
totnbregions += instrument->Regions; |
6446 |
store32(&pData[24], totnbloops); |
store32(&pData[24], totnbloops); |
6447 |
// next 8 bytes unknown |
// next 8 bytes unknown |
6448 |
// next 4 bytes unknown, not always 0 |
// next 4 bytes unknown, not always 0 |
6449 |
store32(&pData[40], pSamples->size()); |
store32(&pData[40], (uint32_t) pSamples->size()); |
6450 |
// next 4 bytes unknown |
// next 4 bytes unknown |
6451 |
} |
} |
6452 |
|
|
6453 |
// update 3crc chunk |
// update 3crc chunk |
6454 |
|
|
6455 |
// The 3crc chunk contains CRC-32 checksums for the |
// The 3crc chunk contains CRC-32 checksums for the |
6456 |
// samples. The actual checksum values will be filled in |
// samples. When saving a gig file to disk, we first update the 3CRC |
6457 |
// later, by Sample::Write. |
// chunk here (in RAM) with the old crc values which we read from the |
6458 |
|
// 3CRC chunk when we opened the file (available with gig::Sample::crc |
6459 |
|
// member variable). This step is required, because samples might have |
6460 |
|
// been deleted by the user since the file was opened, which in turn |
6461 |
|
// changes the order of the (i.e. old) checksums within the 3crc chunk. |
6462 |
|
// If a sample was conciously modified by the user (that is if |
6463 |
|
// Sample::Write() was called later on) then Sample::Write() will just |
6464 |
|
// update the respective individual checksum(s) directly on disk and |
6465 |
|
// leaves all other sample checksums untouched. |
6466 |
|
|
6467 |
RIFF::Chunk* _3crc = pRIFF->GetSubChunk(CHUNK_ID_3CRC); |
RIFF::Chunk* _3crc = pRIFF->GetSubChunk(CHUNK_ID_3CRC); |
6468 |
if (_3crc) { |
if (_3crc) { |
6469 |
_3crc->Resize(pSamples->size() * 8); |
_3crc->Resize(pSamples->size() * 8); |
6470 |
} else if (newFile) { |
} else /*if (newFile)*/ { |
6471 |
_3crc = pRIFF->AddSubChunk(CHUNK_ID_3CRC, pSamples->size() * 8); |
_3crc = pRIFF->AddSubChunk(CHUNK_ID_3CRC, pSamples->size() * 8); |
|
_3crc->LoadChunkData(); |
|
|
|
|
6472 |
// the order of einf and 3crc is not the same in v2 and v3 |
// the order of einf and 3crc is not the same in v2 and v3 |
6473 |
if (einf && pVersion && pVersion->major == 3) pRIFF->MoveSubChunk(_3crc, einf); |
if (einf && pVersion && pVersion->major == 3) pRIFF->MoveSubChunk(_3crc, einf); |
6474 |
} |
} |
6475 |
|
{ // must be performed in RAM here ... |
6476 |
|
uint32_t* pData = (uint32_t*) _3crc->LoadChunkData(); |
6477 |
|
if (pData) { |
6478 |
|
File::SampleList::iterator iter = pSamples->begin(); |
6479 |
|
File::SampleList::iterator end = pSamples->end(); |
6480 |
|
for (int index = 0; iter != end; ++iter, ++index) { |
6481 |
|
gig::Sample* pSample = (gig::Sample*) *iter; |
6482 |
|
pData[index*2] = 1; // always 1 |
6483 |
|
pData[index*2+1] = pSample->crc; |
6484 |
|
} |
6485 |
|
} |
6486 |
|
} |
6487 |
|
} |
6488 |
|
|
6489 |
|
void File::UpdateFileOffsets() { |
6490 |
|
DLS::File::UpdateFileOffsets(); |
6491 |
|
|
6492 |
|
for (Instrument* instrument = GetFirstInstrument(); instrument; |
6493 |
|
instrument = GetNextInstrument()) |
6494 |
|
{ |
6495 |
|
instrument->UpdateScriptFileOffsets(); |
6496 |
|
} |
6497 |
} |
} |
6498 |
|
|
6499 |
/** |
/** |
6528 |
// *************** Exception *************** |
// *************** Exception *************** |
6529 |
// * |
// * |
6530 |
|
|
6531 |
Exception::Exception(String Message) : DLS::Exception(Message) { |
Exception::Exception() : DLS::Exception() { |
6532 |
|
} |
6533 |
|
|
6534 |
|
Exception::Exception(String format, ...) : DLS::Exception() { |
6535 |
|
va_list arg; |
6536 |
|
va_start(arg, format); |
6537 |
|
Message = assemble(format, arg); |
6538 |
|
va_end(arg); |
6539 |
|
} |
6540 |
|
|
6541 |
|
Exception::Exception(String format, va_list arg) : DLS::Exception() { |
6542 |
|
Message = assemble(format, arg); |
6543 |
} |
} |
6544 |
|
|
6545 |
void Exception::PrintMessage() { |
void Exception::PrintMessage() { |