storage_manager.h

/*
 * Copyright © 2014-2023 Synthstrom Audible Limited
 *
 * This file is part of The Synthstrom Audible Deluge Firmware.
 *
 * The Synthstrom Audible Deluge Firmware 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, see <https://www.gnu.org/licenses/>.
 */
 
#pragma once
 
#include "definitions_cxx.hpp"
#include "extern.h"
#include "fatfs/fatfs.hpp"
#include "model/sync.h"
#include "util/firmware_version.h"
 
#include <cstdint>
#include <optional>
 
extern "C" {
#include "fatfs/ff.h"
}
 
extern void deleteOldSongBeforeLoadingNew();
 
extern FatFS::Filesystem fileSystem;
 
class Instrument;
class PlaybackMode;
class ParamManagerForTimeline;
class ArpeggiatorSettings;
class Song;
class InstrumentClip;
class Drum;
class String;
class MIDIParamCollection;
class ParamManager;
class SoundDrum;
class FileItem;
class MIDIInstrument;
 
class SMSharedData {};
 
class FileReader {
public:
    FileReader();
    FileReader(char* memBuffer, uint32_t bufLen);
    virtual ~FileReader();
 
    FIL readFIL;
    char* fileClusterBuffer;
    UINT currentReadBufferEndPos;
    int32_t fileReadBufferCurrentPos;
 
    FRESULT closeWriter();
 
    bool peekChar(char* thisChar);
    bool readChar(char* thisChar);
    uint32_t bytesRemainingInBuffer() { return currentReadBufferEndPos - fileReadBufferCurrentPos; }
    char* GetCurrentAddressInBuffer() { return fileClusterBuffer + fileReadBufferCurrentPos; }
 
protected:
    bool callRoutines = true;
    bool readFileCluster();
    bool readFileClusterIfNecessary();
 
    void readDone();
 
    bool memoryBased = false;
    int32_t readCount; // Used for multitask interleaving.
    bool reachedBufferEnd;
    void resetReader();
};
 
class FileWriter {
public:
    FIL writeFIL;
    FileWriter();
    FileWriter(bool inMem);
 
    virtual ~FileWriter();
 
    Error closeAfterWriting(char const* path, char const* beginningString, char const* endString);
 
    void writeByte(int8_t b);
    void writeBlock(uint8_t* block, uint32_t size);
    void writeChars(char const* output);
    FRESULT closeWriter();
 
    char* getBufferPtr() { return writeClusterBuffer; }
    int32_t bytesWritten();
    void setMemoryBased() {
        memoryBased = true;
        callRoutines = false;
    }
 
protected:
    void resetWriter();
    Error writeBufferToFile();
    bool memoryBased = false;
    bool callRoutines = true;
    uint8_t indentAmount;
    char* writeClusterBuffer;
    uint32_t bufferSize;
    int32_t fileWriteBufferCurrentPos;
    int32_t fileTotalBytesWritten;
    bool fileAccessFailedDuringWrite;
};
 
class Serializer {
public:
    virtual void writeAttribute(char const* name, int32_t number, bool onNewLine = true) = 0;
    virtual void writeAttribute(char const* name, char const* value, bool onNewLine = true) = 0;
    virtual void writeAttributeHex(char const* name, int32_t number, int32_t numChars, bool onNewLine = true) = 0;
    virtual void writeAttributeHexBytes(char const* name, uint8_t* data, int32_t numBytes, bool onNewLine = true) = 0;
    virtual void writeTagNameAndSeperator(char const* tag) = 0;
    virtual void writeTag(char const* tag, int32_t number, bool box = false) = 0;
    virtual void writeTag(char const* tag, char const* contents, bool box = false, bool quote = true) = 0;
    virtual void writeOpeningTag(char const* tag, bool startNewLineAfter = true, bool box = false) = 0;
    virtual void writeOpeningTagBeginning(char const* tag, bool box = false, bool newLineBefore = true) = 0;
    virtual void writeOpeningTagEnd(bool startNewLineAfter = true) = 0;
    virtual void closeTag(bool box = false) = 0;
    virtual void writeClosingTag(char const* tag, bool shouldPrintIndents = true, bool box = false) = 0;
    virtual void writeArrayStart(char const* tag, bool startNewLineAfter = true, bool box = false) = 0;
    virtual void writeArrayEnding(char const* tag, bool shouldPrintIndents = true, bool box = false) = 0;
    virtual void printIndents() = 0;
    virtual void insertCommaIfNeeded() = 0;
    virtual void write(char const* output) = 0;
    virtual Error closeFileAfterWriting(char const* path = nullptr, char const* beginningString = nullptr,
                                        char const* endString = nullptr) = 0;
 
    virtual void reset() = 0;
    void writeFirmwareVersion();
 
    void writeEarliestCompatibleFirmwareVersion(char const* versionString) {
        writeAttribute("earliestCompatibleFirmware", versionString);
    }
 
    void writeSyncTypeToFile(Song* song, char const* name, SyncType value, bool onNewLine) {
        writeAttribute(name, (int32_t)value, onNewLine);
    }
 
    void writeAbsoluteSyncLevelToFile(Song* song, char const* name, SyncLevel internalValue, bool onNewLine);
};
 
class XMLSerializer : public Serializer, public FileWriter {
public:
    XMLSerializer();
    ~XMLSerializer() override = default;
 
    void writeAttribute(char const* name, int32_t number, bool onNewLine = true) override;
    void writeAttribute(char const* name, char const* value, bool onNewLine = true) override;
    void writeAttributeHex(char const* name, int32_t number, int32_t numChars, bool onNewLine = true) override;
    void writeAttributeHexBytes(char const* name, uint8_t* data, int32_t numBytes, bool onNewLine = true) override;
    void writeTagNameAndSeperator(char const* tag) override;
    void writeTag(char const* tag, int32_t number, bool box = false) override;
    void writeTag(char const* tag, char const* contents, bool box = false, bool quote = true) override;
    void writeOpeningTag(char const* tag, bool startNewLineAfter = true, bool box = false) override;
    void writeOpeningTagBeginning(char const* tag, bool box = false, bool newLineBefore = true) override;
    void writeOpeningTagEnd(bool startNewLineAfter = true) override;
    void closeTag(bool box = false) override;
    void writeClosingTag(char const* tag, bool shouldPrintIndents = true, bool box = false) override;
    void writeArrayStart(char const* tag, bool shouldPrintIndents = true, bool box = true) override;
    void writeArrayEnding(char const* tag, bool shouldPrintIndents = true, bool box = true) override;
    void insertCommaIfNeeded() override {}
    void printIndents() override;
    void write(char const* output) override;
    Error closeFileAfterWriting(char const* path = nullptr, char const* beginningString = nullptr,
                                char const* endString = nullptr) override;
    void reset() override;
 
private:
    uint8_t indentAmount;
};
 
class Deserializer {
public:
    virtual bool prepareToReadTagOrAttributeValueOneCharAtATime() = 0;
    virtual char readNextCharOfTagOrAttributeValue() = 0;
    virtual int32_t getNumCharsRemainingInValueBeforeEndOfCluster() = 0;
 
    virtual char const* readNextTagOrAttributeName() = 0;
    virtual char const* readTagOrAttributeValue() = 0;
    virtual int32_t readTagOrAttributeValueInt() = 0;
    virtual int32_t readTagOrAttributeValueHex(int32_t errorValue) = 0;
    virtual int readTagOrAttributeValueHexBytes(uint8_t* bytes, int32_t maxLen) = 0;
    virtual Error tryReadingFirmwareTagFromFile(char const* tagName, bool ignoreIncorrectFirmware = false) = 0;
 
    virtual char const* readNextCharsOfTagOrAttributeValue(int32_t numChars) = 0;
    virtual Error readTagOrAttributeValueString(String* string) = 0;
    virtual bool match(char const ch) = 0;
    virtual void exitTag(char const* exitTagName = NULL, bool closeObject = false) = 0;
 
    virtual void reset() = 0;
 
    Error readTagOrAttributeValueString(std::string& string) {
        String tmp;
        Error error = readTagOrAttributeValueString(&tmp);
        if (error == Error::NONE) {
            string = tmp.get();
        }
        return error;
    }
};
 
class FileDeserializer : public Deserializer, public FileReader {
public:
    FileDeserializer() : FileReader() {}
    FileDeserializer(uint8_t* inbuf, size_t buflen) : FileReader((char*)inbuf, buflen) {}
};
 
class XMLDeserializer : public FileDeserializer {
public:
    XMLDeserializer();
    ~XMLDeserializer() override = default;
 
    bool prepareToReadTagOrAttributeValueOneCharAtATime() override;
    char const* readNextTagOrAttributeName() override;
    char readNextCharOfTagOrAttributeValue() override;
    int32_t getNumCharsRemainingInValueBeforeEndOfCluster() override;
 
    int32_t readTagOrAttributeValueInt() override;
    int32_t readTagOrAttributeValueHex(int32_t errorValue) override;
    int readTagOrAttributeValueHexBytes(uint8_t* bytes, int32_t maxLen) override;
 
    int readHexBytesUntil(uint8_t* bytes, int32_t maxLen, char endPos);
    char const* readNextCharsOfTagOrAttributeValue(int32_t numChars) override;
    Error readTagOrAttributeValueString(String* string) override;
    char const* readTagOrAttributeValue() override;
    bool match(char const ch) override;
 
    void exitTag(char const* exitTagName = NULL, bool closeObject = false) override;
    Error openXMLFile(FilePointer* filePointer, char const* firstTagName, char const* altTagName = "",
                      bool ignoreIncorrectFirmware = false);
    void reset() override;
 
    Error tryReadingFirmwareTagFromFile(char const* tagName, bool ignoreIncorrectFirmware) override;
 
private:
    char charAtEndOfValue;
    uint8_t xmlArea; // state variable for tokenizer
 
    int32_t tagDepthCaller; // How deeply indented in XML the main Deluge classes think we are, as data being read.
    int32_t tagDepthFile; // Will temporarily be different to the above as unwanted / unused XML tags parsed on the way
                          // to finding next useful data.
 
    char stringBuffer[kFilenameBufferSize];
 
    void skipUntilChar(char endChar);
 
    char const* readTagName();
    char const* readNextAttributeName();
    char const* readUntilChar(char endChar);
    char const* readAttributeValue();
 
    int32_t readIntUntilChar(char endChar);
    bool getIntoAttributeValue();
    int32_t readAttributeValueInt();
 
    Error readStringUntilChar(String* string, char endChar);
    Error readAttributeValueString(String* string);
};
 
class JsonSerializer : public Serializer, public FileWriter {
public:
    JsonSerializer();
    ~JsonSerializer() override = default;
 
    void writeAttribute(char const* name, int32_t number, bool onNewLine = true) override;
    void writeAttribute(char const* name, char const* value, bool onNewLine = true) override;
    void writeAttributeHex(char const* name, int32_t number, int32_t numChars, bool onNewLine = true) override;
    void writeAttributeHexBytes(char const* name, uint8_t* data, int32_t numBytes, bool onNewLine = true) override;
    void writeTagNameAndSeperator(char const* tag) override;
    void writeTag(char const* tag, int32_t number, bool box = false) override;
    void writeTag(char const* tag, char const* contents, bool box = false, bool quote = true) override;
    void writeOpeningTag(char const* tag, bool startNewLineAfter = true, bool box = false) override;
    void writeOpeningTagBeginning(char const* tag, bool box = false, bool newLineBefore = true) override;
    void writeOpeningTagEnd(bool startNewLineAfter = true) override;
    void closeTag(bool box = false) override;
    void writeClosingTag(char const* tag, bool shouldPrintIndents = true, bool box = false) override;
    void writeArrayStart(char const* tag, bool shouldPrintIndents = true, bool box = false) override;
    void writeArrayEnding(char const* tag, bool shouldPrintIndents = true, bool box = false) override;
    void printIndents() override;
    void insertCommaIfNeeded() override;
    void write(char const* output) override;
    Error closeFileAfterWriting(char const* path = nullptr, char const* beginningString = nullptr,
                                char const* endString = nullptr) override;
    void reset() override;
    // Begin Json-only API
 
private:
    uint8_t indentAmount;
    bool firstItemHasBeenWritten = false;
};
 
class JsonDeserializer : public FileDeserializer {
public:
    JsonDeserializer();
    JsonDeserializer(uint8_t* inbuf, size_t buflen);
    ~JsonDeserializer() override = default;
 
    bool prepareToReadTagOrAttributeValueOneCharAtATime() override;
    char const* readNextTagOrAttributeName() override;
    char readNextCharOfTagOrAttributeValue() override;
    int32_t getNumCharsRemainingInValueBeforeEndOfCluster() override;
 
    int32_t readTagOrAttributeValueInt() override;
    int32_t readTagOrAttributeValueHex(int32_t errorValue) override;
    int readTagOrAttributeValueHexBytes(uint8_t* bytes, int32_t maxLen) override;
 
    int readHexBytesUntil(uint8_t* bytes, int32_t maxLen, char endPos);
    char const* readNextCharsOfTagOrAttributeValue(int32_t numChars) override;
    Error readTagOrAttributeValueString(String* string) override;
    char const* readTagOrAttributeValue() override;
    bool match(char const ch) override;
    void exitTag(char const* exitTagName = NULL, bool closeObject = false) override;
 
    Error openJsonFile(FilePointer* filePointer, char const* firstTagName, char const* altTagName = "",
                       bool ignoreIncorrectFirmware = false);
    void reset() override;
    Error tryReadingFirmwareTagFromFile(char const* tagName, bool ignoreIncorrectFirmware) override;
    void setReplySeqNum(uint8_t msgNum) { replySeqNum = msgNum; }
    uint8_t getReplySeqNum() { return replySeqNum; }
 
private:
    uint8_t replySeqNum = 0;
    int32_t objectDepth;
    int32_t arrayDepth;
 
    enum JsonState { NewFile, KeyRead, ValueRead, ReadError };
    JsonState readState = NewFile;
 
    char stringBuffer[kFilenameBufferSize];
 
    void skipUntilChar(char endChar);
    char unescape(char inchar);
    bool skipWhiteSpace(bool commasToo = true);
    char const* readQuotedString();
    char const* readKeyName();
    char const* readNextAttributeName();
    char const* readUntilChar(char endChar);
    char const* readAttributeValue();
 
    int32_t readInt();
    bool getIntoAttributeValue();
    int32_t readAttributeValueInt();
    Error readAttributeValueString(String* string);
 
    Error readStringUntilChar(String* string, char endChar);
};
 
extern XMLSerializer smSerializer;
extern XMLDeserializer smDeserializer;
extern JsonSerializer smJsonSerializer;
extern JsonDeserializer smJsonDeserializer;
extern Serializer& GetSerializer();
extern FileDeserializer* activeDeserializer;
 
namespace StorageManager {
 
std::expected<FatFS::File, Error> createFile(char const* filePath, bool mayOverwrite);
Error createXMLFile(char const* pathName, XMLSerializer& writer, bool mayOverwrite = false, bool displayErrors = true);
Error createJsonFile(char const* pathName, JsonSerializer& writer, bool mayOverwrite = false,
                     bool displayErrors = true);
Error openXMLFile(FilePointer* filePointer, XMLDeserializer& reader, char const* firstTagName,
                  char const* altTagName = "", bool ignoreIncorrectFirmware = false);
Error openJsonFile(FilePointer* filePointer, JsonDeserializer& reader, char const* firstTagName,
                   char const* altTagName = "", bool ignoreIncorrectFirmware = false);
Error openDelugeFile(FileItem* currentFileItem, char const* firstTagName, char const* altTagName = "",
                     bool ignoreIncorrectFirmware = false);
Error initSD();
 
bool fileExists(char const* pathName);
bool fileExists(char const* pathName, FilePointer* fp);
bool buildPathToFile(const char* fileName);
 
bool checkSDPresent();
bool checkSDInitialized();
 
Instrument* createNewInstrument(OutputType newOutputType, ParamManager* getParamManager = nullptr);
Error loadInstrumentFromFile(Song* song, InstrumentClip* clip, OutputType outputType, bool mayReadSamplesFromFiles,
                             Instrument** getInstrument, FilePointer* filePointer, String* name, String* dirPath);
Instrument* createNewNonAudioInstrument(OutputType outputType, int32_t slot, int32_t subSlot);
 
Error openMidiDeviceDefinitionFile(FilePointer* filePointer);
Error loadMidiDeviceDefinitionFile(MIDIInstrument* midiInstrument, FilePointer* filePointer, String* fileName,
                                   bool updateFileName = true);
 
Error openPatternFile(FilePointer* filePointer);
Error loadPatternFile(FilePointer* filePointer, String* fileName, bool overwriteExisting, bool noScaling,
                      bool previewOnly, bool selectedDrumOnly);
 
Error openFavouriteFile(FilePointer* filePointer);
Error loadFavouriteFile(FilePointer* filePointer, String* fileName);
 
Drum* createNewDrum(DrumType drumType);
Error loadSynthToDrum(Song* song, InstrumentClip* clip, bool mayReadSamplesFromFiles, SoundDrum** getInstrument,
                      FilePointer* filePointer, String* name, String* dirPath);
void openFilePointer(FilePointer* fp, FileReader& reader);
 
Error checkSpaceOnCard();
 
Error openInstrumentFile(OutputType outputType, FilePointer* filePointer);
} // namespace StorageManager
 
extern FirmwareVersion song_firmware_version;
extern FILINFO staticFNO;
extern FatFS::Directory staticDIR;
extern const bool writeJsonFlag;
 
inline bool isCardReady() {
    return !sdRoutineLock && Error::NONE == StorageManager::initSD();
}