src/fl_encoding_mac_roman.cxx

   1 //
   2 // "$Id: fl_encoding_mac_roman.cxx 7903 2010-11-28 21:06:39Z matt $"
   3 //
   4 // Convert Mac Roman encoded text to the local encoding.
   5 //
   6 // Copyright 1998-2010 by Bill Spitzak and others.
   7 //
   8 // This library is free software; you can redistribute it and/or
   9 // modify it under the terms of the GNU Library General Public
  10 // License as published by the Free Software Foundation; either
  11 // version 2 of the License, or (at your option) any later version.
  12 //
  13 // This library is distributed in the hope that it will be useful,
  14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16 // Library General Public License for more details.
  17 //
  18 // You should have received a copy of the GNU Library General Public
  19 // License along with this library; if not, write to the Free Software
  20 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  21 // USA.
  22 //
  23 // Please report all bugs and problems on the following page:
  24 //
  25 //     http://www.fltk.org/str.php
  26 //
  27
  28 #include <FL/fl_draw.H>
  29 #include <FL/Enumerations.H>
  30 #include <stdlib.h>
  31 #include "flstring.h"
  32
  33 // These function assume a western code page. If you need to support
  34 // scripts that are not part of this code page, you might want to
  35 // take a look at FLTK2, which uses utf8 for text encoding.
  36 //
  37 // By keeping these conversion tables in their own module, they will not
  38 // be statically linked (by a smart linker) unless actually used.
  39 //
  40 // On Mac OS X, nothing need to be converted. We simply return the
  41 // original pointer.
  42 //
  43 // MSWindows and X11 render text in ISO or Latin-1 for western settings. The
  44 // lookup tables below will convert all common character codes and replace
  45 // unknown characters with an upsidedown question mark.
  46
  47 #ifdef __APPLE__
  48
  49 const char *fl_mac_roman_to_local(const char *t, int)
  50 {
  51   return t;
  52 }
  53
  54 const char *fl_local_to_mac_roman(const char *t, int)
  55 {
  56   return t;
  57 }
  58
  59 #else
  60
  61 // This table converts MSWindows-1252/Latin 1 into MacRoman encoding
  62 static uchar latin2roman[128] = {
  63 0xdb, 0xc0, 0xe2, 0xc4, 0xe3, 0xc9, 0xa0, 0xe0, 0xf6, 0xe4, 0xc0, 0xdc, 0xce, 0xc0, 0xc0, 0xc0,
  64 0xc0, 0xd4, 0xd5, 0xd2, 0xd3, 0xa5, 0xd0, 0xd1, 0xf7, 0xaa, 0xc0, 0xdd, 0xcf, 0xc0, 0xc0, 0xd9,
  65 0xca, 0xc1, 0xa2, 0xa3, 0xc0, 0xb4, 0xc0, 0xa4, 0xac, 0xa9, 0xbb, 0xc7, 0xc2, 0xc0, 0xa8, 0xf8,
  66 0xa1, 0xb1, 0xc0, 0xc0, 0xab, 0xb5, 0xa6, 0xe1, 0xfc, 0xc0, 0xbc, 0xc8, 0xc0, 0xc0, 0xc0, 0xc0,
  67 0xcb, 0xe7, 0xe5, 0xcc, 0x80, 0x81, 0xae, 0x82, 0xe9, 0x83, 0xe6, 0xe8, 0xed, 0xea, 0xeb, 0xec,
  68 0xc0, 0x84, 0xf1, 0xee, 0xef, 0xcd, 0x85, 0xc0, 0xaf, 0xf4, 0xf2, 0xf3, 0x86, 0xc0, 0xc0, 0xa7,
  69 0x88, 0x87, 0x89, 0x8b, 0x8a, 0x8c, 0xbe, 0x8d, 0x8f, 0x8e, 0x90, 0x91, 0x93, 0x92, 0x94, 0x95,
  70 0xc0, 0x96, 0x98, 0x97, 0x99, 0x9b, 0x9a, 0xd6, 0xbf, 0x9d, 0x9c, 0x9e, 0x9f, 0xc0, 0xc0, 0xd8
  71 };
  72
  73 // This table converts MacRoman into MSWindows-1252/Latin 1
  74 static uchar roman2latin[128] = {
  75 0xc4, 0xc5, 0xc7, 0xc9, 0xd1, 0xd6, 0xdc, 0xe1, 0xe0, 0xe2, 0xe4, 0xe3, 0xe5, 0xe7, 0xe9, 0xe8,
  76 0xea, 0xeb, 0xed, 0xec, 0xee, 0xef, 0xf1, 0xf3, 0xf2, 0xf4, 0xf6, 0xf5, 0xfa, 0xf9, 0xfb, 0xfc,
  77 0x86, 0xb0, 0xa2, 0xa3, 0xa7, 0x95, 0xb6, 0xdf, 0xae, 0xa9, 0x99, 0xb4, 0xa8, 0xbf, 0xc6, 0xd8,
  78 0xbf, 0xb1, 0xbf, 0xbf, 0xa5, 0xb5, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xaa, 0xba, 0xbf, 0xe6, 0xf8,
  79 0xbf, 0xa1, 0xac, 0xbf, 0x83, 0xbf, 0xbf, 0xab, 0xbb, 0x85, 0xa0, 0xc0, 0xc3, 0xd5, 0x8c, 0x9c,
  80 0x96, 0x97, 0x93, 0x94, 0x91, 0x92, 0xf7, 0xbf, 0xff, 0x9f, 0xbf, 0x80, 0x8b, 0x9b, 0xbf, 0xbf,
  81 0x87, 0xb7, 0x82, 0x84, 0x89, 0xc2, 0xca, 0xc1, 0xcb, 0xc8, 0xcd, 0xce, 0xcf, 0xcc, 0xd3, 0xd4,
  82 0xbf, 0xd2, 0xda, 0xdb, 0xd9, 0xbf, 0x88, 0x98, 0xaf, 0xbf, 0xbf, 0xbf, 0xb8, 0xbf, 0xbf, 0xbf
  83 };
  84
  85 static char *buf = 0;
  86 static int n_buf = 0;
  87
  88 const char *fl_local_to_mac_roman(const char *t, int n)
  89 {
  90   if (n==-1) n = strlen(t);
  91   if (n<=n_buf) {
  92     n_buf = (n + 257) & 0x7fffff00;
  93     if (buf) free(buf);
  94     buf = (char*)malloc(n_buf);
  95   }
  96   const uchar *src = (const uchar*)t;
  97   uchar *dst = (uchar*)buf;
  98   for ( ; n>0; n--) {
  99     uchar c = *src;
 100     if (c>127)
 101       *dst = latin2roman[c-128];
 102     else
 103       *dst = c;
 104   }
 105   //*dst = 0; // this would be wrong!
 106   return buf;
 107 }
 108
 109 const char *fl_mac_roman_to_local(const char *t, int n)
 110 {
 111   if (n==-1) n = strlen(t);
 112   if (n<=n_buf) {
 113     n_buf = (n + 257) & 0x7fffff00;
 114     if (buf) free(buf);
 115     buf = (char*)malloc(n_buf);
 116   }
 117   const uchar *src = (const uchar*)t;
 118   uchar *dst = (uchar*)buf;
 119   for ( ; n>0; n--) {
 120     uchar c = *src++;
 121     if (c>127)
 122       *dst++ = roman2latin[c-128];
 123     else
 124       *dst++ = c;
 125   }
 126   //*dst = 0; // this would be wrong
 127   return buf;
 128 }
 129
 130 #endif
 131
 132 //
 133 // End of "$Id: fl_encoding_mac_roman.cxx 7903 2010-11-28 21:06:39Z matt $".
 134 //