[BACK]Return to query.c CVS log [TXT] [DIR] Up to [Public] / Amaya / amaya

Diff for /Amaya/amaya/query.c between versions 1.195 and 1.196

version 1.195, 1999/06/14 15:59:37 version 1.196, 1999/06/21 16:34:29
Line 1280  HTList             *c; Line 1280  HTList             *c;
   the HTTP content negotiation phase    the HTTP content negotiation phase
   ----------------------------------------------------------------------*/    ----------------------------------------------------------------------*/
 #ifdef __STDC__  #ifdef __STDC__
 static void           AHTAcceptLanguagesInit (HTList *c)  static void         AHTAcceptLanguagesInit (HTList *c)
 #else  /* __STDC__ */  #else  /* __STDC__ */
 static void           AHTAcceptLanguagesInit (c)  static void         AHTAcceptLanguagesInit (c)
 HTList             *c;  HTList             *c;
 #endif /* __STDC__ */  #endif /* __STDC__ */
 {  {
   STRING ptr;    STRING            ptr;
   STRING lang_list;    STRING            lang_list;
   int count;    CHAR_T            s[3];
   double quality;    int               count, lg;
     double            quality;
     ThotBool          still;
   
   if (c == (HTList *) NULL)     if (c == (HTList *) NULL) 
       return;        return;
       
   ptr = TtaGetEnvString ("ACCEPT_LANGUAGES");    lang_list = TtaGetEnvString ("ACCEPT_LANGUAGES");
     s[3] = EOS;
   if (ptr && *ptr != EOS)    if (lang_list && *lang_list != EOS)
     {      {
       /* add the default language first  */        /* add the default language first  */
       HTLanguage_add (c, "*", -1.0);        HTLanguage_add (c, "*", -1.0);
       /* read the languages from the registry, then inject them one, by one.  
        The first one is the one with the lowest priority */  
       lang_list = TtaStrdup (ptr);  
       /* how many languages do we have? */        /* how many languages do we have? */
       for (count = 1, ptr = lang_list; *ptr != EOS; ptr++)        ptr = lang_list;
         if (*ptr == ' ')        count = 0;
           {        while (*ptr != EOS)
             *ptr = EOS;          {
             while (*ptr != EOS &&
                    (*ptr < 'A' || (*ptr > 'Z' && *ptr < 'a') || *ptr > 'z'))
               /* skip the whole separator */
               ptr++;
             lg = 0;
             while ((*ptr >= 'A' && *ptr <= 'Z') || (*ptr >= 'a' && *ptr <= 'z') || *ptr == '-')
               {
                 /* it's a new language */
                 ptr++;
                 lg++;
               }
             if (lg >= 2)
             count++;              count++;
           }            if (*ptr != EOS)
               ptr++;
           }
   
       if (count > 1)        if (count > 0)
         quality = 1.1 - (double) count/10.0;          quality = 1.1 - (double) count/10.0;
       else        else
         quality = 1.0;          quality = 1.0;
   
       ptr = lang_list;        /*
       while (count--)           Read the languages from the registry, then inject them one, by one.
           The first one is the one with the highest priority.
           The libwww ask for the lowest priority first.
         */
         ptr--;
         still = TRUE;
         while (count) 
         {          {
           HTLanguage_add (c, ptr, quality);            while (still &&
           quality += 0.1;                   (*ptr < 'A' || (*ptr > 'Z' && *ptr < 'a') || *ptr > 'z'))
           while (*ptr != EOS)              /* skip the whole separator */
             ptr++;              if (ptr > lang_list)
           if (count)                ptr--;
             ptr++;              else
                 still = FALSE;
             lg = 0;
             while (still &&
                    ((*ptr >= 'A' && *ptr <= 'Z') || (*ptr >= 'a' && *ptr <= 'z') || *ptr == '-'))
               {
                 /* it's a new language */
                 if (ptr > lang_list)
                   ptr--;
                 else
                   still = FALSE;
                 lg++;
               }
             if (lg >= 2)
               {
                 if (still)
                   ustrncpy (s, &ptr[1], 2);
                 else
                   ustrncpy (s, lang_list, 2);
                 count--;
                 HTLanguage_add (c, s, quality);
                 quality += 0.1;
               }
             ptr--;
         }          }
         
       TtaFreeMemory (lang_list);  
     }      }
 }  }
   
Removed from v.1.195  
changed lines
  Added in v.1.196

Webmaster