lang.c

   1 #include "lang.h"
   2 #include "UserNode.h"
   3 #include "DBHelper.h"
   4 #include "mysqlConn.h"
   5
   6 #define DEFAULT_LANG_TAG "EN"
   7 #define DEFAULT_LANG_NAME "English"
   8
   9 static struct language **langdict;
  10 static struct language *lang_c;
  11
  12 void init_lang() {
  13     langdict = calloc(MAXLANGUAGES, sizeof(*langdict));
  14 }
  15
  16 void free_lang() {
  17
  18 }
  19
  20 void load_languages() {
  21     MYSQL_RES *res;
  22     MYSQL_ROW row;
  23     printf_mysql_query("SELECT `lang`, `text` FROM `language` WHERE `ident` = 'name'");
  24     res = mysql_use();
  25     while((row = mysql_fetch_row(res)) != NULL) {
  26         load_language(row[0], row[1]);
  27     }
  28 }
  29
  30 static struct language* add_language(char *langtag, char *langname) {
  31     int cindex;
  32     for(cindex = 0; cindex < MAXLANGUAGES; cindex++) {
  33         if(langdict[cindex] == NULL) break;
  34         if(!strcmp(langdict[cindex]->langname, langname) || !strcmp(langdict[cindex]->langtag, langtag))
  35             return langdict[cindex];
  36     }
  37     if(cindex == MAXLANGUAGES) return NULL;
  38     struct language *lang = malloc(sizeof(*lang));
  39     if (!lang) {
  40         perror("malloc() failed");
  41         return NULL;
  42     }
  43     lang->langtag = strdup(langtag);
  44     lang->langname = strdup(langname);
  45     struct language_table **entrys = calloc(27, sizeof(*entrys));
  46     lang->entrys = entrys;
  47     langdict[cindex] = lang;
  48     return lang;
  49 }
  50
  51 static int get_entry_index(const char *ident) {
  52     const char *underscore = strstr(ident, "_");
  53     if(!underscore || !(underscore[1] >= 65 && underscore[1] <= 90)) return 26;
  54     return (underscore[1] - 'A');
  55 }
  56
  57 void load_language(char *tag, char *name) {
  58     struct language *lang = get_language_by_tag(tag);
  59     if(lang == get_default_language()) return;
  60     if(lang) {
  61         //remove all entrys
  62         int cindex;
  63         struct language_table *entry, *next;
  64         for(cindex = 0; cindex < 27; cindex++) {
  65             for(entry = lang->entrys[cindex]; entry; entry = next) {
  66                 next = entry->next;
  67                 free(entry->ident);
  68                 free(entry->text);
  69                 free(entry);
  70             }
  71             lang->entrys[cindex] = NULL;
  72         }
  73     } else
  74         lang = add_language(tag, name);
  75     if(!lang) return;
  76     MYSQL_RES *res;
  77     MYSQL_ROW row;
  78     printf_mysql_query("SELECT `ident`, `text` FROM `language` WHERE `lang` = '%s' AND `ident` != 'name'", escape_string(tag));
  79     res = mysql_use();
  80     while((row = mysql_fetch_row(res)) != NULL) {
  81         register_language_string(lang, row[0], row[1]);
  82     }
  83 }
  84
  85 struct language* get_language_by_tag(char *tag) {
  86     int cindex;
  87     for(cindex = 0; cindex < MAXLANGUAGES; cindex++) {
  88         if(langdict[cindex] == NULL) break;
  89         if(!strcmp(langdict[cindex]->langtag, tag))
  90             return langdict[cindex];
  91     }
  92     return NULL;
  93 }
  94
  95 struct language* get_language_by_name(char *name) {
  96     int cindex;
  97     for(cindex = 0; cindex < MAXLANGUAGES; cindex++) {
  98         if(langdict[cindex] == NULL) break;
  99         if(!strcmp(langdict[cindex]->langname, name))
 100             return langdict[cindex];
 101     }
 102     return NULL;
 103 }
 104
 105 struct language* get_default_language() {
 106     if(lang_c == NULL)
 107         lang_c = add_language(DEFAULT_LANG_TAG, DEFAULT_LANG_NAME);
 108     return lang_c;
 109 }
 110
 111 void register_default_language_table(const struct default_language_entry *msgtab) {
 112     if(lang_c == NULL)
 113         lang_c = add_language(DEFAULT_LANG_TAG, DEFAULT_LANG_NAME);
 114     struct language_table *lang_entry;
 115     int cindex;
 116     while(msgtab->ident) {
 117         cindex = get_entry_index(msgtab->ident);
 118         lang_entry = malloc(sizeof(*lang_entry));
 119         if (!lang_entry) {
 120             perror("malloc() failed");
 121             return;
 122         }
 123         lang_entry->ident = strdup(msgtab->ident);
 124         lang_entry->text = strdup(msgtab->text);
 125         lang_entry->next = lang_c->entrys[cindex];
 126         lang_c->entrys[cindex] = lang_entry;
 127         msgtab++;
 128     }
 129 }
 130
 131 void register_language_string(struct language *lang, char *ident, char *text) {
 132     int cindex = get_entry_index(ident);
 133     struct language_table *lang_entry = malloc(sizeof(*lang_entry));
 134     if (!lang_entry) {
 135         perror("malloc() failed");
 136         return;
 137     }
 138     lang_entry->ident = strdup(ident);
 139     lang_entry->text = strdup(text);
 140     lang_entry->next = lang->entrys[cindex];
 141     lang->entrys[cindex] = lang_entry;
 142 }
 143
 144 char *get_language_string(struct UserNode *user, const char* msg_ident) {
 145     struct language* lang;
 146     if((user->flags & USERFLAG_ISAUTHED)) {
 147         loadUserSettings(user);
 148         lang = user->language;
 149     } else
 150         lang = lang_c;
 151     int cindex = get_entry_index(msg_ident);
 152     struct language_table* entry;
 153     for(entry = lang->entrys[cindex]; entry; entry = entry->next) {
 154         if(!strcmp(entry->ident, msg_ident))
 155             return entry->text;
 156     }
 157     if(lang == lang_c) return NULL;
 158     for(entry = lang_c->entrys[cindex]; entry; entry = entry->next) {
 159         if(!strcmp(entry->ident, msg_ident))
 160             return entry->text;
 161     }
 162     return NULL;
 163 }
 164
 165 char *build_language_string(struct UserNode *user, char *buffer, const char *msg_ident, ...) {
 166     char *formatStr = get_language_string(user, msg_ident);
 167     if(!formatStr) return NULL;
 168     if(buffer == NULL) {
 169         buffer = (char *)malloc((MAXLEN+1) * sizeof(char));
 170         if (!buffer) {
 171             perror("malloc() failed");
 172             return NULL;
 173         }
 174     }
 175     int pos;
 176     va_list arg_list;
 177     buffer[0] = '\0';
 178     va_start(arg_list, msg_ident);
 179     pos = vsnprintf(buffer, MAXLEN - 2, formatStr, arg_list);
 180     va_end(arg_list);
 181     if (pos < 0 || pos > (MAXLEN - 2)) pos = MAXLEN - 2;
 182     buffer[pos] = '\0';
 183     return buffer;
 184 }