/[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 1179 by persson, Sat May 12 11:25:04 2007 UTC revision 1317 by persson, Sat Sep 1 07:15:53 2007 UTC
# Line 278  namespace { Line 278  namespace {
278    
279    
280    
281    // *************** CRC ***************
282    // *
283    
284        const uint32_t* CRC::table(initTable());
285    
286        uint32_t* CRC::initTable() {
287            uint32_t* res = new uint32_t[256];
288    
289            for (int i = 0 ; i < 256 ; i++) {
290                uint32_t c = i;
291                for (int j = 0 ; j < 8 ; j++) {
292                    c = (c & 1) ? 0xedb88320 ^ (c >> 1) : c >> 1;
293                }
294                res[i] = c;
295            }
296            return res;
297        }
298    
299    
300    
301  // *************** Sample ***************  // *************** Sample ***************
302  // *  // *
303    
# Line 303  namespace { Line 323  namespace {
323       *                         is located, 0 otherwise       *                         is located, 0 otherwise
324       */       */
325      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, unsigned long WavePoolOffset, unsigned long fileNo) : DLS::Sample((DLS::File*) pFile, waveList, WavePoolOffset) {
326          pInfo->UseFixedLengthStrings = true;          static const DLS::Info::FixedStringLength fixedStringLengths[] = {
327                { CHUNK_ID_INAM, 64 },
328                { 0, 0 }
329            };
330            pInfo->FixedStringLengths = fixedStringLengths;
331          Instances++;          Instances++;
332          FileNo = fileNo;          FileNo = fileNo;
333    
# Line 338  namespace { Line 362  namespace {
362              Manufacturer  = 0;              Manufacturer  = 0;
363              Product       = 0;              Product       = 0;
364              SamplePeriod  = uint32_t(1000000000.0 / SamplesPerSecond + 0.5);              SamplePeriod  = uint32_t(1000000000.0 / SamplesPerSecond + 0.5);
365              MIDIUnityNote = 64;              MIDIUnityNote = 60;
366              FineTune      = 0;              FineTune      = 0;
367                SMPTEFormat   = smpte_format_no_offset;
368              SMPTEOffset   = 0;              SMPTEOffset   = 0;
369              Loops         = 0;              Loops         = 0;
370              LoopID        = 0;              LoopID        = 0;
371                LoopType      = loop_type_normal;
372              LoopStart     = 0;              LoopStart     = 0;
373              LoopEnd       = 0;              LoopEnd       = 0;
374              LoopFraction  = 0;              LoopFraction  = 0;
# Line 398  namespace { Line 424  namespace {
424    
425          // make sure 'smpl' chunk exists          // make sure 'smpl' chunk exists
426          pCkSmpl = pWaveList->GetSubChunk(CHUNK_ID_SMPL);          pCkSmpl = pWaveList->GetSubChunk(CHUNK_ID_SMPL);
427          if (!pCkSmpl) pCkSmpl = pWaveList->AddSubChunk(CHUNK_ID_SMPL, 60);          if (!pCkSmpl) {
428                pCkSmpl = pWaveList->AddSubChunk(CHUNK_ID_SMPL, 60);
429                memset(pCkSmpl->LoadChunkData(), 0, 60);
430            }
431          // update 'smpl' chunk          // update 'smpl' chunk
432          uint8_t* pData = (uint8_t*) pCkSmpl->LoadChunkData();          uint8_t* pData = (uint8_t*) pCkSmpl->LoadChunkData();
433          SamplePeriod = uint32_t(1000000000.0 / SamplesPerSecond + 0.5);          SamplePeriod = uint32_t(1000000000.0 / SamplesPerSecond + 0.5);
# Line 1123  namespace { Line 1152  namespace {
1152       *       *
1153       * Note: there is currently no support for writing compressed samples.       * Note: there is currently no support for writing compressed samples.
1154       *       *
1155         * For 16 bit samples, the data in the source buffer should be
1156         * int16_t (using native endianness). For 24 bit, the buffer
1157         * should contain three bytes per sample, little-endian.
1158         *
1159       * @param pBuffer     - source buffer       * @param pBuffer     - source buffer
1160       * @param SampleCount - number of sample points to write       * @param SampleCount - number of sample points to write
1161       * @throws DLS::Exception if current sample size is too small       * @throws DLS::Exception if current sample size is too small
# Line 1131  namespace { Line 1164  namespace {
1164       */       */
1165      unsigned long Sample::Write(void* pBuffer, unsigned long SampleCount) {      unsigned long Sample::Write(void* pBuffer, unsigned long SampleCount) {
1166          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)");
1167          return DLS::Sample::Write(pBuffer, SampleCount);  
1168            // if this is the first write in this sample, reset the
1169            // checksum calculator
1170            if (pCkData->GetPos() == 0) {
1171                crc.reset();
1172            }
1173            if (GetSize() < SampleCount) throw Exception("Could not write sample data, current sample size to small");
1174            unsigned long res;
1175            if (BitDepth == 24) {
1176                res = pCkData->Write(pBuffer, SampleCount * FrameSize, 1) / FrameSize;
1177            } else { // 16 bit
1178                res = Channels == 2 ? pCkData->Write(pBuffer, SampleCount << 1, 2) >> 1
1179                                    : pCkData->Write(pBuffer, SampleCount, 2);
1180            }
1181            crc.update((unsigned char *)pBuffer, SampleCount * FrameSize);
1182    
1183            // if this is the last write, update the checksum chunk in the
1184            // file
1185            if (pCkData->GetPos() == pCkData->GetSize()) {
1186                File* pFile = static_cast<File*>(GetParent());
1187                pFile->SetSampleChecksum(this, crc.getValue());
1188            }
1189            return res;
1190      }      }
1191    
1192      /**      /**
# Line 1207  namespace { Line 1262  namespace {
1262      uint                               DimensionRegion::Instances       = 0;      uint                               DimensionRegion::Instances       = 0;
1263      DimensionRegion::VelocityTableMap* DimensionRegion::pVelocityTables = NULL;      DimensionRegion::VelocityTableMap* DimensionRegion::pVelocityTables = NULL;
1264    
1265      DimensionRegion::DimensionRegion(RIFF::List* _3ewl) : DLS::Sampler(_3ewl) {      DimensionRegion::DimensionRegion(Region* pParent, RIFF::List* _3ewl) : DLS::Sampler(_3ewl) {
1266          Instances++;          Instances++;
1267    
1268          pSample = NULL;          pSample = NULL;
1269            pRegion = pParent;
1270    
1271            if (_3ewl->GetSubChunk(CHUNK_ID_WSMP)) memcpy(&Crossfade, &SamplerOptions, 4);
1272            else memset(&Crossfade, 0, 4);
1273    
         memcpy(&Crossfade, &SamplerOptions, 4);  
1274          if (!pVelocityTables) pVelocityTables = new VelocityTableMap;          if (!pVelocityTables) pVelocityTables = new VelocityTableMap;
1275    
1276          RIFF::Chunk* _3ewa = _3ewl->GetSubChunk(CHUNK_ID_3EWA);          RIFF::Chunk* _3ewa = _3ewl->GetSubChunk(CHUNK_ID_3EWA);
# Line 1376  namespace { Line 1434  namespace {
1434              LFO1ControlDepth                = 0;              LFO1ControlDepth                = 0;
1435              LFO3ControlDepth                = 0;              LFO3ControlDepth                = 0;
1436              EG1Attack                       = 0.0;              EG1Attack                       = 0.0;
1437              EG1Decay1                       = 0.0;              EG1Decay1                       = 0.005;
1438              EG1Sustain                      = 0;              EG1Sustain                      = 1000;
1439              EG1Release                      = 0.0;              EG1Release                      = 0.3;
1440              EG1Controller.type              = eg1_ctrl_t::type_none;              EG1Controller.type              = eg1_ctrl_t::type_none;
1441              EG1Controller.controller_number = 0;              EG1Controller.controller_number = 0;
1442              EG1ControllerInvert             = false;              EG1ControllerInvert             = false;
# Line 1393  namespace { Line 1451  namespace {
1451              EG2ControllerReleaseInfluence   = 0;              EG2ControllerReleaseInfluence   = 0;
1452              LFO1Frequency                   = 1.0;              LFO1Frequency                   = 1.0;
1453              EG2Attack                       = 0.0;              EG2Attack                       = 0.0;
1454              EG2Decay1                       = 0.0;              EG2Decay1                       = 0.005;
1455              EG2Sustain                      = 0;              EG2Sustain                      = 1000;
1456              EG2Release                      = 0.0;              EG2Release                      = 0.3;
1457              LFO2ControlDepth                = 0;              LFO2ControlDepth                = 0;
1458              LFO2Frequency                   = 1.0;              LFO2Frequency                   = 1.0;
1459              LFO2InternalDepth               = 0;              LFO2InternalDepth               = 0;
1460              EG1Decay2                       = 0.0;              EG1Decay2                       = 0.0;
1461              EG1InfiniteSustain              = false;              EG1InfiniteSustain              = true;
1462              EG1PreAttack                    = 1000;              EG1PreAttack                    = 0;
1463              EG2Decay2                       = 0.0;              EG2Decay2                       = 0.0;
1464              EG2InfiniteSustain              = false;              EG2InfiniteSustain              = true;
1465              EG2PreAttack                    = 1000;              EG2PreAttack                    = 0;
1466              VelocityResponseCurve           = curve_type_nonlinear;              VelocityResponseCurve           = curve_type_nonlinear;
1467              VelocityResponseDepth           = 3;              VelocityResponseDepth           = 3;
1468              ReleaseVelocityResponseCurve    = curve_type_nonlinear;              ReleaseVelocityResponseCurve    = curve_type_nonlinear;
# Line 1447  namespace { Line 1505  namespace {
1505              VCFVelocityDynamicRange         = 0x04;              VCFVelocityDynamicRange         = 0x04;
1506              VCFVelocityCurve                = curve_type_linear;              VCFVelocityCurve                = curve_type_linear;
1507              VCFType                         = vcf_type_lowpass;              VCFType                         = vcf_type_lowpass;
1508              memset(DimensionUpperLimits, 0, 8);              memset(DimensionUpperLimits, 127, 8);
1509          }          }
1510    
1511          pVelocityAttenuationTable = GetVelocityTable(VelocityResponseCurve,          pVelocityAttenuationTable = GetVelocityTable(VelocityResponseCurve,
# Line 1485  namespace { Line 1543  namespace {
1543          VelocityTable = 0;          VelocityTable = 0;
1544      }      }
1545    
1546        /*
1547         * Constructs a DimensionRegion by copying all parameters from
1548         * another DimensionRegion
1549         */
1550        DimensionRegion::DimensionRegion(RIFF::List* _3ewl, const DimensionRegion& src) : DLS::Sampler(_3ewl) {
1551            Instances++;
1552            *this = src; // default memberwise shallow copy of all parameters
1553            pParentList = _3ewl; // restore the chunk pointer
1554    
1555            // deep copy of owned structures
1556            if (src.VelocityTable) {
1557                VelocityTable = new uint8_t[128];
1558                for (int k = 0 ; k < 128 ; k++)
1559                    VelocityTable[k] = src.VelocityTable[k];
1560            }
1561            if (src.pSampleLoops) {
1562                pSampleLoops = new DLS::sample_loop_t[src.SampleLoops];
1563                for (int k = 0 ; k < src.SampleLoops ; k++)
1564                    pSampleLoops[k] = src.pSampleLoops[k];
1565            }
1566        }
1567    
1568      /**      /**
1569       * Apply dimension region settings to the respective RIFF chunks. You       * Apply dimension region settings to the respective RIFF chunks. You
1570       * have to call File::Save() to make changes persistent.       * have to call File::Save() to make changes persistent.
# Line 1496  namespace { Line 1576  namespace {
1576          // first update base class's chunk          // first update base class's chunk
1577          DLS::Sampler::UpdateChunks();          DLS::Sampler::UpdateChunks();
1578    
1579            RIFF::Chunk* wsmp = pParentList->GetSubChunk(CHUNK_ID_WSMP);
1580            uint8_t* pData = (uint8_t*) wsmp->LoadChunkData();
1581            pData[12] = Crossfade.in_start;
1582            pData[13] = Crossfade.in_end;
1583            pData[14] = Crossfade.out_start;
1584            pData[15] = Crossfade.out_end;
1585    
1586          // make sure '3ewa' chunk exists          // make sure '3ewa' chunk exists
1587          RIFF::Chunk* _3ewa = pParentList->GetSubChunk(CHUNK_ID_3EWA);          RIFF::Chunk* _3ewa = pParentList->GetSubChunk(CHUNK_ID_3EWA);
1588          if (!_3ewa)  _3ewa = pParentList->AddSubChunk(CHUNK_ID_3EWA, 140);          if (!_3ewa) {
1589          uint8_t* pData = (uint8_t*) _3ewa->LoadChunkData();              File* pFile = (File*) GetParent()->GetParent()->GetParent();
1590                bool version3 = pFile->pVersion && pFile->pVersion->major == 3;
1591                _3ewa = pParentList->AddSubChunk(CHUNK_ID_3EWA, version3 ? 148 : 140);
1592            }
1593            pData = (uint8_t*) _3ewa->LoadChunkData();
1594    
1595          // update '3ewa' chunk with DimensionRegion's current settings          // update '3ewa' chunk with DimensionRegion's current settings
1596    
1597          const uint32_t chunksize = _3ewa->GetSize();          const uint32_t chunksize = _3ewa->GetNewSize();
1598          store32(&pData[0], chunksize); // unknown, always chunk size?          store32(&pData[0], chunksize); // unknown, always chunk size?
1599    
1600          const int32_t lfo3freq = (int32_t) GIG_EXP_ENCODE(LFO3Frequency);          const int32_t lfo3freq = (int32_t) GIG_EXP_ENCODE(LFO3Frequency);
# Line 1545  namespace { Line 1636  namespace {
1636          pData[44] = eg1ctl;          pData[44] = eg1ctl;
1637    
1638          const uint8_t eg1ctrloptions =          const uint8_t eg1ctrloptions =
1639              (EG1ControllerInvert) ? 0x01 : 0x00 |              (EG1ControllerInvert ? 0x01 : 0x00) |
1640              GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG1ControllerAttackInfluence) |              GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG1ControllerAttackInfluence) |
1641              GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG1ControllerDecayInfluence) |              GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG1ControllerDecayInfluence) |
1642              GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG1ControllerReleaseInfluence);              GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG1ControllerReleaseInfluence);
# Line 1555  namespace { Line 1646  namespace {
1646          pData[46] = eg2ctl;          pData[46] = eg2ctl;
1647    
1648          const uint8_t eg2ctrloptions =          const uint8_t eg2ctrloptions =
1649              (EG2ControllerInvert) ? 0x01 : 0x00 |              (EG2ControllerInvert ? 0x01 : 0x00) |
1650              GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG2ControllerAttackInfluence) |              GIG_EG_CTR_ATTACK_INFLUENCE_ENCODE(EG2ControllerAttackInfluence) |
1651              GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG2ControllerDecayInfluence) |              GIG_EG_CTR_DECAY_INFLUENCE_ENCODE(EG2ControllerDecayInfluence) |
1652              GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG2ControllerReleaseInfluence);              GIG_EG_CTR_RELEASE_INFLUENCE_ENCODE(EG2ControllerReleaseInfluence);
# Line 1733  namespace { Line 1824  namespace {
1824          const uint8_t eg1hold = (EG1Hold) ? 0x80 : 0x00; // bit 7          const uint8_t eg1hold = (EG1Hold) ? 0x80 : 0x00; // bit 7
1825          pData[131] = eg1hold;          pData[131] = eg1hold;
1826    
1827          const uint8_t vcfcutoff = (VCFEnabled) ? 0x80 : 0x00 |  /* bit 7 */          const uint8_t vcfcutoff = (VCFEnabled ? 0x80 : 0x00) |  /* bit 7 */
1828                                    (VCFCutoff & 0x7f);   /* lower 7 bits */                                    (VCFCutoff & 0x7f);   /* lower 7 bits */
1829          pData[132] = vcfcutoff;          pData[132] = vcfcutoff;
1830    
1831          pData[133] = VCFCutoffController;          pData[133] = VCFCutoffController;
1832    
1833          const uint8_t vcfvelscale = (VCFCutoffControllerInvert) ? 0x80 : 0x00 | /* bit 7 */          const uint8_t vcfvelscale = (VCFCutoffControllerInvert ? 0x80 : 0x00) | /* bit 7 */
1834                                      (VCFVelocityScale & 0x7f); /* lower 7 bits */                                      (VCFVelocityScale & 0x7f); /* lower 7 bits */
1835          pData[134] = vcfvelscale;          pData[134] = vcfvelscale;
1836    
1837          // next byte unknown          // next byte unknown
1838    
1839          const uint8_t vcfresonance = (VCFResonanceDynamic) ? 0x00 : 0x80 | /* bit 7 */          const uint8_t vcfresonance = (VCFResonanceDynamic ? 0x00 : 0x80) | /* bit 7 */
1840                                       (VCFResonance & 0x7f); /* lower 7 bits */                                       (VCFResonance & 0x7f); /* lower 7 bits */
1841          pData[136] = vcfresonance;          pData[136] = vcfresonance;
1842    
1843          const uint8_t vcfbreakpoint = (VCFKeyboardTracking) ? 0x80 : 0x00 | /* bit 7 */          const uint8_t vcfbreakpoint = (VCFKeyboardTracking ? 0x80 : 0x00) | /* bit 7 */
1844                                        (VCFKeyboardTrackingBreakpoint & 0x7f); /* lower 7 bits */                                        (VCFKeyboardTrackingBreakpoint & 0x7f); /* lower 7 bits */
1845          pData[137] = vcfbreakpoint;          pData[137] = vcfbreakpoint;
1846    
# Line 1780  namespace { Line 1871  namespace {
1871          return table;          return table;
1872      }      }
1873    
1874        Region* DimensionRegion::GetParent() const {
1875            return pRegion;
1876        }
1877    
1878      leverage_ctrl_t DimensionRegion::DecodeLeverageController(_lev_ctrl_t EncodedController) {      leverage_ctrl_t DimensionRegion::DecodeLeverageController(_lev_ctrl_t EncodedController) {
1879          leverage_ctrl_t decodedcontroller;          leverage_ctrl_t decodedcontroller;
1880          switch (EncodedController) {          switch (EncodedController) {
# Line 1987  namespace { Line 2082  namespace {
2082                      default:                      default:
2083                          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");
2084                  }                  }
2085                    break;
2086              default:              default:
2087                  throw gig::Exception("Unknown leverage controller type.");                  throw gig::Exception("Unknown leverage controller type.");
2088          }          }
# Line 2104  namespace { Line 2200  namespace {
2200  // *  // *
2201    
2202      Region::Region(Instrument* pInstrument, RIFF::List* rgnList) : DLS::Region((DLS::Instrument*) pInstrument, rgnList) {      Region::Region(Instrument* pInstrument, RIFF::List* rgnList) : DLS::Region((DLS::Instrument*) pInstrument, rgnList) {
         pInfo->UseFixedLengthStrings = true;  
   
2203          // Initialization          // Initialization
2204          Dimensions = 0;          Dimensions = 0;
2205          for (int i = 0; i < 256; i++) {          for (int i = 0; i < 256; i++) {
# Line 2125  namespace { Line 2219  namespace {
2219              for (int i = 0; i < dimensionBits; i++) {              for (int i = 0; i < dimensionBits; i++) {
2220                  dimension_t dimension = static_cast<dimension_t>(_3lnk->ReadUint8());                  dimension_t dimension = static_cast<dimension_t>(_3lnk->ReadUint8());
2221                  uint8_t     bits      = _3lnk->ReadUint8();                  uint8_t     bits      = _3lnk->ReadUint8();
2222                  _3lnk->ReadUint8(); // probably the position of the dimension                  _3lnk->ReadUint8(); // bit position of the dimension (bits[0] + bits[1] + ... + bits[i-1])
2223                  _3lnk->ReadUint8(); // unknown                  _3lnk->ReadUint8(); // (1 << bit position of next dimension) - (1 << bit position of this dimension)
2224                  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)
2225                  if (dimension == dimension_none) { // inactive dimension                  if (dimension == dimension_none) { // inactive dimension
2226                      pDimensionDefinitions[i].dimension  = dimension_none;                      pDimensionDefinitions[i].dimension  = dimension_none;
# Line 2168  namespace { Line 2262  namespace {
2262              GetSample(); // load global region sample reference              GetSample(); // load global region sample reference
2263          } else {          } else {
2264              DimensionRegions = 0;              DimensionRegions = 0;
2265                for (int i = 0 ; i < 8 ; i++) {
2266                    pDimensionDefinitions[i].dimension  = dimension_none;
2267                    pDimensionDefinitions[i].bits       = 0;
2268                    pDimensionDefinitions[i].zones      = 0;
2269                }
2270          }          }
2271    
2272          // make sure there is at least one dimension region          // make sure there is at least one dimension region
# Line 2175  namespace { Line 2274  namespace {
2274              RIFF::List* _3prg = rgnList->GetSubList(LIST_TYPE_3PRG);              RIFF::List* _3prg = rgnList->GetSubList(LIST_TYPE_3PRG);
2275              if (!_3prg) _3prg = rgnList->AddSubList(LIST_TYPE_3PRG);              if (!_3prg) _3prg = rgnList->AddSubList(LIST_TYPE_3PRG);
2276              RIFF::List* _3ewl = _3prg->AddSubList(LIST_TYPE_3EWL);              RIFF::List* _3ewl = _3prg->AddSubList(LIST_TYPE_3EWL);
2277              pDimensionRegions[0] = new DimensionRegion(_3ewl);              pDimensionRegions[0] = new DimensionRegion(this, _3ewl);
2278              DimensionRegions = 1;              DimensionRegions = 1;
2279          }          }
2280      }      }
# Line 2205  namespace { Line 2304  namespace {
2304          }          }
2305    
2306          File* pFile = (File*) GetParent()->GetParent();          File* pFile = (File*) GetParent()->GetParent();
2307          const int iMaxDimensions = (pFile->pVersion && pFile->pVersion->major == 3) ? 8 : 5;          bool version3 = pFile->pVersion && pFile->pVersion->major == 3;
2308          const int iMaxDimensionRegions = (pFile->pVersion && pFile->pVersion->major == 3) ? 256 : 32;          const int iMaxDimensions =  version3 ? 8 : 5;
2309            const int iMaxDimensionRegions = version3 ? 256 : 32;
2310    
2311          // make sure '3lnk' chunk exists          // make sure '3lnk' chunk exists
2312          RIFF::Chunk* _3lnk = pCkRegion->GetSubChunk(CHUNK_ID_3LNK);          RIFF::Chunk* _3lnk = pCkRegion->GetSubChunk(CHUNK_ID_3LNK);
2313          if (!_3lnk) {          if (!_3lnk) {
2314              const int _3lnkChunkSize = (pFile->pVersion && pFile->pVersion->major == 3) ? 1092 : 172;              const int _3lnkChunkSize = version3 ? 1092 : 172;
2315              _3lnk = pCkRegion->AddSubChunk(CHUNK_ID_3LNK, _3lnkChunkSize);              _3lnk = pCkRegion->AddSubChunk(CHUNK_ID_3LNK, _3lnkChunkSize);
2316                memset(_3lnk->LoadChunkData(), 0, _3lnkChunkSize);
2317    
2318                // move 3prg to last position
2319                pCkRegion->MoveSubChunk(pCkRegion->GetSubList(LIST_TYPE_3PRG), 0);
2320          }          }
2321    
2322          // update dimension definitions in '3lnk' chunk          // update dimension definitions in '3lnk' chunk
2323          uint8_t* pData = (uint8_t*) _3lnk->LoadChunkData();          uint8_t* pData = (uint8_t*) _3lnk->LoadChunkData();
2324          store32(&pData[0], DimensionRegions);          store32(&pData[0], DimensionRegions);
2325            int shift = 0;
2326          for (int i = 0; i < iMaxDimensions; i++) {          for (int i = 0; i < iMaxDimensions; i++) {
2327              pData[4 + i * 8] = (uint8_t) pDimensionDefinitions[i].dimension;              pData[4 + i * 8] = (uint8_t) pDimensionDefinitions[i].dimension;
2328              pData[5 + i * 8] = pDimensionDefinitions[i].bits;              pData[5 + i * 8] = pDimensionDefinitions[i].bits;
2329              // next 2 bytes unknown              pData[6 + i * 8] = pDimensionDefinitions[i].dimension == dimension_none ? 0 : shift;
2330                pData[7 + i * 8] = (1 << (shift + pDimensionDefinitions[i].bits)) - (1 << shift);
2331              pData[8 + i * 8] = pDimensionDefinitions[i].zones;              pData[8 + i * 8] = pDimensionDefinitions[i].zones;
2332              // next 3 bytes unknown              // next 3 bytes unknown, always zero?
2333    
2334                shift += pDimensionDefinitions[i].bits;
2335          }          }
2336    
2337          // update wave pool table in '3lnk' chunk          // update wave pool table in '3lnk' chunk
2338          const int iWavePoolOffset = (pFile->pVersion && pFile->pVersion->major == 3) ? 68 : 44;          const int iWavePoolOffset = version3 ? 68 : 44;
2339          for (uint i = 0; i < iMaxDimensionRegions; i++) {          for (uint i = 0; i < iMaxDimensionRegions; i++) {
2340              int iWaveIndex = -1;              int iWaveIndex = -1;
2341              if (i < DimensionRegions) {              if (i < DimensionRegions) {
# Line 2240  namespace { Line 2348  namespace {
2348                          break;                          break;
2349                      }                      }
2350                  }                  }
                 if (iWaveIndex < 0) throw gig::Exception("Could not update gig::Region, could not find DimensionRegion's sample");  
2351              }              }
2352              store32(&pData[iWavePoolOffset + i * 4], iWaveIndex);              store32(&pData[iWavePoolOffset + i * 4], iWaveIndex);
2353          }          }
# Line 2253  namespace { Line 2360  namespace {
2360              RIFF::List* _3ewl = _3prg->GetFirstSubList();              RIFF::List* _3ewl = _3prg->GetFirstSubList();
2361              while (_3ewl) {              while (_3ewl) {
2362                  if (_3ewl->GetListType() == LIST_TYPE_3EWL) {                  if (_3ewl->GetListType() == LIST_TYPE_3EWL) {
2363                      pDimensionRegions[dimensionRegionNr] = new DimensionRegion(_3ewl);                      pDimensionRegions[dimensionRegionNr] = new DimensionRegion(this, _3ewl);
2364                      dimensionRegionNr++;                      dimensionRegionNr++;
2365                  }                  }
2366                  _3ewl = _3prg->GetNextSubList();                  _3ewl = _3prg->GetNextSubList();
# Line 2367  namespace { Line 2474  namespace {
2474              if (pDimensionDefinitions[i].dimension == pDimDef->dimension)              if (pDimensionDefinitions[i].dimension == pDimDef->dimension)
2475                  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");
2476    
2477            // pos is where the new dimension should be placed, normally
2478            // last in list, except for the samplechannel dimension which
2479            // has to be first in list
2480            int pos = pDimDef->dimension == dimension_samplechannel ? 0 : Dimensions;
2481            int bitpos = 0;
2482            for (int i = 0 ; i < pos ; i++)
2483                bitpos += pDimensionDefinitions[i].bits;
2484    
2485            // make room for the new dimension
2486            for (int i = Dimensions ; i > pos ; i--) pDimensionDefinitions[i] = pDimensionDefinitions[i - 1];
2487            for (int i = 0 ; i < (1 << iCurrentBits) ; i++) {
2488                for (int j = Dimensions ; j > pos ; j--) {
2489                    pDimensionRegions[i]->DimensionUpperLimits[j] =
2490                        pDimensionRegions[i]->DimensionUpperLimits[j - 1];
2491                }
2492            }
2493    
2494          // assign definition of new dimension          // assign definition of new dimension
2495          pDimensionDefinitions[Dimensions] = *pDimDef;          pDimensionDefinitions[pos] = *pDimDef;
2496    
2497          // auto correct certain dimension definition fields (where possible)          // auto correct certain dimension definition fields (where possible)
2498          pDimensionDefinitions[Dimensions].split_type  =          pDimensionDefinitions[pos].split_type  =
2499              __resolveSplitType(pDimensionDefinitions[Dimensions].dimension);              __resolveSplitType(pDimensionDefinitions[pos].dimension);
2500          pDimensionDefinitions[Dimensions].zone_size =          pDimensionDefinitions[pos].zone_size =
2501              __resolveZoneSize(pDimensionDefinitions[Dimensions]);              __resolveZoneSize(pDimensionDefinitions[pos]);
2502    
2503          // create new dimension region(s) for this new dimension          // create new dimension region(s) for this new dimension, and make
2504          for (int i = 1 << iCurrentBits; i < 1 << iNewBits; i++) {          // sure that the dimension regions are placed correctly in both the
2505              //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
2506              RIFF::List* pNewDimRgnListChunk = pCkRegion->AddSubList(LIST_TYPE_3EWL);          RIFF::Chunk* moveTo = NULL;
2507              pDimensionRegions[i] = new DimensionRegion(pNewDimRgnListChunk);          RIFF::List* _3prg = pCkRegion->GetSubList(LIST_TYPE_3PRG);
2508              DimensionRegions++;          for (int i = (1 << iCurrentBits) - (1 << bitpos) ; i >= 0 ; i -= (1 << bitpos)) {
2509                for (int k = 0 ; k < (1 << bitpos) ; k++) {
2510                    pDimensionRegions[(i << pDimDef->bits) + k] = pDimensionRegions[i + k];
2511                }
2512                for (int j = 1 ; j < (1 << pDimDef->bits) ; j++) {
2513                    for (int k = 0 ; k < (1 << bitpos) ; k++) {
2514                        RIFF::List* pNewDimRgnListChunk = _3prg->AddSubList(LIST_TYPE_3EWL);
2515                        if (moveTo) _3prg->MoveSubChunk(pNewDimRgnListChunk, moveTo);
2516                        // create a new dimension region and copy all parameter values from
2517                        // an existing dimension region
2518                        pDimensionRegions[(i << pDimDef->bits) + (j << bitpos) + k] =
2519                            new DimensionRegion(pNewDimRgnListChunk, *pDimensionRegions[i + k]);
2520    
2521                        DimensionRegions++;
2522                    }
2523                }
2524                moveTo = pDimensionRegions[i]->pParentList;
2525            }
2526    
2527            // initialize the upper limits for this dimension
2528            int mask = (1 << bitpos) - 1;
2529            for (int z = 0 ; z < pDimDef->zones ; z++) {
2530                uint8_t upperLimit = uint8_t((z + 1) * 128.0 / pDimDef->zones - 1);
2531                for (int i = 0 ; i < 1 << iCurrentBits ; i++) {
2532                    pDimensionRegions[((i & ~mask) << pDimDef->bits) |
2533                                      (z << bitpos) |
2534                                      (i & mask)]->DimensionUpperLimits[pos] = upperLimit;
2535                }
2536          }          }
2537    
2538          Dimensions++;          Dimensions++;
# Line 2424  namespace { Line 2575  namespace {
2575          for (int i = iDimensionNr + 1; i < Dimensions; i++)          for (int i = iDimensionNr + 1; i < Dimensions; i++)
2576              iUpperBits += pDimensionDefinitions[i].bits;              iUpperBits += pDimensionDefinitions[i].bits;
2577    
2578            RIFF::List* _3prg = pCkRegion->GetSubList(LIST_TYPE_3PRG);
2579    
2580          // delete dimension regions which belong to the given dimension          // delete dimension regions which belong to the given dimension
2581          // (that is where the dimension's bit > 0)          // (that is where the dimension's bit > 0)
2582          for (int iUpperBit = 0; iUpperBit < 1 << iUpperBits; iUpperBit++) {          for (int iUpperBit = 0; iUpperBit < 1 << iUpperBits; iUpperBit++) {
# Line 2432  namespace { Line 2585  namespace {
2585                      int iToDelete = iUpperBit    << (pDimensionDefinitions[iDimensionNr].bits + iLowerBits) |                      int iToDelete = iUpperBit    << (pDimensionDefinitions[iDimensionNr].bits + iLowerBits) |
2586                                      iObsoleteBit << iLowerBits |                                      iObsoleteBit << iLowerBits |
2587                                      iLowerBit;                                      iLowerBit;
2588    
2589                        _3prg->DeleteSubChunk(pDimensionRegions[iToDelete]->pParentList);
2590                      delete pDimensionRegions[iToDelete];                      delete pDimensionRegions[iToDelete];
2591                      pDimensionRegions[iToDelete] = NULL;                      pDimensionRegions[iToDelete] = NULL;
2592                      DimensionRegions--;                      DimensionRegions--;
# Line 2452  namespace { Line 2607  namespace {
2607              }              }
2608          }          }
2609    
2610            // remove the this dimension from the upper limits arrays
2611            for (int j = 0 ; j < 256 && pDimensionRegions[j] ; j++) {
2612                DimensionRegion* d = pDimensionRegions[j];
2613                for (int i = iDimensionNr + 1; i < Dimensions; i++) {
2614                    d->DimensionUpperLimits[i - 1] = d->DimensionUpperLimits[i];
2615                }
2616                d->DimensionUpperLimits[Dimensions - 1] = 127;
2617            }
2618    
2619          // 'remove' dimension definition          // 'remove' dimension definition
2620          for (int i = iDimensionNr + 1; i < Dimensions; i++) {          for (int i = iDimensionNr + 1; i < Dimensions; i++) {
2621              pDimensionDefinitions[i - 1] = pDimensionDefinitions[i];              pDimensionDefinitions[i - 1] = pDimensionDefinitions[i];
# Line 2592  namespace { Line 2756  namespace {
2756  // *  // *
2757    
2758      Instrument::Instrument(File* pFile, RIFF::List* insList, progress_t* pProgress) : DLS::Instrument((DLS::File*)pFile, insList) {      Instrument::Instrument(File* pFile, RIFF::List* insList, progress_t* pProgress) : DLS::Instrument((DLS::File*)pFile, insList) {
2759          pInfo->UseFixedLengthStrings = true;          static const DLS::Info::FixedStringLength fixedStringLengths[] = {
2760                { CHUNK_ID_INAM, 64 },
2761                { CHUNK_ID_ISFT, 12 },
2762                { 0, 0 }
2763            };
2764            pInfo->FixedStringLengths = fixedStringLengths;
2765    
2766          // Initialization          // Initialization
2767          for (int i = 0; i < 128; i++) RegionKeyTable[i] = NULL;          for (int i = 0; i < 128; i++) RegionKeyTable[i] = NULL;
2768            EffectSend = 0;
2769            Attenuation = 0;
2770            FineTune = 0;
2771            PitchbendRange = 0;
2772            PianoReleaseMode = false;
2773            DimensionKeyRange.low = 0;
2774            DimensionKeyRange.high = 0;
2775    
2776          // Loading          // Loading
2777          RIFF::List* lart = insList->GetSubList(LIST_TYPE_LART);          RIFF::List* lart = insList->GetSubList(LIST_TYPE_LART);
# Line 2671  namespace { Line 2847  namespace {
2847          if (!lart)  lart = pCkInstrument->AddSubList(LIST_TYPE_LART);          if (!lart)  lart = pCkInstrument->AddSubList(LIST_TYPE_LART);
2848          // make sure '3ewg' RIFF chunk exists          // make sure '3ewg' RIFF chunk exists
2849          RIFF::Chunk* _3ewg = lart->GetSubChunk(CHUNK_ID_3EWG);          RIFF::Chunk* _3ewg = lart->GetSubChunk(CHUNK_ID_3EWG);
2850          if (!_3ewg)  _3ewg = lart->AddSubChunk(CHUNK_ID_3EWG, 12);          if (!_3ewg)  {
2851                File* pFile = (File*) GetParent();
2852    
2853                // 3ewg is bigger in gig3, as it includes the iMIDI rules
2854                int size = (pFile->pVersion && pFile->pVersion->major == 3) ? 16416 : 12;
2855                _3ewg = lart->AddSubChunk(CHUNK_ID_3EWG, size);
2856                memset(_3ewg->LoadChunkData(), 0, size);
2857            }
2858          // update '3ewg' RIFF chunk          // update '3ewg' RIFF chunk
2859          uint8_t* pData = (uint8_t*) _3ewg->LoadChunkData();          uint8_t* pData = (uint8_t*) _3ewg->LoadChunkData();
2860          store16(&pData[0], EffectSend);          store16(&pData[0], EffectSend);
2861          store32(&pData[2], Attenuation);          store32(&pData[2], Attenuation);
2862          store16(&pData[6], FineTune);          store16(&pData[6], FineTune);
2863          store16(&pData[8], PitchbendRange);          store16(&pData[8], PitchbendRange);
2864          const uint8_t dimkeystart = (PianoReleaseMode) ? 0x01 : 0x00 |          const uint8_t dimkeystart = (PianoReleaseMode ? 0x01 : 0x00) |
2865                                      DimensionKeyRange.low << 1;                                      DimensionKeyRange.low << 1;
2866          pData[10] = dimkeystart;          pData[10] = dimkeystart;
2867          pData[11] = DimensionKeyRange.high;          pData[11] = DimensionKeyRange.high;
# Line 2783  namespace { Line 2966  namespace {
2966      void Group::UpdateChunks() {      void Group::UpdateChunks() {
2967          // make sure <3gri> and <3gnl> list chunks exist          // make sure <3gri> and <3gnl> list chunks exist
2968          RIFF::List* _3gri = pFile->pRIFF->GetSubList(LIST_TYPE_3GRI);          RIFF::List* _3gri = pFile->pRIFF->GetSubList(LIST_TYPE_3GRI);
2969          if (!_3gri) _3gri = pFile->pRIFF->AddSubList(LIST_TYPE_3GRI);          if (!_3gri) {
2970                _3gri = pFile->pRIFF->AddSubList(LIST_TYPE_3GRI);
2971                pFile->pRIFF->MoveSubChunk(_3gri, pFile->pRIFF->GetSubChunk(CHUNK_ID_PTBL));
2972            }
2973          RIFF::List* _3gnl = _3gri->GetSubList(LIST_TYPE_3GNL);          RIFF::List* _3gnl = _3gri->GetSubList(LIST_TYPE_3GNL);
2974          if (!_3gnl) _3gnl = pFile->pRIFF->AddSubList(LIST_TYPE_3GNL);          if (!_3gnl) _3gnl = _3gri->AddSubList(LIST_TYPE_3GNL);
2975    
2976            if (!pNameChunk && pFile->pVersion && pFile->pVersion->major == 3) {
2977                // v3 has a fixed list of 128 strings, find a free one
2978                for (RIFF::Chunk* ck = _3gnl->GetFirstSubChunk() ; ck ; ck = _3gnl->GetNextSubChunk()) {
2979                    if (strcmp(static_cast<char*>(ck->LoadChunkData()), "") == 0) {
2980                        pNameChunk = ck;
2981                        break;
2982                    }
2983                }
2984            }
2985    
2986          // 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
2987          ::SaveString(CHUNK_ID_3GNM, pNameChunk, _3gnl, Name, String("Unnamed Group"), true, 64);          ::SaveString(CHUNK_ID_3GNM, pNameChunk, _3gnl, Name, String("Unnamed Group"), true, 64);
2988      }      }
# Line 2861  namespace { Line 3058  namespace {
3058  // *************** File ***************  // *************** File ***************
3059  // *  // *
3060    
3061        // File version 2.0, 1998-06-28
3062        const DLS::version_t File::VERSION_2 = {
3063            0, 2, 19980628 & 0xffff, 19980628 >> 16
3064        };
3065    
3066        // File version 3.0, 2003-03-31
3067        const DLS::version_t File::VERSION_3 = {
3068            0, 3, 20030331 & 0xffff, 20030331 >> 16
3069        };
3070    
3071        const DLS::Info::FixedStringLength File::FixedStringLengths[] = {
3072            { CHUNK_ID_IARL, 256 },
3073            { CHUNK_ID_IART, 128 },
3074            { CHUNK_ID_ICMS, 128 },
3075            { CHUNK_ID_ICMT, 1024 },
3076            { CHUNK_ID_ICOP, 128 },
3077            { CHUNK_ID_ICRD, 128 },
3078            { CHUNK_ID_IENG, 128 },
3079            { CHUNK_ID_IGNR, 128 },
3080            { CHUNK_ID_IKEY, 128 },
3081            { CHUNK_ID_IMED, 128 },
3082            { CHUNK_ID_INAM, 128 },
3083            { CHUNK_ID_IPRD, 128 },
3084            { CHUNK_ID_ISBJ, 128 },
3085            { CHUNK_ID_ISFT, 128 },
3086            { CHUNK_ID_ISRC, 128 },
3087            { CHUNK_ID_ISRF, 128 },
3088            { CHUNK_ID_ITCH, 128 },
3089            { 0, 0 }
3090        };
3091    
3092      File::File() : DLS::File() {      File::File() : DLS::File() {
3093            *pVersion = VERSION_3;
3094          pGroups = NULL;          pGroups = NULL;
3095          pInfo->UseFixedLengthStrings = true;          pInfo->FixedStringLengths = FixedStringLengths;
3096            pInfo->ArchivalLocation = String(256, ' ');
3097    
3098            // add some mandatory chunks to get the file chunks in right
3099            // order (INFO chunk will be moved to first position later)
3100            pRIFF->AddSubChunk(CHUNK_ID_VERS, 8);
3101            pRIFF->AddSubChunk(CHUNK_ID_COLH, 4);
3102            pRIFF->AddSubChunk(CHUNK_ID_DLID, 16);
3103    
3104            GenerateDLSID();
3105      }      }
3106    
3107      File::File(RIFF::File* pRIFF) : DLS::File(pRIFF) {      File::File(RIFF::File* pRIFF) : DLS::File(pRIFF) {
3108          pGroups = NULL;          pGroups = NULL;
3109          pInfo->UseFixedLengthStrings = true;          pInfo->FixedStringLengths = FixedStringLengths;
3110      }      }
3111    
3112      File::~File() {      File::~File() {
# Line 2910  namespace { Line 3148  namespace {
3148         // create new Sample object and its respective 'wave' list chunk         // create new Sample object and its respective 'wave' list chunk
3149         RIFF::List* wave = wvpl->AddSubList(LIST_TYPE_WAVE);         RIFF::List* wave = wvpl->AddSubList(LIST_TYPE_WAVE);
3150         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*/);
3151    
3152           // add mandatory chunks to get the chunks in right order
3153           wave->AddSubChunk(CHUNK_ID_FMT, 16);
3154           wave->AddSubList(LIST_TYPE_INFO);
3155    
3156         pSamples->push_back(pSample);         pSamples->push_back(pSample);
3157         return pSample;         return pSample;
3158      }      }
3159    
3160      /** @brief Delete a sample.      /** @brief Delete a sample.
3161       *       *
3162       * 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
3163       * to call Save() to make this persistent to the file.       * references to this sample from Regions and DimensionRegions will be
3164         * removed. You have to call Save() to make this persistent to the file.
3165       *       *
3166       * @param pSample - sample to delete       * @param pSample - sample to delete
3167       * @throws gig::Exception if given sample could not be found       * @throws gig::Exception if given sample could not be found
# Line 2929  namespace { Line 3173  namespace {
3173          if (SamplesIterator != pSamples->end() && *SamplesIterator == pSample) ++SamplesIterator; // avoid iterator invalidation          if (SamplesIterator != pSamples->end() && *SamplesIterator == pSample) ++SamplesIterator; // avoid iterator invalidation
3174          pSamples->erase(iter);          pSamples->erase(iter);
3175          delete pSample;          delete pSample;
3176    
3177            // remove all references to the sample
3178            for (Instrument* instrument = GetFirstInstrument() ; instrument ;
3179                 instrument = GetNextInstrument()) {
3180                for (Region* region = instrument->GetFirstRegion() ; region ;
3181                     region = instrument->GetNextRegion()) {
3182    
3183                    if (region->GetSample() == pSample) region->SetSample(NULL);
3184    
3185                    for (int i = 0 ; i < region->DimensionRegions ; i++) {
3186                        gig::DimensionRegion *d = region->pDimensionRegions[i];
3187                        if (d->pSample == pSample) d->pSample = NULL;
3188                    }
3189                }
3190            }
3191      }      }
3192    
3193      void File::LoadSamples() {      void File::LoadSamples() {
# Line 3052  namespace { Line 3311  namespace {
3311         __ensureMandatoryChunksExist();         __ensureMandatoryChunksExist();
3312         RIFF::List* lstInstruments = pRIFF->GetSubList(LIST_TYPE_LINS);         RIFF::List* lstInstruments = pRIFF->GetSubList(LIST_TYPE_LINS);
3313         RIFF::List* lstInstr = lstInstruments->AddSubList(LIST_TYPE_INS);         RIFF::List* lstInstr = lstInstruments->AddSubList(LIST_TYPE_INS);
3314    
3315           // add mandatory chunks to get the chunks in right order
3316           lstInstr->AddSubList(LIST_TYPE_INFO);
3317           lstInstr->AddSubChunk(CHUNK_ID_DLID, 16);
3318    
3319         Instrument* pInstrument = new Instrument(this, lstInstr);         Instrument* pInstrument = new Instrument(this, lstInstr);
3320           pInstrument->GenerateDLSID();
3321    
3322           lstInstr->AddSubChunk(CHUNK_ID_INSH, 12);
3323    
3324           // this string is needed for the gig to be loadable in GSt:
3325           pInstrument->pInfo->Software = "Endless Wave";
3326    
3327         pInstruments->push_back(pInstrument);         pInstruments->push_back(pInstrument);
3328         return pInstrument;         return pInstrument;
3329      }      }
# Line 3103  namespace { Line 3374  namespace {
3374          }          }
3375      }      }
3376    
3377        /// Updates the 3crc chunk with the checksum of a sample. The
3378        /// update is done directly to disk, as this method is called
3379        /// after File::Save()
3380        void File::SetSampleChecksum(Sample* pSample, uint32_t crc) {
3381            RIFF::Chunk* _3crc = pRIFF->GetSubChunk(CHUNK_ID_3CRC);
3382            if (!_3crc) return;
3383    
3384            // get the index of the sample
3385            int iWaveIndex = -1;
3386            File::SampleList::iterator iter = pSamples->begin();
3387            File::SampleList::iterator end  = pSamples->end();
3388            for (int index = 0; iter != end; ++iter, ++index) {
3389                if (*iter == pSample) {
3390                    iWaveIndex = index;
3391                    break;
3392                }
3393            }
3394            if (iWaveIndex < 0) throw gig::Exception("Could not update crc, could not find sample");
3395    
3396            // write the CRC-32 checksum to disk
3397            _3crc->SetPos(iWaveIndex * 8);
3398            uint32_t tmp = 1;
3399            _3crc->WriteUint32(&tmp); // unknown, always 1?
3400            _3crc->WriteUint32(&crc);
3401        }
3402    
3403      Group* File::GetFirstGroup() {      Group* File::GetFirstGroup() {
3404          if (!pGroups) LoadGroups();          if (!pGroups) LoadGroups();
3405          // there must always be at least one group          // there must always be at least one group
# Line 3195  namespace { Line 3492  namespace {
3492                  RIFF::Chunk* ck = lst3gnl->GetFirstSubChunk();                  RIFF::Chunk* ck = lst3gnl->GetFirstSubChunk();
3493                  while (ck) {                  while (ck) {
3494                      if (ck->GetChunkID() == CHUNK_ID_3GNM) {                      if (ck->GetChunkID() == CHUNK_ID_3GNM) {
3495                            if (pVersion && pVersion->major == 3 &&
3496                                strcmp(static_cast<char*>(ck->LoadChunkData()), "") == 0) break;
3497    
3498                          pGroups->push_back(new Group(this, ck));                          pGroups->push_back(new Group(this, ck));
3499                      }                      }
3500                      ck = lst3gnl->GetNextSubChunk();                      ck = lst3gnl->GetNextSubChunk();
# Line 3220  namespace { Line 3520  namespace {
3520       * @throws Exception - on errors       * @throws Exception - on errors
3521       */       */
3522      void File::UpdateChunks() {      void File::UpdateChunks() {
3523            bool newFile = pRIFF->GetSubList(LIST_TYPE_INFO) == NULL;
3524    
3525            b64BitWavePoolOffsets = pVersion && pVersion->major == 3;
3526    
3527          // first update base class's chunks          // first update base class's chunks
3528          DLS::File::UpdateChunks();          DLS::File::UpdateChunks();
3529    
3530            if (newFile) {
3531                // INFO was added by Resource::UpdateChunks - make sure it
3532                // is placed first in file
3533                RIFF::Chunk* info = pRIFF->GetSubList(LIST_TYPE_INFO);
3534                RIFF::Chunk* first = pRIFF->GetFirstSubChunk();
3535                if (first != info) {
3536                    pRIFF->MoveSubChunk(info, first);
3537                }
3538            }
3539    
3540          // update group's chunks          // update group's chunks
3541          if (pGroups) {          if (pGroups) {
3542              std::list<Group*>::iterator iter = pGroups->begin();              std::list<Group*>::iterator iter = pGroups->begin();
# Line 3230  namespace { Line 3544  namespace {
3544              for (; iter != end; ++iter) {              for (; iter != end; ++iter) {
3545                  (*iter)->UpdateChunks();                  (*iter)->UpdateChunks();
3546              }              }
3547    
3548                // v3: make sure the file has 128 3gnm chunks
3549                if (pVersion && pVersion->major == 3) {
3550                    RIFF::List* _3gnl = pRIFF->GetSubList(LIST_TYPE_3GRI)->GetSubList(LIST_TYPE_3GNL);
3551                    RIFF::Chunk* _3gnm = _3gnl->GetFirstSubChunk();
3552                    for (int i = 0 ; i < 128 ; i++) {
3553                        if (i >= pGroups->size()) ::SaveString(CHUNK_ID_3GNM, _3gnm, _3gnl, "", "", true, 64);
3554                        if (_3gnm) _3gnm = _3gnl->GetNextSubChunk();
3555                    }
3556                }
3557            }
3558    
3559            // update einf chunk
3560    
3561            // The einf chunk contains statistics about the gig file, such
3562            // as the number of regions and samples used by each
3563            // instrument. It is divided in equally sized parts, where the
3564            // first part contains information about the whole gig file,
3565            // and the rest of the parts map to each instrument in the
3566            // file.
3567            //
3568            // At the end of each part there is a bit map of each sample
3569            // in the file, where a set bit means that the sample is used
3570            // by the file/instrument.
3571            //
3572            // Note that there are several fields with unknown use. These
3573            // are set to zero.
3574    
3575            int sublen = pSamples->size() / 8 + 49;
3576            int einfSize = (Instruments + 1) * sublen;
3577    
3578            RIFF::Chunk* einf = pRIFF->GetSubChunk(CHUNK_ID_EINF);
3579            if (einf) {
3580                if (einf->GetSize() != einfSize) {
3581                    einf->Resize(einfSize);
3582                    memset(einf->LoadChunkData(), 0, einfSize);
3583                }
3584            } else if (newFile) {
3585                einf = pRIFF->AddSubChunk(CHUNK_ID_EINF, einfSize);
3586            }
3587            if (einf) {
3588                uint8_t* pData = (uint8_t*) einf->LoadChunkData();
3589    
3590                std::map<gig::Sample*,int> sampleMap;
3591                int sampleIdx = 0;
3592                for (Sample* pSample = GetFirstSample(); pSample; pSample = GetNextSample()) {
3593                    sampleMap[pSample] = sampleIdx++;
3594                }
3595    
3596                int totnbusedsamples = 0;
3597                int totnbusedchannels = 0;
3598                int totnbregions = 0;
3599                int totnbdimregions = 0;
3600                int totnbloops = 0;
3601                int instrumentIdx = 0;
3602    
3603                memset(&pData[48], 0, sublen - 48);
3604    
3605                for (Instrument* instrument = GetFirstInstrument() ; instrument ;
3606                     instrument = GetNextInstrument()) {
3607                    int nbusedsamples = 0;
3608                    int nbusedchannels = 0;
3609                    int nbdimregions = 0;
3610                    int nbloops = 0;
3611    
3612                    memset(&pData[(instrumentIdx + 1) * sublen + 48], 0, sublen - 48);
3613    
3614                    for (Region* region = instrument->GetFirstRegion() ; region ;
3615                         region = instrument->GetNextRegion()) {
3616                        for (int i = 0 ; i < region->DimensionRegions ; i++) {
3617                            gig::DimensionRegion *d = region->pDimensionRegions[i];
3618                            if (d->pSample) {
3619                                int sampleIdx = sampleMap[d->pSample];
3620                                int byte = 48 + sampleIdx / 8;
3621                                int bit = 1 << (sampleIdx & 7);
3622                                if ((pData[(instrumentIdx + 1) * sublen + byte] & bit) == 0) {
3623                                    pData[(instrumentIdx + 1) * sublen + byte] |= bit;
3624                                    nbusedsamples++;
3625                                    nbusedchannels += d->pSample->Channels;
3626    
3627                                    if ((pData[byte] & bit) == 0) {
3628                                        pData[byte] |= bit;
3629                                        totnbusedsamples++;
3630                                        totnbusedchannels += d->pSample->Channels;
3631                                    }
3632                                }
3633                            }
3634                            if (d->SampleLoops) nbloops++;
3635                        }
3636                        nbdimregions += region->DimensionRegions;
3637                    }
3638                    // first 4 bytes unknown - sometimes 0, sometimes length of einf part
3639                    // store32(&pData[(instrumentIdx + 1) * sublen], sublen);
3640                    store32(&pData[(instrumentIdx + 1) * sublen + 4], nbusedchannels);
3641                    store32(&pData[(instrumentIdx + 1) * sublen + 8], nbusedsamples);
3642                    store32(&pData[(instrumentIdx + 1) * sublen + 12], 1);
3643                    store32(&pData[(instrumentIdx + 1) * sublen + 16], instrument->Regions);
3644                    store32(&pData[(instrumentIdx + 1) * sublen + 20], nbdimregions);
3645                    store32(&pData[(instrumentIdx + 1) * sublen + 24], nbloops);
3646                    // next 8 bytes unknown
3647                    store32(&pData[(instrumentIdx + 1) * sublen + 36], instrumentIdx);
3648                    store32(&pData[(instrumentIdx + 1) * sublen + 40], pSamples->size());
3649                    // next 4 bytes unknown
3650    
3651                    totnbregions += instrument->Regions;
3652                    totnbdimregions += nbdimregions;
3653                    totnbloops += nbloops;
3654                    instrumentIdx++;
3655                }
3656                // first 4 bytes unknown - sometimes 0, sometimes length of einf part
3657                // store32(&pData[0], sublen);
3658                store32(&pData[4], totnbusedchannels);
3659                store32(&pData[8], totnbusedsamples);
3660                store32(&pData[12], Instruments);
3661                store32(&pData[16], totnbregions);
3662                store32(&pData[20], totnbdimregions);
3663                store32(&pData[24], totnbloops);
3664                // next 8 bytes unknown
3665                // next 4 bytes unknown, not always 0
3666                store32(&pData[40], pSamples->size());
3667                // next 4 bytes unknown
3668            }
3669    
3670            // update 3crc chunk
3671    
3672            // The 3crc chunk contains CRC-32 checksums for the
3673            // samples. The actual checksum values will be filled in
3674            // later, by Sample::Write.
3675    
3676            RIFF::Chunk* _3crc = pRIFF->GetSubChunk(CHUNK_ID_3CRC);
3677            if (_3crc) {
3678                _3crc->Resize(pSamples->size() * 8);
3679            } else if (newFile) {
3680                _3crc = pRIFF->AddSubChunk(CHUNK_ID_3CRC, pSamples->size() * 8);
3681                _3crc->LoadChunkData();
3682    
3683                // the order of einf and 3crc is not the same in v2 and v3
3684                if (einf && pVersion && pVersion->major == 3) pRIFF->MoveSubChunk(_3crc, einf);
3685          }          }
3686      }      }
3687    
Legend:
Removed from v.1179  
changed lines
  Added in v.1317
  ViewVC Help
Powered by ViewVC