webcit/gettext.c

   1 #define _GNU_SOURCE
   2 #include "webcit.h"
   3 #include "webserver.h"
   4
   5 #ifdef ENABLE_NLS
   6
   7 #define NUM_LANGS 3
   8 static const char *AvailLang[NUM_LANGS] = {
   9         "en_US",
  10         "de_DE",
  11         "it_IT"
  12 };
  13
  14 locale_t wc_locales[NUM_LANGS];
  15
  16 typedef struct _lang_pref{
  17         char lang[16];
  18         char region[16];
  19         char *match;
  20         double Priority;
  21 } LangStruct;
  22
  23 /* TODO: we skip the language weightening so far. */
  24 /* Accept-Language: 'de-de,en-us;q=0.7,en;q=0.3' */
  25 /* Accept-Language: de,en-ph;q=0.8,en-us;q=0.5,de-at;q=0.3 */
  26 void httplang_to_locale(const char *LocaleString)
  27 {
  28         char *locale = "C";
  29         LangStruct wanted_locales[20];
  30         int i = 0;
  31         int j = 0;
  32         size_t len = strlen(LocaleString);
  33         int nFound = 0;
  34         int nParts;
  35         const int nAvail = 1; /* Number of members in AvailLang */
  36         char *search = (char *) malloc(len);
  37         locale_t my_Locale;
  38         locale_t my_Empty_Locale;
  39
  40         memcpy(search, LocaleString, len);
  41         search[len] = '\0';
  42         nParts=num_tokens(search,',');
  43         for (i=0; ((i<nParts)&&(i<10)); i++)
  44         {
  45                 char buf[16];
  46                 char sbuf[16];
  47                 int blen;
  48
  49                 extract_token(&buf[0],search, 0,',',16);
  50                 /* we are searching, if this list item has something like ;q=n*/
  51                 if (num_tokens(&buf[0],'=')>1) {
  52                         extract_token(&sbuf[0],&buf[0], 1,'=',16);
  53                         wanted_locales[i].Priority=atof(&sbuf[0]);
  54                 }
  55                 else {
  56                         wanted_locales[i].Priority=1.0;
  57                 }
  58                 /* get the locale part */
  59                 extract_token(&sbuf[0],&buf[0],0,';',16);
  60                 /* get the lang part, which should be allways there */
  61                 extract_token(&wanted_locales[i].lang[0],&sbuf[0],0,'-',16);
  62                 /* get the area code if any. */
  63                 if (num_tokens(&sbuf[0],'-')>1) {
  64                         extract_token(&wanted_locales[i].region[0],&sbuf[0],1,'-',16);
  65                 }
  66                 else { /* no ara code? use lang code */
  67                         blen=strlen(&wanted_locales[i].lang[0]);
  68                         memcpy(&wanted_locales[i].region[0], wanted_locales[i].lang,blen);
  69                         wanted_locales[i].region[blen]='\0';
  70                 } /* area codes are uppercase */
  71                 blen=strlen(&wanted_locales[i].region[0]);
  72                 for (j=0; j<blen; j++)
  73                         {
  74                                 int chars=toupper(wanted_locales[i].region[j]);
  75                                 wanted_locales[i].region[j]=(char)chars;/*todo ?! */
  76                         }
  77         }
  78
  79         /* todo: weight  */
  80         if (nFound > 0) {
  81                 for (i = 0; i <= nFound; i++) {
  82                         for (j = 0; j < nAvail; j++) {
  83                                 int ret = strncasecmp(&wanted_locales[i].lang[0],
  84                                                                           AvailLang[j],
  85                                                                           strlen(&wanted_locales[i].lang[0]));
  86                                 if (!ret) {
  87                                         locale = (char *) AvailLang[j]; //wanted_locales[i];
  88                                         i = nFound + 1;
  89                                         j = nAvail + 1;
  90                                         continue;
  91                                 }
  92
  93                         }
  94                 }
  95         }
  96
  97         len = strlen(locale);
  98         memcpy(search, locale, len);
  99         memcpy(&search[len], ".UTF8", 5);
 100         search[len + 5] = '\0';
 101         my_Empty_Locale = newlocale(LC_ALL_MASK, NULL, NULL);   /* create default locale */
 102         my_Locale = newlocale(LC_MESSAGES_MASK /*|LC_TIME_MASK FIXME */ ,
 103                               search, my_Empty_Locale);
 104
 105         uselocale(my_Locale);
 106         //      freelocale(my_Locale);
 107         //      freelocale(my_Empty_Locale);
 108         free(search);
 109 }
 110
 111
 112
 113 /*
 114         // the web browser sends '-', we need '_'
 115
 116                 for (i = 0; i < len; i++)
 117                 if (search[i] == '-')
 118                         search[i] = '_';
 119
 120         nFound=i;
 121         nParts=num_tokens(search,',');
 122         if (nParts>0)
 123                 {
 124                         extract_token(prefers,search, 1,';',len);
 125                         extract_token(langs,search, 0,';',len);
 126                 }
 127         else
 128                 {
 129                         free(prefers);
 130                         prefers=NULL;
 131                         memcpy(search, len);
 132                         search[len] = '\0';
 133                 }
 134         i = 0;
 135         while ( !done && (nFound < 10)) {
 136                 if ((search[i] == ',') || (search[i] == ';') || (search[i] == '\0'))
 137                 {
 138                         if ((search[i] == ';') || (search[i] == '\0'))
 139                                 done = 1;
 140                         search[i] = '\0';
 141                         wanted_locales[nFound] = (char *) &search[j];
 142                         j = i + 1;
 143                         nFound++;
 144                 }
 145
 146                 i++;
 147         }
 148 */
 149
 150
 151
 152 void offer_languages(void) {
 153         int i;
 154
 155         wprintf("<select name=\"language\" size=\"1\">\n");
 156
 157         for (i=0; i < NUM_LANGS; ++i) {
 158                 wprintf("<option value=%s>%s</option>\n", AvailLang[i], AvailLang[i]);
 159         }
 160
 161         wprintf("</select>\n");
 162 }
 163
 164 /*
 165  * Set the selected language for this session.
 166  */
 167 void set_selected_language(char *lang) {
 168         int i;
 169
 170         for (i=0; i<NUM_LANGS; ++i) {
 171                 if (!strcasecmp(lang, AvailLang[i])) {
 172                         WC->selected_language = i;
 173                 }
 174         }
 175 }
 176
 177 /*
 178  * Activate the selected language for this session.
 179  */
 180 void go_selected_language(void) {
 181         lprintf(9, "uselocale(%d)\n", WC->selected_language);
 182         uselocale(wc_locales[WC->selected_language]);
 183 }
 184
 185
 186 /*
 187  * Create a locale_t for each available language
 188  */
 189 void initialize_locales(void) {
 190         int i;
 191         locale_t Empty_Locale;
 192         char buf[32];
 193
 194         /* create default locale */
 195         Empty_Locale = newlocale(LC_ALL_MASK, NULL, NULL);
 196
 197         for (i = 0; i < NUM_LANGS; ++i) {
 198                 sprintf(buf, "%s.UTF8", AvailLang[i]);
 199                 wc_locales[i] = newlocale(LC_MESSAGES_MASK /* |LC_TIME_MASK FIXME */ ,
 200                         buf,
 201                         Empty_Locale
 202                 );
 203         }
 204 }
 205
 206
 207 #else   /* ENABLE_NLS */
 208
 209 void offer_languages(void) {
 210         wprintf("English (US)");
 211 }
 212
 213 void set_selected_language(char *lang) {
 214 }
 215
 216 void go_selected_language(void) {
 217 }
 218
 219 #endif  /* ENABLE_NLS */