/[svn]/libgig/trunk/src/gig.cpp
ViewVC logotype

Diff of /libgig/trunk/src/gig.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2394 by schoenebeck, Mon Jan 7 23:23:58 2013 UTC revision 2913 by schoenebeck, Tue May 17 15:19:33 2016 UTC
# Line 2  Line 2 
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-2013 by Christian Schoenebeck                      *   *   Copyright (C) 2003-2016 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  *
# Line 28  Line 28 
28  #include <algorithm>  #include <algorithm>
29  #include <math.h>  #include <math.h>
30  #include <iostream>  #include <iostream>
31    #include <assert.h>
32    
33    /// libgig's current file format version (for extending the original Giga file
34    /// format with libgig's own custom data / custom features).
35    #define GIG_FILE_EXT_VERSION    2
36    
37  /// Initial size of the sample buffer which is used for decompression of  /// Initial size of the sample buffer which is used for decompression of
38  /// compressed sample wave streams - this value should always be bigger than  /// compressed sample wave streams - this value should always be bigger than
# Line 52  Line 57 
57    
58  namespace gig {  namespace gig {
59    
 // *************** 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;  
         }  
     }  
   
   
60  // *************** Internal functions for sample decompression ***************  // *************** Internal functions for sample decompression ***************
61  // *  // *
62    
# Line 122  namespace { Line 95  namespace {
95      void Decompress16(int compressionmode, const unsigned char* params,      void Decompress16(int compressionmode, const unsigned char* params,
96                        int srcStep, int dstStep,                        int srcStep, int dstStep,
97                        const unsigned char* pSrc, int16_t* pDst,                        const unsigned char* pSrc, int16_t* pDst,
98                        unsigned long currentframeoffset,                        file_offset_t currentframeoffset,
99                        unsigned long copysamples)                        file_offset_t copysamples)
100      {      {
101          switch (compressionmode) {          switch (compressionmode) {
102              case 0: // 16 bit uncompressed              case 0: // 16 bit uncompressed
# Line 159  namespace { Line 132  namespace {
132    
133      void Decompress24(int compressionmode, const unsigned char* params,      void Decompress24(int compressionmode, const unsigned char* params,
134                        int dstStep, const unsigned char* pSrc, uint8_t* pDst,                        int dstStep, const unsigned char* pSrc, uint8_t* pDst,
135                        unsigned long currentframeoffset,                        file_offset_t currentframeoffset,
136                        unsigned long copysamples, int truncatedBits)                        file_offset_t copysamples, int truncatedBits)
137      {      {
138          int y, dy, ddy, dddy;          int y, dy, ddy, dddy;
139    
# Line 366  namespace { Line 339  namespace {
339       * @param fileNo         - number of an extension file where this sample       * @param fileNo         - number of an extension file where this sample
340       *                         is located, 0 otherwise       *                         is located, 0 otherwise
341       */       */
342      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) : DLS::Sample((DLS::File*) pFile, waveList, WavePoolOffset) {
343          static const DLS::Info::string_length_t fixedStringLengths[] = {          static const DLS::Info::string_length_t fixedStringLengths[] = {
344              { CHUNK_ID_INAM, 64 },              { CHUNK_ID_INAM, 64 },
345              { 0, 0 }              { 0, 0 }
# Line 454  namespace { Line 427  namespace {
427      }      }
428    
429      /**      /**
430         * Make a (semi) deep copy of the Sample object given by @a orig (without
431         * the actual waveform data) and assign it to this object.
432         *
433         * Discussion: copying .gig samples is a bit tricky. It requires three
434         * steps:
435         * 1. Copy sample's meta informations (done by CopyAssignMeta()) including
436         *    its new sample waveform data size.
437         * 2. Saving the file (done by File::Save()) so that it gains correct size
438         *    and layout for writing the actual wave form data directly to disc
439         *    in next step.
440         * 3. Copy the waveform data with disk streaming (done by CopyAssignWave()).
441         *
442         * @param orig - original Sample object to be copied from
443         */
444        void Sample::CopyAssignMeta(const Sample* orig) {
445            // handle base classes
446            DLS::Sample::CopyAssignCore(orig);
447            
448            // handle actual own attributes of this class
449            Manufacturer = orig->Manufacturer;
450            Product = orig->Product;
451            SamplePeriod = orig->SamplePeriod;
452            MIDIUnityNote = orig->MIDIUnityNote;
453            FineTune = orig->FineTune;
454            SMPTEFormat = orig->SMPTEFormat;
455            SMPTEOffset = orig->SMPTEOffset;
456            Loops = orig->Loops;
457            LoopID = orig->LoopID;
458            LoopType = orig->LoopType;
459            LoopStart = orig->LoopStart;
460            LoopEnd = orig->LoopEnd;
461            LoopSize = orig->LoopSize;
462            LoopFraction = orig->LoopFraction;
463            LoopPlayCount = orig->LoopPlayCount;
464            
465            // schedule resizing this sample to the given sample's size
466            Resize(orig->GetSize());
467        }
468    
469        /**
470         * Should be called after CopyAssignMeta() and File::Save() sequence.
471         * Read more about it in the discussion of CopyAssignMeta(). This method
472         * copies the actual waveform data by disk streaming.
473         *
474         * @e CAUTION: this method is currently not thread safe! During this
475         * operation the sample must not be used for other purposes by other
476         * threads!
477         *
478         * @param orig - original Sample object to be copied from
479         */
480        void Sample::CopyAssignWave(const Sample* orig) {
481            const int iReadAtOnce = 32*1024;
482            char* buf = new char[iReadAtOnce * orig->FrameSize];
483            Sample* pOrig = (Sample*) orig; //HACK: remove constness for now
484            file_offset_t restorePos = pOrig->GetPos();
485            pOrig->SetPos(0);
486            SetPos(0);
487            for (file_offset_t n = pOrig->Read(buf, iReadAtOnce); n;
488                               n = pOrig->Read(buf, iReadAtOnce))
489            {
490                Write(buf, n);
491            }
492            pOrig->SetPos(restorePos);
493            delete [] buf;
494        }
495    
496        /**
497       * Apply sample and its settings to the respective RIFF chunks. You have       * Apply sample and its settings to the respective RIFF chunks. You have
498       * to call File::Save() to make changes persistent.       * to call File::Save() to make changes persistent.
499       *       *
500       * Usually there is absolutely no need to call this method explicitly.       * Usually there is absolutely no need to call this method explicitly.
501       * It will be called automatically when File::Save() was called.       * It will be called automatically when File::Save() was called.
502       *       *
503         * @param pProgress - callback function for progress notification
504       * @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
505       *                        was provided yet       *                        was provided yet
506       * @throws gig::Exception if there is any invalid sample setting       * @throws gig::Exception if there is any invalid sample setting
507       */       */
508      void Sample::UpdateChunks() {      void Sample::UpdateChunks(progress_t* pProgress) {
509          // first update base class's chunks          // first update base class's chunks
510          DLS::Sample::UpdateChunks();          DLS::Sample::UpdateChunks(pProgress);
511    
512          // make sure 'smpl' chunk exists          // make sure 'smpl' chunk exists
513          pCkSmpl = pWaveList->GetSubChunk(CHUNK_ID_SMPL);          pCkSmpl = pWaveList->GetSubChunk(CHUNK_ID_SMPL);
# Line 514  namespace { Line 555  namespace {
555          // update '3gix' chunk          // update '3gix' chunk
556          pData = (uint8_t*) pCk3gix->LoadChunkData();          pData = (uint8_t*) pCk3gix->LoadChunkData();
557          store16(&pData[0], iSampleGroup);          store16(&pData[0], iSampleGroup);
558    
559            // if the library user toggled the "Compressed" attribute from true to
560            // false, then the EWAV chunk associated with compressed samples needs
561            // to be deleted
562            RIFF::Chunk* ewav = pWaveList->GetSubChunk(CHUNK_ID_EWAV);
563            if (ewav && !Compressed) {
564                pWaveList->DeleteSubChunk(ewav);
565            }
566      }      }
567    
568      /// Scans compressed samples for mandatory informations (e.g. actual number of total sample points).      /// Scans compressed samples for mandatory informations (e.g. actual number of total sample points).
569      void Sample::ScanCompressedSample() {      void Sample::ScanCompressedSample() {
570          //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)
571          this->SamplesTotal = 0;          this->SamplesTotal = 0;
572          std::list<unsigned long> frameOffsets;          std::list<file_offset_t> frameOffsets;
573    
574          SamplesPerFrame = BitDepth == 24 ? 256 : 2048;          SamplesPerFrame = BitDepth == 24 ? 256 : 2048;
575          WorstCaseFrameSize = SamplesPerFrame * FrameSize + Channels; // +Channels for compression flag          WorstCaseFrameSize = SamplesPerFrame * FrameSize + Channels; // +Channels for compression flag
# Line 536  namespace { Line 585  namespace {
585                  const int mode_l = pCkData->ReadUint8();                  const int mode_l = pCkData->ReadUint8();
586                  const int mode_r = pCkData->ReadUint8();                  const int mode_r = pCkData->ReadUint8();
587                  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");
588                  const unsigned long frameSize = bytesPerFrame[mode_l] + bytesPerFrame[mode_r];                  const file_offset_t frameSize = bytesPerFrame[mode_l] + bytesPerFrame[mode_r];
589    
590                  if (pCkData->RemainingBytes() <= frameSize) {                  if (pCkData->RemainingBytes() <= frameSize) {
591                      SamplesInLastFrame =                      SamplesInLastFrame =
# Line 555  namespace { Line 604  namespace {
604    
605                  const int mode = pCkData->ReadUint8();                  const int mode = pCkData->ReadUint8();
606                  if (mode > 5) throw gig::Exception("Unknown compression mode");                  if (mode > 5) throw gig::Exception("Unknown compression mode");
607                  const unsigned long frameSize = bytesPerFrame[mode];                  const file_offset_t frameSize = bytesPerFrame[mode];
608    
609                  if (pCkData->RemainingBytes() <= frameSize) {                  if (pCkData->RemainingBytes() <= frameSize) {
610                      SamplesInLastFrame =                      SamplesInLastFrame =
# Line 571  namespace { Line 620  namespace {
620    
621          // 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)
622          if (FrameTable) delete[] FrameTable;          if (FrameTable) delete[] FrameTable;
623          FrameTable = new unsigned long[frameOffsets.size()];          FrameTable = new file_offset_t[frameOffsets.size()];
624          std::list<unsigned long>::iterator end  = frameOffsets.end();          std::list<file_offset_t>::iterator end  = frameOffsets.end();
625          std::list<unsigned long>::iterator iter = frameOffsets.begin();          std::list<file_offset_t>::iterator iter = frameOffsets.begin();
626          for (int i = 0; iter != end; i++, iter++) {          for (int i = 0; iter != end; i++, iter++) {
627              FrameTable[i] = *iter;              FrameTable[i] = *iter;
628          }          }
# Line 614  namespace { Line 663  namespace {
663       *                      the cached sample data in bytes       *                      the cached sample data in bytes
664       * @see                 ReleaseSampleData(), Read(), SetPos()       * @see                 ReleaseSampleData(), Read(), SetPos()
665       */       */
666      buffer_t Sample::LoadSampleData(unsigned long SampleCount) {      buffer_t Sample::LoadSampleData(file_offset_t SampleCount) {
667          return LoadSampleDataWithNullSamplesExtension(SampleCount, 0); // 0 amount of NullSamples          return LoadSampleDataWithNullSamplesExtension(SampleCount, 0); // 0 amount of NullSamples
668      }      }
669    
# Line 673  namespace { Line 722  namespace {
722       *                           size of the cached sample data in bytes       *                           size of the cached sample data in bytes
723       * @see                      ReleaseSampleData(), Read(), SetPos()       * @see                      ReleaseSampleData(), Read(), SetPos()
724       */       */
725      buffer_t Sample::LoadSampleDataWithNullSamplesExtension(unsigned long SampleCount, uint NullSamplesCount) {      buffer_t Sample::LoadSampleDataWithNullSamplesExtension(file_offset_t SampleCount, uint NullSamplesCount) {
726          if (SampleCount > this->SamplesTotal) SampleCount = this->SamplesTotal;          if (SampleCount > this->SamplesTotal) SampleCount = this->SamplesTotal;
727          if (RAMCache.pStart) delete[] (int8_t*) RAMCache.pStart;          if (RAMCache.pStart) delete[] (int8_t*) RAMCache.pStart;
728          unsigned long allocationsize = (SampleCount + NullSamplesCount) * this->FrameSize;          file_offset_t allocationsize = (SampleCount + NullSamplesCount) * this->FrameSize;
729          SetPos(0); // reset read position to begin of sample          SetPos(0); // reset read position to begin of sample
730          RAMCache.pStart            = new int8_t[allocationsize];          RAMCache.pStart            = new int8_t[allocationsize];
731          RAMCache.Size              = Read(RAMCache.pStart, SampleCount) * this->FrameSize;          RAMCache.Size              = Read(RAMCache.pStart, SampleCount) * this->FrameSize;
# Line 774  namespace { Line 823  namespace {
823       * @returns            the new sample position       * @returns            the new sample position
824       * @see                Read()       * @see                Read()
825       */       */
826      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) {
827          if (Compressed) {          if (Compressed) {
828              switch (Whence) {              switch (Whence) {
829                  case RIFF::stream_curpos:                  case RIFF::stream_curpos:
# Line 792  namespace { Line 841  namespace {
841              }              }
842              if (this->SamplePos > this->SamplesTotal) this->SamplePos = this->SamplesTotal;              if (this->SamplePos > this->SamplesTotal) this->SamplePos = this->SamplesTotal;
843    
844              unsigned long frame = this->SamplePos / 2048; // to which frame to jump              file_offset_t frame = this->SamplePos / 2048; // to which frame to jump
845              this->FrameOffset   = this->SamplePos % 2048; // offset (in sample points) within that frame              this->FrameOffset   = this->SamplePos % 2048; // offset (in sample points) within that frame
846              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
847              return this->SamplePos;              return this->SamplePos;
848          }          }
849          else { // not compressed          else { // not compressed
850              unsigned long orderedBytes = SampleCount * this->FrameSize;              file_offset_t orderedBytes = SampleCount * this->FrameSize;
851              unsigned long result = pCkData->SetPos(orderedBytes, Whence);              file_offset_t result = pCkData->SetPos(orderedBytes, Whence);
852              return (result == orderedBytes) ? SampleCount              return (result == orderedBytes) ? SampleCount
853                                              : result / this->FrameSize;                                              : result / this->FrameSize;
854          }          }
# Line 808  namespace { Line 857  namespace {
857      /**      /**
858       * Returns the current position in the sample (in sample points).       * Returns the current position in the sample (in sample points).
859       */       */
860      unsigned long Sample::GetPos() {      file_offset_t Sample::GetPos() const {
861          if (Compressed) return SamplePos;          if (Compressed) return SamplePos;
862          else            return pCkData->GetPos() / FrameSize;          else            return pCkData->GetPos() / FrameSize;
863      }      }
# Line 847  namespace { Line 896  namespace {
896       * @returns                number of successfully read sample points       * @returns                number of successfully read sample points
897       * @see                    CreateDecompressionBuffer()       * @see                    CreateDecompressionBuffer()
898       */       */
899      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,
900                                        DimensionRegion* pDimRgn, buffer_t* pExternalDecompressionBuffer) {                                        DimensionRegion* pDimRgn, buffer_t* pExternalDecompressionBuffer) {
901          unsigned long samplestoread = SampleCount, totalreadsamples = 0, readsamples, samplestoloopend;          file_offset_t samplestoread = SampleCount, totalreadsamples = 0, readsamples, samplestoloopend;
902          uint8_t* pDst = (uint8_t*) pBuffer;          uint8_t* pDst = (uint8_t*) pBuffer;
903    
904          SetPos(pPlaybackState->position); // recover position from the last time          SetPos(pPlaybackState->position); // recover position from the last time
# Line 887  namespace { Line 936  namespace {
936                                  // reading, swap all sample frames so it reflects                                  // reading, swap all sample frames so it reflects
937                                  // backward playback                                  // backward playback
938    
939                                  unsigned long swapareastart       = totalreadsamples;                                  file_offset_t swapareastart       = totalreadsamples;
940                                  unsigned long loopoffset          = GetPos() - loop.LoopStart;                                  file_offset_t loopoffset          = GetPos() - loop.LoopStart;
941                                  unsigned long samplestoreadinloop = Min(samplestoread, loopoffset);                                  file_offset_t samplestoreadinloop = Min(samplestoread, loopoffset);
942                                  unsigned long reverseplaybackend  = GetPos() - samplestoreadinloop;                                  file_offset_t reverseplaybackend  = GetPos() - samplestoreadinloop;
943    
944                                  SetPos(reverseplaybackend);                                  SetPos(reverseplaybackend);
945    
# Line 938  namespace { Line 987  namespace {
987                          // reading, swap all sample frames so it reflects                          // reading, swap all sample frames so it reflects
988                          // backward playback                          // backward playback
989    
990                          unsigned long swapareastart       = totalreadsamples;                          file_offset_t swapareastart       = totalreadsamples;
991                          unsigned long loopoffset          = GetPos() - loop.LoopStart;                          file_offset_t loopoffset          = GetPos() - loop.LoopStart;
992                          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)
993                                                                                    : samplestoread;                                                                                    : samplestoread;
994                          unsigned long reverseplaybackend  = loop.LoopStart + Abs((loopoffset - samplestoreadinloop) % loop.LoopLength);                          file_offset_t reverseplaybackend  = loop.LoopStart + Abs((loopoffset - samplestoreadinloop) % loop.LoopLength);
995    
996                          SetPos(reverseplaybackend);                          SetPos(reverseplaybackend);
997    
# Line 1022  namespace { Line 1071  namespace {
1071       * @returns            number of successfully read sample points       * @returns            number of successfully read sample points
1072       * @see                SetPos(), CreateDecompressionBuffer()       * @see                SetPos(), CreateDecompressionBuffer()
1073       */       */
1074      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) {
1075          if (SampleCount == 0) return 0;          if (SampleCount == 0) return 0;
1076          if (!Compressed) {          if (!Compressed) {
1077              if (BitDepth == 24) {              if (BitDepth == 24) {
# Line 1037  namespace { Line 1086  namespace {
1086          else {          else {
1087              if (this->SamplePos >= this->SamplesTotal) return 0;              if (this->SamplePos >= this->SamplesTotal) return 0;
1088              //TODO: efficiency: maybe we should test for an average compression rate              //TODO: efficiency: maybe we should test for an average compression rate
1089              unsigned long assumedsize      = GuessSize(SampleCount),              file_offset_t assumedsize      = GuessSize(SampleCount),
1090                            remainingbytes   = 0,           // remaining bytes in the local buffer                            remainingbytes   = 0,           // remaining bytes in the local buffer
1091                            remainingsamples = SampleCount,                            remainingsamples = SampleCount,
1092                            copysamples, skipsamples,                            copysamples, skipsamples,
# Line 1060  namespace { Line 1109  namespace {
1109              remainingbytes = pCkData->Read(pSrc, assumedsize, 1);              remainingbytes = pCkData->Read(pSrc, assumedsize, 1);
1110    
1111              while (remainingsamples && remainingbytes) {              while (remainingsamples && remainingbytes) {
1112                  unsigned long framesamples = SamplesPerFrame;                  file_offset_t framesamples = SamplesPerFrame;
1113                  unsigned long framebytes, rightChannelOffset = 0, nextFrameOffset;                  file_offset_t framebytes, rightChannelOffset = 0, nextFrameOffset;
1114    
1115                  int mode_l = *pSrc++, mode_r = 0;                  int mode_l = *pSrc++, mode_r = 0;
1116    
# Line 1211  namespace { Line 1260  namespace {
1260       * @throws gig::Exception if sample is compressed       * @throws gig::Exception if sample is compressed
1261       * @see DLS::LoadSampleData()       * @see DLS::LoadSampleData()
1262       */       */
1263      unsigned long Sample::Write(void* pBuffer, unsigned long SampleCount) {      file_offset_t Sample::Write(void* pBuffer, file_offset_t SampleCount) {
1264          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)");
1265    
1266          // if this is the first write in this sample, reset the          // if this is the first write in this sample, reset the
# Line 1220  namespace { Line 1269  namespace {
1269              __resetCRC(crc);              __resetCRC(crc);
1270          }          }
1271          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");
1272          unsigned long res;          file_offset_t res;
1273          if (BitDepth == 24) {          if (BitDepth == 24) {
1274              res = pCkData->Write(pBuffer, SampleCount * FrameSize, 1) / FrameSize;              res = pCkData->Write(pBuffer, SampleCount * FrameSize, 1) / FrameSize;
1275          } else { // 16 bit          } else { // 16 bit
# Line 1254  namespace { Line 1303  namespace {
1303       * @returns allocated decompression buffer       * @returns allocated decompression buffer
1304       * @see DestroyDecompressionBuffer()       * @see DestroyDecompressionBuffer()
1305       */       */
1306      buffer_t Sample::CreateDecompressionBuffer(unsigned long MaxReadSize) {      buffer_t Sample::CreateDecompressionBuffer(file_offset_t MaxReadSize) {
1307          buffer_t result;          buffer_t result;
1308          const double worstCaseHeaderOverhead =          const double worstCaseHeaderOverhead =
1309                  (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;
1310          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);
1311          result.pStart            = new int8_t[result.Size];          result.pStart            = new int8_t[result.Size];
1312          result.NullExtensionSize = 0;          result.NullExtensionSize = 0;
1313          return result;          return result;
# Line 1433  namespace { Line 1482  namespace {
1482                                                          : vcf_res_ctrl_none;                                                          : vcf_res_ctrl_none;
1483              uint16_t eg3depth = _3ewa->ReadUint16();              uint16_t eg3depth = _3ewa->ReadUint16();
1484              EG3Depth = (eg3depth <= 1200) ? eg3depth /* positives */              EG3Depth = (eg3depth <= 1200) ? eg3depth /* positives */
1485                                          : (-1) * (int16_t) ((eg3depth ^ 0xffff) + 1); /* binary complementary for negatives */                                          : (-1) * (int16_t) ((eg3depth ^ 0xfff) + 1); /* binary complementary for negatives */
1486              _3ewa->ReadInt16(); // unknown              _3ewa->ReadInt16(); // unknown
1487              ChannelOffset = _3ewa->ReadUint8() / 4;              ChannelOffset = _3ewa->ReadUint8() / 4;
1488              uint8_t regoptions = _3ewa->ReadUint8();              uint8_t regoptions = _3ewa->ReadUint8();
# Line 1608  namespace { Line 1657  namespace {
1657       * @param orig - original DimensionRegion object to be copied from       * @param orig - original DimensionRegion object to be copied from
1658       */       */
1659      void DimensionRegion::CopyAssign(const DimensionRegion* orig) {      void DimensionRegion::CopyAssign(const DimensionRegion* orig) {
1660            CopyAssign(orig, NULL);
1661        }
1662    
1663        /**
1664         * Make a (semi) deep copy of the DimensionRegion object given by @a orig
1665         * and assign it to this object.
1666         *
1667         * @param orig - original DimensionRegion object to be copied from
1668         * @param mSamples - crosslink map between the foreign file's samples and
1669         *                   this file's samples
1670         */
1671        void DimensionRegion::CopyAssign(const DimensionRegion* orig, const std::map<Sample*,Sample*>* mSamples) {
1672          // delete all allocated data first          // delete all allocated data first
1673          if (VelocityTable) delete [] VelocityTable;          if (VelocityTable) delete [] VelocityTable;
1674          if (pSampleLoops) delete [] pSampleLoops;          if (pSampleLoops) delete [] pSampleLoops;
# Line 1615  namespace { Line 1676  namespace {
1676          // backup parent list pointer          // backup parent list pointer
1677          RIFF::List* p = pParentList;          RIFF::List* p = pParentList;
1678                    
1679            gig::Sample* pOriginalSample = pSample;
1680            gig::Region* pOriginalRegion = pRegion;
1681            
1682          //NOTE: copy code copied from assignment constructor above, see comment there as well          //NOTE: copy code copied from assignment constructor above, see comment there as well
1683                    
1684          *this = *orig; // default memberwise shallow copy of all parameters          *this = *orig; // default memberwise shallow copy of all parameters
1685            
1686            // restore members that shall not be altered
1687          pParentList = p; // restore the chunk pointer          pParentList = p; // restore the chunk pointer
1688            pRegion = pOriginalRegion;
1689            
1690            // only take the raw sample reference reference if the
1691            // two DimensionRegion objects are part of the same file
1692            if (pOriginalRegion->GetParent()->GetParent() != orig->pRegion->GetParent()->GetParent()) {
1693                pSample = pOriginalSample;
1694            }
1695            
1696            if (mSamples && mSamples->count(orig->pSample)) {
1697                pSample = mSamples->find(orig->pSample)->second;
1698            }
1699    
1700          // deep copy of owned structures          // deep copy of owned structures
1701          if (orig->VelocityTable) {          if (orig->VelocityTable) {
# Line 1648  namespace { Line 1725  namespace {
1725       *       *
1726       * Usually there is absolutely no need to call this method explicitly.       * Usually there is absolutely no need to call this method explicitly.
1727       * It will be called automatically when File::Save() was called.       * It will be called automatically when File::Save() was called.
1728         *
1729         * @param pProgress - callback function for progress notification
1730       */       */
1731      void DimensionRegion::UpdateChunks() {      void DimensionRegion::UpdateChunks(progress_t* pProgress) {
1732          // first update base class's chunk          // first update base class's chunk
1733          DLS::Sampler::UpdateChunks();          DLS::Sampler::UpdateChunks(pProgress);
1734    
1735          RIFF::Chunk* wsmp = pParentList->GetSubChunk(CHUNK_ID_WSMP);          RIFF::Chunk* wsmp = pParentList->GetSubChunk(CHUNK_ID_WSMP);
1736          uint8_t* pData = (uint8_t*) wsmp->LoadChunkData();          uint8_t* pData = (uint8_t*) wsmp->LoadChunkData();
# Line 1873  namespace { Line 1952  namespace {
1952          }          }
1953    
1954          const uint16_t eg3depth = (EG3Depth >= 0) ? EG3Depth          const uint16_t eg3depth = (EG3Depth >= 0) ? EG3Depth
1955                                                    : uint16_t(((-EG3Depth) - 1) ^ 0xffff); /* binary complementary for negatives */                                                    : uint16_t(((-EG3Depth) - 1) ^ 0xfff); /* binary complementary for negatives */
1956          store16(&pData[116], eg3depth);          store16(&pData[116], eg3depth);
1957    
1958          // next 2 bytes unknown          // next 2 bytes unknown
# Line 1986  namespace { Line 2065  namespace {
2065          return pRegion;          return pRegion;
2066      }      }
2067    
2068    // show error if some _lev_ctrl_* enum entry is not listed in the following function
2069    // (commented out for now, because "diagnostic push" not supported prior GCC 4.6)
2070    // TODO: uncomment and add a GCC version check (see also commented "#pragma GCC diagnostic pop" below)
2071    //#pragma GCC diagnostic push
2072    //#pragma GCC diagnostic error "-Wswitch"
2073    
2074      leverage_ctrl_t DimensionRegion::DecodeLeverageController(_lev_ctrl_t EncodedController) {      leverage_ctrl_t DimensionRegion::DecodeLeverageController(_lev_ctrl_t EncodedController) {
2075          leverage_ctrl_t decodedcontroller;          leverage_ctrl_t decodedcontroller;
2076          switch (EncodedController) {          switch (EncodedController) {
# Line 2097  namespace { Line 2182  namespace {
2182                  decodedcontroller.controller_number = 95;                  decodedcontroller.controller_number = 95;
2183                  break;                  break;
2184    
2185                // format extension (these controllers are so far only supported by
2186                // LinuxSampler & gigedit) they will *NOT* work with
2187                // Gigasampler/GigaStudio !
2188                case _lev_ctrl_CC3_EXT:
2189                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2190                    decodedcontroller.controller_number = 3;
2191                    break;
2192                case _lev_ctrl_CC6_EXT:
2193                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2194                    decodedcontroller.controller_number = 6;
2195                    break;
2196                case _lev_ctrl_CC7_EXT:
2197                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2198                    decodedcontroller.controller_number = 7;
2199                    break;
2200                case _lev_ctrl_CC8_EXT:
2201                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2202                    decodedcontroller.controller_number = 8;
2203                    break;
2204                case _lev_ctrl_CC9_EXT:
2205                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2206                    decodedcontroller.controller_number = 9;
2207                    break;
2208                case _lev_ctrl_CC10_EXT:
2209                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2210                    decodedcontroller.controller_number = 10;
2211                    break;
2212                case _lev_ctrl_CC11_EXT:
2213                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2214                    decodedcontroller.controller_number = 11;
2215                    break;
2216                case _lev_ctrl_CC14_EXT:
2217                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2218                    decodedcontroller.controller_number = 14;
2219                    break;
2220                case _lev_ctrl_CC15_EXT:
2221                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2222                    decodedcontroller.controller_number = 15;
2223                    break;
2224                case _lev_ctrl_CC20_EXT:
2225                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2226                    decodedcontroller.controller_number = 20;
2227                    break;
2228                case _lev_ctrl_CC21_EXT:
2229                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2230                    decodedcontroller.controller_number = 21;
2231                    break;
2232                case _lev_ctrl_CC22_EXT:
2233                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2234                    decodedcontroller.controller_number = 22;
2235                    break;
2236                case _lev_ctrl_CC23_EXT:
2237                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2238                    decodedcontroller.controller_number = 23;
2239                    break;
2240                case _lev_ctrl_CC24_EXT:
2241                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2242                    decodedcontroller.controller_number = 24;
2243                    break;
2244                case _lev_ctrl_CC25_EXT:
2245                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2246                    decodedcontroller.controller_number = 25;
2247                    break;
2248                case _lev_ctrl_CC26_EXT:
2249                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2250                    decodedcontroller.controller_number = 26;
2251                    break;
2252                case _lev_ctrl_CC27_EXT:
2253                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2254                    decodedcontroller.controller_number = 27;
2255                    break;
2256                case _lev_ctrl_CC28_EXT:
2257                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2258                    decodedcontroller.controller_number = 28;
2259                    break;
2260                case _lev_ctrl_CC29_EXT:
2261                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2262                    decodedcontroller.controller_number = 29;
2263                    break;
2264                case _lev_ctrl_CC30_EXT:
2265                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2266                    decodedcontroller.controller_number = 30;
2267                    break;
2268                case _lev_ctrl_CC31_EXT:
2269                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2270                    decodedcontroller.controller_number = 31;
2271                    break;
2272                case _lev_ctrl_CC68_EXT:
2273                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2274                    decodedcontroller.controller_number = 68;
2275                    break;
2276                case _lev_ctrl_CC69_EXT:
2277                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2278                    decodedcontroller.controller_number = 69;
2279                    break;
2280                case _lev_ctrl_CC70_EXT:
2281                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2282                    decodedcontroller.controller_number = 70;
2283                    break;
2284                case _lev_ctrl_CC71_EXT:
2285                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2286                    decodedcontroller.controller_number = 71;
2287                    break;
2288                case _lev_ctrl_CC72_EXT:
2289                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2290                    decodedcontroller.controller_number = 72;
2291                    break;
2292                case _lev_ctrl_CC73_EXT:
2293                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2294                    decodedcontroller.controller_number = 73;
2295                    break;
2296                case _lev_ctrl_CC74_EXT:
2297                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2298                    decodedcontroller.controller_number = 74;
2299                    break;
2300                case _lev_ctrl_CC75_EXT:
2301                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2302                    decodedcontroller.controller_number = 75;
2303                    break;
2304                case _lev_ctrl_CC76_EXT:
2305                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2306                    decodedcontroller.controller_number = 76;
2307                    break;
2308                case _lev_ctrl_CC77_EXT:
2309                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2310                    decodedcontroller.controller_number = 77;
2311                    break;
2312                case _lev_ctrl_CC78_EXT:
2313                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2314                    decodedcontroller.controller_number = 78;
2315                    break;
2316                case _lev_ctrl_CC79_EXT:
2317                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2318                    decodedcontroller.controller_number = 79;
2319                    break;
2320                case _lev_ctrl_CC84_EXT:
2321                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2322                    decodedcontroller.controller_number = 84;
2323                    break;
2324                case _lev_ctrl_CC85_EXT:
2325                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2326                    decodedcontroller.controller_number = 85;
2327                    break;
2328                case _lev_ctrl_CC86_EXT:
2329                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2330                    decodedcontroller.controller_number = 86;
2331                    break;
2332                case _lev_ctrl_CC87_EXT:
2333                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2334                    decodedcontroller.controller_number = 87;
2335                    break;
2336                case _lev_ctrl_CC89_EXT:
2337                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2338                    decodedcontroller.controller_number = 89;
2339                    break;
2340                case _lev_ctrl_CC90_EXT:
2341                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2342                    decodedcontroller.controller_number = 90;
2343                    break;
2344                case _lev_ctrl_CC96_EXT:
2345                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2346                    decodedcontroller.controller_number = 96;
2347                    break;
2348                case _lev_ctrl_CC97_EXT:
2349                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2350                    decodedcontroller.controller_number = 97;
2351                    break;
2352                case _lev_ctrl_CC102_EXT:
2353                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2354                    decodedcontroller.controller_number = 102;
2355                    break;
2356                case _lev_ctrl_CC103_EXT:
2357                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2358                    decodedcontroller.controller_number = 103;
2359                    break;
2360                case _lev_ctrl_CC104_EXT:
2361                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2362                    decodedcontroller.controller_number = 104;
2363                    break;
2364                case _lev_ctrl_CC105_EXT:
2365                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2366                    decodedcontroller.controller_number = 105;
2367                    break;
2368                case _lev_ctrl_CC106_EXT:
2369                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2370                    decodedcontroller.controller_number = 106;
2371                    break;
2372                case _lev_ctrl_CC107_EXT:
2373                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2374                    decodedcontroller.controller_number = 107;
2375                    break;
2376                case _lev_ctrl_CC108_EXT:
2377                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2378                    decodedcontroller.controller_number = 108;
2379                    break;
2380                case _lev_ctrl_CC109_EXT:
2381                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2382                    decodedcontroller.controller_number = 109;
2383                    break;
2384                case _lev_ctrl_CC110_EXT:
2385                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2386                    decodedcontroller.controller_number = 110;
2387                    break;
2388                case _lev_ctrl_CC111_EXT:
2389                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2390                    decodedcontroller.controller_number = 111;
2391                    break;
2392                case _lev_ctrl_CC112_EXT:
2393                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2394                    decodedcontroller.controller_number = 112;
2395                    break;
2396                case _lev_ctrl_CC113_EXT:
2397                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2398                    decodedcontroller.controller_number = 113;
2399                    break;
2400                case _lev_ctrl_CC114_EXT:
2401                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2402                    decodedcontroller.controller_number = 114;
2403                    break;
2404                case _lev_ctrl_CC115_EXT:
2405                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2406                    decodedcontroller.controller_number = 115;
2407                    break;
2408                case _lev_ctrl_CC116_EXT:
2409                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2410                    decodedcontroller.controller_number = 116;
2411                    break;
2412                case _lev_ctrl_CC117_EXT:
2413                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2414                    decodedcontroller.controller_number = 117;
2415                    break;
2416                case _lev_ctrl_CC118_EXT:
2417                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2418                    decodedcontroller.controller_number = 118;
2419                    break;
2420                case _lev_ctrl_CC119_EXT:
2421                    decodedcontroller.type = leverage_ctrl_t::type_controlchange;
2422                    decodedcontroller.controller_number = 119;
2423                    break;
2424    
2425              // unknown controller type              // unknown controller type
2426              default:              default:
2427                  throw gig::Exception("Unknown leverage controller type.");                  throw gig::Exception("Unknown leverage controller type.");
2428          }          }
2429          return decodedcontroller;          return decodedcontroller;
2430      }      }
2431        
2432    // see above (diagnostic push not supported prior GCC 4.6)
2433    //#pragma GCC diagnostic pop
2434    
2435      DimensionRegion::_lev_ctrl_t DimensionRegion::EncodeLeverageController(leverage_ctrl_t DecodedController) {      DimensionRegion::_lev_ctrl_t DimensionRegion::EncodeLeverageController(leverage_ctrl_t DecodedController) {
2436          _lev_ctrl_t encodedcontroller;          _lev_ctrl_t encodedcontroller;
# Line 2190  namespace { Line 2518  namespace {
2518                      case 95:                      case 95:
2519                          encodedcontroller = _lev_ctrl_effect5depth;                          encodedcontroller = _lev_ctrl_effect5depth;
2520                          break;                          break;
2521    
2522                        // format extension (these controllers are so far only
2523                        // supported by LinuxSampler & gigedit) they will *NOT*
2524                        // work with Gigasampler/GigaStudio !
2525                        case 3:
2526                            encodedcontroller = _lev_ctrl_CC3_EXT;
2527                            break;
2528                        case 6:
2529                            encodedcontroller = _lev_ctrl_CC6_EXT;
2530                            break;
2531                        case 7:
2532                            encodedcontroller = _lev_ctrl_CC7_EXT;
2533                            break;
2534                        case 8:
2535                            encodedcontroller = _lev_ctrl_CC8_EXT;
2536                            break;
2537                        case 9:
2538                            encodedcontroller = _lev_ctrl_CC9_EXT;
2539                            break;
2540                        case 10:
2541                            encodedcontroller = _lev_ctrl_CC10_EXT;
2542                            break;
2543                        case 11:
2544                            encodedcontroller = _lev_ctrl_CC11_EXT;
2545                            break;
2546                        case 14:
2547                            encodedcontroller = _lev_ctrl_CC14_EXT;
2548                            break;
2549                        case 15:
2550                            encodedcontroller = _lev_ctrl_CC15_EXT;
2551                            break;
2552                        case 20:
2553                            encodedcontroller = _lev_ctrl_CC20_EXT;
2554                            break;
2555                        case 21:
2556                            encodedcontroller = _lev_ctrl_CC21_EXT;
2557                            break;
2558                        case 22:
2559                            encodedcontroller = _lev_ctrl_CC22_EXT;
2560                            break;
2561                        case 23:
2562                            encodedcontroller = _lev_ctrl_CC23_EXT;
2563                            break;
2564                        case 24:
2565                            encodedcontroller = _lev_ctrl_CC24_EXT;
2566                            break;
2567                        case 25:
2568                            encodedcontroller = _lev_ctrl_CC25_EXT;
2569                            break;
2570                        case 26:
2571                            encodedcontroller = _lev_ctrl_CC26_EXT;
2572                            break;
2573                        case 27:
2574                            encodedcontroller = _lev_ctrl_CC27_EXT;
2575                            break;
2576                        case 28:
2577                            encodedcontroller = _lev_ctrl_CC28_EXT;
2578                            break;
2579                        case 29:
2580                            encodedcontroller = _lev_ctrl_CC29_EXT;
2581                            break;
2582                        case 30:
2583                            encodedcontroller = _lev_ctrl_CC30_EXT;
2584                            break;
2585                        case 31:
2586                            encodedcontroller = _lev_ctrl_CC31_EXT;
2587                            break;
2588                        case 68:
2589                            encodedcontroller = _lev_ctrl_CC68_EXT;
2590                            break;
2591                        case 69:
2592                            encodedcontroller = _lev_ctrl_CC69_EXT;
2593                            break;
2594                        case 70:
2595                            encodedcontroller = _lev_ctrl_CC70_EXT;
2596                            break;
2597                        case 71:
2598                            encodedcontroller = _lev_ctrl_CC71_EXT;
2599                            break;
2600                        case 72:
2601                            encodedcontroller = _lev_ctrl_CC72_EXT;
2602                            break;
2603                        case 73:
2604                            encodedcontroller = _lev_ctrl_CC73_EXT;
2605                            break;
2606                        case 74:
2607                            encodedcontroller = _lev_ctrl_CC74_EXT;
2608                            break;
2609                        case 75:
2610                            encodedcontroller = _lev_ctrl_CC75_EXT;
2611                            break;
2612                        case 76:
2613                            encodedcontroller = _lev_ctrl_CC76_EXT;
2614                            break;
2615                        case 77:
2616                            encodedcontroller = _lev_ctrl_CC77_EXT;
2617                            break;
2618                        case 78:
2619                            encodedcontroller = _lev_ctrl_CC78_EXT;
2620                            break;
2621                        case 79:
2622                            encodedcontroller = _lev_ctrl_CC79_EXT;
2623                            break;
2624                        case 84:
2625                            encodedcontroller = _lev_ctrl_CC84_EXT;
2626                            break;
2627                        case 85:
2628                            encodedcontroller = _lev_ctrl_CC85_EXT;
2629                            break;
2630                        case 86:
2631                            encodedcontroller = _lev_ctrl_CC86_EXT;
2632                            break;
2633                        case 87:
2634                            encodedcontroller = _lev_ctrl_CC87_EXT;
2635                            break;
2636                        case 89:
2637                            encodedcontroller = _lev_ctrl_CC89_EXT;
2638                            break;
2639                        case 90:
2640                            encodedcontroller = _lev_ctrl_CC90_EXT;
2641                            break;
2642                        case 96:
2643                            encodedcontroller = _lev_ctrl_CC96_EXT;
2644                            break;
2645                        case 97:
2646                            encodedcontroller = _lev_ctrl_CC97_EXT;
2647                            break;
2648                        case 102:
2649                            encodedcontroller = _lev_ctrl_CC102_EXT;
2650                            break;
2651                        case 103:
2652                            encodedcontroller = _lev_ctrl_CC103_EXT;
2653                            break;
2654                        case 104:
2655                            encodedcontroller = _lev_ctrl_CC104_EXT;
2656                            break;
2657                        case 105:
2658                            encodedcontroller = _lev_ctrl_CC105_EXT;
2659                            break;
2660                        case 106:
2661                            encodedcontroller = _lev_ctrl_CC106_EXT;
2662                            break;
2663                        case 107:
2664                            encodedcontroller = _lev_ctrl_CC107_EXT;
2665                            break;
2666                        case 108:
2667                            encodedcontroller = _lev_ctrl_CC108_EXT;
2668                            break;
2669                        case 109:
2670                            encodedcontroller = _lev_ctrl_CC109_EXT;
2671                            break;
2672                        case 110:
2673                            encodedcontroller = _lev_ctrl_CC110_EXT;
2674                            break;
2675                        case 111:
2676                            encodedcontroller = _lev_ctrl_CC111_EXT;
2677                            break;
2678                        case 112:
2679                            encodedcontroller = _lev_ctrl_CC112_EXT;
2680                            break;
2681                        case 113:
2682                            encodedcontroller = _lev_ctrl_CC113_EXT;
2683                            break;
2684                        case 114:
2685                            encodedcontroller = _lev_ctrl_CC114_EXT;
2686                            break;
2687                        case 115:
2688                            encodedcontroller = _lev_ctrl_CC115_EXT;
2689                            break;
2690                        case 116:
2691                            encodedcontroller = _lev_ctrl_CC116_EXT;
2692                            break;
2693                        case 117:
2694                            encodedcontroller = _lev_ctrl_CC117_EXT;
2695                            break;
2696                        case 118:
2697                            encodedcontroller = _lev_ctrl_CC118_EXT;
2698                            break;
2699                        case 119:
2700                            encodedcontroller = _lev_ctrl_CC119_EXT;
2701                            break;
2702    
2703                      default:                      default:
2704                          throw gig::Exception("leverage controller number is not supported by the gig format");                          throw gig::Exception("leverage controller number is not supported by the gig format");
2705                  }                  }
# Line 2491  namespace { Line 3001  namespace {
3001       * Usually there is absolutely no need to call this method explicitly.       * Usually there is absolutely no need to call this method explicitly.
3002       * It will be called automatically when File::Save() was called.       * It will be called automatically when File::Save() was called.
3003       *       *
3004         * @param pProgress - callback function for progress notification
3005       * @throws gig::Exception if samples cannot be dereferenced       * @throws gig::Exception if samples cannot be dereferenced
3006       */       */
3007      void Region::UpdateChunks() {      void Region::UpdateChunks(progress_t* pProgress) {
3008          // 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
3009          // 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
3010          // 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
# Line 2501  namespace { Line 3012  namespace {
3012          pSample = pDimensionRegions[0]->pSample;          pSample = pDimensionRegions[0]->pSample;
3013    
3014          // first update base class's chunks          // first update base class's chunks
3015          DLS::Region::UpdateChunks();          DLS::Region::UpdateChunks(pProgress);
3016    
3017          // update dimension region's chunks          // update dimension region's chunks
3018          for (int i = 0; i < DimensionRegions; i++) {          for (int i = 0; i < DimensionRegions; i++) {
3019              pDimensionRegions[i]->UpdateChunks();              pDimensionRegions[i]->UpdateChunks(pProgress);
3020          }          }
3021    
3022          File* pFile = (File*) GetParent()->GetParent();          File* pFile = (File*) GetParent()->GetParent();
# Line 2521  namespace { Line 3032  namespace {
3032              memset(_3lnk->LoadChunkData(), 0, _3lnkChunkSize);              memset(_3lnk->LoadChunkData(), 0, _3lnkChunkSize);
3033    
3034              // move 3prg to last position              // move 3prg to last position
3035              pCkRegion->MoveSubChunk(pCkRegion->GetSubList(LIST_TYPE_3PRG), 0);              pCkRegion->MoveSubChunk(pCkRegion->GetSubList(LIST_TYPE_3PRG), (RIFF::Chunk*)NULL);
3036          }          }
3037    
3038          // update dimension definitions in '3lnk' chunk          // update dimension definitions in '3lnk' chunk
# Line 2667  namespace { Line 3178  namespace {
3178       *                        dimension bits limit is violated       *                        dimension bits limit is violated
3179       */       */
3180      void Region::AddDimension(dimension_def_t* pDimDef) {      void Region::AddDimension(dimension_def_t* pDimDef) {
3181            // some initial sanity checks of the given dimension definition
3182            if (pDimDef->zones < 2)
3183                throw gig::Exception("Could not add new dimension, amount of requested zones must always be at least two");
3184            if (pDimDef->bits < 1)
3185                throw gig::Exception("Could not add new dimension, amount of requested requested zone bits must always be at least one");
3186            if (pDimDef->dimension == dimension_samplechannel) {
3187                if (pDimDef->zones != 2)
3188                    throw gig::Exception("Could not add new 'sample channel' dimensions, the requested amount of zones must always be 2 for this dimension type");
3189                if (pDimDef->bits != 1)
3190                    throw gig::Exception("Could not add new 'sample channel' dimensions, the requested amount of zone bits must always be 1 for this dimension type");
3191            }
3192    
3193          // check if max. amount of dimensions reached          // check if max. amount of dimensions reached
3194          File* file = (File*) GetParent()->GetParent();          File* file = (File*) GetParent()->GetParent();
3195          const int iMaxDimensions = (file->pVersion && file->pVersion->major == 3) ? 8 : 5;          const int iMaxDimensions = (file->pVersion && file->pVersion->major == 3) ? 8 : 5;
# Line 2842  namespace { Line 3365  namespace {
3365          if (pDimDef->dimension == dimension_layer) Layers = 1;          if (pDimDef->dimension == dimension_layer) Layers = 1;
3366      }      }
3367    
3368        /** @brief Delete one split zone of a dimension (decrement zone amount).
3369         *
3370         * Instead of deleting an entire dimensions, this method will only delete
3371         * one particular split zone given by @a zone of the Region's dimension
3372         * given by @a type. So this method will simply decrement the amount of
3373         * zones by one of the dimension in question. To be able to do that, the
3374         * respective dimension must exist on this Region and it must have at least
3375         * 3 zones. All DimensionRegion objects associated with the zone will be
3376         * deleted.
3377         *
3378         * @param type - identifies the dimension where a zone shall be deleted
3379         * @param zone - index of the dimension split zone that shall be deleted
3380         * @throws gig::Exception if requested zone could not be deleted
3381         */
3382        void Region::DeleteDimensionZone(dimension_t type, int zone) {
3383            dimension_def_t* oldDef = GetDimensionDefinition(type);
3384            if (!oldDef)
3385                throw gig::Exception("Could not delete dimension zone, no such dimension of given type");
3386            if (oldDef->zones <= 2)
3387                throw gig::Exception("Could not delete dimension zone, because it would end up with only one zone.");
3388            if (zone < 0 || zone >= oldDef->zones)
3389                throw gig::Exception("Could not delete dimension zone, requested zone index out of bounds.");
3390    
3391            const int newZoneSize = oldDef->zones - 1;
3392    
3393            // create a temporary Region which just acts as a temporary copy
3394            // container and will be deleted at the end of this function and will
3395            // also not be visible through the API during this process
3396            gig::Region* tempRgn = NULL;
3397            {
3398                // adding these temporary chunks is probably not even necessary
3399                Instrument* instr = static_cast<Instrument*>(GetParent());
3400                RIFF::List* pCkInstrument = instr->pCkInstrument;
3401                RIFF::List* lrgn = pCkInstrument->GetSubList(LIST_TYPE_LRGN);
3402                if (!lrgn)  lrgn = pCkInstrument->AddSubList(LIST_TYPE_LRGN);
3403                RIFF::List* rgn = lrgn->AddSubList(LIST_TYPE_RGN);
3404                tempRgn = new Region(instr, rgn);
3405            }
3406    
3407            // copy this region's dimensions (with already the dimension split size
3408            // requested by the arguments of this method call) to the temporary
3409            // region, and don't use Region::CopyAssign() here for this task, since
3410            // it would also alter fast lookup helper variables here and there
3411            dimension_def_t newDef;
3412            for (int i = 0; i < Dimensions; ++i) {
3413                dimension_def_t def = pDimensionDefinitions[i]; // copy, don't reference
3414                // is this the dimension requested by the method arguments? ...
3415                if (def.dimension == type) { // ... if yes, decrement zone amount by one
3416                    def.zones = newZoneSize;
3417                    if ((1 << (def.bits - 1)) == def.zones) def.bits--;
3418                    newDef = def;
3419                }
3420                tempRgn->AddDimension(&def);
3421            }
3422    
3423            // find the dimension index in the tempRegion which is the dimension
3424            // type passed to this method (paranoidly expecting different order)
3425            int tempReducedDimensionIndex = -1;
3426            for (int d = 0; d < tempRgn->Dimensions; ++d) {
3427                if (tempRgn->pDimensionDefinitions[d].dimension == type) {
3428                    tempReducedDimensionIndex = d;
3429                    break;
3430                }
3431            }
3432    
3433            // copy dimension regions from this region to the temporary region
3434            for (int iDst = 0; iDst < 256; ++iDst) {
3435                DimensionRegion* dstDimRgn = tempRgn->pDimensionRegions[iDst];
3436                if (!dstDimRgn) continue;
3437                std::map<dimension_t,int> dimCase;
3438                bool isValidZone = true;
3439                for (int d = 0, baseBits = 0; d < tempRgn->Dimensions; ++d) {
3440                    const int dstBits = tempRgn->pDimensionDefinitions[d].bits;
3441                    dimCase[tempRgn->pDimensionDefinitions[d].dimension] =
3442                        (iDst >> baseBits) & ((1 << dstBits) - 1);
3443                    baseBits += dstBits;
3444                    // there are also DimensionRegion objects of unused zones, skip them
3445                    if (dimCase[tempRgn->pDimensionDefinitions[d].dimension] >= tempRgn->pDimensionDefinitions[d].zones) {
3446                        isValidZone = false;
3447                        break;
3448                    }
3449                }
3450                if (!isValidZone) continue;
3451                // a bit paranoid: cope with the chance that the dimensions would
3452                // have different order in source and destination regions
3453                const bool isLastZone = (dimCase[type] == newZoneSize - 1);
3454                if (dimCase[type] >= zone) dimCase[type]++;
3455                DimensionRegion* srcDimRgn = GetDimensionRegionByBit(dimCase);
3456                dstDimRgn->CopyAssign(srcDimRgn);
3457                // if this is the upper most zone of the dimension passed to this
3458                // method, then correct (raise) its upper limit to 127
3459                if (newDef.split_type == split_type_normal && isLastZone)
3460                    dstDimRgn->DimensionUpperLimits[tempReducedDimensionIndex] = 127;
3461            }
3462    
3463            // now tempRegion's dimensions and DimensionRegions basically reflect
3464            // what we wanted to get for this actual Region here, so we now just
3465            // delete and recreate the dimension in question with the new amount
3466            // zones and then copy back from tempRegion      
3467            DeleteDimension(oldDef);
3468            AddDimension(&newDef);
3469            for (int iSrc = 0; iSrc < 256; ++iSrc) {
3470                DimensionRegion* srcDimRgn = tempRgn->pDimensionRegions[iSrc];
3471                if (!srcDimRgn) continue;
3472                std::map<dimension_t,int> dimCase;
3473                for (int d = 0, baseBits = 0; d < tempRgn->Dimensions; ++d) {
3474                    const int srcBits = tempRgn->pDimensionDefinitions[d].bits;
3475                    dimCase[tempRgn->pDimensionDefinitions[d].dimension] =
3476                        (iSrc >> baseBits) & ((1 << srcBits) - 1);
3477                    baseBits += srcBits;
3478                }
3479                // a bit paranoid: cope with the chance that the dimensions would
3480                // have different order in source and destination regions
3481                DimensionRegion* dstDimRgn = GetDimensionRegionByBit(dimCase);
3482                if (!dstDimRgn) continue;
3483                dstDimRgn->CopyAssign(srcDimRgn);
3484            }
3485    
3486            // delete temporary region
3487            delete tempRgn;
3488    
3489            UpdateVelocityTable();
3490        }
3491    
3492        /** @brief Divide split zone of a dimension in two (increment zone amount).
3493         *
3494         * This will increment the amount of zones for the dimension (given by
3495         * @a type) by one. It will do so by dividing the zone (given by @a zone)
3496         * in the middle of its zone range in two. So the two zones resulting from
3497         * the zone being splitted, will be an equivalent copy regarding all their
3498         * articulation informations and sample reference. The two zones will only
3499         * differ in their zone's upper limit
3500         * (DimensionRegion::DimensionUpperLimits).
3501         *
3502         * @param type - identifies the dimension where a zone shall be splitted
3503         * @param zone - index of the dimension split zone that shall be splitted
3504         * @throws gig::Exception if requested zone could not be splitted
3505         */
3506        void Region::SplitDimensionZone(dimension_t type, int zone) {
3507            dimension_def_t* oldDef = GetDimensionDefinition(type);
3508            if (!oldDef)
3509                throw gig::Exception("Could not split dimension zone, no such dimension of given type");
3510            if (zone < 0 || zone >= oldDef->zones)
3511                throw gig::Exception("Could not split dimension zone, requested zone index out of bounds.");
3512    
3513            const int newZoneSize = oldDef->zones + 1;
3514    
3515            // create a temporary Region which just acts as a temporary copy
3516            // container and will be deleted at the end of this function and will
3517            // also not be visible through the API during this process
3518            gig::Region* tempRgn = NULL;
3519            {
3520                // adding these temporary chunks is probably not even necessary
3521                Instrument* instr = static_cast<Instrument*>(GetParent());
3522                RIFF::List* pCkInstrument = instr->pCkInstrument;
3523                RIFF::List* lrgn = pCkInstrument->GetSubList(LIST_TYPE_LRGN);
3524                if (!lrgn)  lrgn = pCkInstrument->AddSubList(LIST_TYPE_LRGN);
3525                RIFF::List* rgn = lrgn->AddSubList(LIST_TYPE_RGN);
3526                tempRgn = new Region(instr, rgn);
3527            }
3528    
3529            // copy this region's dimensions (with already the dimension split size
3530            // requested by the arguments of this method call) to the temporary
3531            // region, and don't use Region::CopyAssign() here for this task, since
3532            // it would also alter fast lookup helper variables here and there
3533            dimension_def_t newDef;
3534            for (int i = 0; i < Dimensions; ++i) {
3535                dimension_def_t def = pDimensionDefinitions[i]; // copy, don't reference
3536                // is this the dimension requested by the method arguments? ...
3537                if (def.dimension == type) { // ... if yes, increment zone amount by one
3538                    def.zones = newZoneSize;
3539                    if ((1 << oldDef->bits) < newZoneSize) def.bits++;
3540                    newDef = def;
3541                }
3542                tempRgn->AddDimension(&def);
3543            }
3544    
3545            // find the dimension index in the tempRegion which is the dimension
3546            // type passed to this method (paranoidly expecting different order)
3547            int tempIncreasedDimensionIndex = -1;
3548            for (int d = 0; d < tempRgn->Dimensions; ++d) {
3549                if (tempRgn->pDimensionDefinitions[d].dimension == type) {
3550                    tempIncreasedDimensionIndex = d;
3551                    break;
3552                }
3553            }
3554    
3555            // copy dimension regions from this region to the temporary region
3556            for (int iSrc = 0; iSrc < 256; ++iSrc) {
3557                DimensionRegion* srcDimRgn = pDimensionRegions[iSrc];
3558                if (!srcDimRgn) continue;
3559                std::map<dimension_t,int> dimCase;
3560                bool isValidZone = true;
3561                for (int d = 0, baseBits = 0; d < Dimensions; ++d) {
3562                    const int srcBits = pDimensionDefinitions[d].bits;
3563                    dimCase[pDimensionDefinitions[d].dimension] =
3564                        (iSrc >> baseBits) & ((1 << srcBits) - 1);
3565                    // there are also DimensionRegion objects for unused zones, skip them
3566                    if (dimCase[pDimensionDefinitions[d].dimension] >= pDimensionDefinitions[d].zones) {
3567                        isValidZone = false;
3568                        break;
3569                    }
3570                    baseBits += srcBits;
3571                }
3572                if (!isValidZone) continue;
3573                // a bit paranoid: cope with the chance that the dimensions would
3574                // have different order in source and destination regions            
3575                if (dimCase[type] > zone) dimCase[type]++;
3576                DimensionRegion* dstDimRgn = tempRgn->GetDimensionRegionByBit(dimCase);
3577                dstDimRgn->CopyAssign(srcDimRgn);
3578                // if this is the requested zone to be splitted, then also copy
3579                // the source DimensionRegion to the newly created target zone
3580                // and set the old zones upper limit lower
3581                if (dimCase[type] == zone) {
3582                    // lower old zones upper limit
3583                    if (newDef.split_type == split_type_normal) {
3584                        const int high =
3585                            dstDimRgn->DimensionUpperLimits[tempIncreasedDimensionIndex];
3586                        int low = 0;
3587                        if (zone > 0) {
3588                            std::map<dimension_t,int> lowerCase = dimCase;
3589                            lowerCase[type]--;
3590                            DimensionRegion* dstDimRgnLow = tempRgn->GetDimensionRegionByBit(lowerCase);
3591                            low = dstDimRgnLow->DimensionUpperLimits[tempIncreasedDimensionIndex];
3592                        }
3593                        dstDimRgn->DimensionUpperLimits[tempIncreasedDimensionIndex] = low + (high - low) / 2;
3594                    }
3595                    // fill the newly created zone of the divided zone as well
3596                    dimCase[type]++;
3597                    dstDimRgn = tempRgn->GetDimensionRegionByBit(dimCase);
3598                    dstDimRgn->CopyAssign(srcDimRgn);
3599                }
3600            }
3601    
3602            // now tempRegion's dimensions and DimensionRegions basically reflect
3603            // what we wanted to get for this actual Region here, so we now just
3604            // delete and recreate the dimension in question with the new amount
3605            // zones and then copy back from tempRegion      
3606            DeleteDimension(oldDef);
3607            AddDimension(&newDef);
3608            for (int iSrc = 0; iSrc < 256; ++iSrc) {
3609                DimensionRegion* srcDimRgn = tempRgn->pDimensionRegions[iSrc];
3610                if (!srcDimRgn) continue;
3611                std::map<dimension_t,int> dimCase;
3612                for (int d = 0, baseBits = 0; d < tempRgn->Dimensions; ++d) {
3613                    const int srcBits = tempRgn->pDimensionDefinitions[d].bits;
3614                    dimCase[tempRgn->pDimensionDefinitions[d].dimension] =
3615                        (iSrc >> baseBits) & ((1 << srcBits) - 1);
3616                    baseBits += srcBits;
3617                }
3618                // a bit paranoid: cope with the chance that the dimensions would
3619                // have different order in source and destination regions
3620                DimensionRegion* dstDimRgn = GetDimensionRegionByBit(dimCase);
3621                if (!dstDimRgn) continue;
3622                dstDimRgn->CopyAssign(srcDimRgn);
3623            }
3624    
3625            // delete temporary region
3626            delete tempRgn;
3627    
3628            UpdateVelocityTable();
3629        }
3630    
3631        /** @brief Change type of an existing dimension.
3632         *
3633         * Alters the dimension type of a dimension already existing on this
3634         * region. If there is currently no dimension on this Region with type
3635         * @a oldType, then this call with throw an Exception. Likewise there are
3636         * cases where the requested dimension type cannot be performed. For example
3637         * if the new dimension type shall be gig::dimension_samplechannel, and the
3638         * current dimension has more than 2 zones. In such cases an Exception is
3639         * thrown as well.
3640         *
3641         * @param oldType - identifies the existing dimension to be changed
3642         * @param newType - to which dimension type it should be changed to
3643         * @throws gig::Exception if requested change cannot be performed
3644         */
3645        void Region::SetDimensionType(dimension_t oldType, dimension_t newType) {
3646            if (oldType == newType) return;
3647            dimension_def_t* def = GetDimensionDefinition(oldType);
3648            if (!def)
3649                throw gig::Exception("No dimension with provided old dimension type exists on this region");
3650            if (newType == dimension_samplechannel && def->zones != 2)
3651                throw gig::Exception("Cannot change to dimension type 'sample channel', because existing dimension does not have 2 zones");
3652            if (GetDimensionDefinition(newType))
3653                throw gig::Exception("There is already a dimension with requested new dimension type on this region");
3654            def->dimension  = newType;
3655            def->split_type = __resolveSplitType(newType);
3656        }
3657    
3658        DimensionRegion* Region::GetDimensionRegionByBit(const std::map<dimension_t,int>& DimCase) {
3659            uint8_t bits[8] = {};
3660            for (std::map<dimension_t,int>::const_iterator it = DimCase.begin();
3661                 it != DimCase.end(); ++it)
3662            {
3663                for (int d = 0; d < Dimensions; ++d) {
3664                    if (pDimensionDefinitions[d].dimension == it->first) {
3665                        bits[d] = it->second;
3666                        goto nextDimCaseSlice;
3667                    }
3668                }
3669                assert(false); // do crash ... too harsh maybe ? ignore it instead ?
3670                nextDimCaseSlice:
3671                ; // noop
3672            }
3673            return GetDimensionRegionByBit(bits);
3674        }
3675    
3676        /**
3677         * Searches in the current Region for a dimension of the given dimension
3678         * type and returns the precise configuration of that dimension in this
3679         * Region.
3680         *
3681         * @param type - dimension type of the sought dimension
3682         * @returns dimension definition or NULL if there is no dimension with
3683         *          sought type in this Region.
3684         */
3685        dimension_def_t* Region::GetDimensionDefinition(dimension_t type) {
3686            for (int i = 0; i < Dimensions; ++i)
3687                if (pDimensionDefinitions[i].dimension == type)
3688                    return &pDimensionDefinitions[i];
3689            return NULL;
3690        }
3691    
3692      Region::~Region() {      Region::~Region() {
3693          for (int i = 0; i < 256; i++) {          for (int i = 0; i < 256; i++) {
3694              if (pDimensionRegions[i]) delete pDimensionRegions[i];              if (pDimensionRegions[i]) delete pDimensionRegions[i];
# Line 2899  namespace { Line 3746  namespace {
3746              }              }
3747              bitpos += pDimensionDefinitions[i].bits;              bitpos += pDimensionDefinitions[i].bits;
3748          }          }
3749          DimensionRegion* dimreg = pDimensionRegions[dimregidx];          DimensionRegion* dimreg = pDimensionRegions[dimregidx & 255];
3750            if (!dimreg) return NULL;
3751          if (veldim != -1) {          if (veldim != -1) {
3752              // (dimreg is now the dimension region for the lowest velocity)              // (dimreg is now the dimension region for the lowest velocity)
3753              if (dimreg->VelocityTable) // custom defined zone ranges              if (dimreg->VelocityTable) // custom defined zone ranges
3754                  bits = dimreg->VelocityTable[DimValues[veldim]];                  bits = dimreg->VelocityTable[DimValues[veldim] & 127];
3755              else // normal split type              else // normal split type
3756                  bits = uint8_t(DimValues[veldim] / pDimensionDefinitions[veldim].zone_size);                  bits = uint8_t((DimValues[veldim] & 127) / pDimensionDefinitions[veldim].zone_size);
3757    
3758              dimregidx |= bits << velbitpos;              const uint8_t limiter_mask = (1 << pDimensionDefinitions[veldim].bits) - 1;
3759              dimreg = pDimensionRegions[dimregidx];              dimregidx |= (bits & limiter_mask) << velbitpos;
3760                dimreg = pDimensionRegions[dimregidx & 255];
3761          }          }
3762          return dimreg;          return dimreg;
3763      }      }
3764    
3765        int Region::GetDimensionRegionIndexByValue(const uint DimValues[8]) {
3766            uint8_t bits;
3767            int veldim = -1;
3768            int velbitpos;
3769            int bitpos = 0;
3770            int dimregidx = 0;
3771            for (uint i = 0; i < Dimensions; i++) {
3772                if (pDimensionDefinitions[i].dimension == dimension_velocity) {
3773                    // the velocity dimension must be handled after the other dimensions
3774                    veldim = i;
3775                    velbitpos = bitpos;
3776                } else {
3777                    switch (pDimensionDefinitions[i].split_type) {
3778                        case split_type_normal:
3779                            if (pDimensionRegions[0]->DimensionUpperLimits[i]) {
3780                                // gig3: all normal dimensions (not just the velocity dimension) have custom zone ranges
3781                                for (bits = 0 ; bits < pDimensionDefinitions[i].zones ; bits++) {
3782                                    if (DimValues[i] <= pDimensionRegions[bits << bitpos]->DimensionUpperLimits[i]) break;
3783                                }
3784                            } else {
3785                                // gig2: evenly sized zones
3786                                bits = uint8_t(DimValues[i] / pDimensionDefinitions[i].zone_size);
3787                            }
3788                            break;
3789                        case split_type_bit: // the value is already the sought dimension bit number
3790                            const uint8_t limiter_mask = (0xff << pDimensionDefinitions[i].bits) ^ 0xff;
3791                            bits = DimValues[i] & limiter_mask; // just make sure the value doesn't use more bits than allowed
3792                            break;
3793                    }
3794                    dimregidx |= bits << bitpos;
3795                }
3796                bitpos += pDimensionDefinitions[i].bits;
3797            }
3798            dimregidx &= 255;
3799            DimensionRegion* dimreg = pDimensionRegions[dimregidx];
3800            if (!dimreg) return -1;
3801            if (veldim != -1) {
3802                // (dimreg is now the dimension region for the lowest velocity)
3803                if (dimreg->VelocityTable) // custom defined zone ranges
3804                    bits = dimreg->VelocityTable[DimValues[veldim] & 127];
3805                else // normal split type
3806                    bits = uint8_t((DimValues[veldim] & 127) / pDimensionDefinitions[veldim].zone_size);
3807    
3808                const uint8_t limiter_mask = (1 << pDimensionDefinitions[veldim].bits) - 1;
3809                dimregidx |= (bits & limiter_mask) << velbitpos;
3810                dimregidx &= 255;
3811            }
3812            return dimregidx;
3813        }
3814    
3815      /**      /**
3816       * Returns the appropriate DimensionRegion for the given dimension bit       * Returns the appropriate DimensionRegion for the given dimension bit
3817       * numbers (zone index). You usually use <i>GetDimensionRegionByValue</i>       * numbers (zone index). You usually use <i>GetDimensionRegionByValue</i>
# Line 2951  namespace { Line 3850  namespace {
3850          if ((int32_t)WavePoolTableIndex == -1) return NULL;          if ((int32_t)WavePoolTableIndex == -1) return NULL;
3851          File* file = (File*) GetParent()->GetParent();          File* file = (File*) GetParent()->GetParent();
3852          if (!file->pWavePoolTable) return NULL;          if (!file->pWavePoolTable) return NULL;
3853          unsigned long soughtoffset = file->pWavePoolTable[WavePoolTableIndex];          // for new files or files >= 2 GB use 64 bit wave pool offsets
3854          unsigned long soughtfileno = file->pWavePoolTableHi[WavePoolTableIndex];          if (file->pRIFF->IsNew() || (file->pRIFF->GetCurrentFileSize() >> 31)) {
3855          Sample* sample = file->GetFirstSample(pProgress);              // use 64 bit wave pool offsets (treating this as large file)
3856          while (sample) {              uint64_t soughtoffset =
3857              if (sample->ulWavePoolOffset == soughtoffset &&                  uint64_t(file->pWavePoolTable[WavePoolTableIndex]) |
3858                  sample->FileNo == soughtfileno) return static_cast<gig::Sample*>(sample);                  uint64_t(file->pWavePoolTableHi[WavePoolTableIndex]) << 32;
3859              sample = file->GetNextSample();              Sample* sample = file->GetFirstSample(pProgress);
3860                while (sample) {
3861                    if (sample->ullWavePoolOffset == soughtoffset)
3862                        return static_cast<gig::Sample*>(sample);
3863                    sample = file->GetNextSample();
3864                }
3865            } else {
3866                // use extension files and 32 bit wave pool offsets
3867                file_offset_t soughtoffset = file->pWavePoolTable[WavePoolTableIndex];
3868                file_offset_t soughtfileno = file->pWavePoolTableHi[WavePoolTableIndex];
3869                Sample* sample = file->GetFirstSample(pProgress);
3870                while (sample) {
3871                    if (sample->ullWavePoolOffset == soughtoffset &&
3872                        sample->FileNo == soughtfileno) return static_cast<gig::Sample*>(sample);
3873                    sample = file->GetNextSample();
3874                }
3875          }          }
3876          return NULL;          return NULL;
3877      }      }
# Line 2972  namespace { Line 3886  namespace {
3886       * @param orig - original Region object to be copied from       * @param orig - original Region object to be copied from
3887       */       */
3888      void Region::CopyAssign(const Region* orig) {      void Region::CopyAssign(const Region* orig) {
3889            CopyAssign(orig, NULL);
3890        }
3891        
3892        /**
3893         * Make a (semi) deep copy of the Region object given by @a orig and
3894         * assign it to this object
3895         *
3896         * @param mSamples - crosslink map between the foreign file's samples and
3897         *                   this file's samples
3898         */
3899        void Region::CopyAssign(const Region* orig, const std::map<Sample*,Sample*>* mSamples) {
3900          // handle base classes          // handle base classes
3901          DLS::Region::CopyAssign(orig);          DLS::Region::CopyAssign(orig);
3902                    
3903            if (mSamples && mSamples->count((gig::Sample*)orig->pSample)) {
3904                pSample = mSamples->find((gig::Sample*)orig->pSample)->second;
3905            }
3906            
3907          // handle own member variables          // handle own member variables
3908          for (int i = Dimensions - 1; i >= 0; --i) {          for (int i = Dimensions - 1; i >= 0; --i) {
3909              DeleteDimension(&pDimensionDefinitions[i]);              DeleteDimension(&pDimensionDefinitions[i]);
# Line 2989  namespace { Line 3918  namespace {
3918          for (int i = 0; i < 256; i++) {          for (int i = 0; i < 256; i++) {
3919              if (pDimensionRegions[i] && orig->pDimensionRegions[i]) {              if (pDimensionRegions[i] && orig->pDimensionRegions[i]) {
3920                  pDimensionRegions[i]->CopyAssign(                  pDimensionRegions[i]->CopyAssign(
3921                      orig->pDimensionRegions[i]                      orig->pDimensionRegions[i],
3922                        mSamples
3923                  );                  );
3924              }              }
3925          }          }
# Line 3000  namespace { Line 3930  namespace {
3930  // *************** MidiRule ***************  // *************** MidiRule ***************
3931  // *  // *
3932    
3933  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger(RIFF::Chunk* _3ewg) {      MidiRuleCtrlTrigger::MidiRuleCtrlTrigger(RIFF::Chunk* _3ewg) {
3934      _3ewg->SetPos(36);          _3ewg->SetPos(36);
3935      Triggers = _3ewg->ReadUint8();          Triggers = _3ewg->ReadUint8();
3936      _3ewg->SetPos(40);          _3ewg->SetPos(40);
3937      ControllerNumber = _3ewg->ReadUint8();          ControllerNumber = _3ewg->ReadUint8();
3938      _3ewg->SetPos(46);          _3ewg->SetPos(46);
3939      for (int i = 0 ; i < Triggers ; i++) {          for (int i = 0 ; i < Triggers ; i++) {
3940          pTriggers[i].TriggerPoint = _3ewg->ReadUint8();              pTriggers[i].TriggerPoint = _3ewg->ReadUint8();
3941          pTriggers[i].Descending = _3ewg->ReadUint8();              pTriggers[i].Descending = _3ewg->ReadUint8();
3942          pTriggers[i].VelSensitivity = _3ewg->ReadUint8();              pTriggers[i].VelSensitivity = _3ewg->ReadUint8();
3943          pTriggers[i].Key = _3ewg->ReadUint8();              pTriggers[i].Key = _3ewg->ReadUint8();
3944          pTriggers[i].NoteOff = _3ewg->ReadUint8();              pTriggers[i].NoteOff = _3ewg->ReadUint8();
3945          pTriggers[i].Velocity = _3ewg->ReadUint8();              pTriggers[i].Velocity = _3ewg->ReadUint8();
3946          pTriggers[i].OverridePedal = _3ewg->ReadUint8();              pTriggers[i].OverridePedal = _3ewg->ReadUint8();
3947          _3ewg->ReadUint8();              _3ewg->ReadUint8();
3948            }
3949        }
3950    
3951        MidiRuleCtrlTrigger::MidiRuleCtrlTrigger() :
3952            ControllerNumber(0),
3953            Triggers(0) {
3954        }
3955    
3956        void MidiRuleCtrlTrigger::UpdateChunks(uint8_t* pData) const {
3957            pData[32] = 4;
3958            pData[33] = 16;
3959            pData[36] = Triggers;
3960            pData[40] = ControllerNumber;
3961            for (int i = 0 ; i < Triggers ; i++) {
3962                pData[46 + i * 8] = pTriggers[i].TriggerPoint;
3963                pData[47 + i * 8] = pTriggers[i].Descending;
3964                pData[48 + i * 8] = pTriggers[i].VelSensitivity;
3965                pData[49 + i * 8] = pTriggers[i].Key;
3966                pData[50 + i * 8] = pTriggers[i].NoteOff;
3967                pData[51 + i * 8] = pTriggers[i].Velocity;
3968                pData[52 + i * 8] = pTriggers[i].OverridePedal;
3969            }
3970        }
3971    
3972        MidiRuleLegato::MidiRuleLegato(RIFF::Chunk* _3ewg) {
3973            _3ewg->SetPos(36);
3974            LegatoSamples = _3ewg->ReadUint8(); // always 12
3975            _3ewg->SetPos(40);
3976            BypassUseController = _3ewg->ReadUint8();
3977            BypassKey = _3ewg->ReadUint8();
3978            BypassController = _3ewg->ReadUint8();
3979            ThresholdTime = _3ewg->ReadUint16();
3980            _3ewg->ReadInt16();
3981            ReleaseTime = _3ewg->ReadUint16();
3982            _3ewg->ReadInt16();
3983            KeyRange.low = _3ewg->ReadUint8();
3984            KeyRange.high = _3ewg->ReadUint8();
3985            _3ewg->SetPos(64);
3986            ReleaseTriggerKey = _3ewg->ReadUint8();
3987            AltSustain1Key = _3ewg->ReadUint8();
3988            AltSustain2Key = _3ewg->ReadUint8();
3989        }
3990    
3991        MidiRuleLegato::MidiRuleLegato() :
3992            LegatoSamples(12),
3993            BypassUseController(false),
3994            BypassKey(0),
3995            BypassController(1),
3996            ThresholdTime(20),
3997            ReleaseTime(20),
3998            ReleaseTriggerKey(0),
3999            AltSustain1Key(0),
4000            AltSustain2Key(0)
4001        {
4002            KeyRange.low = KeyRange.high = 0;
4003        }
4004    
4005        void MidiRuleLegato::UpdateChunks(uint8_t* pData) const {
4006            pData[32] = 0;
4007            pData[33] = 16;
4008            pData[36] = LegatoSamples;
4009            pData[40] = BypassUseController;
4010            pData[41] = BypassKey;
4011            pData[42] = BypassController;
4012            store16(&pData[43], ThresholdTime);
4013            store16(&pData[47], ReleaseTime);
4014            pData[51] = KeyRange.low;
4015            pData[52] = KeyRange.high;
4016            pData[64] = ReleaseTriggerKey;
4017            pData[65] = AltSustain1Key;
4018            pData[66] = AltSustain2Key;
4019        }
4020    
4021        MidiRuleAlternator::MidiRuleAlternator(RIFF::Chunk* _3ewg) {
4022            _3ewg->SetPos(36);
4023            Articulations = _3ewg->ReadUint8();
4024            int flags = _3ewg->ReadUint8();
4025            Polyphonic = flags & 8;
4026            Chained = flags & 4;
4027            Selector = (flags & 2) ? selector_controller :
4028                (flags & 1) ? selector_key_switch : selector_none;
4029            Patterns = _3ewg->ReadUint8();
4030            _3ewg->ReadUint8(); // chosen row
4031            _3ewg->ReadUint8(); // unknown
4032            _3ewg->ReadUint8(); // unknown
4033            _3ewg->ReadUint8(); // unknown
4034            KeySwitchRange.low = _3ewg->ReadUint8();
4035            KeySwitchRange.high = _3ewg->ReadUint8();
4036            Controller = _3ewg->ReadUint8();
4037            PlayRange.low = _3ewg->ReadUint8();
4038            PlayRange.high = _3ewg->ReadUint8();
4039    
4040            int n = std::min(int(Articulations), 32);
4041            for (int i = 0 ; i < n ; i++) {
4042                _3ewg->ReadString(pArticulations[i], 32);
4043            }
4044            _3ewg->SetPos(1072);
4045            n = std::min(int(Patterns), 32);
4046            for (int i = 0 ; i < n ; i++) {
4047                _3ewg->ReadString(pPatterns[i].Name, 16);
4048                pPatterns[i].Size = _3ewg->ReadUint8();
4049                _3ewg->Read(&pPatterns[i][0], 1, 32);
4050            }
4051        }
4052    
4053        MidiRuleAlternator::MidiRuleAlternator() :
4054            Articulations(0),
4055            Patterns(0),
4056            Selector(selector_none),
4057            Controller(0),
4058            Polyphonic(false),
4059            Chained(false)
4060        {
4061            PlayRange.low = PlayRange.high = 0;
4062            KeySwitchRange.low = KeySwitchRange.high = 0;
4063        }
4064    
4065        void MidiRuleAlternator::UpdateChunks(uint8_t* pData) const {
4066            pData[32] = 3;
4067            pData[33] = 16;
4068            pData[36] = Articulations;
4069            pData[37] = (Polyphonic ? 8 : 0) | (Chained ? 4 : 0) |
4070                (Selector == selector_controller ? 2 :
4071                 (Selector == selector_key_switch ? 1 : 0));
4072            pData[38] = Patterns;
4073    
4074            pData[43] = KeySwitchRange.low;
4075            pData[44] = KeySwitchRange.high;
4076            pData[45] = Controller;
4077            pData[46] = PlayRange.low;
4078            pData[47] = PlayRange.high;
4079    
4080            char* str = reinterpret_cast<char*>(pData);
4081            int pos = 48;
4082            int n = std::min(int(Articulations), 32);
4083            for (int i = 0 ; i < n ; i++, pos += 32) {
4084                strncpy(&str[pos], pArticulations[i].c_str(), 32);
4085            }
4086    
4087            pos = 1072;
4088            n = std::min(int(Patterns), 32);
4089            for (int i = 0 ; i < n ; i++, pos += 49) {
4090                strncpy(&str[pos], pPatterns[i].Name.c_str(), 16);
4091                pData[pos + 16] = pPatterns[i].Size;
4092                memcpy(&pData[pos + 16], &(pPatterns[i][0]), 32);
4093            }
4094        }
4095    
4096    // *************** Script ***************
4097    // *
4098    
4099        Script::Script(ScriptGroup* group, RIFF::Chunk* ckScri) {
4100            pGroup = group;
4101            pChunk = ckScri;
4102            if (ckScri) { // object is loaded from file ...
4103                // read header
4104                uint32_t headerSize = ckScri->ReadUint32();
4105                Compression = (Compression_t) ckScri->ReadUint32();
4106                Encoding    = (Encoding_t) ckScri->ReadUint32();
4107                Language    = (Language_t) ckScri->ReadUint32();
4108                Bypass      = (Language_t) ckScri->ReadUint32() & 1;
4109                crc         = ckScri->ReadUint32();
4110                uint32_t nameSize = ckScri->ReadUint32();
4111                Name.resize(nameSize, ' ');
4112                for (int i = 0; i < nameSize; ++i)
4113                    Name[i] = ckScri->ReadUint8();
4114                // to handle potential future extensions of the header
4115                ckScri->SetPos(sizeof(int32_t) + headerSize);
4116                // read actual script data
4117                uint32_t scriptSize = ckScri->GetSize() - ckScri->GetPos();
4118                data.resize(scriptSize);
4119                for (int i = 0; i < scriptSize; ++i)
4120                    data[i] = ckScri->ReadUint8();
4121            } else { // this is a new script object, so just initialize it as such ...
4122                Compression = COMPRESSION_NONE;
4123                Encoding = ENCODING_ASCII;
4124                Language = LANGUAGE_NKSP;
4125                Bypass   = false;
4126                crc      = 0;
4127                Name     = "Unnamed Script";
4128            }
4129        }
4130    
4131        Script::~Script() {
4132        }
4133    
4134        /**
4135         * Returns the current script (i.e. as source code) in text format.
4136         */
4137        String Script::GetScriptAsText() {
4138            String s;
4139            s.resize(data.size(), ' ');
4140            memcpy(&s[0], &data[0], data.size());
4141            return s;
4142        }
4143    
4144        /**
4145         * Replaces the current script with the new script source code text given
4146         * by @a text.
4147         *
4148         * @param text - new script source code
4149         */
4150        void Script::SetScriptAsText(const String& text) {
4151            data.resize(text.size());
4152            memcpy(&data[0], &text[0], text.size());
4153        }
4154    
4155        /**
4156         * Apply this script to the respective RIFF chunks. You have to call
4157         * File::Save() to make changes persistent.
4158         *
4159         * Usually there is absolutely no need to call this method explicitly.
4160         * It will be called automatically when File::Save() was called.
4161         *
4162         * @param pProgress - callback function for progress notification
4163         */
4164        void Script::UpdateChunks(progress_t* pProgress) {
4165            // recalculate CRC32 check sum
4166            __resetCRC(crc);
4167            __calculateCRC(&data[0], data.size(), crc);
4168            __encodeCRC(crc);
4169            // make sure chunk exists and has the required size
4170            const int chunkSize = 7*sizeof(int32_t) + Name.size() + data.size();
4171            if (!pChunk) pChunk = pGroup->pList->AddSubChunk(CHUNK_ID_SCRI, chunkSize);
4172            else pChunk->Resize(chunkSize);
4173            // fill the chunk data to be written to disk
4174            uint8_t* pData = (uint8_t*) pChunk->LoadChunkData();
4175            int pos = 0;
4176            store32(&pData[pos], 6*sizeof(int32_t) + Name.size()); // total header size
4177            pos += sizeof(int32_t);
4178            store32(&pData[pos], Compression);
4179            pos += sizeof(int32_t);
4180            store32(&pData[pos], Encoding);
4181            pos += sizeof(int32_t);
4182            store32(&pData[pos], Language);
4183            pos += sizeof(int32_t);
4184            store32(&pData[pos], Bypass ? 1 : 0);
4185            pos += sizeof(int32_t);
4186            store32(&pData[pos], crc);
4187            pos += sizeof(int32_t);
4188            store32(&pData[pos], Name.size());
4189            pos += sizeof(int32_t);
4190            for (int i = 0; i < Name.size(); ++i, ++pos)
4191                pData[pos] = Name[i];
4192            for (int i = 0; i < data.size(); ++i, ++pos)
4193                pData[pos] = data[i];
4194        }
4195    
4196        /**
4197         * Move this script from its current ScriptGroup to another ScriptGroup
4198         * given by @a pGroup.
4199         *
4200         * @param pGroup - script's new group
4201         */
4202        void Script::SetGroup(ScriptGroup* pGroup) {
4203            if (this->pGroup == pGroup) return;
4204            if (pChunk)
4205                pChunk->GetParent()->MoveSubChunk(pChunk, pGroup->pList);
4206            this->pGroup = pGroup;
4207      }      }
 }  
4208    
4209        /**
4210         * Returns the script group this script currently belongs to. Each script
4211         * is a member of exactly one ScriptGroup.
4212         *
4213         * @returns current script group
4214         */
4215        ScriptGroup* Script::GetGroup() const {
4216            return pGroup;
4217        }
4218    
4219        void Script::RemoveAllScriptReferences() {
4220            File* pFile = pGroup->pFile;
4221            for (int i = 0; pFile->GetInstrument(i); ++i) {
4222                Instrument* instr = pFile->GetInstrument(i);
4223                instr->RemoveScript(this);
4224            }
4225        }
4226    
4227    // *************** ScriptGroup ***************
4228    // *
4229    
4230        ScriptGroup::ScriptGroup(File* file, RIFF::List* lstRTIS) {
4231            pFile = file;
4232            pList = lstRTIS;
4233            pScripts = NULL;
4234            if (lstRTIS) {
4235                RIFF::Chunk* ckName = lstRTIS->GetSubChunk(CHUNK_ID_LSNM);
4236                ::LoadString(ckName, Name);
4237            } else {
4238                Name = "Default Group";
4239            }
4240        }
4241    
4242        ScriptGroup::~ScriptGroup() {
4243            if (pScripts) {
4244                std::list<Script*>::iterator iter = pScripts->begin();
4245                std::list<Script*>::iterator end  = pScripts->end();
4246                while (iter != end) {
4247                    delete *iter;
4248                    ++iter;
4249                }
4250                delete pScripts;
4251            }
4252        }
4253    
4254        /**
4255         * Apply this script group to the respective RIFF chunks. You have to call
4256         * File::Save() to make changes persistent.
4257         *
4258         * Usually there is absolutely no need to call this method explicitly.
4259         * It will be called automatically when File::Save() was called.
4260         *
4261         * @param pProgress - callback function for progress notification
4262         */
4263        void ScriptGroup::UpdateChunks(progress_t* pProgress) {
4264            if (pScripts) {
4265                if (!pList)
4266                    pList = pFile->pRIFF->GetSubList(LIST_TYPE_3LS)->AddSubList(LIST_TYPE_RTIS);
4267    
4268                // now store the name of this group as <LSNM> chunk as subchunk of the <RTIS> list chunk
4269                ::SaveString(CHUNK_ID_LSNM, NULL, pList, Name, String("Unnamed Group"), true, 64);
4270    
4271                for (std::list<Script*>::iterator it = pScripts->begin();
4272                     it != pScripts->end(); ++it)
4273                {
4274                    (*it)->UpdateChunks(pProgress);
4275                }
4276            }
4277        }
4278    
4279        /** @brief Get instrument script.
4280         *
4281         * Returns the real-time instrument script with the given index.
4282         *
4283         * @param index - number of the sought script (0..n)
4284         * @returns sought script or NULL if there's no such script
4285         */
4286        Script* ScriptGroup::GetScript(uint index) {
4287            if (!pScripts) LoadScripts();
4288            std::list<Script*>::iterator it = pScripts->begin();
4289            for (uint i = 0; it != pScripts->end(); ++i, ++it)
4290                if (i == index) return *it;
4291            return NULL;
4292        }
4293    
4294        /** @brief Add new instrument script.
4295         *
4296         * Adds a new real-time instrument script to the file. The script is not
4297         * actually used / executed unless it is referenced by an instrument to be
4298         * used. This is similar to samples, which you can add to a file, without
4299         * an instrument necessarily actually using it.
4300         *
4301         * You have to call Save() to make this persistent to the file.
4302         *
4303         * @return new empty script object
4304         */
4305        Script* ScriptGroup::AddScript() {
4306            if (!pScripts) LoadScripts();
4307            Script* pScript = new Script(this, NULL);
4308            pScripts->push_back(pScript);
4309            return pScript;
4310        }
4311    
4312        /** @brief Delete an instrument script.
4313         *
4314         * This will delete the given real-time instrument script. References of
4315         * instruments that are using that script will be removed accordingly.
4316         *
4317         * You have to call Save() to make this persistent to the file.
4318         *
4319         * @param pScript - script to delete
4320         * @throws gig::Exception if given script could not be found
4321         */
4322        void ScriptGroup::DeleteScript(Script* pScript) {
4323            if (!pScripts) LoadScripts();
4324            std::list<Script*>::iterator iter =
4325                find(pScripts->begin(), pScripts->end(), pScript);
4326            if (iter == pScripts->end())
4327                throw gig::Exception("Could not delete script, could not find given script");
4328            pScripts->erase(iter);
4329            pScript->RemoveAllScriptReferences();
4330            if (pScript->pChunk)
4331                pScript->pChunk->GetParent()->DeleteSubChunk(pScript->pChunk);
4332            delete pScript;
4333        }
4334    
4335        void ScriptGroup::LoadScripts() {
4336            if (pScripts) return;
4337            pScripts = new std::list<Script*>;
4338            if (!pList) return;
4339    
4340            for (RIFF::Chunk* ck = pList->GetFirstSubChunk(); ck;
4341                 ck = pList->GetNextSubChunk())
4342            {
4343                if (ck->GetChunkID() == CHUNK_ID_SCRI) {
4344                    pScripts->push_back(new Script(this, ck));
4345                }
4346            }
4347        }
4348    
4349  // *************** Instrument ***************  // *************** Instrument ***************
4350  // *  // *
# Line 3041  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 4368  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
4368          DimensionKeyRange.high = 0;          DimensionKeyRange.high = 0;
4369          pMidiRules = new MidiRule*[3];          pMidiRules = new MidiRule*[3];
4370          pMidiRules[0] = NULL;          pMidiRules[0] = NULL;
4371            pScriptRefs = NULL;
4372    
4373          // Loading          // Loading
4374          RIFF::List* lart = insList->GetSubList(LIST_TYPE_LART);          RIFF::List* lart = insList->GetSubList(LIST_TYPE_LART);
# Line 3063  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 4391  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
4391                      uint8_t id1 = _3ewg->ReadUint8();                      uint8_t id1 = _3ewg->ReadUint8();
4392                      uint8_t id2 = _3ewg->ReadUint8();                      uint8_t id2 = _3ewg->ReadUint8();
4393    
4394                      if (id1 == 4 && id2 == 16) {                      if (id2 == 16) {
4395                          pMidiRules[i++] = new MidiRuleCtrlTrigger(_3ewg);                          if (id1 == 4) {
4396                                pMidiRules[i++] = new MidiRuleCtrlTrigger(_3ewg);
4397                            } else if (id1 == 0) {
4398                                pMidiRules[i++] = new MidiRuleLegato(_3ewg);
4399                            } else if (id1 == 3) {
4400                                pMidiRules[i++] = new MidiRuleAlternator(_3ewg);
4401                            } else {
4402                                pMidiRules[i++] = new MidiRuleUnknown;
4403                            }
4404                        }
4405                        else if (id1 != 0 || id2 != 0) {
4406                            pMidiRules[i++] = new MidiRuleUnknown;
4407                      }                      }
4408                      //TODO: all the other types of rules                      //TODO: all the other types of rules
4409    
# Line 3090  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 4429  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
4429              }              }
4430          }          }
4431    
4432            // own gig format extensions
4433            RIFF::List* lst3LS = insList->GetSubList(LIST_TYPE_3LS);
4434            if (lst3LS) {
4435                RIFF::Chunk* ckSCSL = lst3LS->GetSubChunk(CHUNK_ID_SCSL);
4436                if (ckSCSL) {
4437                    int headerSize = ckSCSL->ReadUint32();
4438                    int slotCount  = ckSCSL->ReadUint32();
4439                    if (slotCount) {
4440                        int slotSize  = ckSCSL->ReadUint32();
4441                        ckSCSL->SetPos(headerSize); // in case of future header extensions
4442                        int unknownSpace = slotSize - 2*sizeof(uint32_t); // in case of future slot extensions
4443                        for (int i = 0; i < slotCount; ++i) {
4444                            _ScriptPooolEntry e;
4445                            e.fileOffset = ckSCSL->ReadUint32();
4446                            e.bypass     = ckSCSL->ReadUint32() & 1;
4447                            if (unknownSpace) ckSCSL->SetPos(unknownSpace, RIFF::stream_curpos); // in case of future extensions
4448                            scriptPoolFileOffsets.push_back(e);
4449                        }
4450                    }
4451                }
4452            }
4453    
4454          __notify_progress(pProgress, 1.0f); // notify done          __notify_progress(pProgress, 1.0f); // notify done
4455      }      }
4456    
# Line 3110  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 4471  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
4471              delete pMidiRules[i];              delete pMidiRules[i];
4472          }          }
4473          delete[] pMidiRules;          delete[] pMidiRules;
4474            if (pScriptRefs) delete pScriptRefs;
4475      }      }
4476    
4477      /**      /**
# Line 3119  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 4481  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
4481       * Usually there is absolutely no need to call this method explicitly.       * Usually there is absolutely no need to call this method explicitly.
4482       * It will be called automatically when File::Save() was called.       * It will be called automatically when File::Save() was called.
4483       *       *
4484         * @param pProgress - callback function for progress notification
4485       * @throws gig::Exception if samples cannot be dereferenced       * @throws gig::Exception if samples cannot be dereferenced
4486       */       */
4487      void Instrument::UpdateChunks() {      void Instrument::UpdateChunks(progress_t* pProgress) {
4488          // first update base classes' chunks          // first update base classes' chunks
4489          DLS::Instrument::UpdateChunks();          DLS::Instrument::UpdateChunks(pProgress);
4490    
4491          // update Regions' chunks          // update Regions' chunks
4492          {          {
4493              RegionList::iterator iter = pRegions->begin();              RegionList::iterator iter = pRegions->begin();
4494              RegionList::iterator end  = pRegions->end();              RegionList::iterator end  = pRegions->end();
4495              for (; iter != end; ++iter)              for (; iter != end; ++iter)
4496                  (*iter)->UpdateChunks();                  (*iter)->UpdateChunks(pProgress);
4497          }          }
4498    
4499          // make sure 'lart' RIFF list chunk exists          // make sure 'lart' RIFF list chunk exists
# Line 3156  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 4519  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
4519                                      DimensionKeyRange.low << 1;                                      DimensionKeyRange.low << 1;
4520          pData[10] = dimkeystart;          pData[10] = dimkeystart;
4521          pData[11] = DimensionKeyRange.high;          pData[11] = DimensionKeyRange.high;
4522    
4523            if (pMidiRules[0] == 0 && _3ewg->GetSize() >= 34) {
4524                pData[32] = 0;
4525                pData[33] = 0;
4526            } else {
4527                for (int i = 0 ; pMidiRules[i] ; i++) {
4528                    pMidiRules[i]->UpdateChunks(pData);
4529                }
4530            }
4531    
4532            // own gig format extensions
4533           if (ScriptSlotCount()) {
4534               // make sure we have converted the original loaded script file
4535               // offsets into valid Script object pointers
4536               LoadScripts();
4537    
4538               RIFF::List* lst3LS = pCkInstrument->GetSubList(LIST_TYPE_3LS);
4539               if (!lst3LS) lst3LS = pCkInstrument->AddSubList(LIST_TYPE_3LS);
4540               const int slotCount = pScriptRefs->size();
4541               const int headerSize = 3 * sizeof(uint32_t);
4542               const int slotSize  = 2 * sizeof(uint32_t);
4543               const int totalChunkSize = headerSize + slotCount * slotSize;
4544               RIFF::Chunk* ckSCSL = lst3LS->GetSubChunk(CHUNK_ID_SCSL);
4545               if (!ckSCSL) ckSCSL = lst3LS->AddSubChunk(CHUNK_ID_SCSL, totalChunkSize);
4546               else ckSCSL->Resize(totalChunkSize);
4547               uint8_t* pData = (uint8_t*) ckSCSL->LoadChunkData();
4548               int pos = 0;
4549               store32(&pData[pos], headerSize);
4550               pos += sizeof(uint32_t);
4551               store32(&pData[pos], slotCount);
4552               pos += sizeof(uint32_t);
4553               store32(&pData[pos], slotSize);
4554               pos += sizeof(uint32_t);
4555               for (int i = 0; i < slotCount; ++i) {
4556                   // arbitrary value, the actual file offset will be updated in
4557                   // UpdateScriptFileOffsets() after the file has been resized
4558                   int bogusFileOffset = 0;
4559                   store32(&pData[pos], bogusFileOffset);
4560                   pos += sizeof(uint32_t);
4561                   store32(&pData[pos], (*pScriptRefs)[i].bypass ? 1 : 0);
4562                   pos += sizeof(uint32_t);
4563               }
4564           } else {
4565               // no script slots, so get rid of any LS custom RIFF chunks (if any)
4566               RIFF::List* lst3LS = pCkInstrument->GetSubList(LIST_TYPE_3LS);
4567               if (lst3LS) pCkInstrument->DeleteSubChunk(lst3LS);
4568           }
4569        }
4570    
4571        void Instrument::UpdateScriptFileOffsets() {
4572           // own gig format extensions
4573           if (pScriptRefs && pScriptRefs->size() > 0) {
4574               RIFF::List* lst3LS = pCkInstrument->GetSubList(LIST_TYPE_3LS);
4575               RIFF::Chunk* ckSCSL = lst3LS->GetSubChunk(CHUNK_ID_SCSL);
4576               const int slotCount = pScriptRefs->size();
4577               const int headerSize = 3 * sizeof(uint32_t);
4578               ckSCSL->SetPos(headerSize);
4579               for (int i = 0; i < slotCount; ++i) {
4580                   uint32_t fileOffset =
4581                        (*pScriptRefs)[i].script->pChunk->GetFilePos() -
4582                        (*pScriptRefs)[i].script->pChunk->GetPos() -
4583                        CHUNK_HEADER_SIZE(ckSCSL->GetFile()->GetFileOffsetSize());
4584                   ckSCSL->WriteUint32(&fileOffset);
4585                   // jump over flags entry (containing the bypass flag)
4586                   ckSCSL->SetPos(sizeof(uint32_t), RIFF::stream_curpos);
4587               }
4588           }        
4589      }      }
4590    
4591      /**      /**
# Line 3225  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 4655  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
4655      }      }
4656    
4657      /**      /**
4658         * Move this instrument at the position before @arg dst.
4659         *
4660         * This method can be used to reorder the sequence of instruments in a
4661         * .gig file. This might be helpful especially on large .gig files which
4662         * contain a large number of instruments within the same .gig file. So
4663         * grouping such instruments to similar ones, can help to keep track of them
4664         * when working with such complex .gig files.
4665         *
4666         * When calling this method, this instrument will be removed from in its
4667         * current position in the instruments list and moved to the requested
4668         * target position provided by @param dst. You may also pass NULL as
4669         * argument to this method, in that case this intrument will be moved to the
4670         * very end of the .gig file's instrument list.
4671         *
4672         * You have to call Save() to make the order change persistent to the .gig
4673         * file.
4674         *
4675         * Currently this method is limited to moving the instrument within the same
4676         * .gig file. Trying to move it to another .gig file by calling this method
4677         * will throw an exception.
4678         *
4679         * @param dst - destination instrument at which this instrument will be
4680         *              moved to, or pass NULL for moving to end of list
4681         * @throw gig::Exception if this instrument and target instrument are not
4682         *                       part of the same file
4683         */
4684        void Instrument::MoveTo(Instrument* dst) {
4685            if (dst && GetParent() != dst->GetParent())
4686                throw Exception(
4687                    "gig::Instrument::MoveTo() can only be used for moving within "
4688                    "the same gig file."
4689                );
4690    
4691            File* pFile = (File*) GetParent();
4692    
4693            // move this instrument within the instrument list
4694            {
4695                File::InstrumentList& list = *pFile->pInstruments;
4696    
4697                File::InstrumentList::iterator itFrom =
4698                    std::find(list.begin(), list.end(), static_cast<DLS::Instrument*>(this));
4699    
4700                File::InstrumentList::iterator itTo =
4701                    std::find(list.begin(), list.end(), static_cast<DLS::Instrument*>(dst));
4702    
4703                list.splice(itTo, list, itFrom);
4704            }
4705    
4706            // move the instrument's actual list RIFF chunk appropriately
4707            RIFF::List* lstCkInstruments = pFile->pRIFF->GetSubList(LIST_TYPE_LINS);
4708            lstCkInstruments->MoveSubChunk(
4709                this->pCkInstrument,
4710                (RIFF::Chunk*) ((dst) ? dst->pCkInstrument : NULL)
4711            );
4712        }
4713    
4714        /**
4715       * Returns a MIDI rule of the instrument.       * Returns a MIDI rule of the instrument.
4716       *       *
4717       * 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
# Line 3237  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 4724  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
4724      MidiRule* Instrument::GetMidiRule(int i) {      MidiRule* Instrument::GetMidiRule(int i) {
4725          return pMidiRules[i];          return pMidiRules[i];
4726      }      }
4727        
4728        /**
4729         * Adds the "controller trigger" MIDI rule to the instrument.
4730         *
4731         * @returns the new MIDI rule
4732         */
4733        MidiRuleCtrlTrigger* Instrument::AddMidiRuleCtrlTrigger() {
4734            delete pMidiRules[0];
4735            MidiRuleCtrlTrigger* r = new MidiRuleCtrlTrigger;
4736            pMidiRules[0] = r;
4737            pMidiRules[1] = 0;
4738            return r;
4739        }
4740    
4741        /**
4742         * Adds the legato MIDI rule to the instrument.
4743         *
4744         * @returns the new MIDI rule
4745         */
4746        MidiRuleLegato* Instrument::AddMidiRuleLegato() {
4747            delete pMidiRules[0];
4748            MidiRuleLegato* r = new MidiRuleLegato;
4749            pMidiRules[0] = r;
4750            pMidiRules[1] = 0;
4751            return r;
4752        }
4753    
4754        /**
4755         * Adds the alternator MIDI rule to the instrument.
4756         *
4757         * @returns the new MIDI rule
4758         */
4759        MidiRuleAlternator* Instrument::AddMidiRuleAlternator() {
4760            delete pMidiRules[0];
4761            MidiRuleAlternator* r = new MidiRuleAlternator;
4762            pMidiRules[0] = r;
4763            pMidiRules[1] = 0;
4764            return r;
4765        }
4766    
4767        /**
4768         * Deletes a MIDI rule from the instrument.
4769         *
4770         * @param i - MIDI rule number
4771         */
4772        void Instrument::DeleteMidiRule(int i) {
4773            delete pMidiRules[i];
4774            pMidiRules[i] = 0;
4775        }
4776    
4777        void Instrument::LoadScripts() {
4778            if (pScriptRefs) return;
4779            pScriptRefs = new std::vector<_ScriptPooolRef>;
4780            if (scriptPoolFileOffsets.empty()) return;
4781            File* pFile = (File*) GetParent();
4782            for (uint k = 0; k < scriptPoolFileOffsets.size(); ++k) {
4783                uint32_t soughtOffset = scriptPoolFileOffsets[k].fileOffset;
4784                for (uint i = 0; pFile->GetScriptGroup(i); ++i) {
4785                    ScriptGroup* group = pFile->GetScriptGroup(i);
4786                    for (uint s = 0; group->GetScript(s); ++s) {
4787                        Script* script = group->GetScript(s);
4788                        if (script->pChunk) {
4789                            uint32_t offset = script->pChunk->GetFilePos() -
4790                                              script->pChunk->GetPos() -
4791                                              CHUNK_HEADER_SIZE(script->pChunk->GetFile()->GetFileOffsetSize());
4792                            if (offset == soughtOffset)
4793                            {
4794                                _ScriptPooolRef ref;
4795                                ref.script = script;
4796                                ref.bypass = scriptPoolFileOffsets[k].bypass;
4797                                pScriptRefs->push_back(ref);
4798                                break;
4799                            }
4800                        }
4801                    }
4802                }
4803            }
4804            // we don't need that anymore
4805            scriptPoolFileOffsets.clear();
4806        }
4807    
4808        /** @brief Get instrument script (gig format extension).
4809         *
4810         * Returns the real-time instrument script of instrument script slot
4811         * @a index.
4812         *
4813         * @note This is an own format extension which did not exist i.e. in the
4814         * GigaStudio 4 software. It will currently only work with LinuxSampler and
4815         * gigedit.
4816         *
4817         * @param index - instrument script slot index
4818         * @returns script or NULL if index is out of bounds
4819         */
4820        Script* Instrument::GetScriptOfSlot(uint index) {
4821            LoadScripts();
4822            if (index >= pScriptRefs->size()) return NULL;
4823            return pScriptRefs->at(index).script;
4824        }
4825    
4826        /** @brief Add new instrument script slot (gig format extension).
4827         *
4828         * Add the given real-time instrument script reference to this instrument,
4829         * which shall be executed by the sampler for for this instrument. The
4830         * script will be added to the end of the script list of this instrument.
4831         * The positions of the scripts in the Instrument's Script list are
4832         * relevant, because they define in which order they shall be executed by
4833         * the sampler. For this reason it is also legal to add the same script
4834         * twice to an instrument, for example you might have a script called
4835         * "MyFilter" which performs an event filter task, and you might have
4836         * another script called "MyNoteTrigger" which triggers new notes, then you
4837         * might for example have the following list of scripts on the instrument:
4838         *
4839         * 1. Script "MyFilter"
4840         * 2. Script "MyNoteTrigger"
4841         * 3. Script "MyFilter"
4842         *
4843         * Which would make sense, because the 2nd script launched new events, which
4844         * you might need to filter as well.
4845         *
4846         * There are two ways to disable / "bypass" scripts. You can either disable
4847         * a script locally for the respective script slot on an instrument (i.e. by
4848         * passing @c false to the 2nd argument of this method, or by calling
4849         * SetScriptBypassed()). Or you can disable a script globally for all slots
4850         * and all instruments by setting Script::Bypass.
4851         *
4852         * @note This is an own format extension which did not exist i.e. in the
4853         * GigaStudio 4 software. It will currently only work with LinuxSampler and
4854         * gigedit.
4855         *
4856         * @param pScript - script that shall be executed for this instrument
4857         * @param bypass  - if enabled, the sampler shall skip executing this
4858         *                  script (in the respective list position)
4859         * @see SetScriptBypassed()
4860         */
4861        void Instrument::AddScriptSlot(Script* pScript, bool bypass) {
4862            LoadScripts();
4863            _ScriptPooolRef ref = { pScript, bypass };
4864            pScriptRefs->push_back(ref);
4865        }
4866    
4867        /** @brief Flip two script slots with each other (gig format extension).
4868         *
4869         * Swaps the position of the two given scripts in the Instrument's Script
4870         * list. The positions of the scripts in the Instrument's Script list are
4871         * relevant, because they define in which order they shall be executed by
4872         * the sampler.
4873         *
4874         * @note This is an own format extension which did not exist i.e. in the
4875         * GigaStudio 4 software. It will currently only work with LinuxSampler and
4876         * gigedit.
4877         *
4878         * @param index1 - index of the first script slot to swap
4879         * @param index2 - index of the second script slot to swap
4880         */
4881        void Instrument::SwapScriptSlots(uint index1, uint index2) {
4882            LoadScripts();
4883            if (index1 >= pScriptRefs->size() || index2 >= pScriptRefs->size())
4884                return;
4885            _ScriptPooolRef tmp = (*pScriptRefs)[index1];
4886            (*pScriptRefs)[index1] = (*pScriptRefs)[index2];
4887            (*pScriptRefs)[index2] = tmp;
4888        }
4889    
4890        /** @brief Remove script slot.
4891         *
4892         * Removes the script slot with the given slot index.
4893         *
4894         * @param index - index of script slot to remove
4895         */
4896        void Instrument::RemoveScriptSlot(uint index) {
4897            LoadScripts();
4898            if (index >= pScriptRefs->size()) return;
4899            pScriptRefs->erase( pScriptRefs->begin() + index );
4900        }
4901    
4902        /** @brief Remove reference to given Script (gig format extension).
4903         *
4904         * This will remove all script slots on the instrument which are referencing
4905         * the given script.
4906         *
4907         * @note This is an own format extension which did not exist i.e. in the
4908         * GigaStudio 4 software. It will currently only work with LinuxSampler and
4909         * gigedit.
4910         *
4911         * @param pScript - script reference to remove from this instrument
4912         * @see RemoveScriptSlot()
4913         */
4914        void Instrument::RemoveScript(Script* pScript) {
4915            LoadScripts();
4916            for (int i = pScriptRefs->size() - 1; i >= 0; --i) {
4917                if ((*pScriptRefs)[i].script == pScript) {
4918                    pScriptRefs->erase( pScriptRefs->begin() + i );
4919                }
4920            }
4921        }
4922    
4923        /** @brief Instrument's amount of script slots.
4924         *
4925         * This method returns the amount of script slots this instrument currently
4926         * uses.
4927         *
4928         * A script slot is a reference of a real-time instrument script to be
4929         * executed by the sampler. The scripts will be executed by the sampler in
4930         * sequence of the slots. One (same) script may be referenced multiple
4931         * times in different slots.
4932         *
4933         * @note This is an own format extension which did not exist i.e. in the
4934         * GigaStudio 4 software. It will currently only work with LinuxSampler and
4935         * gigedit.
4936         */
4937        uint Instrument::ScriptSlotCount() const {
4938            return pScriptRefs ? pScriptRefs->size() : scriptPoolFileOffsets.size();
4939        }
4940    
4941        /** @brief Whether script execution shall be skipped.
4942         *
4943         * Defines locally for the Script reference slot in the Instrument's Script
4944         * list, whether the script shall be skipped by the sampler regarding
4945         * execution.
4946         *
4947         * It is also possible to ignore exeuction of the script globally, for all
4948         * slots and for all instruments by setting Script::Bypass.
4949         *
4950         * @note This is an own format extension which did not exist i.e. in the
4951         * GigaStudio 4 software. It will currently only work with LinuxSampler and
4952         * gigedit.
4953         *
4954         * @param index - index of the script slot on this instrument
4955         * @see Script::Bypass
4956         */
4957        bool Instrument::IsScriptSlotBypassed(uint index) {
4958            if (index >= ScriptSlotCount()) return false;
4959            return pScriptRefs ? pScriptRefs->at(index).bypass
4960                               : scriptPoolFileOffsets.at(index).bypass;
4961            
4962        }
4963    
4964        /** @brief Defines whether execution shall be skipped.
4965         *
4966         * You can call this method to define locally whether or whether not the
4967         * given script slot shall be executed by the sampler.
4968         *
4969         * @note This is an own format extension which did not exist i.e. in the
4970         * GigaStudio 4 software. It will currently only work with LinuxSampler and
4971         * gigedit.
4972         *
4973         * @param index - script slot index on this instrument
4974         * @param bBypass - if true, the script slot will be skipped by the sampler
4975         * @see Script::Bypass
4976         */
4977        void Instrument::SetScriptSlotBypassed(uint index, bool bBypass) {
4978            if (index >= ScriptSlotCount()) return;
4979            if (pScriptRefs)
4980                pScriptRefs->at(index).bypass = bBypass;
4981            else
4982                scriptPoolFileOffsets.at(index).bypass = bBypass;
4983        }
4984    
4985      /**      /**
4986       * 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
4987       * and assign it to this object.       * and assign it to this object.
# Line 3248  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 4992  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
4992       * @param orig - original Instrument object to be copied from       * @param orig - original Instrument object to be copied from
4993       */       */
4994      void Instrument::CopyAssign(const Instrument* orig) {      void Instrument::CopyAssign(const Instrument* orig) {
4995            CopyAssign(orig, NULL);
4996        }
4997            
4998        /**
4999         * Make a (semi) deep copy of the Instrument object given by @a orig
5000         * and assign it to this object.
5001         *
5002         * @param orig - original Instrument object to be copied from
5003         * @param mSamples - crosslink map between the foreign file's samples and
5004         *                   this file's samples
5005         */
5006        void Instrument::CopyAssign(const Instrument* orig, const std::map<Sample*,Sample*>* mSamples) {
5007          // handle base class          // handle base class
5008          // (without copying DLS region stuff)          // (without copying DLS region stuff)
5009          DLS::Instrument::CopyAssignCore(orig);          DLS::Instrument::CopyAssignCore(orig);
# Line 3259  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5015  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5015          PitchbendRange = orig->PitchbendRange;          PitchbendRange = orig->PitchbendRange;
5016          PianoReleaseMode = orig->PianoReleaseMode;          PianoReleaseMode = orig->PianoReleaseMode;
5017          DimensionKeyRange = orig->DimensionKeyRange;          DimensionKeyRange = orig->DimensionKeyRange;
5018            scriptPoolFileOffsets = orig->scriptPoolFileOffsets;
5019            pScriptRefs = orig->pScriptRefs;
5020                    
5021          // free old midi rules          // free old midi rules
5022          for (int i = 0 ; pMidiRules[i] ; i++) {          for (int i = 0 ; pMidiRules[i] ; i++) {
# Line 3276  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5034  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5034                  Region* dstRgn = AddRegion();                  Region* dstRgn = AddRegion();
5035                  //NOTE: Region does semi-deep copy !                  //NOTE: Region does semi-deep copy !
5036                  dstRgn->CopyAssign(                  dstRgn->CopyAssign(
5037                      static_cast<gig::Region*>(*it)                      static_cast<gig::Region*>(*it),
5038                        mSamples
5039                  );                  );
5040              }              }
5041          }          }
# Line 3312  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5071  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5071       *       *
5072       * Usually there is absolutely no need to call this method explicitly.       * Usually there is absolutely no need to call this method explicitly.
5073       * It will be called automatically when File::Save() was called.       * It will be called automatically when File::Save() was called.
5074         *
5075         * @param pProgress - callback function for progress notification
5076       */       */
5077      void Group::UpdateChunks() {      void Group::UpdateChunks(progress_t* pProgress) {
5078          // make sure <3gri> and <3gnl> list chunks exist          // make sure <3gri> and <3gnl> list chunks exist
5079          RIFF::List* _3gri = pFile->pRIFF->GetSubList(LIST_TYPE_3GRI);          RIFF::List* _3gri = pFile->pRIFF->GetSubList(LIST_TYPE_3GRI);
5080          if (!_3gri) {          if (!_3gri) {
# Line 3443  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5204  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5204          bAutoLoad = true;          bAutoLoad = true;
5205          *pVersion = VERSION_3;          *pVersion = VERSION_3;
5206          pGroups = NULL;          pGroups = NULL;
5207            pScriptGroups = NULL;
5208          pInfo->SetFixedStringLengths(_FileFixedStringLengths);          pInfo->SetFixedStringLengths(_FileFixedStringLengths);
5209          pInfo->ArchivalLocation = String(256, ' ');          pInfo->ArchivalLocation = String(256, ' ');
5210    
# Line 3458  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5220  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5220      File::File(RIFF::File* pRIFF) : DLS::File(pRIFF) {      File::File(RIFF::File* pRIFF) : DLS::File(pRIFF) {
5221          bAutoLoad = true;          bAutoLoad = true;
5222          pGroups = NULL;          pGroups = NULL;
5223            pScriptGroups = NULL;
5224          pInfo->SetFixedStringLengths(_FileFixedStringLengths);          pInfo->SetFixedStringLengths(_FileFixedStringLengths);
5225      }      }
5226    
# Line 3471  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5234  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5234              }              }
5235              delete pGroups;              delete pGroups;
5236          }          }
5237            if (pScriptGroups) {
5238                std::list<ScriptGroup*>::iterator iter = pScriptGroups->begin();
5239                std::list<ScriptGroup*>::iterator end  = pScriptGroups->end();
5240                while (iter != end) {
5241                    delete *iter;
5242                    ++iter;
5243                }
5244                delete pScriptGroups;
5245            }
5246      }      }
5247    
5248      Sample* File::GetFirstSample(progress_t* pProgress) {      Sample* File::GetFirstSample(progress_t* pProgress) {
# Line 3485  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5257  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5257          SamplesIterator++;          SamplesIterator++;
5258          return static_cast<gig::Sample*>( (SamplesIterator != pSamples->end()) ? *SamplesIterator : NULL );          return static_cast<gig::Sample*>( (SamplesIterator != pSamples->end()) ? *SamplesIterator : NULL );
5259      }      }
5260        
5261        /**
5262         * Returns Sample object of @a index.
5263         *
5264         * @returns sample object or NULL if index is out of bounds
5265         */
5266        Sample* File::GetSample(uint index) {
5267            if (!pSamples) LoadSamples();
5268            if (!pSamples) return NULL;
5269            DLS::File::SampleList::iterator it = pSamples->begin();
5270            for (int i = 0; i < index; ++i) {
5271                ++it;
5272                if (it == pSamples->end()) return NULL;
5273            }
5274            if (it == pSamples->end()) return NULL;
5275            return static_cast<gig::Sample*>( *it );
5276        }
5277    
5278      /** @brief Add a new sample.      /** @brief Add a new sample.
5279       *       *
# Line 3562  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5351  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5351          int iTotalSamples = WavePoolCount;          int iTotalSamples = WavePoolCount;
5352    
5353          // check if samples should be loaded from extension files          // check if samples should be loaded from extension files
5354            // (only for old gig files < 2 GB)
5355          int lastFileNo = 0;          int lastFileNo = 0;
5356          for (int i = 0 ; i < WavePoolCount ; i++) {          if (!file->IsNew() && !(file->GetCurrentFileSize() >> 31)) {
5357              if (pWavePoolTableHi[i] > lastFileNo) lastFileNo = pWavePoolTableHi[i];              for (int i = 0 ; i < WavePoolCount ; i++) {
5358                    if (pWavePoolTableHi[i] > lastFileNo) lastFileNo = pWavePoolTableHi[i];
5359                }
5360          }          }
5361          String name(pRIFF->GetFileName());          String name(pRIFF->GetFileName());
5362          int nameLen = name.length();          int nameLen = name.length();
# Line 3574  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5366  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5366          for (int fileNo = 0 ; ; ) {          for (int fileNo = 0 ; ; ) {
5367              RIFF::List* wvpl = file->GetSubList(LIST_TYPE_WVPL);              RIFF::List* wvpl = file->GetSubList(LIST_TYPE_WVPL);
5368              if (wvpl) {              if (wvpl) {
5369                  unsigned long wvplFileOffset = wvpl->GetFilePos();                  file_offset_t wvplFileOffset = wvpl->GetFilePos();
5370                  RIFF::List* wave = wvpl->GetFirstSubList();                  RIFF::List* wave = wvpl->GetFirstSubList();
5371                  while (wave) {                  while (wave) {
5372                      if (wave->GetListType() == LIST_TYPE_WAVE) {                      if (wave->GetListType() == LIST_TYPE_WAVE) {
# Line 3582  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5374  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5374                          const float subprogress = (float) iSampleIndex / (float) iTotalSamples;                          const float subprogress = (float) iSampleIndex / (float) iTotalSamples;
5375                          __notify_progress(pProgress, subprogress);                          __notify_progress(pProgress, subprogress);
5376    
5377                          unsigned long waveFileOffset = wave->GetFilePos();                          file_offset_t waveFileOffset = wave->GetFilePos();
5378                          pSamples->push_back(new Sample(this, wave, waveFileOffset - wvplFileOffset, fileNo));                          pSamples->push_back(new Sample(this, wave, waveFileOffset - wvplFileOffset, fileNo));
5379    
5380                          iSampleIndex++;                          iSampleIndex++;
# Line 3703  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5495  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5495          instr->CopyAssign(orig);          instr->CopyAssign(orig);
5496          return instr;          return instr;
5497      }      }
5498        
5499        /** @brief Add content of another existing file.
5500         *
5501         * Duplicates the samples, groups and instruments of the original file
5502         * given by @a pFile and adds them to @c this File. In case @c this File is
5503         * a new one that you haven't saved before, then you have to call
5504         * SetFileName() before calling AddContentOf(), because this method will
5505         * automatically save this file during operation, which is required for
5506         * writing the sample waveform data by disk streaming.
5507         *
5508         * @param pFile - original file whose's content shall be copied from
5509         */
5510        void File::AddContentOf(File* pFile) {
5511            static int iCallCount = -1;
5512            iCallCount++;
5513            std::map<Group*,Group*> mGroups;
5514            std::map<Sample*,Sample*> mSamples;
5515            
5516            // clone sample groups
5517            for (int i = 0; pFile->GetGroup(i); ++i) {
5518                Group* g = AddGroup();
5519                g->Name =
5520                    "COPY" + ToString(iCallCount) + "_" + pFile->GetGroup(i)->Name;
5521                mGroups[pFile->GetGroup(i)] = g;
5522            }
5523            
5524            // clone samples (not waveform data here yet)
5525            for (int i = 0; pFile->GetSample(i); ++i) {
5526                Sample* s = AddSample();
5527                s->CopyAssignMeta(pFile->GetSample(i));
5528                mGroups[pFile->GetSample(i)->GetGroup()]->AddSample(s);
5529                mSamples[pFile->GetSample(i)] = s;
5530            }
5531            
5532            //BUG: For some reason this method only works with this additional
5533            //     Save() call in between here.
5534            //
5535            // Important: The correct one of the 2 Save() methods has to be called
5536            // here, depending on whether the file is completely new or has been
5537            // saved to disk already, otherwise it will result in data corruption.
5538            if (pRIFF->IsNew())
5539                Save(GetFileName());
5540            else
5541                Save();
5542            
5543            // clone instruments
5544            // (passing the crosslink table here for the cloned samples)
5545            for (int i = 0; pFile->GetInstrument(i); ++i) {
5546                Instrument* instr = AddInstrument();
5547                instr->CopyAssign(pFile->GetInstrument(i), &mSamples);
5548            }
5549            
5550            // Mandatory: file needs to be saved to disk at this point, so this
5551            // file has the correct size and data layout for writing the samples'
5552            // waveform data to disk.
5553            Save();
5554            
5555            // clone samples' waveform data
5556            // (using direct read & write disk streaming)
5557            for (int i = 0; pFile->GetSample(i); ++i) {
5558                mSamples[pFile->GetSample(i)]->CopyAssignWave(pFile->GetSample(i));
5559            }
5560        }
5561    
5562      /** @brief Delete an instrument.      /** @brief Delete an instrument.
5563       *       *
# Line 3805  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5660  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5660          return NULL;          return NULL;
5661      }      }
5662    
5663        /**
5664         * Returns the group with the given group name.
5665         *
5666         * Note: group names don't have to be unique in the gig format! So there
5667         * can be multiple groups with the same name. This method will simply
5668         * return the first group found with the given name.
5669         *
5670         * @param name - name of the sought group
5671         * @returns sought group or NULL if there's no group with that name
5672         */
5673        Group* File::GetGroup(String name) {
5674            if (!pGroups) LoadGroups();
5675            GroupsIterator = pGroups->begin();
5676            for (uint i = 0; GroupsIterator != pGroups->end(); ++GroupsIterator, ++i)
5677                if ((*GroupsIterator)->Name == name) return *GroupsIterator;
5678            return NULL;
5679        }
5680    
5681      Group* File::AddGroup() {      Group* File::AddGroup() {
5682          if (!pGroups) LoadGroups();          if (!pGroups) LoadGroups();
5683          // there must always be at least one group          // there must always be at least one group
# Line 3885  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5758  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5758          }          }
5759      }      }
5760    
5761        /** @brief Get instrument script group (by index).
5762         *
5763         * Returns the real-time instrument script group with the given index.
5764         *
5765         * @param index - number of the sought group (0..n)
5766         * @returns sought script group or NULL if there's no such group
5767         */
5768        ScriptGroup* File::GetScriptGroup(uint index) {
5769            if (!pScriptGroups) LoadScriptGroups();
5770            std::list<ScriptGroup*>::iterator it = pScriptGroups->begin();
5771            for (uint i = 0; it != pScriptGroups->end(); ++i, ++it)
5772                if (i == index) return *it;
5773            return NULL;
5774        }
5775    
5776        /** @brief Get instrument script group (by name).
5777         *
5778         * Returns the first real-time instrument script group found with the given
5779         * group name. Note that group names may not necessarily be unique.
5780         *
5781         * @param name - name of the sought script group
5782         * @returns sought script group or NULL if there's no such group
5783         */
5784        ScriptGroup* File::GetScriptGroup(const String& name) {
5785            if (!pScriptGroups) LoadScriptGroups();
5786            std::list<ScriptGroup*>::iterator it = pScriptGroups->begin();
5787            for (uint i = 0; it != pScriptGroups->end(); ++i, ++it)
5788                if ((*it)->Name == name) return *it;
5789            return NULL;
5790        }
5791    
5792        /** @brief Add new instrument script group.
5793         *
5794         * Adds a new, empty real-time instrument script group to the file.
5795         *
5796         * You have to call Save() to make this persistent to the file.
5797         *
5798         * @return new empty script group
5799         */
5800        ScriptGroup* File::AddScriptGroup() {
5801            if (!pScriptGroups) LoadScriptGroups();
5802            ScriptGroup* pScriptGroup = new ScriptGroup(this, NULL);
5803            pScriptGroups->push_back(pScriptGroup);
5804            return pScriptGroup;
5805        }
5806    
5807        /** @brief Delete an instrument script group.
5808         *
5809         * This will delete the given real-time instrument script group and all its
5810         * instrument scripts it contains. References inside instruments that are
5811         * using the deleted scripts will be removed from the respective instruments
5812         * accordingly.
5813         *
5814         * You have to call Save() to make this persistent to the file.
5815         *
5816         * @param pScriptGroup - script group to delete
5817         * @throws gig::Exception if given script group could not be found
5818         */
5819        void File::DeleteScriptGroup(ScriptGroup* pScriptGroup) {
5820            if (!pScriptGroups) LoadScriptGroups();
5821            std::list<ScriptGroup*>::iterator iter =
5822                find(pScriptGroups->begin(), pScriptGroups->end(), pScriptGroup);
5823            if (iter == pScriptGroups->end())
5824                throw gig::Exception("Could not delete script group, could not find given script group");
5825            pScriptGroups->erase(iter);
5826            for (int i = 0; pScriptGroup->GetScript(i); ++i)
5827                pScriptGroup->DeleteScript(pScriptGroup->GetScript(i));
5828            if (pScriptGroup->pList)
5829                pScriptGroup->pList->GetParent()->DeleteSubChunk(pScriptGroup->pList);
5830            delete pScriptGroup;
5831        }
5832    
5833        void File::LoadScriptGroups() {
5834            if (pScriptGroups) return;
5835            pScriptGroups = new std::list<ScriptGroup*>;
5836            RIFF::List* lstLS = pRIFF->GetSubList(LIST_TYPE_3LS);
5837            if (lstLS) {
5838                for (RIFF::List* lst = lstLS->GetFirstSubList(); lst;
5839                     lst = lstLS->GetNextSubList())
5840                {
5841                    if (lst->GetListType() == LIST_TYPE_RTIS) {
5842                        pScriptGroups->push_back(new ScriptGroup(this, lst));
5843                    }
5844                }
5845            }
5846        }
5847    
5848      /**      /**
5849       * Apply all the gig file's current instruments, samples, groups and settings       * Apply all the gig file's current instruments, samples, groups and settings
5850       * 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
# Line 3893  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5853  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5853       * Usually there is absolutely no need to call this method explicitly.       * Usually there is absolutely no need to call this method explicitly.
5854       * It will be called automatically when File::Save() was called.       * It will be called automatically when File::Save() was called.
5855       *       *
5856         * @param pProgress - callback function for progress notification
5857       * @throws Exception - on errors       * @throws Exception - on errors
5858       */       */
5859      void File::UpdateChunks() {      void File::UpdateChunks(progress_t* pProgress) {
5860          bool newFile = pRIFF->GetSubList(LIST_TYPE_INFO) == NULL;          bool newFile = pRIFF->GetSubList(LIST_TYPE_INFO) == NULL;
5861    
5862          b64BitWavePoolOffsets = pVersion && pVersion->major == 3;          // update own gig format extension chunks
5863            // (not part of the GigaStudio 4 format)
5864            RIFF::List* lst3LS = pRIFF->GetSubList(LIST_TYPE_3LS);
5865            if (!lst3LS) {
5866                lst3LS = pRIFF->AddSubList(LIST_TYPE_3LS);
5867            }
5868            // Make sure <3LS > chunk is placed before <ptbl> chunk. The precise
5869            // location of <3LS > is irrelevant, however it should be located
5870            // before  the actual wave data
5871            RIFF::Chunk* ckPTBL = pRIFF->GetSubChunk(CHUNK_ID_PTBL);
5872            pRIFF->MoveSubChunk(lst3LS, ckPTBL);
5873    
5874            // This must be performed before writing the chunks for instruments,
5875            // because the instruments' script slots will write the file offsets
5876            // of the respective instrument script chunk as reference.
5877            if (pScriptGroups) {
5878                // Update instrument script (group) chunks.
5879                for (std::list<ScriptGroup*>::iterator it = pScriptGroups->begin();
5880                     it != pScriptGroups->end(); ++it)
5881                {
5882                    (*it)->UpdateChunks(pProgress);
5883                }
5884            }
5885    
5886            // in case no libgig custom format data was added, then remove the
5887            // custom "3LS " chunk again
5888            if (!lst3LS->CountSubChunks()) {
5889                pRIFF->DeleteSubChunk(lst3LS);
5890                lst3LS = NULL;
5891            }
5892    
5893          // first update base class's chunks          // first update base class's chunks
5894          DLS::File::UpdateChunks();          DLS::File::UpdateChunks(pProgress);
5895    
5896          if (newFile) {          if (newFile) {
5897              // INFO was added by Resource::UpdateChunks - make sure it              // INFO was added by Resource::UpdateChunks - make sure it
# Line 3915  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 5905  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
5905    
5906          // update group's chunks          // update group's chunks
5907          if (pGroups) {          if (pGroups) {
5908              std::list<Group*>::iterator iter = pGroups->begin();              // make sure '3gri' and '3gnl' list chunks exist
5909              std::list<Group*>::iterator end  = pGroups->end();              // (before updating the Group chunks)
5910              for (; iter != end; ++iter) {              RIFF::List* _3gri = pRIFF->GetSubList(LIST_TYPE_3GRI);
5911                  (*iter)->UpdateChunks();              if (!_3gri) {
5912                    _3gri = pRIFF->AddSubList(LIST_TYPE_3GRI);
5913                    pRIFF->MoveSubChunk(_3gri, pRIFF->GetSubChunk(CHUNK_ID_PTBL));
5914              }              }
5915                RIFF::List* _3gnl = _3gri->GetSubList(LIST_TYPE_3GNL);
5916                if (!_3gnl) _3gnl = _3gri->AddSubList(LIST_TYPE_3GNL);
5917    
5918              // v3: make sure the file has 128 3gnm chunks              // v3: make sure the file has 128 3gnm chunks
5919                // (before updating the Group chunks)
5920              if (pVersion && pVersion->major == 3) {              if (pVersion && pVersion->major == 3) {
                 RIFF::List* _3gnl = pRIFF->GetSubList(LIST_TYPE_3GRI)->GetSubList(LIST_TYPE_3GNL);  
5921                  RIFF::Chunk* _3gnm = _3gnl->GetFirstSubChunk();                  RIFF::Chunk* _3gnm = _3gnl->GetFirstSubChunk();
5922                  for (int i = 0 ; i < 128 ; i++) {                  for (int i = 0 ; i < 128 ; i++) {
5923                      if (i >= pGroups->size()) ::SaveString(CHUNK_ID_3GNM, _3gnm, _3gnl, "", "", true, 64);                      if (i >= pGroups->size()) ::SaveString(CHUNK_ID_3GNM, _3gnm, _3gnl, "", "", true, 64);
5924                      if (_3gnm) _3gnm = _3gnl->GetNextSubChunk();                      if (_3gnm) _3gnm = _3gnl->GetNextSubChunk();
5925                  }                  }
5926              }              }
5927    
5928                std::list<Group*>::iterator iter = pGroups->begin();
5929                std::list<Group*>::iterator end  = pGroups->end();
5930                for (; iter != end; ++iter) {
5931                    (*iter)->UpdateChunks(pProgress);
5932                }
5933          }          }
5934    
5935          // update einf chunk          // update einf chunk
# Line 4060  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger Line 6060  MidiRuleCtrlTrigger::MidiRuleCtrlTrigger
6060              if (einf && pVersion && pVersion->major == 3) pRIFF->MoveSubChunk(_3crc, einf);              if (einf && pVersion && pVersion->major == 3) pRIFF->MoveSubChunk(_3crc, einf);
6061          }          }
6062      }      }
6063        
6064        void File::UpdateFileOffsets() {
6065            DLS::File::UpdateFileOffsets();
6066    
6067            for (Instrument* instrument = GetFirstInstrument(); instrument;
6068                 instrument = GetNextInstrument())
6069            {
6070                instrument->UpdateScriptFileOffsets();
6071            }
6072        }
6073    
6074      /**      /**
6075       * Enable / disable automatic loading. By default this properyt is       * Enable / disable automatic loading. By default this properyt is

Legend:
Removed from v.2394  
changed lines
  Added in v.2913

  ViewVC Help
Powered by ViewVC