开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 多国语言处理 > 查看源码
TRANUC.CPP
资源名称：ChineseScape.zip　[点击查看]
上传用户：zhang8947
上传日期：2007-01-08
资源大小：1910k
文件大小：11k
源码类别：

多国语言处理

开发平台：

Visual C++

TRANUC.CPP：源码内容
  2. //UCDOS输入法文本文件转换程序
  4. #include "stdafx.h"
  5. #include "windowsx.h"
  6. #include "tranuc.h"
  7. #include "csinput.h"
  9. CTranUcdos OTranUcdos ;
  11. //转换的接口
  12. BOOL CTranUcdos::TranslateUcdos( CString pathName )
  13. {
  14. //组织库文件名
  15. strcpy( m_sLibName , pathName ) ;
  16. m_sLibName[strlen(m_sLibName)-3] ='' ;
  17. strcat( m_sLibName , "iml" ) ;
  18.  
  19. //打开原文件
  20. CFile file ;
  21. if( !file.Open( pathName , CFile::modeRead|CFile::typeBinary ) )
  22. {
  23. AfxMessageBox( "Open file error" ) ;
  24. return 0 ;
  25. }
  26. //得到文件长度
  27. m_dwSourceLen =file.GetLength() ;
  28. //分配地址空间
  29. m_hpsSource =(char huge*)GlobalAllocPtr( GMEM_FIXED ,
  30. m_dwSourceLen ) ;
  31. if( !m_hpsSource )
  32. {
  33. AfxMessageBox( "GlobalAllocPtr error" ) ;
  34. file.Close() ;
  35. return 0 ;
  36. }
  37. //读出源文件内容
  38. file.ReadHuge( m_hpsSource , m_dwSourceLen ) ;
  39. //关闭文件
  40. file.Close() ;
  42. //对源库进行分析,以生成我的库
  43. //设置初始值
  44. //整个库所占字节数
  45. inputLibHead.dwTotalBytes =sizeof( INPUT_LIB_HEAD ) ;
  46. inputLibHead.dwTotalWords =0 ; //整个库中的词条数目
  47. inputLibHead.sName[0] ='' ; //输入法名,以''结束
  48. inputLibHead.nFunctionKey =0 ; //功能键号
  49. inputLibHead.nGodKey ='z' ; //万能键
  50. inputLibHead.nMaxCodeLen =0 ; //最大码长
  51. for( int i=0 ; i<CODE_CELL_NUM ; i++ )
  52. {
  53. inputLibHead.sCodeCells[i] =0 ;
  54. inputLibHead.dwIndex[i] =0 ; //首码索引表
  55. }
  57. Analysis() ;
  59. //释放申请的空间
  60. GlobalFreePtr( m_hpsSource ) ;
  62. //产生我的输入法文件
  63. CreateMyLib() ;
  66. return 1 ;
  67. }
  69. //创建我的输入法库
  70. void CTranUcdos::CreateMyLib( void )
  71. {
  72. DWORD dwLibPoint =sizeof( INPUT_LIB_HEAD ) ; //库指针
  73. char sFileName[13] ="a.tmp" ;
  74. CFile file ;
  75. DWORD dwFileLen ;
  76. char huge *hpsFile ;
  78. CFile libFile ; //库文件
  79. if( !libFile.Open( m_sLibName , CFile::modeReadWrite|
  80. CFile::modeCreate|
  81. CFile::typeBinary ) )
  82. {
  83. AfxMessageBox( "创建.iml文件失败" ) ;
  84. return ;
  85. }
  86. //将库头写入,主要是为了定位
  87. libFile.Write( &inputLibHead , sizeof( INPUT_LIB_HEAD ) ) ;
  89. INPUT_LIB_ITEM huge *pItem ;
  90. DWORD j ;
  91. DWORD dwItemNum ;
  92. int nItemLen ;
  94. for( int i=0 ; i<CODE_CELL_NUM ; i++ )
  95. {
  96. if( !inputLibHead.sCodeCells[i] ) //没有这个元
  97. continue ;
  99. //组织文件名
  100. sFileName[0] =i+33 ;
  101. //打开文件
  102. if( !file.Open( sFileName , CFile::modeRead|CFile::typeBinary ) )
  103. continue ; //可能该文件不存在
  105. //得到文件长度
  106. dwFileLen =file.GetLength() ;
  107. if( dwFileLen % sizeof( INPUT_LIB_ITEM ) )
  108. {
  109. AfxMessageBox( "文件长度不对" ) ;
  110. return ;
  111. }
  112. //分配空间
  113. hpsFile =(char huge*)GlobalAllocPtr( GMEM_FIXED ,
  114.                             dwFileLen ) ;
  115. if( !hpsFile )
  116. {
  117. AfxMessageBox( "GlobalAllocPtr error" ) ;
  118. return ;
  119. }                                         
  120. //读出内容
  121. file.ReadHuge( hpsFile , dwFileLen ) ;
  122. //关闭文件
  123. file.Close() ;
  124. //删除该文件
  125. remove( sFileName ) ;
  127. //对该内容进行排序
  128. SortContent( hpsFile , dwFileLen ) ;
  130. //填写该码元检索表
  131. inputLibHead.dwIndex[i] =dwLibPoint ;
  133. //将排序结果写入库文件
  134. dwItemNum =dwFileLen/sizeof( INPUT_LIB_ITEM) ;
  135. pItem =(INPUT_LIB_ITEM huge*)hpsFile ;
  136. for( j=0 ; j<dwItemNum ; j++ )
  137. {
  138. //项长度
  139. nItemLen =1 + pItem->nEnglishLen + pItem->nChineseLen ;
  140. dwLibPoint +=nItemLen ; //修改库指针
  141. //写入项长度
  142. libFile.Write( &nItemLen , 1 ) ;
  143. //写入英文串
  144. libFile.Write( pItem->sEnglish , pItem->nEnglishLen ) ;
  145. //写入汉字串
  146. libFile.Write( pItem->sChinese , pItem->nChineseLen ) ;
  148. pItem++ ;
  149. }
  151. //释放空间
  152. GlobalFreePtr( hpsFile ) ;
  153. }
  155. //定位到库开始,重新写入库头
  156. libFile.SeekToBegin() ;
  157. libFile.Write( &inputLibHead , sizeof( INPUT_LIB_HEAD ) ) ;
  158. //关闭库文件
  159. libFile.Close() ;
  161. if( dwLibPoint != inputLibHead.dwTotalBytes )
  162. AfxMessageBox( "dwLibPoint!==dwTotalBytes" ) ;
  163. }
  165. //对该内容进行排序
  166. void CTranUcdos::SortContent( char huge *hpsFile , DWORD dwFileLen )
  167. {
  168. int nItemLen =sizeof( INPUT_LIB_ITEM ) ;
  169. DWORD dwItemNum =dwFileLen/nItemLen ; //项数
  170. INPUT_LIB_ITEM huge *pItem1 ;
  171. INPUT_LIB_ITEM  huge *pItem2 ; //排序用
  172. INPUT_LIB_ITEM item ; //排序用缓冲区
  173. DWORD i , j ;
  174. int n ;
  176. for( i=0 ; i<dwItemNum ; i++ )
  177. {
  178. pItem1 =(INPUT_LIB_ITEM huge*)( hpsFile + i*nItemLen ) ;
  179. for( j=i+1 ; j<dwItemNum ; j++ )
  180. {
  181. pItem2 =(INPUT_LIB_ITEM huge*)( hpsFile + j*nItemLen ) ;
  182.     //比较两者的编码
  183.     n =_fstrncmp( pItem1->sEnglish , pItem2->sEnglish ,
  184.      min( pItem1->nEnglishLen , pItem2->nEnglishLen ) ) ;
  185. if( !n ) //两者相等,长者在后,短者在前
  186. {
  187. if( pItem1->nEnglishLen > pItem2->nEnglishLen ) //交换
  188. {
  189. CopyInputItem( &item , pItem1 ) ;
  190. CopyInputItem( pItem1 , pItem2 ) ;
  191. CopyInputItem( pItem2 , &item ) ;
  192. }
  193. continue ;
  194. }
  196. if( n>0 ) //前者大,需要交换
  197. {
  198. CopyInputItem( &item , pItem1 ) ;
  199. CopyInputItem( pItem1 , pItem2 ) ;
  200. CopyInputItem( pItem2 , &item ) ;
  201.     }
  202.     //前者小,不需要交换
  203. }   
  204. }
  205. }
  207. //拷贝输入项
  208. void CTranUcdos::CopyInputItem( INPUT_LIB_ITEM huge *item1 , 
  209. INPUT_LIB_ITEM huge *item2 )
  210. {
  211. item1->nEnglishLen =item2->nEnglishLen ;
  212. item1->nChineseLen =item2->nChineseLen ;
  213. _fstrncpy( item1->sEnglish , item2->sEnglish , item2->nEnglishLen ) ;
  214. _fstrncpy( item1->sChinese , item2->sChinese , item2->nChineseLen ) ;
  215. }
  217. void CTranUcdos::ShowResult( CDC *pdc )
  218. {
  219. char sBuff[100] ;
  220. int y =32 ;
  222. wsprintf( sBuff , "输入法名:%s" , inputLibHead.sName ) ;
  223. pdc->TextOut( 0 , y , sBuff , strlen( sBuff ) ) ;
  224. y +=16 ;
  225. wsprintf( sBuff , "功能键号:%c" , inputLibHead.nFunctionKey ) ;
  226. pdc->TextOut( 0 , y , sBuff , strlen( sBuff ) ) ;
  227. y +=16 ;
  228. wsprintf( sBuff , "万能键:%c" , inputLibHead.nGodKey ) ;
  229. pdc->TextOut( 0 , y , sBuff , strlen( sBuff ) ) ;
  230. y +=16 ;
  231. wsprintf( sBuff , "最大码长:%d" , inputLibHead.nMaxCodeLen ) ;
  232. pdc->TextOut( 0 , y , sBuff , strlen( sBuff ) ) ;
  233. y +=16 ;
  234. wsprintf( sBuff , "总字节数:%lu 总行数:%lu 总词条数:%lu" , 
  235. inputLibHead.dwTotalBytes ,
  236. m_dwTotalLines , inputLibHead.dwTotalWords ) ;
  237. pdc->TextOut( 0 , y , sBuff , strlen( sBuff ) ) ;
  238. }
  240. //得到一行
  241. BOOL CTranUcdos::GetOneLine( char *sLineBuff )
  242. {
  243. if( m_dwSourcePoint >= m_dwSourceLen ) //完了
  244. return 0 ;
  246. int nLineLen =0 ; //行长度
  247. for( ; m_dwSourcePoint < m_dwSourceLen ; m_dwSourcePoint++ )
  248. {
  249. if( m_dwSourcePoint < m_dwSourceLen-1 )
  250. {
  251. if( m_hpsSource[m_dwSourcePoint] == 0x0d &&
  252. m_hpsSource[m_dwSourcePoint+1] == 0x0a ) //行结束
  253. {
  254. m_dwSourcePoint +=2 ;
  255. break ;
  256. }
  257. }
  258. sLineBuff[nLineLen++] =m_hpsSource[m_dwSourcePoint] ;
  259. }
  261. sLineBuff[nLineLen] ='' ;
  262. return 1 ;
  263. }
  265. //分析源库文件(指UCDOS输入法文本文件格式)
  266. BOOL CTranUcdos::Analysis( void )
  267. {
  268. char sLineBuff[201] ; //行缓冲
  269. //------------------------------------------------------------------//
  271. m_dwTotalLines =0 ;
  272. m_dwSourcePoint =0 ; //源库指针指向库头
  273. while( 1 )
  274. {
  275. //得到一行
  276. if( !GetOneLine( sLineBuff ) ) //到达库尾
  277. return 1 ;
  279. m_dwTotalLines++ ;
  280. if( sLineBuff[0] == '' || sLineBuff[0] == ' ' ) //行结束或空格
  281. continue ; //放弃该行
  283. if( sLineBuff[0] & 0x80 ) //是汉字
  284. {
  285. if( !AnalysisHead( sLineBuff ) ) //分析头
  286. return 0 ;
  287. }
  288. else //头个字母是英文,说明这行是编码内容
  289. {
  290. inputLibHead.dwTotalWords++ ; //词数增加
  291. if( !AnalysisContent( sLineBuff ) ) //分析编码项
  292. return 0 ;
  293. }
  294. }
  296. return 1 ;
  297. }
  299. BOOL CTranUcdos::AnalysisContent( char *psLine )
  300. {
  301. char sTmpFile[13] ="a.tmp" ; //临时文件名
  302. CFile tmpFile ;
  304. sTmpFile[0] =psLine[0] ; //构造文件名
  305. //打开该文件
  306. if( !tmpFile.Open( sTmpFile , CFile::modeReadWrite|CFile::typeBinary ) )
  307. {
  308. //创建该文件
  309. if( !tmpFile.Open( sTmpFile , CFile::modeReadWrite|CFile::modeCreate|CFile::typeBinary ) )
  310. {
  311. AfxMessageBox( "创建文件失败" ) ;
  312. return 0 ;
  313. }
  314. }
  315. else
  316. //定位到文件尾
  317. tmpFile.SeekToEnd() ;
  319. INPUT_LIB_ITEM item ; //英文,汉字对照项
  320. item.nEnglishLen =0 ;
  321. item.nChineseLen =0 ;
  322. //去掉行首空格
  323. for( ; (*psLine) == ' ' ; psLine++ )
  324. ;
  325. //得到英文编码
  326. for( ; (*psLine) && (*psLine)!=' ' ; psLine++ )
  327. item.sEnglish[item.nEnglishLen++] =*psLine ;
  328. //去掉空格
  329. for( ; (*psLine) == ' ' ; psLine++ )
  330. ;
  331. if( !(*psLine) ) //到达行尾
  332. {
  333. char sBuff[50] ;
  334. wsprintf( sBuff , "第%d行只有编码,没有汉字" , m_dwTotalLines ) ;
  335. AfxMessageBox( sBuff ) ;
  336. return 0 ;
  337. }
  338. //得到汉字,直到行末
  339. for( ; *psLine ; )
  340. {
  341. if( (*psLine) == ' ' )
  342. {
  343. item.sChinese[item.nChineseLen++] =' ' ;
  344. //去掉其后的所有空 格
  345. for( psLine++ ; (*psLine) && (*psLine)==' ' ; psLine ++ )
  346. ;
  347. }
  348. else
  349. item.sChinese[item.nChineseLen++] =*psLine++ ;
  350. }
  352. //写入文件
  353. tmpFile.Write( &item , sizeof( INPUT_LIB_ITEM ) ) ;
  354. //关闭文件
  355. tmpFile.Close() ;
  357. int nBuffLen =1+item.nEnglishLen+item.nChineseLen ;
  358. inputLibHead.dwTotalBytes +=nBuffLen ;
  360. return 1 ;
  361. }
  363. //分析UCDOS输入法文本文件的头
  364. BOOL CTranUcdos::AnalysisHead( char *psLine )
  365. {
  366. int nFlag ;
  368. int nNameLen ; //等号后内容的长度
  369. char *psNamePoint ; //等号后内容的名字
  371. int i ;
  373. nFlag =0 ;
  374. if( !strncmp( "名称" , psLine , 4 ) ) //是输入法名称
  375. {
  376. nFlag =1 ;
  377. psLine +=4 ;
  378. }
  379. else if( !strncmp( "功能键号" , psLine , 8 ) )
  380. {
  381. nFlag =2 ;
  382. psLine +=8 ;
  383. }
  384. else if( !strncmp( "码元表" , psLine , 6 ) )
  385. {
  386. nFlag =3 ;
  387. psLine +=6 ;
  388. }
  389. else if( !strncmp( "万能键" , psLine , 6 ) )
  390. {
  391. nFlag =4 ;
  392. psLine +=6 ;
  393. }
  394. else if( !strncmp( "最大码长" , psLine , 8 ) )
  395. {
  396. nFlag =5 ;
  397. psLine +=8 ;
  398. }
  400. if( !nFlag ) //不需要的东西
  401. return 1 ;
  403. //去掉空格和等号
  404. for( ; (*psLine) == ' ' || (*psLine) == '=' ; psLine++ )
  405. ;
  406. //得到下一串内容(在碰到空格或行结束之前)
  407. psNamePoint =psLine ;
  408. for( nNameLen=0 ; (*psLine) && (*psLine)!=' ' ; 
  409. nNameLen++,psLine++)
  410. ;
  411. if( !nNameLen )
  412. {
  413. AfxMessageBox( "等号后没有东西" ) ;
  414. return 0 ;
  415. }
  417. switch( nFlag )
  418. {
  419. case 1: //输入法名称
  420. if( nNameLen > MAX_NAME_LEN ) //太长
  421. {
  422. AfxMessageBox( "文件名太长" ) ;
  423. return 0 ;
  424. }
  425. //得到文件名
  426. strncpy( inputLibHead.sName , psNamePoint , nNameLen ) ;
  427. inputLibHead.sName[nNameLen] ='' ;
  428. break ;
  429. case 2: //功能键号
  430. if( nNameLen > 1 )
  431. {
  432. AfxMessageBox( "功能键号不是个位数" ) ;
  433. return 0 ;
  434. }
  435. inputLibHead.nFunctionKey =(int)(*psNamePoint) ;
  436. break ;
  437. case 3: //码元表
  438. if( nNameLen > CODE_CELL_NUM )
  439. {
  440. AfxMessageBox( "码元太多了" ) ;
  441. return 0 ;
  442. }
  444. for( i=0 ; i<nNameLen ; i++ ) //得到码元
  445. {
  446. if( psNamePoint[i] < 33 || psNamePoint[i] > 126 )
  447. {
  448. AfxMessageBox( "码元不合法" ) ;
  449. return 0 ;
  450. }
  451. //设上标记
  452. inputLibHead.sCodeCells[psNamePoint[i]-33] =1 ;
  453. }
  454. break ;
  455. case 4: //万能键
  456. if( nNameLen > 1 )
  457. {
  458. AfxMessageBox( "万能键不是一个键" ) ;
  459. return 0 ;
  460. }
  461. inputLibHead.nGodKey =(int)(*psNamePoint) ;
  462. break ;
  463. case 5: //最大码长
  464. psNamePoint[nNameLen] ='' ;
  465. i =atoi( psNamePoint ) ; //将字符串转换成整数
  466. if( i<=0 || i>MAX_CODE_LEN )
  467. {
  468. AfxMessageBox( "最大码长不对" ) ;
  469. return 0 ;
  470. }
  471. inputLibHead.nMaxCodeLen =i ;
  472. break ;
  473. }
  475. return 1 ;
  476. }
  478. #ifdef __cplusplus
  479. extern "C" {
  480. #endif
  482. BOOL __export FAR PASCAL TranslateUcdos( LPCSTR pathName )
  483. {
  484. return OTranUcdos.TranslateUcdos( pathName ) ;
  485. }
  487. #ifdef __cplusplus
  488. }
  489. #endif