/* "$XConsortium: Lookup.c,v 1.12 90/12/11 13:19:10 rws Exp $"; */ /* * Copyright 1988, 1989 by the Massachusetts Institute of Technology * * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose and without fee is hereby granted, provided * that the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation, and that the name of M.I.T. not be used in advertising * or publicity pertaining to distribution of the software without specific, * written prior permission. M.I.T. makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. * */ #include #include #define XK_LATIN1 #define XK_PUBLISHING #include #if __STDC__ #define Const const #else #define Const /**/ #endif /* bit (1<> 8) == kset)) { count = 1; switch (keysymSet) { case sKana: buffer[0] = (symbol & 0xff); if (buffer[0] == 0x7e) count = 0; break; case sCyrillic: buffer[0] = cyrillic[symbol & 0x7f]; break; case sGreek: buffer[0] = greek[symbol & 0x7f]; if (!buffer[0]) count = 0; break; default: buffer[0] = (symbol & 0xff); break; } } else if ((keysymSet != 0) && (count == 1) && (((unsigned char *)buffer)[0] == symbol) && (symbol & 0x80) && !(latin1[symbol & 0x7f] & (1 << kset))) { if ((keysymSet == sHebrew) && (symbol == XK_multiply)) buffer[0] = 0xaa; else if ((keysymSet == sHebrew) && (symbol == XK_division)) buffer[0] = 0xba; else if ((keysymSet == sCyrillic) && (symbol == XK_section)) buffer[0] = 0xfd; else if ((keysymSet == sX0201) && (symbol == XK_yen)) buffer[0] = 0x5c; else count = 0; } else if (count != 0) { if ((keysymSet == sX0201) && ((symbol == XK_backslash) || (symbol == XK_asciitilde))) count = 0; } else if (((symbol >> 8) == sLatin2) && (symbol & 0x80) && (latin2[symbol & 0x7f] & (1 << kset))) { buffer[0] = (symbol & 0xff); count = 1; } else if ((keysymSet == sGreek) && ((symbol == XK_leftsinglequotemark) || (symbol == XK_rightsinglequotemark))) { buffer[0] = symbol - (XK_leftsinglequotemark - 0xa1); count = 1; } return count; } /* produces ISO 8859-1 encoding plus ASCII control */ int XmuLookupLatin1 (event, buffer, nbytes, keysym, status) register XKeyEvent *event; char *buffer; int nbytes; KeySym *keysym; XComposeStatus *status; { return XLookupString(event, buffer, nbytes, keysym, status); } /* produces ISO 8859-2 encoding plus ASCII control */ int XmuLookupLatin2 (event, buffer, nbytes, keysym, status) register XKeyEvent *event; char *buffer; int nbytes; KeySym *keysym; XComposeStatus *status; { return XmuLookupString(event, buffer, nbytes, keysym, status, sLatin2); } /* produces ISO 8859-3 encoding plus ASCII control */ int XmuLookupLatin3 (event, buffer, nbytes, keysym, status) register XKeyEvent *event; char *buffer; int nbytes; KeySym *keysym; XComposeStatus *status; { return XmuLookupString(event, buffer, nbytes, keysym, status, sLatin3); } /* produces ISO 8859-4 encoding plus ASCII control */ int XmuLookupLatin4 (event, buffer, nbytes, keysym, status) register XKeyEvent *event; char *buffer; int nbytes; KeySym *keysym; XComposeStatus *status; { return XmuLookupString(event, buffer, nbytes, keysym, status, sLatin4); } /* produces ISO 8859-1 GL plus Katakana plus ASCII control */ int XmuLookupKana (event, buffer, nbytes, keysym, status) register XKeyEvent *event; char *buffer; int nbytes; KeySym *keysym; XComposeStatus *status; { return XmuLookupString(event, buffer, nbytes, keysym, status, sKana); } /* produces JIS X0201-1976 (8-bit) */ int XmuLookupJISX0201 (event, buffer, nbytes, keysym, status) register XKeyEvent *event; char *buffer; int nbytes; KeySym *keysym; XComposeStatus *status; { return XmuLookupString(event, buffer, nbytes, keysym, status, sX0201); } /* produces ISO 8859-6 encoding plus ASCII control */ int XmuLookupArabic (event, buffer, nbytes, keysym, status) register XKeyEvent *event; char *buffer; int nbytes; KeySym *keysym; XComposeStatus *status; { return XmuLookupString(event, buffer, nbytes, keysym, status, sArabic); } /* produces ISO/IEC 8859-5 encoding plus ASCII control */ int XmuLookupCyrillic (event, buffer, nbytes, keysym, status) register XKeyEvent *event; char *buffer; int nbytes; KeySym *keysym; XComposeStatus *status; { return XmuLookupString(event, buffer, nbytes, keysym, status, sCyrillic); } /* produces ISO 8859-7 encoding plus ASCII control */ int XmuLookupGreek (event, buffer, nbytes, keysym, status) register XKeyEvent *event; char *buffer; int nbytes; KeySym *keysym; XComposeStatus *status; { return XmuLookupString(event, buffer, nbytes, keysym, status, sGreek); } /* XXX this character set needs work */ int XmuLookupAPL (event, buffer, nbytes, keysym, status) register XKeyEvent *event; char *buffer; int nbytes; KeySym *keysym; XComposeStatus *status; { return XmuLookupString(event, buffer, nbytes, keysym, status, sAPL); } /* produces ISO 8859-8 encoding plus ASCII control */ int XmuLookupHebrew (event, buffer, nbytes, keysym, status) register XKeyEvent *event; char *buffer; int nbytes; KeySym *keysym; XComposeStatus *status; { return XmuLookupString(event, buffer, nbytes, keysym, status, sHebrew); }