rom/filesys/fat/charset.c

   1 #include <dos/dosextens.h>
   2 #include <dos/dostags.h>
   3 #include <proto/dos.h>
   4 #include <proto/exec.h>
   5 #include <ctype.h>
   6 #include <stdlib.h>
   7 #include <string.h>
   8
   9 #include "fat_fs.h"
  10 #include "charset.h"
  11
  12 static ULONG readLine(BPTR fh, char *buf, ULONG size)
  13 {
  14   char *c;
  15
  16   if((c = FGets(fh, buf, size)) == NULL)
  17     return FALSE;
  18
  19   for(; *c; c++)
  20   {
  21     if(*c == '\n' || *c == '\r')
  22     {
  23       *c = '\0';
  24       break;
  25     }
  26   }
  27
  28   return TRUE;
  29 }
  30
  31 void InitCharsetTables(void)
  32 {
  33         int i;
  34
  35         for (i = 0; i < 65536; i++)
  36         if (i < 256) {
  37                 glob->from_unicode[i] = i;
  38                 glob->to_unicode[i] = i;
  39         } else
  40                 glob->from_unicode[i] = '_';
  41 }
  42
  43 // Reads a coding table
  44 BOOL ReadUnicodeTable(STRPTR name)
  45 {
  46   BPTR fh;
  47
  48   fh = Open(name, MODE_OLDFILE);
  49   if (fh)
  50   {
  51       int i, n;
  52       char buf[512];
  53
  54       while(readLine(fh, buf, 512*sizeof(char)))
  55       {
  56         if(!isdigit(*buf))
  57           continue;
  58         else
  59         {
  60           char *p = buf;
  61           int fmt2 = 0;
  62
  63           if((*p=='=') || (fmt2 = ((*p=='0') || (*(p+1)=='x'))))
  64           {
  65             p++;
  66             p += fmt2;
  67
  68             i = strtol((const char *)p,(char **)&p,16);
  69             if(i>=0 && i<256)
  70             {
  71               while(isspace(*p)) p++;
  72
  73               if(!strnicmp(p, "U+", 2))
  74               {
  75                 p += 2;
  76                 n = strtol((const char *)p,(char **)&p,16);
  77               }
  78               else
  79               {
  80                 if(*p!='#')
  81                   n = strtol((const char *)p,(char **)&p,0);
  82                 else
  83                   n = -1;
  84               }
  85               if (n >= 0 && n < 65536) {
  86                 glob->from_unicode[n] = i;
  87                 glob->to_unicode[i] = n;
  88               }
  89             }
  90           }
  91         }
  92       }
  93       Close(fh);
  94   }
  95   return fh ? TRUE : FALSE;
  96 }
  97