home *** CD-ROM | disk | FTP | other *** search
/ Computer Buyer 1997 January / dpcb197.iso / internet / PEGASUS / WPM-LMTT.R < prev    next >
Text File  |  1994-03-07  |  6KB  |  165 lines
  1. ##
  2. ##  PM-LMTT.R  (Local Mime Translation Table)
  3. ##  Copyright (c) 1994, David Harris, All Rights Reserved.
  4. ##
  5. ##  This file can be used as a model for a local resource which
  6. ##  maps ISO character sets to the code pages in use on the PCs
  7. ##  at your site.
  8. ##
  9. ##  Character translation tables:
  10. ##  Each translation table maps the characters in a particular
  11. ##  ISO set to your codepage's character set: the table can be used
  12. ##  bidirectionally when composing or decoding quoted-printable or
  13. ##  8BIT messages. Only characters from 128-255 are included in
  14. ##  the table, and each table must end with an ASCII NUL (0).
  15. ##
  16. ##  The sample tables in this file are the ones Pegasus Mail uses
  17. ##  by default: they map ISO character sets to the standard IBM
  18. ##  code page 437. You may define as many character sets as you
  19. ##  wish and Pegasus Mail will use them to translate incoming mail
  20. ##  but for outgoing mail it will only use ISO character sets.
  21. ##
  22. ##  The last resource in the file must be a "charset_list"
  23. ##  structure which ties the character strings naming an ISO
  24. ##  character set to the resource which maps it.
  25. ##
  26. ##  To use this file, modify it as required, then compile it with
  27. ##  the Pegasus Mail system resource compiler, RESCOM, using the
  28. ##  command 'rescom PM-LMTT.R'. This will produce the file
  29. ##  PM-LMTT.RSC, which should be copied into the same directory
  30. ##  as PMAIL.EXE, or into your home mailbox.
  31.  
  32. ##
  33. ##  The "charset_list" type is used to tie a particular name of
  34. ##  a character set to the table used to decode it.
  35. ##
  36.  
  37. typedef charset_list 25
  38.    {
  39.    repeat,
  40.    string 20,     # Character set name
  41.    integer        # resource ID of table to load.
  42.    };
  43.  
  44. ###  ISO-8859-1 is the only character set specifically defined
  45. ###  in RFC1341 (MIME) - the vast majority of messages will use
  46. ###  this character set for MIME encoding. It is the native
  47. ###  character set of Windows (where it is referred to as the
  48. ###  "ANSI" character set).
  49.  
  50. structure iso8859_1
  51.    {
  52.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  53.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  54.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  55.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  56.    ' ', '¡', '¢', '£', ' ', '¥', ' ', ' ', 
  57.    ' ', ' ', 'ª', '«', '¬', ' ', ' ', ' ', 
  58.    ' ', '±', '²', ' ', ' ', ' ', ' ', '∙', 
  59.    ' ', ' ', 'º', '»', '¼', '½', ' ', '¿', 
  60.    ' ', ' ', ' ', ' ', 'Ä', 'Å', 'Æ', 'Ç', 
  61.    ' ', 'É', ' ', ' ', ' ', ' ', ' ', ' ', 
  62.    ' ', 'Ñ', ' ', ' ', ' ', ' ', 'Ö', ' ', 
  63.    ' ', ' ', ' ', ' ', 'Ü', ' ', ' ', 'ß', 
  64.    'à', 'á', 'â', ' ', 'ä', 'å', 'æ', 'ç', 
  65.    'è', 'é', 'ê', 'ë', 'ì', 'í', 'î', 'ï', 
  66.    ' ', 'ñ', 'ò', 'ó', 'ô', ' ', 'ö', '÷', 
  67.    ' ', 'ù', 'ú', 'û', 'ü', ' ', ' ', 'ÿ',
  68.    0
  69.    };
  70.  
  71. structure iso8859_2
  72.    {
  73.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  74.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  75.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  76.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  77.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  78.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  79.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  80.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  81.    ' ', ' ', ' ', ' ', 'Ä', ' ', ' ', 'Ç', 
  82.    ' ', 'É', ' ', ' ', ' ', ' ', ' ', ' ', 
  83.    ' ', ' ', ' ', ' ', ' ', ' ', 'Ö', ' ', 
  84.    ' ', ' ', ' ', ' ', 'Ü', ' ', ' ', ' ', 
  85.    ' ', 'á', 'â', ' ', 'ä', ' ', ' ', 'ç', 
  86.    ' ', 'é', ' ', 'ë', ' ', 'í', 'î', ' ', 
  87.    ' ', ' ', ' ', 'ó', 'ô', ' ', 'ö', '÷', 
  88.    ' ', ' ', 'ú', ' ', 'ü', ' ', ' ', ' ',
  89.    0
  90.    };
  91.  
  92. structure iso8859_3
  93.    {
  94.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  95.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  96.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  97.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  98.    ' ', ' ', ' ', '£', ' ', ' ', ' ', ' ', 
  99.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  100.    ' ', ' ', '²', ' ', ' ', ' ', ' ', '∙', 
  101.    ' ', ' ', ' ', ' ', ' ', '½', ' ', ' ', 
  102.    ' ', ' ', ' ', ' ', 'Ä', ' ', ' ', 'Ç', 
  103.    ' ', 'É', ' ', ' ', ' ', ' ', ' ', ' ', 
  104.    ' ', 'Ñ', ' ', ' ', ' ', ' ', 'Ö', ' ', 
  105.    ' ', ' ', ' ', ' ', 'Ü', ' ', ' ', ' ', 
  106.    'à', 'á', 'â', ' ', 'ä', ' ', ' ', 'ç', 
  107.    'è', 'é', 'ê', 'ë', 'ì', 'í', 'î', 'ï', 
  108.    ' ', 'ñ', 'ò', 'ó', 'ô', ' ', 'ö', '÷', 
  109.    ' ', 'ù', 'ú', 'û', 'ü', ' ', ' ', ' ',
  110.    0
  111.    };
  112.  
  113. structure iso8859_7
  114.    {
  115.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  116.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  117.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  118.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  119.    ' ', ' ', ' ', '£', ' ', ' ', ' ', ' ', 
  120.    ' ', ' ', ' ', '«', '¬', ' ', ' ', ' ', 
  121.    ' ', '±', '²', ' ', ' ', ' ', ' ', '∙', 
  122.    ' ', ' ', ' ', '»', ' ', '½', ' ', ' ', 
  123.    ' ', ' ', ' ', 'Γ', ' ', ' ', ' ', ' ', 
  124.    'Θ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  125.    ' ', ' ', ' ', 'Σ', ' ', ' ', 'Φ', ' ', 
  126.    ' ', 'Ω', ' ', ' ', ' ', ' ', ' ', ' ', 
  127.    ' ', 'α', 'ß', ' ', 'δ', 'ε', ' ', ' ', 
  128.    ' ', ' ', ' ', ' ', 'µ', ' ', ' ', ' ', 
  129.    'π', ' ', ' ', 'σ', 'τ', ' ', ' ', ' ', 
  130.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
  131.    0
  132.    };
  133.  
  134. structure iso8859_9
  135.    {
  136.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  137.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  138.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  139.    ' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ', 
  140.    ' ', '¡', '¢', '£', ' ', '¥', ' ', ' ', 
  141.    ' ', ' ', 'ª', '«', '¬', ' ', ' ', ' ', 
  142.    ' ', '±', '²', ' ', ' ', ' ', ' ', '∙', 
  143.    ' ', ' ', 'º', '»', '¼', '½', ' ', '¿', 
  144.    ' ', ' ', ' ', ' ', 'Ä', 'Å', 'Æ', 'Ç', 
  145.    ' ', 'É', ' ', ' ', ' ', ' ', ' ', ' ', 
  146.    ' ', 'Ñ', ' ', ' ', ' ', ' ', 'Ö', ' ', 
  147.    ' ', ' ', ' ', ' ', 'Ü', ' ', ' ', ' ', 
  148.    'à', 'á', 'â', ' ', 'ä', 'å', 'æ', 'ç', 
  149.    'è', 'é', ' ', 'ë', ' ', 'í', 'î', ' ', 
  150.    ' ', 'ñ', 'ò', 'ó', 'ô', ' ', 'ö', '÷', 
  151.    ' ', 'ù', 'ú', 'û', 'ü', ' ', ' ', 'ÿ',
  152.    0
  153.    };
  154.  
  155. charset_list _mime_csets
  156.    {
  157.    "ISO-8859-1", iso8859_1,
  158.    "ISO-8859-2", iso8859_2,
  159.    "ISO-8859-3", iso8859_3,
  160.    "ISO-8859-7", iso8859_7,
  161.    "ISO-8859-9", iso8859_9,
  162.    "", -1
  163.    };
  164.  
  165.