jaildoctors_dilemma/source/core/resources/asset.cpp

#include "core/resources/asset.hpp"

#include <SDL3/SDL.h>  // Para SDL_LogWarn, SDL_LogCategory, SDL_LogError

#include <algorithm>   // Para sort
#include <cstddef>     // Para size_t
#include <exception>   // Para exception
#include <filesystem>  // Para exists, path
#include <fstream>     // Para ifstream, istringstream
#include <iostream>    // Para cout
#include <sstream>     // Para istringstream
#include <stdexcept>   // Para runtime_error

#include "utils/utils.hpp"  // Para getFileName, printWithDots

// Singleton
Asset* Asset::instance = nullptr;

void Asset::init(const std::string& executable_path) {
    Asset::instance = new Asset(executable_path);
}

void Asset::destroy() {
    delete Asset::instance;
}

auto Asset::get() -> Asset* {
    return Asset::instance;
}

// Añade un elemento al mapa (función auxiliar)
void Asset::addToMap(const std::string& file_path, Type type, bool required, bool absolute) {
    std::string full_path = absolute ? file_path : executable_path_ + file_path;
    std::string filename = getFileName(full_path);

    // Verificar si ya existe el archivo
    if (file_list_.find(filename) != file_list_.end()) {
        SDL_LogWarn(SDL_LOG_CATEGORY_APPLICATION,
            "Warning: Asset '%s' already exists, overwriting",
            filename.c_str());
    }

    file_list_.emplace(filename, Item{std::move(full_path), type, required});
}

// Añade un elemento a la lista
void Asset::add(const std::string& file_path, Type type, bool required, bool absolute) {
    addToMap(file_path, type, required, absolute);
}

// Carga recursos desde un archivo de configuración con soporte para variables
void Asset::loadFromFile(const std::string& config_file_path, const std::string& prefix, const std::string& system_folder) {
    std::ifstream file(config_file_path);
    if (!file.is_open()) {
        SDL_LogError(SDL_LOG_CATEGORY_APPLICATION,
            "Error: Cannot open config file: %s",
            config_file_path.c_str());
        return;
    }

    std::string line;
    int line_number = 0;

    while (std::getline(file, line)) {
        ++line_number;

        // Limpiar espacios en blanco al principio y final
        line.erase(0, line.find_first_not_of(" \t\r"));
        line.erase(line.find_last_not_of(" \t\r") + 1);

        // Ignorar líneas vacías y comentarios
        if (line.empty() || line[0] == '#' || line[0] == ';') {
            continue;
        }

        // Dividir la línea por el separador '|'
        std::vector<std::string> parts;
        std::istringstream iss(line);
        std::string part;

        while (std::getline(iss, part, '|')) {
            parts.push_back(part);
        }

        // Verificar que tenemos al menos tipo y ruta
        if (parts.size() < 2) {
            SDL_LogWarn(SDL_LOG_CATEGORY_APPLICATION,
                "Warning: Malformed line %d in config file (insufficient fields)",
                line_number);
            continue;
        }

        try {
            const std::string& type_str = parts[0];
            std::string path = parts[1];

            // Valores por defecto
            bool required = true;
            bool absolute = false;

            // Si hay opciones en el tercer campo, parsearlas
            if (parts.size() >= 3) {
                parseOptions(parts[2], required, absolute);
            }

            // Reemplazar variables en la ruta
            path = replaceVariables(path, prefix, system_folder);

            // Parsear el tipo de asset
            Type type = parseAssetType(type_str);

            // Añadir al mapa
            addToMap(path, type, required, absolute);

        } catch (const std::exception& e) {
            SDL_LogError(SDL_LOG_CATEGORY_APPLICATION,
                "Error parsing line %d in config file: %s",
                line_number,
                e.what());
        }
    }

    std::cout << "Loaded " << file_list_.size() << " assets from config file" << '\n';
    file.close();
}

// Devuelve la ruta completa a un fichero (búsqueda O(1))
auto Asset::get(const std::string& filename) const -> std::string {
    auto it = file_list_.find(filename);
    if (it != file_list_.end()) {
        return it->second.file;
    }

    SDL_LogWarn(SDL_LOG_CATEGORY_APPLICATION, "Warning: file %s not found", filename.c_str());
    return "";
}

// Carga datos del archivo
auto Asset::loadData(const std::string& filename) const -> std::vector<uint8_t> {
    auto it = file_list_.find(filename);
    if (it != file_list_.end()) {
        std::ifstream file(it->second.file, std::ios::binary);
        if (!file.is_open()) {
            SDL_LogWarn(SDL_LOG_CATEGORY_APPLICATION,
                "Warning: Could not open file %s for data loading",
                filename.c_str());
            return {};
        }

        // Obtener tamaño del archivo
        file.seekg(0, std::ios::end);
        size_t size = file.tellg();
        file.seekg(0, std::ios::beg);

        // Leer datos
        std::vector<uint8_t> data(size);
        file.read(reinterpret_cast<char*>(data.data()), size);
        file.close();

        return data;
    }

    SDL_LogWarn(SDL_LOG_CATEGORY_APPLICATION, "Warning: file %s not found for data loading", filename.c_str());
    return {};
}

// Verifica si un recurso existe
auto Asset::exists(const std::string& filename) const -> bool {
    return file_list_.find(filename) != file_list_.end();
}

// Comprueba que existen todos los elementos
auto Asset::check() const -> bool {
    bool success = true;

    std::cout << "\n** CHECKING FILES" << '\n';

    // Agrupar por tipo para mostrar organizado
    std::unordered_map<Type, std::vector<const Item*>> by_type;

    for (const auto& [filename, item] : file_list_) {
        if (item.required) {
            by_type[item.type].push_back(&item);
        }
    }

    // Verificar por tipo
    for (int type = 0; type < static_cast<int>(Type::SIZE); ++type) {
        Type asset_type = static_cast<Type>(type);

        if (by_type.find(asset_type) != by_type.end()) {
            std::cout << "\n>> " << getTypeName(asset_type) << " FILES" << '\n';

            bool type_success = true;
            for (const auto* item : by_type[asset_type]) {
                if (!checkFile(item->file)) {
                    success = false;
                    type_success = false;
                }
            }

            if (type_success) {
                std::cout << "   All files are OK." << '\n';
            }
        }
    }

    // Resultado
    std::cout << (success ? "\n** CHECKING FILES COMPLETED.\n" : "\n** CHECKING FILES FAILED.\n") << '\n';

    return success;
}

// Comprueba que existe un fichero
auto Asset::checkFile(const std::string& path) const -> bool {
    std::ifstream file(path);
    bool success = file.good();
    file.close();

    if (!success) {
        printWithDots("Checking file : ", getFileName(path), "[ ERROR ]");
    }

    return success;
}

// Parsea string a Type
auto Asset::parseAssetType(const std::string& type_str) -> Type {
    if (type_str == "DATA") {
        return Type::DATA;
    }
    if (type_str == "BITMAP") {
        return Type::BITMAP;
    }
    if (type_str == "ANIMATION") {
        return Type::ANIMATION;
    }
    if (type_str == "MUSIC") {
        return Type::MUSIC;
    }
    if (type_str == "SOUND") {
        return Type::SOUND;
    }
    if (type_str == "FONT") {
        return Type::FONT;
    }
    if (type_str == "ROOM") {
        return Type::ROOM;
    }
    if (type_str == "TILEMAP") {
        return Type::TILEMAP;
    }
    if (type_str == "PALETTE") {
        return Type::PALETTE;
    }

    throw std::runtime_error("Unknown asset type: " + type_str);
}

// Devuelve el nombre del tipo de recurso
auto Asset::getTypeName(Type type) -> std::string {
    switch (type) {
        case Type::DATA:
            return "DATA";
        case Type::BITMAP:
            return "BITMAP";
        case Type::ANIMATION:
            return "ANIMATION";
        case Type::MUSIC:
            return "MUSIC";
        case Type::SOUND:
            return "SOUND";
        case Type::FONT:
            return "FONT";
        case Type::ROOM:
            return "ROOM";
        case Type::TILEMAP:
            return "TILEMAP";
        case Type::PALETTE:
            return "PALETTE";
        default:
            return "ERROR";
    }
}

// Devuelve la lista de recursos de un tipo
auto Asset::getListByType(Type type) const -> std::vector<std::string> {
    std::vector<std::string> list;

    for (const auto& [filename, item] : file_list_) {
        if (item.type == type) {
            list.push_back(item.file);
        }
    }

    // Ordenar alfabéticamente para garantizar orden consistente
    std::ranges::sort(list);

    return list;
}

// Reemplaza variables en las rutas
auto Asset::replaceVariables(const std::string& path, const std::string& prefix, const std::string& system_folder) -> std::string {
    std::string result = path;

    // Reemplazar ${PREFIX}
    size_t pos = 0;
    while ((pos = result.find("${PREFIX}", pos)) != std::string::npos) {
        result.replace(pos, 9, prefix);  // 9 = longitud de "${PREFIX}"
        pos += prefix.length();
    }

    // Reemplazar ${SYSTEM_FOLDER}
    pos = 0;
    while ((pos = result.find("${SYSTEM_FOLDER}", pos)) != std::string::npos) {
        result.replace(pos, 16, system_folder);  // 16 = longitud de "${SYSTEM_FOLDER}"
        pos += system_folder.length();
    }

    return result;
}

// Parsea las opciones de una línea de configuración
auto Asset::parseOptions(const std::string& options, bool& required, bool& absolute) -> void {
    if (options.empty()) {
        return;
    }

    std::istringstream iss(options);
    std::string option;

    while (std::getline(iss, option, ',')) {
        // Eliminar espacios
        option.erase(0, option.find_first_not_of(" \t"));
        option.erase(option.find_last_not_of(" \t") + 1);

        if (option == "optional") {
            required = false;
        } else if (option == "absolute") {
            absolute = true;
        }
    }
}