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

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 输入法编程 > 查看源码
HZlib.c
资源名称：freepy22.zip　[点击查看]
上传用户：shdz666
上传日期：2007-01-03
资源大小：566k
文件大小：12k
源码类别：

输入法编程

开发平台：

Visual C++

HZlib.c：源码内容
  1. /*
  2.  * Copyright (C) 1999.4  Li ZhenChun
  3.  *
  4.  * This program is free software; you can redistribute it and/or modify
  5.  * it under the terms of the GNU General Public License as published by
  6.  * the Free Software Foundation; either version 2 of the License; or
  7.  * (at your option) any later version.
  8.  *
  9.  * This program is distributed in the hope that is will be useful, but
  10.  * WITHOUT ANY WARRANTY; without even the implied warranty of 
  11.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  12.  * General Public License for more details.
  13.  *
  14.  * You should have received a copy of the GNU General Public License
  15.  * along with this program; if not, write to the Free Software
  16.  * Foundation, Inc., 675 Mass Ave, Cambridge, M A 02139, USA.
  17.  *
  18.  * Author: Li ZhenChun  email: zhchli@163.net or zhchli@126.com
  19.  * 
  20.  */
  22. #include "freepy.h"
  24. void LoadHZDictionary( LPTSTR);
  25. void LoadPunct( LPTSTR );
  26. WORD String2Array(LPTSTR ,LPTSTR ,WORD );
  27. WORD GetSegment(LPTSTR);
  28. void GetStr(FILE *,LPTSTR);
  29. void LoadTable();
  30. void LoadPhrase();
  33. void LoadHZDictionary( LPTSTR lpStr)
  34. {
  35. TCHAR szPY[20],szHZ[1200];
  36. static int i=0,j=0,nPre=0;
  37. WORD wPYHead=1;
  38. LPPINYIN lpPYTab = (LPPINYIN)aPYTab;
  40. _stscanf(lpStr,"%s %s",szPY,szHZ);
  42. alpHZTab[i] = _tcsdup(szHZ);
  44. wPYHead=(WORD)szPY[0] - (WORD)_T('a');
  45. if(wPYHead != nPre) j=0;
  46. _tcscpy( (lpPYTab+wPYHead*MAX_EACH_PY_NUM+j)->szPY,szPY);
  47. (lpPYTab+wPYHead*MAX_EACH_PY_NUM+j)->wKey=i+1;
  49. nPre=wPYHead;
  50. i++,j++;
  51. return;
  52. }
  54. WORD String2Array(LPTSTR lpBuf,LPTSTR lpStrArr,WORD wMaxArrSize)
  55. {
  56. int i;
  57. WORD cursor=0,count=0,wBufLen;
  59. wBufLen = strlen(lpBuf);
  61. for (i=0;i<wBufLen;i++){
  62. if(*(lpBuf+i) == _T(' ') || *(lpBuf+i) == _T('t')) {
  63. if(i!=0 && *(lpBuf+i-1)!=_T(' ') && *(lpBuf+i-1)!=_T('t') ){
  64. _tcsncpy(lpStrArr+count*wMaxArrSize,lpBuf+cursor,i-cursor);
  65. *(lpStrArr+count*wMaxArrSize+i-cursor)=_T('');
  66. count++;
  67. }
  68. cursor=i+1;
  69. }
  70. if(i == wBufLen-1 && *(lpBuf+i)!=_T(' ') && *(lpBuf+i)!=_T(' ') ){
  71. _tcsncpy(lpStrArr+count*wMaxArrSize,lpBuf+cursor,i-cursor+1);
  72. *(lpStrArr+count*wMaxArrSize+i-cursor+1)=_T('');
  73. count++;
  74. }
  75. }
  76. return count;
  77. }
  79. void LoadPunct( LPTSTR lpStr)
  80. {
  81. TCHAR szStrArr[70][70];
  82. WORD wCount,wHead;
  83. int i;
  85. wCount = String2Array(lpStr,(LPTSTR)szStrArr,70);
  87. if( szStrArr[0][0] > _T('~') || szStrArr[0][0] < _T('!')) return;
  89. wHead = szStrArr[0][0] - _T('!');
  91. for(i=1;i<wCount;i++){
  92. _tcscpy(aPunct[wHead][i-1],szStrArr[i]);
  93. }
  94. aPunct[wHead][wCount][0] = _T('');
  95. }
  97. WORD GetSegment(LPTSTR buf)
  98. {
  99. if(*buf == _T('')) return 1; //END_SEGMENT
  100. else if(*buf == _T('#')) return 2; //COMMENT
  101. else if( _tcsstr(buf,_T("[PUNCTUATION]")) != NULL ) return 3; 
  102. else if( _tcsstr(buf,_T("[DICTIONARY]")) != NULL) return 4;
  103. else return 0;
  104. }
  106. void GetStr(FILE *pf,LPTSTR pbuf)
  107. {
  108. while( !feof(pf) ) {
  109. *pbuf = _fgettc(pf);
  110. if(*pbuf == _T('n')) break;
  111. pbuf++;
  112. }
  113. *pbuf = _T('');
  114. }
  116. void LoadTable()
  117. {
  118. FILE *stream;
  119. TCHAR szStr[1200];
  120. TCHAR szTabFileName[200];
  121. LPTSTR lpTabFileName = szTabFileName;
  124. lpTabFileName += GetSystemDirectory(szTabFileName,200);
  125. if (*(lpTabFileName-1) != _T('\'))
  126. *lpTabFileName++ = _T('\');
  127. _tcscpy(lpTabFileName,TABFILENAME);
  129. if( (stream = _tfopen( szTabFileName, "r" )) == NULL ){
  130. _stprintf(szStr,"%s can not found",szTabFileName);
  131. MessageBox(NULL,szStr,"init",MB_OK);
  132. exit(1);
  133. }
  135. while( !feof( stream )) {
  136. GetStr(stream,szStr);
  138. switch( GetSegment(szStr)) {
  139. case 1: //END_SEGMENT
  140. break;
  142. case 2: //COMMENT
  143. break;
  145. case 3: //PUNCTUATION
  146. if( feof( stream ) ) goto my_exit;
  147. GetStr(stream,szStr);
  148. while(GetSegment(szStr) != 1) {
  149. if( GetSegment(szStr) != 2){
  150. LoadPunct( szStr );
  151. }
  152. if( feof( stream ) ) goto my_exit;
  153. GetStr(stream,szStr);
  154. }
  155. break;
  157. case 4: //DICTIONARY
  158. if( feof( stream ) ) goto my_exit;
  159. GetStr(stream,szStr);
  160. while(GetSegment(szStr) != 1) {
  161. if( GetSegment(szStr) != 2){
  162. LoadHZDictionary( szStr );
  163. }
  164. if( feof( stream ) ) goto my_exit;
  165. GetStr(stream,szStr);
  166. }
  167. break;
  169. default:
  170. break;
  171. }
  172. }
  173. my_exit:
  174. fclose(stream);
  175. return;
  176. }
  178. void LoadPhrase()
  179. {
  180. FILE *stream;
  181. BYTE bLen;
  182. WORD wLen;
  184. TCHAR szStr[2*(MAX_PHRASE_LEN+1)];
  185. BYTE abKey[MAX_PHRASE_LEN+1];
  187. WORD i;
  188. TCHAR szPhraseFileName[200],szTemp[200];
  189. LPTSTR lpPhraseFileName;
  191. for(i=0;i<2;i++){
  192. if(!i){
  193. lpPhraseFileName = szPhraseFileName;
  194. lpPhraseFileName += GetSystemDirectory(szPhraseFileName,200);
  195. if (*(lpPhraseFileName-1) != _T('\'))
  196. *lpPhraseFileName++ = _T('\');
  197. _tcscpy(lpPhraseFileName,SYSPHRASEFILENAME);
  199. if( (stream = _tfopen( szPhraseFileName, _T("rb") )) == NULL ){
  200. _stprintf(szTemp,"%s can not found",szPhraseFileName);
  201. MessageBox(NULL,szTemp,"DicInit",MB_OK);
  202. exit(1);
  203. }
  204. }
  205. else{
  206. lpPhraseFileName = szPhraseFileName;
  207. lpPhraseFileName += GetSystemDirectory(szPhraseFileName,200);
  208. if (*(lpPhraseFileName-1) != _T('\'))
  209. *lpPhraseFileName++ = _T('\');
  210. _tcscpy(lpPhraseFileName,USRPHRASEFILENAME);
  212. if( (stream = _tfopen( szPhraseFileName, _T("rb") )) == NULL ){
  213. _stprintf(szTemp,"%s can not found",szPhraseFileName);
  214. // MessageBox(NULL,szTemp,"DicInit",MB_OK);
  215. goto my_exit;
  216. }
  217. }
  219. while( !feof( stream )) {
  220. if(fread(&bLen,1,1,stream)){
  221. wLen=(WORD)bLen;
  222. if( wLen > 0 && fread(abKey,1,wLen+1,stream) &&
  223. fread(szStr,1,wLen*2,stream) ) {
  224. szStr[wLen*2] = _T('');
  225. SavePhToMapFile(szStr,abKey,wLen,i);
  226. }
  227. }
  228. }
  229. fclose(stream);
  230. if( !i )
  231. dwMapFileUsrOffset = 2*MAX_PY_NUM*sizeof(KEYPH) + dwMapFileOffset;
  232. }
  233. my_exit:
  234. return;
  235. }
  237. void SavePhToMapFile(LPTSTR lpStr,LPBYTE lpbKey,WORD wLen,WORD wStatus)
  238. {
  239. LPKEYPH lpKeyPH;
  240. LPHZPH lpHZPH;
  241. BOOL fFirst;
  242. WORD wHead;
  243. DWORD dwBaseOffset;
  245. if(wLen<1) return;
  247. dwBaseOffset = 2*MAX_PY_NUM*sizeof(KEYPH);
  249. wHead=(WORD)(*(lpbKey+1));
  250. wHead |= (WORD)((*lpbKey & 0x01) << 8);
  251. wHead--;
  252. if(wHead >= MAX_PY_NUM) return;
  254. if( !(lpKeyPH=(LPKEYPH)((LPBYTE)lpMapFileBase+wStatus*MAX_PY_NUM*sizeof(KEYPH))+wHead)->wLen ) {
  255. lpKeyPH->wLen=wLen;
  256. memcpy(lpKeyPH->abKey,lpbKey,wLen+1);
  257. lpKeyPH->lpNext=NULL;
  258. if((dwBaseOffset + dwMapFileOffset + sizeof(HZPH)) > MAPFILESIZE){
  259. return;
  260. }
  261. lpKeyPH->lpHZPH = (LPHZPH)((LPBYTE)lpMapFileBase + 
  262. dwBaseOffset + dwMapFileOffset);
  263. dwMapFileOffset += sizeof(HZPH);
  264. lpKeyPH->lpHZPH->dwAttrib=0;
  265. lpKeyPH->lpHZPH->lpNext=NULL;
  266. _tcscpy(lpKeyPH->lpHZPH->szHZ,lpStr);
  267. }
  269. else{
  270. fFirst=TRUE;
  271. do {
  272. if(fFirst) fFirst=FALSE;
  273. else lpKeyPH=lpKeyPH->lpNext;
  275. if(lpKeyPH->wLen==wLen && !memcmp(lpKeyPH->abKey,lpbKey,wLen+1)){
  276. lpHZPH=lpKeyPH->lpHZPH;
  277. while(lpHZPH->lpNext != NULL)
  278. lpHZPH=lpHZPH->lpNext;
  280. if((dwBaseOffset + dwMapFileOffset + sizeof(HZPH)) > MAPFILESIZE){
  281. return;
  282. }
  283. lpHZPH->lpNext = (LPHZPH)((LPBYTE)lpMapFileBase + 
  284. dwBaseOffset + dwMapFileOffset);
  285. dwMapFileOffset += sizeof(HZPH);
  286. lpHZPH->lpNext->dwAttrib=0;
  287. lpHZPH->lpNext->lpNext=NULL;
  288. _tcscpy(lpHZPH->lpNext->szHZ,lpStr);
  289. goto my_exit;
  290. }
  291. }while(lpKeyPH->lpNext != NULL);
  293. if((dwBaseOffset + dwMapFileOffset + sizeof(KEYPH)) > MAPFILESIZE){
  294. return;
  295. }
  296. lpKeyPH->lpNext = (LPKEYPH)((LPBYTE)lpMapFileBase + 
  297. dwBaseOffset + dwMapFileOffset);
  298. dwMapFileOffset += sizeof(KEYPH);
  300. lpKeyPH->lpNext->wLen=wLen;
  301. memcpy(lpKeyPH->lpNext->abKey,lpbKey,wLen+1);
  302. lpKeyPH->lpNext->lpNext=NULL;
  304. if((dwBaseOffset + dwMapFileOffset + sizeof(HZPH)) > MAPFILESIZE){
  305. return;
  306. }
  307. lpKeyPH->lpNext->lpHZPH = (LPHZPH)((LPBYTE)lpMapFileBase + 
  308. dwBaseOffset + dwMapFileOffset);
  309. dwMapFileOffset += sizeof(HZPH);
  311. lpKeyPH->lpNext->lpHZPH->dwAttrib=0;
  312. lpKeyPH->lpNext->lpHZPH->lpNext=NULL;
  313. _tcscpy(lpKeyPH->lpNext->lpHZPH->szHZ,lpStr);
  314. }
  315. my_exit:
  316. return;
  317. }
  319. WORD QueryPhrase(LPBYTE lpbKey,WORD wLen,LPKEYPH *lplpKeyPh)
  320. {
  321. WORD wHead,wCount=0,wMask=0;
  322. LPKEYPH lpKPh;
  323. int i;
  324. BYTE abKey[MAX_PHRASE_LEN+1];
  325. BOOL fFirst;
  327. *lplpKeyPh = NULL;
  328. *(lplpKeyPh+1) = NULL;
  330. if(wLen<1) return 0;
  332. wHead = (WORD)(*(lpbKey+1));
  333. wHead |= ((WORD)(*lpbKey & 0x01)) << 8;
  334. wHead--;
  336. for(i=0;i<wLen;i++)
  337. wMask += 1<<i;
  339. for(i=0;i<2;i++){
  340. if( !(lpKPh=(LPKEYPH)((LPBYTE)lpMapFileBase+i*MAX_PY_NUM*sizeof(KEYPH))+wHead)->wLen ) {
  341. continue;
  342. }
  344. fFirst = TRUE;
  345. do {
  346. if(wCount && *(lplpKeyPh+i) != NULL) break;
  348. if( fFirst ) fFirst = FALSE;
  349. else lpKPh = lpKPh->lpNext;
  351. if( lpKPh->wLen >= wLen){
  352. memcpy(abKey,lpKPh->abKey,wLen+1);
  353. abKey[0] &= wMask;
  354. if(!memcmp(abKey,lpbKey,wLen+1)){
  355. if(lpKPh->wLen == wLen) *(lplpKeyPh+i) = lpKPh;
  356. else wCount++;
  357. }
  358. }
  359. }while(lpKPh->lpNext != NULL);
  360. }
  361. return wCount;
  362. }
  364. void InitDictionary()
  365. {
  366. int i;
  367. BOOL fExist = FALSE;
  369. if ( (hMapFile=CreateFileMapping( INVALID_HANDLE_VALUE,
  370. NULL,
  371. PAGE_READWRITE ,
  372. 0,
  373. MAPFILESIZE,
  374. MAPFILENAME)) == NULL) {
  375. MessageBox(NULL,"can not create filemapping","Init",MB_OK);
  376. exit(1);
  377. }
  379. if (GetLastError() == ERROR_ALREADY_EXISTS) {
  380. fExist = TRUE;
  381. }
  383. if ( (lpMapFileBase = (LPVOID) MapViewOfFile( hMapFile,
  384. FILE_MAP_ALL_ACCESS ,
  385. 0,
  386. 0,
  387. 0)) == NULL) {
  388. MessageBox(NULL,"can not create filemapping","Init",MB_OK);
  389. exit(1);
  390. }
  392. if( !fExist || !dwMapFileOffset || !wMapCount){
  393. for(i=0;i<2*MAX_PY_NUM*sizeof(KEYPH);i++){
  394. *((LPBYTE)lpMapFileBase+i)=0;
  395. }
  396. LoadPhrase();
  397. }
  399. LoadTable();
  401. wMapCount++;
  402. }
  404. void SortDic(LPHZPH *lplpPh, WORD wLen)
  405. {
  406. int i,j;
  407. LPHZPH lpTempPh;
  409. for(i=0;i<wLen;i++){
  410. for(j=i;j<wLen;j++){
  411. if( (*(lplpPh+i))->dwAttrib < (*(lplpPh+j))->dwAttrib){
  412. lpTempPh = *(lplpPh+i);
  413. *(lplpPh+i)=*(lplpPh+j);
  414. *(lplpPh+j)=lpTempPh;
  415. }
  416. }
  417. }
  418. }
  420. void DestroyDictionary()
  421. {
  422. int i,j,k;
  423. BYTE abKey[MAX_PHRASE_LEN+1];
  424. WORD wLen;
  425. BYTE bLen;
  426. LPKEYPH lpKPh;
  427. LPHZPH lpHZPh;
  428. FILE *stream;
  429. TCHAR szPhraseFileName[200],szTemp[200];
  430. LPTSTR lpPhraseFileName;
  431. BOOL fFirst1,fFirst2;
  432. LPHZPH alpHZPh[500];
  433. WORD wPhLen;
  435. for(i=0;i<MAX_PY_NUM;i++){
  436. if(alpHZTab[i] != NULL) free(alpHZTab[i]);
  437. }
  439. wMapCount--;
  440. // if( wMapCount > 0 ) goto my_exit;
  442. for(i=0;i<2;i++){
  443. if(!i){
  444. lpPhraseFileName = szPhraseFileName;
  445. lpPhraseFileName += GetSystemDirectory(szPhraseFileName,200);
  446. if (*(lpPhraseFileName-1) != _T('\'))
  447. *lpPhraseFileName++ = _T('\');
  448. _tcscpy(lpPhraseFileName,SYSPHRASEFILENAME);
  450. if( (stream = _tfopen( szPhraseFileName, _T("wb") )) == NULL ){
  451. _stprintf(szTemp,"%s can not found",szPhraseFileName);
  452. MessageBox(NULL,szTemp,"DicInit",MB_OK);
  453. continue;
  454. }
  455. }
  456. else{
  457. lpPhraseFileName = szPhraseFileName;
  458. lpPhraseFileName += GetSystemDirectory(szPhraseFileName,200);
  459. if (*(lpPhraseFileName-1) != _T('\'))
  460. *lpPhraseFileName++ = _T('\');
  461. _tcscpy(lpPhraseFileName,USRPHRASEFILENAME);
  463. if( (stream = _tfopen( szPhraseFileName, _T("wb") )) == NULL ){
  464. _stprintf(szTemp,"%s can not found",szPhraseFileName);
  465. MessageBox(NULL,szTemp,"DicInit",MB_OK);
  466. continue;
  467. }
  468. }
  469. for(j=0;j<MAX_PY_NUM;j++){
  470. if( !(lpKPh=(LPKEYPH)((LPBYTE)lpMapFileBase+i*MAX_PY_NUM*sizeof(KEYPH))+j)->wLen ) {
  471. continue;
  472. }
  473. fFirst1 = TRUE;
  474. do {
  475. if( fFirst1 ) fFirst1 = FALSE;
  476. else lpKPh = lpKPh->lpNext;
  478. if( lpKPh->wLen < 0 ) continue;
  479. wLen = lpKPh->wLen;
  480. bLen = (BYTE)wLen;
  481. lpHZPh = lpKPh->lpHZPH;
  482. memcpy(abKey,lpKPh->abKey,wLen+1);
  483. fFirst2 = TRUE;
  484. wPhLen = 0;
  485. do {
  486. if( fFirst2 ) fFirst2 = FALSE;
  487. else lpHZPh = lpHZPh->lpNext;
  488. alpHZPh[wPhLen++] = lpHZPh;
  489. }while(lpHZPh->lpNext != NULL);
  491. if( wConversionSet & CONVERSION_SET_SORT)
  492. SortDic(alpHZPh,wPhLen);
  494. for(k = 0;k<wPhLen;k++){
  495. fwrite(&bLen,1,1,stream);
  496. fwrite(abKey,1,wLen+1,stream);
  497. fwrite(alpHZPh[k]->szHZ,1,wLen*2,stream);
  498. }
  499. } while(lpKPh->lpNext != NULL);
  500. }
  501. fclose(stream);
  502. }
  503. //my_exit:
  504. UnmapViewOfFile(lpMapFileBase);
  505. CloseHandle(hMapFile);
  506. }