Pileus Git - ~andy/fetchmail/blob - ucs/norm_charmap.c

   1 /*
   2  * The Single Unix Specification function nl_langinfo(CODESET)
   3  * returns the name of the encoding used by the currently selected
   4  * locale:
   5  *
   6  *   http://www.opengroup.org/onlinepubs/7908799/xsh/langinfo.h.html
   7  *
   8  * Unfortunately the encoding names are not yet standardized.
   9  * This function knows about the encoding names used on many
  10  * different systems and converts them where possible into
  11  * the corresponding MIME charset name registered in
  12  *
  13  *   http://www.iana.org/assignments/character-sets
  14  *
  15  * Please extend it as needed and suggest improvements to the author.
  16  *
  17  * Markus.Kuhn@cl.cam.ac.uk -- 2002-03-11
  18  * Permission to use, copy, modify, and distribute this software
  19  * for any purpose and without fee is hereby granted. The author
  20  * disclaims all warranties with regard to this software.
  21  *
  22  * Latest version:
  23  *
  24  *   http://www.cl.cam.ac.uk/~mgk25/ucs/norm_charmap.c
  25  */
  26
  27 #include <string.h>
  28
  29 #ifdef TEST
  30 #include <stdio.h>
  31 #include <locale.h>
  32 #include <langinfo.h>
  33 #endif
  34
  35 #define digit(x) ((x) >= '0' && (x) <= '9')
  36
  37 static char buf[16];
  38
  39 char *norm_charmap(char *name)
  40 {
  41   char *p;
  42
  43   if (!name)
  44     return name;
  45
  46   /* Many need no remapping, but they are listed here so you
  47    * can see what output to expect, and modify for your needs
  48    * as necessary. */
  49   if (!strcmp(name, "UTF-8"))
  50     return "UTF-8";
  51   if (!strcmp(name, "EUC-JP"))
  52     return "EUC-JP";
  53   if (!strcmp(name, "EUC-KR"))
  54     return "EUC-KR";
  55   if (!strcmp(name, "EUC-TW"))
  56     return "EUC-TW";
  57   if (!strcmp(name, "KOI8-R"))
  58     return "KOI8-R";
  59   if (!strcmp(name, "KOI8-U"))
  60     return "KOI8-U";
  61   if (!strcmp(name, "GBK"))
  62     return "GBK";
  63   if (!strcmp(name, "GB2312"))
  64     return "GB2312";
  65   if (!strcmp(name, "GB18030"))
  66     return "GB18030";
  67   if (!strcmp(name, "VSCII"))
  68     return "VSCII";
  69
  70   /* ASCII comes in many names */
  71   if (!strcmp(name, "ASCII") ||
  72       !strcmp(name, "US-ASCII") ||
  73       !strcmp(name, "ANSI_X3.4-1968") ||
  74       !strcmp(name, "646") ||
  75       !strcmp(name, "ISO646") ||
  76       !strcmp(name, "ISO_646.IRV"))
  77     return "US-ASCII";
  78
  79   /* ISO 8859 will be converted to "ISO-8859-x" */
  80   if ((p = strstr(name, "8859-"))) {
  81     memcpy(buf, "ISO-8859-\0\0", 12);
  82     p += 5;
  83     if (digit(*p)) {
  84       buf[9] = *p++;
  85       if (digit(*p)) buf[10] = *p++;
  86       return buf;
  87     }
  88   }
  89
  90   /* Windows code pages will be converted to "WINDOWS-12xx" */
  91   if ((p = strstr(name, "CP12"))) {
  92     memcpy(buf, "WINDOWS-12\0\0", 13);
  93     p += 4;
  94     if (digit(*p)) {
  95       buf[10] = *p++;
  96       if (digit(*p)) buf[11] = *p++;
  97       return buf;
  98     }
  99   }
 100
 101   /* TIS-620 comes in at least the following two forms */
 102   if (!strcmp(name, "TIS-620") ||
 103       !strcmp(name, "TIS620.2533"))
 104     return "ISO-8859-11";
 105
 106   /* For some, uppercase/lowercase might differ */
 107   if (!strcmp(name, "Big5") || !strcmp(name, "BIG5"))
 108     return "Big5";
 109   if (!strcmp(name, "Big5HKSCS") || !strcmp(name, "BIG5HKSCS"))
 110     return "Big5HKSCS";
 111
 112   /* I don't know of any implementation of nl_langinfo(CODESET) out
 113    * there that returns anything else (and I'm not even certain all of
 114    * the above occur in the wild), but just in case, as a fallback,
 115    * return the unmodified name. */
 116 #ifdef TEST
 117   printf("**** Unknown encoding name '%s'!\n", name);
 118 #endif
 119   return name;
 120 }
 121
 122 /* For a demo, compile with
 123  *
 124  *   gcc -W -Wall -o norm_charmap -D TEST norm_charmap.c
 125  *
 126  * and then test it on all available locales with
 127  *
 128  *   for i in `locale -a` ; do printf "$i: " ; LC_ALL=$i ./norm_charmap ; done
 129  */
 130
 131 #ifdef TEST
 132 int main(int argc, char **argv)
 133 {
 134   char *s;
 135   if (argc > 1)
 136     s = argv[1];
 137   else {
 138     setlocale(LC_CTYPE, "");
 139     s = nl_langinfo(CODESET);
 140   }
 141   printf("%s -> %s\n", s, norm_charmap(s));
 142   return 0;
 143 }
 144 #endif