languages.cpp

Go to the documentation of this file.

/*
 * Crossfire -- cooperative multi-player graphical RPG and adventure game
 *
 * Copyright (c) 1999-2014 Mark Wedel and the Crossfire Development Team
 * Copyright (c) 1992 Frank Tore Johansen
 *
 * Crossfire is free software and comes with ABSOLUTELY NO WARRANTY. You are
 * welcome to redistribute it under certain conditions. For details, please
 * see COPYING and LICENSE.
 *
 * The authors can be reached via e-mail at <crossfire@metalforge.org>.
 */

#include "global.h"

#include <errno.h>
#include <stdlib.h>
#include <string.h>
#include <map>
#include <memory>

struct i18n_file {
    sstring code;                           
    sstring name;                           
    std::map<sstring, sstring> messages;    
};

static std::vector<i18n_file *> i18n_files;
static i18n_file *i18n_default = nullptr;

const char *i18n(const object *who, const char *code) {
    if (!who || !who->contr || !who->contr->language)
        return code;

    sstring scode = find_string(code);
    if (!scode)
        return code;
    i18n_file *file = static_cast<i18n_file *>(who->contr->language);
    auto found = file->messages.find(scode);

    return found == file->messages.end() ? code : found->second;
}

language_t i18n_find_language_by_code(const char *code) {
    for (auto language : i18n_files) {
        if (strcmp(code, language->code) == 0)
            return language;
    }

    return nullptr;
}

language_t i18n_get_language_by_code(const char *code) {
    language_t found = i18n_find_language_by_code(code);
    if (found)
        return found;
    return i18n_default;
}

sstring i18n_get_language_code(language_t language) {
    if (!language)
        return i18n_default->code;
    return static_cast<i18n_file *>(language)->code;
}

void i18n_list_languages(object *who) {
    for (auto language : i18n_files) {
        draw_ext_info_format(NDI_UNIQUE, 0, who, MSG_TYPE_COMMAND, MSG_SUBTYPE_NONE,
            "[fixed]%s: %s",
            language->code,
            language->name
            );
    }
}

static void convert_newline(char *line) {
    char *next;
    char buf[MAX_BUF];

    while ((next = strstr(line, "\\n")) != NULL) {
        *next = '\n';
        *(next+1) = '\0';
        snprintf(buf, MAX_BUF, "%s%s", line, next+2);
        strcpy(line, buf);
    }
}

void i18n_init(void) {
    char dirname[MAX_BUF], filename[MAX_BUF*2], *line;
    BufferReader *br;
    char *token;
    DIR *dir;
    struct dirent *file;

    snprintf(dirname, sizeof(dirname), "%s/i18n/", settings.datadir);

    dir = opendir(dirname);
    if (dir == NULL) {
        LOG(llevError, "i18n: couldn't open %s\n", dirname);
        fatal(SEE_LAST_ERROR);
    }

    sstring code = add_string("LN");

    while ((file = readdir(dir)) != NULL) {
        if (strncmp(file->d_name, "messages.", 9) != 0)
            continue;

        snprintf(filename, sizeof(filename), "%s%s", dirname, file->d_name);
        br = bufferreader_init_from_file(NULL, filename, "i18n: couldn't open %s: %s\n", llevError);
        if (!br) {
            fatal(SEE_LAST_ERROR);
        }
        i18n_file *language = new i18n_file();

        if (!language) {
            LOG(llevError, "i18n: couldn't allocate memory!\n");
            fatal(OUT_OF_MEMORY);
        }
        language->code = add_string(file->d_name + 9);
        i18n_files.push_back(language);

        while ((line = bufferreader_next_line(br)) != NULL) {
            if (line[0] != '#' && line[0] != '\0') {

                token = strtok(line, "|");
                convert_newline(token);
                sstring scode = add_string(token), smessage;
                token = strtok(NULL, "|");
                if (token != NULL) {
                    convert_newline(token);
                    smessage = add_string(token);
                } else {
                    smessage = add_refcount(scode);
                }
                language->messages[scode] = smessage;
            }
        }
        bufferreader_destroy(br);

        auto found = language->messages.find(code);
        if (found == language->messages.end()) {
            LOG(llevError, "i18n: no language set in %s\n", filename);
            fatal(SEE_LAST_ERROR);
        }

        language->name = found->second;
        LOG(llevDebug, "i18n: %zu strings for %s\n",
                language->messages.size(), language->name);

        if (strcmp(language->code, "en") == 0)
            i18n_default = language;
    }
    closedir(dir);

    free_string(code);

    if (i18n_default == nullptr) {
        LOG(llevError, "i18n: couldn't find default language (en)\n");
        fatal(SEE_LAST_ERROR);
    }
}

void i18n_free(void) {
  for (auto language : i18n_files) {
      free_string(language->code); /* name is a copy of a message */
      for (auto message : language->messages) {
          free_string(message.first);
          free_string(message.second);
      }
      delete language;
  }
  i18n_files.clear();
}