libgig  4.0.0
DLS.cpp
Go to the documentation of this file.
1 /***************************************************************************
2  * *
3  * libgig - C++ cross-platform Gigasampler format file access library *
4  * *
5  * Copyright (C) 2003-2014 by Christian Schoenebeck *
6  * <cuse@users.sourceforge.net> *
7  * *
8  * This library is free software; you can redistribute it and/or modify *
9  * it under the terms of the GNU General Public License as published by *
10  * the Free Software Foundation; either version 2 of the License, or *
11  * (at your option) any later version. *
12  * *
13  * This library is distributed in the hope that it will be useful, *
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of *
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
16  * GNU General Public License for more details. *
17  * *
18  * You should have received a copy of the GNU General Public License *
19  * along with this library; if not, write to the Free Software *
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, *
21  * MA 02111-1307 USA *
22  ***************************************************************************/
23 
24 #include "DLS.h"
25 
26 #include <algorithm>
27 #include <time.h>
28 
29 #ifdef __APPLE__
30 #include <CoreFoundation/CFUUID.h>
31 #elif defined(HAVE_UUID_UUID_H)
32 #include <uuid/uuid.h>
33 #endif
34 
35 #include "helper.h"
36 
37 // macros to decode connection transforms
38 #define CONN_TRANSFORM_SRC(x) ((x >> 10) & 0x000F)
39 #define CONN_TRANSFORM_CTL(x) ((x >> 4) & 0x000F)
40 #define CONN_TRANSFORM_DST(x) (x & 0x000F)
41 #define CONN_TRANSFORM_BIPOLAR_SRC(x) (x & 0x4000)
42 #define CONN_TRANSFORM_BIPOLAR_CTL(x) (x & 0x0100)
43 #define CONN_TRANSFORM_INVERT_SRC(x) (x & 0x8000)
44 #define CONN_TRANSFORM_INVERT_CTL(x) (x & 0x0200)
45 
46 // macros to encode connection transforms
47 #define CONN_TRANSFORM_SRC_ENCODE(x) ((x & 0x000F) << 10)
48 #define CONN_TRANSFORM_CTL_ENCODE(x) ((x & 0x000F) << 4)
49 #define CONN_TRANSFORM_DST_ENCODE(x) (x & 0x000F)
50 #define CONN_TRANSFORM_BIPOLAR_SRC_ENCODE(x) ((x) ? 0x4000 : 0)
51 #define CONN_TRANSFORM_BIPOLAR_CTL_ENCODE(x) ((x) ? 0x0100 : 0)
52 #define CONN_TRANSFORM_INVERT_SRC_ENCODE(x) ((x) ? 0x8000 : 0)
53 #define CONN_TRANSFORM_INVERT_CTL_ENCODE(x) ((x) ? 0x0200 : 0)
54 
55 #define DRUM_TYPE_MASK 0x80000000
56 
57 #define F_RGN_OPTION_SELFNONEXCLUSIVE 0x0001
58 
59 #define F_WAVELINK_PHASE_MASTER 0x0001
60 #define F_WAVELINK_MULTICHANNEL 0x0002
61 
62 #define F_WSMP_NO_TRUNCATION 0x0001
63 #define F_WSMP_NO_COMPRESSION 0x0002
64 
65 #define MIDI_BANK_COARSE(x) ((x & 0x00007F00) >> 8) // CC0
66 #define MIDI_BANK_FINE(x) (x & 0x0000007F) // CC32
67 #define MIDI_BANK_MERGE(coarse, fine) ((((uint16_t) coarse) << 7) | fine) // CC0 + CC32
68 #define MIDI_BANK_ENCODE(coarse, fine) (((coarse & 0x0000007F) << 8) | (fine & 0x0000007F))
69 
70 namespace DLS {
71 
72 // *************** Connection ***************
73 // *
74 
76  Source = (conn_src_t) Header->source;
77  Control = (conn_src_t) Header->control;
79  Scale = Header->scale;
87  }
88 
90  conn_block_t c;
91  c.source = Source;
92  c.control = Control;
94  c.scale = Scale;
102  return c;
103  }
104 
105 
106 
107 // *************** Articulation ***************
108 // *
109 
119  pArticulationCk = artl;
120  if (artl->GetChunkID() != CHUNK_ID_ART2 &&
121  artl->GetChunkID() != CHUNK_ID_ARTL) {
122  throw DLS::Exception("<artl-ck> or <art2-ck> chunk expected");
123  }
124  HeaderSize = artl->ReadUint32();
125  Connections = artl->ReadUint32();
126  artl->SetPos(HeaderSize);
127 
128  pConnections = new Connection[Connections];
129  Connection::conn_block_t connblock;
130  for (uint32_t i = 0; i < Connections; i++) {
131  artl->Read(&connblock.source, 1, 2);
132  artl->Read(&connblock.control, 1, 2);
133  artl->Read(&connblock.destination, 1, 2);
134  artl->Read(&connblock.transform, 1, 2);
135  artl->Read(&connblock.scale, 1, 4);
136  pConnections[i].Init(&connblock);
137  }
138  }
139 
141  if (pConnections) delete[] pConnections;
142  }
143 
151  const int iEntrySize = 12; // 12 bytes per connection block
152  pArticulationCk->Resize(HeaderSize + Connections * iEntrySize);
153  uint8_t* pData = (uint8_t*) pArticulationCk->LoadChunkData();
154  store16(&pData[0], HeaderSize);
155  store16(&pData[2], Connections);
156  for (uint32_t i = 0; i < Connections; i++) {
157  Connection::conn_block_t c = pConnections[i].ToConnBlock();
158  store16(&pData[HeaderSize + i * iEntrySize], c.source);
159  store16(&pData[HeaderSize + i * iEntrySize + 2], c.control);
160  store16(&pData[HeaderSize + i * iEntrySize + 4], c.destination);
161  store16(&pData[HeaderSize + i * iEntrySize + 6], c.transform);
162  store32(&pData[HeaderSize + i * iEntrySize + 8], c.scale);
163  }
164  }
165 
166 
167 
168 // *************** Articulator ***************
169 // *
170 
172  pParentList = ParentList;
173  pArticulations = NULL;
174  }
175 
177  if (!pArticulations) LoadArticulations();
178  if (!pArticulations) return NULL;
179  ArticulationsIterator = pArticulations->begin();
180  return (ArticulationsIterator != pArticulations->end()) ? *ArticulationsIterator : NULL;
181  }
182 
184  if (!pArticulations) return NULL;
185  ArticulationsIterator++;
186  return (ArticulationsIterator != pArticulations->end()) ? *ArticulationsIterator : NULL;
187  }
188 
190  // prefer articulation level 2
191  RIFF::List* lart = pParentList->GetSubList(LIST_TYPE_LAR2);
192  if (!lart) lart = pParentList->GetSubList(LIST_TYPE_LART);
193  if (lart) {
194  uint32_t artCkType = (lart->GetListType() == LIST_TYPE_LAR2) ? CHUNK_ID_ART2
195  : CHUNK_ID_ARTL;
196  RIFF::Chunk* art = lart->GetFirstSubChunk();
197  while (art) {
198  if (art->GetChunkID() == artCkType) {
199  if (!pArticulations) pArticulations = new ArticulationList;
200  pArticulations->push_back(new Articulation(art));
201  }
202  art = lart->GetNextSubChunk();
203  }
204  }
205  }
206 
208  if (pArticulations) {
209  ArticulationList::iterator iter = pArticulations->begin();
210  ArticulationList::iterator end = pArticulations->end();
211  while (iter != end) {
212  delete *iter;
213  iter++;
214  }
215  delete pArticulations;
216  }
217  }
218 
226  if (pArticulations) {
227  ArticulationList::iterator iter = pArticulations->begin();
228  ArticulationList::iterator end = pArticulations->end();
229  for (; iter != end; ++iter) {
230  (*iter)->UpdateChunks(pProgress);
231  }
232  }
233  }
234 
241  //TODO: implement deep copy assignment for this class
242  }
243 
244 
245 
246 // *************** Info ***************
247 // *
248 
256  pFixedStringLengths = NULL;
257  pResourceListChunk = list;
258  if (list) {
259  RIFF::List* lstINFO = list->GetSubList(LIST_TYPE_INFO);
260  if (lstINFO) {
261  LoadString(CHUNK_ID_INAM, lstINFO, Name);
262  LoadString(CHUNK_ID_IARL, lstINFO, ArchivalLocation);
263  LoadString(CHUNK_ID_ICRD, lstINFO, CreationDate);
264  LoadString(CHUNK_ID_ICMT, lstINFO, Comments);
265  LoadString(CHUNK_ID_IPRD, lstINFO, Product);
266  LoadString(CHUNK_ID_ICOP, lstINFO, Copyright);
267  LoadString(CHUNK_ID_IART, lstINFO, Artists);
268  LoadString(CHUNK_ID_IGNR, lstINFO, Genre);
269  LoadString(CHUNK_ID_IKEY, lstINFO, Keywords);
270  LoadString(CHUNK_ID_IENG, lstINFO, Engineer);
271  LoadString(CHUNK_ID_ITCH, lstINFO, Technician);
272  LoadString(CHUNK_ID_ISFT, lstINFO, Software);
273  LoadString(CHUNK_ID_IMED, lstINFO, Medium);
274  LoadString(CHUNK_ID_ISRC, lstINFO, Source);
275  LoadString(CHUNK_ID_ISRF, lstINFO, SourceForm);
276  LoadString(CHUNK_ID_ICMS, lstINFO, Commissioned);
277  LoadString(CHUNK_ID_ISBJ, lstINFO, Subject);
278  }
279  }
280  }
281 
283  }
284 
297  pFixedStringLengths = lengths;
298  }
299 
305  void Info::LoadString(uint32_t ChunkID, RIFF::List* lstINFO, String& s) {
306  RIFF::Chunk* ck = lstINFO->GetSubChunk(ChunkID);
307  ::LoadString(ck, s); // function from helper.h
308  }
309 
325  void Info::SaveString(uint32_t ChunkID, RIFF::List* lstINFO, const String& s, const String& sDefault) {
326  int size = 0;
327  if (pFixedStringLengths) {
328  for (int i = 0 ; pFixedStringLengths[i].length ; i++) {
329  if (pFixedStringLengths[i].chunkId == ChunkID) {
330  size = pFixedStringLengths[i].length;
331  break;
332  }
333  }
334  }
335  RIFF::Chunk* ck = lstINFO->GetSubChunk(ChunkID);
336  ::SaveString(ChunkID, ck, lstINFO, s, sDefault, size != 0, size); // function from helper.h
337  }
338 
346  void Info::UpdateChunks(progress_t* pProgress) {
347  if (!pResourceListChunk) return;
348 
349  // make sure INFO list chunk exists
350  RIFF::List* lstINFO = pResourceListChunk->GetSubList(LIST_TYPE_INFO);
351 
352  String defaultName = "";
353  String defaultCreationDate = "";
354  String defaultSoftware = "";
355  String defaultComments = "";
356 
357  uint32_t resourceType = pResourceListChunk->GetListType();
358 
359  if (!lstINFO) {
360  lstINFO = pResourceListChunk->AddSubList(LIST_TYPE_INFO);
361 
362  // assemble default values
363  defaultName = "NONAME";
364 
365  if (resourceType == RIFF_TYPE_DLS) {
366  // get current date
367  time_t now = time(NULL);
368  tm* pNowBroken = localtime(&now);
369  char buf[11];
370  strftime(buf, 11, "%F", pNowBroken);
371  defaultCreationDate = buf;
372 
373  defaultComments = "Created with " + libraryName() + " " + libraryVersion();
374  }
375  if (resourceType == RIFF_TYPE_DLS || resourceType == LIST_TYPE_INS)
376  {
377  defaultSoftware = libraryName() + " " + libraryVersion();
378  }
379  }
380 
381  // save values
382 
383  SaveString(CHUNK_ID_IARL, lstINFO, ArchivalLocation, String(""));
384  SaveString(CHUNK_ID_IART, lstINFO, Artists, String(""));
385  SaveString(CHUNK_ID_ICMS, lstINFO, Commissioned, String(""));
386  SaveString(CHUNK_ID_ICMT, lstINFO, Comments, defaultComments);
387  SaveString(CHUNK_ID_ICOP, lstINFO, Copyright, String(""));
388  SaveString(CHUNK_ID_ICRD, lstINFO, CreationDate, defaultCreationDate);
389  SaveString(CHUNK_ID_IENG, lstINFO, Engineer, String(""));
390  SaveString(CHUNK_ID_IGNR, lstINFO, Genre, String(""));
391  SaveString(CHUNK_ID_IKEY, lstINFO, Keywords, String(""));
392  SaveString(CHUNK_ID_IMED, lstINFO, Medium, String(""));
393  SaveString(CHUNK_ID_INAM, lstINFO, Name, defaultName);
394  SaveString(CHUNK_ID_IPRD, lstINFO, Product, String(""));
395  SaveString(CHUNK_ID_ISBJ, lstINFO, Subject, String(""));
396  SaveString(CHUNK_ID_ISFT, lstINFO, Software, defaultSoftware);
397  SaveString(CHUNK_ID_ISRC, lstINFO, Source, String(""));
398  SaveString(CHUNK_ID_ISRF, lstINFO, SourceForm, String(""));
399  SaveString(CHUNK_ID_ITCH, lstINFO, Technician, String(""));
400  }
401 
408  void Info::CopyAssign(const Info* orig) {
409  Name = orig->Name;
410  ArchivalLocation = orig->ArchivalLocation;
411  CreationDate = orig->CreationDate;
412  Comments = orig->Comments;
413  Product = orig->Product;
414  Copyright = orig->Copyright;
415  Artists = orig->Artists;
416  Genre = orig->Genre;
417  Keywords = orig->Keywords;
418  Engineer = orig->Engineer;
419  Technician = orig->Technician;
420  Software = orig->Software;
421  Medium = orig->Medium;
422  Source = orig->Source;
423  SourceForm = orig->SourceForm;
424  Commissioned = orig->Commissioned;
425  Subject = orig->Subject;
426  //FIXME: hmm, is copying this pointer a good idea?
427  pFixedStringLengths = orig->pFixedStringLengths;
428  }
429 
430 
431 
432 // *************** Resource ***************
433 // *
434 
444  Resource::Resource(Resource* Parent, RIFF::List* lstResource) {
445  pParent = Parent;
446  pResourceList = lstResource;
447 
448  pInfo = new Info(lstResource);
449 
450  RIFF::Chunk* ckDLSID = lstResource->GetSubChunk(CHUNK_ID_DLID);
451  if (ckDLSID) {
452  pDLSID = new dlsid_t;
453  ckDLSID->Read(&pDLSID->ulData1, 1, 4);
454  ckDLSID->Read(&pDLSID->usData2, 1, 2);
455  ckDLSID->Read(&pDLSID->usData3, 1, 2);
456  ckDLSID->Read(pDLSID->abData, 8, 1);
457  }
458  else pDLSID = NULL;
459  }
460 
462  if (pDLSID) delete pDLSID;
463  if (pInfo) delete pInfo;
464  }
465 
477  pInfo->UpdateChunks(pProgress);
478 
479  if (pDLSID) {
480  // make sure 'dlid' chunk exists
481  RIFF::Chunk* ckDLSID = pResourceList->GetSubChunk(CHUNK_ID_DLID);
482  if (!ckDLSID) ckDLSID = pResourceList->AddSubChunk(CHUNK_ID_DLID, 16);
483  uint8_t* pData = (uint8_t*)ckDLSID->LoadChunkData();
484  // update 'dlid' chunk
485  store32(&pData[0], pDLSID->ulData1);
486  store16(&pData[4], pDLSID->usData2);
487  store16(&pData[6], pDLSID->usData3);
488  memcpy(&pData[8], pDLSID->abData, 8);
489  }
490  }
491 
496 #if defined(WIN32) || defined(__APPLE__) || defined(HAVE_UUID_GENERATE)
497 
498  if (!pDLSID) pDLSID = new dlsid_t;
499 
500 #ifdef WIN32
501 
502  UUID uuid;
503  UuidCreate(&uuid);
504  pDLSID->ulData1 = uuid.Data1;
505  pDLSID->usData2 = uuid.Data2;
506  pDLSID->usData3 = uuid.Data3;
507  memcpy(pDLSID->abData, uuid.Data4, 8);
508 
509 #elif defined(__APPLE__)
510 
511  CFUUIDRef uuidRef = CFUUIDCreate(NULL);
512  CFUUIDBytes uuid = CFUUIDGetUUIDBytes(uuidRef);
513  CFRelease(uuidRef);
514  pDLSID->ulData1 = uuid.byte0 | uuid.byte1 << 8 | uuid.byte2 << 16 | uuid.byte3 << 24;
515  pDLSID->usData2 = uuid.byte4 | uuid.byte5 << 8;
516  pDLSID->usData3 = uuid.byte6 | uuid.byte7 << 8;
517  pDLSID->abData[0] = uuid.byte8;
518  pDLSID->abData[1] = uuid.byte9;
519  pDLSID->abData[2] = uuid.byte10;
520  pDLSID->abData[3] = uuid.byte11;
521  pDLSID->abData[4] = uuid.byte12;
522  pDLSID->abData[5] = uuid.byte13;
523  pDLSID->abData[6] = uuid.byte14;
524  pDLSID->abData[7] = uuid.byte15;
525 #else
526  uuid_t uuid;
527  uuid_generate(uuid);
528  pDLSID->ulData1 = uuid[0] | uuid[1] << 8 | uuid[2] << 16 | uuid[3] << 24;
529  pDLSID->usData2 = uuid[4] | uuid[5] << 8;
530  pDLSID->usData3 = uuid[6] | uuid[7] << 8;
531  memcpy(pDLSID->abData, &uuid[8], 8);
532 #endif
533 #endif
534  }
535 
542  void Resource::CopyAssign(const Resource* orig) {
543  pInfo->CopyAssign(orig->pInfo);
544  }
545 
546 
547 // *************** Sampler ***************
548 // *
549 
551  pParentList = ParentList;
552  RIFF::Chunk* wsmp = ParentList->GetSubChunk(CHUNK_ID_WSMP);
553  if (wsmp) {
554  uiHeaderSize = wsmp->ReadUint32();
555  UnityNote = wsmp->ReadUint16();
556  FineTune = wsmp->ReadInt16();
557  Gain = wsmp->ReadInt32();
558  SamplerOptions = wsmp->ReadUint32();
559  SampleLoops = wsmp->ReadUint32();
560  } else { // 'wsmp' chunk missing
561  uiHeaderSize = 20;
562  UnityNote = 60;
563  FineTune = 0; // +- 0 cents
564  Gain = 0; // 0 dB
565  SamplerOptions = F_WSMP_NO_COMPRESSION;
566  SampleLoops = 0;
567  }
568  NoSampleDepthTruncation = SamplerOptions & F_WSMP_NO_TRUNCATION;
569  NoSampleCompression = SamplerOptions & F_WSMP_NO_COMPRESSION;
570  pSampleLoops = (SampleLoops) ? new sample_loop_t[SampleLoops] : NULL;
571  if (SampleLoops) {
572  wsmp->SetPos(uiHeaderSize);
573  for (uint32_t i = 0; i < SampleLoops; i++) {
574  wsmp->Read(pSampleLoops + i, 4, 4);
575  if (pSampleLoops[i].Size > sizeof(sample_loop_t)) { // if loop struct was extended
576  wsmp->SetPos(pSampleLoops[i].Size - sizeof(sample_loop_t), RIFF::stream_curpos);
577  }
578  }
579  }
580  }
581 
583  if (pSampleLoops) delete[] pSampleLoops;
584  }
585 
586  void Sampler::SetGain(int32_t gain) {
587  Gain = gain;
588  }
589 
597  // make sure 'wsmp' chunk exists
598  RIFF::Chunk* wsmp = pParentList->GetSubChunk(CHUNK_ID_WSMP);
599  int wsmpSize = uiHeaderSize + SampleLoops * 16;
600  if (!wsmp) {
601  wsmp = pParentList->AddSubChunk(CHUNK_ID_WSMP, wsmpSize);
602  } else if (wsmp->GetSize() != wsmpSize) {
603  wsmp->Resize(wsmpSize);
604  }
605  uint8_t* pData = (uint8_t*) wsmp->LoadChunkData();
606  // update headers size
607  store32(&pData[0], uiHeaderSize);
608  // update respective sampler options bits
609  SamplerOptions = (NoSampleDepthTruncation) ? SamplerOptions | F_WSMP_NO_TRUNCATION
610  : SamplerOptions & (~F_WSMP_NO_TRUNCATION);
611  SamplerOptions = (NoSampleCompression) ? SamplerOptions | F_WSMP_NO_COMPRESSION
612  : SamplerOptions & (~F_WSMP_NO_COMPRESSION);
613  store16(&pData[4], UnityNote);
614  store16(&pData[6], FineTune);
615  store32(&pData[8], Gain);
616  store32(&pData[12], SamplerOptions);
617  store32(&pData[16], SampleLoops);
618  // update loop definitions
619  for (uint32_t i = 0; i < SampleLoops; i++) {
620  //FIXME: this does not handle extended loop structs correctly
621  store32(&pData[uiHeaderSize + i * 16], pSampleLoops[i].Size);
622  store32(&pData[uiHeaderSize + i * 16 + 4], pSampleLoops[i].LoopType);
623  store32(&pData[uiHeaderSize + i * 16 + 8], pSampleLoops[i].LoopStart);
624  store32(&pData[uiHeaderSize + i * 16 + 12], pSampleLoops[i].LoopLength);
625  }
626  }
627 
634  sample_loop_t* pNewLoops = new sample_loop_t[SampleLoops + 1];
635  // copy old loops array
636  for (int i = 0; i < SampleLoops; i++) {
637  pNewLoops[i] = pSampleLoops[i];
638  }
639  // add the new loop
640  pNewLoops[SampleLoops] = *pLoopDef;
641  // auto correct size field
642  pNewLoops[SampleLoops].Size = sizeof(DLS::sample_loop_t);
643  // free the old array and update the member variables
644  if (SampleLoops) delete[] pSampleLoops;
645  pSampleLoops = pNewLoops;
646  SampleLoops++;
647  }
648 
656  sample_loop_t* pNewLoops = new sample_loop_t[SampleLoops - 1];
657  // copy old loops array (skipping given loop)
658  for (int i = 0, o = 0; i < SampleLoops; i++) {
659  if (&pSampleLoops[i] == pLoopDef) continue;
660  if (o == SampleLoops - 1) {
661  delete[] pNewLoops;
662  throw Exception("Could not delete Sample Loop, because it does not exist");
663  }
664  pNewLoops[o] = pSampleLoops[i];
665  o++;
666  }
667  // free the old array and update the member variables
668  if (SampleLoops) delete[] pSampleLoops;
669  pSampleLoops = pNewLoops;
670  SampleLoops--;
671  }
672 
679  void Sampler::CopyAssign(const Sampler* orig) {
680  // copy trivial scalars
681  UnityNote = orig->UnityNote;
682  FineTune = orig->FineTune;
683  Gain = orig->Gain;
684  NoSampleDepthTruncation = orig->NoSampleDepthTruncation;
685  NoSampleCompression = orig->NoSampleCompression;
686  SamplerOptions = orig->SamplerOptions;
687 
688  // copy sample loops
689  if (SampleLoops) delete[] pSampleLoops;
690  pSampleLoops = new sample_loop_t[orig->SampleLoops];
691  memcpy(pSampleLoops, orig->pSampleLoops, orig->SampleLoops * sizeof(sample_loop_t));
692  SampleLoops = orig->SampleLoops;
693  }
694 
695 
696 // *************** Sample ***************
697 // *
698 
714  Sample::Sample(File* pFile, RIFF::List* waveList, unsigned long WavePoolOffset) : Resource(pFile, waveList) {
715  pWaveList = waveList;
716  ulWavePoolOffset = WavePoolOffset - LIST_HEADER_SIZE;
717  pCkFormat = waveList->GetSubChunk(CHUNK_ID_FMT);
718  pCkData = waveList->GetSubChunk(CHUNK_ID_DATA);
719  if (pCkFormat) {
720  // common fields
726  // PCM format specific
729  FrameSize = (BitDepth / 8) * Channels;
730  } else { // unsupported sample data format
731  BitDepth = 0;
732  FrameSize = 0;
733  }
734  } else { // 'fmt' chunk missing
736  BitDepth = 16;
737  Channels = 1;
738  SamplesPerSecond = 44100;
740  FrameSize = (BitDepth / 8) * Channels;
742  }
744  : 0
745  : 0;
746  }
747 
755  pParent->DeleteSubChunk(pWaveList);
756  }
757 
769  void Sample::CopyAssignCore(const Sample* orig) {
770  // handle base classes
771  Resource::CopyAssign(orig);
772  // handle actual own attributes of this class
773  FormatTag = orig->FormatTag;
774  Channels = orig->Channels;
777  BlockAlign = orig->BlockAlign;
778  BitDepth = orig->BitDepth;
779  SamplesTotal = orig->SamplesTotal;
780  FrameSize = orig->FrameSize;
781  }
782 
789  void Sample::CopyAssign(const Sample* orig) {
790  CopyAssignCore(orig);
791 
792  // copy sample waveform data (reading directly from disc)
793  Resize(orig->GetSize());
794  char* buf = (char*) LoadSampleData();
795  Sample* pOrig = (Sample*) orig; //HACK: circumventing the constness here for now
796  const unsigned long restorePos = pOrig->pCkData->GetPos();
797  pOrig->SetPos(0);
798  for (unsigned long todo = pOrig->GetSize(), i = 0; todo; ) {
799  const int iReadAtOnce = 64*1024;
800  unsigned long n = (iReadAtOnce < todo) ? iReadAtOnce : todo;
801  n = pOrig->Read(&buf[i], n);
802  if (!n) break;
803  todo -= n;
804  i += (n * pOrig->FrameSize);
805  }
806  pOrig->pCkData->SetPos(restorePos);
807  }
808 
836  return (pCkData) ? pCkData->LoadChunkData() : NULL;
837  }
838 
846  }
847 
858  unsigned long Sample::GetSize() const {
859  if (FormatTag != DLS_WAVE_FORMAT_PCM) return 0;
860  return (pCkData) ? pCkData->GetSize() / FrameSize : 0;
861  }
862 
891  void Sample::Resize(int iNewSize) {
892  if (FormatTag != DLS_WAVE_FORMAT_PCM) throw Exception("Sample's format is not DLS_WAVE_FORMAT_PCM");
893  if (iNewSize < 1) throw Exception("Sample size must be at least one sample point");
894  const int iSizeInBytes = iNewSize * FrameSize;
896  if (pCkData) pCkData->Resize(iSizeInBytes);
897  else pCkData = pWaveList->AddSubChunk(CHUNK_ID_DATA, iSizeInBytes);
898  }
899 
916  unsigned long Sample::SetPos(unsigned long SampleCount, RIFF::stream_whence_t Whence) {
917  if (FormatTag != DLS_WAVE_FORMAT_PCM) return 0; // failed: wave data not PCM format
918  if (!pCkData) throw Exception("No data chunk created for sample yet, call Sample::Resize() to create one");
919  unsigned long orderedBytes = SampleCount * FrameSize;
920  unsigned long result = pCkData->SetPos(orderedBytes, Whence);
921  return (result == orderedBytes) ? SampleCount
922  : result / FrameSize;
923  }
924 
934  unsigned long Sample::Read(void* pBuffer, unsigned long SampleCount) {
935  if (FormatTag != DLS_WAVE_FORMAT_PCM) return 0; // failed: wave data not PCM format
936  return pCkData->Read(pBuffer, SampleCount, FrameSize); // FIXME: channel inversion due to endian correction?
937  }
938 
954  unsigned long Sample::Write(void* pBuffer, unsigned long SampleCount) {
955  if (FormatTag != DLS_WAVE_FORMAT_PCM) return 0; // failed: wave data not PCM format
956  if (GetSize() < SampleCount) throw Exception("Could not write sample data, current sample size to small");
957  return pCkData->Write(pBuffer, SampleCount, FrameSize); // FIXME: channel inversion due to endian correction?
958  }
959 
968  void Sample::UpdateChunks(progress_t* pProgress) {
970  throw Exception("Could not save sample, only PCM format is supported");
971  // we refuse to do anything if not sample wave form was provided yet
972  if (!pCkData)
973  throw Exception("Could not save sample, there is no sample data to save");
974  // update chunks of base class as well
975  Resource::UpdateChunks(pProgress);
976  // make sure 'fmt' chunk exists
978  if (!pCkFormat) pCkFormat = pWaveList->AddSubChunk(CHUNK_ID_FMT, 16); // assumes PCM format
979  uint8_t* pData = (uint8_t*) pCkFormat->LoadChunkData();
980  // update 'fmt' chunk
981  store16(&pData[0], FormatTag);
982  store16(&pData[2], Channels);
983  store32(&pData[4], SamplesPerSecond);
984  store32(&pData[8], AverageBytesPerSecond);
985  store16(&pData[12], BlockAlign);
986  store16(&pData[14], BitDepth); // assuming PCM format
987  }
988 
989 
990 
991 // *************** Region ***************
992 // *
993 
994  Region::Region(Instrument* pInstrument, RIFF::List* rgnList) : Resource(pInstrument, rgnList), Articulator(rgnList), Sampler(rgnList) {
995  pCkRegion = rgnList;
996 
997  // articulation informations
998  RIFF::Chunk* rgnh = rgnList->GetSubChunk(CHUNK_ID_RGNH);
999  if (rgnh) {
1000  rgnh->Read(&KeyRange, 2, 2);
1001  rgnh->Read(&VelocityRange, 2, 2);
1002  FormatOptionFlags = rgnh->ReadUint16();
1003  KeyGroup = rgnh->ReadUint16();
1004  // Layer is optional
1005  if (rgnh->RemainingBytes() >= sizeof(uint16_t)) {
1006  rgnh->Read(&Layer, 1, sizeof(uint16_t));
1007  } else Layer = 0;
1008  } else { // 'rgnh' chunk is missing
1009  KeyRange.low = 0;
1010  KeyRange.high = 127;
1011  VelocityRange.low = 0;
1012  VelocityRange.high = 127;
1014  KeyGroup = 0;
1015  Layer = 0;
1016  }
1018 
1019  // sample informations
1020  RIFF::Chunk* wlnk = rgnList->GetSubChunk(CHUNK_ID_WLNK);
1021  if (wlnk) {
1022  WaveLinkOptionFlags = wlnk->ReadUint16();
1023  PhaseGroup = wlnk->ReadUint16();
1024  Channel = wlnk->ReadUint32();
1025  WavePoolTableIndex = wlnk->ReadUint32();
1026  } else { // 'wlnk' chunk is missing
1027  WaveLinkOptionFlags = 0;
1028  PhaseGroup = 0;
1029  Channel = 0; // mono
1030  WavePoolTableIndex = 0; // first entry in wave pool table
1031  }
1034 
1035  pSample = NULL;
1036  }
1037 
1044  pParent->DeleteSubChunk(pCkRegion);
1045  }
1046 
1048  if (pSample) return pSample;
1049  File* file = (File*) GetParent()->GetParent();
1050  unsigned long soughtoffset = file->pWavePoolTable[WavePoolTableIndex];
1051  Sample* sample = file->GetFirstSample();
1052  while (sample) {
1053  if (sample->ulWavePoolOffset == soughtoffset) return (pSample = sample);
1054  sample = file->GetNextSample();
1055  }
1056  return NULL;
1057  }
1058 
1065  this->pSample = pSample;
1066  WavePoolTableIndex = 0; // we update this offset when we Save()
1067  }
1068 
1076  void Region::SetKeyRange(uint16_t Low, uint16_t High) {
1077  KeyRange.low = Low;
1078  KeyRange.high = High;
1079 
1080  // make sure regions are already loaded
1081  Instrument* pInstrument = (Instrument*) GetParent();
1082  if (!pInstrument->pRegions) pInstrument->LoadRegions();
1083  if (!pInstrument->pRegions) return;
1084 
1085  // find the r which is the first one to the right of this region
1086  // at its new position
1087  Region* r = NULL;
1088  Region* prev_region = NULL;
1089  for (
1090  Instrument::RegionList::iterator iter = pInstrument->pRegions->begin();
1091  iter != pInstrument->pRegions->end(); iter++
1092  ) {
1093  if ((*iter)->KeyRange.low > this->KeyRange.low) {
1094  r = *iter;
1095  break;
1096  }
1097  prev_region = *iter;
1098  }
1099 
1100  // place this region before r if it's not already there
1101  if (prev_region != this) pInstrument->MoveRegion(this, r);
1102  }
1103 
1112  // make sure 'rgnh' chunk exists
1114  if (!rgnh) rgnh = pCkRegion->AddSubChunk(CHUNK_ID_RGNH, Layer ? 14 : 12);
1115  uint8_t* pData = (uint8_t*) rgnh->LoadChunkData();
1119  // update 'rgnh' chunk
1120  store16(&pData[0], KeyRange.low);
1121  store16(&pData[2], KeyRange.high);
1122  store16(&pData[4], VelocityRange.low);
1123  store16(&pData[6], VelocityRange.high);
1124  store16(&pData[8], FormatOptionFlags);
1125  store16(&pData[10], KeyGroup);
1126  if (rgnh->GetSize() >= 14) store16(&pData[12], Layer);
1127 
1128  // update chunks of base classes as well (but skip Resource,
1129  // as a rgn doesn't seem to have dlid and INFO chunks)
1130  Articulator::UpdateChunks(pProgress);
1131  Sampler::UpdateChunks(pProgress);
1132 
1133  // make sure 'wlnk' chunk exists
1135  if (!wlnk) wlnk = pCkRegion->AddSubChunk(CHUNK_ID_WLNK, 12);
1136  pData = (uint8_t*) wlnk->LoadChunkData();
1143  // get sample's wave pool table index
1144  int index = -1;
1145  File* pFile = (File*) GetParent()->GetParent();
1146  if (pFile->pSamples) {
1147  File::SampleList::iterator iter = pFile->pSamples->begin();
1148  File::SampleList::iterator end = pFile->pSamples->end();
1149  for (int i = 0; iter != end; ++iter, i++) {
1150  if (*iter == pSample) {
1151  index = i;
1152  break;
1153  }
1154  }
1155  }
1156  WavePoolTableIndex = index;
1157  // update 'wlnk' chunk
1158  store16(&pData[0], WaveLinkOptionFlags);
1159  store16(&pData[2], PhaseGroup);
1160  store32(&pData[4], Channel);
1161  store32(&pData[8], WavePoolTableIndex);
1162  }
1163 
1173  void Region::CopyAssign(const Region* orig) {
1174  // handle base classes
1175  Resource::CopyAssign(orig);
1177  Sampler::CopyAssign(orig);
1178  // handle actual own attributes of this class
1179  // (the trivial ones)
1180  VelocityRange = orig->VelocityRange;
1181  KeyGroup = orig->KeyGroup;
1182  Layer = orig->Layer;
1184  PhaseMaster = orig->PhaseMaster;
1185  PhaseGroup = orig->PhaseGroup;
1186  MultiChannel = orig->MultiChannel;
1187  Channel = orig->Channel;
1188  // only take the raw sample reference if the two Region objects are
1189  // part of the same file
1190  if (GetParent()->GetParent() == orig->GetParent()->GetParent()) {
1192  pSample = orig->pSample;
1193  } else {
1194  WavePoolTableIndex = -1;
1195  pSample = NULL;
1196  }
1199  // handle the last, a bit sensible attribute
1200  SetKeyRange(orig->KeyRange.low, orig->KeyRange.high);
1201  }
1202 
1203 
1204 // *************** Instrument ***************
1205 // *
1206 
1220  Instrument::Instrument(File* pFile, RIFF::List* insList) : Resource(pFile, insList), Articulator(insList) {
1221  pCkInstrument = insList;
1222 
1223  midi_locale_t locale;
1225  if (insh) {
1226  Regions = insh->ReadUint32();
1227  insh->Read(&locale, 2, 4);
1228  } else { // 'insh' chunk missing
1229  Regions = 0;
1230  locale.bank = 0;
1231  locale.instrument = 0;
1232  }
1233 
1234  MIDIProgram = locale.instrument;
1235  IsDrum = locale.bank & DRUM_TYPE_MASK;
1236  MIDIBankCoarse = (uint8_t) MIDI_BANK_COARSE(locale.bank);
1237  MIDIBankFine = (uint8_t) MIDI_BANK_FINE(locale.bank);
1239 
1240  pRegions = NULL;
1241  }
1242 
1244  if (!pRegions) LoadRegions();
1245  if (!pRegions) return NULL;
1246  RegionsIterator = pRegions->begin();
1247  return (RegionsIterator != pRegions->end()) ? *RegionsIterator : NULL;
1248  }
1249 
1251  if (!pRegions) return NULL;
1252  RegionsIterator++;
1253  return (RegionsIterator != pRegions->end()) ? *RegionsIterator : NULL;
1254  }
1255 
1257  if (!pRegions) pRegions = new RegionList;
1259  if (lrgn) {
1260  uint32_t regionCkType = (lrgn->GetSubList(LIST_TYPE_RGN2)) ? LIST_TYPE_RGN2 : LIST_TYPE_RGN; // prefer regions level 2
1261  RIFF::List* rgn = lrgn->GetFirstSubList();
1262  while (rgn) {
1263  if (rgn->GetListType() == regionCkType) {
1264  pRegions->push_back(new Region(this, rgn));
1265  }
1266  rgn = lrgn->GetNextSubList();
1267  }
1268  }
1269  }
1270 
1272  if (!pRegions) LoadRegions();
1274  if (!lrgn) lrgn = pCkInstrument->AddSubList(LIST_TYPE_LRGN);
1275  RIFF::List* rgn = lrgn->AddSubList(LIST_TYPE_RGN);
1276  Region* pNewRegion = new Region(this, rgn);
1277  pRegions->push_back(pNewRegion);
1278  Regions = pRegions->size();
1279  return pNewRegion;
1280  }
1281 
1282  void Instrument::MoveRegion(Region* pSrc, Region* pDst) {
1284  lrgn->MoveSubChunk(pSrc->pCkRegion, (RIFF::Chunk*) (pDst ? pDst->pCkRegion : 0));
1285 
1286  pRegions->remove(pSrc);
1287  RegionList::iterator iter = find(pRegions->begin(), pRegions->end(), pDst);
1288  pRegions->insert(iter, pSrc);
1289  }
1290 
1292  if (!pRegions) return;
1293  RegionList::iterator iter = find(pRegions->begin(), pRegions->end(), pRegion);
1294  if (iter == pRegions->end()) return;
1295  pRegions->erase(iter);
1296  Regions = pRegions->size();
1297  delete pRegion;
1298  }
1299 
1308  // first update base classes' chunks
1309  Resource::UpdateChunks(pProgress);
1310  Articulator::UpdateChunks(pProgress);
1311  // make sure 'insh' chunk exists
1313  if (!insh) insh = pCkInstrument->AddSubChunk(CHUNK_ID_INSH, 12);
1314  uint8_t* pData = (uint8_t*) insh->LoadChunkData();
1315  // update 'insh' chunk
1316  Regions = (pRegions) ? pRegions->size() : 0;
1317  midi_locale_t locale;
1318  locale.instrument = MIDIProgram;
1320  locale.bank = (IsDrum) ? locale.bank | DRUM_TYPE_MASK : locale.bank & (~DRUM_TYPE_MASK);
1321  MIDIBank = MIDI_BANK_MERGE(MIDIBankCoarse, MIDIBankFine); // just a sync, when we're at it
1322  store32(&pData[0], Regions);
1323  store32(&pData[4], locale.bank);
1324  store32(&pData[8], locale.instrument);
1325  // update Region's chunks
1326  if (!pRegions) return;
1327  RegionList::iterator iter = pRegions->begin();
1328  RegionList::iterator end = pRegions->end();
1329  for (int i = 0; iter != end; ++iter, ++i) {
1330  // divide local progress into subprogress
1331  progress_t subprogress;
1332  __divide_progress(pProgress, &subprogress, pRegions->size(), i);
1333  // do the actual work
1334  (*iter)->UpdateChunks(&subprogress);
1335  }
1336  __notify_progress(pProgress, 1.0); // notify done
1337  }
1338 
1345  if (pRegions) {
1346  RegionList::iterator iter = pRegions->begin();
1347  RegionList::iterator end = pRegions->end();
1348  while (iter != end) {
1349  delete *iter;
1350  iter++;
1351  }
1352  delete pRegions;
1353  }
1354  // remove instrument's chunks
1356  pParent->DeleteSubChunk(pCkInstrument);
1357  }
1358 
1360  // handle base classes
1361  Resource::CopyAssign(orig);
1363  // handle actual own attributes of this class
1364  // (the trivial ones)
1365  IsDrum = orig->IsDrum;
1366  MIDIBank = orig->MIDIBank;
1368  MIDIBankFine = orig->MIDIBankFine;
1369  MIDIProgram = orig->MIDIProgram;
1370  }
1371 
1382  CopyAssignCore(orig);
1383  // delete all regions first
1384  while (Regions) DeleteRegion(GetFirstRegion());
1385  // now recreate and copy regions
1386  {
1387  RegionList::const_iterator it = orig->pRegions->begin();
1388  for (int i = 0; i < orig->Regions; ++i, ++it) {
1389  Region* dstRgn = AddRegion();
1390  //NOTE: Region does semi-deep copy !
1391  dstRgn->CopyAssign(*it);
1392  }
1393  }
1394  }
1395 
1396 
1397 // *************** File ***************
1398 // *
1399 
1406  File::File() : Resource(NULL, pRIFF = new RIFF::File(RIFF_TYPE_DLS)) {
1408  pVersion = new version_t;
1409  pVersion->major = 0;
1410  pVersion->minor = 0;
1411  pVersion->release = 0;
1412  pVersion->build = 0;
1413 
1414  Instruments = 0;
1415  WavePoolCount = 0;
1416  pWavePoolTable = NULL;
1417  pWavePoolTableHi = NULL;
1418  WavePoolHeaderSize = 8;
1419 
1420  pSamples = NULL;
1421  pInstruments = NULL;
1422 
1423  b64BitWavePoolOffsets = false;
1424  }
1425 
1436  if (!pRIFF) throw DLS::Exception("NULL pointer reference to RIFF::File object.");
1437  this->pRIFF = pRIFF;
1438 
1439  RIFF::Chunk* ckVersion = pRIFF->GetSubChunk(CHUNK_ID_VERS);
1440  if (ckVersion) {
1441  pVersion = new version_t;
1442  ckVersion->Read(pVersion, 4, 2);
1443  }
1444  else pVersion = NULL;
1445 
1446  RIFF::Chunk* colh = pRIFF->GetSubChunk(CHUNK_ID_COLH);
1447  if (!colh) throw DLS::Exception("Mandatory chunks in RIFF list chunk not found.");
1448  Instruments = colh->ReadUint32();
1449 
1450  RIFF::Chunk* ptbl = pRIFF->GetSubChunk(CHUNK_ID_PTBL);
1451  if (!ptbl) { // pool table is missing - this is probably an ".art" file
1452  WavePoolCount = 0;
1453  pWavePoolTable = NULL;
1454  pWavePoolTableHi = NULL;
1455  WavePoolHeaderSize = 8;
1456  b64BitWavePoolOffsets = false;
1457  } else {
1458  WavePoolHeaderSize = ptbl->ReadUint32();
1459  WavePoolCount = ptbl->ReadUint32();
1460  pWavePoolTable = new uint32_t[WavePoolCount];
1461  pWavePoolTableHi = new uint32_t[WavePoolCount];
1462  ptbl->SetPos(WavePoolHeaderSize);
1463 
1464  // Check for 64 bit offsets (used in gig v3 files)
1466  if (b64BitWavePoolOffsets) {
1467  for (int i = 0 ; i < WavePoolCount ; i++) {
1468  pWavePoolTableHi[i] = ptbl->ReadUint32();
1469  pWavePoolTable[i] = ptbl->ReadUint32();
1470  if (pWavePoolTable[i] & 0x80000000)
1471  throw DLS::Exception("Files larger than 2 GB not yet supported");
1472  }
1473  } else { // conventional 32 bit offsets
1474  ptbl->Read(pWavePoolTable, WavePoolCount, sizeof(uint32_t));
1475  for (int i = 0 ; i < WavePoolCount ; i++) pWavePoolTableHi[i] = 0;
1476  }
1477  }
1478 
1479  pSamples = NULL;
1480  pInstruments = NULL;
1481  }
1482 
1484  if (pInstruments) {
1485  InstrumentList::iterator iter = pInstruments->begin();
1486  InstrumentList::iterator end = pInstruments->end();
1487  while (iter != end) {
1488  delete *iter;
1489  iter++;
1490  }
1491  delete pInstruments;
1492  }
1493 
1494  if (pSamples) {
1495  SampleList::iterator iter = pSamples->begin();
1496  SampleList::iterator end = pSamples->end();
1497  while (iter != end) {
1498  delete *iter;
1499  iter++;
1500  }
1501  delete pSamples;
1502  }
1503 
1504  if (pWavePoolTable) delete[] pWavePoolTable;
1505  if (pWavePoolTableHi) delete[] pWavePoolTableHi;
1506  if (pVersion) delete pVersion;
1507  for (std::list<RIFF::File*>::iterator i = ExtensionFiles.begin() ; i != ExtensionFiles.end() ; i++)
1508  delete *i;
1509  }
1510 
1512  if (!pSamples) LoadSamples();
1513  if (!pSamples) return NULL;
1514  SamplesIterator = pSamples->begin();
1515  return (SamplesIterator != pSamples->end()) ? *SamplesIterator : NULL;
1516  }
1517 
1519  if (!pSamples) return NULL;
1520  SamplesIterator++;
1521  return (SamplesIterator != pSamples->end()) ? *SamplesIterator : NULL;
1522  }
1523 
1525  if (!pSamples) pSamples = new SampleList;
1527  if (wvpl) {
1528  unsigned long wvplFileOffset = wvpl->GetFilePos();
1529  RIFF::List* wave = wvpl->GetFirstSubList();
1530  while (wave) {
1531  if (wave->GetListType() == LIST_TYPE_WAVE) {
1532  unsigned long waveFileOffset = wave->GetFilePos();
1533  pSamples->push_back(new Sample(this, wave, waveFileOffset - wvplFileOffset));
1534  }
1535  wave = wvpl->GetNextSubList();
1536  }
1537  }
1538  else { // Seen a dwpl list chunk instead of a wvpl list chunk in some file (officially not DLS compliant)
1540  if (dwpl) {
1541  unsigned long dwplFileOffset = dwpl->GetFilePos();
1542  RIFF::List* wave = dwpl->GetFirstSubList();
1543  while (wave) {
1544  if (wave->GetListType() == LIST_TYPE_WAVE) {
1545  unsigned long waveFileOffset = wave->GetFilePos();
1546  pSamples->push_back(new Sample(this, wave, waveFileOffset - dwplFileOffset));
1547  }
1548  wave = dwpl->GetNextSubList();
1549  }
1550  }
1551  }
1552  }
1553 
1562  if (!pSamples) LoadSamples();
1565  // create new Sample object and its respective 'wave' list chunk
1566  RIFF::List* wave = wvpl->AddSubList(LIST_TYPE_WAVE);
1567  Sample* pSample = new Sample(this, wave, 0 /*arbitrary value, we update offsets when we save*/);
1568  pSamples->push_back(pSample);
1569  return pSample;
1570  }
1571 
1579  void File::DeleteSample(Sample* pSample) {
1580  if (!pSamples) return;
1581  SampleList::iterator iter = find(pSamples->begin(), pSamples->end(), pSample);
1582  if (iter == pSamples->end()) return;
1583  pSamples->erase(iter);
1584  delete pSample;
1585  }
1586 
1588  if (!pInstruments) LoadInstruments();
1589  if (!pInstruments) return NULL;
1590  InstrumentsIterator = pInstruments->begin();
1591  return (InstrumentsIterator != pInstruments->end()) ? *InstrumentsIterator : NULL;
1592  }
1593 
1595  if (!pInstruments) return NULL;
1597  return (InstrumentsIterator != pInstruments->end()) ? *InstrumentsIterator : NULL;
1598  }
1599 
1602  RIFF::List* lstInstruments = pRIFF->GetSubList(LIST_TYPE_LINS);
1603  if (lstInstruments) {
1604  RIFF::List* lstInstr = lstInstruments->GetFirstSubList();
1605  while (lstInstr) {
1606  if (lstInstr->GetListType() == LIST_TYPE_INS) {
1607  pInstruments->push_back(new Instrument(this, lstInstr));
1608  }
1609  lstInstr = lstInstruments->GetNextSubList();
1610  }
1611  }
1612  }
1613 
1622  if (!pInstruments) LoadInstruments();
1624  RIFF::List* lstInstruments = pRIFF->GetSubList(LIST_TYPE_LINS);
1625  RIFF::List* lstInstr = lstInstruments->AddSubList(LIST_TYPE_INS);
1626  Instrument* pInstrument = new Instrument(this, lstInstr);
1627  pInstruments->push_back(pInstrument);
1628  return pInstrument;
1629  }
1630 
1638  void File::DeleteInstrument(Instrument* pInstrument) {
1639  if (!pInstruments) return;
1640  InstrumentList::iterator iter = find(pInstruments->begin(), pInstruments->end(), pInstrument);
1641  if (iter == pInstruments->end()) return;
1642  pInstruments->erase(iter);
1643  delete pInstrument;
1644  }
1645 
1659  if (index < 0 || index >= ExtensionFiles.size()) return NULL;
1660  std::list<RIFF::File*>::iterator iter = ExtensionFiles.begin();
1661  for (int i = 0; iter != ExtensionFiles.end(); ++iter, ++i)
1662  if (i == index) return *iter;
1663  return NULL;
1664  }
1665 
1676  return pRIFF->GetFileName();
1677  }
1678 
1683  void File::SetFileName(const String& name) {
1684  pRIFF->SetFileName(name);
1685  }
1686 
1695  void File::UpdateChunks(progress_t* pProgress) {
1696  // first update base class's chunks
1697  Resource::UpdateChunks(pProgress);
1698 
1699  // if version struct exists, update 'vers' chunk
1700  if (pVersion) {
1701  RIFF::Chunk* ckVersion = pRIFF->GetSubChunk(CHUNK_ID_VERS);
1702  if (!ckVersion) ckVersion = pRIFF->AddSubChunk(CHUNK_ID_VERS, 8);
1703  uint8_t* pData = (uint8_t*) ckVersion->LoadChunkData();
1704  store16(&pData[0], pVersion->minor);
1705  store16(&pData[2], pVersion->major);
1706  store16(&pData[4], pVersion->build);
1707  store16(&pData[6], pVersion->release);
1708  }
1709 
1710  // update 'colh' chunk
1711  Instruments = (pInstruments) ? pInstruments->size() : 0;
1713  if (!colh) colh = pRIFF->AddSubChunk(CHUNK_ID_COLH, 4);
1714  uint8_t* pData = (uint8_t*) colh->LoadChunkData();
1715  store32(pData, Instruments);
1716 
1717  // update instrument's chunks
1718  if (pInstruments) {
1719  // divide local progress into subprogress
1720  progress_t subprogress;
1721  __divide_progress(pProgress, &subprogress, 20.f, 0.f); // arbitrarily subdivided into 5% of total progress
1722 
1723  // do the actual work
1724  InstrumentList::iterator iter = pInstruments->begin();
1725  InstrumentList::iterator end = pInstruments->end();
1726  for (int i = 0; iter != end; ++iter, ++i) {
1727  // divide subprogress into sub-subprogress
1728  progress_t subsubprogress;
1729  __divide_progress(&subprogress, &subsubprogress, pInstruments->size(), i);
1730  // do the actual work
1731  (*iter)->UpdateChunks(&subsubprogress);
1732  }
1733 
1734  __notify_progress(&subprogress, 1.0); // notify subprogress done
1735  }
1736 
1737  // update 'ptbl' chunk
1738  const int iSamples = (pSamples) ? pSamples->size() : 0;
1739  const int iPtblOffsetSize = (b64BitWavePoolOffsets) ? 8 : 4;
1741  if (!ptbl) ptbl = pRIFF->AddSubChunk(CHUNK_ID_PTBL, 1 /*anything, we'll resize*/);
1742  const int iPtblSize = WavePoolHeaderSize + iPtblOffsetSize * iSamples;
1743  ptbl->Resize(iPtblSize);
1744  pData = (uint8_t*) ptbl->LoadChunkData();
1745  WavePoolCount = iSamples;
1746  store32(&pData[4], WavePoolCount);
1747  // we actually update the sample offsets in the pool table when we Save()
1748  memset(&pData[WavePoolHeaderSize], 0, iPtblSize - WavePoolHeaderSize);
1749 
1750  // update sample's chunks
1751  if (pSamples) {
1752  // divide local progress into subprogress
1753  progress_t subprogress;
1754  __divide_progress(pProgress, &subprogress, 20.f, 1.f); // arbitrarily subdivided into 95% of total progress
1755 
1756  // do the actual work
1757  SampleList::iterator iter = pSamples->begin();
1758  SampleList::iterator end = pSamples->end();
1759  for (int i = 0; iter != end; ++iter, ++i) {
1760  // divide subprogress into sub-subprogress
1761  progress_t subsubprogress;
1762  __divide_progress(&subprogress, &subsubprogress, pSamples->size(), i);
1763  // do the actual work
1764  (*iter)->UpdateChunks(&subsubprogress);
1765  }
1766 
1767  __notify_progress(&subprogress, 1.0); // notify subprogress done
1768  }
1769 
1770  __notify_progress(pProgress, 1.0); // notify done
1771  }
1772 
1787  void File::Save(const String& Path, progress_t* pProgress) {
1788  {
1789  // divide local progress into subprogress
1790  progress_t subprogress;
1791  __divide_progress(pProgress, &subprogress, 2.f, 0.f); // arbitrarily subdivided into 50% of total progress
1792  // do the actual work
1793  UpdateChunks(&subprogress);
1794 
1795  }
1796  {
1797  // divide local progress into subprogress
1798  progress_t subprogress;
1799  __divide_progress(pProgress, &subprogress, 2.f, 1.f); // arbitrarily subdivided into 50% of total progress
1800  // do the actual work
1801  pRIFF->Save(Path, &subprogress);
1802  }
1804  __notify_progress(pProgress, 1.0); // notify done
1805  }
1806 
1817  void File::Save(progress_t* pProgress) {
1818  {
1819  // divide local progress into subprogress
1820  progress_t subprogress;
1821  __divide_progress(pProgress, &subprogress, 2.f, 0.f); // arbitrarily subdivided into 50% of total progress
1822  // do the actual work
1823  UpdateChunks(&subprogress);
1824  }
1825  {
1826  // divide local progress into subprogress
1827  progress_t subprogress;
1828  __divide_progress(pProgress, &subprogress, 2.f, 1.f); // arbitrarily subdivided into 50% of total progress
1829  // do the actual work
1830  pRIFF->Save(&subprogress);
1831  }
1833  __notify_progress(pProgress, 1.0); // notify done
1834  }
1835 
1847  __UpdateWavePoolTableChunk();
1848  }
1849 
1856  // enusre 'lins' list chunk exists (mandatory for instrument definitions)
1857  RIFF::List* lstInstruments = pRIFF->GetSubList(LIST_TYPE_LINS);
1858  if (!lstInstruments) pRIFF->AddSubList(LIST_TYPE_LINS);
1859  // ensure 'ptbl' chunk exists (mandatory for samples)
1861  if (!ptbl) {
1862  const int iOffsetSize = (b64BitWavePoolOffsets) ? 8 : 4;
1863  ptbl = pRIFF->AddSubChunk(CHUNK_ID_PTBL, WavePoolHeaderSize + iOffsetSize);
1864  }
1865  // enusre 'wvpl' list chunk exists (mandatory for samples)
1867  if (!wvpl) pRIFF->AddSubList(LIST_TYPE_WVPL);
1868  }
1869 
1879  void File::__UpdateWavePoolTableChunk() {
1880  __UpdateWavePoolTable();
1882  const int iOffsetSize = (b64BitWavePoolOffsets) ? 8 : 4;
1883  // check if 'ptbl' chunk is large enough
1884  WavePoolCount = (pSamples) ? pSamples->size() : 0;
1885  const unsigned long ulRequiredSize = WavePoolHeaderSize + iOffsetSize * WavePoolCount;
1886  if (ptbl->GetSize() < ulRequiredSize) throw Exception("Fatal error, 'ptbl' chunk too small");
1887  // save the 'ptbl' chunk's current read/write position
1888  unsigned long ulOriginalPos = ptbl->GetPos();
1889  // update headers
1890  ptbl->SetPos(0);
1891  uint32_t tmp = WavePoolHeaderSize;
1892  ptbl->WriteUint32(&tmp);
1893  tmp = WavePoolCount;
1894  ptbl->WriteUint32(&tmp);
1895  // update offsets
1896  ptbl->SetPos(WavePoolHeaderSize);
1897  if (b64BitWavePoolOffsets) {
1898  for (int i = 0 ; i < WavePoolCount ; i++) {
1899  tmp = pWavePoolTableHi[i];
1900  ptbl->WriteUint32(&tmp);
1901  tmp = pWavePoolTable[i];
1902  ptbl->WriteUint32(&tmp);
1903  }
1904  } else { // conventional 32 bit offsets
1905  for (int i = 0 ; i < WavePoolCount ; i++) {
1906  tmp = pWavePoolTable[i];
1907  ptbl->WriteUint32(&tmp);
1908  }
1909  }
1910  // restore 'ptbl' chunk's original read/write position
1911  ptbl->SetPos(ulOriginalPos);
1912  }
1913 
1919  void File::__UpdateWavePoolTable() {
1920  WavePoolCount = (pSamples) ? pSamples->size() : 0;
1921  // resize wave pool table arrays
1922  if (pWavePoolTable) delete[] pWavePoolTable;
1923  if (pWavePoolTableHi) delete[] pWavePoolTableHi;
1924  pWavePoolTable = new uint32_t[WavePoolCount];
1925  pWavePoolTableHi = new uint32_t[WavePoolCount];
1926  if (!pSamples) return;
1927  // update offsets int wave pool table
1929  uint64_t wvplFileOffset = wvpl->GetFilePos();
1930  if (b64BitWavePoolOffsets) {
1931  SampleList::iterator iter = pSamples->begin();
1932  SampleList::iterator end = pSamples->end();
1933  for (int i = 0 ; iter != end ; ++iter, i++) {
1934  uint64_t _64BitOffset = (*iter)->pWaveList->GetFilePos() - wvplFileOffset - LIST_HEADER_SIZE;
1935  (*iter)->ulWavePoolOffset = _64BitOffset;
1936  pWavePoolTableHi[i] = (uint32_t) (_64BitOffset >> 32);
1937  pWavePoolTable[i] = (uint32_t) _64BitOffset;
1938  }
1939  } else { // conventional 32 bit offsets
1940  SampleList::iterator iter = pSamples->begin();
1941  SampleList::iterator end = pSamples->end();
1942  for (int i = 0 ; iter != end ; ++iter, i++) {
1943  uint64_t _64BitOffset = (*iter)->pWaveList->GetFilePos() - wvplFileOffset - LIST_HEADER_SIZE;
1944  (*iter)->ulWavePoolOffset = _64BitOffset;
1945  pWavePoolTable[i] = (uint32_t) _64BitOffset;
1946  }
1947  }
1948  }
1949 
1950 
1951 
1952 // *************** Exception ***************
1953 // *
1954 
1956  }
1957 
1959  std::cout << "DLS::Exception: " << Message << std::endl;
1960  }
1961 
1962 
1963 // *************** functions ***************
1964 // *
1965 
1972  return PACKAGE;
1973  }
1974 
1980  return VERSION;
1981  }
1982 
1983 } // namespace DLS
virtual void CopyAssign(const Instrument *orig)
Make a (semi) deep copy of the Instrument object given by orig and assign it to this object...
Definition: DLS.cpp:1381
#define CONN_TRANSFORM_BIPOLAR_CTL_ENCODE(x)
Definition: DLS.cpp:51
unsigned long WriteUint32(uint32_t *pData, unsigned long WordCount=1)
Writes WordCount number of 32 Bit unsigned integer words from the buffer pointed by pData to the chun...
Definition: RIFF.cpp:649
uint16_t BlockAlign
The block alignment (in bytes) of the waveform data. Playback software needs to process a multiple of...
Definition: DLS.h:401
#define LIST_TYPE_DWPL
Seen on some files instead of a wvpl list chunk.
Definition: DLS.h:66
sample_loop_t * pSampleLoops
Points to the beginning of a sample loop array, or is NULL if there are no loops defined.
Definition: DLS.h:372
uint32_t Regions
Reflects the number of Region defintions this Instrument has.
Definition: DLS.h:466
range_t VelocityRange
Definition: DLS.h:432
bool SourceBipolar
Definition: DLS.h:249
Parses DLS Level 1 and 2 compliant files and provides abstract access to the data.
Definition: DLS.h:496
File()
Constructor.
Definition: DLS.cpp:1406
stream_whence_t
File stream position dependent to these relations.
Definition: RIFF.h:159
uint16_t Layer
Definition: DLS.h:434
unsigned long Read(void *pData, unsigned long WordCount, unsigned long WordSize)
Reads WordCount number of data words with given WordSize and copies it into a buffer pointed by pData...
Definition: RIFF.cpp:296
String CreationDate
<ICRD-ck>. Specifies the date the subject of the file was created. List dates in yyyy-mm-dd format...
Definition: DLS.h:309
Chunk * GetFirstSubChunk()
Returns the first subchunk within the list.
Definition: RIFF.cpp:1070
virtual ~Articulation()
Definition: DLS.cpp:140
#define F_WAVELINK_PHASE_MASTER
Definition: DLS.cpp:59
#define LIST_TYPE_WAVE
Definition: DLS.h:67
#define CHUNK_ID_ARTL
Definition: DLS.h:95
#define CHUNK_ID_ISBJ
Definition: DLS.h:81
uint32_t GetChunkID()
Chunk ID in unsigned integer representation.
Definition: RIFF.h:209
String Engineer
<IENG-ck>. Stores the name of the engineer who worked on the file. Multiple engineer names are separa...
Definition: DLS.h:316
virtual void SetKeyRange(uint16_t Low, uint16_t High)
Modifies the key range of this Region and makes sure the respective chunks are in correct order...
Definition: DLS.cpp:1076
void __ensureMandatoryChunksExist()
Checks if all (for DLS) mandatory chunks exist, if not they will be created.
Definition: DLS.cpp:1855
String Artists
<IART-ck>. Lists the artist of the original subject of the file.
Definition: DLS.h:313
#define CHUNK_ID_ISRF
Definition: DLS.h:83
#define LIST_TYPE_LART
Definition: DLS.h:71
Sample * GetFirstSample()
Returns a pointer to the first Sample object of the file, NULL otherwise.
Definition: DLS.cpp:1511
Instrument * GetNextInstrument()
Returns a pointer to the next Instrument object of the file, NULL otherwise.
Definition: DLS.cpp:1594
std::string String
Definition: DLS.h:106
Will be thrown whenever a DLS specific error occurs while trying to access a DLS File.
Definition: DLS.h:551
conn_trn_t SourceTransform
Definition: DLS.h:247
Optional information for DLS files, instruments, samples, etc.
Definition: DLS.h:305
virtual void CopyAssign(const Region *orig)
Make a (semi) deep copy of the Region object given by orig and assign it to this object.
Definition: DLS.cpp:1173
unsigned long Read(void *pBuffer, unsigned long SampleCount)
Reads SampleCount number of sample points from the current position into the buffer pointed by pBuffe...
Definition: DLS.cpp:934
uint16_t KeyGroup
Definition: DLS.h:433
virtual void UpdateChunks(progress_t *pProgress)
Update chunks with current Resource data.
Definition: DLS.cpp:476
#define CONN_TRANSFORM_INVERT_SRC_ENCODE(x)
Definition: DLS.cpp:52
RIFF::File * GetExtensionFile(int index)
Returns extension file of given index.
Definition: DLS.cpp:1658
virtual ~Region()
Destructor.
Definition: DLS.cpp:1042
Instrument * AddInstrument()
Add a new instrument definition.
Definition: DLS.cpp:1621
#define CHUNK_ID_PTBL
Definition: DLS.h:92
#define LIST_TYPE_WVPL
Definition: DLS.h:65
String GetFileName()
Definition: RIFF.cpp:1632
RIFF::List * pCkRegion
Definition: DLS.h:447
Instrument * GetFirstInstrument()
Returns a pointer to the first Instrument object of the file, NULL otherwise.
Definition: DLS.cpp:1587
String Keywords
<IKEY-ck>. Provides a list of keywords that refer to the file or subject of the file. Keywords are separated with semicolon and blank, e.g., FX; death; murder.
Definition: DLS.h:315
#define DLS_WAVE_FORMAT_PCM
Definition: DLS.h:99
unsigned long GetSize() const
Returns sample size.
Definition: DLS.cpp:858
#define CHUNK_ID_ART2
Definition: DLS.h:96
#define CONN_TRANSFORM_DST(x)
Definition: DLS.cpp:40
std::list< Articulation * > ArticulationList
Definition: DLS.h:295
conn_src_t
Connection Sources.
Definition: DLS.h:126
unsigned long SetPos(unsigned long Where, stream_whence_t Whence=stream_start)
Sets the position within the chunk body, thus within the data portion of the chunk (in bytes)...
Definition: RIFF.cpp:215
#define CONN_TRANSFORM_SRC_ENCODE(x)
Definition: DLS.cpp:47
#define CHUNK_ID_ICMT
Definition: RIFF.h:99
#define CHUNK_ID_ISFT
Definition: RIFF.h:105
friend class Region
Definition: DLS.h:490
uint32_t * pWavePoolTable
Definition: DLS.h:530
#define CHUNK_ID_IMED
Definition: DLS.h:80
uint32_t WavePoolTableIndex
Definition: DLS.h:448
#define CHUNK_ID_IPRD
Definition: RIFF.h:104
uint16_t Channels
Number of channels represented in the waveform data, e.g. 1 for mono, 2 for stereo (defaults to 1=mon...
Definition: DLS.h:398
#define CONN_TRANSFORM_BIPOLAR_SRC(x)
Definition: DLS.cpp:41
virtual ~Info()
Definition: DLS.cpp:282
#define LIST_HEADER_SIZE
Definition: RIFF.h:112
RIFF::List * pCkInstrument
Definition: DLS.h:481
uint32_t SamplerOptions
Definition: DLS.h:382
virtual ~Resource()
Definition: DLS.cpp:461
#define CHUNK_ID_DATA
Definition: DLS.h:88
String SourceForm
<ISRF-ck>. Identifies the original form of the material that was digitized, such as record...
Definition: DLS.h:321
int16_t FineTune
Definition: DLS.h:367
bool ControlInvert
Definition: DLS.h:252
Sampler(RIFF::List *ParentList)
Definition: DLS.cpp:550
List * GetSubList(uint32_t ListType)
Returns sublist chunk with list type ListType within this chunk list.
Definition: RIFF.cpp:1045
void DeleteSubChunk(Chunk *pSubChunk)
Removes a sub chunk.
Definition: RIFF.cpp:1297
Defines Sample Loop Points.
Definition: DLS.h:230
#define LIST_TYPE_RGN2
Definition: DLS.h:74
Region * AddRegion()
Definition: DLS.cpp:1271
unsigned long SetPos(unsigned long SampleCount, RIFF::stream_whence_t Whence=RIFF::stream_start)
Sets the position within the sample (in sample points, not in bytes).
Definition: DLS.cpp:916
virtual ~Sample()
Destructor.
Definition: DLS.cpp:753
void PrintMessage()
Definition: DLS.cpp:1958
virtual void LoadSamples()
Definition: DLS.cpp:1524
bool ControlBipolar
Definition: DLS.h:253
bool NoSampleCompression
Definition: DLS.h:370
uint16_t MIDIBank
Reflects combination of MIDIBankCoarse and MIDIBankFine (bank 1 - bank 16384). Do not change this val...
Definition: DLS.h:462
virtual void SetGain(int32_t gain)
Definition: DLS.cpp:586
#define CONN_TRANSFORM_BIPOLAR_CTL(x)
Definition: DLS.cpp:42
unsigned long RemainingBytes()
Returns the number of bytes left to read in the chunk body.
Definition: RIFF.cpp:247
#define RIFF_TYPE_DLS
Definition: DLS.h:64
void LoadString(RIFF::Chunk *ck, std::string &s, int strLength)
Definition: SF.cpp:60
List * GetFirstSubList()
Returns the first sublist within the list (that is a subchunk with chunk ID "LIST").
Definition: RIFF.cpp:1104
#define MIDI_BANK_MERGE(coarse, fine)
Definition: DLS.cpp:67
#define MIDI_BANK_FINE(x)
Definition: DLS.cpp:66
#define CHUNK_ID_IKEY
Definition: DLS.h:79
uint16_t minor
Definition: DLS.h:111
virtual void CopyAssign(const Info *orig)
Make a deep copy of the Info object given by orig and assign it to this object.
Definition: DLS.cpp:408
std::list< Sample * > SampleList
Definition: DLS.h:519
InstrumentList::iterator InstrumentsIterator
Definition: DLS.h:527
uint8_t MIDIBankCoarse
Reflects the MIDI Bank number for MIDI Control Change 0 (bank 1 - 128).
Definition: DLS.h:463
void GenerateDLSID()
Generates a new DLSID for the resource.
Definition: DLS.cpp:495
conn_dst_t Destination
Definition: DLS.h:254
uint FrameSize
Reflects the size (in bytes) of one single sample point (only if known sample data format is used...
Definition: DLS.h:404
#define MIDI_BANK_COARSE(x)
Definition: DLS.cpp:65
RIFF::Chunk * pCkFormat
Definition: DLS.h:418
unsigned long ReadUint32(uint32_t *pData, unsigned long WordCount=1)
Reads WordCount number of 32 Bit unsigned integer words and copies it into the buffer pointed by pDat...
Definition: RIFF.cpp:611
#define CHUNK_ID_IENG
Definition: RIFF.h:102
Every subject of an DLS file and the file itself can have an unique, computer generated ID...
Definition: DLS.h:118
unsigned long GetPos()
Position within the chunk data body.
Definition: RIFF.h:214
bool MultiChannel
Definition: DLS.h:438
#define F_WAVELINK_MULTICHANNEL
Definition: DLS.cpp:60
virtual void CopyAssign(const Sample *orig)
Make a deep copy of the Sample object given by orig and assign it to this object. ...
Definition: DLS.cpp:789
Region * GetFirstRegion()
Definition: DLS.cpp:1243
void DeleteSampleLoop(sample_loop_t *pLoopDef)
Deletes an existing sample loop.
Definition: DLS.cpp:655
virtual ~Instrument()
Destructor.
Definition: DLS.cpp:1344
uint16_t low
Low value of range.
Definition: DLS.h:206
void SetByteOrder(endian_t Endian)
Set the byte order to be used when saving.
Definition: RIFF.cpp:1763
#define CONN_TRANSFORM_BIPOLAR_SRC_ENCODE(x)
Definition: DLS.cpp:50
bool b64BitWavePoolOffsets
Definition: DLS.h:532
#define DRUM_TYPE_MASK
Definition: DLS.cpp:55
RIFF List Chunk.
Definition: RIFF.h:302
#define CHUNK_ID_WSMP
Definition: DLS.h:93
RIFF::Chunk * pCkData
Definition: DLS.h:417
#define CHUNK_ID_VERS
Definition: DLS.h:85
void SetFixedStringLengths(const string_length_t *lengths)
Forces specific Info fields to be of a fixed length when being saved to a file.
Definition: DLS.cpp:296
RegionList * pRegions
Definition: DLS.h:482
uint16_t FormatTag
Format ID of the waveform data (should be DLS_WAVE_FORMAT_PCM for DLS1 compliant files, this is also the default value if Sample was created with Instrument::AddSample()).
Definition: DLS.h:397
virtual void CopyAssign(const Sampler *orig)
Make a deep copy of the Sampler object given by orig and assign it to this object.
Definition: DLS.cpp:679
void ReleaseSampleData()
Free sample data from RAM.
Definition: DLS.cpp:844
#define CHUNK_ID_RGNH
Definition: DLS.h:90
virtual void CopyAssign(const Articulator *orig)
Not yet implemented in this version, since the .gig format does not need to copy DLS articulators and...
Definition: DLS.cpp:240
Abstract base class which provides mandatory informations about sample players in general...
Definition: DLS.h:364
bool SelfNonExclusive
Definition: DLS.h:435
String libraryName()
Returns the name of this C++ library.
Definition: DLS.cpp:1971
Sample * GetSample()
Definition: DLS.cpp:1047
Exception(String Message)
Definition: DLS.cpp:1955
#define CHUNK_ID_WLNK
Definition: DLS.h:91
#define CONN_TRANSFORM_DST_ENCODE(x)
Definition: DLS.cpp:49
conn_trn_t
Connection Transforms.
Definition: DLS.h:197
void SetFileName(const String &name)
You may call this method store a future file name, so you don&#39;t have to to pass it to the Save() call...
Definition: DLS.cpp:1683
uint32_t SampleLoops
Reflects the number of sample loops.
Definition: DLS.h:371
conn_trn_t DestinationTransform
Definition: DLS.h:255
virtual void Save(const String &Path, progress_t *pProgress=NULL)
Save changes to another file.
Definition: DLS.cpp:1787
Resource * pParent
Definition: DLS.h:356
void Resize(int iNewSize)
Resize sample.
Definition: DLS.cpp:891
SampleList * pSamples
Definition: DLS.h:524
#define CHUNK_ID_FMT
Definition: DLS.h:87
conn_dst_t
Connection Destinations.
Definition: DLS.h:152
bool NoSampleDepthTruncation
Definition: DLS.h:369
String Message
Definition: RIFF.h:408
virtual ~Articulator()
Definition: DLS.cpp:207
void DeleteSample(Sample *pSample)
Delete a sample.
Definition: DLS.cpp:1579
bool SourceInvert
Definition: DLS.h:248
unsigned long ReadInt32(int32_t *pData, unsigned long WordCount=1)
Reads WordCount number of 32 Bit signed integer words and copies it into the buffer pointed by pData...
Definition: RIFF.cpp:574
uint16_t high
High value of range.
Definition: DLS.h:207
Articulation * GetFirstArticulation()
Definition: DLS.cpp:176
uint32_t Size
For internal usage only: usually reflects exactly sizeof(sample_loop_t), otherwise if the value is la...
Definition: DLS.h:231
bool PhaseMaster
Definition: DLS.h:436
Chunk * GetSubChunk(uint32_t ChunkID)
Returns subchunk with chunk ID ChunkID within this chunk list.
Definition: RIFF.cpp:1026
#define LIST_TYPE_INS
Definition: DLS.h:69
Chunk * GetNextSubChunk()
Returns the next subchunk within the list.
Definition: RIFF.cpp:1086
Info(RIFF::List *list)
Constructor.
Definition: DLS.cpp:255
std::list< Instrument * > InstrumentList
Definition: DLS.h:520
Region(Instrument *pInstrument, RIFF::List *rgnList)
Definition: DLS.cpp:994
#define CHUNK_ID_ICRD
Definition: RIFF.h:101
virtual void Save(progress_t *pProgress=NULL)
Save changes to same file.
Definition: RIFF.cpp:1782
#define CHUNK_ID_DLID
Definition: DLS.h:86
unsigned long SamplesTotal
Reflects total number of sample points (only if known sample data format is used, 0 otherwise)...
Definition: DLS.h:403
String Source
<ISRC-ck>. Identifies the name of the person or organization who supplied the original subject of the...
Definition: DLS.h:320
uint16_t BitDepth
Size of each sample per channel (only if known sample data format is used, 0 otherwise).
Definition: DLS.h:402
Ordinary RIFF Chunk.
Definition: RIFF.h:205
uint32_t GetListType()
Returns unsigned integer representation of the list&#39;s ID.
Definition: RIFF.h:306
#define CHUNK_ID_ICMS
Definition: DLS.h:77
unsigned long GetFilePos()
Current, actual offset in file.
Definition: RIFF.h:215
uint32_t Scale
Definition: DLS.h:256
uint8_t UnityNote
Definition: DLS.h:366
#define F_WSMP_NO_COMPRESSION
Definition: DLS.cpp:63
virtual ~File()
Definition: DLS.cpp:1483
#define CONN_TRANSFORM_SRC(x)
Definition: DLS.cpp:38
#define LIST_TYPE_RGN
Definition: DLS.h:73
#define CHUNK_ID_INAM
Definition: RIFF.h:103
uint32_t MIDIProgram
Specifies the MIDI Program Change Number this Instrument should be assigned to.
Definition: DLS.h:465
virtual void UpdateChunks(progress_t *pProgress)
Update chunks with current info values.
Definition: DLS.cpp:346
String Commissioned
<ICMS-ck>. Lists the name of the person or organization that commissioned the subject of the file...
Definition: DLS.h:322
#define CHUNK_ID_ITCH
Definition: DLS.h:84
friend class Articulation
Definition: DLS.h:269
unsigned long ReadInt16(int16_t *pData, unsigned long WordCount=1)
Reads WordCount number of 16 Bit signed integer words and copies it into the buffer pointed by pData...
Definition: RIFF.cpp:500
#define F_RGN_OPTION_SELFNONEXCLUSIVE
Definition: DLS.cpp:57
void SetSample(Sample *pSample)
Assign another sample to this Region.
Definition: DLS.cpp:1064
unsigned long Write(void *pData, unsigned long WordCount, unsigned long WordSize)
Writes WordCount number of data words with given WordSize from the buffer pointed by pData...
Definition: RIFF.cpp:359
Used for indicating the progress of a certain task.
Definition: RIFF.h:191
SampleList::iterator SamplesIterator
Definition: DLS.h:525
List * GetParent()
Returns pointer to the chunk&#39;s parent list chunk.
Definition: RIFF.h:211
Articulation * GetNextArticulation()
Definition: DLS.cpp:183
Chunk * AddSubChunk(uint32_t uiChunkID, uint uiBodySize)
Creates a new sub chunk.
Definition: RIFF.cpp:1206
conn_src_t Control
Definition: DLS.h:250
#define CONN_TRANSFORM_INVERT_CTL_ENCODE(x)
Definition: DLS.cpp:53
uint16_t WaveLinkOptionFlags
Definition: DLS.h:451
#define F_WSMP_NO_TRUNCATION
Definition: DLS.cpp:62
#define CONN_TRANSFORM_CTL(x)
Definition: DLS.cpp:39
#define MIDI_BANK_ENCODE(coarse, fine)
Definition: DLS.cpp:68
#define LIST_TYPE_LAR2
Definition: DLS.h:72
virtual void UpdateChunks(progress_t *pProgress)
Apply Instrument with all its Regions to the respective RIFF chunks.
Definition: DLS.cpp:1307
#define CONN_TRANSFORM_INVERT_SRC(x)
Definition: DLS.cpp:43
void DeleteInstrument(Instrument *pInstrument)
Delete an instrument.
Definition: DLS.cpp:1638
unsigned long Write(void *pBuffer, unsigned long SampleCount)
Write sample wave data.
Definition: DLS.cpp:954
version_t * pVersion
Points to a version_t structure if the file provided a version number else is set to NULL...
Definition: DLS.h:498
String Technician
<ITCH-ck>. Identifies the technician who sampled the subject file.
Definition: DLS.h:317
Instrument(File *pFile, RIFF::List *insList)
Constructor.
Definition: DLS.cpp:1220
uint16_t major
Definition: DLS.h:112
RegionList::iterator RegionsIterator
Definition: DLS.h:483
void SetFileName(const String &path)
Definition: RIFF.cpp:1636
#define CHUNK_ID_INSH
Definition: DLS.h:89
void * LoadChunkData()
Load chunk body into RAM.
Definition: RIFF.cpp:774
Region * GetNextRegion()
Definition: DLS.cpp:1250
#define LIST_TYPE_LRGN
Definition: DLS.h:70
#define CHUNK_ID_IGNR
Definition: DLS.h:78
#define CHUNK_ID_IART
Definition: DLS.h:76
uint32_t AverageBytesPerSecond
The average number of bytes per second at which the waveform data should be transferred (Playback sof...
Definition: DLS.h:400
conn_src_t Source
Definition: DLS.h:246
uint8_t MIDIBankFine
Reflects the MIDI Bank number for MIDI Control Change 32 (bank 1 - 128).
Definition: DLS.h:464
uint16_t PhaseGroup
Definition: DLS.h:437
#define CHUNK_ID_COLH
Definition: DLS.h:94
unsigned long GetSize() const
Chunk size in bytes (without header, thus the chunk data body)
Definition: RIFF.h:212
uint32_t Channel
Definition: DLS.h:439
uint32_t WavePoolHeaderSize
Definition: DLS.h:528
#define CHUNK_ID_ICOP
Definition: RIFF.h:100
virtual void UpdateChunks(progress_t *pProgress)
Apply all articulations to the respective RIFF chunks.
Definition: DLS.cpp:225
RIFF::File * pRIFF
Definition: DLS.h:522
Abstract base class which encapsulates data structures which all DLS resources are able to provide...
Definition: DLS.h:345
RIFF File.
Definition: RIFF.h:351
void Init(conn_block_t *Header)
Definition: DLS.cpp:75
List * AddSubList(uint32_t uiListType)
Creates a new list sub chunk.
Definition: RIFF.cpp:1277
InstrumentList * pInstruments
Definition: DLS.h:526
uint16_t build
Definition: DLS.h:113
virtual void LoadInstruments()
Definition: DLS.cpp:1600
RIFF specific classes and definitions.
Definition: RIFF.h:135
virtual void UpdateChunks(progress_t *pProgress)
Apply all sample player options to the respective RIFF chunk.
Definition: DLS.cpp:596
String Software
<ISFT-ck>. Identifies the name of the sofware package used to create the file.
Definition: DLS.h:318
#define CONN_TRANSFORM_CTL_ENCODE(x)
Definition: DLS.cpp:48
String ArchivalLocation
<IARL-ck>. Indicates where the subject of the file is stored.
Definition: DLS.h:308
unsigned long ulWavePoolOffset
Definition: DLS.h:419
uint16_t release
Definition: DLS.h:114
Encapsulates sample waves used for playback.
Definition: DLS.h:395
Sample * GetNextSample()
Returns a pointer to the next Sample object of the file, NULL otherwise.
Definition: DLS.cpp:1518
void MoveSubChunk(Chunk *pSrc, Chunk *pDst)
Moves a sub chunk witin this list.
Definition: RIFF.cpp:1229
String Name
<INAM-ck>. Stores the title of the subject of the file, such as, Seattle From Above.
Definition: DLS.h:307
uint32_t SamplesPerSecond
Sampling rate at which each channel should be played (defaults to 44100 if Sample was created with In...
Definition: DLS.h:399
String Product
<IPRD-ck>. Specifies the name of the title the file was originally intended for, such as World Ruler ...
Definition: DLS.h:311
Sample(File *pFile, RIFF::List *waveList, unsigned long WavePoolOffset)
Constructor.
Definition: DLS.cpp:714
uint32_t WavePoolCount
Definition: DLS.h:529
String GetFileName()
File name of this DLS file.
Definition: DLS.cpp:1675
String Medium
<IMED-ck>. Describes the original subject of the file, such as, record, CD, and so forth...
Definition: DLS.h:319
String Subject
<ISBJ-ck>. Describes the contents of the file.
Definition: DLS.h:323
void LoadArticulations()
Definition: DLS.cpp:189
RIFF::List * pWaveList
Definition: DLS.h:416
virtual void LoadRegions()
Definition: DLS.cpp:1256
unsigned long ReadUint16(uint16_t *pData, unsigned long WordCount=1)
Reads WordCount number of 16 Bit unsigned integer words and copies it into the buffer pointed by pDat...
Definition: RIFF.cpp:537
void CopyAssignCore(const Sample *orig)
Make a deep copy of the Sample object given by orig (without the actual sample waveform data however)...
Definition: DLS.cpp:769
conn_block_t ToConnBlock()
Definition: DLS.cpp:89
virtual ~Sampler()
Definition: DLS.cpp:582
#define LIST_TYPE_LINS
Definition: DLS.h:68
Resource * GetParent()
Definition: DLS.h:350
#define CHUNK_ID_IARL
Definition: DLS.h:75
void ReleaseChunkData()
Free loaded chunk body from RAM.
Definition: RIFF.cpp:818
void DeleteRegion(Region *pRegion)
Definition: DLS.cpp:1291
Abstract base class for classes that provide articulation information (thus for Instrument and Region...
Definition: DLS.h:287
Sample * pSample
Definition: DLS.h:449
#define LIST_TYPE_INFO
Definition: RIFF.h:98
conn_trn_t ControlTransform
Definition: DLS.h:251
range_t KeyRange
Definition: DLS.h:431
#define CHUNK_ID_ISRC
Definition: DLS.h:82
virtual void UpdateChunks(progress_t *pProgress)
Apply sample and its settings to the respective RIFF chunks.
Definition: DLS.cpp:968
Provides access to the defined connections used for the synthesis model.
Definition: DLS.h:273
virtual void UpdateChunks(progress_t *pProgress)
Apply articulation connections to the respective RIFF chunks.
Definition: DLS.cpp:150
#define CONN_TRANSFORM_INVERT_CTL(x)
Definition: DLS.cpp:44
uint32_t Instruments
Reflects the number of available Instrument objects.
Definition: DLS.h:499
String Genre
<IGNR-ck>. Descirbes the original work, such as, Jazz, Classic, Rock, Techno, Rave, etc.
Definition: DLS.h:314
Provides all neccessary information for the synthesis of a DLS Instrument.
Definition: DLS.h:459
int32_t Gain
Definition: DLS.h:368
Quadtuple version number ("major.minor.release.build").
Definition: DLS.h:110
virtual void CopyAssign(const Resource *orig)
Make a deep copy of the Resource object given by orig and assign it to this object.
Definition: DLS.cpp:542
String Copyright
<ICOP-ck>. Records the copyright information for the file.
Definition: DLS.h:312
Sample * AddSample()
Add a new sample.
Definition: DLS.cpp:1561
void CopyAssignCore(const Instrument *orig)
Definition: DLS.cpp:1359
DLS specific classes and definitions.
Definition: DLS.h:104
Info * pInfo
Points (in any case) to an Info object, providing additional, optional infos and comments.
Definition: DLS.h:347
String libraryVersion()
Returns version of this C++ library.
Definition: DLS.cpp:1979
Defines a connection within the synthesis model.
Definition: DLS.h:244
uint16_t FormatOptionFlags
Definition: DLS.h:450
uint32_t * pWavePoolTableHi
Definition: DLS.h:531
virtual void UpdateChunks(progress_t *pProgress)
Apply Region settings to the respective RIFF chunks.
Definition: DLS.cpp:1111
String Comments
<ICMT-ck>. Provides general comments about the file or the subject of the file. Sentences might end w...
Definition: DLS.h:310
void Resize(int iNewSize)
Resize chunk.
Definition: RIFF.cpp:843
Articulator(RIFF::List *ParentList)
Definition: DLS.cpp:171
List * GetNextSubList()
Returns the next sublist (that is a subchunk with chunk ID "LIST") within the list.
Definition: RIFF.cpp:1126
Defines Region information of an Instrument.
Definition: DLS.h:429
std::list< RIFF::File * > ExtensionFiles
Definition: DLS.h:523
Articulation(RIFF::Chunk *artl)
Constructor.
Definition: DLS.cpp:118
bool IsDrum
Indicates if the Instrument is a drum type, as they differ in the synthesis model of DLS from melodic...
Definition: DLS.h:461
std::list< Region * > RegionList
Definition: DLS.h:475
virtual void UpdateChunks(progress_t *pProgress)
Apply all the DLS file&#39;s current instruments, samples and settings to the respective RIFF chunks...
Definition: DLS.cpp:1695
void * LoadSampleData()
Load sample data into RAM.
Definition: DLS.cpp:835
void AddSampleLoop(sample_loop_t *pLoopDef)
Adds a new sample loop with the provided loop definition.
Definition: DLS.cpp:633
virtual void UpdateFileOffsets()
Updates all file offsets stored all over the file.
Definition: DLS.cpp:1846
Resource(Resource *Parent, RIFF::List *lstResource)
Constructor.
Definition: DLS.cpp:444