CodePage简介(转)

1. Codepage的定义和历史

字符内码(charcter code)指的是用来代表字符的内码.读者在输入和存储文档时都要使用内码,内码分为

  • 单字节内码 -- Single-Byte character sets (SBCS),可以支持256个字符编码.
  • 双字节内码 -- Double-Byte character sets)(DBCS),可以支持65000个字符编码.主要用来对大字符集的东方文字进行编码.

codepage 指的是一个经过挑选的以特定顺序排列的字符内码列表,对于早期的单字节内码的语种,codepage中的内码顺序使得系统
可以按照此列表来根据键盘的输入值给出一个对应的内码.对于双字节内码,则给出的是MultiByte到Unicode的对应表,这样就可以把
以Unicode形式存放的字符转化为相应的字符内码,或者反之,在Linux核心中对应的函数就是utf8_mbtowc和utf8_wctomb. ......1. Codepage的定义和历史

字符内码(charcter code)指的是用来代表字符的内码.读者在输入和存储文档时都要使用内码,内码分为

  • 单字节内码 -- Single-Byte character sets (SBCS),可以支持256个字符编码.
  • 双字节内码 -- Double-Byte character sets)(DBCS),可以支持65000个字符编码.主要用来对大字符集的东方文字进行编码.

codepage 指的是一个经过挑选的以特定顺序排列的字符内码列表,对于早期的单字节内码的语种,codepage中的内码顺序使得系统
可以按照此列表来根据键盘的输入值给出一个对应的内码.对于双字节内码,则给出的是MultiByte到Unicode的对应表,这样就可以把
以Unicode形式存放的字符转化为相应的字符内码,或者反之,在Linux核心中对应的函数就是utf8_mbtowc和utf8_wctomb.

在1980年前,仍然没有任何国际标准如ISO-8859或Unicode来定义如何扩展US-ASCII编码以便非英语国家的用户使用.很多IT 厂商发明了他们自己的编码,并且使用了难以记忆的数目来标识:

例如936代表简体中文. 950代表繁体中文.
1.1 CJK Codepage
同 Extended Unix Coding ( EUC )编码大不一样的是,下面所有的远东 codepage 都利用了C1控制码 { =80..=9F } 做为首字节, 使用ASCII值 { =40..=7E { 做为第二字节,这样才能包含多达数万个双字节字符,这表明在这种编码之中小于3F的ASCII值不一定代表ASCII字符.

CP932

Shift-JIS包含日本语 charset JIS X 0201 (每个字符一个字节) 和 JIS X 0208 (每个字符两个字节),所以 JIS X 0201平假名包含一个字节半宽的字符,其剩馀的60个字节被用做7076个汉字以及648个其他全宽字符的首字节.同EUC-JP编码区别的是, Shift-JIS没有包含JIS X 202中定义的5802个汉字.

CP936

GBK 扩展了 EUC-CN 编码( GB 2312-80编码,包含 6763 个汉字)到Unicode (GB13000.1-93)中定义的20902个汉字,中国大陆使用的是简体中文zh_CN.

CP949

UnifiedHangul (UHC) 是韩文 EUC-KR 编码(KS C 5601-1992 编码,包括2350 韩文音节和 4888 个汉字a)的超集,包含 8822个附加的韩文音节( 在C1中 )

CP950

是代替EUC-TW (CNS 11643-1992)的 Big5 编码(13072 繁体 zh_TW 中文字) 繁体中文,这些定义都在Ken Lunde的 CJK.INF中或者 Unicode 编码表中找到.

注意: Microsoft采用以上四种Codepage,因此要访问Microsoft的文件系统时必需采用上面的Codepage .

1.2 IBM的远东语言Codepage

IBM的Codepage分为SBCS和DBCS两种:

IBM SBCS Codepage

  • 37 (英文) *
  • 290 (日文) *
  • 833 (韩文) *
  • 836 (简体中文) *
  • 891 (韩文)
  • 897 (日文)
  • 903 (简体中文)
  • 904 (繁体中文)

    IBM DBCS Codepage

  • 300 (日文) *
  • 301 (日文)
  • 834 (韩文) *
  • 835 (繁体中文) *
  • 837 (简体中文) *
  • 926 (韩文)
  • 927 (繁体中文)
  • 928 (简体中文)

    将SBCS的Codepage和DBCS的Codepage混合起来就成为: IBM MBCS Codepage

  • 930 (日文) (Codepage 300 加 290) *
  • 932 (日文) (Codepage 301 加 897)
  • 933 (韩文) (Codepage 834 加 833) *
  • 934 (韩文) (Codepage 926 加 891)
  • 938 (繁体中文) (Codepage 927 加 904)
  • 936 (简体中文) (Codepage 928 加 903)
  • 5031 (简体中文) (Codepage 837 加 836) *
  • 5033 (繁体中文) (Codepage 835 加 37) *

    *代表采用EBCDIC编码格式

    由此可见,Mircosoft的CJK Codepage来源于IBM的Codepage.

    2. Linux下Codepage的作用

    在Linux下引入对Codepage的支持主要是为了访问FAT/VFAT/FAT32/NTFS/NCPFS等文件系统下的多语种文件名的问 题,目前在NTFS和FAT32/VFAT下的文件系统上都使用了Unicode,这就需要系统在读取这些文件名时动态将其转换为相应的语言编码.因此引 入了NLS支持.其相应的程序文件在/usr/src/linux/fs/nls下:

    • Config.in
    • Makefile
    • nls_base.c
    • nls_cp437.c
    • nls_cp737.c
    • nls_cp775.c
    • nls_cp850.c
    • nls_cp852.c
    • nls_cp855.c
    • nls_cp857.c
    • nls_cp860.c
    • nls_cp861.c
    • nls_cp862.c
    • nls_cp863.c
    • nls_cp864.c
    • nls_cp865.c
    • nls_cp866.c
    • nls_cp869.c
    • nls_cp874.c
    • nls_cp936.c
    • nls_cp950.c
    • nls_iso8859-1.c
    • nls_iso8859-15.c
    • nls_iso8859-2.c
    • nls_iso8859-3.c
    • nls_iso8859-4.c
    • nls_iso8859-5.c
    • nls_iso8859-6.c
    • nls_iso8859-7.c
    • nls_iso8859-8.c
    • nls_iso8859-9.c
    • nls_koi8-r.c

    实现了下列函数:

    • extern int utf8_mbtowc(__u16 *, const __u8 *, int);
    • extern int utf8_mbstowcs(__u16 *, const __u8 *, int);
    • extern int utf8_wctomb(__u8 *, __u16, int);
    • extern int utf8_wcstombs(__u8 *, const __u16 *, int);

    这样在加载相应的文件系统时就可以用下面的参数来设置Codepage:

    对于Codepage 437 来说

    mount -t vfat /dev/hda1 /mnt/1 -o codepage=437,iocharset=cp437

    这样在Linux下就可以正常访问不同语种的长文件名了.

    3. Linux下支持的Codepage

  • nls codepage 437 -- 美国/加拿大英语
  • nls codepage 737 -- 希腊语
  • nls codepage 775 -- 波罗的海语
  • nls codepage 850 -- 包括西欧语种(德语,西班牙语,意大利语)中的一些字符
  • nls codepage 852 -- Latin 2 包括中东欧语种(阿尔巴尼亚语,克罗地亚语,捷克语,英语,芬兰语,匈牙利语,爱尔兰语,德语,波兰语,罗马利亚语,塞尔维亚语,斯洛伐克语,斯洛文尼亚语,Sorbian语)
  • nls codepage 855 -- 斯拉夫语
  • nls codepage 857 -- 土耳其语
  • nls codepage 860 -- 葡萄牙语
  • nls codepage 861 -- 冰岛语
  • nls codepage 862 -- 希伯来语
  • nls codepage 863 -- 加拿大语
  • nls codepage 864 -- 阿拉伯语
  • nls codepage 865 -- 日尔曼语系
  • nls codepage 866 -- 斯拉夫语/俄语
  • nls codepage 869 -- 希腊语(2)
  • nls codepage 874 -- 泰语
  • nls codepage 936 -- 简体中文GBK
  • nls codepage 950 -- 繁体中文Big5
  • nls iso8859-1 -- 西欧语系(阿尔巴尼亚语,西班牙加泰罗尼亚语,丹麦语,荷兰语,英语,Faeroese语,芬兰语,法语,德语,加里西亚语,爱尔兰语,冰岛语,意大利语,挪威语,葡萄牙语,瑞士语.)这同时适用于美国英语.
  • nls iso8859-2 -- Latin 2 字符集,斯拉夫/中欧语系(捷克语,德语,匈牙利语,波兰语,罗马尼亚语,克罗地亚语,斯洛伐克语,斯洛文尼亚语)
  • nls iso8859-3 -- Latin 3 字符集, (世界语,加里西亚语,马耳他语,土耳其语)
  • nls iso8859-4 -- Latin 4 字符集, (爱莎尼亚语,拉脱维亚语,立陶宛语),是Latin 6 字符集的前序标准
  • nls iso8859-5 -- 斯拉夫语系(保加利亚语,Byelorussian语,马其顿语,俄语,塞尔维亚语,乌克兰语) 一般推荐使用 KOI8-R codepage
  • nls iso8859-6 -- 阿拉伯语.
  • nls iso8859-7 -- 现代希腊语
  • nls iso8859-8 -- 希伯来语
  • nls iso8859-9 -- Latin 5 字符集, (去掉了 Latin 1中不经常使用的一些冰岛语字符而代以土耳其语字符)
  • nls iso8859-10 -- Latin 6 字符集, (因纽特(格陵兰)语,萨摩斯岛语等Latin 4 中没有包括的北欧语种)
  • nls iso8859-15 -- Latin 9 字符集, 是Latin 1字符集的更新版本,去掉一些不常用的字符,增加了对爱莎尼亚语的支持,修正了法语和芬兰语部份,增加了欧元字符)
  • nls koi8-r -- 俄语的缺省支持

    4. 简体中文GBK/繁体中文Big5的Codepage

    如何制作简体中文GBK/繁体中文Big5的Codepage?

    1. Unicode 组织 取得GBK/Big5的Unicode的定义.

      由于GBK是基于ISO 10646-1:1993标准的,而相应的日文是JIS X 0221-1995,韩文是KS C 5700-1995,他们被提交到Unicode标准的时间表为:
      Unicode Version 1.0
      Unicode Version 1.1 <-> ISO 10646-1:1993, JIS X 0221-1995, GB 13000.1-93
      Unicode Version 2.0 <-> KS C 5700-1995

      从Windows 95开始均采用GBK编码. 您需要的是 CP936.TXTBIG5.TXT

    2. 然后使用下面的程序就可以将其转化为Linux核心需要的Unicode<->GBK码表
      ./genmap BIG5.txt | perl uni2big5.pl
      ./genmap CP936.txt | perl uni2gbk.pl
    3. 再修改fat/vfat/ntfs的相关函数就可以完成对核心的修改工作. 具体使用时可以使用下面的命令:
  • 简体中文: mount -t vfat /dev/hda1 /mnt/1 -o codepage=936,iocharset=cp936
  • 繁体中文: mount -t vfat /dev/hda1 /mnt/1 -o codepage=950,iocharset=cp936

    有趣的是,由于GBK包含了全部的GB2312/Big5/JIS的内码,所以使用936的Codepage也可以显示Big5的文件名.

    5. 附录

    5.1 作者和相关文档

    制作codepage950支持的是台湾的 cosmos 先生, 主页为 http://www.cis.nctu.edu.tw:8080/~is84086/Project/kernel_cp950/

    制作GBK的cp936支持的是TurboLinux的中文研发小组的 方汉陈向阳

    5.2 genmap

    #!/bin/sh
    cat $1 | awk '{if(index($1,"#")==0)print $0}' | awk 'BEGIN{FS="0x"}{print $2 $3}' |
    awk '{if(length($1)==length($2))print $1,$2}'

    5.3 uni2big5.pl

      1   # !/usr/bin/perl
      2  
      3   @code   =  (
      4            " 00 " ,   " 01 " ,   " 02 " ,   " 03 " ,   " 04 " ,   " 05 " ,   " 06 " ,   " 07 " ,
      5            " 08 " ,   " 09 " ,   " 0A " ,   " 0B " ,   " 0C " ,   " 0D " ,   " 0E " ,   " 0F " ,
      6            " 10 " ,   " 11 " ,   " 12 " ,   " 13 " ,   " 14 " ,   " 15 " ,   " 16 " ,   " 17 " ,
      7            " 18 " ,   " 19 " ,   " 1A " ,   " 1B " ,   " 1C " ,   " 1D " ,   " 1E " ,   " 1F " ,
      8            " 20 " ,   " 21 " ,   " 22 " ,   " 23 " ,   " 24 " ,   " 25 " ,   " 26 " ,   " 27 " ,
      9            " 28 " ,   " 29 " ,   " 2A " ,   " 2B " ,   " 2C " ,   " 2D " ,   " 2E " ,   " 2F " ,
     10            " 30 " ,   " 31 " ,   " 32 " ,   " 33 " ,   " 34 " ,   " 35 " ,   " 36 " ,   " 37 " ,
     11            " 38 " ,   " 39 " ,   " 3A " ,   " 3B " ,   " 3C " ,   " 3D " ,   " 3E " ,   " 3F " ,
     12            " 40 " ,   " 41 " ,   " 42 " ,   " 43 " ,   " 44 " ,   " 45 " ,   " 46 " ,   " 47 " ,
     13            " 48 " ,   " 49 " ,   " 4A " ,   " 4B " ,   " 4C " ,   " 4D " ,   " 4E " ,   " 4F " ,
     14            " 50 " ,   " 51 " ,   " 52 " ,   " 53 " ,   " 54 " ,   " 55 " ,   " 56 " ,   " 57 " ,
     15            " 58 " ,   " 59 " ,   " 5A " ,   " 5B " ,   " 5C " ,   " 5D " ,   " 5E " ,   " 5F " ,
     16            " 60 " ,   " 61 " ,   " 62 " ,   " 63 " ,   " 64 " ,   " 65 " ,   " 66 " ,   " 67 " ,
     17            " 68 " ,   " 69 " ,   " 6A " ,   " 6B " ,   " 6C " ,   " 6D " ,   " 6E " ,   " 6F " ,
     18            " 70 " ,   " 71 " ,   " 72 " ,   " 73 " ,   " 74 " ,   " 75 " ,   " 76 " ,   " 77 " ,
     19            " 78 " ,   " 79 " ,   " 7A " ,   " 7B " ,   " 7C " ,   " 7D " ,   " 7E " ,   " 7F " ,
     20            " 80 " ,   " 81 " ,   " 82 " ,   " 83 " ,   " 84 " ,   " 85 " ,   " 86 " ,   " 87 " ,
     21            " 88 " ,   " 89 " ,   " 8A " ,   " 8B " ,   " 8C " ,   " 8D " ,   " 8E " ,   " 8F " ,
     22            " 90 " ,   " 91 " ,   " 92 " ,   " 93 " ,   " 94 " ,   " 95 " ,   " 96 " ,   " 97 " ,
     23            " 98 " ,   " 99 " ,   " 9A " ,   " 9B " ,   " 9C " ,   " 9D " ,   " 9E " ,   " 9F " ,
     24            " A0 " ,   " A1 " ,   " A2 " ,   " A3 " ,   " A4 " ,   " A5 " ,   " A6 " ,   " A7 " ,
     25            " A8 " ,   " A9 " ,   " AA " ,   " AB " ,   " AC " ,   " AD " ,   " AE " ,   " AF " ,
     26            " B0 " ,   " B1 " ,   " B2 " ,   " B3 " ,   " B4 " ,   " B5 " ,   " B6 " ,   " B7 " ,
     27            " B8 " ,   " B9 " ,   " BA " ,   " BB " ,   " BC " ,   " BD " ,   " BE " ,   " BF " ,
     28            " C0 " ,   " C1 " ,   " C2 " ,   " C3 " ,   " C4 " ,   " C5 " ,   " C6 " ,   " C7 " ,
     29            " C8 " ,   " C9 " ,   " CA " ,   " CB " ,   " CC " ,   " CD " ,   " CE " ,   " CF " ,
     30            " D0 " ,   " D1 " ,   " D2 " ,   " D3 " ,   " D4 " ,   " D5 " ,   " D6 " ,   " D7 " ,
     31            " D8 " ,   " D9 " ,   " DA " ,   " DB " ,   " DC " ,   " DD " ,   " DE " ,   " DF " ,
     32            " E0 " ,   " E1 " ,   " E2 " ,   " E3 " ,   " E4 " ,   " E5 " ,   " E6 " ,   " E7 " ,
     33            " E8 " ,   " E9 " ,   " EA " ,   " EB " ,   " EC " ,   " ED " ,   " EE " ,   " EF " ,
     34            " F0 " ,   " F1 " ,   " F2 " ,   " F3 " ,   " F4 " ,   " F5 " ,   " F6 " ,   " F7 " ,
     35            " F8 " ,   " F9 " ,   " FA " ,   " FB " ,   " FC " ,   " FD " ,   " FE " ,   " FF " );
     36  
     37   while  ( < STDIN > ){
     38           ( $unicode ,   $big5 =   split ;
     39           ( $high ,   $low =   $unicode   =~   / ( .. )( .. ) / ;
     40            $table2 { $high }{ $low =   $big5 ;
     41           ( $high ,   $low =   $big5   =~   / ( .. )( .. ) / ;
     42            $table { $high }{ $low =   $unicode ;
     43   }
     44  
     45   print   << EOF ;
     46   /*
     47     *  linux / fs / nls_cp874 . c
     48     *
     49     *  Charset cp874 translation tables .
     50     *  Generated automatically from the Unicode and charset
     51     *  tables from the Unicode Organization (www . unicode . org) .
     52     *  The Unicode to charset table has only exact mappings .
     53     */
     54  
     55   # include <linux/module.h>
     56   #include <linux/kernel.h>
     57   #include <linux/string.h>
     58   #include <linux/nls.h>
     59  
     60   /*  A1  -  F9 */
     61   static struct nls_unicode charset2uni[( 0xF9 - 0xA1 + 1 ) * ( 0x100 - 0x60 )]  =  {
     62   EOF
     63  
     64   for  ( $high = 0xA1 $high   <=   0xF9 $high ++ ){
     65            for  ( $low = 0x40 $low   <=   0x7F $low ++ ){
     66                    $unicode   =   $table2 { $code [ $high ]}{ $code [ $low ]};
     67                    $unicode   =   " 0000 "   if  ( ! ( defined   $unicode ));
     68                    print   " /n/t "   if  ( $low % 4   ==   0 );
     69                    print   " /* $code[$high]$code[$low]*//n/t "   if  ( $low % 0x10   ==   0 );
     70                   ( $uhigh ,   $ulow =   $unicode   =~   / ( .. )( .. ) / ;
     71                    printf ( " {0x%2s, 0x%2s},  " ,   $ulow ,   $uhigh );
     72           }
     73            for  ( $low = 0xA0 $low   <=   0xFF $low ++ ){
     74                    $unicode   =   $table2 { $code [ $high ]}{ $code [ $low ]};
     75                    $unicode   =   " 0000 "   if  ( ! ( defined   $unicode ));
     76                    print   " /n/t "   if  ( $low % 4   ==   0 );
     77                    print   " /* $code[$high]$code[$low]*//n/t "   if  ( $low % 0x10   ==   0 );
     78                   ( $uhigh ,   $ulow =   $unicode   =~   / ( .. )( .. ) / ;
     79                    printf ( " {0x%2s, 0x%2s},  " ,   $ulow ,   $uhigh );
     80           }
     81   }
     82  
     83   print   " /n};/n/n " ;
     84   for  ( $high = 1 $high   <=   255 ; $high ++ ){
     85            if  ( defined   $table { $code [ $high ]}){
     86                    print   " static unsigned char page$code[$high]/[512/] = {/n/t " ;
     87                    for  ( $low = 0 $low <= 255 ; $low ++ ){
     88                            $big5   =   $table { $code [ $high ]}{ $code [ $low ]};
     89                            $big5   =   " 3F3F "   if  ( ! ( defined   $big5 ));
     90                            if  ( $low   >   0   &&   $low % 4   ==   0 ){
     91                                    printf ( " /* 0x%02X-0x%02X *//n/t " ,   $low - 4 ,   $low - 1 );
     92                           }
     93                            print   " /n/t "   if  ( $low   ==   0x80 );
     94                           ( $bhigh ,   $blow =   $big5   =~   / ( .. )( .. ) / ;
     95                            printf ( " 0x%2s, 0x%2s,  " ,   $bhigh ,   $blow );
     96                   }
     97                    print   " /* 0xFC-0xFF *//n};/n/n " ;
     98           }
     99   }
    100  
    101   print   " static unsigned char *page_uni2charset[256] = { " ;
    102   for  ( $high = 0 $high <= 255 ; $high ++ ){
    103            print   " /n/t "   if  ( $high % 8   ==   0 );
    104            if  ( $high > 0   &&   defined   $table { $code [ $high ]}){
    105                    print   " page$code[$high],  " ;
    106           }
    107            else {
    108                    print   " NULL,    " ;
    109           }
    110   }
    111   print   << EOF ;
    112  
    113   };
    114  
    115   static unsigned char charset2upper[ 256 =  {
    116            0x00 ,   0x01 ,   0x02 ,   0x03 ,   0x04 ,   0x05 ,   0x06 ,   0x07 ,   /*   0x00 - 0x07   */
    117            0x08 ,   0x09 ,   0x0a ,   0x0b ,   0x0c ,   0x0d ,   0x0e ,   0x0f ,   /*   0x08 - 0x0f   */
    118            0x10 ,   0x11 ,   0x12 ,   0x13 ,   0x14 ,   0x15 ,   0x16 ,   0x17 ,   /*   0x10 - 0x17   */
    119            0x18 ,   0x19 ,   0x1a ,   0x1b ,   0x1c ,   0x1d ,   0x1e ,   0x1f ,   /*   0x18 - 0x1f   */
    120            0x20 ,   0x21 ,   0x22 ,   0x23 ,   0x24 ,   0x25 ,   0x26 ,   0x27 ,   /*   0x20 - 0x27   */
    121            0x28 ,   0x29 ,   0x2a ,   0x2b ,   0x2c ,   0x2d ,   0x2e ,   0x2f ,   /*   0x28 - 0x2f   */
    122            0x30 ,   0x31 ,   0x32 ,   0x33 ,   0x34 ,   0x35 ,   0x36 ,   0x37 ,   /*   0x30 - 0x37   */
    123            0x38 ,   0x39 ,   0x3a ,   0x3b ,   0x3c ,   0x3d ,   0x3e ,   0x3f ,   /*   0x38 - 0x3f   */
    124            0x40 ,   0x41 ,   0x42 ,   0x43 ,   0x44 ,   0x45 ,   0x46 ,   0x47 ,   /*   0x40 - 0x47   */
    125            0x48 ,   0x49 ,   0x4a ,   0x4b ,   0x4c ,   0x4d ,   0x4e ,   0x4f ,   /*   0x48 - 0x4f   */
    126            0x50 ,   0x51 ,   0x52 ,   0x53 ,   0x54 ,   0x55 ,   0x56 ,   0x57 ,   /*   0x50 - 0x57   */
    127            0x58 ,   0x59 ,   0x5a ,   0x5b ,   0x5c ,   0x5d ,   0x5e ,   0x5f ,   /*   0x58 - 0x5f   */
    128            0x60 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   /*   0x60 - 0x67   */
    129            0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   /*   0x68 - 0x6f   */
    130            0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   /*   0x70 - 0x77   */
    131            0x00 ,   0x00 ,   0x00 ,   0x7b ,   0x7c ,   0x7d ,   0x7e ,   0x7f ,   /*   0x78 - 0x7f   */
    132            0x80 ,   0x81 ,   0x82 ,   0x83 ,   0x84 ,   0x85 ,   0x86 ,   0x87 ,   /*   0x80 - 0x87   */
    133            0x88 ,   0x89 ,   0x8a ,   0x8b ,   0x8c ,   0x8d ,   0x8e ,   0x8f ,   /*   0x88 - 0x8f   */
    134            0x90 ,   0x91 ,   0x92 ,   0x93 ,   0x94 ,   0x95 ,   0x96 ,   0x97 ,   /*   0x90 - 0x97   */
    135            0x98 ,   0x99 ,   0x9a ,   0x00 ,   0x9c ,   0x00 ,   0x00 ,   0x00 ,   /*   0x98 - 0x9f   */
    136            0x00 ,   0x00 ,   0x00 ,   0x00 ,   0xa4 ,   0xa5 ,   0xa6 ,   0xa7 ,   /*   0xa0 - 0xa7   */
    137            0xa8 ,   0xa9 ,   0xaa ,   0xab ,   0xac ,   0xad ,   0xae ,   0xaf ,   /*   0xa8 - 0xaf   */
    138            0xb0 ,   0xb1 ,   0xb2 ,   0xb3 ,   0xb4 ,   0xb5 ,   0xb6 ,   0xb7 ,   /*   0xb0 - 0xb7   */
    139            0xb8 ,   0xb9 ,   0xba ,   0xbb ,   0xbc ,   0xbd ,   0xbe ,   0xbf ,   /*   0xb8 - 0xbf   */
    140            0xc0 ,   0xc1 ,   0xc2 ,   0xc3 ,   0xc4 ,   0xc5 ,   0xc6 ,   0xc7 ,   /*   0xc0 - 0xc7   */
    141            0xc8 ,   0xc9 ,   0xca ,   0xcb ,   0xcc ,   0xcd ,   0xce ,   0xcf ,   /*   0xc8 - 0xcf   */
    142            0xd0 ,   0xd1 ,   0xd2 ,   0xd3 ,   0xd4 ,   0xd5 ,   0x00 ,   0x00 ,   /*   0xd0 - 0xd7   */
    143            0x00 ,   0xd9 ,   0xda ,   0xdb ,   0xdc ,   0x00 ,   0x00 ,   0xdf ,   /*   0xd8 - 0xdf   */
    144            0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   /*   0xe0 - 0xe7   */
    145            0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0xef ,   /*   0xe8 - 0xef   */
    146            0xf0 ,   0xf1 ,   0x00 ,   0x00 ,   0x00 ,   0xf5 ,   0x00 ,   0xf7 ,   /*   0xf0 - 0xf7   */
    147            0xf8 ,   0xf9 ,   0x00 ,   0x00 ,   0x00 ,   0x00 ,   0xfe ,   0xff ,   /*   0xf8 - 0xff   */
    148   };
    149  
    150  
    151   static void inc_use_count(void)
    152   {
    153           MOD_INC_USE_COUNT;
    154   }
    155  
    156   static void dec_use_count(void)
    157   {
    158           MOD_DEC_USE_COUNT;
    159   }
    160  
    161   static struct nls_table table  =  {
    162            " cp950 " ,
    163           page_uni2charset ,
    164           charset2uni ,
    165           inc_use_count ,
    166           dec_use_count ,
    167           NULL
    168   };
    169  
    170   int  init_nls_cp950(void)
    171   {
    172            return  register_nls();
    173   }
    174  
    175   # ifdef MODULE
    176   int  init_module(void)
    177   {
    178            return  init_nls_cp950();
    179   }
    180  
    181  
    182   void cleanup_module(void)
    183   {
    184           unregister_nls();
    185            return ;
    186   }
    187   # endif
    188  
    189   /*
    190     *  Overrides  for  Emacs so that we follow Linus ' s tabbing style.
    191    * Emacs will notice this stuff at the end of the file and automatically
    192    * adjust the settings for this buffer only.  This must remain at the end
    193    * of the file.
    194    *
    195   ---------------------------------------------------------------------------
    196    * Local variables:
    197    * c-indent-level: 8
    198    * c-brace-imaginary-offset: 0
    199    * c-brace-offset: -8
    200    * c-argdecl-indent: 8
    201    * c-label-offset: -8
    202    * c-continued-statement-offset: 8
    203    * c-continued-brace-offset: 0
    204    * End:
    205    */
    206   EOF
    207  
    208   5.4 uni2gbk.pl
    209  
    210   #!/usr/bin/perl
    211  
    212   @code = (
    213           "00", "01", "02", "03", "04", "05", "06", "07",
    214           "08", "09", "0A", "0B", "0C", "0D", "0E", "0F",
    215           "10", "11", "12", "13", "14", "15", "16", "17",
    216           "18", "19", "1A", "1B", "1C", "1D", "1E", "1F",
    217           "20", "21", "22", "23", "24", "25", "26", "27",
    218           "28", "29", "2A", "2B", "2C", "2D", "2E", "2F",
    219           "30", "31", "32", "33", "34", "35", "36", "37",
    220           "38", "39", "3A", "3B", "3C", "3D", "3E", "3F",
    221           "40", "41", "42", "43", "44", "45", "46", "47",
    222           "48", "49", "4A", "4B", "4C", "4D", "4E", "4F",
    223           "50", "51", "52", "53", "54", "55", "56", "57",
    224           "58", "59", "5A", "5B", "5C", "5D", "5E", "5F",
    225           "60", "61", "62", "63", "64", "65", "66", "67",
    226           "68", "69", "6A", "6B", "6C", "6D", "6E", "6F",
    227           "70", "71", "72", "73", "74", "75", "76", "77",
    228           "78", "79", "7A", "7B", "7C", "7D", "7E", "7F",
    229           "80", "81", "82", "83", "84", "85", "86", "87",
    230           "88", "89", "8A", "8B", "8C", "8D", "8E", "8F",
    231           "90", "91", "92", "93", "94", "95", "96", "97",
    232           "98", "99", "9A", "9B", "9C", "9D", "9E", "9F",
    233           "A0", "A1", "A2", "A3", "A4", "A5", "A6", "A7",
    234           "A8", "A9", "AA", "AB", "AC", "AD", "AE", "AF",
    235           "B0", "B1", "B2", "B3", "B4", "B5", "B6", "B7",
    236           "B8", "B9", "BA", "BB", "BC", "BD", "BE", "BF",
    237           "C0", "C1", "C2", "C3", "C4", "C5", "C6", "C7",
    238           "C8", "C9", "CA", "CB", "CC", "CD", "CE", "CF",
    239           "D0", "D1", "D2", "D3", "D4", "D5", "D6", "D7",
    240           "D8", "D9", "DA", "DB", "DC", "DD", "DE", "DF",
    241           "E0", "E1", "E2", "E3", "E4", "E5", "E6", "E7",
    242           "E8", "E9", "EA", "EB", "EC", "ED", "EE", "EF",
    243           "F0", "F1", "F2", "F3", "F4", "F5", "F6", "F7",
    244           "F8", "F9", "FA", "FB", "FC", "FD", "FE", "FF");
    245  
    246   while (<STDIN>){
    247           ($unicode, $big5) = split;
    248           ($high, $low) = $unicode =~ /(..)(..)/;
    249           $table2{$high}{$low} = $big5;
    250           ($high, $low) = $big5 =~ /(..)(..)/;
    251           $table{$high}{$low} = $unicode;
    252   }
    253  
    254   print <<EOF;
    255   /*
    256    * linux/fs/nls_cp936.c
    257    *
    258    * Charset cp936 translation tables.
    259    * Generated automatically from the Unicode and charset
    260    * tables from the Unicode Organization (www.unicode.org).
    261    * The Unicode to charset table has only exact mappings.
    262    */
    263  
    264   #include <linux/module.h>
    265   #include <linux/kernel.h>
    266   #include <linux/string.h>
    267   #include <linux/nls.h>
    268  
    269   /* 81 - FE*/
    270   static struct nls_unicode charset2uni[(0xFE-0x81+1)*(0x100-0x40)] = {
    271   EOF
    272  
    273   for ($high=0x81; $high <= 0xFE; $high++){
    274           for ($low=0x40; $low <= 0x7F; $low++){
    275                   $unicode = $table2{$code[$high]}{$code[$low]};
    276                   $unicode = "0000" if (!(defined $unicode));
    277                   print "/n/t" if ($low%4 == 0);
    278                   print "/* $code[$high]$code[$low]*//n/t" if ($low%0x10 == 0);
    279                   ($uhigh, $ulow) = $unicode =~ /(..)(..)/;
    280                   printf("{0x%2s, 0x%2s}, ", $ulow, $uhigh);
    281           }
    282           for ($low=0x80; $low <= 0xFF; $low++){
    283                   $unicode = $table2{$code[$high]}{$code[$low]};
    284                   $unicode = "0000" if (!(defined $unicode));
    285                   print "/n/t" if ($low%4 == 0);
    286                   print "/* $code[$high]$code[$low]*//n/t" if ($low%0x10 == 0);
    287                   ($uhigh, $ulow) = $unicode =~ /(..)(..)/;
    288                   printf("{0x%2s, 0x%2s}, ", $ulow, $uhigh);
    289           }
    290   }
    291  
    292   print "/n};/n/n";
    293   for ($high=1; $high <= 255;$high++){
    294           if (defined $table{$code[$high]}){
    295                   print "static unsigned char page$code[$high]/[512/] = {/n/t";
    296                   for ($low=0; $low<=255;$low++){
    297                           $big5 = $table{$code[$high]}{$code[$low]};
    298                           $big5 = "3F3F" if (!(defined $big5));
    299                           if ($low > 0 && $low%4 == 0){
    300                                   printf("/* 0x%02X-0x%02X *//n/t", $low-4, $low-1);
    301                           }
    302                           print "/n/t" if ($low == 0x80);
    303                           ($bhigh, $blow) = $big5 =~ /(..)(..)/;
    304                           printf("0x%2s, 0x%2s, ", $bhigh, $blow);
    305                   }
    306                   print "/* 0xFC-0xFF *//n};/n/n";
    307           }
    308   }
    309  
    310   print "static unsigned char *page_uni2charset[256] = {";
    311   for ($high=0; $high<=255;$high++){
    312           print "/n/t" if ($high%8 == 0);
    313           if ($high>0 && defined $table{$code[$high]}){
    314                   print "page$code[$high], ";
    315           }
    316           else{
    317                   print "NULL,   ";
    318           }
    319   }
    320   print <<EOF;
    321  
    322   };
    323  
    324   static unsigned char charset2upper[256] = {
    325           0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, /* 0x00-0x07 */
    326           0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, /* 0x08-0x0f */
    327           0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, /* 0x10-0x17 */
    328           0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, /* 0x18-0x1f */
    329           0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, /* 0x20-0x27 */
    330           0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, /* 0x28-0x2f */
    331           0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, /* 0x30-0x37 */
    332           0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f, /* 0x38-0x3f */
    333           0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, /* 0x40-0x47 */
    334           0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f, /* 0x48-0x4f */
    335           0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, /* 0x50-0x57 */
    336           0x58, 0x59, 0x5a, 0x5b, 0x5c, 0x5d, 0x5e, 0x5f, /* 0x58-0x5f */
    337           0x60, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x60-0x67 */
    338           0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x68-0x6f */
    339           0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0x70-0x77 */
    340           0x00, 0x00, 0x00, 0x7b, 0x7c, 0x7d, 0x7e, 0x7f, /* 0x78-0x7f */
    341           0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, /* 0x80-0x87 */
    342           0x88, 0x89, 0x8a, 0x8b, 0x8c, 0x8d, 0x8e, 0x8f, /* 0x88-0x8f */
    343           0x90, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, /* 0x90-0x97 */
    344           0x98, 0x99, 0x9a, 0x00, 0x9c, 0x00, 0x00, 0x00, /* 0x98-0x9f */
    345           0x00, 0x00, 0x00, 0x00, 0xa4, 0xa5, 0xa6, 0xa7, /* 0xa0-0xa7 */
    346           0xa8, 0xa9, 0xaa, 0xab, 0xac, 0xad, 0xae, 0xaf, /* 0xa8-0xaf */
    347           0xb0, 0xb1, 0xb2, 0xb3, 0xb4, 0xb5, 0xb6, 0xb7, /* 0xb0-0xb7 */
    348           0xb8, 0xb9, 0xba, 0xbb, 0xbc, 0xbd, 0xbe, 0xbf, /* 0xb8-0xbf */
    349           0xc0, 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7, /* 0xc0-0xc7 */
    350           0xc8, 0xc9, 0xca, 0xcb, 0xcc, 0xcd, 0xce, 0xcf, /* 0xc8-0xcf */
    351           0xd0, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0x00, 0x00, /* 0xd0-0xd7 */
    352           0x00, 0xd9, 0xda, 0xdb, 0xdc, 0x00, 0x00, 0xdf, /* 0xd8-0xdf */
    353           0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0xe0-0xe7 */
    354           0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xef, /* 0xe8-0xef */
    355           0xf0, 0xf1, 0x00, 0x00, 0x00, 0xf5, 0x00, 0xf7, /* 0xf0-0xf7 */
    356           0xf8, 0xf9, 0x00, 0x00, 0x00, 0x00, 0xfe, 0xff, /* 0xf8-0xff */
    357   };
    358  
    359  
    360   static void inc_use_count(void)
    361   {
    362           MOD_INC_USE_COUNT;
    363   }
    364  
    365   static void dec_use_count(void)
    366   {
    367           MOD_DEC_USE_COUNT;
    368   }
    369  
    370   static struct nls_table table = {
    371           "cp936",
    372           page_uni2charset,
    373           charset2uni,
    374           inc_use_count,
    375           dec_use_count,
    376           NULL
    377   };
    378  
    379   int init_nls_cp936(void)
    380   {
    381           return register_nls();
    382   }
    383  
    384   #ifdef MODULE
    385   int init_module(void)
    386   {
    387           return init_nls_cp936();
    388   }
    389  
    390  
    391   void cleanup_module(void)
    392   {
    393           unregister_nls();
    394           return;
    395   }
    396   #endif
    397  
    398   /*
    399    * Overrides for Emacs so that we follow Linus ' s tabbing style .
    400     *  Emacs will notice this stuff at the end of the file and automatically
    401     *  adjust the settings  for  this buffer only .   This must remain at the end
    402     *  of the file .
    403     *
    404   ---------------------------------------------------------------------------
    405     *   Local  variables :
    406     *  c - indent - level :   8
    407     *  c - brace - imaginary - offset :   0
    408     *  c - brace - offset :   - 8
    409     *  c - argdecl - indent :   8
    410     *  c - label - offset :   - 8
    411     *  c - continued - statement - offset :   8
    412     *  c - continued - brace - offset :   0
    413     *  End :
    414     */
    415   EOF
    416  
    417   5.5  转换CODEPAGE的工具
    418  
    419   /*
    420     *  CPI . C :  A program to examine MSDOS codepage files ( *. cpi)
    421     *  and extract specific codepages .
    422     *  Compiles under Linux  &  DOS (using BC ++   3.1 ) .
    423     *
    424     *  Compile :  gcc  - o cpi cpi . c
    425     *  Call :  codepage file . cpi [ - a |- l | nnn]
    426     *
    427     *  Author :  Ahmed M .  Naas (ahmed @oea . xs4all . nl)
    428     *  Many changes :  aeb @cwi . nl  [changed  until  it would handle all
    429     *        *. cpi files people have sent me; I have  no  documentation ,
    430     *       so all this is experimental]
    431     *  Remains to  do :  DRDOS fonts .
    432     *
    433     *  Copyright :  Public domain .
    434     */
    435  
    436   # include <stdio.h>
    437   #include <stdlib.h>
    438   #include <string.h>
    439   #include <unistd.h>
    440  
    441   int  handle_codepage( int );
    442   void handle_fontfile(void);
    443  
    444   # define PACKED __attribute__ ((packed))
    445   /*   Use  this (instead of the above) to compile under MSDOS  */
    446   /* # define PACKED  */
    447  
    448   struct {
    449           unsigned char id[ 8 ] PACKED;
    450           unsigned char res[ 8 ] PACKED;
    451           unsigned short num_pointers PACKED;
    452           unsigned char p_type PACKED;
    453           unsigned long offset PACKED;
    454   } FontFileHeader;
    455  
    456   struct {
    457           unsigned short num_codepages PACKED;
    458   } FontInfoHeader;
    459  
    460   struct {
    461           unsigned short size PACKED;
    462           unsigned long off_nexthdr PACKED;
    463           unsigned short device_type PACKED;  /*  screen = 1 ; printer = 2   */
    464           unsigned char device_name[ 8 ] PACKED;
    465           unsigned short codepage PACKED;
    466           unsigned char res[ 6 ] PACKED;
    467           unsigned long off_font PACKED;
    468   } CPEntryHeader;
    469  
    470   struct {
    471           unsigned short reserved PACKED;
    472           unsigned short num_fonts PACKED;
    473           unsigned short size PACKED;
    474   } CPInfoHeader;
    475  
    476   struct {
    477           unsigned char height PACKED;
    478           unsigned char width PACKED;
    479           unsigned short reserved PACKED;
    480           unsigned short num_chard PACKED;
    481   } ScreenFontHeader;
    482  
    483   struct {
    484           unsigned short p1 PACKED;
    485           unsigned short p2 PACKED;
    486   } PrinterFontHeader;
    487  
    488   FILE  * in ,   * out;
    489   void usage(void);
    490  
    491   int  opta ,  optc ,  optl ,  optL ,  optx;
    492   extern  int  optind;
    493   extern char  * optarg;
    494  
    495   unsigned short codepage;
    496  
    497   int  main ( int  argc ,  char  * argv[])
    498   {
    499            if  (argc  <   2 )
    500                   usage();
    501  
    502            if  ((in  =  fopen(argv[ 1 ] ,   " r " ))  ==  NULL) {
    503                    printf ( " /nUnable to open file %s./n " ,  argv[ 1 ]);
    504                    exit ( 0 );
    505           }
    506  
    507           opta  =  optc  =  optl  =  optL  =  optx  =   0 ;
    508           optind  =   2 ;
    509            if  (argc  ==   2 )
    510                   optl  =   1 ;
    511            else
    512            while ( 1 ) {
    513               switch(getopt(argc ,  argv ,   " alLc " )) {
    514                 case  ' a ' :
    515                   opta  =   1 ;
    516                    continue ;
    517                 case  ' c ' :
    518                   optc  =   1 ;
    519                    continue ;
    520                 case  ' L ' :
    521                   optL  =   1 ;
    522                    continue ;
    523                 case  ' l ' :
    524                   optl  =   1 ;
    525                    continue ;
    526                 case  ' ? ' :
    527                 default :
    528                   usage();
    529                 case  - 1 :
    530                   break;
    531               }
    532               break;
    533           }
    534            if  (optind  !=  argc) {
    535                if  (optind  !=  argc - 1   ||  opta)
    536                 usage();
    537               codepage  =  atoi(argv[optind]);
    538               optx  =   1 ;
    539           }
    540  
    541            if  (optc)
    542             handle_codepage( 0 );
    543            else
    544             handle_fontfile();
    545  
    546            if  (optx) {
    547                printf ( " no page %d found/n " ,  codepage);
    548                exit ( 1 );
    549           }
    550  
    551           fclose(in);
    552            return  ( 0 );
    553   }
    554  
    555   void
    556   handle_fontfile(){
    557            int  i ,  j;
    558  
    559           j  =  fread( ,   1 ,  sizeof(FontFileHeader) ,  in);
    560            if  (j  !=  sizeof(FontFileHeader)) {
    561                printf ( " error reading FontFileHeader - got %d chars/n " ,  j);
    562                exit  ( 1 );
    563           }
    564            if  ( ! strcmp(FontFileHeader . id  +   1 ,   " DRFONT  " )) {
    565                printf ( " this program cannot handle DRDOS font files/n " );
    566                exit ( 1 );
    567           }
    568            if  (optL)
    569              printf ( " FontFileHeader: id=%8.8s res=%8.8s num=%d typ=%c offset=%ld/n/n " ,
    570                    FontFileHeader . id ,  FontFileHeader . res ,
    571                    FontFileHeader . num_pointers ,
    572                    FontFileHeader . p_type ,
    573                    FontFileHeader . offset);
    574  
    575           j  =  fread( ,   1 ,  sizeof(FontInfoHeader) ,  in);
    576            if  (j  !=  sizeof(FontInfoHeader)) {
    577                printf ( " error reading FontInfoHeader - got %d chars/n " ,  j);
    578                exit  ( 1 );
    579           }
    580            if  (optL)
    581              printf ( " FontInfoHeader: num_codepages=%d/n/n " ,
    582                    FontInfoHeader . num_codepages);
    583  
    584            for  (i  =  FontInfoHeader . num_codepages; i; i -- )
    585              if  (handle_codepage(i - 1 ))
    586               break;
    587   }
    588  
    589   int
    590   handle_codepage( int  more_to_come) {
    591            int  j;
    592           char outfile[ 20 ];
    593           unsigned char  * fonts;
    594           long inpos ,  nexthdr;
    595  
    596           j  =  fread( ,   1 ,  sizeof(CPEntryHeader) ,  in);
    597            if  (j  !=  sizeof(CPEntryHeader)) {
    598                printf ( " error reading CPEntryHeader - got %d chars/n " ,  j);
    599                exit ( 1 );
    600           }
    601            if  (optL) {
    602                int  t  =  CPEntryHeader . device_type;
    603                printf ( " CPEntryHeader: size=%d dev=%d [%s] name=%8.8s /
    604   codepage=%d/n/t/tres=%6.6s nxt=%ld off_font=%ld/n/n " ,
    605                      CPEntryHeader . size ,
    606                      t ,  (t == 1 ?   " screen "   :  (t == 2 ?   " printer "   :   " ? " ,
    607                      CPEntryHeader . device_name ,
    608                      CPEntryHeader . codepage ,
    609                      CPEntryHeader . res ,
    610                      CPEntryHeader . off_nexthdr ,  CPEntryHeader . off_font);
    611           }  else   if  (optl) {
    612                printf ( " /nCodepage = %d/n " ,  CPEntryHeader . codepage);
    613                printf ( " Device = %.8s/n " ,  CPEntryHeader . device_name);
    614           }
    615   # if 0
    616            if  (CPEntryHeader . size  !=  sizeof(CPEntryHeader)) {
    617                /*  seen  26  and  28 ,  so that the difference below is  - 2  or  0   */
    618                if  (optl)
    619                  printf ( " Skipping %d bytes of garbage/n " ,
    620                        CPEntryHeader . size  -  sizeof(CPEntryHeader));
    621               fseek(in ,  CPEntryHeader . size  -  sizeof(CPEntryHeader) ,
    622                     SEEK_CUR);
    623           }
    624   # endif
    625            if  ( ! opta  &&  ( ! optx  ||  CPEntryHeader . codepage  !=  codepage)  &&   ! optc)
    626              goto   next ;
    627  
    628           inpos  =  ftell(in);
    629            if  (inpos  !=  CPEntryHeader . off_font  &&   ! optc) {
    630                if  (optL)
    631                  printf ( " pos=%ld font at %ld/n " ,  inpos ,  CPEntryHeader . off_font);
    632               fseek(in ,  CPEntryHeader . off_font ,  SEEK_SET);
    633           }
    634  
    635           j  =  fread( ,   1 ,  sizeof(CPInfoHeader) ,  in);
    636            if  (j  !=  sizeof(CPInfoHeader)) {
    637                printf ( " error reading CPInfoHeader - got %d chars/n " ,  j);
    638                exit ( 1 );
    639           }
    640            if  (optl) {
    641                printf ( " Number of Fonts = %d/n " ,  CPInfoHeader . num_fonts);
    642                printf ( " Size of Bitmap = %d/n " ,  CPInfoHeader . size);
    643           }
    644            if  (CPInfoHeader . num_fonts  ==   0 )
    645              goto   next ;
    646            if  (optc)
    647              return   0 ;
    648  
    649            sprintf (outfile ,   " %d.cp " ,  CPEntryHeader . codepage);
    650            if  ((out  =  fopen(outfile ,   " w " ))  ==  NULL) {
    651                printf ( " /nUnable to open file %s./n " ,  outfile);
    652                exit ( 1 );            
    653           }  else   printf ( " /nWriting %s/n " ,  outfile);
    654  
    655           fonts  =  (unsigned char  * ) malloc(CPInfoHeader . size);
    656                   
    657           fread(fonts ,  CPInfoHeader . size ,   1 ,  in);
    658           fwrite( ,  sizeof(CPEntryHeader) ,   1 ,  out);
    659           fwrite( ,  sizeof(CPInfoHeader) ,   1 ,  out);
    660           j  =  fwrite(fonts ,   1 ,  CPInfoHeader . size ,  out);
    661            if  (j  !=  CPInfoHeader . size) {
    662                printf ( " error writing %s - wrote %d chars/n " ,  outfile ,  j);
    663                exit ( 1 );
    664           }
    665           fclose(out);
    666           free(fonts);
    667            if  (optx)  exit ( 0 );
    668          next :
    669            /*
    670             *  It seems that  if  entry headers and fonts are interspersed ,
    671             *  then nexthdr will point past the font ,  regardless of
    672             *  whether more entries follow .
    673             *  Otherwise ,  first all entry headers are given ,  and then
    674             *  all fonts; in this case nexthdr will be  0  in the  last  entry .
    675             */
    676           nexthdr  =  CPEntryHeader . off_nexthdr;
    677            if  (nexthdr  ==   0   ||  nexthdr  ==   - 1 ) {
    678                if  (more_to_come) {
    679                    printf ( " mode codepages expected, but nexthdr=%ld/n " ,
    680                          nexthdr);
    681                    exit ( 1 );
    682               }  else
    683                    return   1 ;
    684           }
    685  
    686           inpos  =  ftell(in);
    687            if  (inpos  !=  CPEntryHeader . off_nexthdr) {
    688                if  (optL)
    689                  printf ( " pos=%ld nexthdr at %ld/n " ,  inpos ,  nexthdr);
    690                if  (opta  &&   ! more_to_come) {
    691                    printf ( " no more code pages, but nexthdr != 0/n " );
    692                    return   1 ;
    693               }
    694  
    695               fseek(in ,  CPEntryHeader . off_nexthdr ,  SEEK_SET);
    696           }
    697  
    698            return   0 ;
    699   }
    700  
    701   void usage(void)
    702   {
    703            printf ( " /nUsage: cpi code_page_file [-c] [-L] [-l] [-a|nnn]/n " );
    704            printf ( "  -c: input file is a single codepage/n " );
    705            printf ( "  -L: print header info (you don't want to see this)/n " );
    706            printf ( "  -l or no option: list all codepages contained in the file/n " );
    707            printf ( "  -a: extract all codepages from the file/n " );
    708            printf ( "  nnn (3 digits): extract codepage nnn from the file/n " );
    709            printf ( " Example: cpi ega.cpi 850 /n " );
    710            printf ( "  will create a file 850.cp containing the requested codepage./n/n " );
    711            exit ( 1 );
    712   }
  • 0
    点赞
  • 3
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值