1682 lines
69 KiB
C
1682 lines
69 KiB
C
|
/* $XTermId: charsets.c,v 1.107 2020/01/18 18:51:57 tom Exp $ */
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
* Copyright 1998-2019,2020 by Thomas E. Dickey
|
|||
|
|
*
|
|||
|
|
* All Rights Reserved
|
|||
|
|
*
|
|||
|
|
* Permission is hereby granted, free of charge, to any person obtaining a
|
|||
|
|
* copy of this software and associated documentation files (the
|
|||
|
|
* "Software"), to deal in the Software without restriction, including
|
|||
|
|
* without limitation the rights to use, copy, modify, merge, publish,
|
|||
|
|
* distribute, sublicense, and/or sell copies of the Software, and to
|
|||
|
|
* permit persons to whom the Software is furnished to do so, subject to
|
|||
|
|
* the following conditions:
|
|||
|
|
*
|
|||
|
|
* The above copyright notice and this permission notice shall be included
|
|||
|
|
* in all copies or substantial portions of the Software.
|
|||
|
|
*
|
|||
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
|
|||
|
|
* OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|||
|
|
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
|
|||
|
|
* IN NO EVENT SHALL THE ABOVE LISTED COPYRIGHT HOLDER(S) BE LIABLE FOR ANY
|
|||
|
|
* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
|
|||
|
|
* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
|
|||
|
|
* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|||
|
|
*
|
|||
|
|
* Except as contained in this notice, the name(s) of the above copyright
|
|||
|
|
* holders shall not be used in advertising or otherwise to promote the
|
|||
|
|
* sale, use or other dealings in this Software without prior written
|
|||
|
|
* authorization.
|
|||
|
|
*
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
#include <xterm.h>
|
|||
|
|
#include <data.h>
|
|||
|
|
#include <fontutils.h>
|
|||
|
|
|
|||
|
|
#include <X11/keysym.h>
|
|||
|
|
|
|||
|
|
#define BLANK ' '
|
|||
|
|
#define UNDEF 0x2e2e /* rendered as a backwards "?" (alt: 0x2426) */
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
* This module performs translation as needed to support the DEC VT220 national
|
|||
|
|
* replacement character sets as well as supplementary character sets (aka
|
|||
|
|
* code-pages) introduced in VT320, etc.
|
|||
|
|
*
|
|||
|
|
* We assume that xterm's font is based on the ISO 8859-1 (Latin 1) character
|
|||
|
|
* set, which is almost the same as the DEC multinational character set. Glyph
|
|||
|
|
* positions 0-31 have to be the DEC graphic characters, though.
|
|||
|
|
*
|
|||
|
|
* References:
|
|||
|
|
* "VT220 Programmer Pocket Guide" EK-VT220-HR-002 (2nd ed., 1984), which
|
|||
|
|
* contains character charts for the national character sets.
|
|||
|
|
* "VT330/VT340 Programmer Reference Manual Volume 1: Text Programming"
|
|||
|
|
* EK-VT3XX-TP-001 (1st ed, 1987), which contains a table (2-1)
|
|||
|
|
* listing the glyphs which are mapped from the multinational
|
|||
|
|
* character set to the national character set.
|
|||
|
|
*
|
|||
|
|
* The latter reference, though easier to read, has a few errors and omissions.
|
|||
|
|
*
|
|||
|
|
* According to
|
|||
|
|
* Digital ANSI-Compliant Printing Protocol
|
|||
|
|
* Level 2 Programming Reference Manual
|
|||
|
|
* EK–PPLV2–PM. B01
|
|||
|
|
*
|
|||
|
|
* the supplementary character sets Greek, Hebrew, Latin-5 and Latin/Cyrillic
|
|||
|
|
* are standardized by ISO:
|
|||
|
|
* ISO Greek is 8859-7
|
|||
|
|
* ISO Hebrew is 8859-8
|
|||
|
|
* ISO Latin-5 is 8859-9
|
|||
|
|
* ISO Latin/Cyrillic is 8859-5
|
|||
|
|
*
|
|||
|
|
* These are derived from the data at
|
|||
|
|
* ftp://www.unicode.org/Public/MAPPINGS/ISO8859/
|
|||
|
|
*
|
|||
|
|
* Note: the "figure A-xx" comments refer to EK–PPLV2–PM.
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
* A "codepage" is treated different from the NRC mode: it is always enabled.
|
|||
|
|
* Reuse the UNI() macros by temporarily setting its state.
|
|||
|
|
*/
|
|||
|
|
#if OPT_WIDE_CHARS
|
|||
|
|
#define begin_CODEPAGE() \
|
|||
|
|
if (!(xw->flags & NATIONAL)) { \
|
|||
|
|
screen->utf8_nrc_mode++; \
|
|||
|
|
}
|
|||
|
|
#define end_CODEPAGE() \
|
|||
|
|
if (!(xw->flags & NATIONAL)) { \
|
|||
|
|
screen->utf8_nrc_mode--; \
|
|||
|
|
}
|
|||
|
|
#else
|
|||
|
|
#define begin_CODEPAGE() /* nothing */
|
|||
|
|
#define end_CODEPAGE() /* nothing */
|
|||
|
|
#endif
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
* xterm's original implementation of NRCS in 1998 was before Unicode became
|
|||
|
|
* prevalent. Most of the necessary mappings could be done using definitions
|
|||
|
|
* from X11/keysymdef.h
|
|||
|
|
*/
|
|||
|
|
#define map_NRCS_Dutch(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x23, XK_sterling); \
|
|||
|
|
MAP(0x40, XK_threequarters); \
|
|||
|
|
UNI(0x5b, 0x0133); /* ij ligature */ \
|
|||
|
|
MAP(0x5c, XK_onehalf); \
|
|||
|
|
MAP(0x5d, XK_bar); \
|
|||
|
|
MAP(0x7b, XK_diaeresis); \
|
|||
|
|
UNI(0x7c, 0x0192); /* florin */ \
|
|||
|
|
MAP(0x7d, XK_onequarter); \
|
|||
|
|
MAP(0x7e, XK_acute); \
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
#define map_NRCS_Finnish(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x5b, XK_Adiaeresis); \
|
|||
|
|
MAP(0x5c, XK_Odiaeresis); \
|
|||
|
|
MAP(0x5d, XK_Aring); \
|
|||
|
|
MAP(0x5e, XK_Udiaeresis); \
|
|||
|
|
MAP(0x60, XK_eacute); \
|
|||
|
|
MAP(0x7b, XK_adiaeresis); \
|
|||
|
|
MAP(0x7c, XK_odiaeresis); \
|
|||
|
|
MAP(0x7d, XK_aring); \
|
|||
|
|
MAP(0x7e, XK_udiaeresis); \
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
#define map_NRCS_French(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x23, XK_sterling); \
|
|||
|
|
MAP(0x40, XK_agrave); \
|
|||
|
|
MAP(0x5b, XK_degree); \
|
|||
|
|
MAP(0x5c, XK_ccedilla); \
|
|||
|
|
MAP(0x5d, XK_section); \
|
|||
|
|
MAP(0x7b, XK_eacute); \
|
|||
|
|
MAP(0x7c, XK_ugrave); \
|
|||
|
|
MAP(0x7d, XK_egrave); \
|
|||
|
|
MAP(0x7e, XK_diaeresis); \
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
#define map_NRCS_French_Canadian(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x40, XK_agrave); \
|
|||
|
|
MAP(0x5b, XK_acircumflex); \
|
|||
|
|
MAP(0x5c, XK_ccedilla); \
|
|||
|
|
MAP(0x5d, XK_ecircumflex); \
|
|||
|
|
MAP(0x5e, XK_icircumflex); \
|
|||
|
|
MAP(0x60, XK_ocircumflex); \
|
|||
|
|
MAP(0x7b, XK_eacute); \
|
|||
|
|
MAP(0x7c, XK_ugrave); \
|
|||
|
|
MAP(0x7d, XK_egrave); \
|
|||
|
|
MAP(0x7e, XK_ucircumflex); \
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
#define map_NRCS_German(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x40, XK_section); \
|
|||
|
|
MAP(0x5b, XK_Adiaeresis); \
|
|||
|
|
MAP(0x5c, XK_Odiaeresis); \
|
|||
|
|
MAP(0x5d, XK_Udiaeresis); \
|
|||
|
|
MAP(0x7b, XK_adiaeresis); \
|
|||
|
|
MAP(0x7c, XK_odiaeresis); \
|
|||
|
|
MAP(0x7d, XK_udiaeresis); \
|
|||
|
|
MAP(0x7e, XK_ssharp); \
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
#define map_NRCS_Italian(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x23, XK_sterling); \
|
|||
|
|
MAP(0x40, XK_section); \
|
|||
|
|
MAP(0x5b, XK_degree); \
|
|||
|
|
MAP(0x5c, XK_ccedilla); \
|
|||
|
|
MAP(0x5d, XK_eacute); \
|
|||
|
|
MAP(0x60, XK_ugrave); \
|
|||
|
|
MAP(0x7b, XK_agrave); \
|
|||
|
|
MAP(0x7c, XK_ograve); \
|
|||
|
|
MAP(0x7d, XK_egrave); \
|
|||
|
|
MAP(0x7e, XK_igrave); \
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
#define map_NRCS_Norwegian_Danish(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x40, XK_Adiaeresis); \
|
|||
|
|
MAP(0x5b, XK_AE); \
|
|||
|
|
MAP(0x5c, XK_Ooblique); \
|
|||
|
|
MAP(0x5d, XK_Aring); \
|
|||
|
|
MAP(0x5e, XK_Udiaeresis); \
|
|||
|
|
MAP(0x60, XK_adiaeresis); \
|
|||
|
|
MAP(0x7b, XK_ae); \
|
|||
|
|
MAP(0x7c, XK_oslash); \
|
|||
|
|
MAP(0x7d, XK_aring); \
|
|||
|
|
MAP(0x7e, XK_udiaeresis); \
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
#define map_NRCS_Portuguese(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x5b, XK_Atilde); \
|
|||
|
|
MAP(0x5c, XK_Ccedilla); \
|
|||
|
|
MAP(0x5d, XK_Otilde); \
|
|||
|
|
MAP(0x7b, XK_atilde); \
|
|||
|
|
MAP(0x7c, XK_ccedilla); \
|
|||
|
|
MAP(0x7d, XK_otilde); \
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
#define map_NRCS_Spanish(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x23, XK_sterling); \
|
|||
|
|
MAP(0x40, XK_section); \
|
|||
|
|
MAP(0x5b, XK_exclamdown); \
|
|||
|
|
MAP(0x5c, XK_Ntilde); \
|
|||
|
|
MAP(0x5d, XK_questiondown); \
|
|||
|
|
MAP(0x7b, XK_degree); \
|
|||
|
|
MAP(0x7c, XK_ntilde); \
|
|||
|
|
MAP(0x7d, XK_ccedilla); \
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
#define map_NRCS_Swedish(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x40, XK_Eacute); \
|
|||
|
|
MAP(0x5b, XK_Adiaeresis); \
|
|||
|
|
MAP(0x5c, XK_Odiaeresis); \
|
|||
|
|
MAP(0x5d, XK_Aring); \
|
|||
|
|
MAP(0x5e, XK_Udiaeresis); \
|
|||
|
|
MAP(0x60, XK_eacute); \
|
|||
|
|
MAP(0x7b, XK_adiaeresis); \
|
|||
|
|
MAP(0x7c, XK_odiaeresis); \
|
|||
|
|
MAP(0x7d, XK_aring); \
|
|||
|
|
MAP(0x7e, XK_udiaeresis); \
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
#define map_NRCS_Swiss(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x23, XK_ugrave); \
|
|||
|
|
MAP(0x40, XK_agrave); \
|
|||
|
|
MAP(0x5b, XK_eacute); \
|
|||
|
|
MAP(0x5c, XK_ccedilla); \
|
|||
|
|
MAP(0x5d, XK_ecircumflex); \
|
|||
|
|
MAP(0x5e, XK_icircumflex); \
|
|||
|
|
MAP(0x5f, XK_egrave); \
|
|||
|
|
MAP(0x60, XK_ocircumflex); \
|
|||
|
|
MAP(0x7b, XK_adiaeresis); \
|
|||
|
|
MAP(0x7c, XK_odiaeresis); \
|
|||
|
|
MAP(0x7d, XK_udiaeresis); \
|
|||
|
|
MAP(0x7e, XK_ucircumflex); \
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
* Unlike NRCS, which splices a few characters onto ASCII, the supplementary
|
|||
|
|
* character sets are complete, normally mapped to GR. Most of these mappings
|
|||
|
|
* rely upon glyphs not found in ISO-8859-1. We can display most of those
|
|||
|
|
* using Unicode, thereby supporting specialized applications that use SCS
|
|||
|
|
* with luit, subject to the limitation that select/paste will give meaningless
|
|||
|
|
* results in terms of the application which uses these mappings.
|
|||
|
|
*
|
|||
|
|
* Since the codepages introduced with VT320, etc, use 8-bit encodings, there
|
|||
|
|
* is no plausible argument to be made that these mappings "use" UTF-8, even
|
|||
|
|
* though there is a hidden step in the terminal emulator which relies upon
|
|||
|
|
* UTF-8.
|
|||
|
|
*/
|
|||
|
|
#define map_DEC_Supp_Graphic(code,dft) \
|
|||
|
|
begin_CODEPAGE(); \
|
|||
|
|
switch (code) { \
|
|||
|
|
XXX(0x24, UNDEF); \
|
|||
|
|
XXX(0x26, UNDEF); \
|
|||
|
|
MAP(0x28, 0xa4); \
|
|||
|
|
XXX(0x2c, UNDEF); \
|
|||
|
|
XXX(0x2d, UNDEF); \
|
|||
|
|
XXX(0x2e, UNDEF); \
|
|||
|
|
XXX(0x2f, UNDEF); \
|
|||
|
|
XXX(0x34, UNDEF); \
|
|||
|
|
XXX(0x38, UNDEF); \
|
|||
|
|
XXX(0x3e, UNDEF); \
|
|||
|
|
XXX(0x50, UNDEF); \
|
|||
|
|
UNI(0x57, 0x0152); \
|
|||
|
|
MAP(0x5d, 0x0178); \
|
|||
|
|
XXX(0x5e, UNDEF); \
|
|||
|
|
XXX(0x70, UNDEF); \
|
|||
|
|
UNI(0x77, 0x0153); \
|
|||
|
|
MAP(0x7d, 0xff); \
|
|||
|
|
XXX(0x7e, UNDEF); \
|
|||
|
|
XXX(0x7f, UNDEF); \
|
|||
|
|
default: dft; break; \
|
|||
|
|
} \
|
|||
|
|
end_CODEPAGE()
|
|||
|
|
|
|||
|
|
#if OPT_WIDE_CHARS
|
|||
|
|
/* derived from http://www.vt100.net/charsets/technical.html */
|
|||
|
|
#define map_DEC_Technical(code) \
|
|||
|
|
begin_CODEPAGE(); \
|
|||
|
|
switch (code) { \
|
|||
|
|
UNI(0x21, 0x23b7); /* RADICAL SYMBOL BOTTOM Centred left to right, so that it joins up with 02/02 */ \
|
|||
|
|
UNI(0x22, 0x250c); /* BOX DRAWINGS LIGHT DOWN AND RIGHT */ \
|
|||
|
|
UNI(0x23, 0x2500); /* BOX DRAWINGS LIGHT HORIZONTAL */ \
|
|||
|
|
UNI(0x24, 0x2320); /* TOP HALF INTEGRAL with the proviso that the stem is vertical, to join with 02/06 */ \
|
|||
|
|
UNI(0x25, 0x2321); /* BOTTOM HALF INTEGRAL with the proviso above. */ \
|
|||
|
|
UNI(0x26, 0x2502); /* BOX DRAWINGS LIGHT VERTICAL */ \
|
|||
|
|
UNI(0x27, 0x23a1); /* LEFT SQUARE BRACKET UPPER CORNER Joins vertically to 02/06, 02/08. Doesn't join to its right. */ \
|
|||
|
|
UNI(0x28, 0x23a3); /* LEFT SQUARE BRACKET LOWER CORNER Joins vertically to 02/06, 02/07. Doesn't join to its right. */ \
|
|||
|
|
UNI(0x29, 0x23a4); /* RIGHT SQUARE BRACKET UPPER CORNER Joins vertically to 026, 02a. Doesn't join to its left. */ \
|
|||
|
|
UNI(0x2a, 0x23a6); /* RIGHT SQUARE BRACKET LOWER CORNER Joins vertically to 026, 029. Doesn't join to its left. */ \
|
|||
|
|
UNI(0x2b, 0x23a7); /* LEFT CURLY BRACKET UPPER HOOK Joins vertically to 026, 02c, 02/15. Doesn't join to its right. */ \
|
|||
|
|
UNI(0x2c, 0x23a9); /* LEFT CURLY BRACKET LOWER HOOK Joins vertically to 026, 02b, 02/15. Doesn't join to its right. */ \
|
|||
|
|
UNI(0x2d, 0x23ab); /* RIGHT CURLY BRACKET UPPER HOOK Joins vertically to 026, 02e, 03/00. Doesn't join to its left. */ \
|
|||
|
|
UNI(0x2e, 0x23ad); /* RIGHT CURLY BRACKET LOWER HOOK Joins vertically to 026, 02d, 03/00. Doesn't join to its left. */ \
|
|||
|
|
UNI(0x2f, 0x23a8); /* LEFT CURLY BRACKET MIDDLE PIECE Joins vertically to 026, 02b, 02c. */ \
|
|||
|
|
UNI(0x30, 0x23ac); /* RIGHT CURLY BRACKET MIDDLE PIECE Joins vertically to 02/06, 02d, 02e. */ \
|
|||
|
|
XXX(0x31, UNDEF); /* Top Left Sigma. Joins to right with 02/03, 03/05. Joins diagonally below right with 03/03, 03/07. */ \
|
|||
|
|
XXX(0x32, UNDEF); /* Bottom Left Sigma. Joins to right with 02/03, 03/06. Joins diagonally above right with 03/04, 03/07. */ \
|
|||
|
|
XXX(0x33, UNDEF); /* Top Diagonal Sigma. Line for joining 03/01 to 03/04 or 03/07. */ \
|
|||
|
|
XXX(0x34, UNDEF); /* Bottom Diagonal Sigma. Line for joining 03/02 to 03/03 or 03/07. */ \
|
|||
|
|
XXX(0x35, UNDEF); /* Top Right Sigma. Joins to left with 02/03, 03/01. */ \
|
|||
|
|
XXX(0x36, UNDEF); /* Bottom Right Sigma. Joins to left with 02/03, 03/02. */ \
|
|||
|
|
XXX(0x37, UNDEF); /* Middle Sigma. Joins diagonally with 03/01, 03/02, 03/03, 03/04. */ \
|
|||
|
|
XXX(0x38, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x39, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x3a, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x3b, UNDEF); /* undefined */ \
|
|||
|
|
UNI(0x3c, 0x2264); /* LESS-THAN OR EQUAL TO */ \
|
|||
|
|
UNI(0x3d, 0x2260); /* NOT EQUAL TO */ \
|
|||
|
|
UNI(0x3e, 0x2265); /* GREATER-THAN OR EQUAL TO */ \
|
|||
|
|
UNI(0x3f, 0x222B); /* INTEGRAL */ \
|
|||
|
|
UNI(0x40, 0x2234); /* THEREFORE */ \
|
|||
|
|
UNI(0x41, 0x221d); /* PROPORTIONAL TO */ \
|
|||
|
|
UNI(0x42, 0x221e); /* INFINITY */ \
|
|||
|
|
UNI(0x43, 0x00f7); /* DIVISION SIGN */ \
|
|||
|
|
UNI(0x44, 0x0394); /* GREEK CAPITAL DELTA */ \
|
|||
|
|
UNI(0x45, 0x2207); /* NABLA */ \
|
|||
|
|
UNI(0x46, 0x03a6); /* GREEK CAPITAL LETTER PHI */ \
|
|||
|
|
UNI(0x47, 0x0393); /* GREEK CAPITAL LETTER GAMMA */ \
|
|||
|
|
UNI(0x48, 0x223c); /* TILDE OPERATOR */ \
|
|||
|
|
UNI(0x49, 0x2243); /* ASYMPTOTICALLY EQUAL TO */ \
|
|||
|
|
UNI(0x4a, 0x0398); /* GREEK CAPITAL LETTER THETA */ \
|
|||
|
|
UNI(0x4b, 0x00d7); /* MULTIPLICATION SIGN */ \
|
|||
|
|
UNI(0x4c, 0x039b); /* GREEK CAPITAL LETTER LAMDA */ \
|
|||
|
|
UNI(0x4d, 0x21d4); /* LEFT RIGHT DOUBLE ARROW */ \
|
|||
|
|
UNI(0x4e, 0x21d2); /* RIGHTWARDS DOUBLE ARROW */ \
|
|||
|
|
UNI(0x4f, 0x2261); /* IDENTICAL TO */ \
|
|||
|
|
UNI(0x50, 0x03a0); /* GREEK CAPITAL LETTER PI */ \
|
|||
|
|
UNI(0x51, 0x03a8); /* GREEK CAPITAL LETTER PSI */ \
|
|||
|
|
UNI(0x52, UNDEF); /* undefined */ \
|
|||
|
|
UNI(0x53, 0x03a3); /* GREEK CAPITAL LETTER SIGMA */ \
|
|||
|
|
XXX(0x54, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x55, UNDEF); /* undefined */ \
|
|||
|
|
UNI(0x56, 0x221a); /* SQUARE ROOT */ \
|
|||
|
|
UNI(0x57, 0x03a9); /* GREEK CAPITAL LETTER OMEGA */ \
|
|||
|
|
UNI(0x58, 0x039e); /* GREEK CAPITAL LETTER XI */ \
|
|||
|
|
UNI(0x59, 0x03a5); /* GREEK CAPITAL LETTER UPSILON */ \
|
|||
|
|
UNI(0x5a, 0x2282); /* SUBSET OF */ \
|
|||
|
|
UNI(0x5b, 0x2283); /* SUPERSET OF */ \
|
|||
|
|
UNI(0x5c, 0x2229); /* INTERSECTION */ \
|
|||
|
|
UNI(0x5d, 0x222a); /* UNION */ \
|
|||
|
|
UNI(0x5e, 0x2227); /* LOGICAL AND */ \
|
|||
|
|
UNI(0x5f, 0x2228); /* LOGICAL OR */ \
|
|||
|
|
UNI(0x60, 0x00ac); /* NOT SIGN */ \
|
|||
|
|
UNI(0x61, 0x03b1); /* GREEK SMALL LETTER ALPHA */ \
|
|||
|
|
UNI(0x62, 0x03b2); /* GREEK SMALL LETTER BETA */ \
|
|||
|
|
UNI(0x63, 0x03c7); /* GREEK SMALL LETTER CHI */ \
|
|||
|
|
UNI(0x64, 0x03b4); /* GREEK SMALL LETTER DELTA */ \
|
|||
|
|
UNI(0x65, 0x03b5); /* GREEK SMALL LETTER EPSILON */ \
|
|||
|
|
UNI(0x66, 0x03c6); /* GREEK SMALL LETTER PHI */ \
|
|||
|
|
UNI(0x67, 0x03b3); /* GREEK SMALL LETTER GAMMA */ \
|
|||
|
|
UNI(0x68, 0x03b7); /* GREEK SMALL LETTER ETA */ \
|
|||
|
|
UNI(0x69, 0x03b9); /* GREEK SMALL LETTER IOTA */ \
|
|||
|
|
UNI(0x6a, 0x03b8); /* GREEK SMALL LETTER THETA */ \
|
|||
|
|
UNI(0x6b, 0x03ba); /* GREEK SMALL LETTER KAPPA */ \
|
|||
|
|
UNI(0x6c, 0x03bb); /* GREEK SMALL LETTER LAMDA */ \
|
|||
|
|
XXX(0x6d, UNDEF); /* undefined */ \
|
|||
|
|
UNI(0x6e, 0x03bd); /* GREEK SMALL LETTER NU */ \
|
|||
|
|
UNI(0x6f, 0x2202); /* PARTIAL DIFFERENTIAL */ \
|
|||
|
|
UNI(0x70, 0x03c0); /* GREEK SMALL LETTER PI */ \
|
|||
|
|
UNI(0x71, 0x03c8); /* GREEK SMALL LETTER PSI */ \
|
|||
|
|
UNI(0x72, 0x03c1); /* GREEK SMALL LETTER RHO */ \
|
|||
|
|
UNI(0x73, 0x03c3); /* GREEK SMALL LETTER SIGMA */ \
|
|||
|
|
UNI(0x74, 0x03c4); /* GREEK SMALL LETTER TAU */ \
|
|||
|
|
XXX(0x75, UNDEF); /* undefined */ \
|
|||
|
|
UNI(0x76, 0x0192); /* LATIN SMALL LETTER F WITH HOOK Probably chosen for its meaning of "function" */ \
|
|||
|
|
UNI(0x77, 0x03c9); /* GREEK SMALL LETTER OMEGA */ \
|
|||
|
|
UNI(0x78, 0x03bE); /* GREEK SMALL LETTER XI */ \
|
|||
|
|
UNI(0x79, 0x03c5); /* GREEK SMALL LETTER UPSILON */ \
|
|||
|
|
UNI(0x7a, 0x03b6); /* GREEK SMALL LETTER ZETA */ \
|
|||
|
|
UNI(0x7b, 0x2190); /* LEFTWARDS ARROW */ \
|
|||
|
|
UNI(0x7c, 0x2191); /* UPWARDS ARROW */ \
|
|||
|
|
UNI(0x7d, 0x2192); /* RIGHTWARDS ARROW */ \
|
|||
|
|
UNI(0x7e, 0x2193); /* DOWNWARDS ARROW */ \
|
|||
|
|
} \
|
|||
|
|
end_CODEPAGE()
|
|||
|
|
/* ISO Latin/Cyrillic is 8859-5 */
|
|||
|
|
#define map_ISO_Latin_Cyrillic(code) \
|
|||
|
|
begin_CODEPAGE(); \
|
|||
|
|
switch (code) { \
|
|||
|
|
UNI(0x20, 0x00a0); /* NO-BREAK SPACE */ \
|
|||
|
|
UNI(0x21, 0x0401); /* CYRILLIC CAPITAL LETTER IO */ \
|
|||
|
|
UNI(0x22, 0x0402); /* CYRILLIC CAPITAL LETTER DJE */ \
|
|||
|
|
UNI(0x23, 0x0403); /* CYRILLIC CAPITAL LETTER GJE */ \
|
|||
|
|
UNI(0x24, 0x0404); /* CYRILLIC CAPITAL LETTER UKRAINIAN IE */ \
|
|||
|
|
UNI(0x25, 0x0405); /* CYRILLIC CAPITAL LETTER DZE */ \
|
|||
|
|
UNI(0x26, 0x0406); /* CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I */ \
|
|||
|
|
UNI(0x27, 0x0407); /* CYRILLIC CAPITAL LETTER YI */ \
|
|||
|
|
UNI(0x28, 0x0408); /* CYRILLIC CAPITAL LETTER JE */ \
|
|||
|
|
UNI(0x29, 0x0409); /* CYRILLIC CAPITAL LETTER LJE */ \
|
|||
|
|
UNI(0x2a, 0x040a); /* CYRILLIC CAPITAL LETTER NJE */ \
|
|||
|
|
UNI(0x2b, 0x040b); /* CYRILLIC CAPITAL LETTER TSHE */ \
|
|||
|
|
UNI(0x2c, 0x040c); /* CYRILLIC CAPITAL LETTER KJE */ \
|
|||
|
|
UNI(0x2d, 0x00ad); /* SOFT HYPHEN */ \
|
|||
|
|
UNI(0x2e, 0x040e); /* CYRILLIC CAPITAL LETTER SHORT U */ \
|
|||
|
|
UNI(0x2f, 0x040f); /* CYRILLIC CAPITAL LETTER DZHE */ \
|
|||
|
|
UNI(0x30, 0x0410); /* CYRILLIC CAPITAL LETTER A */ \
|
|||
|
|
UNI(0x31, 0x0411); /* CYRILLIC CAPITAL LETTER BE */ \
|
|||
|
|
UNI(0x32, 0x0412); /* CYRILLIC CAPITAL LETTER VE */ \
|
|||
|
|
UNI(0x33, 0x0413); /* CYRILLIC CAPITAL LETTER GHE */ \
|
|||
|
|
UNI(0x34, 0x0414); /* CYRILLIC CAPITAL LETTER DE */ \
|
|||
|
|
UNI(0x35, 0x0415); /* CYRILLIC CAPITAL LETTER IE */ \
|
|||
|
|
UNI(0x36, 0x0416); /* CYRILLIC CAPITAL LETTER ZHE */ \
|
|||
|
|
UNI(0x37, 0x0417); /* CYRILLIC CAPITAL LETTER ZE */ \
|
|||
|
|
UNI(0x38, 0x0418); /* CYRILLIC CAPITAL LETTER I */ \
|
|||
|
|
UNI(0x39, 0x0419); /* CYRILLIC CAPITAL LETTER SHORT I */ \
|
|||
|
|
UNI(0x3a, 0x041a); /* CYRILLIC CAPITAL LETTER KA */ \
|
|||
|
|
UNI(0x3b, 0x041b); /* CYRILLIC CAPITAL LETTER EL */ \
|
|||
|
|
UNI(0x3c, 0x041c); /* CYRILLIC CAPITAL LETTER EM */ \
|
|||
|
|
UNI(0x3d, 0x041d); /* CYRILLIC CAPITAL LETTER EN */ \
|
|||
|
|
UNI(0x3e, 0x041e); /* CYRILLIC CAPITAL LETTER O */ \
|
|||
|
|
UNI(0x3f, 0x041f); /* CYRILLIC CAPITAL LETTER PE */ \
|
|||
|
|
UNI(0x40, 0x0420); /* CYRILLIC CAPITAL LETTER ER */ \
|
|||
|
|
UNI(0x41, 0x0421); /* CYRILLIC CAPITAL LETTER ES */ \
|
|||
|
|
UNI(0x42, 0x0422); /* CYRILLIC CAPITAL LETTER TE */ \
|
|||
|
|
UNI(0x43, 0x0423); /* CYRILLIC CAPITAL LETTER U */ \
|
|||
|
|
UNI(0x44, 0x0424); /* CYRILLIC CAPITAL LETTER EF */ \
|
|||
|
|
UNI(0x45, 0x0425); /* CYRILLIC CAPITAL LETTER HA */ \
|
|||
|
|
UNI(0x46, 0x0426); /* CYRILLIC CAPITAL LETTER TSE */ \
|
|||
|
|
UNI(0x47, 0x0427); /* CYRILLIC CAPITAL LETTER CHE */ \
|
|||
|
|
UNI(0x48, 0x0428); /* CYRILLIC CAPITAL LETTER SHA */ \
|
|||
|
|
UNI(0x49, 0x0429); /* CYRILLIC CAPITAL LETTER SHCHA */ \
|
|||
|
|
UNI(0x4a, 0x042a); /* CYRILLIC CAPITAL LETTER HARD SIGN */ \
|
|||
|
|
UNI(0x4b, 0x042b); /* CYRILLIC CAPITAL LETTER YERU */ \
|
|||
|
|
UNI(0x4c, 0x042c); /* CYRILLIC CAPITAL LETTER SOFT SIGN */ \
|
|||
|
|
UNI(0x4d, 0x042d); /* CYRILLIC CAPITAL LETTER E */ \
|
|||
|
|
UNI(0x4e, 0x042e); /* CYRILLIC CAPITAL LETTER YU */ \
|
|||
|
|
UNI(0x4f, 0x042f); /* CYRILLIC CAPITAL LETTER YA */ \
|
|||
|
|
UNI(0x50, 0x0430); /* CYRILLIC SMALL LETTER A */ \
|
|||
|
|
UNI(0x51, 0x0431); /* CYRILLIC SMALL LETTER BE */ \
|
|||
|
|
UNI(0x52, 0x0432); /* CYRILLIC SMALL LETTER VE */ \
|
|||
|
|
UNI(0x53, 0x0433); /* CYRILLIC SMALL LETTER GHE */ \
|
|||
|
|
UNI(0x54, 0x0434); /* CYRILLIC SMALL LETTER DE */ \
|
|||
|
|
UNI(0x55, 0x0435); /* CYRILLIC SMALL LETTER IE */ \
|
|||
|
|
UNI(0x56, 0x0436); /* CYRILLIC SMALL LETTER ZHE */ \
|
|||
|
|
UNI(0x57, 0x0437); /* CYRILLIC SMALL LETTER ZE */ \
|
|||
|
|
UNI(0x58, 0x0438); /* CYRILLIC SMALL LETTER I */ \
|
|||
|
|
UNI(0x59, 0x0439); /* CYRILLIC SMALL LETTER SHORT I */ \
|
|||
|
|
UNI(0x5a, 0x043a); /* CYRILLIC SMALL LETTER KA */ \
|
|||
|
|
UNI(0x5b, 0x043b); /* CYRILLIC SMALL LETTER EL */ \
|
|||
|
|
UNI(0x5c, 0x043c); /* CYRILLIC SMALL LETTER EM */ \
|
|||
|
|
UNI(0x5d, 0x043d); /* CYRILLIC SMALL LETTER EN */ \
|
|||
|
|
UNI(0x5e, 0x043e); /* CYRILLIC SMALL LETTER O */ \
|
|||
|
|
UNI(0x5f, 0x043f); /* CYRILLIC SMALL LETTER PE */ \
|
|||
|
|
UNI(0x60, 0x0440); /* CYRILLIC SMALL LETTER ER */ \
|
|||
|
|
UNI(0x61, 0x0441); /* CYRILLIC SMALL LETTER ES */ \
|
|||
|
|
UNI(0x62, 0x0442); /* CYRILLIC SMALL LETTER TE */ \
|
|||
|
|
UNI(0x63, 0x0443); /* CYRILLIC SMALL LETTER U */ \
|
|||
|
|
UNI(0x64, 0x0444); /* CYRILLIC SMALL LETTER EF */ \
|
|||
|
|
UNI(0x65, 0x0445); /* CYRILLIC SMALL LETTER HA */ \
|
|||
|
|
UNI(0x66, 0x0446); /* CYRILLIC SMALL LETTER TSE */ \
|
|||
|
|
UNI(0x67, 0x0447); /* CYRILLIC SMALL LETTER CHE */ \
|
|||
|
|
UNI(0x68, 0x0448); /* CYRILLIC SMALL LETTER SHA */ \
|
|||
|
|
UNI(0x69, 0x0449); /* CYRILLIC SMALL LETTER SHCHA */ \
|
|||
|
|
UNI(0x6a, 0x044a); /* CYRILLIC SMALL LETTER HARD SIGN */ \
|
|||
|
|
UNI(0x6b, 0x044b); /* CYRILLIC SMALL LETTER YERU */ \
|
|||
|
|
UNI(0x6c, 0x044c); /* CYRILLIC SMALL LETTER SOFT SIGN */ \
|
|||
|
|
UNI(0x6d, 0x044d); /* CYRILLIC SMALL LETTER E */ \
|
|||
|
|
UNI(0x6e, 0x044e); /* CYRILLIC SMALL LETTER YU */ \
|
|||
|
|
UNI(0x6f, 0x044f); /* CYRILLIC SMALL LETTER YA */ \
|
|||
|
|
UNI(0x70, 0x2116); /* NUMERO SIGN */ \
|
|||
|
|
UNI(0x71, 0x0451); /* CYRILLIC SMALL LETTER IO */ \
|
|||
|
|
UNI(0x72, 0x0452); /* CYRILLIC SMALL LETTER DJE */ \
|
|||
|
|
UNI(0x73, 0x0453); /* CYRILLIC SMALL LETTER GJE */ \
|
|||
|
|
UNI(0x74, 0x0454); /* CYRILLIC SMALL LETTER UKRAINIAN IE */ \
|
|||
|
|
UNI(0x75, 0x0455); /* CYRILLIC SMALL LETTER DZE */ \
|
|||
|
|
UNI(0x76, 0x0456); /* CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I */ \
|
|||
|
|
UNI(0x77, 0x0457); /* CYRILLIC SMALL LETTER YI */ \
|
|||
|
|
UNI(0x78, 0x0458); /* CYRILLIC SMALL LETTER JE */ \
|
|||
|
|
UNI(0x79, 0x0459); /* CYRILLIC SMALL LETTER LJE */ \
|
|||
|
|
UNI(0x7a, 0x045a); /* CYRILLIC SMALL LETTER NJE */ \
|
|||
|
|
UNI(0x7b, 0x045b); /* CYRILLIC SMALL LETTER TSHE */ \
|
|||
|
|
UNI(0x7c, 0x045c); /* CYRILLIC SMALL LETTER KJE */ \
|
|||
|
|
UNI(0x7d, 0x00a7); /* SECTION SIGN */ \
|
|||
|
|
UNI(0x7e, 0x045e); /* CYRILLIC SMALL LETTER SHORT U */ \
|
|||
|
|
UNI(0x7f, 0x045f); /* CYRILLIC SMALL LETTER DZHE */ \
|
|||
|
|
} \
|
|||
|
|
end_CODEPAGE()
|
|||
|
|
/* ISO Greek is 8859-7 */
|
|||
|
|
#define map_ISO_Greek_Supp(code) \
|
|||
|
|
begin_CODEPAGE(); \
|
|||
|
|
switch (code) { \
|
|||
|
|
UNI(0x20, 0x00a0); /* NO-BREAK SPACE */ \
|
|||
|
|
UNI(0x21, 0x2018); /* LEFT SINGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x22, 0x2019); /* RIGHT SINGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x23, 0x00a3); /* POUND SIGN */ \
|
|||
|
|
UNI(0x24, 0x20ac); /* EURO SIGN */ \
|
|||
|
|
UNI(0x25, 0x20af); /* DRACHMA SIGN */ \
|
|||
|
|
UNI(0x26, 0x00a6); /* BROKEN BAR */ \
|
|||
|
|
UNI(0x27, 0x00a7); /* SECTION SIGN */ \
|
|||
|
|
UNI(0x28, 0x00a8); /* DIAERESIS */ \
|
|||
|
|
UNI(0x29, 0x00a9); /* COPYRIGHT SIGN */ \
|
|||
|
|
UNI(0x2a, 0x037a); /* GREEK YPOGEGRAMMENI */ \
|
|||
|
|
UNI(0x2b, 0x00ab); /* LEFT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x2c, 0x00ac); /* NOT SIGN */ \
|
|||
|
|
UNI(0x2d, 0x00ad); /* SOFT HYPHEN */ \
|
|||
|
|
XXX(0x2e, UNDEF); /* undefined */ \
|
|||
|
|
UNI(0x2f, 0x2015); /* HORIZONTAL BAR */ \
|
|||
|
|
UNI(0x30, 0x00b0); /* DEGREE SIGN */ \
|
|||
|
|
UNI(0x31, 0x00b1); /* PLUS-MINUS SIGN */ \
|
|||
|
|
UNI(0x32, 0x00b2); /* SUPERSCRIPT TWO */ \
|
|||
|
|
UNI(0x33, 0x00b3); /* SUPERSCRIPT THREE */ \
|
|||
|
|
UNI(0x34, 0x0384); /* GREEK TONOS */ \
|
|||
|
|
UNI(0x35, 0x0385); /* GREEK DIALYTIKA TONOS */ \
|
|||
|
|
UNI(0x36, 0x0386); /* GREEK CAPITAL LETTER ALPHA WITH TONOS */ \
|
|||
|
|
UNI(0x37, 0x00b7); /* MIDDLE DOT */ \
|
|||
|
|
UNI(0x38, 0x0388); /* GREEK CAPITAL LETTER EPSILON WITH TONOS */ \
|
|||
|
|
UNI(0x39, 0x0389); /* GREEK CAPITAL LETTER ETA WITH TONOS */ \
|
|||
|
|
UNI(0x3a, 0x038a); /* GREEK CAPITAL LETTER IOTA WITH TONOS */ \
|
|||
|
|
UNI(0x3b, 0x00bb); /* RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x3c, 0x038c); /* GREEK CAPITAL LETTER OMICRON WITH TONOS */ \
|
|||
|
|
UNI(0x3d, 0x00bd); /* VULGAR FRACTION ONE HALF */ \
|
|||
|
|
UNI(0x3e, 0x038e); /* GREEK CAPITAL LETTER UPSILON WITH TONOS */ \
|
|||
|
|
UNI(0x3f, 0x038f); /* GREEK CAPITAL LETTER OMEGA WITH TONOS */ \
|
|||
|
|
UNI(0x40, 0x0390); /* GREEK SMALL LETTER IOTA WITH DIALYTIKA AND TONOS */ \
|
|||
|
|
UNI(0x41, 0x0391); /* GREEK CAPITAL LETTER ALPHA */ \
|
|||
|
|
UNI(0x42, 0x0392); /* GREEK CAPITAL LETTER BETA */ \
|
|||
|
|
UNI(0x43, 0x0393); /* GREEK CAPITAL LETTER GAMMA */ \
|
|||
|
|
UNI(0x44, 0x0394); /* GREEK CAPITAL LETTER DELTA */ \
|
|||
|
|
UNI(0x45, 0x0395); /* GREEK CAPITAL LETTER EPSILON */ \
|
|||
|
|
UNI(0x46, 0x0396); /* GREEK CAPITAL LETTER ZETA */ \
|
|||
|
|
UNI(0x47, 0x0397); /* GREEK CAPITAL LETTER ETA */ \
|
|||
|
|
UNI(0x48, 0x0398); /* GREEK CAPITAL LETTER THETA */ \
|
|||
|
|
UNI(0x49, 0x0399); /* GREEK CAPITAL LETTER IOTA */ \
|
|||
|
|
UNI(0x4a, 0x039a); /* GREEK CAPITAL LETTER KAPPA */ \
|
|||
|
|
UNI(0x4b, 0x039b); /* GREEK CAPITAL LETTER LAMDA */ \
|
|||
|
|
UNI(0x4c, 0x039c); /* GREEK CAPITAL LETTER MU */ \
|
|||
|
|
UNI(0x4d, 0x039d); /* GREEK CAPITAL LETTER NU */ \
|
|||
|
|
UNI(0x4e, 0x039e); /* GREEK CAPITAL LETTER XI */ \
|
|||
|
|
UNI(0x4f, 0x039f); /* GREEK CAPITAL LETTER OMICRON */ \
|
|||
|
|
UNI(0x50, 0x03a0); /* GREEK CAPITAL LETTER PI */ \
|
|||
|
|
UNI(0x51, 0x03a1); /* GREEK CAPITAL LETTER RHO */ \
|
|||
|
|
XXX(0x52, UNDEF); /* undefined */ \
|
|||
|
|
UNI(0x53, 0x03a3); /* GREEK CAPITAL LETTER SIGMA */ \
|
|||
|
|
UNI(0x54, 0x03a4); /* GREEK CAPITAL LETTER TAU */ \
|
|||
|
|
UNI(0x55, 0x03a5); /* GREEK CAPITAL LETTER UPSILON */ \
|
|||
|
|
UNI(0x56, 0x03a6); /* GREEK CAPITAL LETTER PHI */ \
|
|||
|
|
UNI(0x57, 0x03a7); /* GREEK CAPITAL LETTER CHI */ \
|
|||
|
|
UNI(0x58, 0x03a8); /* GREEK CAPITAL LETTER PSI */ \
|
|||
|
|
UNI(0x59, 0x03a9); /* GREEK CAPITAL LETTER OMEGA */ \
|
|||
|
|
UNI(0x5a, 0x03aa); /* GREEK CAPITAL LETTER IOTA WITH DIALYTIKA */ \
|
|||
|
|
UNI(0x5b, 0x03ab); /* GREEK CAPITAL LETTER UPSILON WITH DIALYTIKA */ \
|
|||
|
|
UNI(0x5c, 0x03ac); /* GREEK SMALL LETTER ALPHA WITH TONOS */ \
|
|||
|
|
UNI(0x5d, 0x03ad); /* GREEK SMALL LETTER EPSILON WITH TONOS */ \
|
|||
|
|
UNI(0x5e, 0x03ae); /* GREEK SMALL LETTER ETA WITH TONOS */ \
|
|||
|
|
UNI(0x5f, 0x03af); /* GREEK SMALL LETTER IOTA WITH TONOS */ \
|
|||
|
|
UNI(0x60, 0x03b0); /* GREEK SMALL LETTER UPSILON WITH DIALYTIKA AND TONOS */ \
|
|||
|
|
UNI(0x61, 0x03b1); /* GREEK SMALL LETTER ALPHA */ \
|
|||
|
|
UNI(0x62, 0x03b2); /* GREEK SMALL LETTER BETA */ \
|
|||
|
|
UNI(0x63, 0x03b3); /* GREEK SMALL LETTER GAMMA */ \
|
|||
|
|
UNI(0x64, 0x03b4); /* GREEK SMALL LETTER DELTA */ \
|
|||
|
|
UNI(0x65, 0x03b5); /* GREEK SMALL LETTER EPSILON */ \
|
|||
|
|
UNI(0x66, 0x03b6); /* GREEK SMALL LETTER ZETA */ \
|
|||
|
|
UNI(0x67, 0x03b7); /* GREEK SMALL LETTER ETA */ \
|
|||
|
|
UNI(0x68, 0x03b8); /* GREEK SMALL LETTER THETA */ \
|
|||
|
|
UNI(0x69, 0x03b9); /* GREEK SMALL LETTER IOTA */ \
|
|||
|
|
UNI(0x6a, 0x03ba); /* GREEK SMALL LETTER KAPPA */ \
|
|||
|
|
UNI(0x6b, 0x03bb); /* GREEK SMALL LETTER LAMDA */ \
|
|||
|
|
UNI(0x6c, 0x03bc); /* GREEK SMALL LETTER MU */ \
|
|||
|
|
UNI(0x6d, 0x03bd); /* GREEK SMALL LETTER NU */ \
|
|||
|
|
UNI(0x6e, 0x03be); /* GREEK SMALL LETTER XI */ \
|
|||
|
|
UNI(0x6f, 0x03bf); /* GREEK SMALL LETTER OMICRON */ \
|
|||
|
|
UNI(0x70, 0x03c0); /* GREEK SMALL LETTER PI */ \
|
|||
|
|
UNI(0x71, 0x03c1); /* GREEK SMALL LETTER RHO */ \
|
|||
|
|
UNI(0x72, 0x03c2); /* GREEK SMALL LETTER FINAL SIGMA */ \
|
|||
|
|
UNI(0x73, 0x03c3); /* GREEK SMALL LETTER SIGMA */ \
|
|||
|
|
UNI(0x74, 0x03c4); /* GREEK SMALL LETTER TAU */ \
|
|||
|
|
UNI(0x75, 0x03c5); /* GREEK SMALL LETTER UPSILON */ \
|
|||
|
|
UNI(0x76, 0x03c6); /* GREEK SMALL LETTER PHI */ \
|
|||
|
|
UNI(0x77, 0x03c7); /* GREEK SMALL LETTER CHI */ \
|
|||
|
|
UNI(0x78, 0x03c8); /* GREEK SMALL LETTER PSI */ \
|
|||
|
|
UNI(0x79, 0x03c9); /* GREEK SMALL LETTER OMEGA */ \
|
|||
|
|
UNI(0x7a, 0x03ca); /* GREEK SMALL LETTER IOTA WITH DIALYTIKA */ \
|
|||
|
|
UNI(0x7b, 0x03cb); /* GREEK SMALL LETTER UPSILON WITH DIALYTIKA */ \
|
|||
|
|
UNI(0x7c, 0x03cc); /* GREEK SMALL LETTER OMICRON WITH TONOS */ \
|
|||
|
|
UNI(0x7d, 0x03cd); /* GREEK SMALL LETTER UPSILON WITH TONOS */ \
|
|||
|
|
UNI(0x7e, 0x03ce); /* GREEK SMALL LETTER OMEGA WITH TONOS */ \
|
|||
|
|
} \
|
|||
|
|
end_CODEPAGE()
|
|||
|
|
/* figure A-23 "ISO Latin-Hebrew Supplemental Character Set" */
|
|||
|
|
#define map_ISO_Hebrew(code) \
|
|||
|
|
begin_CODEPAGE(); \
|
|||
|
|
switch (code) { \
|
|||
|
|
UNI(0x20, 0x00a0); /* NO-BREAK SPACE */ \
|
|||
|
|
XXX(0x21, UNDEF); /* undefined */ \
|
|||
|
|
UNI(0x22, 0x00a2); /* CENT SIGN */ \
|
|||
|
|
UNI(0x23, 0x00a3); /* POUND SIGN */ \
|
|||
|
|
UNI(0x24, 0x00a4); /* CURRENCY SIGN */ \
|
|||
|
|
UNI(0x25, 0x00a5); /* YEN SIGN */ \
|
|||
|
|
UNI(0x26, 0x00a6); /* BROKEN BAR */ \
|
|||
|
|
UNI(0x27, 0x00a7); /* SECTION SIGN */ \
|
|||
|
|
UNI(0x28, 0x00a8); /* DIAERESIS */ \
|
|||
|
|
UNI(0x29, 0x00a9); /* COPYRIGHT SIGN */ \
|
|||
|
|
UNI(0x2a, 0x00d7); /* MULTIPLICATION SIGN */ \
|
|||
|
|
UNI(0x2b, 0x00ab); /* LEFT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x2c, 0x00ac); /* NOT SIGN */ \
|
|||
|
|
UNI(0x2d, 0x00ad); /* SOFT HYPHEN */ \
|
|||
|
|
UNI(0x2e, 0x00ae); /* REGISTERED SIGN */ \
|
|||
|
|
UNI(0x2f, 0x00af); /* MACRON */ \
|
|||
|
|
UNI(0x30, 0x00b0); /* DEGREE SIGN */ \
|
|||
|
|
UNI(0x31, 0x00b1); /* PLUS-MINUS SIGN */ \
|
|||
|
|
UNI(0x32, 0x00b2); /* SUPERSCRIPT TWO */ \
|
|||
|
|
UNI(0x33, 0x00b3); /* SUPERSCRIPT THREE */ \
|
|||
|
|
UNI(0x34, 0x00b4); /* ACUTE ACCENT */ \
|
|||
|
|
UNI(0x35, 0x00b5); /* MICRO SIGN */ \
|
|||
|
|
UNI(0x36, 0x00b6); /* PILCROW SIGN */ \
|
|||
|
|
UNI(0x37, 0x00b7); /* MIDDLE DOT */ \
|
|||
|
|
UNI(0x38, 0x00b8); /* CEDILLA */ \
|
|||
|
|
UNI(0x39, 0x00b9); /* SUPERSCRIPT ONE */ \
|
|||
|
|
UNI(0x3a, 0x00f7); /* DIVISION SIGN */ \
|
|||
|
|
UNI(0x3b, 0x00bb); /* RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x3c, 0x00bc); /* VULGAR FRACTION ONE QUARTER */ \
|
|||
|
|
UNI(0x3d, 0x00bd); /* VULGAR FRACTION ONE HALF */ \
|
|||
|
|
UNI(0x3e, 0x00be); /* VULGAR FRACTION THREE QUARTERS */ \
|
|||
|
|
XXX(0x3f, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x40, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x41, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x42, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x43, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x44, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x45, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x46, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x47, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x48, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x49, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x4a, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x4b, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x4c, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x4d, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x4e, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x4f, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x50, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x51, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x52, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x53, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x54, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x55, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x56, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x57, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x58, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x59, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x5a, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x5b, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x5c, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x5d, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x5e, UNDEF); /* undefined */ \
|
|||
|
|
UNI(0x5f, 0x2017); /* DOUBLE LOW LINE */ \
|
|||
|
|
UNI(0x60, 0x05d0); /* HEBREW LETTER ALEF */ \
|
|||
|
|
UNI(0x61, 0x05d1); /* HEBREW LETTER BET */ \
|
|||
|
|
UNI(0x62, 0x05d2); /* HEBREW LETTER GIMEL */ \
|
|||
|
|
UNI(0x63, 0x05d3); /* HEBREW LETTER DALET */ \
|
|||
|
|
UNI(0x64, 0x05d4); /* HEBREW LETTER HE */ \
|
|||
|
|
UNI(0x65, 0x05d5); /* HEBREW LETTER VAV */ \
|
|||
|
|
UNI(0x66, 0x05d6); /* HEBREW LETTER ZAYIN */ \
|
|||
|
|
UNI(0x67, 0x05d7); /* HEBREW LETTER HET */ \
|
|||
|
|
UNI(0x68, 0x05d8); /* HEBREW LETTER TET */ \
|
|||
|
|
UNI(0x69, 0x05d9); /* HEBREW LETTER YOD */ \
|
|||
|
|
UNI(0x6a, 0x05da); /* HEBREW LETTER FINAL KAF */ \
|
|||
|
|
UNI(0x6b, 0x05db); /* HEBREW LETTER KAF */ \
|
|||
|
|
UNI(0x6c, 0x05dc); /* HEBREW LETTER LAMED */ \
|
|||
|
|
UNI(0x6d, 0x05dd); /* HEBREW LETTER FINAL MEM */ \
|
|||
|
|
UNI(0x6e, 0x05de); /* HEBREW LETTER MEM */ \
|
|||
|
|
UNI(0x6f, 0x05df); /* HEBREW LETTER FINAL NUN */ \
|
|||
|
|
UNI(0x70, 0x05e0); /* HEBREW LETTER NUN */ \
|
|||
|
|
UNI(0x71, 0x05e1); /* HEBREW LETTER SAMEKH */ \
|
|||
|
|
UNI(0x72, 0x05e2); /* HEBREW LETTER AYIN */ \
|
|||
|
|
UNI(0x73, 0x05e3); /* HEBREW LETTER FINAL PE */ \
|
|||
|
|
UNI(0x74, 0x05e4); /* HEBREW LETTER PE */ \
|
|||
|
|
UNI(0x75, 0x05e5); /* HEBREW LETTER FINAL TSADI */ \
|
|||
|
|
UNI(0x76, 0x05e6); /* HEBREW LETTER TSADI */ \
|
|||
|
|
UNI(0x77, 0x05e7); /* HEBREW LETTER QOF */ \
|
|||
|
|
UNI(0x78, 0x05e8); /* HEBREW LETTER RESH */ \
|
|||
|
|
UNI(0x79, 0x05e9); /* HEBREW LETTER SHIN */ \
|
|||
|
|
UNI(0x7a, 0x05ea); /* HEBREW LETTER TAV */ \
|
|||
|
|
XXX(0x7b, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x7c, UNDEF); /* undefined */ \
|
|||
|
|
UNI(0x7d, 0x200e); /* LEFT-TO-RIGHT MARK */ \
|
|||
|
|
UNI(0x7e, 0x200f); /* RIGHT-TO-LEFT MARK */ \
|
|||
|
|
} \
|
|||
|
|
end_CODEPAGE()
|
|||
|
|
/* ISO Latin-5 is 8859-9 */
|
|||
|
|
#define map_ISO_Latin_5(code) \
|
|||
|
|
begin_CODEPAGE(); \
|
|||
|
|
switch (code) { \
|
|||
|
|
UNI(0x20, 0x00a0); /* NO-BREAK SPACE */ \
|
|||
|
|
UNI(0x21, 0x00a1); /* INVERTED EXCLAMATION MARK */ \
|
|||
|
|
UNI(0x22, 0x00a2); /* CENT SIGN */ \
|
|||
|
|
UNI(0x23, 0x00a3); /* POUND SIGN */ \
|
|||
|
|
UNI(0x24, 0x00a4); /* CURRENCY SIGN */ \
|
|||
|
|
UNI(0x25, 0x00a5); /* YEN SIGN */ \
|
|||
|
|
UNI(0x26, 0x00a6); /* BROKEN BAR */ \
|
|||
|
|
UNI(0x27, 0x00a7); /* SECTION SIGN */ \
|
|||
|
|
UNI(0x28, 0x00a8); /* DIAERESIS */ \
|
|||
|
|
UNI(0x29, 0x00a9); /* COPYRIGHT SIGN */ \
|
|||
|
|
UNI(0x2a, 0x00aa); /* FEMININE ORDINAL INDICATOR */ \
|
|||
|
|
UNI(0x2b, 0x00ab); /* LEFT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x2c, 0x00ac); /* NOT SIGN */ \
|
|||
|
|
UNI(0x2d, 0x00ad); /* SOFT HYPHEN */ \
|
|||
|
|
UNI(0x2e, 0x00ae); /* REGISTERED SIGN */ \
|
|||
|
|
UNI(0x2f, 0x00af); /* MACRON */ \
|
|||
|
|
UNI(0x30, 0x00b0); /* DEGREE SIGN */ \
|
|||
|
|
UNI(0x31, 0x00b1); /* PLUS-MINUS SIGN */ \
|
|||
|
|
UNI(0x32, 0x00b2); /* SUPERSCRIPT TWO */ \
|
|||
|
|
UNI(0x33, 0x00b3); /* SUPERSCRIPT THREE */ \
|
|||
|
|
UNI(0x34, 0x00b4); /* ACUTE ACCENT */ \
|
|||
|
|
UNI(0x35, 0x00b5); /* MICRO SIGN */ \
|
|||
|
|
UNI(0x36, 0x00b6); /* PILCROW SIGN */ \
|
|||
|
|
UNI(0x37, 0x00b7); /* MIDDLE DOT */ \
|
|||
|
|
UNI(0x38, 0x00b8); /* CEDILLA */ \
|
|||
|
|
UNI(0x39, 0x00b9); /* SUPERSCRIPT ONE */ \
|
|||
|
|
UNI(0x3a, 0x00ba); /* MASCULINE ORDINAL INDICATOR */ \
|
|||
|
|
UNI(0x3b, 0x00bb); /* RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x3c, 0x00bc); /* VULGAR FRACTION ONE QUARTER */ \
|
|||
|
|
UNI(0x3d, 0x00bd); /* VULGAR FRACTION ONE HALF */ \
|
|||
|
|
UNI(0x3e, 0x00be); /* VULGAR FRACTION THREE QUARTERS */ \
|
|||
|
|
UNI(0x3f, 0x00bf); /* INVERTED QUESTION MARK */ \
|
|||
|
|
UNI(0x40, 0x00c0); /* LATIN CAPITAL LETTER A WITH GRAVE */ \
|
|||
|
|
UNI(0x41, 0x00c1); /* LATIN CAPITAL LETTER A WITH ACUTE */ \
|
|||
|
|
UNI(0x42, 0x00c2); /* LATIN CAPITAL LETTER A WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x43, 0x00c3); /* LATIN CAPITAL LETTER A WITH TILDE */ \
|
|||
|
|
UNI(0x44, 0x00c4); /* LATIN CAPITAL LETTER A WITH DIAERESIS */ \
|
|||
|
|
UNI(0x45, 0x00c5); /* LATIN CAPITAL LETTER A WITH RING ABOVE */ \
|
|||
|
|
UNI(0x46, 0x00c6); /* LATIN CAPITAL LETTER AE */ \
|
|||
|
|
UNI(0x47, 0x00c7); /* LATIN CAPITAL LETTER C WITH CEDILLA */ \
|
|||
|
|
UNI(0x48, 0x00c8); /* LATIN CAPITAL LETTER E WITH GRAVE */ \
|
|||
|
|
UNI(0x49, 0x00c9); /* LATIN CAPITAL LETTER E WITH ACUTE */ \
|
|||
|
|
UNI(0x4a, 0x00ca); /* LATIN CAPITAL LETTER E WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x4b, 0x00cb); /* LATIN CAPITAL LETTER E WITH DIAERESIS */ \
|
|||
|
|
UNI(0x4c, 0x00cc); /* LATIN CAPITAL LETTER I WITH GRAVE */ \
|
|||
|
|
UNI(0x4d, 0x00cd); /* LATIN CAPITAL LETTER I WITH ACUTE */ \
|
|||
|
|
UNI(0x4e, 0x00ce); /* LATIN CAPITAL LETTER I WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x4f, 0x00cf); /* LATIN CAPITAL LETTER I WITH DIAERESIS */ \
|
|||
|
|
UNI(0x50, 0x011e); /* LATIN CAPITAL LETTER G WITH BREVE */ \
|
|||
|
|
UNI(0x51, 0x00d1); /* LATIN CAPITAL LETTER N WITH TILDE */ \
|
|||
|
|
UNI(0x52, 0x00d2); /* LATIN CAPITAL LETTER O WITH GRAVE */ \
|
|||
|
|
UNI(0x53, 0x00d3); /* LATIN CAPITAL LETTER O WITH ACUTE */ \
|
|||
|
|
UNI(0x54, 0x00d4); /* LATIN CAPITAL LETTER O WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x55, 0x00d5); /* LATIN CAPITAL LETTER O WITH TILDE */ \
|
|||
|
|
UNI(0x56, 0x00d6); /* LATIN CAPITAL LETTER O WITH DIAERESIS */ \
|
|||
|
|
UNI(0x57, 0x00d7); /* MULTIPLICATION SIGN */ \
|
|||
|
|
UNI(0x58, 0x00d8); /* LATIN CAPITAL LETTER O WITH STROKE */ \
|
|||
|
|
UNI(0x59, 0x00d9); /* LATIN CAPITAL LETTER U WITH GRAVE */ \
|
|||
|
|
UNI(0x5a, 0x00da); /* LATIN CAPITAL LETTER U WITH ACUTE */ \
|
|||
|
|
UNI(0x5b, 0x00db); /* LATIN CAPITAL LETTER U WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x5c, 0x00dc); /* LATIN CAPITAL LETTER U WITH DIAERESIS */ \
|
|||
|
|
UNI(0x5d, 0x0130); /* LATIN CAPITAL LETTER I WITH DOT ABOVE */ \
|
|||
|
|
UNI(0x5e, 0x015e); /* LATIN CAPITAL LETTER S WITH CEDILLA */ \
|
|||
|
|
UNI(0x5f, 0x00df); /* LATIN SMALL LETTER SHARP S */ \
|
|||
|
|
UNI(0x60, 0x00e0); /* LATIN SMALL LETTER A WITH GRAVE */ \
|
|||
|
|
UNI(0x61, 0x00e1); /* LATIN SMALL LETTER A WITH ACUTE */ \
|
|||
|
|
UNI(0x62, 0x00e2); /* LATIN SMALL LETTER A WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x63, 0x00e3); /* LATIN SMALL LETTER A WITH TILDE */ \
|
|||
|
|
UNI(0x64, 0x00e4); /* LATIN SMALL LETTER A WITH DIAERESIS */ \
|
|||
|
|
UNI(0x65, 0x00e5); /* LATIN SMALL LETTER A WITH RING ABOVE */ \
|
|||
|
|
UNI(0x66, 0x00e6); /* LATIN SMALL LETTER AE */ \
|
|||
|
|
UNI(0x67, 0x00e7); /* LATIN SMALL LETTER C WITH CEDILLA */ \
|
|||
|
|
UNI(0x68, 0x00e8); /* LATIN SMALL LETTER E WITH GRAVE */ \
|
|||
|
|
UNI(0x69, 0x00e9); /* LATIN SMALL LETTER E WITH ACUTE */ \
|
|||
|
|
UNI(0x6a, 0x00ea); /* LATIN SMALL LETTER E WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x6b, 0x00eb); /* LATIN SMALL LETTER E WITH DIAERESIS */ \
|
|||
|
|
UNI(0x6c, 0x00ec); /* LATIN SMALL LETTER I WITH GRAVE */ \
|
|||
|
|
UNI(0x6d, 0x00ed); /* LATIN SMALL LETTER I WITH ACUTE */ \
|
|||
|
|
UNI(0x6e, 0x00ee); /* LATIN SMALL LETTER I WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x6f, 0x00ef); /* LATIN SMALL LETTER I WITH DIAERESIS */ \
|
|||
|
|
UNI(0x70, 0x011f); /* LATIN SMALL LETTER G WITH BREVE */ \
|
|||
|
|
UNI(0x71, 0x00f1); /* LATIN SMALL LETTER N WITH TILDE */ \
|
|||
|
|
UNI(0x72, 0x00f2); /* LATIN SMALL LETTER O WITH GRAVE */ \
|
|||
|
|
UNI(0x73, 0x00f3); /* LATIN SMALL LETTER O WITH ACUTE */ \
|
|||
|
|
UNI(0x74, 0x00f4); /* LATIN SMALL LETTER O WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x75, 0x00f5); /* LATIN SMALL LETTER O WITH TILDE */ \
|
|||
|
|
UNI(0x76, 0x00f6); /* LATIN SMALL LETTER O WITH DIAERESIS */ \
|
|||
|
|
UNI(0x77, 0x00f7); /* DIVISION SIGN */ \
|
|||
|
|
UNI(0x78, 0x00f8); /* LATIN SMALL LETTER O WITH STROKE */ \
|
|||
|
|
UNI(0x79, 0x00f9); /* LATIN SMALL LETTER U WITH GRAVE */ \
|
|||
|
|
UNI(0x7a, 0x00fa); /* LATIN SMALL LETTER U WITH ACUTE */ \
|
|||
|
|
UNI(0x7b, 0x00fb); /* LATIN SMALL LETTER U WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x7c, 0x00fc); /* LATIN SMALL LETTER U WITH DIAERESIS */ \
|
|||
|
|
UNI(0x7d, 0x0131); /* LATIN SMALL LETTER DOTLESS I */ \
|
|||
|
|
UNI(0x7e, 0x015f); /* LATIN SMALL LETTER S WITH CEDILLA */ \
|
|||
|
|
UNI(0x7f, 0x00ff); /* LATIN SMALL LETTER Y WITH DIAERESIS */ \
|
|||
|
|
} \
|
|||
|
|
end_CODEPAGE()
|
|||
|
|
/* DEC Cyrillic from screenshot */
|
|||
|
|
#define map_DEC_Cyrillic(code) \
|
|||
|
|
begin_CODEPAGE(); \
|
|||
|
|
switch (code) { \
|
|||
|
|
UNI(0x20, 0x00a0); /* NO-BREAK SPACE */ \
|
|||
|
|
XXX(0x21, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x22, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x23, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x24, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x25, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x26, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x27, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x28, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x29, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x2a, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x2b, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x2c, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x2d, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x2e, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x2f, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x30, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x31, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x32, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x33, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x34, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x35, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x36, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x37, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x38, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x39, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x3a, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x3b, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x3c, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x3d, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x3e, UNDEF); /* undefined */ \
|
|||
|
|
XXX(0x3f, UNDEF); /* undefined */ \
|
|||
|
|
\
|
|||
|
|
UNI(0x40, 0x044e); /* CYRILLIC SMALL LETTER YU */ \
|
|||
|
|
UNI(0x41, 0x0430); /* CYRILLIC SMALL LETTER A */ \
|
|||
|
|
UNI(0x42, 0x0431); /* CYRILLIC SMALL LETTER BE */ \
|
|||
|
|
UNI(0x43, 0x0446); /* CYRILLIC SMALL LETTER TSE */ \
|
|||
|
|
UNI(0x44, 0x0434); /* CYRILLIC SMALL LETTER DE */ \
|
|||
|
|
UNI(0x45, 0x0435); /* CYRILLIC SMALL LETTER IE */ \
|
|||
|
|
UNI(0x46, 0x0444); /* CYRILLIC SMALL LETTER EF */ \
|
|||
|
|
UNI(0x47, 0x0433); /* CYRILLIC SMALL LETTER GHE */ \
|
|||
|
|
UNI(0x48, 0x0445); /* CYRILLIC SMALL LETTER HA */ \
|
|||
|
|
UNI(0x49, 0x0438); /* CYRILLIC SMALL LETTER I */ \
|
|||
|
|
UNI(0x4a, 0x0439); /* CYRILLIC SMALL LETTER SHORT I */ \
|
|||
|
|
UNI(0x4b, 0x043a); /* CYRILLIC SMALL LETTER KA */ \
|
|||
|
|
UNI(0x4c, 0x043b); /* CYRILLIC SMALL LETTER EL */ \
|
|||
|
|
UNI(0x4d, 0x043c); /* CYRILLIC SMALL LETTER EM */ \
|
|||
|
|
UNI(0x4e, 0x043d); /* CYRILLIC SMALL LETTER EN */ \
|
|||
|
|
UNI(0x4f, 0x043e); /* CYRILLIC SMALL LETTER O */ \
|
|||
|
|
UNI(0x50, 0x043f); /* CYRILLIC SMALL LETTER PE */ \
|
|||
|
|
UNI(0x51, 0x044f); /* CYRILLIC SMALL LETTER YA */ \
|
|||
|
|
UNI(0x52, 0x0440); /* CYRILLIC SMALL LETTER ER */ \
|
|||
|
|
UNI(0x53, 0x0441); /* CYRILLIC SMALL LETTER ES */ \
|
|||
|
|
UNI(0x54, 0x0442); /* CYRILLIC SMALL LETTER TE */ \
|
|||
|
|
UNI(0x55, 0x0443); /* CYRILLIC SMALL LETTER U */ \
|
|||
|
|
UNI(0x56, 0x0436); /* CYRILLIC SMALL LETTER ZHE */ \
|
|||
|
|
UNI(0x57, 0x0432); /* CYRILLIC SMALL LETTER VE */ \
|
|||
|
|
UNI(0x58, 0x044c); /* CYRILLIC SMALL LETTER SOFT SIGN */ \
|
|||
|
|
UNI(0x59, 0x044b); /* CYRILLIC SMALL LETTER YERU */ \
|
|||
|
|
UNI(0x5a, 0x0437); /* CYRILLIC SMALL LETTER ZE */ \
|
|||
|
|
UNI(0x5b, 0x0448); /* CYRILLIC SMALL LETTER SHA */ \
|
|||
|
|
UNI(0x5c, 0x044d); /* CYRILLIC SMALL LETTER E */ \
|
|||
|
|
UNI(0x5d, 0x0449); /* CYRILLIC SMALL LETTER SHCHA */ \
|
|||
|
|
UNI(0x5e, 0x0447); /* CYRILLIC SMALL LETTER CHE */ \
|
|||
|
|
UNI(0x5f, 0x044a); /* CYRILLIC SMALL LETTER HARD SIGN */ \
|
|||
|
|
\
|
|||
|
|
UNI(0x60, 0x042e); /* CYRILLIC CAPITAL LETTER YU */ \
|
|||
|
|
UNI(0x61, 0x0410); /* CYRILLIC CAPITAL LETTER A */ \
|
|||
|
|
UNI(0x62, 0x0411); /* CYRILLIC CAPITAL LETTER BE */ \
|
|||
|
|
UNI(0x63, 0x0426); /* CYRILLIC CAPITAL LETTER TSE */ \
|
|||
|
|
UNI(0x64, 0x0414); /* CYRILLIC CAPITAL LETTER DE */ \
|
|||
|
|
UNI(0x65, 0x0415); /* CYRILLIC CAPITAL LETTER IE */ \
|
|||
|
|
UNI(0x66, 0x0424); /* CYRILLIC CAPITAL LETTER EF */ \
|
|||
|
|
UNI(0x67, 0x0413); /* CYRILLIC CAPITAL LETTER GHE */ \
|
|||
|
|
UNI(0x68, 0x0425); /* CYRILLIC CAPITAL LETTER HA */ \
|
|||
|
|
UNI(0x69, 0x0418); /* CYRILLIC CAPITAL LETTER I */ \
|
|||
|
|
UNI(0x6a, 0x0419); /* CYRILLIC CAPITAL LETTER SHORT I */ \
|
|||
|
|
UNI(0x6b, 0x041a); /* CYRILLIC CAPITAL LETTER KA */ \
|
|||
|
|
UNI(0x6c, 0x041b); /* CYRILLIC CAPITAL LETTER EL */ \
|
|||
|
|
UNI(0x6d, 0x041c); /* CYRILLIC CAPITAL LETTER EM */ \
|
|||
|
|
UNI(0x6e, 0x041d); /* CYRILLIC CAPITAL LETTER EN */ \
|
|||
|
|
UNI(0x6f, 0x041e); /* CYRILLIC CAPITAL LETTER O */ \
|
|||
|
|
UNI(0x70, 0x041f); /* CYRILLIC CAPITAL LETTER PE */ \
|
|||
|
|
UNI(0x71, 0x042f); /* CYRILLIC CAPITAL LETTER YA */ \
|
|||
|
|
UNI(0x72, 0x0420); /* CYRILLIC CAPITAL LETTER ER */ \
|
|||
|
|
UNI(0x73, 0x0421); /* CYRILLIC CAPITAL LETTER ES */ \
|
|||
|
|
UNI(0x74, 0x0422); /* CYRILLIC CAPITAL LETTER TE */ \
|
|||
|
|
UNI(0x75, 0x0423); /* CYRILLIC CAPITAL LETTER U */ \
|
|||
|
|
UNI(0x76, 0x0416); /* CYRILLIC CAPITAL LETTER ZHE */ \
|
|||
|
|
UNI(0x77, 0x0412); /* CYRILLIC CAPITAL LETTER VE */ \
|
|||
|
|
UNI(0x78, 0x042c); /* CYRILLIC CAPITAL LETTER SOFT SIGN */ \
|
|||
|
|
UNI(0x79, 0x042b); /* CYRILLIC CAPITAL LETTER YERU */ \
|
|||
|
|
UNI(0x7a, 0x0417); /* CYRILLIC CAPITAL LETTER ZE */ \
|
|||
|
|
UNI(0x7b, 0x0428); /* CYRILLIC CAPITAL LETTER SHA */ \
|
|||
|
|
UNI(0x7c, 0x042d); /* CYRILLIC CAPITAL LETTER E */ \
|
|||
|
|
UNI(0x7d, 0x0429); /* CYRILLIC CAPITAL LETTER SHCHA */ \
|
|||
|
|
UNI(0x7e, 0x0427); /* CYRILLIC CAPITAL LETTER CHE */ \
|
|||
|
|
UNI(0x7f, 0x042a); /* CYRILLIC CAPITAL LETTER HARD SIGN */ \
|
|||
|
|
\
|
|||
|
|
} \
|
|||
|
|
end_CODEPAGE()
|
|||
|
|
/* figure A-24 "DEC Greek Supplemental Character Set" */
|
|||
|
|
#define map_DEC_Greek_Supp(code) \
|
|||
|
|
begin_CODEPAGE(); \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x20, 0x00a0); /* NO-BREAK SPACE */ \
|
|||
|
|
UNI(0x21, 0x00a1); /* LEFT SINGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x22, 0x00a2); /* RIGHT SINGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x23, 0x00a3); /* POUND SIGN */ \
|
|||
|
|
XXX(0x24, UNDEF); /* EURO SIGN */ \
|
|||
|
|
UNI(0x25, 0x00a5); /* YEN SIGN */ \
|
|||
|
|
XXX(0x26, UNDEF); /* BROKEN BAR */ \
|
|||
|
|
UNI(0x27, 0x00a7); /* SECTION SIGN */ \
|
|||
|
|
UNI(0x28, 0x00a4); /* CURRENCY SIGN */ \
|
|||
|
|
UNI(0x29, 0x00a9); /* COPYRIGHT SIGN */ \
|
|||
|
|
UNI(0x2a, 0x00aa); /* FEMININE ORDINAL INDICATOR */ \
|
|||
|
|
UNI(0x2b, 0x00ab); /* LEFT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
XXX(0x2c, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x2d, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x2e, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x2f, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x30, 0x00b0); /* DEGREE SIGN */ \
|
|||
|
|
UNI(0x31, 0x00b1); /* PLUS-MINUS SIGN */ \
|
|||
|
|
UNI(0x32, 0x00b2); /* SUPERSCRIPT TWO */ \
|
|||
|
|
UNI(0x33, 0x00b3); /* SUPERSCRIPT THREE */ \
|
|||
|
|
XXX(0x34, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x35, 0x00b5); /* MICRO SIGN */ \
|
|||
|
|
UNI(0x36, 0x00b6); /* PILCROW SIGN */ \
|
|||
|
|
UNI(0x37, 0x00b7); /* MIDDLE DOT */ \
|
|||
|
|
XXX(0x38, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x39, 0x00b9); /* SUPERSCRIPT ONE */ \
|
|||
|
|
UNI(0x3a, 0x00ba); /* MASCULINE ORDINAL INDICATOR */ \
|
|||
|
|
UNI(0x3b, 0x00bb); /* RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x3c, 0x00bc); /* VULGAR FRACTION ONE QUARTER */ \
|
|||
|
|
UNI(0x3d, 0x00bd); /* VULGAR FRACTION ONE HALF */ \
|
|||
|
|
XXX(0x3e, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x3f, 0x00BF); /* INVERTED QUESTION MARK */ \
|
|||
|
|
UNI(0x40, 0x03ca); /* GREEK SMALL LETTER IOTA WITH DIALYTIKA */ \
|
|||
|
|
UNI(0x41, 0x0391); /* GREEK CAPITAL LETTER ALPHA */ \
|
|||
|
|
UNI(0x42, 0x0392); /* GREEK CAPITAL LETTER BETA */ \
|
|||
|
|
UNI(0x43, 0x0393); /* GREEK CAPITAL LETTER GAMMA */ \
|
|||
|
|
UNI(0x44, 0x0394); /* GREEK CAPITAL LETTER DELTA */ \
|
|||
|
|
UNI(0x45, 0x0395); /* GREEK CAPITAL LETTER EPSILON */ \
|
|||
|
|
UNI(0x46, 0x0396); /* GREEK CAPITAL LETTER ZETA */ \
|
|||
|
|
UNI(0x47, 0x0397); /* GREEK CAPITAL LETTER ETA */ \
|
|||
|
|
UNI(0x48, 0x0398); /* GREEK CAPITAL LETTER THETA */ \
|
|||
|
|
UNI(0x49, 0x0399); /* GREEK CAPITAL LETTER IOTA */ \
|
|||
|
|
UNI(0x4a, 0x039a); /* GREEK CAPITAL LETTER KAPPA */ \
|
|||
|
|
UNI(0x4b, 0x039b); /* GREEK CAPITAL LETTER LAMDA */ \
|
|||
|
|
UNI(0x4c, 0x039c); /* GREEK CAPITAL LETTER MU */ \
|
|||
|
|
UNI(0x4d, 0x039d); /* GREEK CAPITAL LETTER NU */ \
|
|||
|
|
UNI(0x4e, 0x039e); /* GREEK CAPITAL LETTER XI */ \
|
|||
|
|
UNI(0x4f, 0x039f); /* GREEK CAPITAL LETTER OMICRON */ \
|
|||
|
|
XXX(0x50, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x51, 0x03a0); /* GREEK CAPITAL LETTER PI */ \
|
|||
|
|
UNI(0x52, 0x03a1); /* GREEK CAPITAL LETTER RHO */ \
|
|||
|
|
UNI(0x53, 0x03a3); /* GREEK CAPITAL LETTER SIGMA */ \
|
|||
|
|
UNI(0x54, 0x03a4); /* GREEK CAPITAL LETTER TAU */ \
|
|||
|
|
UNI(0x55, 0x03a5); /* GREEK CAPITAL LETTER UPSILON */ \
|
|||
|
|
UNI(0x56, 0x03a6); /* GREEK CAPITAL LETTER PHI */ \
|
|||
|
|
UNI(0x57, 0x03a7); /* GREEK CAPITAL LETTER CHI */ \
|
|||
|
|
UNI(0x58, 0x03a8); /* GREEK CAPITAL LETTER PSI */ \
|
|||
|
|
UNI(0x59, 0x03a9); /* GREEK CAPITAL LETTER OMEGA */ \
|
|||
|
|
UNI(0x5a, 0x03ac); /* GREEK SMALL LETTER ALPHA WITH TONOS */ \
|
|||
|
|
UNI(0x5b, 0x03ad); /* GREEK SMALL LETTER EPSILON WITH TONOS */ \
|
|||
|
|
UNI(0x5c, 0x03ae); /* GREEK SMALL LETTER ETA WITH TONOS */ \
|
|||
|
|
UNI(0x5d, 0x03af); /* GREEK SMALL LETTER IOTA WITH TONOS */ \
|
|||
|
|
XXX(0x5e, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x5f, 0x03cc); /* GREEK SMALL LETTER OMICRON WITH TONOS */ \
|
|||
|
|
UNI(0x60, 0x03cb); /* GREEK SMALL LETTER UPSILON WITH DIALYTIKA */ \
|
|||
|
|
UNI(0x61, 0x03b1); /* GREEK SMALL LETTER ALPHA */ \
|
|||
|
|
UNI(0x62, 0x03b2); /* GREEK SMALL LETTER BETA */ \
|
|||
|
|
UNI(0x63, 0x03b3); /* GREEK SMALL LETTER GAMMA */ \
|
|||
|
|
UNI(0x64, 0x03b4); /* GREEK SMALL LETTER DELTA */ \
|
|||
|
|
UNI(0x65, 0x03b5); /* GREEK SMALL LETTER EPSILON */ \
|
|||
|
|
UNI(0x66, 0x03b6); /* GREEK SMALL LETTER ZETA */ \
|
|||
|
|
UNI(0x67, 0x03b7); /* GREEK SMALL LETTER ETA */ \
|
|||
|
|
UNI(0x68, 0x03b8); /* GREEK SMALL LETTER THETA */ \
|
|||
|
|
UNI(0x69, 0x03b9); /* GREEK SMALL LETTER IOTA */ \
|
|||
|
|
UNI(0x6a, 0x03ba); /* GREEK SMALL LETTER KAPPA */ \
|
|||
|
|
UNI(0x6b, 0x03bb); /* GREEK SMALL LETTER LAMDA */ \
|
|||
|
|
UNI(0x6c, 0x03bc); /* GREEK SMALL LETTER MU */ \
|
|||
|
|
UNI(0x6d, 0x03bd); /* GREEK SMALL LETTER NU */ \
|
|||
|
|
UNI(0x6e, 0x03be); /* GREEK SMALL LETTER XI */ \
|
|||
|
|
UNI(0x6f, 0x03bf); /* GREEK SMALL LETTER OMICRON */ \
|
|||
|
|
XXX(0x70, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x71, 0x03c0); /* GREEK SMALL LETTER PI */ \
|
|||
|
|
UNI(0x72, 0x03c1); /* GREEK SMALL LETTER RHO */ \
|
|||
|
|
UNI(0x73, 0x03c3); /* GREEK SMALL LETTER SIGMA */ \
|
|||
|
|
UNI(0x74, 0x03c4); /* GREEK SMALL LETTER TAU */ \
|
|||
|
|
UNI(0x75, 0x03c5); /* GREEK SMALL LETTER UPSILON */ \
|
|||
|
|
UNI(0x76, 0x03c6); /* GREEK SMALL LETTER PHI */ \
|
|||
|
|
UNI(0x77, 0x03c7); /* GREEK SMALL LETTER CHI */ \
|
|||
|
|
UNI(0x78, 0x03c8); /* GREEK SMALL LETTER PSI */ \
|
|||
|
|
UNI(0x79, 0x03c9); /* GREEK SMALL LETTER OMEGA */ \
|
|||
|
|
UNI(0x7a, 0x03c2); /* GREEK SMALL LETTER FINAL SIGMA */ \
|
|||
|
|
UNI(0x7b, 0x03cd); /* GREEK SMALL LETTER UPSILON WITH TONOS */ \
|
|||
|
|
UNI(0x7c, 0x03ce); /* GREEK SMALL LETTER OMEGA WITH TONOS */ \
|
|||
|
|
UNI(0x7d, 0x0384); /* GREEK TONOS */ \
|
|||
|
|
XXX(0x7e, UNDEF); /* reserved */ \
|
|||
|
|
} \
|
|||
|
|
end_CODEPAGE()
|
|||
|
|
/* figure A-22 "DEC Hebrew Supplemental Character Set" */
|
|||
|
|
#define map_DEC_Hebrew_Supp(code) \
|
|||
|
|
begin_CODEPAGE(); \
|
|||
|
|
switch (code) { \
|
|||
|
|
UNI(0x21, 0x00a1); /* INVERTED EXCLAMATION MARK */ \
|
|||
|
|
UNI(0x22, 0x00a2); /* CENT SIGN */ \
|
|||
|
|
UNI(0x23, 0x00a3); /* POUND SIGN */ \
|
|||
|
|
XXX(0x24, UNDEF); /* CURRENCY SIGN */ \
|
|||
|
|
UNI(0x25, 0x00a5); /* YEN SIGN */ \
|
|||
|
|
XXX(0x26, UNDEF); /* BROKEN BAR */ \
|
|||
|
|
UNI(0x27, 0x00a7); /* SECTION SIGN */ \
|
|||
|
|
UNI(0x28, 0x00a8); /* DIAERESIS */ \
|
|||
|
|
UNI(0x29, 0x00a9); /* COPYRIGHT SIGN */ \
|
|||
|
|
UNI(0x2a, 0x00d7); /* MULTIPLICATION SIGN */ \
|
|||
|
|
UNI(0x2b, 0x00ab); /* LEFT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
XXX(0x2c, UNDEF); /* NOT SIGN */ \
|
|||
|
|
XXX(0x2d, UNDEF); /* SOFT HYPHEN */ \
|
|||
|
|
XXX(0x2e, UNDEF); /* REGISTERED SIGN */ \
|
|||
|
|
XXX(0x2f, UNDEF); /* MACRON */ \
|
|||
|
|
UNI(0x30, 0x00b0); /* DEGREE SIGN */ \
|
|||
|
|
UNI(0x31, 0x00b1); /* PLUS-MINUS SIGN */ \
|
|||
|
|
UNI(0x32, 0x00b2); /* SUPERSCRIPT TWO */ \
|
|||
|
|
UNI(0x33, 0x00b3); /* SUPERSCRIPT THREE */ \
|
|||
|
|
XXX(0x34, UNDEF); /* ACUTE ACCENT */ \
|
|||
|
|
UNI(0x35, 0x00b5); /* MICRO SIGN */ \
|
|||
|
|
UNI(0x36, 0x00b6); /* PILCROW SIGN */ \
|
|||
|
|
UNI(0x37, 0x00b7); /* MIDDLE DOT */ \
|
|||
|
|
XXX(0x38, UNDEF); /* CEDILLA */ \
|
|||
|
|
UNI(0x39, 0x00b9); /* SUPERSCRIPT ONE */ \
|
|||
|
|
UNI(0x3a, 0x00f7); /* DIVISION SIGN */ \
|
|||
|
|
UNI(0x3b, 0x00bb); /* RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x3c, 0x00bc); /* VULGAR FRACTION ONE QUARTER */ \
|
|||
|
|
UNI(0x3d, 0x00bd); /* VULGAR FRACTION ONE HALF */ \
|
|||
|
|
XXX(0x3e, UNDEF); /* VULGAR FRACTION THREE QUARTERS */ \
|
|||
|
|
UNI(0x3f, 0x00bf); /* INVERTED QUESTION MARK */ \
|
|||
|
|
XXX(0x40, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x41, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x42, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x43, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x44, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x45, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x46, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x47, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x48, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x49, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x4a, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x4b, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x4c, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x4d, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x4e, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x4f, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x50, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x51, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x52, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x53, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x54, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x55, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x56, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x57, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x58, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x59, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x5a, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x5b, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x5c, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x5d, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x5e, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x5f, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x60, 0x05d0); /* HEBREW LETTER ALEF */ \
|
|||
|
|
UNI(0x61, 0x05d1); /* HEBREW LETTER BET */ \
|
|||
|
|
UNI(0x62, 0x05d2); /* HEBREW LETTER GIMEL */ \
|
|||
|
|
UNI(0x63, 0x05d3); /* HEBREW LETTER DALET */ \
|
|||
|
|
UNI(0x64, 0x05d4); /* HEBREW LETTER HE */ \
|
|||
|
|
UNI(0x65, 0x05d5); /* HEBREW LETTER VAV */ \
|
|||
|
|
UNI(0x66, 0x05d6); /* HEBREW LETTER ZAYIN */ \
|
|||
|
|
UNI(0x67, 0x05d7); /* HEBREW LETTER HET */ \
|
|||
|
|
UNI(0x68, 0x05d8); /* HEBREW LETTER TET */ \
|
|||
|
|
UNI(0x69, 0x05d9); /* HEBREW LETTER YOD */ \
|
|||
|
|
UNI(0x6a, 0x05da); /* HEBREW LETTER FINAL KAF */ \
|
|||
|
|
UNI(0x6b, 0x05db); /* HEBREW LETTER KAF */ \
|
|||
|
|
UNI(0x6c, 0x05dc); /* HEBREW LETTER LAMED */ \
|
|||
|
|
UNI(0x6d, 0x05dd); /* HEBREW LETTER FINAL MEM */ \
|
|||
|
|
UNI(0x6e, 0x05de); /* HEBREW LETTER MEM */ \
|
|||
|
|
UNI(0x6f, 0x05df); /* HEBREW LETTER FINAL NUN */ \
|
|||
|
|
UNI(0x70, 0x05e0); /* HEBREW LETTER NUN */ \
|
|||
|
|
UNI(0x71, 0x05e1); /* HEBREW LETTER SAMEKH */ \
|
|||
|
|
UNI(0x72, 0x05e2); /* HEBREW LETTER AYIN */ \
|
|||
|
|
UNI(0x73, 0x05e3); /* HEBREW LETTER FINAL PE */ \
|
|||
|
|
UNI(0x74, 0x05e4); /* HEBREW LETTER PE */ \
|
|||
|
|
UNI(0x75, 0x05e5); /* HEBREW LETTER FINAL TSADI */ \
|
|||
|
|
UNI(0x76, 0x05e6); /* HEBREW LETTER TSADI */ \
|
|||
|
|
UNI(0x77, 0x05e7); /* HEBREW LETTER QOF */ \
|
|||
|
|
UNI(0x78, 0x05e8); /* HEBREW LETTER RESH */ \
|
|||
|
|
UNI(0x79, 0x05e9); /* HEBREW LETTER SHIN */ \
|
|||
|
|
UNI(0x7a, 0x05ea); /* HEBREW LETTER TAV */ \
|
|||
|
|
XXX(0x7b, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x7c, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x7d, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x7e, UNDEF); /* reserved */ \
|
|||
|
|
} \
|
|||
|
|
end_CODEPAGE()
|
|||
|
|
/* figure A-27 "DEC 8-Bit Turkish Supplemental Character Set" */
|
|||
|
|
#define map_DEC_Turkish_Supp(code) \
|
|||
|
|
begin_CODEPAGE(); \
|
|||
|
|
switch (code) { \
|
|||
|
|
UNI(0x21, 0x00A1); /* INVERTED EXCLAMATION MARK */ \
|
|||
|
|
UNI(0x22, 0x00A2); /* CENT SIGN */ \
|
|||
|
|
UNI(0x23, 0x00A3); /* POUND SIGN */ \
|
|||
|
|
XXX(0x24, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x25, 0x00A5); /* YEN SIGN */ \
|
|||
|
|
XXX(0x26, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x27, 0x00A7); /* SECTION SIGN */ \
|
|||
|
|
UNI(0x28, 0x00A8); /* DIAERESIS */ \
|
|||
|
|
UNI(0x29, 0x00A9); /* COPYRIGHT SIGN */ \
|
|||
|
|
UNI(0x2A, 0x00AA); /* FEMININE ORDINAL INDICATOR */ \
|
|||
|
|
UNI(0x2B, 0x00AB); /* LEFT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
XXX(0x2C, UNDEF); /* reserved */ \
|
|||
|
|
XXX(0x2D, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x2E, 0x0130); /* LATIN CAPITAL LETTER I WITH DOT ABOVE */ \
|
|||
|
|
XXX(0x2F, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x30, 0x00B0); /* DEGREE SIGN */ \
|
|||
|
|
UNI(0x31, 0x00B1); /* PLUS-MINUS SIGN */ \
|
|||
|
|
UNI(0x32, 0x00B2); /* SUPERSCRIPT TWO */ \
|
|||
|
|
UNI(0x33, 0x00B3); /* SUPERSCRIPT THREE */ \
|
|||
|
|
XXX(0x34, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x35, 0x00B5); /* MICRO SIGN */ \
|
|||
|
|
UNI(0x36, 0x00B6); /* PILCROW SIGN */ \
|
|||
|
|
UNI(0x37, 0x00B7); /* MIDDLE DOT */ \
|
|||
|
|
XXX(0x38, UNDEF); /* reserved */ \
|
|||
|
|
UNI(0x39, 0x00B9); /* SUPERSCRIPT ONE */ \
|
|||
|
|
UNI(0x3A, 0x00BA); /* MASCULINE ORDINAL INDICATOR */ \
|
|||
|
|
UNI(0x3B, 0x00BB); /* RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK */ \
|
|||
|
|
UNI(0x3C, 0x00BC); /* VULGAR FRACTION ONE QUARTER */ \
|
|||
|
|
UNI(0x3D, 0x00BD); /* VULGAR FRACTION ONE HALF */ \
|
|||
|
|
UNI(0x3E, 0x0131); /* LATIN SMALL LETTER DOTLESS I */ \
|
|||
|
|
UNI(0x3F, 0x00BF); /* INVERTED QUESTION MARK */ \
|
|||
|
|
UNI(0x40, 0x00C0); /* LATIN CAPITAL LETTER A WITH GRAVE */ \
|
|||
|
|
UNI(0x41, 0x00C1); /* LATIN CAPITAL LETTER A WITH ACUTE */ \
|
|||
|
|
UNI(0x42, 0x00C2); /* LATIN CAPITAL LETTER A WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x43, 0x00C3); /* LATIN CAPITAL LETTER A WITH TILDE */ \
|
|||
|
|
UNI(0x44, 0x00C4); /* LATIN CAPITAL LETTER A WITH DIAERESIS */ \
|
|||
|
|
UNI(0x45, 0x00C5); /* LATIN CAPITAL LETTER A WITH RING ABOVE */ \
|
|||
|
|
UNI(0x46, 0x00C6); /* LATIN CAPITAL LETTER AE */ \
|
|||
|
|
UNI(0x47, 0x00C7); /* LATIN CAPITAL LETTER C WITH CEDILLA */ \
|
|||
|
|
UNI(0x48, 0x00C8); /* LATIN CAPITAL LETTER E WITH GRAVE */ \
|
|||
|
|
UNI(0x49, 0x00C9); /* LATIN CAPITAL LETTER E WITH ACUTE */ \
|
|||
|
|
UNI(0x4A, 0x00CA); /* LATIN CAPITAL LETTER E WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x4B, 0x00CB); /* LATIN CAPITAL LETTER E WITH DIAERESIS */ \
|
|||
|
|
UNI(0x4C, 0x00CC); /* LATIN CAPITAL LETTER I WITH GRAVE */ \
|
|||
|
|
UNI(0x4D, 0x00CD); /* LATIN CAPITAL LETTER I WITH ACUTE */ \
|
|||
|
|
UNI(0x4E, 0x00CE); /* LATIN CAPITAL LETTER I WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x4F, 0x00CF); /* LATIN CAPITAL LETTER I WITH DIAERESIS */ \
|
|||
|
|
UNI(0x50, 0x011E); /* LATIN CAPITAL LETTER G WITH BREVE */ \
|
|||
|
|
UNI(0x51, 0x00D1); /* LATIN CAPITAL LETTER N WITH TILDE */ \
|
|||
|
|
UNI(0x52, 0x00D2); /* LATIN CAPITAL LETTER O WITH GRAVE */ \
|
|||
|
|
UNI(0x53, 0x00D3); /* LATIN CAPITAL LETTER O WITH ACUTE */ \
|
|||
|
|
UNI(0x54, 0x00D4); /* LATIN CAPITAL LETTER O WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x55, 0x00D5); /* LATIN CAPITAL LETTER O WITH TILDE */ \
|
|||
|
|
UNI(0x56, 0x00D6); /* LATIN CAPITAL LETTER O WITH DIAERESIS */ \
|
|||
|
|
UNI(0x57, 0x0152); /* LATIN CAPITAL LIGATURE OE */ \
|
|||
|
|
UNI(0x58, 0x00D8); /* LATIN CAPITAL LETTER O WITH STROKE */ \
|
|||
|
|
UNI(0x59, 0x00D9); /* LATIN CAPITAL LETTER U WITH GRAVE */ \
|
|||
|
|
UNI(0x5A, 0x00DA); /* LATIN CAPITAL LETTER U WITH ACUTE */ \
|
|||
|
|
UNI(0x5B, 0x00DB); /* LATIN CAPITAL LETTER U WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x5C, 0x00DC); /* LATIN CAPITAL LETTER U WITH DIAERESIS */ \
|
|||
|
|
UNI(0x5D, 0x0178); /* LATIN CAPITAL LETTER Y WITH DIAERESIS */ \
|
|||
|
|
UNI(0x5E, 0x015E); /* LATIN CAPITAL LETTER S WITH CEDILLA */ \
|
|||
|
|
UNI(0x5F, 0x00DF); /* LATIN SMALL LETTER SHARP S */ \
|
|||
|
|
UNI(0x60, 0x00E0); /* LATIN SMALL LETTER A WITH GRAVE */ \
|
|||
|
|
UNI(0x61, 0x00E1); /* LATIN SMALL LETTER A WITH ACUTE */ \
|
|||
|
|
UNI(0x62, 0x00E2); /* LATIN SMALL LETTER A WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x63, 0x00E3); /* LATIN SMALL LETTER A WITH TILDE */ \
|
|||
|
|
UNI(0x64, 0x00E4); /* LATIN SMALL LETTER A WITH DIAERESIS */ \
|
|||
|
|
UNI(0x65, 0x00E5); /* LATIN SMALL LETTER A WITH RING ABOVE */ \
|
|||
|
|
UNI(0x66, 0x00E6); /* LATIN SMALL LETTER AE */ \
|
|||
|
|
UNI(0x67, 0x00E7); /* LATIN SMALL LETTER C WITH CEDILLA */ \
|
|||
|
|
UNI(0x68, 0x00E8); /* LATIN SMALL LETTER E WITH GRAVE */ \
|
|||
|
|
UNI(0x69, 0x00E9); /* LATIN SMALL LETTER E WITH ACUTE */ \
|
|||
|
|
UNI(0x6A, 0x00EA); /* LATIN SMALL LETTER E WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x6B, 0x00EB); /* LATIN SMALL LETTER E WITH DIAERESIS */ \
|
|||
|
|
UNI(0x6C, 0x00EC); /* LATIN SMALL LETTER I WITH GRAVE */ \
|
|||
|
|
UNI(0x6D, 0x00ED); /* LATIN SMALL LETTER I WITH ACUTE */ \
|
|||
|
|
UNI(0x6E, 0x00EE); /* LATIN SMALL LETTER I WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x6F, 0x00EF); /* LATIN SMALL LETTER I WITH DIAERESIS */ \
|
|||
|
|
UNI(0x70, 0x011F); /* LATIN SMALL LETTER G WITH BREVE */ \
|
|||
|
|
UNI(0x71, 0x00F1); /* LATIN SMALL LETTER N WITH TILDE */ \
|
|||
|
|
UNI(0x72, 0x00F2); /* LATIN SMALL LETTER O WITH GRAVE */ \
|
|||
|
|
UNI(0x73, 0x00F3); /* LATIN SMALL LETTER O WITH ACUTE */ \
|
|||
|
|
UNI(0x74, 0x00F4); /* LATIN SMALL LETTER O WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x75, 0x00F5); /* LATIN SMALL LETTER O WITH TILDE */ \
|
|||
|
|
UNI(0x76, 0x00F6); /* LATIN SMALL LETTER O WITH DIAERESIS */ \
|
|||
|
|
UNI(0x77, 0x0153); /* LATIN SMALL LIGATURE OE */ \
|
|||
|
|
UNI(0x78, 0x00F8); /* LATIN SMALL LETTER O WITH STROKE */ \
|
|||
|
|
UNI(0x79, 0x00F9); /* LATIN SMALL LETTER U WITH GRAVE */ \
|
|||
|
|
UNI(0x7A, 0x00FA); /* LATIN SMALL LETTER U WITH ACUTE */ \
|
|||
|
|
UNI(0x7B, 0x00FB); /* LATIN SMALL LETTER U WITH CIRCUMFLEX */ \
|
|||
|
|
UNI(0x7C, 0x00FC); /* LATIN SMALL LETTER U WITH DIAERESIS */ \
|
|||
|
|
UNI(0x7D, 0x00FF); /* LATIN SMALL LETTER Y WITH DIAERESIS */ \
|
|||
|
|
UNI(0x7E, 0x015F); /* LATIN SMALL LETTER S WITH CEDILLA */ \
|
|||
|
|
} \
|
|||
|
|
end_CODEPAGE()
|
|||
|
|
/*
|
|||
|
|
* mentioned, but not documented in VT510 manual, etc., this uses
|
|||
|
|
* the ELOT927 table from Kermit 95:
|
|||
|
|
*/
|
|||
|
|
#define map_NRCS_Greek(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
MAP(0x61, 0x0391); /* CAPITAL GREEK LETTER ALPHA */ \
|
|||
|
|
MAP(0x62, 0x0392); /* CAPITAL GREEK LETTER BETA */ \
|
|||
|
|
MAP(0x63, 0x0393); /* CAPITAL GREEK LETTER GAMMA */ \
|
|||
|
|
MAP(0x64, 0x0394); /* CAPITAL GREEK LETTER DELTA */ \
|
|||
|
|
MAP(0x65, 0x0395); /* CAPITAL GREEK LETTER EPSILON */ \
|
|||
|
|
MAP(0x66, 0x0396); /* CAPITAL GREEK LETTER ZETA */ \
|
|||
|
|
MAP(0x67, 0x0397); /* CAPITAL GREEK LETTER ETA */ \
|
|||
|
|
MAP(0x68, 0x0398); /* CAPITAL GREEK LETTER THETA */ \
|
|||
|
|
MAP(0x69, 0x0399); /* CAPITAL GREEK LETTER IOTA */ \
|
|||
|
|
MAP(0x6a, 0x039a); /* CAPITAL GREEK LETTER KAPPA */ \
|
|||
|
|
MAP(0x6b, 0x039b); /* CAPITAL GREEK LETTER LAMDA */ \
|
|||
|
|
MAP(0x6c, 0x039c); /* CAPITAL GREEK LETTER MU */ \
|
|||
|
|
MAP(0x6d, 0x039d); /* CAPITAL GREEK LETTER NU */ \
|
|||
|
|
MAP(0x6e, 0x03a7); /* CAPITAL GREEK LETTER KSI (CHI) */ \
|
|||
|
|
MAP(0x6f, 0x039f); /* CAPITAL GREEK LETTER OMICRON */ \
|
|||
|
|
MAP(0x70, 0x03a0); /* CAPITAL GREEK LETTER PI */ \
|
|||
|
|
MAP(0x71, 0x03a1); /* CAPITAL GREEK LETTER RHO */ \
|
|||
|
|
MAP(0x72, 0x03a3); /* CAPITAL GREEK LETTER SIGMA */ \
|
|||
|
|
MAP(0x73, 0x03a4); /* CAPITAL GREEK LETTER TAU */ \
|
|||
|
|
MAP(0x74, 0x03a5); /* CAPITAL GREEK LETTER UPSILON */ \
|
|||
|
|
MAP(0x75, 0x03a6); /* CAPITAL GREEK LETTER FI (PHI) */ \
|
|||
|
|
MAP(0x76, 0x039e); /* CAPITAL GREEK LETTER XI */ \
|
|||
|
|
MAP(0x77, 0x03a8); /* CAPITAL GREEK LETTER PSI */ \
|
|||
|
|
MAP(0x78, 0x03a9); /* CAPITAL GREEK LETTER OMEGA */ \
|
|||
|
|
XXX(0x79, BLANK); /* unused */ \
|
|||
|
|
XXX(0x7a, BLANK); /* unused */ \
|
|||
|
|
}
|
|||
|
|
/* figure A-21 "DEC 7-Bit Hebrew Character Set" */
|
|||
|
|
#define map_NRCS_Hebrew(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
UNI(0x60, 0x05d0); /* HEBREW LETTER ALEF */ \
|
|||
|
|
UNI(0x61, 0x05d1); /* HEBREW LETTER BET */ \
|
|||
|
|
UNI(0x62, 0x05d2); /* HEBREW LETTER GIMEL */ \
|
|||
|
|
UNI(0x63, 0x05d3); /* HEBREW LETTER DALET */ \
|
|||
|
|
UNI(0x64, 0x05d4); /* HEBREW LETTER HE */ \
|
|||
|
|
UNI(0x65, 0x05d5); /* HEBREW LETTER VAV */ \
|
|||
|
|
UNI(0x66, 0x05d6); /* HEBREW LETTER ZAYIN */ \
|
|||
|
|
UNI(0x67, 0x05d7); /* HEBREW LETTER HET */ \
|
|||
|
|
UNI(0x68, 0x05d8); /* HEBREW LETTER TET */ \
|
|||
|
|
UNI(0x69, 0x05d9); /* HEBREW LETTER YOD */ \
|
|||
|
|
UNI(0x6a, 0x05da); /* HEBREW LETTER FINAL KAF */ \
|
|||
|
|
UNI(0x6b, 0x05db); /* HEBREW LETTER KAF */ \
|
|||
|
|
UNI(0x6c, 0x05dc); /* HEBREW LETTER LAMED */ \
|
|||
|
|
UNI(0x6d, 0x05dd); /* HEBREW LETTER FINAL MEM */ \
|
|||
|
|
UNI(0x6e, 0x05de); /* HEBREW LETTER MEM */ \
|
|||
|
|
UNI(0x6f, 0x05df); /* HEBREW LETTER FINAL NUN */ \
|
|||
|
|
UNI(0x70, 0x05e0); /* HEBREW LETTER NUN */ \
|
|||
|
|
UNI(0x71, 0x05e1); /* HEBREW LETTER SAMEKH */ \
|
|||
|
|
UNI(0x72, 0x05e2); /* HEBREW LETTER AYIN */ \
|
|||
|
|
UNI(0x73, 0x05e3); /* HEBREW LETTER FINAL PE */ \
|
|||
|
|
UNI(0x74, 0x05e4); /* HEBREW LETTER PE */ \
|
|||
|
|
UNI(0x75, 0x05e5); /* HEBREW LETTER FINAL TSADI */ \
|
|||
|
|
UNI(0x76, 0x05e6); /* HEBREW LETTER TSADI */ \
|
|||
|
|
UNI(0x77, 0x05e7); /* HEBREW LETTER QOF */ \
|
|||
|
|
UNI(0x78, 0x05e8); /* HEBREW LETTER RESH */ \
|
|||
|
|
UNI(0x79, 0x05e9); /* HEBREW LETTER SHIN */ \
|
|||
|
|
UNI(0x7a, 0x05ea); /* HEBREW LETTER TAV */ \
|
|||
|
|
}
|
|||
|
|
/* figure A-26 "DEC 7-Bit Turkish Character Set" */
|
|||
|
|
#define map_NRCS_Turkish(code) \
|
|||
|
|
switch (code) { \
|
|||
|
|
UNI(0x26, 0x011f); /* LATIN SMALL LETTER G WITH BREVE */ \
|
|||
|
|
UNI(0x40, 0x0130); /* LATIN CAPITAL LETTER I WITH DOT ABOVE */ \
|
|||
|
|
UNI(0x5b, 0x015e); /* LATIN CAPITAL LETTER S WITH CEDILLA */ \
|
|||
|
|
UNI(0x5c, 0x00d6); /* LATIN CAPITAL LETTER O WITH DIAERESIS */ \
|
|||
|
|
UNI(0x5d, 0x00c7); /* LATIN CAPITAL LETTER C WITH CEDILLA */ \
|
|||
|
|
UNI(0x5e, 0x00dC); /* LATIN CAPITAL LETTER U WITH DIAERESIS */ \
|
|||
|
|
UNI(0x60, 0x011e); /* LATIN CAPITAL LETTER G WITH BREVE */ \
|
|||
|
|
UNI(0x7b, 0x015f); /* LATIN SMALL LETTER S WITH CEDILLA */ \
|
|||
|
|
UNI(0x7c, 0x00f6); /* LATIN SMALL LETTER O WITH DIAERESIS */ \
|
|||
|
|
UNI(0x7d, 0x00e7); /* LATIN SMALL LETTER C WITH CEDILLA */ \
|
|||
|
|
UNI(0x7e, 0x00fc); /* LATIN SMALL LETTER U WITH DIAERESIS */ \
|
|||
|
|
}
|
|||
|
|
#else
|
|||
|
|
#define map_DEC_Cyrillic(code) /* nothing */
|
|||
|
|
#define map_DEC_Greek_Supp(code) /* nothing */
|
|||
|
|
#define map_DEC_Hebrew_Supp(code) /* nothing */
|
|||
|
|
#define map_DEC_Technical(code) /* nothing */
|
|||
|
|
#define map_DEC_Turkish_Supp(code) /* nothing */
|
|||
|
|
#define map_ISO_Greek_Supp(code) /* nothing */
|
|||
|
|
#define map_ISO_Hebrew(code) /* nothing */
|
|||
|
|
#define map_ISO_Latin_5(code) /* nothing */
|
|||
|
|
#define map_ISO_Latin_Cyrillic(code) /* nothing */
|
|||
|
|
#define map_NRCS_Greek(code) /* nothing */
|
|||
|
|
#define map_NRCS_Hebrew(code) /* nothing */
|
|||
|
|
#define map_NRCS_Turkish(code) /* nothing */
|
|||
|
|
#endif /* OPT_WIDE_CHARS */
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
* Translate an input keysym to the corresponding NRC keysym.
|
|||
|
|
*/
|
|||
|
|
unsigned
|
|||
|
|
xtermCharSetIn(XtermWidget xw, unsigned code, DECNRCM_codes charset)
|
|||
|
|
{
|
|||
|
|
TScreen *screen = TScreenOf(xw);
|
|||
|
|
#define MAP(to, from) case from: code = to; break
|
|||
|
|
|
|||
|
|
#if OPT_WIDE_CHARS
|
|||
|
|
#define UNI(to, from) case from: if (screen->utf8_nrc_mode) code = to; break
|
|||
|
|
#else
|
|||
|
|
#define UNI(to, from) case from: break
|
|||
|
|
#endif
|
|||
|
|
|
|||
|
|
#define XXX(to, from) /* no defined mapping to 0..255 */
|
|||
|
|
|
|||
|
|
TRACE(("CHARSET-IN GL=%s(G%d) GR=%s(G%d) SS%d\n\t%s\n",
|
|||
|
|
visibleScsCode(screen->gsets[screen->curgl]), screen->curgl,
|
|||
|
|
visibleScsCode(screen->gsets[screen->curgr]), screen->curgr,
|
|||
|
|
screen->curss,
|
|||
|
|
visibleUChar(code)));
|
|||
|
|
|
|||
|
|
(void) screen;
|
|||
|
|
switch (charset) {
|
|||
|
|
case nrc_British: /* United Kingdom set (or Latin 1) */
|
|||
|
|
if (code == XK_sterling)
|
|||
|
|
code = 0x23;
|
|||
|
|
code &= 0x7f;
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Alt_Chars:
|
|||
|
|
case nrc_DEC_Alt_Graphics:
|
|||
|
|
case nrc_ASCII:
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Spec_Graphic:
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Supp:
|
|||
|
|
map_DEC_Supp_Graphic(code, code &= 0x7f);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Supp_Graphic:
|
|||
|
|
map_DEC_Supp_Graphic(code, code |= 0x80);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Technical:
|
|||
|
|
map_DEC_Technical(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Dutch:
|
|||
|
|
map_NRCS_Dutch(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Finnish:
|
|||
|
|
case nrc_Finnish2:
|
|||
|
|
map_NRCS_Finnish(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_French:
|
|||
|
|
case nrc_French2:
|
|||
|
|
map_NRCS_French(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_French_Canadian:
|
|||
|
|
map_NRCS_French_Canadian(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_German:
|
|||
|
|
map_NRCS_German(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Greek:
|
|||
|
|
map_NRCS_Greek(code); /* FIXME - ELOT? */
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Greek_Supp:
|
|||
|
|
map_DEC_Greek_Supp(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_ISO_Greek_Supp:
|
|||
|
|
map_ISO_Greek_Supp(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Hebrew_Supp:
|
|||
|
|
map_DEC_Hebrew_Supp(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Hebrew:
|
|||
|
|
map_NRCS_Hebrew(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_ISO_Hebrew_Supp:
|
|||
|
|
map_ISO_Hebrew(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Italian:
|
|||
|
|
map_NRCS_Italian(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_ISO_Latin_5_Supp:
|
|||
|
|
map_ISO_Latin_5(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_ISO_Latin_Cyrillic:
|
|||
|
|
map_ISO_Latin_Cyrillic(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Norwegian_Danish:
|
|||
|
|
case nrc_Norwegian_Danish2:
|
|||
|
|
case nrc_Norwegian_Danish3:
|
|||
|
|
map_NRCS_Norwegian_Danish(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Portugese:
|
|||
|
|
map_NRCS_Portuguese(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_SCS_NRCS: /* vt5xx - probably Serbo/Croatian */
|
|||
|
|
/* FIXME */
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Spanish:
|
|||
|
|
map_NRCS_Spanish(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Swedish2:
|
|||
|
|
case nrc_Swedish:
|
|||
|
|
map_NRCS_Swedish(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Swiss:
|
|||
|
|
map_NRCS_Swiss(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Turkish:
|
|||
|
|
map_NRCS_Turkish(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Turkish_Supp:
|
|||
|
|
map_DEC_Turkish_Supp(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Cyrillic:
|
|||
|
|
map_DEC_Cyrillic(code);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_British_Latin_1:
|
|||
|
|
case nrc_Russian:
|
|||
|
|
case nrc_French_Canadian2:
|
|||
|
|
case nrc_Unknown:
|
|||
|
|
default: /* any character sets we don't recognize */
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
code &= 0x7f; /* NRC in any case is 7-bit */
|
|||
|
|
TRACE(("->\t%s\n",
|
|||
|
|
visibleUChar(code)));
|
|||
|
|
return code;
|
|||
|
|
#undef MAP
|
|||
|
|
#undef UNI
|
|||
|
|
#undef XXX
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
* Translate a string to the display form. This assumes the font has the
|
|||
|
|
* DEC graphic characters in cells 0-31, and otherwise is ISO-8859-1.
|
|||
|
|
*/
|
|||
|
|
int
|
|||
|
|
xtermCharSetOut(XtermWidget xw, IChar *buf, IChar *ptr, DECNRCM_codes leftset)
|
|||
|
|
{
|
|||
|
|
IChar *s;
|
|||
|
|
TScreen *screen = TScreenOf(xw);
|
|||
|
|
int count = 0;
|
|||
|
|
DECNRCM_codes rightset = screen->gsets[(int) (screen->curgr)];
|
|||
|
|
|
|||
|
|
#define MAP(from, to) case from: chr = to; break
|
|||
|
|
|
|||
|
|
#if OPT_WIDE_CHARS
|
|||
|
|
#define UNI(from, to) case from: if (screen->utf8_nrc_mode) chr = to; break
|
|||
|
|
#define XXX(from, to) UNI(from, to)
|
|||
|
|
#else
|
|||
|
|
#define UNI(old, new) chr = old; break
|
|||
|
|
#define XXX(from, to) /* nothing */
|
|||
|
|
#endif
|
|||
|
|
|
|||
|
|
TRACE(("CHARSET-OUT GL=%s(G%d) GR=%s(G%d) SS%d\n\t%s\n",
|
|||
|
|
visibleScsCode(leftset), screen->curgl,
|
|||
|
|
visibleScsCode(rightset), screen->curgr,
|
|||
|
|
screen->curss,
|
|||
|
|
visibleIChars(buf, (unsigned) (ptr - buf))));
|
|||
|
|
|
|||
|
|
for (s = buf; s < ptr; ++s) {
|
|||
|
|
int eight = CharOf(E2A(*s));
|
|||
|
|
int seven = eight & 0x7f;
|
|||
|
|
DECNRCM_codes cs = (eight >= 128) ? rightset : leftset;
|
|||
|
|
int chr = eight;
|
|||
|
|
|
|||
|
|
count++;
|
|||
|
|
#if OPT_WIDE_CHARS
|
|||
|
|
/*
|
|||
|
|
* This is only partly right - prevent inadvertent remapping of
|
|||
|
|
* the replacement character and other non-8bit codes into bogus
|
|||
|
|
* 8bit codes.
|
|||
|
|
*/
|
|||
|
|
if (screen->utf8_mode || screen->utf8_nrc_mode) {
|
|||
|
|
if (*s > 255)
|
|||
|
|
continue;
|
|||
|
|
}
|
|||
|
|
#endif
|
|||
|
|
if (*s < 32)
|
|||
|
|
continue;
|
|||
|
|
|
|||
|
|
switch (cs) {
|
|||
|
|
case nrc_British_Latin_1:
|
|||
|
|
/* FALLTHRU */
|
|||
|
|
case nrc_British: /* United Kingdom set (or Latin 1) */
|
|||
|
|
if ((xw->flags & NATIONAL)
|
|||
|
|
|| (screen->vtXX_level <= 1)) {
|
|||
|
|
if ((xw->flags & NATIONAL)) {
|
|||
|
|
chr = seven;
|
|||
|
|
}
|
|||
|
|
if (chr == 0x23) {
|
|||
|
|
chr = XTERM_POUND;
|
|||
|
|
#if OPT_WIDE_CHARS
|
|||
|
|
if (screen->utf8_nrc_mode) {
|
|||
|
|
chr = 0xa3;
|
|||
|
|
}
|
|||
|
|
#endif
|
|||
|
|
}
|
|||
|
|
} else {
|
|||
|
|
chr = (seven | 0x80);
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Alt_Chars:
|
|||
|
|
case nrc_DEC_Alt_Graphics:
|
|||
|
|
case nrc_ASCII:
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Spec_Graphic:
|
|||
|
|
if (seven > 0x5f && seven <= 0x7e) {
|
|||
|
|
#if OPT_WIDE_CHARS
|
|||
|
|
if (screen->utf8_mode || screen->utf8_nrc_mode)
|
|||
|
|
chr = (int) dec2ucs(screen, (unsigned) (seven - 0x5f));
|
|||
|
|
else
|
|||
|
|
#endif
|
|||
|
|
chr = seven - 0x5f;
|
|||
|
|
} else if (chr == 0x5f) {
|
|||
|
|
chr = 0;
|
|||
|
|
} else {
|
|||
|
|
chr = seven;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Supp:
|
|||
|
|
map_DEC_Supp_Graphic(chr = seven, chr |= 0x80);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Supp_Graphic:
|
|||
|
|
map_DEC_Supp_Graphic(chr = seven, chr |= 0x80);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Technical:
|
|||
|
|
map_DEC_Technical(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Dutch:
|
|||
|
|
map_NRCS_Dutch(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Finnish:
|
|||
|
|
case nrc_Finnish2:
|
|||
|
|
map_NRCS_Finnish(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_French:
|
|||
|
|
case nrc_French2:
|
|||
|
|
map_NRCS_French(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_French_Canadian:
|
|||
|
|
case nrc_French_Canadian2:
|
|||
|
|
map_NRCS_French_Canadian(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_German:
|
|||
|
|
map_NRCS_German(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Greek:
|
|||
|
|
map_NRCS_Greek(chr = seven); /* FIXME - ELOT? */
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Greek_Supp:
|
|||
|
|
map_DEC_Greek_Supp(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_ISO_Greek_Supp:
|
|||
|
|
map_ISO_Greek_Supp(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Hebrew_Supp:
|
|||
|
|
map_DEC_Hebrew_Supp(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Hebrew:
|
|||
|
|
map_NRCS_Hebrew(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_ISO_Hebrew_Supp:
|
|||
|
|
map_ISO_Hebrew(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Italian:
|
|||
|
|
map_NRCS_Italian(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_ISO_Latin_5_Supp:
|
|||
|
|
map_ISO_Latin_5(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_ISO_Latin_Cyrillic:
|
|||
|
|
map_ISO_Latin_Cyrillic(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Norwegian_Danish:
|
|||
|
|
case nrc_Norwegian_Danish2:
|
|||
|
|
case nrc_Norwegian_Danish3:
|
|||
|
|
map_NRCS_Norwegian_Danish(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Portugese:
|
|||
|
|
map_NRCS_Portuguese(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_SCS_NRCS: /* vt5xx - probably Serbo/Croatian */
|
|||
|
|
/* FIXME */
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Spanish:
|
|||
|
|
map_NRCS_Spanish(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Swedish2:
|
|||
|
|
case nrc_Swedish:
|
|||
|
|
map_NRCS_Swedish(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Swiss:
|
|||
|
|
map_NRCS_Swiss(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Turkish:
|
|||
|
|
map_NRCS_Turkish(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_DEC_Turkish_Supp:
|
|||
|
|
map_DEC_Turkish_Supp(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Cyrillic:
|
|||
|
|
map_DEC_Cyrillic(chr = seven);
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case nrc_Russian:
|
|||
|
|
case nrc_Unknown:
|
|||
|
|
default: /* any character sets we don't recognize */
|
|||
|
|
count--;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
/*
|
|||
|
|
* The state machine already treated DEL as a nonprinting and
|
|||
|
|
* nonspacing character. If we have DEL now, simply render
|
|||
|
|
* it as a blank.
|
|||
|
|
*/
|
|||
|
|
if (chr == ANSI_DEL)
|
|||
|
|
chr = ' ';
|
|||
|
|
*s = (IChar) A2E(chr);
|
|||
|
|
}
|
|||
|
|
TRACE(("%d\t%s\n",
|
|||
|
|
count,
|
|||
|
|
visibleIChars(buf, (unsigned) (ptr - buf))));
|
|||
|
|
return count;
|
|||
|
|
#undef MAP
|
|||
|
|
#undef UNI
|
|||
|
|
#undef XXX
|
|||
|
|
}
|