66 |
Compressed = (waveList->GetSubChunk(CHUNK_ID_EWAV)); |
Compressed = (waveList->GetSubChunk(CHUNK_ID_EWAV)); |
67 |
if (Compressed) { |
if (Compressed) { |
68 |
ScanCompressedSample(); |
ScanCompressedSample(); |
69 |
if (!pDecompressionBuffer) { |
} |
70 |
pDecompressionBuffer = new int8_t[INITIAL_SAMPLE_BUFFER_SIZE]; |
|
71 |
DecompressionBufferSize = INITIAL_SAMPLE_BUFFER_SIZE; |
if (BitDepth > 24) throw gig::Exception("Only samples up to 24 bit supported"); |
72 |
} |
if (Compressed && Channels == 1) throw gig::Exception("Mono compressed samples not yet supported"); |
73 |
|
if (Compressed && BitDepth == 24) throw gig::Exception("24 bit compressed samples not yet supported"); |
74 |
|
|
75 |
|
// we use a buffer for decompression and for truncating 24 bit samples to 16 bit |
76 |
|
if ((Compressed || BitDepth == 24) && !pDecompressionBuffer) { |
77 |
|
pDecompressionBuffer = new int8_t[INITIAL_SAMPLE_BUFFER_SIZE]; |
78 |
|
DecompressionBufferSize = INITIAL_SAMPLE_BUFFER_SIZE; |
79 |
} |
} |
80 |
FrameOffset = 0; // just for streaming compressed samples |
FrameOffset = 0; // just for streaming compressed samples |
81 |
|
|
508 |
*/ |
*/ |
509 |
unsigned long Sample::Read(void* pBuffer, unsigned long SampleCount) { |
unsigned long Sample::Read(void* pBuffer, unsigned long SampleCount) { |
510 |
if (SampleCount == 0) return 0; |
if (SampleCount == 0) return 0; |
511 |
if (!Compressed) return pCkData->Read(pBuffer, SampleCount, FrameSize); //FIXME: channel inversion due to endian correction? |
if (!Compressed) { |
512 |
|
if (BitDepth == 24) { |
513 |
|
// 24 bit sample. For now just truncate to 16 bit. |
514 |
|
int8_t* pSrc = (int8_t*)this->pDecompressionBuffer; |
515 |
|
int8_t* pDst = (int8_t*)pBuffer; |
516 |
|
unsigned long n = pCkData->Read(pSrc, SampleCount, FrameSize); |
517 |
|
for (int i = SampleCount * (FrameSize / 3) ; i > 0 ; i--) { |
518 |
|
pSrc++; |
519 |
|
*pDst++ = *pSrc++; |
520 |
|
*pDst++ = *pSrc++; |
521 |
|
} |
522 |
|
return SampleCount; |
523 |
|
} else { |
524 |
|
return pCkData->Read(pBuffer, SampleCount, FrameSize); //FIXME: channel inversion due to endian correction? |
525 |
|
} |
526 |
|
} |
527 |
else { //FIXME: no support for mono compressed samples yet, are there any? |
else { //FIXME: no support for mono compressed samples yet, are there any? |
528 |
if (this->SamplePos >= this->SamplesTotal) return 0; |
if (this->SamplePos >= this->SamplesTotal) return 0; |
529 |
//TODO: efficiency: we simply assume here that all frames are compressed, maybe we should test for an average compression rate |
//TODO: efficiency: we simply assume here that all frames are compressed, maybe we should test for an average compression rate |
795 |
else if (pitchTrackDimensionBypass & 0x20) DimensionBypass = dim_bypass_ctrl_95; |
else if (pitchTrackDimensionBypass & 0x20) DimensionBypass = dim_bypass_ctrl_95; |
796 |
else DimensionBypass = dim_bypass_ctrl_none; |
else DimensionBypass = dim_bypass_ctrl_none; |
797 |
uint8_t pan = _3ewa->ReadUint8(); |
uint8_t pan = _3ewa->ReadUint8(); |
798 |
Pan = (pan < 64) ? pan : (-1) * (int8_t)pan - 63; |
Pan = (pan < 64) ? pan : -((int)pan - 63); // signed 7 bit -> signed 8 bit |
799 |
SelfMask = _3ewa->ReadInt8() & 0x01; |
SelfMask = _3ewa->ReadInt8() & 0x01; |
800 |
_3ewa->ReadInt8(); // unknown |
_3ewa->ReadInt8(); // unknown |
801 |
uint8_t lfo3ctrl = _3ewa->ReadUint8(); |
uint8_t lfo3ctrl = _3ewa->ReadUint8(); |
802 |
LFO3Controller = static_cast<lfo3_ctrl_t>(lfo3ctrl & 0x07); // lower 3 bits |
LFO3Controller = static_cast<lfo3_ctrl_t>(lfo3ctrl & 0x07); // lower 3 bits |
803 |
LFO3Sync = lfo3ctrl & 0x20; // bit 5 |
LFO3Sync = lfo3ctrl & 0x20; // bit 5 |
804 |
InvertAttenuationController = lfo3ctrl & 0x80; // bit 7 |
InvertAttenuationController = lfo3ctrl & 0x80; // bit 7 |
|
if (VCFType == vcf_type_lowpass) { |
|
|
if (lfo3ctrl & 0x40) // bit 6 |
|
|
VCFType = vcf_type_lowpassturbo; |
|
|
} |
|
805 |
AttenuationController = DecodeLeverageController(static_cast<_lev_ctrl_t>(_3ewa->ReadUint8())); |
AttenuationController = DecodeLeverageController(static_cast<_lev_ctrl_t>(_3ewa->ReadUint8())); |
806 |
uint8_t lfo2ctrl = _3ewa->ReadUint8(); |
uint8_t lfo2ctrl = _3ewa->ReadUint8(); |
807 |
LFO2Controller = static_cast<lfo2_ctrl_t>(lfo2ctrl & 0x07); // lower 3 bits |
LFO2Controller = static_cast<lfo2_ctrl_t>(lfo2ctrl & 0x07); // lower 3 bits |
846 |
VCFVelocityDynamicRange = vcfvelocity % 5; |
VCFVelocityDynamicRange = vcfvelocity % 5; |
847 |
VCFVelocityCurve = static_cast<curve_type_t>(vcfvelocity / 5); |
VCFVelocityCurve = static_cast<curve_type_t>(vcfvelocity / 5); |
848 |
VCFType = static_cast<vcf_type_t>(_3ewa->ReadUint8()); |
VCFType = static_cast<vcf_type_t>(_3ewa->ReadUint8()); |
849 |
|
if (VCFType == vcf_type_lowpass) { |
850 |
|
if (lfo3ctrl & 0x40) // bit 6 |
851 |
|
VCFType = vcf_type_lowpassturbo; |
852 |
|
} |
853 |
|
|
854 |
// get the corresponding velocity->volume table from the table map or create & calculate that table if it doesn't exist yet |
// get the corresponding velocity->volume table from the table map or create & calculate that table if it doesn't exist yet |
855 |
uint32_t tableKey = (VelocityResponseCurve<<16) | (VelocityResponseDepth<<8) | VelocityResponseCurveScaling; |
uint32_t tableKey = (VelocityResponseCurve<<16) | (VelocityResponseDepth<<8) | VelocityResponseCurveScaling; |
857 |
pVelocityAttenuationTable = (*pVelocityTables)[tableKey]; |
pVelocityAttenuationTable = (*pVelocityTables)[tableKey]; |
858 |
} |
} |
859 |
else { |
else { |
860 |
pVelocityAttenuationTable = new double[128]; |
pVelocityAttenuationTable = |
861 |
switch (VelocityResponseCurve) { // calculate the new table |
CreateVelocityTable(VelocityResponseCurve, |
862 |
case curve_type_nonlinear: |
VelocityResponseDepth, |
863 |
for (int velocity = 0; velocity < 128; velocity++) { |
VelocityResponseCurveScaling); |
|
pVelocityAttenuationTable[velocity] = |
|
|
GIG_VELOCITY_TRANSFORM_NONLINEAR(((double)velocity),((double)VelocityResponseDepth),((double)VelocityResponseCurveScaling)); |
|
|
if (pVelocityAttenuationTable[velocity] > 1.0) pVelocityAttenuationTable[velocity] = 1.0; |
|
|
else if (pVelocityAttenuationTable[velocity] < 1e-15) pVelocityAttenuationTable[velocity] = 0.0; |
|
|
} |
|
|
break; |
|
|
case curve_type_linear: |
|
|
for (int velocity = 0; velocity < 128; velocity++) { |
|
|
pVelocityAttenuationTable[velocity] = |
|
|
GIG_VELOCITY_TRANSFORM_LINEAR(((double)velocity),((double)VelocityResponseDepth),((double)VelocityResponseCurveScaling)); |
|
|
if (pVelocityAttenuationTable[velocity] > 1.0) pVelocityAttenuationTable[velocity] = 1.0; |
|
|
else if (pVelocityAttenuationTable[velocity] < 1e-15) pVelocityAttenuationTable[velocity] = 0.0; |
|
|
} |
|
|
break; |
|
|
case curve_type_special: |
|
|
for (int velocity = 0; velocity < 128; velocity++) { |
|
|
pVelocityAttenuationTable[velocity] = |
|
|
GIG_VELOCITY_TRANSFORM_SPECIAL(((double)velocity),((double)VelocityResponseDepth),((double)VelocityResponseCurveScaling)); |
|
|
if (pVelocityAttenuationTable[velocity] > 1.0) pVelocityAttenuationTable[velocity] = 1.0; |
|
|
else if (pVelocityAttenuationTable[velocity] < 1e-15) pVelocityAttenuationTable[velocity] = 0.0; |
|
|
} |
|
|
break; |
|
|
case curve_type_unknown: |
|
|
default: |
|
|
throw gig::Exception("Unknown transform curve type."); |
|
|
} |
|
864 |
(*pVelocityTables)[tableKey] = pVelocityAttenuationTable; // put the new table into the tables map |
(*pVelocityTables)[tableKey] = pVelocityAttenuationTable; // put the new table into the tables map |
865 |
} |
} |
866 |
} |
} |
1013 |
return pVelocityAttenuationTable[MIDIKeyVelocity]; |
return pVelocityAttenuationTable[MIDIKeyVelocity]; |
1014 |
} |
} |
1015 |
|
|
1016 |
|
double* DimensionRegion::CreateVelocityTable(curve_type_t curveType, uint8_t depth, uint8_t scaling) { |
1017 |
|
|
1018 |
|
// line-segment approximations of the 15 velocity curves |
1019 |
|
|
1020 |
|
// linear |
1021 |
|
const int lin0[] = { 1, 1, 127, 127 }; |
1022 |
|
const int lin1[] = { 1, 21, 127, 127 }; |
1023 |
|
const int lin2[] = { 1, 45, 127, 127 }; |
1024 |
|
const int lin3[] = { 1, 74, 127, 127 }; |
1025 |
|
const int lin4[] = { 1, 127, 127, 127 }; |
1026 |
|
|
1027 |
|
// non-linear |
1028 |
|
const int non0[] = { 1, 4, 24, 5, 57, 17, 92, 57, 122, 127, 127, 127 }; |
1029 |
|
const int non1[] = { 1, 4, 46, 9, 93, 56, 118, 106, 123, 127, |
1030 |
|
127, 127 }; |
1031 |
|
const int non2[] = { 1, 4, 46, 9, 57, 20, 102, 107, 107, 127, |
1032 |
|
127, 127 }; |
1033 |
|
const int non3[] = { 1, 15, 10, 19, 67, 73, 80, 80, 90, 98, 98, 127, |
1034 |
|
127, 127 }; |
1035 |
|
const int non4[] = { 1, 25, 33, 57, 82, 81, 92, 127, 127, 127 }; |
1036 |
|
|
1037 |
|
// special |
1038 |
|
const int spe0[] = { 1, 2, 76, 10, 90, 15, 95, 20, 99, 28, 103, 44, |
1039 |
|
113, 127, 127, 127 }; |
1040 |
|
const int spe1[] = { 1, 2, 27, 5, 67, 18, 89, 29, 95, 35, 107, 67, |
1041 |
|
118, 127, 127, 127 }; |
1042 |
|
const int spe2[] = { 1, 1, 33, 1, 53, 5, 61, 13, 69, 32, 79, 74, |
1043 |
|
85, 90, 91, 127, 127, 127 }; |
1044 |
|
const int spe3[] = { 1, 32, 28, 35, 66, 48, 89, 59, 95, 65, 99, 73, |
1045 |
|
117, 127, 127, 127 }; |
1046 |
|
const int spe4[] = { 1, 4, 23, 5, 49, 13, 57, 17, 92, 57, 122, 127, |
1047 |
|
127, 127 }; |
1048 |
|
|
1049 |
|
const int* const curves[] = { non0, non1, non2, non3, non4, |
1050 |
|
lin0, lin1, lin2, lin3, lin4, |
1051 |
|
spe0, spe1, spe2, spe3, spe4 }; |
1052 |
|
|
1053 |
|
double* const table = new double[128]; |
1054 |
|
|
1055 |
|
const int* curve = curves[curveType * 5 + depth]; |
1056 |
|
const int s = scaling == 0 ? 20 : scaling; // 0 or 20 means no scaling |
1057 |
|
|
1058 |
|
table[0] = 0; |
1059 |
|
for (int x = 1 ; x < 128 ; x++) { |
1060 |
|
|
1061 |
|
if (x > curve[2]) curve += 2; |
1062 |
|
double y = curve[1] + (x - curve[0]) * |
1063 |
|
(double(curve[3] - curve[1]) / (curve[2] - curve[0])); |
1064 |
|
y = y / 127; |
1065 |
|
|
1066 |
|
// Scale up for s > 20, down for s < 20. When |
1067 |
|
// down-scaling, the curve still ends at 1.0. |
1068 |
|
if (s < 20 && y >= 0.5) |
1069 |
|
y = y / ((2 - 40.0 / s) * y + 40.0 / s - 1); |
1070 |
|
else |
1071 |
|
y = y * (s / 20.0); |
1072 |
|
if (y > 1) y = 1; |
1073 |
|
|
1074 |
|
table[x] = y; |
1075 |
|
} |
1076 |
|
return table; |
1077 |
|
} |
1078 |
|
|
1079 |
|
|
1080 |
// *************** Region *************** |
// *************** Region *************** |
1086 |
for (int i = 0; i < 32; i++) { |
for (int i = 0; i < 32; i++) { |
1087 |
pDimensionRegions[i] = NULL; |
pDimensionRegions[i] = NULL; |
1088 |
} |
} |
1089 |
|
Layers = 1; |
1090 |
|
|
1091 |
// Actual Loading |
// Actual Loading |
1092 |
|
|
1119 |
(pDimensionDefinitions[i].split_type == split_type_normal) ? 128 / pDimensionDefinitions[i].zones |
(pDimensionDefinitions[i].split_type == split_type_normal) ? 128 / pDimensionDefinitions[i].zones |
1120 |
: 0; |
: 0; |
1121 |
Dimensions++; |
Dimensions++; |
1122 |
|
|
1123 |
|
// if this is a layer dimension, remember the amount of layers |
1124 |
|
if (dimension == dimension_layer) Layers = pDimensionDefinitions[i].zones; |
1125 |
} |
} |
1126 |
_3lnk->SetPos(6, RIFF::stream_curpos); // jump forward to next dimension definition |
_3lnk->SetPos(6, RIFF::stream_curpos); // jump forward to next dimension definition |
1127 |
} |
} |
1156 |
} |
} |
1157 |
} |
} |
1158 |
|
|
1159 |
|
// jump to start of the wave pool indices (if not already there) |
1160 |
|
File* file = (File*) GetParent()->GetParent(); |
1161 |
|
if (file->pVersion && file->pVersion->major == 3) |
1162 |
|
_3lnk->SetPos(68); // version 3 has a different 3lnk structure |
1163 |
|
else |
1164 |
|
_3lnk->SetPos(44); |
1165 |
|
|
1166 |
// load sample references |
// load sample references |
|
_3lnk->SetPos(44); // jump to start of the wave pool indices (if not already there) |
|
1167 |
for (uint i = 0; i < DimensionRegions; i++) { |
for (uint i = 0; i < DimensionRegions; i++) { |
1168 |
uint32_t wavepoolindex = _3lnk->ReadUint32(); |
uint32_t wavepoolindex = _3lnk->ReadUint32(); |
1169 |
pDimensionRegions[i]->pSample = GetSampleFromWavePool(wavepoolindex); |
pDimensionRegions[i]->pSample = GetSampleFromWavePool(wavepoolindex); |