win32cut.cpp

分词程序

/*
 *FileName:	Win32Cut.cpp
 *Author:		vk
 *Create Date:	2005-11-16
 *Modify by:  	vk
 *Last Modify:	2005-11-17
 */
#include "stdafx.h"
#include "resource.h"
#include "Win32Cut.h"
#include <commdlg.h>


#define MAX_LOADSTRING 100

HINSTANCE hInst;								
TCHAR szTitle[MAX_LOADSTRING];								
TCHAR szWindowClass[MAX_LOADSTRING];
char FileNameStr[MAX_LOADSTRING];							//文件路径缓冲区
char LexFileName[MAX_LOADSTRING] = "parsingword.TXT";		//字典文件路径
extern char result[];
extern char buff[];
extern int  isinit;
extern FILE* fin;
extern FILE* fout;


ATOM				MyRegisterClass(HINSTANCE hInstance);
BOOL				InitInstance(HINSTANCE, int);
LRESULT CALLBACK	WndProc(HWND, UINT, WPARAM, LPARAM);
LRESULT CALLBACK	About(HWND, UINT, WPARAM, LPARAM);
LRESULT CALLBACK	SetLex(HWND, UINT, WPARAM, LPARAM);
LRESULT CALLBACK	FileAny(HWND, UINT, WPARAM, LPARAM);
void				analyse();
void				analysefile();
bool				init_table(char* lexfilename);
bool				OnFileOpen(HWND);
bool				OnFileSave(HWND);

int APIENTRY WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow){
 	
	MSG msg;
	HACCEL hAccelTable; 

	LoadString(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
	LoadString(hInstance, IDC_WIN32CUT, szWindowClass, MAX_LOADSTRING);
	MyRegisterClass(hInstance);

	
	if (!InitInstance (hInstance, nCmdShow)){
		return FALSE;
	}

	hAccelTable = LoadAccelerators(hInstance, (LPCTSTR)IDC_WIN32CUT);

	while (GetMessage(&msg, NULL, 0, 0)){
		if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg)) {
			TranslateMessage(&msg);
			DispatchMessage(&msg);
		}
	}

	return msg.wParam;
}

ATOM MyRegisterClass(HINSTANCE hInstance){
	WNDCLASSEX wcex;

	wcex.cbSize = sizeof(WNDCLASSEX); 

	wcex.style			= CS_HREDRAW | CS_VREDRAW;
	wcex.lpfnWndProc	= (WNDPROC)WndProc;
	wcex.cbClsExtra		= 0;
	wcex.cbWndExtra		= 0;
	wcex.hInstance		= hInstance;
	wcex.hIcon			= LoadIcon(hInstance, (LPCTSTR)IDI_WIN32CUT);
	wcex.hCursor		= LoadCursor(NULL, IDC_ARROW);
	wcex.hbrBackground	= (HBRUSH)(COLOR_WINDOW+1);
	wcex.lpszMenuName	= (LPCSTR)IDC_WIN32CUT;
	wcex.lpszClassName	= szWindowClass;
	wcex.hIconSm		= LoadIcon(wcex.hInstance, (LPCTSTR)IDI_SMALL);

	return RegisterClassEx(&wcex);
}


BOOL InitInstance(HINSTANCE hInstance, int nCmdShow) {
   HWND hWnd;

   hInst = hInstance;

   hWnd = CreateWindow(szWindowClass, szTitle, WS_OVERLAPPEDWINDOW|WS_CLIPCHILDREN,
      CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInstance, NULL);

   if (!hWnd){
      return FALSE;
   }

   ShowWindow(hWnd, nCmdShow);
   UpdateWindow(hWnd);

   return TRUE;
}


LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam) {
	int wmId, wmEvent;
	FILE *pf;
	static HWND hWndEdit;
	switch (message) 
	{
		case WM_CREATE:
			//创建一个编辑控件
			hWndEdit = CreateWindow(
				"EDIT",
				NULL,
				WS_CHILD|WS_VISIBLE|WS_VSCROLL|ES_AUTOVSCROLL|ES_LEFT|ES_MULTILINE,
				0,0,0,0,
				hWnd,
				(HMENU)ID_EDITCONTROL,
				hInst,
				NULL);
			//初始化词表
			if(!init_table(LexFileName))
				MessageBox(hWnd,"词典初始化失败！请到设置->词典设置重新设置词典","错误",MB_OK);;
			break;
		case WM_SETFOCUS:
			//设置输入焦点
			SetFocus(hWndEdit);
			break;
		case WM_SIZE:
			MoveWindow(hWndEdit,0,0,LOWORD(lParam),HIWORD(lParam),TRUE);
			break;
		case WM_INITMENUPOPUP:
			if(SendMessage(hWndEdit,EM_CANUNDO,0,0))
				EnableMenuItem(GetMenu(hWnd),IDM_EDITUNDO,MF_BYCOMMAND|MF_ENABLED);
			else
				EnableMenuItem(GetMenu(hWnd),IDM_EDITUNDO,MF_BYCOMMAND|MF_GRAYED);
			break;
		case WM_COMMAND:
			wmId    = LOWORD(wParam); 
			wmEvent = HIWORD(wParam); 
			//以下为菜单处理
			switch (wmId)
			{
				case IDM_FILEOPEN:
					//打开文件
					OnFileOpen(hWnd);
					//没有文件路径，取消
					if(FileNameStr[0] == 0)
						break;
					if(pf = fopen(FileNameStr,"r")){//如果正常打开文件
						fread(buff,1,BUFSIZE-2,pf);
						fclose(pf);
						//在编辑控件区显示文件内容
						SendMessage(hWndEdit,WM_SETTEXT,0,(LPARAM)buff);
					}else{//错误
						MessageBox(hWnd,"文件打开失败","错误",MB_OK);
					}
					break;
				case IDM_FILESAVE:
					//保存文件
					OnFileSave(hWnd);
					//没有文件路径，取消
					if(strcmp(FileNameStr,".txt") == 0)
						break;
					if(pf = fopen(FileNameStr,"w")){//读取编辑控件内容并输入到文件
						SendDlgItemMessage(hWnd,ID_EDITCONTROL,WM_GETTEXT,(WPARAM)BUFSIZE,(LPARAM)result);
						fprintf(pf,"%s",result);
						fclose(pf);
					}else{//错误
						MessageBox(hWnd,"文件存储失败","错误",MB_OK);
					}
					break;
				case IDM_EDITUNDO:				//撤销操作
					SendMessage(hWndEdit,WM_UNDO,0,0);
					break;
				case IDM_EDITCUT:				//剪切
					SendMessage(hWndEdit,WM_CUT,0,0);
					break;
				case IDM_EDITCOPY:				//复制
					SendMessage(hWndEdit,WM_COPY,0,0);
					break;
				case IDM_EDITPASTE:				//粘贴
					SendMessage(hWndEdit,WM_PASTE,0,0);
					break;
				case IDM_EDITDELETE:			//删除
					SendMessage(hWndEdit,WM_CLEAR,0,0);
					break;
				case IDM_EDITSELECTALL:			//全选
					SendMessage(hWndEdit,EM_SETSEL,0,-1);
					break;
				case IDM_OPRANYTOSCR:			//屏幕分词
					if(!isinit){//判断词典是否初始化
						MessageBox(hWnd,"词典尚未初始化，请到设置->词典设置里设置词典","错误",MB_OK);
						break;
					}
					//读取编辑控件内容
					SendDlgItemMessage(hWnd,ID_EDITCONTROL,WM_GETTEXT,(WPARAM)BUFSIZE,(LPARAM)buff);
					//分词
					analyse();
					//将结果显示在编辑控件中
					SendMessage(hWndEdit,WM_SETTEXT,0,(LPARAM)result);
					break;
				case IDM_OPRANYTOFILE:			//文件分词
					if(!isinit){//判断词典是否初始化
						MessageBox(hWnd,"词典尚未初始化，请到设置->词典设置里设置词典","错误",MB_OK);
						break;
					}
					//显示对话框
					DialogBox(hInst,(LPCTSTR)IDD_FILEANY,hWnd,(DLGPROC)FileAny);
					//取消了对话框
					if(FileNameStr[0] == 1)
						break;
					else if(FileNameStr[0] == 0){//文件路径为空或者打开失败
						MessageBox(hWnd,"文件打开失败！","错误",MB_OK);
						break;
					}
					//分析
					analysefile();
					fclose(fin);
					fclose(fout);
					MessageBox(hWnd,"分词完毕，结果已经保存到指定文件！","提示",MB_OK);
					break;
				case IDM_OPTIONLEX:				//设置词典
					//打开对话框
					DialogBox(hInst,(LPCTSTR)IDD_SETLEX,hWnd,(DLGPROC)SetLex);
					if(FileNameStr[0] == 1)		//取消了操作
						break;
					else if(FileNameStr[0] == 0)//文件路径错误
						MessageBox(hWnd,"词典设置失败，可能是路径错误！","错误",MB_OK);
					break;
				case IDM_ABOUT:
				   DialogBox(hInst, (LPCTSTR)IDD_ABOUTBOX, hWnd, (DLGPROC)About);
				   break;
				case IDM_EXIT:
				   DestroyWindow(hWnd);
				   break;
				default:
				   return DefWindowProc(hWnd, message, wParam, lParam);
			}
			break;
		case WM_DESTROY:
			PostQuitMessage(0);
			break;
		default:
			return DefWindowProc(hWnd, message, wParam, lParam);
   }
   return 0;
}
//关于... 对话框
LRESULT CALLBACK About(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
	switch (message)
	{
		case WM_INITDIALOG:
				return TRUE;

		case WM_COMMAND:
			if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL) 
			{
				EndDialog(hDlg, LOWORD(wParam));
				return TRUE;
			}
			break;
	}
    return FALSE;
}
//文件分词对话框
LRESULT CALLBACK FileAny(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
	switch (message)
	{
		case WM_INITDIALOG:
				return TRUE;

		case WM_COMMAND:
			switch(LOWORD(wParam)){
				case IDOK:		//确定
					//读取输入文件路径
					SendDlgItemMessage(hDlg,IDC_FILEIN,WM_GETTEXT,(WPARAM)MAX_LOADSTRING,(LPARAM)FileNameStr);
					if(FileNameStr[0] == 0)//路径为空
						return TRUE;
					fin = fopen(FileNameStr,"r");
					if(fin == NULL){//打开失败
						EndDialog(hDlg, LOWORD(wParam));
						FileNameStr[0] = 0;
						return TRUE;
					}
					//读取输出文件路径
					SendDlgItemMessage(hDlg,IDC_FILEOUT,WM_GETTEXT,(WPARAM)MAX_LOADSTRING,(LPARAM)FileNameStr);
					if(FileNameStr[0] == 0)//路径为空
						return TRUE;
					fout = fopen(FileNameStr,"w");
					fclose(fout);
					fout = fopen(FileNameStr,"w+");
					if(fout == NULL){//打开失败
						fclose(fin);
						EndDialog(hDlg, LOWORD(wParam));
						FileNameStr[0] = 0;
						return TRUE;
					}
					EndDialog(hDlg, LOWORD(wParam));
					return TRUE;
				case IDCANCEL:		//取消
					FileNameStr[0] = 1;
					EndDialog(hDlg, LOWORD(wParam));
					return TRUE;
				case IDC_BROWSEOUT:		//输出文件浏览
					OnFileOpen(hDlg);
					//将文件目录显示在编辑框
					SendMessage(GetDlgItem(hDlg,IDC_FILEOUT),WM_SETTEXT,0,(LPARAM)FileNameStr);
					break;
				case IDC_BROWSEIN:		//输入文件浏览
					OnFileOpen(hDlg);
					//将文件目录显示在编辑框
					SendMessage(GetDlgItem(hDlg,IDC_FILEIN),WM_SETTEXT,0,(LPARAM)FileNameStr);
					FileNameStr[strlen(FileNameStr)-4] = 0;
					strcat(FileNameStr,"_res.txt");
					//自动将默认输出文件显示在编辑框
					SendMessage(GetDlgItem(hDlg,IDC_FILEOUT),WM_SETTEXT,0,(LPARAM)FileNameStr);
					break;
			}
			break;

	}
    return FALSE;
}
//词典设置对话框
LRESULT CALLBACK SetLex(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
	switch (message)
	{
		case WM_INITDIALOG:
				return TRUE;
		case WM_COMMAND:
			switch(LOWORD(wParam)){
				case IDOK://确定
					//设置编辑框文件路径
					SendDlgItemMessage(hDlg,IDC_FILENAME,WM_GETTEXT,(WPARAM)MAX_LOADSTRING,(LPARAM)LexFileName);
					if(FileNameStr[0] == 0)		//文件路径为空
						return TRUE;
					if(!init_table(LexFileName)){
						EndDialog(hDlg, LOWORD(wParam));
						FileNameStr[0] = 0;
						return TRUE;
					}
					EndDialog(hDlg, LOWORD(wParam));
					return TRUE;
				case IDCANCEL:					//取消操作
					FileNameStr[0] = 1;
					EndDialog(hDlg, LOWORD(wParam));
					return TRUE;
				case IDC_BROWSE:				//浏览文件路径
					OnFileOpen(hDlg);
					strcpy(LexFileName,FileNameStr);
					SendMessage(GetDlgItem(hDlg,IDC_FILENAME),WM_SETTEXT,0,(LPARAM)LexFileName);
					break;
			}
			break;

	}
    return FALSE;
}
//打开文件
bool OnFileOpen(HWND hwnd)
{
	OPENFILENAME ofn;

	FileNameStr[0]=0;

	ofn.lStructSize=sizeof(OPENFILENAME);
	ofn.hwndOwner=hwnd;
	ofn.hInstance=hInst;
	ofn.lpstrFilter="文本文件(*.txt)\0*.txt\0所有文件(*.*)\0*.*";
	ofn.lpstrCustomFilter=NULL;
	ofn.nMaxCustFilter=0;
	ofn.nFilterIndex=1;
	ofn.lpstrFile=FileNameStr;
	ofn.nMaxFile=sizeof(FileNameStr);
	ofn.lpstrFileTitle=NULL;
	ofn.nMaxFileTitle=0;
	ofn.lpstrInitialDir=NULL;
	ofn.lpstrTitle=NULL;
	ofn.Flags=OFN_PATHMUSTEXIST|OFN_FILEMUSTEXIST|OFN_EXPLORER;
	ofn.nFileOffset=0 ;
	ofn.nFileExtension=0;
	ofn.lpfnHook=NULL;
	ofn.lCustData=0;
	ofn.lpstrDefExt=NULL;
	ofn.lpTemplateName=NULL;
	if(GetOpenFileName(&ofn))
		return true;
	return false;
}

//保存文件
bool OnFileSave(HWND hwnd)
{
	OPENFILENAME ofn;
	
	FileNameStr[0]=0;

	ofn.lStructSize=sizeof(OPENFILENAME);
	ofn.hwndOwner=hwnd;
	ofn.hInstance=hInst;
	ofn.lpstrFilter="文本文件(*.txt)\0*.txt\0所有文件(*.*)\0*.*";
	ofn.lpstrCustomFilter=NULL;
	ofn.nMaxCustFilter=0;
	ofn.nFilterIndex=1;
	ofn.lpstrFile=FileNameStr;
	ofn.nMaxFile=sizeof(FileNameStr);
	ofn.lpstrFileTitle=NULL;
	ofn.nMaxFileTitle=0;
	ofn.lpstrInitialDir=NULL;
	ofn.lpstrTitle=NULL;
	ofn.Flags=OFN_OVERWRITEPROMPT|OFN_PATHMUSTEXIST|OFN_EXPLORER;
	ofn.nFileOffset=0;
	ofn.nFileExtension=0;
	ofn.lpfnHook=NULL;
	ofn.lCustData=0;
	ofn.lpstrDefExt=NULL;
	ofn.lpTemplateName=NULL;

	if(strcmpi(FileNameStr+sizeof(FileNameStr)-4,".txt"))
		strcat(FileNameStr,".txt");
	if(GetSaveFileName(&ofn))
		return true;
	return false;
}