/*
 * Copyright (C) 2015 The Android Open Source Project
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *      http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

#define LOG_TAG "Minikin"

#include <libxml/tree.h>
#include <unistd.h>

#include <log/log.h>

#include <minikin/FontCollection.h>
#include <minikin/FontFamily.h>
#include "MinikinFontForTest.h"
#include "minikin/FontLanguage.h"

namespace minikin {

std::vector<std::shared_ptr<FontFamily>> getFontFamilies(const char* fontDir,
                                                         const char* fontXml) {
  xmlDoc* doc = xmlReadFile(fontXml, NULL, 0);
  xmlNode* familySet = xmlDocGetRootElement(doc);

  std::vector<std::shared_ptr<FontFamily>> families;
  for (xmlNode* familyNode = familySet->children; familyNode;
       familyNode = familyNode->next) {
    if (xmlStrcmp(familyNode->name, (const xmlChar*)"family") != 0) {
      continue;
    }

    xmlChar* variantXmlch = xmlGetProp(familyNode, (const xmlChar*)"variant");
    int variant = VARIANT_DEFAULT;
    if (variantXmlch) {
      if (xmlStrcmp(variantXmlch, (const xmlChar*)"elegant") == 0) {
        variant = VARIANT_ELEGANT;
      } else if (xmlStrcmp(variantXmlch, (const xmlChar*)"compact") == 0) {
        variant = VARIANT_COMPACT;
      }
    }

    std::vector<Font> fonts;
    for (xmlNode* fontNode = familyNode->children; fontNode;
         fontNode = fontNode->next) {
      if (xmlStrcmp(fontNode->name, (const xmlChar*)"font") != 0) {
        continue;
      }

      int weight =
          atoi((const char*)(xmlGetProp(fontNode, (const xmlChar*)"weight"))) /
          100;
      bool italic = xmlStrcmp(xmlGetProp(fontNode, (const xmlChar*)"style"),
                              (const xmlChar*)"italic") == 0;
      xmlChar* index = xmlGetProp(familyNode, (const xmlChar*)"index");

      xmlChar* fontFileName =
          xmlNodeListGetString(doc, fontNode->xmlChildrenNode, 1);
      std::string fontPath = fontDir + std::string((const char*)fontFileName);
      xmlFree(fontFileName);

      if (access(fontPath.c_str(), R_OK) != 0) {
        ALOGW("%s is not found.", fontPath.c_str());
        continue;
      }

      if (index == nullptr) {
        std::shared_ptr<MinikinFont> minikinFont =
            std::make_shared<MinikinFontForTest>(fontPath);
        fonts.push_back(Font(minikinFont, FontStyle(weight, italic)));
      } else {
        std::shared_ptr<MinikinFont> minikinFont =
            std::make_shared<MinikinFontForTest>(fontPath,
                                                 atoi((const char*)index));
        fonts.push_back(Font(minikinFont, FontStyle(weight, italic)));
      }
    }

    xmlChar* lang = xmlGetProp(familyNode, (const xmlChar*)"lang");
    std::shared_ptr<FontFamily> family;
    if (lang == nullptr) {
      family = std::make_shared<FontFamily>(variant, std::move(fonts));
    } else {
      uint32_t langId = FontStyle::registerLanguageList(
          std::string((const char*)lang, xmlStrlen(lang)));
      family = std::make_shared<FontFamily>(langId, variant, std::move(fonts));
    }
    families.push_back(family);
  }
  xmlFreeDoc(doc);
  return families;
}
std::shared_ptr<FontCollection> getFontCollection(const char* fontDir,
                                                  const char* fontXml) {
  return std::make_shared<FontCollection>(getFontFamilies(fontDir, fontXml));
}

}  // namespace minikin