localedata/show-ucs-data.c

   1 #include <ctype.h>
   2 #include <stdio.h>
   3 #include <stdlib.h>
   4 #include <sys/types.h>
   5
   6 int
   7 main (int argc, char *argv[])
   8 {
   9   int n;
  10   char *line = NULL;
  11   size_t len = 0;
  12
  13   for (n = 1; n < argc; ++n)
  14     {
  15       FILE *fp = fopen (argv[n], "r");
  16       if (fp == NULL)
  17         continue;
  18
  19       while (! feof (fp))
  20         {
  21           ssize_t cnt = getline (&line, &len, fp);
  22           char *runp;
  23           if (cnt <= 0)
  24             break;
  25
  26           runp = line;
  27           do
  28             {
  29               if (runp[0] == '<' && runp[1] == 'U' && isxdigit (runp[2])
  30                   && isxdigit (runp[3]) && isxdigit (runp[4])
  31                   && isxdigit (runp[5]) && runp[6] == '>')
  32                 {
  33                   unsigned int val = strtoul (runp + 2, NULL, 16);
  34
  35                   //putchar ('<');
  36                   if (val < 128)
  37                     putchar (val);
  38                   else if (val < 0x800)
  39                     {
  40                       putchar (0xc0 | (val >> 6));
  41                       putchar (0x80 | (val & 0x3f));
  42                     }
  43                   else
  44                     {
  45                       putchar (0xe0 | (val >> 12));
  46                       putchar (0x80 | ((val >> 6) & 0x3f));
  47                       putchar (0x80 | (val & 0x3f));
  48                     }
  49                   //putchar ('>');
  50                   runp += 7;
  51                 }
  52               else
  53                 putchar (*runp++);
  54             }
  55           while (runp < &line[cnt]);
  56         }
  57
  58       fclose (fp);
  59     }
  60
  61   return 0;
  62 }