unitogb.c

一个操作系统源代码 用于嵌入式设备 在Vc++环境下仿真 成功移植到多款处理器上

/***************************************************************************************\
 *
 * Copyright (c) 2001 National ASIC Center, All Rights Reserved
 *
 * File Name:	toun.c
 * Programmer:	wuxufang
 * 
 * Date of Creation:	2001/08/28
 * Date of Last Modify:	2001/08/30
 *
 * Description:	This program include four functions,it is used to deal with the string;
 *				
 * Note:		None
 *
 * Extern Function List:
 * Function Name			Declaration File		Definition File
 *
 * Untogb:it is used to change a code from Unicode to GB;
 *
 ***************************************************************************************
 *
 * Modification History
 *
 * 2001/08/28		by wuxufang		create file.
 *
\***************************************************************************************/

#include<sys\unicode.h>

              
const WORD unicode_gb[7445][2]={
0x00A4,0x2168,0x00A7,0x216C,0x00A8,0x2127,0x00B0,0x2163,0x00B1,
0x2140,0x00D7,0x2141,0x00E0,0x2824,0x00E1,0x2822,0x00E8,0x2828,
0x00E9,0x2826,0x00EA,0x283A,0x00EC,0x282C,0x00ED,0x282A,0x00F2,
0x2830,0x00F3,0x282E,0x00F7,0x2142,0x00F9,0x2834,0x00FA,0x2832,
0x00FC,0x2839,0x0101,0x2821,0x0113,0x2825,0x011B,0x2827,0x012B,
0x2829,0x014D,0x282D,0x016B,0x2831,0x01CE,0x2823,0x01D0,0x282B,
0x01D2,0x282F,0x01D4,0x2833,0x01D6,0x2835,0x01D8,0x2836,0x01DA,
0x2837,0x01DC,0x2838,0x02C7,0x2126,0x02C9,0x2125,0x0391,0x2621,
0x0392,0x2622,0x0393,0x2623,0x0394,0x2624,0x0395,0x2625,0x0396,
0x2626,0x0397,0x2627,0x0398,0x2628,0x0399,0x2629,0x039A,0x262A,
0x039B,0x262B,0x039C,0x262C,0x039D,0x262D,0x039E,0x262E,0x039F,
0x262F,0x03A0,0x2630,0x03A1,0x2631,0x03A3,0x2632,0x03A4,0x2633,
0x03A5,0x2634,0x03A6,0x2635,0x03A7,0x2636,0x03A8,0x2637,0x03A9,
0x2638,0x03B1,0x2641,0x03B2,0x2642,0x03B3,0x2643,0x03B4,0x2644,
0x03B5,0x2645,0x03B6,0x2646,0x03B7,0x2647,0x03B8,0x2648,0x03B9,
0x2649,0x03BA,0x264A,0x03BB,0x264B,0x03BC,0x264C,0x03BD,0x264D,
0x03BE,0x264E,0x03BF,0x264F,0x03C0,0x2650,0x03C1,0x2651,0x03C3,
0x2652,0x03C4,0x2653,0x03C5,0x2654,0x03C6,0x2655,0x03C7,0x2656,
0x03C8,0x2657,0x03C9,0x2658,0x0401,0x2727,0x0410,0x2721,0x0411,
0x2722,0x0412,0x2723,0x0413,0x2724,0x0414,0x2725,0x0415,0x2726,
0x0416,0x2728,0x0417,0x2729,0x0418,0x272A,0x0419,0x272B,0x041A,
0x272C,0x041B,0x272D,0x041C,0x272E,0x041D,0x272F,0x041E,0x2730,
0x041F,0x2731,0x0420,0x2732,0x0421,0x2733,0x0422,0x2734,0x0423,
0x2735,0x0424,0x2736,0x0425,0x2737,0x0426,0x2738,0x0427,0x2739,
0x0428,0x273A,0x0429,0x273B,0x042A,0x273C,0x042B,0x273D,0x042C,
0x273E,0x042D,0x273F,0x042E,0x2740,0x042F,0x2741,0x0430,0x2751,
0x0431,0x2752,0x0432,0x2753,0x0433,0x2754,0x0434,0x2755,0x0435,
0x2756,0x0436,0x2758,0x0437,0x2759,0x0438,0x275A,0x0439,0x275B,
0x043A,0x275C,0x043B,0x275D,0x043C,0x275E,0x043D,0x275F,0x043E,
0x2760,0x043F,0x2761,0x0440,0x2762,0x0441,0x2763,0x0442,0x2764,
0x0443,0x2765,0x0444,0x2766,0x0445,0x2767,0x0446,0x2768,0x0447,
0x2769,0x0448,0x276A,0x0449,0x276B,0x044A,0x276C,0x044B,0x276D,
0x044C,0x276E,0x044D,0x276F,0x044E,0x2770,0x044F,0x2771,0x0451,
0x2757,0x2015,0x212A,0x2016,0x212C,0x2018,0x212E,0x2019,0x212F,
0x201C,0x2130,0x201D,0x2131,0x2026,0x212D,0x2030,0x216B,0x2032,
0x2164,0x2033,0x2165,0x203B,0x2179,0x2103,0x2166,0x2116,0x216D,
0x2160,0x2271,0x2161,0x2272,0x2162,0x2273,0x2163,0x2274,0x2164,
0x2275,0x2165,0x2276,0x2166,0x2277,0x2167,0x2278,0x2168,0x2279,
0x2169,0x227A,0x216A,0x227B,0x216B,0x227C,0x2190,0x217B,0x2191,
0x217C,0x2192,0x217A,0x2193,0x217D,0x2208,0x214A,0x220F,0x2147,
0x2211,0x2146,0x221A,0x214C,0x221D,0x2158,0x221E,0x215E,0x2220,
0x214F,0x2225,0x214E,0x2227,0x2144,0x2228,0x2145,0x2229,0x2149,
0x222A,0x2148,0x222B,0x2152,0x222E,0x2153,0x2234,0x2160,0x2235,
0x215F,0x2236,0x2143,0x2237,0x214B,0x223D,0x2157,0x2248,0x2156,
0x224C,0x2155,0x2260,0x2159,0x2261,0x2154,0x2264,0x215C,0x2265,
0x215D,0x226E,0x215A,0x226F,0x215B,0x2299,0x2151,0x22A5,0x214D,
0x2312,0x2150,0x2460,0x2259,0x2461,0x225A,0x2462,0x225B,0x2463,
0x225C,0x2464,0x225D,0x2465,0x225E,0x2466,0x225F,0x2467,0x2260,
0x2468,0x2261,0x2469,0x2262,0x2474,0x2245,0x2475,0x2246,0x2476,
0x2247,0x2477,0x2248,0x2478,0x2249,0x2479,0x224A,0x247A,0x224B,
0x247B,0x224C,0x247C,0x224D,0x247D,0x224E,0x247E,0x224F,0x247F,
0x2250,0x2480,0x2251,0x2481,0x2252,0x2482,0x2253,0x2483,0x2254,
0x2484,0x2255,0x2485,0x2256,0x2486,0x2257,0x2487,0x2258,0x2488,
0x2231,0x2489,0x2232,0x248A,0x2233,0x248B,0x2234,0x248C,0x2235,
0x248D,0x2236,0x248E,0x2237,0x248F,0x2238,0x2490,0x2239,0x2491,
0x223A,0x2492,0x223B,0x2493,0x223C,0x2494,0x223D,0x2495,0x223E,
0x2496,0x223F,0x2497,0x2240,0x2498,0x2241,0x2499,0x2242,0x249A,
0x2243,0x249B,0x2244,0x2500,0x2924,0x2501,0x2925,0x2502,0x2926,
0x2503,0x2927,0x2504,0x2928,0x2505,0x2929,0x2506,0x292A,0x2507,
0x292B,0x2508,0x292C,0x2509,0x292D,0x250A,0x292E,0x250B,0x292F,
0x250C,0x2930,0x250D,0x2931,0x250E,0x2932,0x250F,0x2933,0x2510,
0x2934,0x2511,0x2935,0x2512,0x2936,0x2513,0x2937,0x2514,0x2938,
0x2515,0x2939,0x2516,0x293A,0x2517,0x293B,0x2518,0x293C,0x2519,
0x293D,0x251A,0x293E,0x251B,0x293F,0x251C,0x2940,0x251D,0x2941,
0x251E,0x2942,0x251F,0x2943,0x2520,0x2944,0x2521,0x2945,0x2522,
0x2946,0x2523,0x2947,0x2524,0x2948,0x2525,0x2949,0x2526,0x294A,
0x2527,0x294B,0x2528,0x294C,0x2529,0x294D,0x252A,0x294E,0x252B,
0x294F,0x252C,0x2950,0x252D,0x2951,0x252E,0x2952,0x252F,0x2953,
0x2530,0x2954,0x2531,0x2955,0x2532,0x2956,0x2533,0x2957,0x2534,
0x2958,0x2535,0x2959,0x2536,0x295A,0x2537,0x295B,0x2538,0x295C,
0x2539,0x295D,0x253A,0x295E,0x253B,0x295F,0x253C,0x2960,0x253D,
0x2961,0x253E,0x2962,0x253F,0x2963,0x2540,0x2964,0x2541,0x2965,
0x2542,0x2966,0x2543,0x2967,0x2544,0x2968,0x2545,0x2969,0x2546,
0x296A,0x2547,0x296B,0x2548,0x296C,0x2549,0x296D,0x254A,0x296E,
0x254B,0x296F,0x25A0,0x2176,0x25A1,0x2175,0x25B2,0x2178,0x25B3,
0x2177,0x25C6,0x2174,0x25C7,0x2173,0x25CB,0x2170,0x25CE,0x2172,
0x25CF,0x2171,0x2605,0x216F,0x2606,0x216E,0x2640,0x2162,0x2642,
0x2161,0x3000,0x2121,0x3001,0x2122,0x3002,0x2123,0x3003,0x2128,
0x3005,0x2129,0x3008,0x2134,0x3009,0x2135,0x300A,0x2136,0x300B,
0x2137,0x300C,0x2138,0x300D,0x2139,0x300E,0x213A,0x300F,0x213B,
0x3010,0x213E,0x3011,0x213F,0x3013,0x217E,0x3014,0x2132,0x3015,
0x2133,0x3016,0x213C,0x3017,0x213D,0x3041,0x2421,0x3042,0x2422,
0x3043,0x2423,0x3044,0x2424,0x3045,0x2425,0x3046,0x2426,0x3047,
0x2427,0x3048,0x2428,0x3049,0x2429,0x304A,0x242A,0x304B,0x242B,
0x304C,0x242C,0x304D,0x242D,0x304E,0x242E,0x304F,0x242F,0x3050,
0x2430,0x3051,0x2431,0x3052,0x2432,0x3053,0x2433,0x3054,0x2434,
0x3055,0x2435,0x3056,0x2436,0x3057,0x2437,0x3058,0x2438,0x3059,
0x2439,0x305A,0x243A,0x305B,0x243B,0x305C,0x243C,0x305D,0x243D,
0x305E,0x243E,0x305F,0x243F,0x3060,0x2440,0x3061,0x2441,0x3062,
0x2442,0x3063,0x2443,0x3064,0x2444,0x3065,0x2445,0x3066,0x2446,
0x3067,0x2447,0x3068,0x2448,0x3069,0x2449,0x306A,0x244A,0x306B,
0x244B,0x306C,0x244C,0x306D,0x244D,0x306E,0x244E,0x306F,0x244F,
0x3070,0x2450,0x3071,0x2451,0x3072,0x2452,0x3073,0x2453,0x3074,
0x2454,0x3075,0x2455,0x3076,0x2456,0x3077,0x2457,0x3078,0x2458,
0x3079,0x2459,0x307A,0x245A,0x307B,0x245B,0x307C,0x245C,0x307D,
0x245D,0x307E,0x245E,0x307F,0x245F,0x3080,0x2460,0x3081,0x2461,
0x3082,0x2462,0x3083,0x2463,0x3084,0x2464,0x3085,0x2465,0x3086,
0x2466,0x3087,0x2467,0x3088,0x2468,0x3089,0x2469,0x308A,0x246A,
0x308B,0x246B,0x308C,0x246C,0x308D,0x246D,0x308E,0x246E,0x308F,
0x246F,0x3090,0x2470,0x3091,0x2471,0x3092,0x2472,0x3093,0x2473,
0x30A1,0x2521,0x30A2,0x2522,0x30A3,0x2523,0x30A4,0x2524,0x30A5,
0x2525,0x30A6,0x2526,0x30A7,0x2527,0x30A8,0x2528,0x30A9,0x2529,
0x30AA,0x252A,0x30AB,0x252B,0x30AC,0x252C,0x30AD,0x252D,0x30AE,
0x252E,0x30AF,0x252F,0x30B0,0x2530,0x30B1,0x2531,0x30B2,0x2532,
0x30B3,0x2533,0x30B4,0x2534,0x30B5,0x2535,0x30B6,0x2536,0x30B7,
0x2537,0x30B8,0x2538,0x30B9,0x2539,0x30BA,0x253A,0x30BB,0x253B,
0x30BC,0x253C,0x30BD,0x253D,0x30BE,0x253E,0x30BF,0x253F,0x30C0,
0x2540,0x30C1,0x2541,0x30C2,0x2542,0x30C3,0x2543,0x30C4,0x2544,
0x30C5,0x2545,0x30C6,0x2546,0x30C7,0x2547,0x30C8,0x2548,0x30C9,
0x2549,0x30CA,0x254A,0x30CB,0x254B,0x30CC,0x254C,0x30CD,0x254D,
0x30CE,0x254E,0x30CF,0x254F,0x30D0,0x2550,0x30D1,0x2551,0x30D2,
0x2552,0x30D3,0x2553,0x30D4,0x2554,0x30D5,0x2555,0x30D6,0x2556,
0x30D7,0x2557,0x30D8,0x2558,0x30D9,0x2559,0x30DA,0x255A,0x30DB,
0x255B,0x30DC,0x255C,0x30DD,0x255D,0x30DE,0x255E,0x30DF,0x255F,
0x30E0,0x2560,0x30E1,0x2561,0x30E2,0x2562,0x30E3,0x2563,0x30E4,
0x2564,0x30E5,0x2565,0x30E6,0x2566,0x30E7,0x2567,0x30E8,0x2568,
0x30E9,0x2569,0x30EA,0x256A,0x30EB,0x256B,0x30EC,0x256C,0x30ED,
0x256D,0x30EE,0x256E,0x30EF,0x256F,0x30F0,0x2570,0x30F1,0x2571,
0x30F2,0x2572,0x30F3,0x2573,0x30F4,0x2574,0x30F5,0x2575,0x30F6,
0x2576,0x30FB,0x2124,0x3105,0x2845,0x3106,0x2846,0x3107,0x2847,
0x3108,0x2848,0x3109,0x2849,0x310A,0x284A,0x310B,0x284B,0x310C,
0x284C,0x310D,0x284D,0x310E,0x284E,0x310F,0x284F,0x3110,0x2850,
0x3111,0x2851,0x3112,0x2852,0x3113,0x2853,0x3114,0x2854,0x3115,
0x2855,0x3116,0x2856,0x3117,0x2857,0x3118,0x2858,0x3119,0x2859,
0x311A,0x285A,0x311B,0x285B,0x311C,0x285C,0x311D,0x285D,0x311E,
0x285E,0x311F,0x285F,0x3120,0x2860,0x3121,0x2861,0x3122,0x2862,
0x3123,0x2863,0x3124,0x2864,0x3125,0x2865,0x3126,0x2866,0x3127,
0x2867,0x3128,0x2868,0x3129,0x2869,0x3220,0x2265,0x3221,0x2266,
0x3222,0x2267,0x3223,0x2268,0x3224,0x2269,0x3225,0x226A,0x3226,
0x226B,0x3227,0x226C,0x3228,0x226D,0x3229,0x226E,0x4E00,0x523B,
0x4E01,0x3621,0x4E03,0x465F,0x4E07,0x4D72,0x4E08,0x5549,0x4E09,
0x487D,0x4E0A,0x494F,0x4E0B,0x4F42,0x4E0C,0x5822,0x4E0D,0x323B,
0x4E0E,0x536B,0x4E10,0x5824,0x4E11,0x3373,0x4E13,0x5728,0x4E14,
0x4752,0x4E15,0x5827,0x4E16,0x4A40,0x4E18,0x4770,0x4E19,0x317B,
0x4E1A,0x5235,0x4E1B,0x3454,0x4E1C,0x362B,0x4E1D,0x4B3F,0x4E1E,
0x5829,0x4E22,0x362A,0x4E24,0x413D,0x4E25,0x514F,0x4E27,0x4925,
0x4E28,0x582D,0x4E2A,0x3876,0x4E2B,0x513E,0x4E2C,0x635C,0x4E2D,
0x5650,0x4E30,0x3761,0x4E32,0x342E,0x4E34,0x4159,0x4E36,0x583C,
0x4E38,0x4D68,0x4E39,0x3524,0x4E3A,0x4E2A,0x4E3B,0x5677,0x4E3D,
0x4076,0x4E3E,0x3E59,0x4E3F,0x582F,0x4E43,0x444B,0x4E45,0x3E43,
0x4E47,0x5831,0x4E48,0x4334,0x4E49,0x5265,0x4E4B,0x562E,0x4E4C,
0x4E5A,0x4E4D,0x5527,0x4E4E,0x3A75,0x4E4F,0x3726,0x4E50,0x4056,
0x4E52,0x4639,0x4E53,0x4552,0x4E54,0x4747,0x4E56,0x3954,0x4E58,
0x334B,0x4E59,0x5252,0x4E5C,0x583F,0x4E5D,0x3E45,0x4E5E,0x4672,
0x4E5F,0x5232,0x4E60,0x4F30,0x4E61,0x4F67,0x4E66,0x4A69,0x4E69,
0x5840,0x4E70,0x4272,0x4E71,0x4252,0x4E73,0x4869,0x4E7E,0x472C,
0x4E86,0x414B,0x4E88,0x5368,0x4E89,0x5579,0x4E8B,0x4A42,0x4E8C,
0x367E,0x4E8D,0x5821,0x4E8E,0x535A,0x4E8F,0x3F77,0x4E91,0x5446,
0x4E92,0x3B25,0x4E93,0x5841,0x4E94,0x4E65,0x4E95,0x3E2E,0x4E98,
0x5828,0x4E9A,0x5147,0x4E9B,0x5029,0x4E9F,0x583D,0x4EA0,0x596F,
0x4EA1,0x4D76,0x4EA2,0x3F3A,0x4EA4,0x3D3B,0x4EA5,0x3A25,0x4EA6,
0x5260,0x4EA7,0x327A,0x4EA8,0x3A60,0x4EA9,0x4436,0x4EAB,0x4F6D,
0x4EAC,0x3E29,0x4EAD,0x4D24,0x4EAE,0x4141,0x4EB2,0x4757,0x4EB3,
0x5971,0x4EB5,0x5974,0x4EBA,0x484B,0x4EBB,0x5869,0x4EBF,0x525A,
0x4EC0,0x4A32,0x4EC1,0x484A,0x4EC2,0x586C,0x4EC3,0x586A,0x4EC4,
0x5846,0x4EC5,0x3D76,0x4EC6,0x464D,0x4EC7,0x3370,0x4EC9,0x586B,
0x4ECA,0x3D71,0x4ECB,0x3D69,0x4ECD,0x4854,0x4ECE,0x3453,0x4ED1,
0x4258,0x4ED3,0x3256,0x4ED4,0x5750,0x4ED5,0x4A4B,0x4ED6,0x4B7B,
0x4ED7,0x554C,0x4ED8,0x3836,0x4ED9,0x4F49,0x4EDD,0x595A,0x4EDE,
0x5870,0x4EDF,0x472A,0x4EE1,0x586E,0x4EE3,0x347A,0x4EE4,0x416E,
0x4EE5,0x5254,0x4EE8,0x586D,0x4EEA,0x5247,0x4EEB,0x586F,0x4EEC,
0x4347,0x4EF0,0x5176,0x4EF2,0x5659,0x4EF3,0x5872,0x4EF5,0x5875,
0x4EF6,0x3C7E,0x4EF7,0x3C5B,0x4EFB,0x484E,0x4EFD,0x375D,0x4EFF,
0x3742,0x4F01,0x4673,0x4F09,0x5878,0x4F0A,0x5241,0x4F0D,0x4E69,
0x4F0E,0x3C3F,0x4F0F,0x377C,0x4F10,0x3725,0x4F11,0x505D,0x4F17,
0x565A,0x4F18,0x5345,0x4F19,0x3B6F,0x4F1A,0x3B61,0x4F1B,0x5871,
0x4F1E,0x4921,0x4F1F,0x4E30,0x4F20,0x342B,0x4F22,0x5873,0x4F24,
0x494B,0x4F25,0x5876,0x4F26,0x4257,0x4F27,0x5877,0x4F2A,0x4E31,
0x4F2B,0x5879,0x4F2F,0x322E,0x4F30,0x3940,0x4F32,0x5923,0x4F34,
0x3069,0x4F36,0x4166,0x4F38,0x496C,0x4F3A,0x4B45,0x4F3C,0x4B46,
0x4F3D,0x5924,0x4F43,0x3568,0x4F46,0x352B,0x4F4D,0x4E3B,0x4F4E,
0x354D,0x4F4F,0x5721,0x4F50,0x5774,0x4F51,0x5353,0x4F53,0x4C65,
0x4F55,0x3A4E,0x4F57,0x5922,0x4F58,0x595C,0x4F59,0x5360,0x4F5A,
0x587D,0x4F5B,0x3770,0x4F5C,0x5777,0x4F5D,0x587E,0x4F5E,0x587A,
0x4F5F,0x5921,0x4F60,0x4463,0x4F63,0x5336,0x4F64,0x5874,0x4F65,