886 lines
38 KiB
C++
886 lines
38 KiB
C++
/*
|
|
* Tables.cpp
|
|
* ----------
|
|
* Purpose: Effect, interpolation, data and other pre-calculated tables.
|
|
* Notes : (currently none)
|
|
* Authors: Olivier Lapicque
|
|
* OpenMPT Devs
|
|
* The OpenMPT source code is released under the BSD license. Read LICENSE for more details.
|
|
*/
|
|
|
|
|
|
#include "stdafx.h"
|
|
#include "Tables.h"
|
|
#include "Sndfile.h"
|
|
|
|
#include "Resampler.h"
|
|
#include "WindowedFIR.h"
|
|
#include <cmath>
|
|
|
|
|
|
OPENMPT_NAMESPACE_BEGIN
|
|
|
|
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
// Note Name Tables
|
|
|
|
const mpt::uchar NoteNamesSharp[12][4] =
|
|
{
|
|
UL_("C-"), UL_("C#"), UL_("D-"), UL_("D#"), UL_("E-"), UL_("F-"),
|
|
UL_("F#"), UL_("G-"), UL_("G#"), UL_("A-"), UL_("A#"), UL_("B-")
|
|
};
|
|
|
|
const mpt::uchar NoteNamesFlat[12][4] =
|
|
{
|
|
UL_("C-"), UL_("Db"), UL_("D-"), UL_("Eb"), UL_("E-"), UL_("F-"),
|
|
UL_("Gb"), UL_("G-"), UL_("Ab"), UL_("A-"), UL_("Bb"), UL_("B-")
|
|
};
|
|
|
|
|
|
///////////////////////////////////////////////////////////
|
|
// File Formats Information (name, extension, etc)
|
|
|
|
struct ModFormatInfo
|
|
{
|
|
MODTYPE format; // MOD_TYPE_XXXX
|
|
const mpt::uchar *name; // "ProTracker"
|
|
const char *extension; // "mod"
|
|
};
|
|
|
|
// Note: Formats with identical extensions must be grouped together.
|
|
static constexpr ModFormatInfo modFormatInfo[] =
|
|
{
|
|
{ MOD_TYPE_MPT, UL_("OpenMPT"), "mptm" },
|
|
{ MOD_TYPE_MOD, UL_("ProTracker"), "mod" },
|
|
{ MOD_TYPE_S3M, UL_("Scream Tracker 3"), "s3m" },
|
|
{ MOD_TYPE_XM, UL_("FastTracker 2"), "xm" },
|
|
{ MOD_TYPE_IT, UL_("Impulse Tracker"), "it" },
|
|
|
|
{ MOD_TYPE_669, UL_("Composer 669 / UNIS 669"), "669" },
|
|
{ MOD_TYPE_AMF0, UL_("ASYLUM Music Format"), "amf" },
|
|
{ MOD_TYPE_AMF, UL_("DSMI Advanced Music Format"), "amf" },
|
|
{ MOD_TYPE_AMS, UL_("Extreme's Tracker"), "ams" },
|
|
{ MOD_TYPE_AMS, UL_("Velvet Studio"), "ams" },
|
|
{ MOD_TYPE_S3M, UL_("CDFM / Composer 670"), "c67" },
|
|
{ MOD_TYPE_DBM, UL_("DigiBooster Pro"), "dbm" },
|
|
{ MOD_TYPE_DIGI, UL_("DigiBooster"), "digi" },
|
|
{ MOD_TYPE_DMF, UL_("X-Tracker"), "dmf" },
|
|
{ MOD_TYPE_DSM, UL_("DSIK Format"), "dsm" },
|
|
{ MOD_TYPE_MOD, UL_("Digital Symphony"), "dsym" },
|
|
{ MOD_TYPE_DTM, UL_("Digital Tracker"), "dtm" },
|
|
{ MOD_TYPE_FAR, UL_("Farandole Composer"), "far" },
|
|
{ MOD_TYPE_S3M, UL_("FM Tracker"), "fmt" },
|
|
{ MOD_TYPE_IMF, UL_("Imago Orpheus"), "imf" },
|
|
{ MOD_TYPE_MOD, UL_("Ice Tracker"), "ice" },
|
|
#ifdef MPT_EXTERNAL_SAMPLES
|
|
{ MOD_TYPE_IT, UL_("Impulse Tracker Project"), "itp" },
|
|
#endif
|
|
{ MOD_TYPE_J2B, UL_("Galaxy Sound System"), "j2b" },
|
|
{ MOD_TYPE_MOD, UL_("Soundtracker"), "m15" },
|
|
{ MOD_TYPE_MDL, UL_("Digitrakker"), "mdl" },
|
|
{ MOD_TYPE_MED, UL_("OctaMED"), "med" },
|
|
{ MOD_TYPE_SFX, UL_("MultiMedia Sound"), "mms" },
|
|
{ MOD_TYPE_MT2, UL_("MadTracker 2"), "mt2" },
|
|
{ MOD_TYPE_MTM, UL_("MultiTracker"), "mtm" },
|
|
{ MOD_TYPE_MOD, UL_("Karl Morton Music Format"), "mus" },
|
|
{ MOD_TYPE_MOD, UL_("NoiseTracker"), "nst" },
|
|
{ MOD_TYPE_OKT, UL_("Oktalyzer"), "okt" },
|
|
{ MOD_TYPE_PLM, UL_("Disorder Tracker 2"), "plm" },
|
|
{ MOD_TYPE_PSM, UL_("Epic Megagames MASI"), "psm" },
|
|
{ MOD_TYPE_MOD, UL_("ProTracker"), "pt36" },
|
|
{ MOD_TYPE_PTM, UL_("PolyTracker"), "ptm" },
|
|
{ MOD_TYPE_SFX, UL_("SoundFX"), "sfx" },
|
|
{ MOD_TYPE_SFX, UL_("SoundFX"), "sfx2" },
|
|
{ MOD_TYPE_MOD, UL_("SoundTracker 2.6"), "st26" },
|
|
{ MOD_TYPE_MOD, UL_("Soundtracker"), "stk" },
|
|
{ MOD_TYPE_STM, UL_("Scream Tracker 2"), "stm" },
|
|
{ MOD_TYPE_STM, UL_("Scream Tracker Music Interface Kit"), "stx" },
|
|
{ MOD_TYPE_STP, UL_("Soundtracker Pro II"), "stp" },
|
|
{ MOD_TYPE_MPT, UL_("Symphonie"), "symmod"},
|
|
{ MOD_TYPE_ULT, UL_("UltraTracker"), "ult" },
|
|
{ MOD_TYPE_MOD, UL_("Mod's Grave"), "wow" },
|
|
// converted formats (no MODTYPE)
|
|
{ MOD_TYPE_NONE, UL_("General Digital Music"), "gdm" },
|
|
{ MOD_TYPE_NONE, UL_("Un4seen MO3"), "mo3" },
|
|
{ MOD_TYPE_NONE, UL_("OggMod FastTracker 2"), "oxm" },
|
|
//#ifndef NO_ARCHIVE_SUPPORT
|
|
// Compressed modules
|
|
{ MOD_TYPE_MOD, UL_("Compressed ProTracker"), "mdz" },
|
|
{ MOD_TYPE_MOD, UL_("Compressed Module"), "mdr" },
|
|
{ MOD_TYPE_S3M, UL_("Compressed Scream Tracker 3"), "s3z" },
|
|
{ MOD_TYPE_XM, UL_("Compressed FastTracker 2"), "xmz" },
|
|
{ MOD_TYPE_IT, UL_("Compressed Impulse Tracker"), "itz" },
|
|
{ MOD_TYPE_MPT, UL_("Compressed OpenMPT"), "mptmz" },
|
|
//#endif
|
|
};
|
|
|
|
|
|
struct ModContainerInfo
|
|
{
|
|
MODCONTAINERTYPE format; // MOD_CONTAINERTYPE_XXXX
|
|
const mpt::uchar *name; // "Unreal Music"
|
|
const char *extension; // "umx"
|
|
};
|
|
|
|
static constexpr ModContainerInfo modContainerInfo[] =
|
|
{
|
|
// Container formats
|
|
{ MOD_CONTAINERTYPE_UMX, UL_("Unreal Music"), "umx" },
|
|
{ MOD_CONTAINERTYPE_XPK, UL_("XPK packed"), "xpk" },
|
|
{ MOD_CONTAINERTYPE_PP20, UL_("PowerPack PP20"), "ppm" },
|
|
{ MOD_CONTAINERTYPE_MMCMP, UL_("Music Module Compressor"), "mmcmp" },
|
|
#ifdef MODPLUG_TRACKER
|
|
{ MOD_CONTAINERTYPE_WAV, UL_("Wave"), "wav" },
|
|
{ MOD_CONTAINERTYPE_UAX, UL_("Unreal Sounds"), "uax" },
|
|
#endif
|
|
};
|
|
|
|
|
|
#ifdef MODPLUG_TRACKER
|
|
static constexpr ModFormatInfo otherFormatInfo[] =
|
|
{
|
|
{ MOD_TYPE_MID, UL_("MIDI"), "mid" },
|
|
{ MOD_TYPE_MID, UL_("MIDI"), "rmi" },
|
|
{ MOD_TYPE_MID, UL_("MIDI"), "smf" }
|
|
};
|
|
#endif
|
|
|
|
|
|
std::vector<const char *> CSoundFile::GetSupportedExtensions(bool otherFormats)
|
|
{
|
|
std::vector<const char *> exts;
|
|
for(const auto &formatInfo : modFormatInfo)
|
|
{
|
|
// Avoid dupes in list
|
|
if(exts.empty() || strcmp(formatInfo.extension, exts.back()))
|
|
{
|
|
exts.push_back(formatInfo.extension);
|
|
}
|
|
}
|
|
for(const auto &containerInfo : modContainerInfo)
|
|
{
|
|
// Avoid dupes in list
|
|
if(exts.empty() || strcmp(containerInfo.extension, exts.back()))
|
|
{
|
|
exts.push_back(containerInfo.extension);
|
|
}
|
|
}
|
|
#ifdef MODPLUG_TRACKER
|
|
if(otherFormats)
|
|
{
|
|
for(const auto &formatInfo : otherFormatInfo)
|
|
{
|
|
exts.push_back(formatInfo.extension);
|
|
}
|
|
}
|
|
#else
|
|
MPT_UNREFERENCED_PARAMETER(otherFormats);
|
|
#endif
|
|
return exts;
|
|
}
|
|
/// <summary>
|
|
/// From version: 0.7.0
|
|
/// Hakan DANISIK
|
|
/// </summary>
|
|
/// <param name="var"></param>
|
|
/// <returns></returns>
|
|
std::string w2s(const std::wstring &var)
|
|
{
|
|
static std::locale loc("");
|
|
auto &facet = std::use_facet<std::codecvt<wchar_t, char, std::mbstate_t>>(loc);
|
|
return std::wstring_convert<std::remove_reference<decltype(facet)>::type, wchar_t>(&facet).to_bytes(var);
|
|
}
|
|
|
|
/// <summary>
|
|
/// From version: 0.7.0
|
|
/// Hakan DANISIK
|
|
/// </summary>
|
|
/// <param name="extension"></param>
|
|
/// <returns></returns>
|
|
std::string CSoundFile::ExtensionToTracker(std::string extension)
|
|
//-------------------------------------------------------
|
|
{
|
|
for(size_t i = 0; i < CountOf(modFormatInfo); i++)
|
|
{
|
|
if(extension == modFormatInfo[i].extension)
|
|
{
|
|
std::wstring name(modFormatInfo[i].name);
|
|
return w2s(name);
|
|
}
|
|
}
|
|
for(size_t i = 0; i < CountOf(modContainerInfo); i++)
|
|
{
|
|
if(extension == modContainerInfo[i].extension)
|
|
{
|
|
std::wstring name(modContainerInfo[i].name);
|
|
return w2s(name);
|
|
}
|
|
}
|
|
return std::string();
|
|
}
|
|
|
|
static bool IsEqualExtension(std::string_view a, std::string_view b)
|
|
{
|
|
if(a.length() != b.length())
|
|
{
|
|
return false;
|
|
}
|
|
return mpt::CompareNoCaseAscii(a, b) == 0;
|
|
}
|
|
|
|
|
|
bool CSoundFile::IsExtensionSupported(std::string_view ext)
|
|
{
|
|
if(ext.length() == 0)
|
|
{
|
|
return false;
|
|
}
|
|
for(const auto &formatInfo : modFormatInfo)
|
|
{
|
|
if(IsEqualExtension(ext, formatInfo.extension))
|
|
{
|
|
return true;
|
|
}
|
|
}
|
|
for(const auto &containerInfo : modContainerInfo)
|
|
{
|
|
if(IsEqualExtension(ext, containerInfo.extension))
|
|
{
|
|
return true;
|
|
}
|
|
}
|
|
return false;
|
|
}
|
|
|
|
|
|
mpt::ustring CSoundFile::ModContainerTypeToString(MODCONTAINERTYPE containertype)
|
|
{
|
|
for(const auto &containerInfo : modContainerInfo)
|
|
{
|
|
if(containerInfo.format == containertype)
|
|
{
|
|
return mpt::ToUnicode(mpt::Charset::UTF8, containerInfo.extension);
|
|
}
|
|
}
|
|
return mpt::ustring();
|
|
}
|
|
|
|
|
|
mpt::ustring CSoundFile::ModContainerTypeToTracker(MODCONTAINERTYPE containertype)
|
|
{
|
|
std::set<mpt::ustring> retvals;
|
|
mpt::ustring retval;
|
|
for(const auto &containerInfo : modContainerInfo)
|
|
{
|
|
if(containerInfo.format == containertype)
|
|
{
|
|
mpt::ustring name = containerInfo.name;
|
|
if(retvals.insert(name).second)
|
|
{
|
|
if(!retval.empty())
|
|
{
|
|
retval += U_(" / ");
|
|
}
|
|
retval += name;
|
|
}
|
|
}
|
|
}
|
|
return retval;
|
|
}
|
|
|
|
|
|
|
|
///////////////////////////////////////////////////////////////////////
|
|
|
|
const uint8 ImpulseTrackerPortaVolCmd[16] =
|
|
{
|
|
0x00, 0x01, 0x04, 0x08, 0x10, 0x20, 0x40, 0x60,
|
|
0x80, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF
|
|
};
|
|
|
|
// Period table for ProTracker octaves (1-7 in FastTracker 2, also used for file I/O):
|
|
const uint16 ProTrackerPeriodTable[7*12] =
|
|
{
|
|
2*1712,2*1616,2*1524,2*1440,2*1356,2*1280,2*1208,2*1140,2*1076,2*1016,2*960,2*906,
|
|
1712,1616,1524,1440,1356,1280,1208,1140,1076,1016,960,907,
|
|
856,808,762,720,678,640,604,570,538,508,480,453,
|
|
428,404,381,360,339,320,302,285,269,254,240,226,
|
|
214,202,190,180,170,160,151,143,135,127,120,113,
|
|
107,101,95,90,85,80,75,71,67,63,60,56,
|
|
53,50,47,45,42,40,37,35,33,31,30,28
|
|
};
|
|
|
|
|
|
const uint16 ProTrackerTunedPeriods[16*12] =
|
|
{
|
|
1712,1616,1524,1440,1356,1280,1208,1140,1076,1016,960,907,
|
|
1700,1604,1514,1430,1348,1274,1202,1134,1070,1010,954,900,
|
|
1688,1592,1504,1418,1340,1264,1194,1126,1064,1004,948,894,
|
|
1676,1582,1492,1408,1330,1256,1184,1118,1056,996,940,888,
|
|
1664,1570,1482,1398,1320,1246,1176,1110,1048,990,934,882,
|
|
1652,1558,1472,1388,1310,1238,1168,1102,1040,982,926,874,
|
|
1640,1548,1460,1378,1302,1228,1160,1094,1032,974,920,868,
|
|
1628,1536,1450,1368,1292,1220,1150,1086,1026,968,914,862,
|
|
1814,1712,1616,1524,1440,1356,1280,1208,1140,1076,1016,960,
|
|
1800,1700,1604,1514,1430,1350,1272,1202,1134,1070,1010,954,
|
|
1788,1688,1592,1504,1418,1340,1264,1194,1126,1064,1004,948,
|
|
1774,1676,1582,1492,1408,1330,1256,1184,1118,1056,996,940,
|
|
1762,1664,1570,1482,1398,1320,1246,1176,1110,1048,988,934,
|
|
1750,1652,1558,1472,1388,1310,1238,1168,1102,1040,982,926,
|
|
1736,1640,1548,1460,1378,1302,1228,1160,1094,1032,974,920,
|
|
1724,1628,1536,1450,1368,1292,1220,1150,1086,1026,968,914
|
|
};
|
|
|
|
// Table for Invert Loop and Funk Repeat effects (EFx, .MOD only)
|
|
const uint8 ModEFxTable[16] =
|
|
{
|
|
0, 5, 6, 7, 8, 10, 11, 13,
|
|
16, 19, 22, 26, 32, 43, 64, 128
|
|
};
|
|
|
|
// S3M C-4 periods
|
|
const uint16 FreqS3MTable[12] =
|
|
{
|
|
1712,1616,1524,1440,1356,1280,1208,1140,1076,1016,960,907
|
|
};
|
|
|
|
// S3M FineTune frequencies
|
|
const uint16 S3MFineTuneTable[16] =
|
|
{
|
|
7895,7941,7985,8046,8107,8169,8232,8280,
|
|
8363,8413,8463,8529,8581,8651,8723,8757, // 8363*2^((i-8)/(12*8))
|
|
};
|
|
|
|
|
|
// Sinus table
|
|
const int8 ModSinusTable[64] =
|
|
{
|
|
0,12,25,37,49,60,71,81,90,98,106,112,117,122,125,126,
|
|
127,126,125,122,117,112,106,98,90,81,71,60,49,37,25,12,
|
|
0,-12,-25,-37,-49,-60,-71,-81,-90,-98,-106,-112,-117,-122,-125,-126,
|
|
-127,-126,-125,-122,-117,-112,-106,-98,-90,-81,-71,-60,-49,-37,-25,-12
|
|
};
|
|
|
|
// Random wave table
|
|
const int8 ModRandomTable[64] =
|
|
{
|
|
98,-127,-43,88,102,41,-65,-94,125,20,-71,-86,-70,-32,-16,-96,
|
|
17,72,107,-5,116,-69,-62,-40,10,-61,65,109,-18,-38,-13,-76,
|
|
-23,88,21,-94,8,106,21,-112,6,109,20,-88,-30,9,-127,118,
|
|
42,-34,89,-4,-51,-72,21,-29,112,123,84,-101,-92,98,-54,-95
|
|
};
|
|
|
|
// Impulse Tracker sinus table (ITTECH.TXT)
|
|
const int8 ITSinusTable[256] =
|
|
{
|
|
0, 2, 3, 5, 6, 8, 9, 11, 12, 14, 16, 17, 19, 20, 22, 23,
|
|
24, 26, 27, 29, 30, 32, 33, 34, 36, 37, 38, 39, 41, 42, 43, 44,
|
|
45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 56, 57, 58, 59,
|
|
59, 60, 60, 61, 61, 62, 62, 62, 63, 63, 63, 64, 64, 64, 64, 64,
|
|
64, 64, 64, 64, 64, 64, 63, 63, 63, 62, 62, 62, 61, 61, 60, 60,
|
|
59, 59, 58, 57, 56, 56, 55, 54, 53, 52, 51, 50, 49, 48, 47, 46,
|
|
45, 44, 43, 42, 41, 39, 38, 37, 36, 34, 33, 32, 30, 29, 27, 26,
|
|
24, 23, 22, 20, 19, 17, 16, 14, 12, 11, 9, 8, 6, 5, 3, 2,
|
|
0, -2, -3, -5, -6, -8, -9,-11,-12,-14,-16,-17,-19,-20,-22,-23,
|
|
-24,-26,-27,-29,-30,-32,-33,-34,-36,-37,-38,-39,-41,-42,-43,-44,
|
|
-45,-46,-47,-48,-49,-50,-51,-52,-53,-54,-55,-56,-56,-57,-58,-59,
|
|
-59,-60,-60,-61,-61,-62,-62,-62,-63,-63,-63,-64,-64,-64,-64,-64,
|
|
-64,-64,-64,-64,-64,-64,-63,-63,-63,-62,-62,-62,-61,-61,-60,-60,
|
|
-59,-59,-58,-57,-56,-56,-55,-54,-53,-52,-51,-50,-49,-48,-47,-46,
|
|
-45,-44,-43,-42,-41,-39,-38,-37,-36,-34,-33,-32,-30,-29,-27,-26,
|
|
-24,-23,-22,-20,-19,-17,-16,-14,-12,-11, -9, -8, -6, -5, -3, -2,
|
|
};
|
|
|
|
|
|
// volume fade tables for Retrig Note:
|
|
const int8 retrigTable1[16] =
|
|
{ 0, 0, 0, 0, 0, 0, 10, 8, 0, 0, 0, 0, 0, 0, 24, 32 };
|
|
|
|
const int8 retrigTable2[16] =
|
|
{ 0, -1, -2, -4, -8, -16, 0, 0, 0, 1, 2, 4, 8, 16, 0, 0 };
|
|
|
|
|
|
|
|
|
|
const uint16 XMPeriodTable[104] =
|
|
{
|
|
907,900,894,887,881,875,868,862,856,850,844,838,832,826,820,814,
|
|
808,802,796,791,785,779,774,768,762,757,752,746,741,736,730,725,
|
|
720,715,709,704,699,694,689,684,678,675,670,665,660,655,651,646,
|
|
640,636,632,628,623,619,614,610,604,601,597,592,588,584,580,575,
|
|
570,567,563,559,555,551,547,543,538,535,532,528,524,520,516,513,
|
|
508,505,502,498,494,491,487,484,480,477,474,470,467,463,460,457,
|
|
453,450,447,443,440,437,434,431
|
|
};
|
|
|
|
|
|
// floor(8363 * 64 * 2**(-n/768))
|
|
// 768 = 64 period steps for 12 notes
|
|
// Table is for highest possible octave
|
|
const uint32 XMLinearTable[768] =
|
|
{
|
|
535232,534749,534266,533784,533303,532822,532341,531861,
|
|
531381,530902,530423,529944,529466,528988,528511,528034,
|
|
527558,527082,526607,526131,525657,525183,524709,524236,
|
|
523763,523290,522818,522346,521875,521404,520934,520464,
|
|
519994,519525,519057,518588,518121,517653,517186,516720,
|
|
516253,515788,515322,514858,514393,513929,513465,513002,
|
|
512539,512077,511615,511154,510692,510232,509771,509312,
|
|
508852,508393,507934,507476,507018,506561,506104,505647,
|
|
505191,504735,504280,503825,503371,502917,502463,502010,
|
|
501557,501104,500652,500201,499749,499298,498848,498398,
|
|
497948,497499,497050,496602,496154,495706,495259,494812,
|
|
494366,493920,493474,493029,492585,492140,491696,491253,
|
|
490809,490367,489924,489482,489041,488600,488159,487718,
|
|
487278,486839,486400,485961,485522,485084,484647,484210,
|
|
483773,483336,482900,482465,482029,481595,481160,480726,
|
|
480292,479859,479426,478994,478562,478130,477699,477268,
|
|
476837,476407,475977,475548,475119,474690,474262,473834,
|
|
473407,472979,472553,472126,471701,471275,470850,470425,
|
|
470001,469577,469153,468730,468307,467884,467462,467041,
|
|
466619,466198,465778,465358,464938,464518,464099,463681,
|
|
463262,462844,462427,462010,461593,461177,460760,460345,
|
|
459930,459515,459100,458686,458272,457859,457446,457033,
|
|
456621,456209,455797,455386,454975,454565,454155,453745,
|
|
453336,452927,452518,452110,451702,451294,450887,450481,
|
|
450074,449668,449262,448857,448452,448048,447644,447240,
|
|
446836,446433,446030,445628,445226,444824,444423,444022,
|
|
443622,443221,442821,442422,442023,441624,441226,440828,
|
|
440430,440033,439636,439239,438843,438447,438051,437656,
|
|
437261,436867,436473,436079,435686,435293,434900,434508,
|
|
434116,433724,433333,432942,432551,432161,431771,431382,
|
|
430992,430604,430215,429827,429439,429052,428665,428278,
|
|
427892,427506,427120,426735,426350,425965,425581,425197,
|
|
424813,424430,424047,423665,423283,422901,422519,422138,
|
|
421757,421377,420997,420617,420237,419858,419479,419101,
|
|
418723,418345,417968,417591,417214,416838,416462,416086,
|
|
415711,415336,414961,414586,414212,413839,413465,413092,
|
|
412720,412347,411975,411604,411232,410862,410491,410121,
|
|
409751,409381,409012,408643,408274,407906,407538,407170,
|
|
406803,406436,406069,405703,405337,404971,404606,404241,
|
|
403876,403512,403148,402784,402421,402058,401695,401333,
|
|
400970,400609,400247,399886,399525,399165,398805,398445,
|
|
398086,397727,397368,397009,396651,396293,395936,395579,
|
|
395222,394865,394509,394153,393798,393442,393087,392733,
|
|
392378,392024,391671,391317,390964,390612,390259,389907,
|
|
389556,389204,388853,388502,388152,387802,387452,387102,
|
|
386753,386404,386056,385707,385359,385012,384664,384317,
|
|
383971,383624,383278,382932,382587,382242,381897,381552,
|
|
381208,380864,380521,380177,379834,379492,379149,378807,
|
|
378466,378124,377783,377442,377102,376762,376422,376082,
|
|
375743,375404,375065,374727,374389,374051,373714,373377,
|
|
373040,372703,372367,372031,371695,371360,371025,370690,
|
|
370356,370022,369688,369355,369021,368688,368356,368023,
|
|
367691,367360,367028,366697,366366,366036,365706,365376,
|
|
365046,364717,364388,364059,363731,363403,363075,362747,
|
|
362420,362093,361766,361440,361114,360788,360463,360137,
|
|
359813,359488,359164,358840,358516,358193,357869,357547,
|
|
357224,356902,356580,356258,355937,355616,355295,354974,
|
|
354654,354334,354014,353695,353376,353057,352739,352420,
|
|
352103,351785,351468,351150,350834,350517,350201,349885,
|
|
349569,349254,348939,348624,348310,347995,347682,347368,
|
|
347055,346741,346429,346116,345804,345492,345180,344869,
|
|
344558,344247,343936,343626,343316,343006,342697,342388,
|
|
342079,341770,341462,341154,340846,340539,340231,339924,
|
|
339618,339311,339005,338700,338394,338089,337784,337479,
|
|
337175,336870,336566,336263,335959,335656,335354,335051,
|
|
334749,334447,334145,333844,333542,333242,332941,332641,
|
|
332341,332041,331741,331442,331143,330844,330546,330247,
|
|
329950,329652,329355,329057,328761,328464,328168,327872,
|
|
327576,327280,326985,326690,326395,326101,325807,325513,
|
|
325219,324926,324633,324340,324047,323755,323463,323171,
|
|
322879,322588,322297,322006,321716,321426,321136,320846,
|
|
320557,320267,319978,319690,319401,319113,318825,318538,
|
|
318250,317963,317676,317390,317103,316817,316532,316246,
|
|
315961,315676,315391,315106,314822,314538,314254,313971,
|
|
313688,313405,313122,312839,312557,312275,311994,311712,
|
|
311431,311150,310869,310589,310309,310029,309749,309470,
|
|
309190,308911,308633,308354,308076,307798,307521,307243,
|
|
306966,306689,306412,306136,305860,305584,305308,305033,
|
|
304758,304483,304208,303934,303659,303385,303112,302838,
|
|
302565,302292,302019,301747,301475,301203,300931,300660,
|
|
300388,300117,299847,299576,299306,299036,298766,298497,
|
|
298227,297958,297689,297421,297153,296884,296617,296349,
|
|
296082,295815,295548,295281,295015,294749,294483,294217,
|
|
293952,293686,293421,293157,292892,292628,292364,292100,
|
|
291837,291574,291311,291048,290785,290523,290261,289999,
|
|
289737,289476,289215,288954,288693,288433,288173,287913,
|
|
287653,287393,287134,286875,286616,286358,286099,285841,
|
|
285583,285326,285068,284811,284554,284298,284041,283785,
|
|
283529,283273,283017,282762,282507,282252,281998,281743,
|
|
281489,281235,280981,280728,280475,280222,279969,279716,
|
|
279464,279212,278960,278708,278457,278206,277955,277704,
|
|
277453,277203,276953,276703,276453,276204,275955,275706,
|
|
275457,275209,274960,274712,274465,274217,273970,273722,
|
|
273476,273229,272982,272736,272490,272244,271999,271753,
|
|
271508,271263,271018,270774,270530,270286,270042,269798,
|
|
269555,269312,269069,268826,268583,268341,268099,267857
|
|
};
|
|
|
|
|
|
// round(65536 * 2**(n/768))
|
|
// 768 = 64 extra-fine finetune steps for 12 notes
|
|
// Table content is in 16.16 format
|
|
const uint32 FineLinearSlideUpTable[16] =
|
|
{
|
|
65536, 65595, 65654, 65714, 65773, 65832, 65892, 65951,
|
|
66011, 66071, 66130, 66190, 66250, 66309, 66369, 66429
|
|
};
|
|
|
|
|
|
// round(65536 * 2**(-n/768))
|
|
// 768 = 64 extra-fine finetune steps for 12 notes
|
|
// Table content is in 16.16 format
|
|
// Note that there are a few errors in this table (typos?), but well, this table comes straight from Impulse Tracker's source...
|
|
// Entry 0 (65535) should be 65536 (this value is unused and most likely stored this way so that it fits in a 16-bit integer)
|
|
// Entry 11 (64888) should be 64889 - rounding error?
|
|
// Entry 15 (64645) should be 64655 - typo?
|
|
const uint32 FineLinearSlideDownTable[16] =
|
|
{
|
|
65535, 65477, 65418, 65359, 65300, 65241, 65182, 65123,
|
|
65065, 65006, 64947, 64888, 64830, 64772, 64713, 64645
|
|
};
|
|
|
|
|
|
// round(65536 * 2**(n/192))
|
|
// 192 = 16 finetune steps for 12 notes
|
|
// Table content is in 16.16 format
|
|
const uint32 LinearSlideUpTable[256] =
|
|
{
|
|
65536, 65773, 66011, 66250, 66489, 66730, 66971, 67213,
|
|
67456, 67700, 67945, 68191, 68438, 68685, 68933, 69183,
|
|
69433, 69684, 69936, 70189, 70443, 70698, 70953, 71210,
|
|
71468, 71726, 71985, 72246, 72507, 72769, 73032, 73297,
|
|
73562, 73828, 74095, 74363, 74632, 74902, 75172, 75444,
|
|
75717, 75991, 76266, 76542, 76819, 77096, 77375, 77655,
|
|
77936, 78218, 78501, 78785, 79069, 79355, 79642, 79930,
|
|
80220, 80510, 80801, 81093, 81386, 81681, 81976, 82273,
|
|
82570, 82869, 83169, 83469, 83771, 84074, 84378, 84683,
|
|
84990, 85297, 85606, 85915, 86226, 86538, 86851, 87165,
|
|
87480, 87796, 88114, 88433, 88752, 89073, 89396, 89719,
|
|
90043, 90369, 90696, 91024, 91353, 91684, 92015, 92348,
|
|
92682, 93017, 93354, 93691, 94030, 94370, 94711, 95054,
|
|
95398, 95743, 96089, 96436, 96785, 97135, 97487, 97839,
|
|
98193, 98548, 98905, 99262, 99621, 99982, 100343, 100706,
|
|
101070, 101436, 101803, 102171, 102540, 102911, 103283, 103657,
|
|
104032, 104408, 104786, 105165, 105545, 105927, 106310, 106694,
|
|
107080, 107468, 107856, 108246, 108638, 109031, 109425, 109821,
|
|
110218, 110617, 111017, 111418, 111821, 112226, 112631, 113039,
|
|
113448, 113858, 114270, 114683, 115098, 115514, 115932, 116351,
|
|
116772, 117194, 117618, 118043, 118470, 118899, 119329, 119760,
|
|
120194, 120628, 121065, 121502, 121942, 122383, 122825, 123270,
|
|
123715, 124163, 124612, 125063, 125515, 125969, 126425, 126882,
|
|
127341, 127801, 128263, 128727, 129193, 129660, 130129, 130600,
|
|
131072, 131546, 132022, 132499, 132978, 133459, 133942, 134427,
|
|
134913, 135401, 135890, 136382, 136875, 137370, 137867, 138366,
|
|
138866, 139368, 139872, 140378, 140886, 141395, 141907, 142420,
|
|
142935, 143452, 143971, 144491, 145014, 145539, 146065, 146593,
|
|
147123, 147655, 148189, 148725, 149263, 149803, 150345, 150889,
|
|
151434, 151982, 152532, 153083, 153637, 154193, 154750, 155310,
|
|
155872, 156435, 157001, 157569, 158139, 158711, 159285, 159861,
|
|
160439, 161019, 161602, 162186, 162773, 163361, 163952, 164545
|
|
};
|
|
|
|
|
|
// round(65536 * 2**(-n/192))
|
|
// 192 = 16 finetune steps for 12 notes
|
|
// Table content is in 16.16 format
|
|
const uint32 LinearSlideDownTable[256] =
|
|
{
|
|
65536, 65300, 65065, 64830, 64596, 64364, 64132, 63901,
|
|
63670, 63441, 63212, 62984, 62757, 62531, 62306, 62081,
|
|
61858, 61635, 61413, 61191, 60971, 60751, 60532, 60314,
|
|
60097, 59880, 59664, 59449, 59235, 59022, 58809, 58597,
|
|
58386, 58176, 57966, 57757, 57549, 57341, 57135, 56929,
|
|
56724, 56519, 56316, 56113, 55911, 55709, 55508, 55308,
|
|
55109, 54910, 54713, 54515, 54319, 54123, 53928, 53734,
|
|
53540, 53347, 53155, 52963, 52773, 52582, 52393, 52204,
|
|
52016, 51829, 51642, 51456, 51270, 51085, 50901, 50718,
|
|
50535, 50353, 50172, 49991, 49811, 49631, 49452, 49274,
|
|
49097, 48920, 48743, 48568, 48393, 48218, 48044, 47871,
|
|
47699, 47527, 47356, 47185, 47015, 46846, 46677, 46509,
|
|
46341, 46174, 46008, 45842, 45677, 45512, 45348, 45185,
|
|
45022, 44859, 44698, 44537, 44376, 44216, 44057, 43898,
|
|
43740, 43582, 43425, 43269, 43113, 42958, 42803, 42649,
|
|
42495, 42342, 42189, 42037, 41886, 41735, 41584, 41434,
|
|
41285, 41136, 40988, 40840, 40693, 40547, 40400, 40255,
|
|
40110, 39965, 39821, 39678, 39535, 39392, 39250, 39109,
|
|
38968, 38828, 38688, 38548, 38409, 38271, 38133, 37996,
|
|
37859, 37722, 37586, 37451, 37316, 37181, 37047, 36914,
|
|
36781, 36648, 36516, 36385, 36254, 36123, 35993, 35863,
|
|
35734, 35605, 35477, 35349, 35221, 35095, 34968, 34842,
|
|
34716, 34591, 34467, 34343, 34219, 34095, 33973, 33850,
|
|
33728, 33607, 33486, 33365, 33245, 33125, 33005, 32887,
|
|
32768, 32650, 32532, 32415, 32298, 32182, 32066, 31950,
|
|
31835, 31720, 31606, 31492, 31379, 31266, 31153, 31041,
|
|
30929, 30817, 30706, 30596, 30485, 30376, 30266, 30157,
|
|
30048, 29940, 29832, 29725, 29618, 29511, 29405, 29299,
|
|
29193, 29088, 28983, 28879, 28774, 28671, 28567, 28464,
|
|
28362, 28260, 28158, 28056, 27955, 27855, 27754, 27654,
|
|
27554, 27455, 27356, 27258, 27159, 27062, 26964, 26867,
|
|
26770, 26674, 26577, 26482, 26386, 26291, 26196, 26102
|
|
};
|
|
|
|
|
|
// FT2's square root panning law LUT.
|
|
// Formula to generate this table: round(65536 * sqrt(n / 256))
|
|
const uint16 XMPanningTable[256] =
|
|
{
|
|
0, 4096, 5793, 7094, 8192, 9159, 10033, 10837, 11585, 12288, 12953, 13585, 14189, 14768, 15326, 15864,
|
|
16384, 16888, 17378, 17854, 18318, 18770, 19212, 19644, 20066, 20480, 20886, 21283, 21674, 22058, 22435, 22806,
|
|
23170, 23530, 23884, 24232, 24576, 24915, 25249, 25580, 25905, 26227, 26545, 26859, 27170, 27477, 27780, 28081,
|
|
28378, 28672, 28963, 29251, 29537, 29819, 30099, 30377, 30652, 30924, 31194, 31462, 31727, 31991, 32252, 32511,
|
|
32768, 33023, 33276, 33527, 33776, 34024, 34270, 34514, 34756, 34996, 35235, 35472, 35708, 35942, 36175, 36406,
|
|
36636, 36864, 37091, 37316, 37540, 37763, 37985, 38205, 38424, 38642, 38858, 39073, 39287, 39500, 39712, 39923,
|
|
40132, 40341, 40548, 40755, 40960, 41164, 41368, 41570, 41771, 41972, 42171, 42369, 42567, 42763, 42959, 43154,
|
|
43348, 43541, 43733, 43925, 44115, 44305, 44494, 44682, 44869, 45056, 45242, 45427, 45611, 45795, 45977, 46160,
|
|
46341, 46522, 46702, 46881, 47059, 47237, 47415, 47591, 47767, 47942, 48117, 48291, 48465, 48637, 48809, 48981,
|
|
49152, 49322, 49492, 49661, 49830, 49998, 50166, 50332, 50499, 50665, 50830, 50995, 51159, 51323, 51486, 51649,
|
|
51811, 51972, 52134, 52294, 52454, 52614, 52773, 52932, 53090, 53248, 53405, 53562, 53719, 53874, 54030, 54185,
|
|
54340, 54494, 54647, 54801, 54954, 55106, 55258, 55410, 55561, 55712, 55862, 56012, 56162, 56311, 56459, 56608,
|
|
56756, 56903, 57051, 57198, 57344, 57490, 57636, 57781, 57926, 58071, 58215, 58359, 58503, 58646, 58789, 58931,
|
|
59073, 59215, 59357, 59498, 59639, 59779, 59919, 60059, 60199, 60338, 60477, 60615, 60753, 60891, 61029, 61166,
|
|
61303, 61440, 61576, 61712, 61848, 61984, 62119, 62254, 62388, 62523, 62657, 62790, 62924, 63057, 63190, 63323,
|
|
63455, 63587, 63719, 63850, 63982, 64113, 64243, 64374, 64504, 64634, 64763, 64893, 65022, 65151, 65279, 65408,
|
|
};
|
|
|
|
|
|
// IT Vibrato -> OpenMPT/XM VibratoType
|
|
const uint8 AutoVibratoIT2XM[8] = { VIB_SINE, VIB_RAMP_DOWN, VIB_SQUARE, VIB_RANDOM, VIB_RAMP_UP, 0, 0, 0 };
|
|
// OpenMPT/XM VibratoType -> IT Vibrato
|
|
const uint8 AutoVibratoXM2IT[8] = { 0, 2, 4, 1, 3, 0, 0, 0 };
|
|
|
|
// Reversed sinc coefficients for 4x256 taps polyphase FIR resampling filter (SchismTracker's lutgen.c should generate a very similar table, but it's more precise)
|
|
const int16 CResampler::FastSincTable[256*4] =
|
|
{ // Cubic Spline
|
|
0, 16384, 0, 0, -31, 16383, 32, 0, -63, 16381, 65, 0, -93, 16378, 100, -1,
|
|
-124, 16374, 135, -1, -153, 16368, 172, -3, -183, 16361, 209, -4, -211, 16353, 247, -5,
|
|
-240, 16344, 287, -7, -268, 16334, 327, -9, -295, 16322, 368, -12, -322, 16310, 410, -14,
|
|
-348, 16296, 453, -17, -374, 16281, 497, -20, -400, 16265, 541, -23, -425, 16248, 587, -26,
|
|
-450, 16230, 634, -30, -474, 16210, 681, -33, -497, 16190, 729, -37, -521, 16168, 778, -41,
|
|
-543, 16145, 828, -46, -566, 16121, 878, -50, -588, 16097, 930, -55, -609, 16071, 982, -60,
|
|
-630, 16044, 1035, -65, -651, 16016, 1089, -70, -671, 15987, 1144, -75, -691, 15957, 1199, -81,
|
|
-710, 15926, 1255, -87, -729, 15894, 1312, -93, -748, 15861, 1370, -99, -766, 15827, 1428, -105,
|
|
-784, 15792, 1488, -112, -801, 15756, 1547, -118, -818, 15719, 1608, -125, -834, 15681, 1669, -132,
|
|
-850, 15642, 1731, -139, -866, 15602, 1794, -146, -881, 15561, 1857, -153, -896, 15520, 1921, -161,
|
|
-911, 15477, 1986, -168, -925, 15434, 2051, -176, -939, 15390, 2117, -184, -952, 15344, 2184, -192,
|
|
-965, 15298, 2251, -200, -978, 15251, 2319, -208, -990, 15204, 2387, -216, -1002, 15155, 2456, -225,
|
|
-1014, 15106, 2526, -234, -1025, 15055, 2596, -242, -1036, 15004, 2666, -251, -1046, 14952, 2738, -260,
|
|
-1056, 14899, 2810, -269, -1066, 14846, 2882, -278, -1075, 14792, 2955, -287, -1084, 14737, 3028, -296,
|
|
-1093, 14681, 3102, -306, -1102, 14624, 3177, -315, -1110, 14567, 3252, -325, -1118, 14509, 3327, -334,
|
|
-1125, 14450, 3403, -344, -1132, 14390, 3480, -354, -1139, 14330, 3556, -364, -1145, 14269, 3634, -374,
|
|
-1152, 14208, 3712, -384, -1157, 14145, 3790, -394, -1163, 14082, 3868, -404, -1168, 14018, 3947, -414,
|
|
-1173, 13954, 4027, -424, -1178, 13889, 4107, -434, -1182, 13823, 4187, -445, -1186, 13757, 4268, -455,
|
|
-1190, 13690, 4349, -465, -1193, 13623, 4430, -476, -1196, 13555, 4512, -486, -1199, 13486, 4594, -497,
|
|
-1202, 13417, 4676, -507, -1204, 13347, 4759, -518, -1206, 13276, 4842, -528, -1208, 13205, 4926, -539,
|
|
-1210, 13134, 5010, -550, -1211, 13061, 5094, -560, -1212, 12989, 5178, -571, -1212, 12915, 5262, -581,
|
|
-1213, 12842, 5347, -592, -1213, 12767, 5432, -603, -1213, 12693, 5518, -613, -1213, 12617, 5603, -624,
|
|
-1212, 12542, 5689, -635, -1211, 12466, 5775, -645, -1210, 12389, 5862, -656, -1209, 12312, 5948, -667,
|
|
-1208, 12234, 6035, -677, -1206, 12156, 6122, -688, -1204, 12078, 6209, -698, -1202, 11999, 6296, -709,
|
|
-1200, 11920, 6384, -720, -1197, 11840, 6471, -730, -1194, 11760, 6559, -740, -1191, 11679, 6647, -751,
|
|
-1188, 11598, 6735, -761, -1184, 11517, 6823, -772, -1181, 11436, 6911, -782, -1177, 11354, 6999, -792,
|
|
-1173, 11271, 7088, -802, -1168, 11189, 7176, -812, -1164, 11106, 7265, -822, -1159, 11022, 7354, -832,
|
|
-1155, 10939, 7442, -842, -1150, 10855, 7531, -852, -1144, 10771, 7620, -862, -1139, 10686, 7709, -872,
|
|
-1134, 10602, 7798, -882, -1128, 10516, 7886, -891, -1122, 10431, 7975, -901, -1116, 10346, 8064, -910,
|
|
-1110, 10260, 8153, -919, -1103, 10174, 8242, -929, -1097, 10088, 8331, -938, -1090, 10001, 8420, -947,
|
|
-1083, 9915, 8508, -956, -1076, 9828, 8597, -965, -1069, 9741, 8686, -973, -1062, 9654, 8774, -982,
|
|
-1054, 9566, 8863, -991, -1047, 9479, 8951, -999, -1039, 9391, 9039, -1007, -1031, 9303, 9127, -1015,
|
|
-1024, 9216, 9216, -1024, -1015, 9127, 9303, -1031, -1007, 9039, 9391, -1039, -999, 8951, 9479, -1047,
|
|
-991, 8863, 9566, -1054, -982, 8774, 9654, -1062, -973, 8686, 9741, -1069, -965, 8597, 9828, -1076,
|
|
-956, 8508, 9915, -1083, -947, 8420, 10001, -1090, -938, 8331, 10088, -1097, -929, 8242, 10174, -1103,
|
|
-919, 8153, 10260, -1110, -910, 8064, 10346, -1116, -901, 7975, 10431, -1122, -891, 7886, 10516, -1128,
|
|
-882, 7798, 10602, -1134, -872, 7709, 10686, -1139, -862, 7620, 10771, -1144, -852, 7531, 10855, -1150,
|
|
-842, 7442, 10939, -1155, -832, 7354, 11022, -1159, -822, 7265, 11106, -1164, -812, 7176, 11189, -1168,
|
|
-802, 7088, 11271, -1173, -792, 6999, 11354, -1177, -782, 6911, 11436, -1181, -772, 6823, 11517, -1184,
|
|
-761, 6735, 11598, -1188, -751, 6647, 11679, -1191, -740, 6559, 11760, -1194, -730, 6471, 11840, -1197,
|
|
-720, 6384, 11920, -1200, -709, 6296, 11999, -1202, -698, 6209, 12078, -1204, -688, 6122, 12156, -1206,
|
|
-677, 6035, 12234, -1208, -667, 5948, 12312, -1209, -656, 5862, 12389, -1210, -645, 5775, 12466, -1211,
|
|
-635, 5689, 12542, -1212, -624, 5603, 12617, -1213, -613, 5518, 12693, -1213, -603, 5432, 12767, -1213,
|
|
-592, 5347, 12842, -1213, -581, 5262, 12915, -1212, -571, 5178, 12989, -1212, -560, 5094, 13061, -1211,
|
|
-550, 5010, 13134, -1210, -539, 4926, 13205, -1208, -528, 4842, 13276, -1206, -518, 4759, 13347, -1204,
|
|
-507, 4676, 13417, -1202, -497, 4594, 13486, -1199, -486, 4512, 13555, -1196, -476, 4430, 13623, -1193,
|
|
-465, 4349, 13690, -1190, -455, 4268, 13757, -1186, -445, 4187, 13823, -1182, -434, 4107, 13889, -1178,
|
|
-424, 4027, 13954, -1173, -414, 3947, 14018, -1168, -404, 3868, 14082, -1163, -394, 3790, 14145, -1157,
|
|
-384, 3712, 14208, -1152, -374, 3634, 14269, -1145, -364, 3556, 14330, -1139, -354, 3480, 14390, -1132,
|
|
-344, 3403, 14450, -1125, -334, 3327, 14509, -1118, -325, 3252, 14567, -1110, -315, 3177, 14624, -1102,
|
|
-306, 3102, 14681, -1093, -296, 3028, 14737, -1084, -287, 2955, 14792, -1075, -278, 2882, 14846, -1066,
|
|
-269, 2810, 14899, -1056, -260, 2738, 14952, -1046, -251, 2666, 15004, -1036, -242, 2596, 15055, -1025,
|
|
-234, 2526, 15106, -1014, -225, 2456, 15155, -1002, -216, 2387, 15204, -990, -208, 2319, 15251, -978,
|
|
-200, 2251, 15298, -965, -192, 2184, 15344, -952, -184, 2117, 15390, -939, -176, 2051, 15434, -925,
|
|
-168, 1986, 15477, -911, -161, 1921, 15520, -896, -153, 1857, 15561, -881, -146, 1794, 15602, -866,
|
|
-139, 1731, 15642, -850, -132, 1669, 15681, -834, -125, 1608, 15719, -818, -118, 1547, 15756, -801,
|
|
-112, 1488, 15792, -784, -105, 1428, 15827, -766, -99, 1370, 15861, -748, -93, 1312, 15894, -729,
|
|
-87, 1255, 15926, -710, -81, 1199, 15957, -691, -75, 1144, 15987, -671, -70, 1089, 16016, -651,
|
|
-65, 1035, 16044, -630, -60, 982, 16071, -609, -55, 930, 16097, -588, -50, 878, 16121, -566,
|
|
-46, 828, 16145, -543, -41, 778, 16168, -521, -37, 729, 16190, -497, -33, 681, 16210, -474,
|
|
-30, 634, 16230, -450, -26, 587, 16248, -425, -23, 541, 16265, -400, -20, 497, 16281, -374,
|
|
-17, 453, 16296, -348, -14, 410, 16310, -322, -12, 368, 16322, -295, -9, 327, 16334, -268,
|
|
-7, 287, 16344, -240, -5, 247, 16353, -211, -4, 209, 16361, -183, -3, 172, 16368, -153,
|
|
-1, 135, 16374, -124, -1, 100, 16378, -93, 0, 65, 16381, -63, 0, 32, 16383, -31,
|
|
};
|
|
|
|
|
|
/////////////////////////////////////////////////////////////////////////////////////////////
|
|
|
|
|
|
// Compute Bessel function Izero(y) using a series approximation
|
|
double Izero(double y)
|
|
{
|
|
double s = 1, ds = 1, d = 0;
|
|
do
|
|
{
|
|
d = d + 2;
|
|
ds = ds * (y * y) / (d * d);
|
|
s = s + ds;
|
|
} while(ds > 1E-7 * s);
|
|
return s;
|
|
}
|
|
|
|
|
|
static void getsinc(SINC_TYPE *psinc, double beta, double cutoff)
|
|
{
|
|
if(cutoff >= 0.999)
|
|
{
|
|
// Avoid mixer overflows.
|
|
// 1.0 itself does not make much sense.
|
|
cutoff = 0.999;
|
|
}
|
|
const double izeroBeta = Izero(beta);
|
|
const double kPi = 4.0 * std::atan(1.0) * cutoff;
|
|
for(int isrc = 0; isrc < 8 * SINC_PHASES; isrc++)
|
|
{
|
|
double fsinc;
|
|
int ix = 7 - (isrc & 7);
|
|
ix = (ix * SINC_PHASES) + (isrc >> 3);
|
|
if(ix == (4 * SINC_PHASES))
|
|
{
|
|
fsinc = 1.0;
|
|
} else
|
|
{
|
|
const double x = (double)(ix - (4 * SINC_PHASES)) * (double)(1.0 / SINC_PHASES);
|
|
const double xPi = x * kPi;
|
|
fsinc = std::sin(xPi) * Izero(beta * std::sqrt(1 - x * x * (1.0 / 16.0))) / (izeroBeta * xPi); // Kaiser window
|
|
}
|
|
double coeff = fsinc * cutoff;
|
|
#ifdef MPT_INTMIXER
|
|
*psinc++ = mpt::saturate_round<SINC_TYPE>(coeff * (1 << SINC_QUANTSHIFT));
|
|
#else
|
|
*psinc++ = static_cast<SINC_TYPE>(coeff);
|
|
#endif
|
|
}
|
|
}
|
|
|
|
|
|
#ifdef MODPLUG_TRACKER
|
|
bool CResampler::StaticTablesInitialized = false;
|
|
SINC_TYPE CResampler::gKaiserSinc[SINC_PHASES * 8]; // Upsampling
|
|
SINC_TYPE CResampler::gDownsample13x[SINC_PHASES * 8]; // Downsample 1.333x
|
|
SINC_TYPE CResampler::gDownsample2x[SINC_PHASES * 8]; // Downsample 2x
|
|
Paula::BlepTables CResampler::blepTables; // Amiga BLEP resampler
|
|
#ifndef MPT_INTMIXER
|
|
mixsample_t CResampler::FastSincTablef[256 * 4]; // Cubic spline LUT
|
|
#endif // !defined(MPT_INTMIXER)
|
|
#endif // MODPLUG_TRACKER
|
|
|
|
|
|
void CResampler::InitFloatmixerTables()
|
|
{
|
|
#ifdef MPT_BUILD_FUZZER
|
|
// Creating resampling tables can take a little while which we really should not spend
|
|
// when fuzzing OpenMPT for crashes and hangs. This content of the tables is not really
|
|
// relevant for any kind of possible crashes or hangs.
|
|
return;
|
|
#endif // MPT_BUILD_FUZZER
|
|
#ifndef MPT_INTMIXER
|
|
// Prepare fast sinc coefficients for floating point mixer
|
|
for(std::size_t i = 0; i < std::size(FastSincTable); i++)
|
|
{
|
|
FastSincTablef[i] = static_cast<mixsample_t>(FastSincTable[i] * mixsample_t(1.0f / 16384.0f));
|
|
}
|
|
#endif // !defined(MPT_INTMIXER)
|
|
}
|
|
|
|
|
|
void CResampler::InitializeTablesFromScratch(bool force)
|
|
{
|
|
bool initParameterIndependentTables = false;
|
|
if(force)
|
|
{
|
|
initParameterIndependentTables = true;
|
|
}
|
|
#ifdef MODPLUG_TRACKER
|
|
initParameterIndependentTables = !StaticTablesInitialized;
|
|
#endif // MODPLUG_TRACKER
|
|
|
|
MPT_MAYBE_CONSTANT_IF(initParameterIndependentTables)
|
|
{
|
|
InitFloatmixerTables();
|
|
|
|
blepTables.InitTables();
|
|
|
|
getsinc(gKaiserSinc, 9.6377, 0.97);
|
|
getsinc(gDownsample13x, 8.5, 0.5);
|
|
getsinc(gDownsample2x, 2.7625, 0.425);
|
|
|
|
#ifdef MODPLUG_TRACKER
|
|
StaticTablesInitialized = true;
|
|
#endif // MODPLUG_TRACKER
|
|
}
|
|
|
|
if((m_OldSettings == m_Settings) && !force)
|
|
{
|
|
return;
|
|
}
|
|
|
|
m_WindowedFIR.InitTable(m_Settings.gdWFIRCutoff, m_Settings.gbWFIRType);
|
|
|
|
m_OldSettings = m_Settings;
|
|
}
|
|
|
|
|
|
#ifdef MPT_RESAMPLER_TABLES_CACHED
|
|
|
|
static const CResampler & GetCachedResampler()
|
|
{
|
|
static CResampler s_CachedResampler(true);
|
|
return s_CachedResampler;
|
|
}
|
|
|
|
|
|
void CResampler::InitializeTablesFromCache()
|
|
{
|
|
const CResampler & s_CachedResampler = GetCachedResampler();
|
|
InitFloatmixerTables();
|
|
std::copy(s_CachedResampler.gKaiserSinc, s_CachedResampler.gKaiserSinc + SINC_PHASES*8, gKaiserSinc);
|
|
std::copy(s_CachedResampler.gDownsample13x, s_CachedResampler.gDownsample13x + SINC_PHASES*8, gDownsample13x);
|
|
std::copy(s_CachedResampler.gDownsample2x, s_CachedResampler.gDownsample2x + SINC_PHASES*8, gDownsample2x);
|
|
std::copy(s_CachedResampler.m_WindowedFIR.lut, s_CachedResampler.m_WindowedFIR.lut + WFIR_LUTLEN*WFIR_WIDTH, m_WindowedFIR.lut);
|
|
blepTables = s_CachedResampler.blepTables;
|
|
}
|
|
|
|
#endif // MPT_RESAMPLER_TABLES_CACHED
|
|
|
|
|
|
#ifdef MPT_RESAMPLER_TABLES_CACHED_ONSTARTUP
|
|
|
|
struct ResampleCacheInitializer
|
|
{
|
|
ResampleCacheInitializer()
|
|
{
|
|
GetCachedResampler();
|
|
}
|
|
};
|
|
#if MPT_COMPILER_CLANG
|
|
#pragma clang diagnostic push
|
|
#pragma clang diagnostic ignored "-Wglobal-constructors"
|
|
#endif // MPT_COMPILER_CLANG
|
|
static ResampleCacheInitializer g_ResamplerCachePrimer;
|
|
#if MPT_COMPILER_CLANG
|
|
#pragma clang diagnostic pop
|
|
#endif // MPT_COMPILER_CLANG
|
|
|
|
#endif // MPT_RESAMPLER_TABLES_CACHED_ONSTARTUP
|
|
|
|
|
|
OPENMPT_NAMESPACE_END
|