无忧启动论坛

标题: unifont.hex減肥php腳本 [打印本页]
作者: roytam1    时间: 2012-3-25 17:47
标题: unifont.hex減肥php腳本
使用 CP***.TXT 來限定新的 unifont.hex 所擁有的字數。
CP***.TXT 可在 unicode.org 下載： http://unicode.org/Public/MAPPINGS/VENDORS/MICSFT/WINDOWS/

用法：
php tbl4slim.php [TXT檔...]
如：
php tbl4slim.php CP936.TXT CP950.TXT

新生成的為 unifont.hex.slim

  1. <?php

  3. $txtfiles = array();
  4. $txtary = array();

  6. $chrs = array();
  7. $newunifonthex = array();

  9. if($_SERVER['argc'] < 2) {
  10.         fwrite(STDERR, "Usage: ".$_SERVER['argv'][0]." {TXT files...}\n");
  11.         exit(2);
  12. }
  13. if(!file_exists('./unifont.hex')) {
  14.         fwrite(STDERR, "Error: unifont.hex not found!\n");
  15.         exit(1);
  16. }

  18. for($i=1;$i<$_SERVER['argc'];++$i) {
  19.         if(!file_exists($_SERVER['argv'][$i])) {
  20.                 fwrite(STDERR, "Warning: ".$_SERVER['argv'][$i]." is not found.\n");
  21.         } else {
  22.                 $txtfiles[] = file($_SERVER['argv'][$i]);
  23.         }
  24. }
  25. foreach($txtfiles as $t) {
  26.         foreach($t as $l) {
  27.                 $txtary = explode("\t",$l);
  28.                 if(isset($txtary[1]) && substr($txtary[1],0,2)=='0x') $chrs[$txtary[1]] = 1;
  29.         }
  30. }

  32. $txtary = file('./unifont.hex');
  33. foreach($txtary as $l) {
  34.         if(isset($chrs['0x'.substr($l,0,4)])) $newunifonthex[] = $l;
  35. }

  37. $fp = fopen('./unifont.hex.slim','wb');
  38. fwrite($fp,implode('',$newunifonthex));
  39. fclose($fp);
复制代码




欢迎光临 无忧启动论坛 (http://wuyou.net/) Powered by Discuz! X3.3