/[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 1180 by persson, Sat May 12 12:39:25 2007 UTC revision 1384 by schoenebeck, Fri Oct 5 11:26:53 2007 UTC
# Line 255  namespace { Line 255  namespace {
255    
256    
257    
258    // *************** Internal CRC-32 (Cyclic Redundancy Check) functions  ***************
259    // *
260    
261        static uint32_t* __initCRCTable() {
262            static uint32_t res[256];
263    
264            for (int i = 0 ; i < 256 ; i++) {
265                uint32_t c = i;
266                for (int j = 0 ; j < 8 ; j++) {
267                    c = (c & 1) ? 0xedb88320 ^ (c >> 1) : c >> 1;
268                }
269                res[i] = c;
270            }
271            return res;
272        }
273    
274        static const uint32_t* __CRCTable = __initCRCTable();
275    
276        /**
277         * Initialize a CRC variable.
278         *
279         * @param crc - variable to be initialized
280         */
281        inline static void __resetCRC(uint32_t& crc) {
282            crc = 0xffffffff;
283        }
284    
285        /**
286         * Used to calculate checksums of the sample data in a gig file. The
287         * checksums are stored in the 3crc chunk of the gig file and
288         * automatically updated when a sample is written with Sample::Write().
289         *
290         * One should call __resetCRC() to initialize the CRC variable to be
291         * used before calling this function the first time.
292         *
293         * After initializing the CRC variable one can call this function
294         * arbitrary times, i.e. to split the overall CRC calculation into
295         * steps.
296         *
297         * Once the whole data was processed by __calculateCRC(), one should
298         * call __encodeCRC() to get the final CRC result.
299         *
300         * @param buf     - pointer to data the CRC shall be calculated of
301         * @param bufSize - size of the data to be processed
302         * @param crc     - variable the CRC sum shall be stored to
303         */
304        static void __calculateCRC(unsigned char* buf, int bufSize, uint32_t& crc) {
305            for (int i = 0 ; i < bufSize ; i++) {
306                crc = __CRCTable[(crc ^ buf[i]) & 0xff] ^ (crc >> 8);
307            }
308        }
309    
310        /**
311         * Returns the final CRC result.
312         *
313         * @param crc - variable previously passed to __calculateCRC()
314         */
315        inline static uint32_t __encodeCRC(const uint32_t& crc) {
316            return crc ^ 0xffffffff;
317        }
318    
319    
320    
321  // *************** Other Internal functions  ***************  // *************** Other Internal functions  ***************
322  // *  // *
323    
# Line 311  namespace { Line 374  namespace {
374          Instances++;          Instances++;
375          FileNo = fileNo;          FileNo = fileNo;
376    
377            __resetCRC(crc);
378    
379          pCk3gix = waveList->GetSubChunk(CHUNK_ID_3GIX);          pCk3gix = waveList->GetSubChunk(CHUNK_ID_3GIX);
380          if (pCk3gix) {          if (pCk3gix) {
381              uint16_t iSampleGroup = pCk3gix->ReadInt16();              uint16_t iSampleGroup = pCk3gix->ReadInt16();
# Line 342  namespace { Line 407  namespace {
407              Manufacturer  = 0;              Manufacturer  = 0;
408              Product       = 0;              Product       = 0;
409              SamplePeriod  = uint32_t(1000000000.0 / SamplesPerSecond + 0.5);              SamplePeriod  = uint32_t(1000000000.0 / SamplesPerSecond + 0.5);
410              MIDIUnityNote = 64;              MIDIUnityNote = 60;
411              FineTune      = 0;              FineTune      = 0;
412                SMPTEFormat   = smpte_format_no_offset;
413              SMPTEOffset   = 0;              SMPTEOffset   = 0;
414              Loops         = 0;              Loops         = 0;
415              LoopID        = 0;              LoopID        = 0;
416                LoopType      = loop_type_normal;
417              LoopStart     = 0;              LoopStart     = 0;
418              LoopEnd       = 0;              LoopEnd       = 0;
419              LoopFraction  = 0;              LoopFraction  = 0;
# Line 402  namespace { Line 469  namespace {
469    
470          // make sure 'smpl' chunk exists          // make sure 'smpl' chunk exists
471          pCkSmpl = pWaveList->GetSubChunk(CHUNK_ID_SMPL);          pCkSmpl = pWaveList->GetSubChunk(CHUNK_ID_SMPL);
472          if (!pCkSmpl) pCkSmpl = pWaveList->AddSubChunk(CHUNK_ID_SMPL, 60);          if (!pCkSmpl) {
473                pCkSmpl = pWaveList->AddSubChunk(CHUNK_ID_SMPL, 60);
474                memset(pCkSmpl->LoadChunkData(), 0, 60);
475            }
476          // update 'smpl' chunk          // update 'smpl' chunk
477          uint8_t* pData = (uint8_t*) pCkSmpl->LoadChunkData();          uint8_t* pData = (uint8_t*) pCkSmpl->LoadChunkData();
478          SamplePeriod = uint32_t(1000000000.0 / SamplesPerSecond + 0.5);          SamplePeriod = uint32_t(1000000000.0 / SamplesPerSecond + 0.5);
# Line 1127  namespace { Line 1197  namespace {
1197       *       *
1198       * Note: there is currently no support for writing compressed samples.       * Note: there is currently no support for writing compressed samples.
1199       *       *
1200         * For 16 bit samples, the data in the source buffer should be
1201         * int16_t (using native endianness). For 24 bit, the buffer
1202         * should contain three bytes per sample, little-endian.
1203         *
1204       * @param pBuffer     - source buffer       * @param pBuffer     - source buffer
1205       * @param SampleCount - number of sample points to write       * @param SampleCount - number of sample points to write
1206       * @throws DLS::Exception if current sample size is too small       * @throws DLS::Exception if current sample size is too small
# Line 1135  namespace { Line 1209  namespace {
1209       */       */
1210      unsigned long Sample::Write(void* pBuffer, unsigned long SampleCount) {      unsigned long Sample::Write(void* pBuffer, unsigned long SampleCount) {
1211          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)");
1212          return DLS::Sample::Write(pBuffer, SampleCount);  
1213            // if this is the first write in this sample, reset the
1214            // checksum calculator
1215            if (pCkData->GetPos() == 0) {
1216                __resetCRC(crc);
1217            }
1218            if (GetSize() < SampleCount) throw Exception("Could not write sample data, current sample size to small");
1219            unsigned long res;
1220            if (BitDepth == 24) {
1221                res = pCkData->Write(pBuffer, SampleCount * FrameSize, 1) / FrameSize;
1222            } else { // 16 bit
1223                res = Channels == 2 ? pCkData->Write(pBuffer, SampleCount << 1, 2) >> 1
1224                                    : pCkData->Write(pBuffer, SampleCount, 2);
1225            }
1226            __calculateCRC((unsigned char *)pBuffer, SampleCount * FrameSize, crc);
1227    
1228            // if this is the last write, update the checksum chunk in the
1229            // file
1230            if (pCkData->GetPos() == pCkData->GetSize()) {
1231                File* pFile = static_cast<File*>(GetParent());
1232                pFile->SetSampleChecksum(this, __encodeCRC(crc));
1233            }
1234            return res;
1235      }      }
1236    
1237      /**      /**
# Line 1211  namespace { Line 1307  namespace {
1307      uint                               DimensionRegion::Instances       = 0;      uint                               DimensionRegion::Instances       = 0;
1308      DimensionRegion::VelocityTableMap* DimensionRegion::pVelocityTables = NULL;      DimensionRegion::VelocityTableMap* DimensionRegion::pVelocityTables = NULL;
1309    
1310      DimensionRegion::DimensionRegion(RIFF::List* _3ewl) : DLS::Sampler(_3ewl) {      DimensionRegion::DimensionRegion(Region* pParent, RIFF::List* _3ewl) : DLS::Sampler(_3ewl) {
1311          Instances++;          Instances++;
1312    
1313          pSample = NULL;          pSample = NULL;
1314            pRegion = pParent;
1315    
1316            if (_3ewl->GetSubChunk(CHUNK_ID_WSMP)) memcpy(&Crossfade, &SamplerOptions, 4);
1317            else memset(&Crossfade, 0, 4);
1318    
         memcpy(&Crossfade, &SamplerOptions, 4);  
1319          if (!pVelocityTables) pVelocityTables = new VelocityTableMap;          if (!pVelocityTables) pVelocityTables = new VelocityTableMap;
1320    
1321          RIFF::Chunk* _3ewa = _3ewl->GetSubChunk(CHUNK_ID_3EWA);          RIFF::Chunk* _3ewa = _3ewl->GetSubChunk(CHUNK_ID_3EWA);
# Line 1380  namespace { Line 1479  namespace {
1479              LFO1ControlDepth                = 0;              LFO1ControlDepth                = 0;
1480              LFO3ControlDepth                = 0;              LFO3ControlDepth                = 0;
1481              EG1Attack                       = 0.0;              EG1Attack                       = 0.0;
1482              EG1Decay1                       = 0.0;              EG1Decay1                       = 0.005;
1483              EG1Sustain                      = 0;              EG1Sustain                      = 1000;
1484              EG1Release                      = 0.0;              EG1Release                      = 0.3;
1485              EG1Controller.type              = eg1_ctrl_t::type_none;              EG1Controller.type              = eg1_ctrl_t::type_none;
1486              EG1Controller.controller_number = 0;              EG1Controller.controller_number = 0;
1487              EG1ControllerInvert             = false;              EG1ControllerInvert             = false;
# Line 1397  namespace { Line 1496  namespace {
1496              EG2ControllerReleaseInfluence   = 0;              EG2ControllerReleaseInfluence   = 0;
1497              LFO1Frequency                   = 1.0;              LFO1Frequency                   = 1.0;
1498              EG2Attack                       = 0.0;              EG2Attack                       = 0.0;
1499              EG2Decay1                       = 0.0;              EG2Decay1                       = 0.005;
1500              EG2Sustain                      = 0;              EG2Sustain                      = 1000;
1501              EG2Release                      = 0.0;              EG2Release                      = 0.3;
1502              LFO2ControlDepth                = 0;              LFO2ControlDepth                = 0;
1503              LFO2Frequency                   = 1.0;              LFO2Frequency                   = 1.0;
1504              LFO2InternalDepth               = 0;              LFO2InternalDepth               = 0;
1505              EG1Decay2                       = 0.0;              EG1Decay2                       = 0.0;
1506              EG1InfiniteSustain              = false;              EG1InfiniteSustain              = true;
1507              EG1PreAttack                    = 1000;              EG1PreAttack                    = 0;
1508              EG2Decay2                       = 0.0;              EG2Decay2                       = 0.0;
1509              EG2InfiniteSustain              = false;              EG2InfiniteSustain              = true;
1510              EG2PreAttack                    = 1000;              EG2PreAttack                    = 0;
1511              VelocityResponseCurve           = curve_type_nonlinear;              VelocityResponseCurve           = curve_type_nonlinear;
1512              VelocityResponseDepth           = 3;              VelocityResponseDepth           = 3;
1513              ReleaseVelocityResponseCurve    = curve_type_nonlinear;              ReleaseVelocityResponseCurve    = curve_type_nonlinear;
# Line 1451  namespace { Line 1550  namespace {
1550              VCFVelocityDynamicRange         = 0x04;              VCFVelocityDynamicRange         = 0x04;
1551              VCFVelocityCurve                = curve_type_linear;              VCFVelocityCurve                = curve_type_linear;
1552              VCFType                         = vcf_type_lowpass;              VCFType                         = vcf_type_lowpass;
1553              memset(DimensionUpperLimits, 0, 8);              memset(DimensionUpperLimits, 127, 8);
1554          }          }
1555    
1556          pVelocityAttenuationTable = GetVelocityTable(VelocityResponseCurve,          pVelocityAttenuationTable = GetVelocityTable(VelocityResponseCurve,
1557                                                       VelocityResponseDepth,                                                       VelocityResponseDepth,
1558                                                       VelocityResponseCurveScaling);                                                       VelocityResponseCurveScaling);
1559    
1560          curve_type_t curveType = ReleaseVelocityResponseCurve;          pVelocityReleaseTable = GetReleaseVelocityTable(
1561          uint8_t depth = ReleaseVelocityResponseDepth;                                      ReleaseVelocityResponseCurve,
1562                                        ReleaseVelocityResponseDepth
1563                                    );
1564    
1565            pVelocityCutoffTable = GetCutoffVelocityTable(VCFVelocityCurve,
1566                                                          VCFVelocityDynamicRange,
1567                                                          VCFVelocityScale,
1568                                                          VCFCutoffController);
1569    
1570          // this models a strange behaviour or bug in GSt: two of the          SampleAttenuation = pow(10.0, -Gain / (20.0 * 655360));
1571          // velocity response curves for release time are not used even          VelocityTable = 0;
1572          // if specified, instead another curve is chosen.      }
         if ((curveType == curve_type_nonlinear && depth == 0) ||  
             (curveType == curve_type_special   && depth == 4)) {  
             curveType = curve_type_nonlinear;  
             depth = 3;  
         }  
         pVelocityReleaseTable = GetVelocityTable(curveType, depth, 0);  
1573    
1574          curveType = VCFVelocityCurve;      /*
1575          depth = VCFVelocityDynamicRange;       * Constructs a DimensionRegion by copying all parameters from
1576         * another DimensionRegion
1577         */
1578        DimensionRegion::DimensionRegion(RIFF::List* _3ewl, const DimensionRegion& src) : DLS::Sampler(_3ewl) {
1579            Instances++;
1580            *this = src; // default memberwise shallow copy of all parameters
1581            pParentList = _3ewl; // restore the chunk pointer
1582    
1583          // even stranger GSt: two of the velocity response curves for          // deep copy of owned structures
1584          // filter cutoff are not used, instead another special curve          if (src.VelocityTable) {
1585          // is chosen. This curve is not used anywhere else.              VelocityTable = new uint8_t[128];
1586          if ((curveType == curve_type_nonlinear && depth == 0) ||              for (int k = 0 ; k < 128 ; k++)
1587              (curveType == curve_type_special   && depth == 4)) {                  VelocityTable[k] = src.VelocityTable[k];
1588              curveType = curve_type_special;          }
1589              depth = 5;          if (src.pSampleLoops) {
1590                pSampleLoops = new DLS::sample_loop_t[src.SampleLoops];
1591                for (int k = 0 ; k < src.SampleLoops ; k++)
1592                    pSampleLoops[k] = src.pSampleLoops[k];
1593          }          }
1594          pVelocityCutoffTable = GetVelocityTable(curveType, depth,      }
                                                 VCFCutoffController <= vcf_cutoff_ctrl_none2 ? VCFVelocityScale : 0);  
1595    
1596        /**
1597         * Updates the respective member variable and updates @c SampleAttenuation
1598         * which depends on this value.
1599         */
1600        void DimensionRegion::SetGain(int32_t gain) {
1601            DLS::Sampler::SetGain(gain);
1602          SampleAttenuation = pow(10.0, -Gain / (20.0 * 655360));          SampleAttenuation = pow(10.0, -Gain / (20.0 * 655360));
         VelocityTable = 0;  
1603      }      }
1604    
1605      /**      /**
# Line 1500  namespace { Line 1613  namespace {
1613          // first update base class's chunk          // first update base class's chunk
1614          DLS::Sampler::UpdateChunks();          DLS::Sampler::UpdateChunks();
1615    
1616            RIFF::Chunk* wsmp = pParentList->GetSubChunk(CHUNK_ID_WSMP);
1617            uint8_t* pData = (uint8_t*) wsmp->LoadChunkData();
1618            pData[12] = Crossfade.in_start;
1619            pData[13] = Crossfade.in_end;
1620            pData[14] = Crossfade.out_start;
1621            pData[15] = Crossfade.out_end;
1622    
1623          // make sure '3ewa' chunk exists          // make sure '3ewa' chunk exists
1624          RIFF::Chunk* _3ewa = pParentList->GetSubChunk(CHUNK_ID_3EWA);          RIFF::Chunk* _3ewa = pParentList->GetSubChunk(CHUNK_ID_3EWA);
1625          if (!_3ewa)  _3ewa = pParentList->AddSubChunk(CHUNK_ID_3EWA, 140);          if (!_3ewa) {
1626          uint8_t* pData = (uint8_t*) _3ewa->LoadChunkData();              File* pFile = (File*) GetParent()->GetParent()->GetParent();
1627                bool version3 = pFile->pVersion && pFile->pVersion->major == 3;
1628                _3ewa = pParentList->AddSubChunk(CHUNK_ID_3EWA, version3 ? 148 : 140);
1629            }
1630            pData = (uint8_t*) _3ewa->LoadChunkData();
1631    
1632          // update '3ewa' chunk with DimensionRegion's current settings          // update '3ewa' chunk with DimensionRegion's current settings
1633    
1634          const uint32_t chunksize = _3ewa->GetSize();          const uint32_t chunksize = _3ewa->GetNewSize();
1635          store32(&pData[0], chunksize); // unknown, always chunk size?          store32(&pData[0], chunksize); // unknown, always chunk size?
1636    
1637          const int32_t lfo3freq = (int32_t) GIG_EXP_ENCODE(LFO3Frequency);          const int32_t lfo3freq = (int32_t) GIG_EXP_ENCODE(LFO3Frequency);
# Line 1549  namespace { Line 1673  namespace {
1673          pData[44] = eg1ctl;          pData[44] = eg1ctl;
1674    
1675          const uint8_t eg1ctrloptions =          const uint8_t eg1ctrloptions =
1676              (EG1ControllerInvert) ? 0x01 : 0x00 |              (EG1ControllerInvert ? 0x01 : 0x00) |
1677              GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG1ControllerAttackInfluence) |              GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG1ControllerAttackInfluence) |
1678              GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG1ControllerDecayInfluence) |              GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG1ControllerDecayInfluence) |
1679              GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG1ControllerReleaseInfluence);              GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG1ControllerReleaseInfluence);
# Line 1559  namespace { Line 1683  namespace {
1683          pData[46] = eg2ctl;          pData[46] = eg2ctl;
1684    
1685          const uint8_t eg2ctrloptions =          const uint8_t eg2ctrloptions =
1686              (EG2ControllerInvert) ? 0x01 : 0x00 |              (EG2ControllerInvert ? 0x01 : 0x00) |
1687              GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG2ControllerAttackInfluence) |              GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG2ControllerAttackInfluence) |
1688              GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG2ControllerDecayInfluence) |              GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG2ControllerDecayInfluence) |
1689              GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG2ControllerReleaseInfluence);              GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG2ControllerReleaseInfluence);
# Line 1737  namespace { Line 1861  namespace {
1861          const uint8_t eg1hold = (EG1Hold) ? 0x80 : 0x00; // bit 7          const uint8_t eg1hold = (EG1Hold) ? 0x80 : 0x00; // bit 7
1862          pData[131] = eg1hold;          pData[131] = eg1hold;
1863    
1864          const uint8_t vcfcutoff = (VCFEnabled) ? 0x80 : 0x00 |  /* bit 7 */          const uint8_t vcfcutoff = (VCFEnabled ? 0x80 : 0x00) |  /* bit 7 */
1865                                    (VCFCutoff & 0x7f);   /* lower 7 bits */                                    (VCFCutoff & 0x7f);   /* lower 7 bits */
1866          pData[132] = vcfcutoff;          pData[132] = vcfcutoff;
1867    
1868          pData[133] = VCFCutoffController;          pData[133] = VCFCutoffController;
1869    
1870          const uint8_t vcfvelscale = (VCFCutoffControllerInvert) ? 0x80 : 0x00 | /* bit 7 */          const uint8_t vcfvelscale = (VCFCutoffControllerInvert ? 0x80 : 0x00) | /* bit 7 */
1871                                      (VCFVelocityScale & 0x7f); /* lower 7 bits */                                      (VCFVelocityScale & 0x7f); /* lower 7 bits */
1872          pData[134] = vcfvelscale;          pData[134] = vcfvelscale;
1873    
1874          // next byte unknown          // next byte unknown
1875    
1876          const uint8_t vcfresonance = (VCFResonanceDynamic) ? 0x00 : 0x80 | /* bit 7 */          const uint8_t vcfresonance = (VCFResonanceDynamic ? 0x00 : 0x80) | /* bit 7 */
1877                                       (VCFResonance & 0x7f); /* lower 7 bits */                                       (VCFResonance & 0x7f); /* lower 7 bits */
1878          pData[136] = vcfresonance;          pData[136] = vcfresonance;
1879    
1880          const uint8_t vcfbreakpoint = (VCFKeyboardTracking) ? 0x80 : 0x00 | /* bit 7 */          const uint8_t vcfbreakpoint = (VCFKeyboardTracking ? 0x80 : 0x00) | /* bit 7 */
1881                                        (VCFKeyboardTrackingBreakpoint & 0x7f); /* lower 7 bits */                                        (VCFKeyboardTrackingBreakpoint & 0x7f); /* lower 7 bits */
1882          pData[137] = vcfbreakpoint;          pData[137] = vcfbreakpoint;
1883    
# Line 1769  namespace { Line 1893  namespace {
1893          }          }
1894      }      }
1895    
1896        double* DimensionRegion::GetReleaseVelocityTable(curve_type_t releaseVelocityResponseCurve, uint8_t releaseVelocityResponseDepth) {
1897            curve_type_t curveType = releaseVelocityResponseCurve;
1898            uint8_t depth = releaseVelocityResponseDepth;
1899            // this models a strange behaviour or bug in GSt: two of the
1900            // velocity response curves for release time are not used even
1901            // if specified, instead another curve is chosen.
1902            if ((curveType == curve_type_nonlinear && depth == 0) ||
1903                (curveType == curve_type_special   && depth == 4)) {
1904                curveType = curve_type_nonlinear;
1905                depth = 3;
1906            }
1907            return GetVelocityTable(curveType, depth, 0);
1908        }
1909    
1910        double* DimensionRegion::GetCutoffVelocityTable(curve_type_t vcfVelocityCurve,
1911                                                        uint8_t vcfVelocityDynamicRange,
1912                                                        uint8_t vcfVelocityScale,
1913                                                        vcf_cutoff_ctrl_t vcfCutoffController)
1914        {
1915            curve_type_t curveType = vcfVelocityCurve;
1916            uint8_t depth = vcfVelocityDynamicRange;
1917            // even stranger GSt: two of the velocity response curves for
1918            // filter cutoff are not used, instead another special curve
1919            // is chosen. This curve is not used anywhere else.
1920            if ((curveType == curve_type_nonlinear && depth == 0) ||
1921                (curveType == curve_type_special   && depth == 4)) {
1922                curveType = curve_type_special;
1923                depth = 5;
1924            }
1925            return GetVelocityTable(curveType, depth,
1926                                    (vcfCutoffController <= vcf_cutoff_ctrl_none2)
1927                                        ? vcfVelocityScale : 0);
1928        }
1929    
1930      // get the corresponding velocity table from the table map or create & calculate that table if it doesn't exist yet      // get the corresponding velocity table from the table map or create & calculate that table if it doesn't exist yet
1931      double* DimensionRegion::GetVelocityTable(curve_type_t curveType, uint8_t depth, uint8_t scaling)      double* DimensionRegion::GetVelocityTable(curve_type_t curveType, uint8_t depth, uint8_t scaling)
1932      {      {
# Line 1784  namespace { Line 1942  namespace {
1942          return table;          return table;
1943      }      }
1944    
1945        Region* DimensionRegion::GetParent() const {
1946            return pRegion;
1947        }
1948    
1949      leverage_ctrl_t DimensionRegion::DecodeLeverageController(_lev_ctrl_t EncodedController) {      leverage_ctrl_t DimensionRegion::DecodeLeverageController(_lev_ctrl_t EncodedController) {
1950          leverage_ctrl_t decodedcontroller;          leverage_ctrl_t decodedcontroller;
1951          switch (EncodedController) {          switch (EncodedController) {
# Line 1991  namespace { Line 2153  namespace {
2153                      default:                      default:
2154                          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");
2155                  }                  }
2156                    break;
2157              default:              default:
2158                  throw gig::Exception("Unknown leverage controller type.");                  throw gig::Exception("Unknown leverage controller type.");
2159          }          }
# Line 2036  namespace { Line 2199  namespace {
2199          return pVelocityCutoffTable[MIDIKeyVelocity];          return pVelocityCutoffTable[MIDIKeyVelocity];
2200      }      }
2201    
2202        /**
2203         * Updates the respective member variable and the lookup table / cache
2204         * that depends on this value.
2205         */
2206        void DimensionRegion::SetVelocityResponseCurve(curve_type_t curve) {
2207            pVelocityAttenuationTable =
2208                GetVelocityTable(
2209                    curve, VelocityResponseDepth, VelocityResponseCurveScaling
2210                );
2211            VelocityResponseCurve = curve;
2212        }
2213    
2214        /**
2215         * Updates the respective member variable and the lookup table / cache
2216         * that depends on this value.
2217         */
2218        void DimensionRegion::SetVelocityResponseDepth(uint8_t depth) {
2219            pVelocityAttenuationTable =
2220                GetVelocityTable(
2221                    VelocityResponseCurve, depth, VelocityResponseCurveScaling
2222                );
2223            VelocityResponseDepth = depth;
2224        }
2225    
2226        /**
2227         * Updates the respective member variable and the lookup table / cache
2228         * that depends on this value.
2229         */
2230        void DimensionRegion::SetVelocityResponseCurveScaling(uint8_t scaling) {
2231            pVelocityAttenuationTable =
2232                GetVelocityTable(
2233                    VelocityResponseCurve, VelocityResponseDepth, scaling
2234                );
2235            VelocityResponseCurveScaling = scaling;
2236        }
2237    
2238        /**
2239         * Updates the respective member variable and the lookup table / cache
2240         * that depends on this value.
2241         */
2242        void DimensionRegion::SetReleaseVelocityResponseCurve(curve_type_t curve) {
2243            pVelocityReleaseTable = GetReleaseVelocityTable(curve, ReleaseVelocityResponseDepth);
2244            ReleaseVelocityResponseCurve = curve;
2245        }
2246    
2247        /**
2248         * Updates the respective member variable and the lookup table / cache
2249         * that depends on this value.
2250         */
2251        void DimensionRegion::SetReleaseVelocityResponseDepth(uint8_t depth) {
2252            pVelocityReleaseTable = GetReleaseVelocityTable(ReleaseVelocityResponseCurve, depth);
2253            ReleaseVelocityResponseDepth = depth;
2254        }
2255    
2256        /**
2257         * Updates the respective member variable and the lookup table / cache
2258         * that depends on this value.
2259         */
2260        void DimensionRegion::SetVCFCutoffController(vcf_cutoff_ctrl_t controller) {
2261            pVelocityCutoffTable = GetCutoffVelocityTable(VCFVelocityCurve, VCFVelocityDynamicRange, VCFVelocityScale, controller);
2262            VCFCutoffController = controller;
2263        }
2264    
2265        /**
2266         * Updates the respective member variable and the lookup table / cache
2267         * that depends on this value.
2268         */
2269        void DimensionRegion::SetVCFVelocityCurve(curve_type_t curve) {
2270            pVelocityCutoffTable = GetCutoffVelocityTable(curve, VCFVelocityDynamicRange, VCFVelocityScale, VCFCutoffController);
2271            VCFVelocityCurve = curve;
2272        }
2273    
2274        /**
2275         * Updates the respective member variable and the lookup table / cache
2276         * that depends on this value.
2277         */
2278        void DimensionRegion::SetVCFVelocityDynamicRange(uint8_t range) {
2279            pVelocityCutoffTable = GetCutoffVelocityTable(VCFVelocityCurve, range, VCFVelocityScale, VCFCutoffController);
2280            VCFVelocityDynamicRange = range;
2281        }
2282    
2283        /**
2284         * Updates the respective member variable and the lookup table / cache
2285         * that depends on this value.
2286         */
2287        void DimensionRegion::SetVCFVelocityScale(uint8_t scaling) {
2288            pVelocityCutoffTable = GetCutoffVelocityTable(VCFVelocityCurve, VCFVelocityDynamicRange, scaling, VCFCutoffController);
2289            VCFVelocityScale = scaling;
2290        }
2291    
2292      double* DimensionRegion::CreateVelocityTable(curve_type_t curveType, uint8_t depth, uint8_t scaling) {      double* DimensionRegion::CreateVelocityTable(curve_type_t curveType, uint8_t depth, uint8_t scaling) {
2293    
2294          // line-segment approximations of the 15 velocity curves          // line-segment approximations of the 15 velocity curves
# Line 2127  namespace { Line 2380  namespace {
2380              for (int i = 0; i < dimensionBits; i++) {              for (int i = 0; i < dimensionBits; i++) {
2381                  dimension_t dimension = static_cast<dimension_t>(_3lnk->ReadUint8());                  dimension_t dimension = static_cast<dimension_t>(_3lnk->ReadUint8());
2382                  uint8_t     bits      = _3lnk->ReadUint8();                  uint8_t     bits      = _3lnk->ReadUint8();
2383                  _3lnk->ReadUint8(); // probably the position of the dimension                  _3lnk->ReadUint8(); // bit position of the dimension (bits[0] + bits[1] + ... + bits[i-1])
2384                  _3lnk->ReadUint8(); // unknown                  _3lnk->ReadUint8(); // (1 << bit position of next dimension) - (1 << bit position of this dimension)
2385                  uint8_t     zones     = _3lnk->ReadUint8(); // new for v3: number of zones doesn't have to be == pow(2,bits)                  uint8_t     zones     = _3lnk->ReadUint8(); // new for v3: number of zones doesn't have to be == pow(2,bits)
2386                  if (dimension == dimension_none) { // inactive dimension                  if (dimension == dimension_none) { // inactive dimension
2387                      pDimensionDefinitions[i].dimension  = dimension_none;                      pDimensionDefinitions[i].dimension  = dimension_none;
# Line 2170  namespace { Line 2423  namespace {
2423              GetSample(); // load global region sample reference              GetSample(); // load global region sample reference
2424          } else {          } else {
2425              DimensionRegions = 0;              DimensionRegions = 0;
2426                for (int i = 0 ; i < 8 ; i++) {
2427                    pDimensionDefinitions[i].dimension  = dimension_none;
2428                    pDimensionDefinitions[i].bits       = 0;
2429                    pDimensionDefinitions[i].zones      = 0;
2430                }
2431          }          }
2432    
2433          // make sure there is at least one dimension region          // make sure there is at least one dimension region
# Line 2177  namespace { Line 2435  namespace {
2435              RIFF::List* _3prg = rgnList->GetSubList(LIST_TYPE_3PRG);              RIFF::List* _3prg = rgnList->GetSubList(LIST_TYPE_3PRG);
2436              if (!_3prg) _3prg = rgnList->AddSubList(LIST_TYPE_3PRG);              if (!_3prg) _3prg = rgnList->AddSubList(LIST_TYPE_3PRG);
2437              RIFF::List* _3ewl = _3prg->AddSubList(LIST_TYPE_3EWL);              RIFF::List* _3ewl = _3prg->AddSubList(LIST_TYPE_3EWL);
2438              pDimensionRegions[0] = new DimensionRegion(_3ewl);              pDimensionRegions[0] = new DimensionRegion(this, _3ewl);
2439              DimensionRegions = 1;              DimensionRegions = 1;
2440          }          }
2441      }      }
# Line 2207  namespace { Line 2465  namespace {
2465          }          }
2466    
2467          File* pFile = (File*) GetParent()->GetParent();          File* pFile = (File*) GetParent()->GetParent();
2468          const int iMaxDimensions = (pFile->pVersion && pFile->pVersion->major == 3) ? 8 : 5;          bool version3 = pFile->pVersion && pFile->pVersion->major == 3;
2469          const int iMaxDimensionRegions = (pFile->pVersion && pFile->pVersion->major == 3) ? 256 : 32;          const int iMaxDimensions =  version3 ? 8 : 5;
2470            const int iMaxDimensionRegions = version3 ? 256 : 32;
2471    
2472          // make sure '3lnk' chunk exists          // make sure '3lnk' chunk exists
2473          RIFF::Chunk* _3lnk = pCkRegion->GetSubChunk(CHUNK_ID_3LNK);          RIFF::Chunk* _3lnk = pCkRegion->GetSubChunk(CHUNK_ID_3LNK);
2474          if (!_3lnk) {          if (!_3lnk) {
2475              const int _3lnkChunkSize = (pFile->pVersion && pFile->pVersion->major == 3) ? 1092 : 172;              const int _3lnkChunkSize = version3 ? 1092 : 172;
2476              _3lnk = pCkRegion->AddSubChunk(CHUNK_ID_3LNK, _3lnkChunkSize);              _3lnk = pCkRegion->AddSubChunk(CHUNK_ID_3LNK, _3lnkChunkSize);
2477                memset(_3lnk->LoadChunkData(), 0, _3lnkChunkSize);
2478    
2479                // move 3prg to last position
2480                pCkRegion->MoveSubChunk(pCkRegion->GetSubList(LIST_TYPE_3PRG), 0);
2481          }          }
2482    
2483          // update dimension definitions in '3lnk' chunk          // update dimension definitions in '3lnk' chunk
2484          uint8_t* pData = (uint8_t*) _3lnk->LoadChunkData();          uint8_t* pData = (uint8_t*) _3lnk->LoadChunkData();
2485          store32(&pData[0], DimensionRegions);          store32(&pData[0], DimensionRegions);
2486            int shift = 0;
2487          for (int i = 0; i < iMaxDimensions; i++) {          for (int i = 0; i < iMaxDimensions; i++) {
2488              pData[4 + i * 8] = (uint8_t) pDimensionDefinitions[i].dimension;              pData[4 + i * 8] = (uint8_t) pDimensionDefinitions[i].dimension;
2489              pData[5 + i * 8] = pDimensionDefinitions[i].bits;              pData[5 + i * 8] = pDimensionDefinitions[i].bits;
2490              // next 2 bytes unknown              pData[6 + i * 8] = pDimensionDefinitions[i].dimension == dimension_none ? 0 : shift;
2491                pData[7 + i * 8] = (1 << (shift + pDimensionDefinitions[i].bits)) - (1 << shift);
2492              pData[8 + i * 8] = pDimensionDefinitions[i].zones;              pData[8 + i * 8] = pDimensionDefinitions[i].zones;
2493              // next 3 bytes unknown              // next 3 bytes unknown, always zero?
2494    
2495                shift += pDimensionDefinitions[i].bits;
2496          }          }
2497    
2498          // update wave pool table in '3lnk' chunk          // update wave pool table in '3lnk' chunk
2499          const int iWavePoolOffset = (pFile->pVersion && pFile->pVersion->major == 3) ? 68 : 44;          const int iWavePoolOffset = version3 ? 68 : 44;
2500          for (uint i = 0; i < iMaxDimensionRegions; i++) {          for (uint i = 0; i < iMaxDimensionRegions; i++) {
2501              int iWaveIndex = -1;              int iWaveIndex = -1;
2502              if (i < DimensionRegions) {              if (i < DimensionRegions) {
# Line 2242  namespace { Line 2509  namespace {
2509                          break;                          break;
2510                      }                      }
2511                  }                  }
                 if (iWaveIndex < 0) throw gig::Exception("Could not update gig::Region, could not find DimensionRegion's sample");  
2512              }              }
2513              store32(&pData[iWavePoolOffset + i * 4], iWaveIndex);              store32(&pData[iWavePoolOffset + i * 4], iWaveIndex);
2514          }          }
# Line 2255  namespace { Line 2521  namespace {
2521              RIFF::List* _3ewl = _3prg->GetFirstSubList();              RIFF::List* _3ewl = _3prg->GetFirstSubList();
2522              while (_3ewl) {              while (_3ewl) {
2523                  if (_3ewl->GetListType() == LIST_TYPE_3EWL) {                  if (_3ewl->GetListType() == LIST_TYPE_3EWL) {
2524                      pDimensionRegions[dimensionRegionNr] = new DimensionRegion(_3ewl);                      pDimensionRegions[dimensionRegionNr] = new DimensionRegion(this, _3ewl);
2525                      dimensionRegionNr++;                      dimensionRegionNr++;
2526                  }                  }
2527                  _3ewl = _3prg->GetNextSubList();                  _3ewl = _3prg->GetNextSubList();
# Line 2264  namespace { Line 2530  namespace {
2530          }          }
2531      }      }
2532    
2533        void Region::SetKeyRange(uint16_t Low, uint16_t High) {
2534            // update KeyRange struct and make sure regions are in correct order
2535            DLS::Region::SetKeyRange(Low, High);
2536            // update Region key table for fast lookup
2537            ((gig::Instrument*)GetParent())->UpdateRegionKeyTable();
2538        }
2539    
2540      void Region::UpdateVelocityTable() {      void Region::UpdateVelocityTable() {
2541          // get velocity dimension's index          // get velocity dimension's index
2542          int veldim = -1;          int veldim = -1;
# Line 2369  namespace { Line 2642  namespace {
2642              if (pDimensionDefinitions[i].dimension == pDimDef->dimension)              if (pDimensionDefinitions[i].dimension == pDimDef->dimension)
2643                  throw gig::Exception("Could not add new dimension, there is already a dimension of the same type");                  throw gig::Exception("Could not add new dimension, there is already a dimension of the same type");
2644    
2645            // pos is where the new dimension should be placed, normally
2646            // last in list, except for the samplechannel dimension which
2647            // has to be first in list
2648            int pos = pDimDef->dimension == dimension_samplechannel ? 0 : Dimensions;
2649            int bitpos = 0;
2650            for (int i = 0 ; i < pos ; i++)
2651                bitpos += pDimensionDefinitions[i].bits;
2652    
2653            // make room for the new dimension
2654            for (int i = Dimensions ; i > pos ; i--) pDimensionDefinitions[i] = pDimensionDefinitions[i - 1];
2655            for (int i = 0 ; i < (1 << iCurrentBits) ; i++) {
2656                for (int j = Dimensions ; j > pos ; j--) {
2657                    pDimensionRegions[i]->DimensionUpperLimits[j] =
2658                        pDimensionRegions[i]->DimensionUpperLimits[j - 1];
2659                }
2660            }
2661    
2662          // assign definition of new dimension          // assign definition of new dimension
2663          pDimensionDefinitions[Dimensions] = *pDimDef;          pDimensionDefinitions[pos] = *pDimDef;
2664    
2665          // auto correct certain dimension definition fields (where possible)          // auto correct certain dimension definition fields (where possible)
2666          pDimensionDefinitions[Dimensions].split_type  =          pDimensionDefinitions[pos].split_type  =
2667              __resolveSplitType(pDimensionDefinitions[Dimensions].dimension);              __resolveSplitType(pDimensionDefinitions[pos].dimension);
2668          pDimensionDefinitions[Dimensions].zone_size =          pDimensionDefinitions[pos].zone_size =
2669              __resolveZoneSize(pDimensionDefinitions[Dimensions]);              __resolveZoneSize(pDimensionDefinitions[pos]);
2670    
2671          // create new dimension region(s) for this new dimension          // create new dimension region(s) for this new dimension, and make
2672          for (int i = 1 << iCurrentBits; i < 1 << iNewBits; i++) {          // sure that the dimension regions are placed correctly in both the
2673              //TODO: maybe we should copy existing dimension regions if possible instead of simply creating new ones with default values          // RIFF list and the pDimensionRegions array
2674              RIFF::List* pNewDimRgnListChunk = pCkRegion->AddSubList(LIST_TYPE_3EWL);          RIFF::Chunk* moveTo = NULL;
2675              pDimensionRegions[i] = new DimensionRegion(pNewDimRgnListChunk);          RIFF::List* _3prg = pCkRegion->GetSubList(LIST_TYPE_3PRG);
2676              DimensionRegions++;          for (int i = (1 << iCurrentBits) - (1 << bitpos) ; i >= 0 ; i -= (1 << bitpos)) {
2677                for (int k = 0 ; k < (1 << bitpos) ; k++) {
2678                    pDimensionRegions[(i << pDimDef->bits) + k] = pDimensionRegions[i + k];
2679                }
2680                for (int j = 1 ; j < (1 << pDimDef->bits) ; j++) {
2681                    for (int k = 0 ; k < (1 << bitpos) ; k++) {
2682                        RIFF::List* pNewDimRgnListChunk = _3prg->AddSubList(LIST_TYPE_3EWL);
2683                        if (moveTo) _3prg->MoveSubChunk(pNewDimRgnListChunk, moveTo);
2684                        // create a new dimension region and copy all parameter values from
2685                        // an existing dimension region
2686                        pDimensionRegions[(i << pDimDef->bits) + (j << bitpos) + k] =
2687                            new DimensionRegion(pNewDimRgnListChunk, *pDimensionRegions[i + k]);
2688    
2689                        DimensionRegions++;
2690                    }
2691                }
2692                moveTo = pDimensionRegions[i]->pParentList;
2693            }
2694    
2695            // initialize the upper limits for this dimension
2696            int mask = (1 << bitpos) - 1;
2697            for (int z = 0 ; z < pDimDef->zones ; z++) {
2698                uint8_t upperLimit = uint8_t((z + 1) * 128.0 / pDimDef->zones - 1);
2699                for (int i = 0 ; i < 1 << iCurrentBits ; i++) {
2700                    pDimensionRegions[((i & ~mask) << pDimDef->bits) |
2701                                      (z << bitpos) |
2702                                      (i & mask)]->DimensionUpperLimits[pos] = upperLimit;
2703                }
2704          }          }
2705    
2706          Dimensions++;          Dimensions++;
# Line 2426  namespace { Line 2743  namespace {
2743          for (int i = iDimensionNr + 1; i < Dimensions; i++)          for (int i = iDimensionNr + 1; i < Dimensions; i++)
2744              iUpperBits += pDimensionDefinitions[i].bits;              iUpperBits += pDimensionDefinitions[i].bits;
2745    
2746            RIFF::List* _3prg = pCkRegion->GetSubList(LIST_TYPE_3PRG);
2747    
2748          // delete dimension regions which belong to the given dimension          // delete dimension regions which belong to the given dimension
2749          // (that is where the dimension's bit > 0)          // (that is where the dimension's bit > 0)
2750          for (int iUpperBit = 0; iUpperBit < 1 << iUpperBits; iUpperBit++) {          for (int iUpperBit = 0; iUpperBit < 1 << iUpperBits; iUpperBit++) {
# Line 2434  namespace { Line 2753  namespace {
2753                      int iToDelete = iUpperBit    << (pDimensionDefinitions[iDimensionNr].bits + iLowerBits) |                      int iToDelete = iUpperBit    << (pDimensionDefinitions[iDimensionNr].bits + iLowerBits) |
2754                                      iObsoleteBit << iLowerBits |                                      iObsoleteBit << iLowerBits |
2755                                      iLowerBit;                                      iLowerBit;
2756    
2757                        _3prg->DeleteSubChunk(pDimensionRegions[iToDelete]->pParentList);
2758                      delete pDimensionRegions[iToDelete];                      delete pDimensionRegions[iToDelete];
2759                      pDimensionRegions[iToDelete] = NULL;                      pDimensionRegions[iToDelete] = NULL;
2760                      DimensionRegions--;                      DimensionRegions--;
# Line 2454  namespace { Line 2775  namespace {
2775              }              }
2776          }          }
2777    
2778            // remove the this dimension from the upper limits arrays
2779            for (int j = 0 ; j < 256 && pDimensionRegions[j] ; j++) {
2780                DimensionRegion* d = pDimensionRegions[j];
2781                for (int i = iDimensionNr + 1; i < Dimensions; i++) {
2782                    d->DimensionUpperLimits[i - 1] = d->DimensionUpperLimits[i];
2783                }
2784                d->DimensionUpperLimits[Dimensions - 1] = 127;
2785            }
2786    
2787          // 'remove' dimension definition          // 'remove' dimension definition
2788          for (int i = iDimensionNr + 1; i < Dimensions; i++) {          for (int i = iDimensionNr + 1; i < Dimensions; i++) {
2789              pDimensionDefinitions[i - 1] = pDimensionDefinitions[i];              pDimensionDefinitions[i - 1] = pDimensionDefinitions[i];
# Line 2603  namespace { Line 2933  namespace {
2933    
2934          // Initialization          // Initialization
2935          for (int i = 0; i < 128; i++) RegionKeyTable[i] = NULL;          for (int i = 0; i < 128; i++) RegionKeyTable[i] = NULL;
2936            EffectSend = 0;
2937            Attenuation = 0;
2938            FineTune = 0;
2939            PitchbendRange = 0;
2940            PianoReleaseMode = false;
2941            DimensionKeyRange.low = 0;
2942            DimensionKeyRange.high = 0;
2943    
2944          // Loading          // Loading
2945          RIFF::List* lart = insList->GetSubList(LIST_TYPE_LART);          RIFF::List* lart = insList->GetSubList(LIST_TYPE_LART);
# Line 2639  namespace { Line 2976  namespace {
2976      }      }
2977    
2978      void Instrument::UpdateRegionKeyTable() {      void Instrument::UpdateRegionKeyTable() {
2979            for (int i = 0; i < 128; i++) RegionKeyTable[i] = NULL;
2980          RegionList::iterator iter = pRegions->begin();          RegionList::iterator iter = pRegions->begin();
2981          RegionList::iterator end  = pRegions->end();          RegionList::iterator end  = pRegions->end();
2982          for (; iter != end; ++iter) {          for (; iter != end; ++iter) {
# Line 2678  namespace { Line 3016  namespace {
3016          if (!lart)  lart = pCkInstrument->AddSubList(LIST_TYPE_LART);          if (!lart)  lart = pCkInstrument->AddSubList(LIST_TYPE_LART);
3017          // make sure '3ewg' RIFF chunk exists          // make sure '3ewg' RIFF chunk exists
3018          RIFF::Chunk* _3ewg = lart->GetSubChunk(CHUNK_ID_3EWG);          RIFF::Chunk* _3ewg = lart->GetSubChunk(CHUNK_ID_3EWG);
3019          if (!_3ewg)  _3ewg = lart->AddSubChunk(CHUNK_ID_3EWG, 12);          if (!_3ewg)  {
3020                File* pFile = (File*) GetParent();
3021    
3022                // 3ewg is bigger in gig3, as it includes the iMIDI rules
3023                int size = (pFile->pVersion && pFile->pVersion->major == 3) ? 16416 : 12;
3024                _3ewg = lart->AddSubChunk(CHUNK_ID_3EWG, size);
3025                memset(_3ewg->LoadChunkData(), 0, size);
3026            }
3027          // update '3ewg' RIFF chunk          // update '3ewg' RIFF chunk
3028          uint8_t* pData = (uint8_t*) _3ewg->LoadChunkData();          uint8_t* pData = (uint8_t*) _3ewg->LoadChunkData();
3029          store16(&pData[0], EffectSend);          store16(&pData[0], EffectSend);
3030          store32(&pData[2], Attenuation);          store32(&pData[2], Attenuation);
3031          store16(&pData[6], FineTune);          store16(&pData[6], FineTune);
3032          store16(&pData[8], PitchbendRange);          store16(&pData[8], PitchbendRange);
3033          const uint8_t dimkeystart = (PianoReleaseMode) ? 0x01 : 0x00 |          const uint8_t dimkeystart = (PianoReleaseMode ? 0x01 : 0x00) |
3034                                      DimensionKeyRange.low << 1;                                      DimensionKeyRange.low << 1;
3035          pData[10] = dimkeystart;          pData[10] = dimkeystart;
3036          pData[11] = DimensionKeyRange.high;          pData[11] = DimensionKeyRange.high;
# Line 2699  namespace { Line 3044  namespace {
3044       *             there is no Region defined for the given \a Key       *             there is no Region defined for the given \a Key
3045       */       */
3046      Region* Instrument::GetRegion(unsigned int Key) {      Region* Instrument::GetRegion(unsigned int Key) {
3047          if (!pRegions || !pRegions->size() || Key > 127) return NULL;          if (!pRegions || pRegions->empty() || Key > 127) return NULL;
3048          return RegionKeyTable[Key];          return RegionKeyTable[Key];
3049    
3050          /*for (int i = 0; i < Regions; i++) {          /*for (int i = 0; i < Regions; i++) {
# Line 2790  namespace { Line 3135  namespace {
3135      void Group::UpdateChunks() {      void Group::UpdateChunks() {
3136          // make sure <3gri> and <3gnl> list chunks exist          // make sure <3gri> and <3gnl> list chunks exist
3137          RIFF::List* _3gri = pFile->pRIFF->GetSubList(LIST_TYPE_3GRI);          RIFF::List* _3gri = pFile->pRIFF->GetSubList(LIST_TYPE_3GRI);
3138          if (!_3gri) _3gri = pFile->pRIFF->AddSubList(LIST_TYPE_3GRI);          if (!_3gri) {
3139                _3gri = pFile->pRIFF->AddSubList(LIST_TYPE_3GRI);
3140                pFile->pRIFF->MoveSubChunk(_3gri, pFile->pRIFF->GetSubChunk(CHUNK_ID_PTBL));
3141            }
3142          RIFF::List* _3gnl = _3gri->GetSubList(LIST_TYPE_3GNL);          RIFF::List* _3gnl = _3gri->GetSubList(LIST_TYPE_3GNL);
3143          if (!_3gnl) _3gnl = pFile->pRIFF->AddSubList(LIST_TYPE_3GNL);          if (!_3gnl) _3gnl = _3gri->AddSubList(LIST_TYPE_3GNL);
3144    
3145            if (!pNameChunk && pFile->pVersion && pFile->pVersion->major == 3) {
3146                // v3 has a fixed list of 128 strings, find a free one
3147                for (RIFF::Chunk* ck = _3gnl->GetFirstSubChunk() ; ck ; ck = _3gnl->GetNextSubChunk()) {
3148                    if (strcmp(static_cast<char*>(ck->LoadChunkData()), "") == 0) {
3149                        pNameChunk = ck;
3150                        break;
3151                    }
3152                }
3153            }
3154    
3155          // now store the name of this group as <3gnm> chunk as subchunk of the <3gnl> list chunk          // now store the name of this group as <3gnm> chunk as subchunk of the <3gnl> list chunk
3156          ::SaveString(CHUNK_ID_3GNM, pNameChunk, _3gnl, Name, String("Unnamed Group"), true, 64);          ::SaveString(CHUNK_ID_3GNM, pNameChunk, _3gnl, Name, String("Unnamed Group"), true, 64);
3157      }      }
# Line 2868  namespace { Line 3227  namespace {
3227  // *************** File ***************  // *************** File ***************
3228  // *  // *
3229    
3230        /// Reflects Gigasampler file format version 2.0 (1998-06-28).
3231        const DLS::version_t File::VERSION_2 = {
3232            0, 2, 19980628 & 0xffff, 19980628 >> 16
3233        };
3234    
3235        /// Reflects Gigasampler file format version 3.0 (2003-03-31).
3236        const DLS::version_t File::VERSION_3 = {
3237            0, 3, 20030331 & 0xffff, 20030331 >> 16
3238        };
3239    
3240      const DLS::Info::FixedStringLength File::FixedStringLengths[] = {      const DLS::Info::FixedStringLength File::FixedStringLengths[] = {
3241          { CHUNK_ID_IARL, 256 },          { CHUNK_ID_IARL, 256 },
3242          { CHUNK_ID_IART, 128 },          { CHUNK_ID_IART, 128 },
# Line 2890  namespace { Line 3259  namespace {
3259      };      };
3260    
3261      File::File() : DLS::File() {      File::File() : DLS::File() {
3262            *pVersion = VERSION_3;
3263          pGroups = NULL;          pGroups = NULL;
3264          pInfo->FixedStringLengths = FixedStringLengths;          pInfo->FixedStringLengths = FixedStringLengths;
3265            pInfo->ArchivalLocation = String(256, ' ');
3266    
3267            // add some mandatory chunks to get the file chunks in right
3268            // order (INFO chunk will be moved to first position later)
3269            pRIFF->AddSubChunk(CHUNK_ID_VERS, 8);
3270            pRIFF->AddSubChunk(CHUNK_ID_COLH, 4);
3271            pRIFF->AddSubChunk(CHUNK_ID_DLID, 16);
3272    
3273            GenerateDLSID();
3274      }      }
3275    
3276      File::File(RIFF::File* pRIFF) : DLS::File(pRIFF) {      File::File(RIFF::File* pRIFF) : DLS::File(pRIFF) {
# Line 2938  namespace { Line 3317  namespace {
3317         // create new Sample object and its respective 'wave' list chunk         // create new Sample object and its respective 'wave' list chunk
3318         RIFF::List* wave = wvpl->AddSubList(LIST_TYPE_WAVE);         RIFF::List* wave = wvpl->AddSubList(LIST_TYPE_WAVE);
3319         Sample* pSample = new Sample(this, wave, 0 /*arbitrary value, we update offsets when we save*/);         Sample* pSample = new Sample(this, wave, 0 /*arbitrary value, we update offsets when we save*/);
3320    
3321           // add mandatory chunks to get the chunks in right order
3322           wave->AddSubChunk(CHUNK_ID_FMT, 16);
3323           wave->AddSubList(LIST_TYPE_INFO);
3324    
3325         pSamples->push_back(pSample);         pSamples->push_back(pSample);
3326         return pSample;         return pSample;
3327      }      }
3328    
3329      /** @brief Delete a sample.      /** @brief Delete a sample.
3330       *       *
3331       * This will delete the given Sample object from the gig file. You have       * This will delete the given Sample object from the gig file. Any
3332       * to call Save() to make this persistent to the file.       * references to this sample from Regions and DimensionRegions will be
3333         * removed. You have to call Save() to make this persistent to the file.
3334       *       *
3335       * @param pSample - sample to delete       * @param pSample - sample to delete
3336       * @throws gig::Exception if given sample could not be found       * @throws gig::Exception if given sample could not be found
# Line 2957  namespace { Line 3342  namespace {
3342          if (SamplesIterator != pSamples->end() && *SamplesIterator == pSample) ++SamplesIterator; // avoid iterator invalidation          if (SamplesIterator != pSamples->end() && *SamplesIterator == pSample) ++SamplesIterator; // avoid iterator invalidation
3343          pSamples->erase(iter);          pSamples->erase(iter);
3344          delete pSample;          delete pSample;
3345    
3346            // remove all references to the sample
3347            for (Instrument* instrument = GetFirstInstrument() ; instrument ;
3348                 instrument = GetNextInstrument()) {
3349                for (Region* region = instrument->GetFirstRegion() ; region ;
3350                     region = instrument->GetNextRegion()) {
3351    
3352                    if (region->GetSample() == pSample) region->SetSample(NULL);
3353    
3354                    for (int i = 0 ; i < region->DimensionRegions ; i++) {
3355                        gig::DimensionRegion *d = region->pDimensionRegions[i];
3356                        if (d->pSample == pSample) d->pSample = NULL;
3357                    }
3358                }
3359            }
3360      }      }
3361    
3362      void File::LoadSamples() {      void File::LoadSamples() {
# Line 3080  namespace { Line 3480  namespace {
3480         __ensureMandatoryChunksExist();         __ensureMandatoryChunksExist();
3481         RIFF::List* lstInstruments = pRIFF->GetSubList(LIST_TYPE_LINS);         RIFF::List* lstInstruments = pRIFF->GetSubList(LIST_TYPE_LINS);
3482         RIFF::List* lstInstr = lstInstruments->AddSubList(LIST_TYPE_INS);         RIFF::List* lstInstr = lstInstruments->AddSubList(LIST_TYPE_INS);
3483    
3484           // add mandatory chunks to get the chunks in right order
3485           lstInstr->AddSubList(LIST_TYPE_INFO);
3486           lstInstr->AddSubChunk(CHUNK_ID_DLID, 16);
3487    
3488         Instrument* pInstrument = new Instrument(this, lstInstr);         Instrument* pInstrument = new Instrument(this, lstInstr);
3489           pInstrument->GenerateDLSID();
3490    
3491           lstInstr->AddSubChunk(CHUNK_ID_INSH, 12);
3492    
3493           // this string is needed for the gig to be loadable in GSt:
3494           pInstrument->pInfo->Software = "Endless Wave";
3495    
3496         pInstruments->push_back(pInstrument);         pInstruments->push_back(pInstrument);
3497         return pInstrument;         return pInstrument;
3498      }      }
# Line 3131  namespace { Line 3543  namespace {
3543          }          }
3544      }      }
3545    
3546        /// Updates the 3crc chunk with the checksum of a sample. The
3547        /// update is done directly to disk, as this method is called
3548        /// after File::Save()
3549        void File::SetSampleChecksum(Sample* pSample, uint32_t crc) {
3550            RIFF::Chunk* _3crc = pRIFF->GetSubChunk(CHUNK_ID_3CRC);
3551            if (!_3crc) return;
3552    
3553            // get the index of the sample
3554            int iWaveIndex = -1;
3555            File::SampleList::iterator iter = pSamples->begin();
3556            File::SampleList::iterator end  = pSamples->end();
3557            for (int index = 0; iter != end; ++iter, ++index) {
3558                if (*iter == pSample) {
3559                    iWaveIndex = index;
3560                    break;
3561                }
3562            }
3563            if (iWaveIndex < 0) throw gig::Exception("Could not update crc, could not find sample");
3564    
3565            // write the CRC-32 checksum to disk
3566            _3crc->SetPos(iWaveIndex * 8);
3567            uint32_t tmp = 1;
3568            _3crc->WriteUint32(&tmp); // unknown, always 1?
3569            _3crc->WriteUint32(&crc);
3570        }
3571    
3572      Group* File::GetFirstGroup() {      Group* File::GetFirstGroup() {
3573          if (!pGroups) LoadGroups();          if (!pGroups) LoadGroups();
3574          // there must always be at least one group          // there must always be at least one group
# Line 3223  namespace { Line 3661  namespace {
3661                  RIFF::Chunk* ck = lst3gnl->GetFirstSubChunk();                  RIFF::Chunk* ck = lst3gnl->GetFirstSubChunk();
3662                  while (ck) {                  while (ck) {
3663                      if (ck->GetChunkID() == CHUNK_ID_3GNM) {                      if (ck->GetChunkID() == CHUNK_ID_3GNM) {
3664                            if (pVersion && pVersion->major == 3 &&
3665                                strcmp(static_cast<char*>(ck->LoadChunkData()), "") == 0) break;
3666    
3667                          pGroups->push_back(new Group(this, ck));                          pGroups->push_back(new Group(this, ck));
3668                      }                      }
3669                      ck = lst3gnl->GetNextSubChunk();                      ck = lst3gnl->GetNextSubChunk();
# Line 3248  namespace { Line 3689  namespace {
3689       * @throws Exception - on errors       * @throws Exception - on errors
3690       */       */
3691      void File::UpdateChunks() {      void File::UpdateChunks() {
3692            bool newFile = pRIFF->GetSubList(LIST_TYPE_INFO) == NULL;
3693    
3694            b64BitWavePoolOffsets = pVersion && pVersion->major == 3;
3695    
3696          // first update base class's chunks          // first update base class's chunks
3697          DLS::File::UpdateChunks();          DLS::File::UpdateChunks();
3698    
3699            if (newFile) {
3700                // INFO was added by Resource::UpdateChunks - make sure it
3701                // is placed first in file
3702                RIFF::Chunk* info = pRIFF->GetSubList(LIST_TYPE_INFO);
3703                RIFF::Chunk* first = pRIFF->GetFirstSubChunk();
3704                if (first != info) {
3705                    pRIFF->MoveSubChunk(info, first);
3706                }
3707            }
3708    
3709          // update group's chunks          // update group's chunks
3710          if (pGroups) {          if (pGroups) {
3711              std::list<Group*>::iterator iter = pGroups->begin();              std::list<Group*>::iterator iter = pGroups->begin();
# Line 3258  namespace { Line 3713  namespace {
3713              for (; iter != end; ++iter) {              for (; iter != end; ++iter) {
3714                  (*iter)->UpdateChunks();                  (*iter)->UpdateChunks();
3715              }              }
3716    
3717                // v3: make sure the file has 128 3gnm chunks
3718                if (pVersion && pVersion->major == 3) {
3719                    RIFF::List* _3gnl = pRIFF->GetSubList(LIST_TYPE_3GRI)->GetSubList(LIST_TYPE_3GNL);
3720                    RIFF::Chunk* _3gnm = _3gnl->GetFirstSubChunk();
3721                    for (int i = 0 ; i < 128 ; i++) {
3722                        if (i >= pGroups->size()) ::SaveString(CHUNK_ID_3GNM, _3gnm, _3gnl, "", "", true, 64);
3723                        if (_3gnm) _3gnm = _3gnl->GetNextSubChunk();
3724                    }
3725                }
3726            }
3727    
3728            // update einf chunk
3729    
3730            // The einf chunk contains statistics about the gig file, such
3731            // as the number of regions and samples used by each
3732            // instrument. It is divided in equally sized parts, where the
3733            // first part contains information about the whole gig file,
3734            // and the rest of the parts map to each instrument in the
3735            // file.
3736            //
3737            // At the end of each part there is a bit map of each sample
3738            // in the file, where a set bit means that the sample is used
3739            // by the file/instrument.
3740            //
3741            // Note that there are several fields with unknown use. These
3742            // are set to zero.
3743    
3744            int sublen = pSamples->size() / 8 + 49;
3745            int einfSize = (Instruments + 1) * sublen;
3746    
3747            RIFF::Chunk* einf = pRIFF->GetSubChunk(CHUNK_ID_EINF);
3748            if (einf) {
3749                if (einf->GetSize() != einfSize) {
3750                    einf->Resize(einfSize);
3751                    memset(einf->LoadChunkData(), 0, einfSize);
3752                }
3753            } else if (newFile) {
3754                einf = pRIFF->AddSubChunk(CHUNK_ID_EINF, einfSize);
3755            }
3756            if (einf) {
3757                uint8_t* pData = (uint8_t*) einf->LoadChunkData();
3758    
3759                std::map<gig::Sample*,int> sampleMap;
3760                int sampleIdx = 0;
3761                for (Sample* pSample = GetFirstSample(); pSample; pSample = GetNextSample()) {
3762                    sampleMap[pSample] = sampleIdx++;
3763                }
3764    
3765                int totnbusedsamples = 0;
3766                int totnbusedchannels = 0;
3767                int totnbregions = 0;
3768                int totnbdimregions = 0;
3769                int totnbloops = 0;
3770                int instrumentIdx = 0;
3771    
3772                memset(&pData[48], 0, sublen - 48);
3773    
3774                for (Instrument* instrument = GetFirstInstrument() ; instrument ;
3775                     instrument = GetNextInstrument()) {
3776                    int nbusedsamples = 0;
3777                    int nbusedchannels = 0;
3778                    int nbdimregions = 0;
3779                    int nbloops = 0;
3780    
3781                    memset(&pData[(instrumentIdx + 1) * sublen + 48], 0, sublen - 48);
3782    
3783                    for (Region* region = instrument->GetFirstRegion() ; region ;
3784                         region = instrument->GetNextRegion()) {
3785                        for (int i = 0 ; i < region->DimensionRegions ; i++) {
3786                            gig::DimensionRegion *d = region->pDimensionRegions[i];
3787                            if (d->pSample) {
3788                                int sampleIdx = sampleMap[d->pSample];
3789                                int byte = 48 + sampleIdx / 8;
3790                                int bit = 1 << (sampleIdx & 7);
3791                                if ((pData[(instrumentIdx + 1) * sublen + byte] & bit) == 0) {
3792                                    pData[(instrumentIdx + 1) * sublen + byte] |= bit;
3793                                    nbusedsamples++;
3794                                    nbusedchannels += d->pSample->Channels;
3795    
3796                                    if ((pData[byte] & bit) == 0) {
3797                                        pData[byte] |= bit;
3798                                        totnbusedsamples++;
3799                                        totnbusedchannels += d->pSample->Channels;
3800                                    }
3801                                }
3802                            }
3803                            if (d->SampleLoops) nbloops++;
3804                        }
3805                        nbdimregions += region->DimensionRegions;
3806                    }
3807                    // first 4 bytes unknown - sometimes 0, sometimes length of einf part
3808                    // store32(&pData[(instrumentIdx + 1) * sublen], sublen);
3809                    store32(&pData[(instrumentIdx + 1) * sublen + 4], nbusedchannels);
3810                    store32(&pData[(instrumentIdx + 1) * sublen + 8], nbusedsamples);
3811                    store32(&pData[(instrumentIdx + 1) * sublen + 12], 1);
3812                    store32(&pData[(instrumentIdx + 1) * sublen + 16], instrument->Regions);
3813                    store32(&pData[(instrumentIdx + 1) * sublen + 20], nbdimregions);
3814                    store32(&pData[(instrumentIdx + 1) * sublen + 24], nbloops);
3815                    // next 8 bytes unknown
3816                    store32(&pData[(instrumentIdx + 1) * sublen + 36], instrumentIdx);
3817                    store32(&pData[(instrumentIdx + 1) * sublen + 40], pSamples->size());
3818                    // next 4 bytes unknown
3819    
3820                    totnbregions += instrument->Regions;
3821                    totnbdimregions += nbdimregions;
3822                    totnbloops += nbloops;
3823                    instrumentIdx++;
3824                }
3825                // first 4 bytes unknown - sometimes 0, sometimes length of einf part
3826                // store32(&pData[0], sublen);
3827                store32(&pData[4], totnbusedchannels);
3828                store32(&pData[8], totnbusedsamples);
3829                store32(&pData[12], Instruments);
3830                store32(&pData[16], totnbregions);
3831                store32(&pData[20], totnbdimregions);
3832                store32(&pData[24], totnbloops);
3833                // next 8 bytes unknown
3834                // next 4 bytes unknown, not always 0
3835                store32(&pData[40], pSamples->size());
3836                // next 4 bytes unknown
3837            }
3838    
3839            // update 3crc chunk
3840    
3841            // The 3crc chunk contains CRC-32 checksums for the
3842            // samples. The actual checksum values will be filled in
3843            // later, by Sample::Write.
3844    
3845            RIFF::Chunk* _3crc = pRIFF->GetSubChunk(CHUNK_ID_3CRC);
3846            if (_3crc) {
3847                _3crc->Resize(pSamples->size() * 8);
3848            } else if (newFile) {
3849                _3crc = pRIFF->AddSubChunk(CHUNK_ID_3CRC, pSamples->size() * 8);
3850                _3crc->LoadChunkData();
3851    
3852                // the order of einf and 3crc is not the same in v2 and v3
3853                if (einf && pVersion && pVersion->major == 3) pRIFF->MoveSubChunk(_3crc, einf);
3854          }          }
3855      }      }
3856    

Legend:
Removed from v.1180  
changed lines
  Added in v.1384

  ViewVC Help
Powered by ViewVC