property.cpp

/*
  nettyping のプロパティ情報管理
  Satofumi KAMIMURA
  $Id$
*/

#include "property.h"
#include "fileUtils.h"
#include <libxml/tree.h>


Property::Property(void)
  : loaded_file(""), selected_index(0), pre_tag(BAD_CAST ""), user(NULL) {

  sys.fullscreen = false;
  sys.user_index = 0;
  LIBXML_TEST_VERSION;
}


Property::~Property(void) {
  if (!loaded_file.empty()) {
    save();
  }
}


bool Property::readXMLLine(xml_t& xml, xmlTextReaderPtr reader) {
  xml.depth = -1;
  if (xmlTextReaderRead(reader) != 1) {
    return false;
  }

  xml.type = xmlTextReaderNodeType(reader);
  if (xml.type == XML_READER_TYPE_END_ELEMENT) {
    pre_tag = BAD_CAST "";
  }
  xml.depth = xmlTextReaderDepth(reader);

  const xmlChar* tag_name = xmlTextReaderConstName(reader);
  if (tag_name && (xml.type == XML_READER_TYPE_ELEMENT)) {
    xml.tag = tag_name;
    pre_tag = tag_name;
  } else {
    xml.tag = pre_tag;
  }
  const xmlChar* value_name = xmlTextReaderConstValue(reader);
  xml.value = (value_name) ? value_name : BAD_CAST "";

  return true;
}


void Property::readSysInfo(xmlTextReaderPtr reader) {
  bool ret;
  xml_t xml;
  do {
    ret = readXMLLine(xml, reader);
    //printf("%d, %d, %s, %s\n", xml.type, xml.depth, xml.tag, xml.value);
    if (xml.depth < 2) {
      continue;
    }

    if (!xmlStrcmp(BAD_CAST "fullscreen", xml.tag)) {
      // 画面モードの読み出し
      sys.fullscreen = !xmlStrcmp(BAD_CAST "true", xml.value) ? true : false;

    } else if (!xmlStrcmp(BAD_CAST "user_index", xml.tag)) {
      // デフォルト選択のユーザ番号読み出し
      selected_index = atoi((char*)(BAD_CAST xml.value));
    }
  } while (ret &&
           !((xml.depth < 2) && (xml.type == XML_READER_TYPE_END_ELEMENT)));
}


void Property::setUserIndex(unsigned int index) {
  sys.user_index = index;
  if (sys.user_index >= users.size()) {
    sys.user_index = 0;
  }
  user = &users[sys.user_index];
}


int Property::addUser(const char* name) {
  if (users.size() >= UserMax) {
    return UsersNumOver;
  }

  if (strlen(name) <= 0) {
    return InvalidName;
  }

  for (std::vector<userInfo_t>::iterator it = users.begin();
       it != users.end(); ++it) {
    if (!it->name.compare(name)) {
      return AlreadyExist;
    }
  }

  // ユーザの追加
  userInfo_t add;
  add.name = name;

  bool empty = users.empty();
  users.push_back(add);
  if (empty) {
    setUserIndex(0);
  }
  return 0;
}


void Property::delUser(unsigned int index) {
  if (index >= users.size()) {
    return;
  }
  if (sys.user_index > index) {
    --sys.user_index;
  } else if (sys.user_index == index) {
    sys.user_index = 0;
  }
  users.erase(users.begin() + index);
  setUserIndex(sys.user_index);
}


void Property::readAllUserInfo(xmlTextReaderPtr reader) {
  bool ret;
  xml_t xml;
  do {
    userInfo_t add;
    bool added = false;
    do {
      ret = readXMLLine(xml, reader);
      //printf("%d, %d, %s, %s\n", xml.type, xml.depth, xml.tag, xml.value);

      if (!xmlStrcmp(BAD_CAST "name", xml.tag)) {
        // ユーザ名の読み出し
        add.name = (char*)(xml.value);
        added = true;

      } else if (!xmlStrcmp(BAD_CAST "practice_num", xml.tag)) {
        // 出題数の読み出し
        add.practice_num = atoi((char*)(BAD_CAST xml.value));

      } else if (!xmlStrcmp(BAD_CAST "roman_convert", xml.tag)) {
        // 変換モードの読み出し
        add.roman_convert = !xmlStrcmp(BAD_CAST "true", xml.value)? true:false;

      } else if (!xmlStrcmp(BAD_CAST "auto_next", xml.tag)) {
        // 自動改ページかの読み出し
        add.auto_next = !xmlStrcmp(BAD_CAST "true", xml.value)? true : false;

      } else if (!xmlStrcmp(BAD_CAST "learn_mode", xml.tag)) {
        // 覚えようモードかの読み出し
        add.learn_mode = !xmlStrcmp(BAD_CAST "true", xml.value)? true : false;

      } else if (!xmlStrcmp(BAD_CAST "send_ranking", xml.tag)) {
        // ランキング登録するかの読み出し
        add.send_ranking = !xmlStrcmp(BAD_CAST "true", xml.value)? true :false;

      } else if (!xmlStrcmp(BAD_CAST "rank_page", xml.tag)) {
        // ランキングの登録先
        add.rank_page = (char*)(xml.value);
      }
    } while (ret && (xml.depth >= 3));
    if (added) {
      users.push_back(add);
    }
  } while (ret &&
           !((xml.depth < 2) && (xml.type == XML_READER_TYPE_END_ELEMENT)));
}


bool Property::load(const char* file, const char* path[]) {

  // ファイルパスの決定
  std::string full_path = VXV::searchFile(file, path);

  // 設定ファイルの新規作成
  if (full_path.size() <= 0) {
    int last_index = 0;
    while (path[last_index]) {
      ++last_index;
    }
    for (int i = last_index -1; i >= 0; --i) {
      if (VXV::createDirs(path[i]) < 0) {
        continue;
      }
      full_path = std::string(path[i]) + '/' + file;
      if (save(full_path.c_str())) {
        break;
      }
    }
  }

  xmlTextReaderPtr reader = xmlReaderForFile(full_path.c_str(), NULL, 0);
  if (!reader) {
    xmlCleanupParser();
    return false;
  }

  bool ret;
  do {
    xml_t xml;
    ret = readXMLLine(xml, reader);
    if ((xml.depth != 1) || ((xml.type != XML_READER_TYPE_ELEMENT) &&
                             (xml.type != XML_READER_TYPE_TEXT))) {
      continue;
    }
    if (!xmlStrcmp(BAD_CAST "sys", xml.tag)) {
      // システム情報の読み出し
      readSysInfo(reader);

    } else if (!xmlStrcmp(BAD_CAST "users", xml.tag)) {
      // ユーザ情報の読み出し
      readAllUserInfo(reader);
    }
  } while (ret);
  setUserIndex(selected_index);
  xmlFreeTextReader(reader);
  xmlCleanupParser();

  loaded_file = full_path;
  if (users.empty()) {
    addUser();
  }
  return true;
}


bool Property::save(const char* file) {
  std::string save_file = (file) ? file : loaded_file;
  if (!save_file[0]) {
    return false;
  }

  // XML での書き出し
  xmlDocPtr doc = xmlNewDoc(BAD_CAST "1.0");
  xmlNodePtr root_node = xmlNewNode(NULL, BAD_CAST "nettypingrc");
  xmlDocSetRootElement(doc, root_node);

  // システム情報の書き出し  
  xmlNodePtr node = xmlNewChild(root_node, NULL, BAD_CAST "sys", NULL);
  xmlNewChild(node, NULL, BAD_CAST "fullscreen",
              sys.fullscreen ? BAD_CAST "true" : BAD_CAST "false");
  char num_str[] = "0";
  num_str[0] += sys.user_index;
  xmlNewChild(node, NULL, BAD_CAST "user_index", BAD_CAST num_str);

  // ユーザ情報の書き出し
  xmlNodePtr user_node = xmlNewChild(root_node, NULL, BAD_CAST "users", NULL);
  for (std::vector<userInfo_t>::iterator it = users.begin();
       it != users.end(); ++it) {
    // 名前
    node = xmlNewChild(user_node, NULL, BAD_CAST "user", NULL);
    xmlNewChild(node, NULL, BAD_CAST "name", BAD_CAST it->name.c_str());

    // 出題数
    char nth[13];
    sprintf(nth, "%d", it->practice_num);
    xmlNewChild(node, NULL, BAD_CAST "practice_num", BAD_CAST nth);

    // 変更モード
    xmlNewChild(node, NULL, BAD_CAST "roman_convert",
                it->roman_convert ? BAD_CAST "true" : BAD_CAST "false");

    // 自動改ページ
    xmlNewChild(node, NULL, BAD_CAST "auto_next",
                it->auto_next ? BAD_CAST "true" : BAD_CAST "false");

    // 覚えようモード
    xmlNewChild(node, NULL, BAD_CAST "learn_mode",
                it->learn_mode ? BAD_CAST "true" : BAD_CAST "false");

    // ランキング登録
    xmlNewChild(node, NULL, BAD_CAST "send_ranking",
                it->send_ranking ? BAD_CAST "true" : BAD_CAST "false");

    // 登録先
    xmlNewChild(node, NULL, BAD_CAST "rank_page",
                BAD_CAST it->rank_page.c_str());
  }
  int ret = xmlSaveFormatFileEnc(save_file.c_str(), doc, "UTF-8", 1);
  xmlFreeDoc(doc);
  xmlCleanupParser();

  return (ret < 0 ? false : true);
}