Remove $Id$ tags from most of webcit
[citadel.git] / webcit / gettext.c
index 9d50582f14b5ac4cad0f0f3b98586627fc57efe8..837fdb87530ec7f5444eea2a3ff07fd2ce56c181 100644 (file)
@@ -1,5 +1,19 @@
 /*
- * $Id$
+ * Copyright (c) 1996-2010 by the citadel.org team
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  */
 
 #include "webcit.h"
@@ -32,7 +46,7 @@ long nLocalesLoaded = 0;
 locale_t *wc_locales; /**< here we keep the parsed stuff */
 #endif
 
-/** Keep information about one locale */
+/* Keep information about one locale */
 typedef struct _lang_pref{
        char lang[16];          /**< the language locale string */
        char region[16];        /**< the region locale string */
@@ -41,15 +55,15 @@ typedef struct _lang_pref{
        int selectedlang;       /**< is this the selected language? */
 } LangStruct;
 
-/* \brief parse browser locale header 
- * seems as most browsers just do a one after coma value even if more than 10 locales are available. Sample strings:
+/* parse browser locale header 
+ *
+ * seems as most browsers just do a one after comma value even if more than 10 locales are available. Sample strings:
  * opera: 
  * Accept-Language: sq;q=1.0,de;q=0.9,as;q=0.8,ar;q=0.7,bn;q=0.6,zh-cn;q=0.5,kn;q=0.4,ch;q=0.3,fo;q=0.2,gn;q=0.1,ce;q=0.1,ie;q=0.1 
  * Firefox 
  * Accept-Language: 'de-de,en-us;q=0.7,en;q=0.3' 
  * Accept-Language: de,en-ph;q=0.8,en-us;q=0.5,de-at;q=0.3 
  * Accept-Language: de,en-us;q=0.9,it;q=0.9,de-de;q=0.8,en-ph;q=0.7,de-at;q=0.7,zh-cn;q=0.6,cy;q=0.5,ar-om;q=0.5,en-tt;q=0.4,xh;q=0.3,nl-be;q=0.3,cs;q=0.2,sv;q=0.1,tk;q=0.1 
- * \param LocaleString the string from the browser http headers
  */
 
 void httplang_to_locale(StrBuf *LocaleString, wcsession *sess)
@@ -67,10 +81,10 @@ void httplang_to_locale(StrBuf *LocaleString, wcsession *sess)
        StrBuf *Buf = NULL;
        StrBuf *SBuf = NULL;
 
-       nParts=StrBufNum_tokens(LocaleString,',');
-       for (i=0; ((i<nParts)&&(i<SEARCH_LANG)); i++)
+       nParts = StrBufNum_tokens(LocaleString, ',');
+       for (i=0; ((i<nParts) && (i < SEARCH_LANG)); i++)
         {
-               char lbuf[16];
+               char lbuf[32];
                int blen;
                        
                if (Buf == NULL) {
@@ -82,89 +96,105 @@ void httplang_to_locale(StrBuf *LocaleString, wcsession *sess)
                        FlushStrBuf(SBuf);
                }
 
-               ls=&wanted_locales[i];
+               ls = &wanted_locales[i];
 
-               StrBufExtract_token(Buf,LocaleString, i,',');
+               StrBufExtract_token(Buf, LocaleString, i, ',');
                /** we are searching, if this list item has something like ;q=n*/
-               if (StrBufNum_tokens(Buf,'=')>1) {
+               if (StrBufNum_tokens(Buf, '=') > 1) {
                        int sbuflen, k;
-                       StrBufExtract_token(SBuf,Buf, 1,'=');
-                       sbuflen=StrLength(SBuf);
-                       for (k=0; k<sbuflen; k++) 
-                               if (ChrPtr(SBuf)[k]=='.') 
+                       StrBufExtract_token(SBuf, Buf, 1, '=');
+                       sbuflen = StrLength(SBuf);
+                       for (k = 0; k < sbuflen; k++) 
+                               if (ChrPtr(SBuf)[k] == '.') 
                                        StrBufPeek(SBuf, NULL, k, '0');
-                       ls->priority=StrTol(SBuf);
+                       ls->priority = StrTol(SBuf);
                }
                else {
-                       ls->priority=1000;
+                       ls->priority = 1000;
                }
+
                /** get the locale part */
-               StrBufExtract_token(SBuf ,Buf, 0, ';');
+               StrBufExtract_token(SBuf, Buf, 0, ';');
+
                /** get the lang part, which should be allways there */
-               extract_token(&ls->lang[0], ChrPtr(SBuf), 0, '-', 16);
+               extract_token(&ls->lang[0], 
+                             ChrPtr(SBuf), 
+                             0, '-', 
+                             sizeof(ls->lang));
+
                /** get the area code if any. */
-               if (StrBufNum_tokens(SBuf,'-') > 1) {
-                       extract_token(&ls->region[0],ChrPtr(SBuf),1,'-',16);
+               if (StrBufNum_tokens(SBuf, '-') > 1) {
+                       extract_token(&ls->region[0], 
+                                     ChrPtr(SBuf), 
+                                     1, '-', 
+                                     sizeof(ls->region));
                }
                else { /** no ara code? use lang code */
                        blen=strlen(&ls->lang[0]);
-                       memcpy(&ls->region[0], ls->lang,blen);
-                       ls->region[blen]='\0';
-               } /** area codes are uppercase */
-               blen=strlen(&ls->region[0]);
-               for (j=0; j<blen; j++)
+                       memcpy(&ls->region[0], ls->lang, blen);
+                       ls->region[blen] = '\0';
+               }
+
+               /* area codes are uppercase */
+               blen = strlen(&ls->region[0]);
+               for (j = 0; j < blen; j++)
                {
-                       int chars=toupper(ls->region[j]);
-                       ls->region[j]=(char)chars;/** \todo ?! */
+                       int chars;
+                       chars = toupper(ls->region[j]);
+                       ls->region[j] = (char)chars;/** \todo ?! */
                }
-               sprintf(&lbuf[0],"%s_%s",&ls->lang[0],&ls->region[0]);
+               snprintf(&lbuf[0], 
+                        sizeof(lbuf), 
+                        "%s_%s", 
+                        &ls->lang[0], 
+                        &ls->region[0]);
                        
                /** check if we have this lang */
-               ls->availability=1;
-               ls->selectedlang=-1;
-               for (j=0; j<nLocalesLoaded; j++) {
+               ls->availability = 1;
+               ls->selectedlang = -1;
+               for (j = 0; j < nLocalesLoaded; j++) {
                        int result;
                        /** match against the LANG part */
-                       result=strcasecmp(&ls->lang[0], AvailLangLoaded[j]);
-                       if ((result<0)&&(result<ls->availability)){
-                               ls->availability=result;
-                               ls->selectedlang=j;
+                       result = strcasecmp(&ls->lang[0], AvailLangLoaded[j]);
+                       if ((result < 0) && (result < ls->availability)){
+                               ls->availability = result;
+                               ls->selectedlang = j;
                        }
                        /** match against lang and locale */
-                       if (0==strcasecmp(&lbuf[0], AvailLangLoaded[j])){
-                               ls->availability=0;
-                               ls->selectedlang=j;
-                               j=nLocalesLoaded;
+                       if (0 == strcasecmp(&lbuf[0], AvailLangLoaded[j])){
+                               ls->availability = 0;
+                               ls->selectedlang = j;
+                               j = nLocalesLoaded;
                        }
                }
         }
        
-       prio=0;
-       av=-1000;
-       nBest=-1;
-       for (i=0; ((i<nParts)&&(i<SEARCH_LANG)); i++) {
-               ls=&wanted_locales[i];
-               if ((ls->availability<=0)&& 
-                  (av<ls->availability)&&
-                  (prio<ls->priority)&&
-                  (ls->selectedlang!=-1)) {
-                       nBest=ls->selectedlang;
-                       av=ls->availability;
-                       prio=ls->priority;
+       prio = 0;
+       av = -1000;
+       nBest = -1;
+       for (i = 0; ((i < nParts) && (i<SEARCH_LANG)); i++) {
+               ls = &wanted_locales[i];
+               if ((ls->availability <= 0) && 
+                   (av < ls->availability) &&
+                   (prio < ls->priority) &&
+                   (ls->selectedlang != -1)) {
+                       nBest = ls->selectedlang;
+                       av = ls->availability;
+                       prio = ls->priority;
                }
        }
        if (nBest == -1) {
                /** fall back to C */
                nBest=0;
        }
-       sess->selected_language=nBest;
+       sess->selected_language = nBest;
        lprintf(9, "language found: %s\n", AvailLangLoaded[WC->selected_language]);
        FreeStrBuf(&Buf);
        FreeStrBuf(&SBuf);
 }
 
-/**
- * \brief show the language chooser on the login dialog
+/*
+ * show the language chooser on the login dialog
  * depending on the browser locale change the sequence of the 
  * language chooser.
  */
@@ -200,14 +230,13 @@ void tmplput_offer_languages(StrBuf *Target, WCTemplputParams *TP)
        wc_printf("</select>\n");
 }
 
-/**
- * \brief Set the selected language for this session.
- * \param lang the locale to set.
+/*
+ * Set the selected language for this session.
  */
 void set_selected_language(const char *lang) {
 #ifdef HAVE_USELOCALE
        int i;
-       for (i=0; i<nLocalesLoaded; ++i) {
+       for (i = 0; i<nLocalesLoaded; ++i) {
                if (!strcasecmp(lang, AvailLangLoaded[i])) {
                        WC->selected_language = i;
                }
@@ -215,8 +244,8 @@ void set_selected_language(const char *lang) {
 #endif
 }
 
-/**
- * \brief Activate the selected language for this session.
+/*
+ * Activate the selected language for this session.
  */
 void go_selected_language(void) {
 #ifdef HAVE_USELOCALE
@@ -232,8 +261,8 @@ void go_selected_language(void) {
 #endif
 }
 
-/**
- * \brief Deactivate the selected language for this session.
+/*
+ * Deactivate the selected language for this session.
  */
 void stop_selected_language(void) {
 #ifdef HAVE_USELOCALE
@@ -246,8 +275,8 @@ void stop_selected_language(void) {
        locale_t Empty_Locale;
 #endif
 
-/**
- * \brief Create a locale_t for each available language
+/*
+ * Create a locale_t for each available language
  */
 void initialize_locales(void) {
        int nLocales;
@@ -368,24 +397,27 @@ ServerShutdownModule_GETTEXT
 const char *AvailLang[] = {
        "C", ""};
 
-/** \brief dummy for non NLS enabled systems */
+/* dummy for non NLS enabled systems */
 void tmplput_offer_languages(StrBuf *Target, WCTemplputParams *TP)
 {
        wc_printf("English (US)");
 }
 
-/** \brief dummy for non NLS enabled systems */
-void set_selected_language(char *lang) {
+/* dummy for non NLS enabled systems */
+void set_selected_language(const char *lang) {
 }
 
-/** \brief dummy for non NLS enabled systems */
+/* dummy for non NLS enabled systems */
 void go_selected_language(void) {
 }
 
-/** \brief dummy for non NLS enabled systems */
+/* dummy for non NLS enabled systems */
 void stop_selected_language(void) {
 }
 
+void initialize_locales(void) {
+}
+
 #endif /* ENABLE_NLS */
 
 
@@ -436,7 +468,8 @@ SessionNewModule_GETTEXT
 (wcsession *sess)
 {
 #ifdef ENABLE_NLS
-       if (sess->Hdr->HR.browser_language != NULL) {
+       if (!sess->Hdr->HR.Static && 
+           (sess->Hdr->HR.browser_language != NULL)) {
                httplang_to_locale(sess->Hdr->HR.browser_language, sess);
        }
 #endif