You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
558 lines
13 KiB
558 lines
13 KiB
/*
|
|
MicroDexed
|
|
|
|
MicroDexed is a port of the Dexed sound engine
|
|
(https://github.com/asb2m10/dexed) for the Teensy-3.5/3.6 with audio shield.
|
|
Dexed ist heavily based on https://github.com/google/music-synthesizer-for-android
|
|
|
|
(c)2018-2020 H. Wirtz <wirtz@parasitstudio.de>
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software Foundation,
|
|
Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
|
|
|
*/
|
|
|
|
#include <Arduino.h>
|
|
#include "config.h"
|
|
#include <Wire.h>
|
|
#include <SD.h>
|
|
#include "dexed.h"
|
|
#include "dexed_sd.h"
|
|
|
|
/******************************************************************************
|
|
SD BANK/VOICE LOADING
|
|
******************************************************************************/
|
|
|
|
bool load_sd_voice(uint8_t b, uint8_t v, uint8_t instance_id)
|
|
{
|
|
#if DEBUG
|
|
bool found = false;
|
|
#endif
|
|
v = constrain(v, 0, MAX_VOICES - 1);
|
|
b = constrain(b, 0, MAX_BANKS - 1);
|
|
|
|
if (sd_card > 0)
|
|
{
|
|
File sysex;
|
|
char filename[FILENAME_LEN];
|
|
uint8_t data[128];
|
|
|
|
sprintf(filename, "/%d/%s", b, bank_names[instance_id][b]);
|
|
|
|
sysex = SD.open(filename);
|
|
if (!sysex)
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.print(F("E : Cannot open "));
|
|
Serial.print(filename);
|
|
Serial.println(F(" on SD."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
|
|
if (get_sd_voice(sysex, v, data))
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.print(F("Loading voice from "));
|
|
Serial.print(filename);
|
|
Serial.print(F(" ["));
|
|
Serial.print(voice_names[instance_id][v]);
|
|
Serial.println(F("]"));
|
|
#endif
|
|
bool ret = MicroDexed[instance_id]->decodeVoice(data);
|
|
#ifdef DEBUG
|
|
show_patch(instance_id);
|
|
#endif
|
|
configuration.dexed[instance_id].transpose = MicroDexed[instance_id]->data[DEXED_VOICE_OFFSET + DEXED_TRANSPOSE];
|
|
|
|
load_sd_voiceconfig(b, v, instance_id); // check for coice config to load
|
|
|
|
return (ret);
|
|
}
|
|
#ifdef DEBUG
|
|
else
|
|
Serial.println(F("E : Cannot load voice data"));
|
|
#endif
|
|
}
|
|
#ifdef DEBUG
|
|
if (found == false)
|
|
Serial.println(F("E : File not found."));
|
|
#endif
|
|
|
|
return (false);
|
|
}
|
|
|
|
bool get_sd_voice(File sysex, uint8_t voice_number, uint8_t* data)
|
|
{
|
|
uint16_t n;
|
|
int32_t bulk_checksum_calc = 0;
|
|
int8_t bulk_checksum;
|
|
|
|
if (sysex.size() != 4104) // check sysex size
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx file size wrong."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
if (sysex.read() != 0xf0) // check sysex start-byte
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx start byte not found."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
if (sysex.read() != 0x43) // check sysex vendor is Yamaha
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx vendor not Yamaha."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
sysex.seek(4103);
|
|
if (sysex.read() != 0xf7) // check sysex end-byte
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx end byte not found."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
sysex.seek(3);
|
|
if (sysex.read() != 0x09) // check for sysex type (0x09=32 voices)
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx type not 32 voices."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
sysex.seek(4102); // Bulk checksum
|
|
bulk_checksum = sysex.read();
|
|
|
|
sysex.seek(6); // start of bulk data
|
|
for (n = 0; n < 4096; n++)
|
|
{
|
|
uint8_t d = sysex.read();
|
|
if (n >= voice_number * 128 && n < (voice_number + 1) * 128)
|
|
data[n - (voice_number * 128)] = d;
|
|
bulk_checksum_calc -= d;
|
|
}
|
|
bulk_checksum_calc &= 0x7f;
|
|
|
|
#ifdef DEBUG
|
|
Serial.print(F("Bulk checksum : 0x"));
|
|
Serial.print(bulk_checksum_calc, HEX);
|
|
Serial.print(F(" [0x"));
|
|
Serial.print(bulk_checksum, HEX);
|
|
Serial.println(F("]"));
|
|
#endif
|
|
|
|
if (bulk_checksum_calc != bulk_checksum)
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.print(F("E : Bulk checksum mismatch : 0x"));
|
|
Serial.print(bulk_checksum_calc, HEX);
|
|
Serial.print(F(" != 0x"));
|
|
Serial.println(bulk_checksum, HEX);
|
|
#endif
|
|
return (false);
|
|
}
|
|
|
|
MicroDexed[0]->render_time_max = 0;
|
|
|
|
return (true);
|
|
}
|
|
|
|
/******************************************************************************
|
|
SD VOICE CONFIG
|
|
******************************************************************************/
|
|
bool load_sd_voiceconfig(uint8_t b, uint8_t v, uint8_t instance_id)
|
|
{
|
|
if (sd_card > 0)
|
|
{
|
|
File sysex;
|
|
char filename[FILENAME_LEN];
|
|
|
|
sprintf(filename, "/%d/%s%d.syx", b, VOICE_CONFIG_NAME, v);
|
|
|
|
// first check if file exists...
|
|
if (SD.exists(filename))
|
|
{
|
|
// ... and if: load
|
|
#ifdef DEBUG
|
|
Serial.print(F("Found voice configuration ["));
|
|
Serial.print(filename);
|
|
Serial.println(F("]... loading..."));
|
|
#endif
|
|
sysex = SD.open(filename);
|
|
if (!sysex)
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.print(F("E : Cannot open "));
|
|
Serial.print(filename);
|
|
Serial.println(F(" on SD."));
|
|
#endif
|
|
return (get_sd_voiceconfig(sysex, (uint8_t*)&configuration.dexed[instance_id], instance_id));
|
|
}
|
|
}
|
|
else
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.print(F("No "));
|
|
Serial.print(filename);
|
|
Serial.println(F(" available."));
|
|
#endif
|
|
}
|
|
}
|
|
|
|
return (false);
|
|
}
|
|
|
|
bool get_sd_voiceconfig(File sysex, uint8_t* conf, uint8_t instance_id)
|
|
{
|
|
uint16_t n;
|
|
int32_t bulk_checksum_calc = 0;
|
|
int8_t bulk_checksum;
|
|
|
|
if (sysex.read() != 0xf0) // check sysex start-byte
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx start byte not found."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
if (sysex.read() != 0x67) // check sysex vendor is unofficial SYSEX-ID for MicroDexed
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx vendor not unofficial SYSEX-ID for MicroDexed."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
if (sysex.read() != 0x42) // check for sysex type (66 = MicroDexed voice setup)
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx type not MicroDexed setup."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
sysex.seek(sysex.size());
|
|
if (sysex.read() != 0xf7) // check sysex end-byte
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx end byte not found."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
|
|
sysex.seek(sysex.size() - 1); // Bulk checksum
|
|
bulk_checksum = sysex.read();
|
|
|
|
sysex.seek(3); // start of bulk data
|
|
for (n = 0; n < sysex.size() - 3; n++)
|
|
{
|
|
uint8_t d = sysex.read();
|
|
bulk_checksum_calc -= d;
|
|
*conf++ = d;
|
|
}
|
|
bulk_checksum_calc &= 0x7f;
|
|
|
|
#ifdef DEBUG
|
|
Serial.print(F("Bulk checksum : 0x"));
|
|
Serial.print(bulk_checksum_calc, HEX);
|
|
Serial.print(F(" [0x"));
|
|
Serial.print(bulk_checksum, HEX);
|
|
Serial.println(F("]"));
|
|
#endif
|
|
|
|
if (bulk_checksum_calc != bulk_checksum)
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.print(F("E : Bulk checksum mismatch : 0x"));
|
|
Serial.print(bulk_checksum_calc, HEX);
|
|
Serial.print(F(" != 0x"));
|
|
Serial.println(bulk_checksum, HEX);
|
|
#endif
|
|
return (false);
|
|
}
|
|
#ifdef DEBUG
|
|
Serial.println(F("Voice config loaded."));
|
|
#endif
|
|
configuration.dexed[instance_id].checksum = crc32((uint8_t*)&configuration.dexed[instance_id] + 4, sizeof(configuration.dexed[instance_id]) - 4);
|
|
|
|
return (true);
|
|
}
|
|
|
|
bool save_sd_voiceconfig(uint8_t b, uint8_t v, uint8_t instance_id)
|
|
{
|
|
v = constrain(v, 0, MAX_VOICES - 1);
|
|
b = constrain(b, 0, MAX_BANKS - 1);
|
|
|
|
if (sd_card > 0)
|
|
{
|
|
File sysex;
|
|
char filename[FILENAME_LEN];
|
|
|
|
sprintf(filename, "/%d/%s%d.syx", b, VOICE_CONFIG_NAME, v);
|
|
|
|
#ifdef DEBUG
|
|
Serial.print(F("Saving config "));
|
|
Serial.print(b);
|
|
Serial.print(F("/"));
|
|
Serial.print(v);
|
|
Serial.print(F("["));
|
|
Serial.print(instance_id);
|
|
Serial.print(F("]"));
|
|
Serial.print(F(" to "));
|
|
Serial.println(filename);
|
|
#endif
|
|
|
|
sysex = SD.open(filename, FILE_WRITE);
|
|
if (!sysex)
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.print(F("E : Cannot open "));
|
|
Serial.print(filename);
|
|
Serial.println(F(" on SD."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
|
|
if (write_sd_voiceconfig(sysex, (uint8_t*)&configuration.dexed[instance_id], sizeof(configuration.dexed[instance_id])))
|
|
{
|
|
sysex.close();
|
|
return (true);
|
|
}
|
|
#ifdef DEBUG
|
|
else
|
|
Serial.println(F("E : Cannot save voice data"));
|
|
#endif
|
|
}
|
|
|
|
return (false);
|
|
}
|
|
|
|
bool write_sd_voiceconfig(File sysex, uint8_t* data, uint16_t len)
|
|
{
|
|
// write sysex start
|
|
sysex.write(0xf0);
|
|
// write sysex vendor is unofficial SYSEX-ID for MicroDexed
|
|
sysex.write(0x67);
|
|
// write sysex format number (f=66 MicroDexed voice config)
|
|
sysex.write(0x42);
|
|
// write data
|
|
sysex.write(data, len - 2); // minus 2 because at the end of the struct are voice and ban number - not very interesting here...
|
|
// write checksum
|
|
sysex.write(calc_checksum(data, len - 2));
|
|
// write sysex end
|
|
sysex.write(0xf7);
|
|
|
|
return (true);
|
|
}
|
|
|
|
/******************************************************************************
|
|
HELPER FUNCTIONS
|
|
******************************************************************************/
|
|
|
|
uint8_t calc_checksum(uint8_t* data, uint16_t len)
|
|
{
|
|
int32_t bulk_checksum_calc = 0;
|
|
|
|
for (uint16_t n = 0; n < len; n++)
|
|
bulk_checksum_calc -= data[n];
|
|
|
|
return (bulk_checksum_calc & 0x7f);
|
|
}
|
|
|
|
void create_sd_voiceconfig_filename(char* filename, uint8_t b, uint8_t instance_id)
|
|
{
|
|
// init and set name for actual bank
|
|
memset(filename, 0, FILENAME_LEN);
|
|
sprintf(filename, "/%d/%s", b, bank_names[instance_id][b]);
|
|
#ifdef DEBUG
|
|
Serial.print(F("Created filename from bank "));
|
|
Serial.print(b, DEC);
|
|
Serial.print(F(" and name "));
|
|
Serial.print(bank_names[instance_id][b]);
|
|
Serial.print(F(": ["));
|
|
Serial.print(filename);
|
|
Serial.println(F("]"));
|
|
#endif
|
|
}
|
|
|
|
void strip_extension(char* s, char* target)
|
|
{
|
|
char tmp[BANK_NAME_LEN];
|
|
char* token;
|
|
|
|
strcpy(tmp, s);
|
|
token = strtok(tmp, ".");
|
|
if (token == NULL)
|
|
strcpy(target, "*ERROR*");
|
|
else
|
|
strcpy(target, token);
|
|
}
|
|
|
|
bool get_voice_names_from_bank(uint8_t b, uint8_t instance_id)
|
|
{
|
|
File sysex;
|
|
uint8_t voice_counter = 0;
|
|
int32_t bulk_checksum_calc = 0;
|
|
int8_t bulk_checksum;
|
|
|
|
b = constrain(b, 0, MAX_BANKS - 1);
|
|
|
|
// erase all data for voice names
|
|
memset(voice_names[instance_id], 0, MAX_VOICES * VOICE_NAME_LEN);
|
|
|
|
if (sd_card > 0)
|
|
{
|
|
char filename[FILENAME_LEN];
|
|
|
|
sprintf(filename, "/%d/%s", b, bank_names[instance_id][b]);
|
|
|
|
#ifdef DEBUG
|
|
Serial.print(F("Reading voice names for bank ["));
|
|
Serial.print(filename);
|
|
Serial.println(F("]"));
|
|
#endif
|
|
|
|
// try to open bank directory
|
|
sysex = SD.open(filename);
|
|
if (!sysex)
|
|
return (false);
|
|
|
|
if (sysex.size() != 4104) // check sysex size
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx file size wrong."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
if (sysex.read() != 0xf0) // check sysex start-byte
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx start byte not found."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
if (sysex.read() != 0x43) // check sysex vendor is Yamaha
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx vendor not Yamaha."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
sysex.seek(4103);
|
|
if (sysex.read() != 0xf7) // check sysex end-byte
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx end byte not found."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
sysex.seek(3);
|
|
if (sysex.read() != 0x09) // check for sysex type (0x09=32 voices)
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.println(F("E : SysEx type not 32 voices."));
|
|
#endif
|
|
return (false);
|
|
}
|
|
sysex.seek(4102); // Bulk checksum
|
|
bulk_checksum = sysex.read();
|
|
|
|
sysex.seek(6); // start of bulk data
|
|
|
|
for (uint16_t n = 0; n < 4096; n++)
|
|
{
|
|
uint8_t d = sysex.read();
|
|
|
|
if ((n % 128) >= 118 && (n % 128) < 128) // found the start of the voicename
|
|
{
|
|
voice_names[instance_id][voice_counter][(n % 128) - 118] = d;
|
|
}
|
|
if (n % 128 == 127)
|
|
voice_counter++;
|
|
bulk_checksum_calc -= d;
|
|
}
|
|
bulk_checksum_calc &= 0x7f;
|
|
|
|
#ifdef DEBUG
|
|
Serial.print(F("Bulk checksum : 0x"));
|
|
Serial.print(bulk_checksum_calc, HEX);
|
|
Serial.print(F(" [0x"));
|
|
Serial.print(bulk_checksum, HEX);
|
|
Serial.println(F("]"));
|
|
#endif
|
|
|
|
if (bulk_checksum_calc != bulk_checksum)
|
|
{
|
|
#ifdef DEBUG
|
|
Serial.print(F("E : Bulk checksum mismatch : 0x"));
|
|
Serial.print(bulk_checksum_calc, HEX);
|
|
Serial.print(F(" != 0x"));
|
|
Serial.println(bulk_checksum, HEX);
|
|
#endif
|
|
return (false);
|
|
}
|
|
}
|
|
|
|
return (false);
|
|
}
|
|
|
|
uint8_t get_bank_names(uint8_t instance_id)
|
|
{
|
|
File root;
|
|
uint8_t bank_counter = 0;
|
|
|
|
// erase all data for bank names
|
|
memset(bank_names[instance_id], 0, MAX_BANKS * BANK_NAME_LEN);
|
|
|
|
if (sd_card > 0)
|
|
{
|
|
char bankdir[4];
|
|
|
|
do
|
|
{
|
|
// init and set name for actual bank directory
|
|
sprintf(bankdir, "/%d", bank_counter);
|
|
|
|
// try to open directory
|
|
root = SD.open(bankdir);
|
|
if (!root)
|
|
break;
|
|
|
|
// read filenames
|
|
File entry = root.openNextFile();
|
|
if (!entry.isDirectory())
|
|
{
|
|
while ((strncmp(entry.name(), VOICE_CONFIG_NAME, sizeof(VOICE_CONFIG_NAME) - 1) == 0))
|
|
{
|
|
entry = root.openNextFile();
|
|
}
|
|
|
|
strcpy(bank_names[instance_id][bank_counter], entry.name());
|
|
#ifdef DEBUG
|
|
Serial.print(F("Found bank ["));
|
|
Serial.print(bank_names[instance_id][bank_counter]);
|
|
Serial.println(F("]"));
|
|
#endif
|
|
bank_counter++;
|
|
}
|
|
} while (root);
|
|
|
|
return (bank_counter);
|
|
}
|
|
else
|
|
return (0);
|
|
}
|
|
|