#include "FontInstaller.h"

#include <HalStorage.h>
#include <Logging.h>

#include <cctype>
#include <cstring>

#include "CrossPointSettings.h"

FontInstaller::FontInstaller(SdCardFontRegistry& registry) : registry_(registry) {}

bool FontInstaller::isValidFamilyName(const char* name) {
  if (name == nullptr || name[0] == '\0') return false;

  const size_t nameLen = strlen(name);
  if (nameLen == 0 || nameLen > MAX_FAMILY_NAME_LEN) return false;

  if (strstr(name, "..") != nullptr) return false;
  if (strchr(name, '/') != nullptr) return false;
  if (strchr(name, '\\') != nullptr) return false;

  for (const char* p = name; *p != '\0'; ++p) {
    char c = *p;
    if (!std::isalnum(static_cast<unsigned char>(c)) && c != '-' && c != '_') {
      return false;
    }
  }
  return true;
}

bool FontInstaller::ensureFamilyDir(const char* familyName) {
  if (!isValidFamilyName(familyName)) {
    LOG_ERR("FONT", "Invalid family name: %s", familyName ? familyName : "<null>");
    return false;
  }

  const size_t baseLen = strlen(SdCardFontRegistry::FONTS_DIR);
  const size_t familyLen = strlen(familyName);
  const size_t neededLen = baseLen + 1 + familyLen + 1;  // "/" + NUL
  if (neededLen > 128) {
    LOG_ERR("FONT", "Family dir path too long: %s", familyName);
    return false;
  }

  if (!Storage.exists(SdCardFontRegistry::FONTS_DIR)) {
    if (!Storage.mkdir(SdCardFontRegistry::FONTS_DIR)) {
      LOG_ERR("FONT", "Failed to create fonts dir: %s", SdCardFontRegistry::FONTS_DIR);
      return false;
    }
  }

  char dirPath[128];
  snprintf(dirPath, sizeof(dirPath), "%s/%s", SdCardFontRegistry::FONTS_DIR, familyName);

  if (!Storage.exists(dirPath)) {
    if (!Storage.mkdir(dirPath)) {
      LOG_ERR("FONT", "Failed to create family dir: %s", dirPath);
      return false;
    }
  }
  return true;
}

bool FontInstaller::validateCpfontFile(const char* path) {
  FsFile file;
  if (!Storage.openFileForRead("FONT", path, file)) {
    LOG_ERR("FONT", "Cannot open for validation: %s", path);
    return false;
  }

  uint8_t magic[CPFONT_MAGIC_LEN];
  size_t bytesRead = file.read(magic, CPFONT_MAGIC_LEN);
  file.close();

  if (bytesRead < CPFONT_MAGIC_LEN) {
    LOG_ERR("FONT", "File too small: %s (%zu bytes)", path, bytesRead);
    return false;
  }

  if (memcmp(magic, "CPFONT\0\0", CPFONT_MAGIC_LEN) != 0) {
    LOG_ERR("FONT", "Bad magic in: %s", path);
    return false;
  }

  return true;
}

void FontInstaller::buildFontPath(const char* family, const char* filename, char* outBuf, size_t outBufSize) {
  snprintf(outBuf, outBufSize, "%s/%s/%s", SdCardFontRegistry::FONTS_DIR, family, filename);
}

FontInstaller::Error FontInstaller::deleteFamily(const char* familyName) {
  if (!isValidFamilyName(familyName)) {
    return Error::INVALID_FAMILY_NAME;
  }

  const size_t baseLen = strlen(SdCardFontRegistry::FONTS_DIR);
  const size_t familyLen = strlen(familyName);
  if (baseLen + 1 + familyLen + 1 > 128) {
    LOG_ERR("FONT", "Family dir path too long: %s", familyName);
    return Error::INVALID_FAMILY_NAME;
  }

  char dirPath[128];
  snprintf(dirPath, sizeof(dirPath), "%s/%s", SdCardFontRegistry::FONTS_DIR, familyName);

  if (!Storage.exists(dirPath)) {
    LOG_DBG("FONT", "Family dir does not exist: %s", dirPath);
    return Error::OK;
  }

  if (!Storage.removeDir(dirPath)) {
    LOG_ERR("FONT", "Failed to remove family dir: %s", dirPath);
    return Error::SD_WRITE_ERROR;
  }

  if (strcmp(SETTINGS.sdFontFamilyName, familyName) == 0) {
    SETTINGS.sdFontFamilyName[0] = '\0';
    SETTINGS.saveToFile();
    LOG_DBG("FONT", "Cleared active SD font (deleted family: %s)", familyName);
  }

  return Error::OK;
}

void FontInstaller::refreshRegistry() { registry_.discover(); }

bool FontInstaller::isFamilyInstalled(const char* familyName) const {
  return registry_.findFamily(familyName) != nullptr;
}