x3270 登陆mainframe工具

/* * Copyright (c) 2008-2009, Paul Mattes. * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions are met: * * Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * * Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * Neither the names of Paul Mattes nor the names of his contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY PAUL MATTES "AS IS" AND ANY EXPRESS OR IMPLIED * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO * EVENT SHALL PAUL MATTES BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ /* * unicode.c * A Windows console-based 3270 Terminal Emulator * DBCS EBCDIC/Unicode translation functions */ #include "globals.h" #include <stdio.h> #if !defined(_WIN32) /*[*/ #include <strings.h> #endif /*]*/ #include "3270ds.h" #include "unicodec.h" #include "unicode_dbcsc.h" #include "utf8c.h" /* * DBCS EBCDIC-to-Unicode translation tables. */ #if defined(X3270_DBCS) /*[*/ typedef struct { char *name; const char *codepage; const char *display_charset; const char *u2ebc[512]; /* Unicode to EBCDIC vectors */ const char *ebc2u[512]; /* EBCDIC to Unicode vectors */ } uni16_t; static uni16_t uni16[] = { { "cp930", "0x080b012c" /* 2059, 300 */, "jisx0208.1983-0,iso10646-1", /* Unicode to EBCDIC DBCS translation table for ibm-300_P110-1997 */ { /* 0000 */ NULL, /* 0080 */ "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x42\x6a\x44\x6a\x44\x60\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x44\xed\x44\x4b\x00\x00\x00\x00\x44\x50\x00\x00\x43\x79\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x44\x7a\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x44\x7b\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", /* 0100 */ NULL, /* 0180 */ NULL, /* 0200 */ NULL, /* 0280 */ NULL, /* 0300 */ NULL, /* 0380 */ "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x41\x61\x41\x62\x41\x63\x41\x64\x41\x65\x41\x66\x41\x67\x41\x68\x41\x69\x41\x6a\x41\x6b\x41\x6c\x41\x6d\x41\x6e\x41\x6f\x41\x70\x41\x71\x00\x00\x41\x72\x41\x73\x41\x74\x41\x75\x41\x76\x41\x77\x41\x78\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x41\x41\x41\x42\x41\x43\x41\x44\x41\x45\x41\x46\x41\x47\x41\x48\x41\x49\x41\x4a\x41\x4b\x41\x4c\x41\x4d\x41\x4e\x41\x4f\x41\x50\x41\x51\x00\x00\x41\x52\x41\x53\x41\x54\x41\x55\x41\x56\x41\x57\x41\x58\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", /* 0400 */ "\x00\x00\x41\xc6\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x41\xc0\x41\xc1\x41\xc2\x41\xc3\x41\xc4\x41\xc5\x41\xc7\x41\xc8\x41\xc9\x41\xca\x41\xcb\x41\xcc\x41\xcd\x41\xce\x41\xcf\x41\xd0\x41\xd1\x41\xd2\x41\xd3\x41\xd4\x41\xd5\x41\xd6\x41\xd7\x41\xd8\x41\xd9\x41\xda\x41\xdb\x41\xdc\x41\xdd\x41\xde\x41\xdf\x41\xe0\x41\x80\x41\x81\x41\x82\x41\x83\x41\x84\x41\x85\x41\x87\x41\x88\x41\x89\x41\x8a\x41\x8b\x41\x8c\x41\x8d\x41\x8e\x41\x8f\x41\x90\x41\x91\x41\x92\x41\x93\x41\x94\x41\x95\x41\x96\x41\x97\x41\x98\x41\x99\x41\x9a\x41\x9b\x41\x9c\x41\x9d\x41\x9e\x41\x9f\x41\xa0\x00\x00\x41\x86\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", /* 0480 */ NULL, /* 0500 */ NULL, /* 0580 */ NULL, /* 0600 */ NULL, /* 0680 */ NULL, /* 0700 */ NULL, /* 0780 */ NULL, /* 0800 */ NULL, /* 0880 */ NULL, /* 0900 */ NULL, /* 0980 */ NULL, /* 0a00 */ NULL, /* 0a80 */ NULL, /* 0b00 */ NULL, /* 0b80 */ NULL, /* 0c00 */ NULL, /* 0c80 */ NULL, /* 0d00 */ NULL, /* 0d80 */ NULL, /* 0e00 */ NULL, /* 0e80 */ NULL, /* 0f00 */ NULL, /* 0f80 */ NULL, /* 1000 */ NULL, /* 1080 */ NULL, /* 1100 */ NULL, /* 1180 */ NULL, /* 1200 */ NULL, /* 1280 */ NULL, /* 1300 */ NULL, /* 1380 */ NULL, /* 1400 */ NULL, /* 1480 */ NULL, /* 1500 */ NULL, /* 1580 */ NULL, /* 1600 */ NULL, /* 1680 */ NULL, /* 1700 */ NULL, /* 1780 */ NULL, /* 1800 */ NULL, /* 1880 */ NULL, /* 1900 */ NULL, /* 1980 */ NULL, /* 1a00 */ NULL, /* 1a80 */ NULL, /* 1b00 */ NULL, /* 1b80 */ NULL, /* 1c00 */ NULL, /* 1c80 */ NULL, /* 1d00 */ NULL, /* 1d80 */ NULL, /* 1e00 */ NULL, /* 1e80 */ NULL, /* 1f00 */ NULL, /* 1f80 */ NULL, /* 2000 */ "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x44\x5a\x00\x00\x00\x00\x00\x00\x44\x4a\x00\x00\x44\x7c\x00\x00\x44\x61\x44\x71\x00\x00\x00\x00\x44\x62\x44\x72\x00\x00\x00\x00\x43\x77\x43\x78\x00\x00\x00\x00\x00\x00\x44\x7e\x44\x7f\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x43\x73\x00\x00\x44\xee\x44\xef\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x44\x6b\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00", /* 2080 */ NULL, /* 2100 */ "\x00\x00\x00\x00\x00\x00\x44\x4e\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x44\x6e\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x44\x6f\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x0