#include "stdafx.h"

#include "common.h"

long *pFindPos;
int FindPosCounter;

char *CompareSuper(HWND hDlg,char *buffer,char *szFind,BOOL IsBigSmall,bool isWordUnit,BOOL IsRegExp,int *pLength ){
	char *pTemp;

	if(buffer[0]=='\0') return 0;

	if(IsRegExp){
		//正規表現を有効にしながら検索
		pTemp=obj_RegExp.compare(hDlg,buffer,szFind,IsBigSmall, isWordUnit, pLength);
	}
	else{
		//通常の検索
		pTemp=ComparisonString(buffer,szFind,IsBigSmall?true:false, isWordUnit );

		*pLength=lstrlen(szFind);
	}

	return pTemp;
}

void SetSearchData(HWND hDlg,char *str,_int8 IsBigSmall, bool isWordUnit){
	extern HANDLE hHeap;
	int i,i2,i3,i4,i5,length;
	int WndNum;
	char *buffer,*FindStr,*LineStr;
	HWND hEdit;

	WndNum=GetWndNum(GetWindow(hClient,GW_CHILD));
	if(WndNum==-1) return;
	hEdit=GetWindow(GetWindow(hClient,GW_CHILD),GW_CHILD);

	i=lstrlen(MdiInfo[WndNum]->pMdiTextEdit->buffer)+1;

	buffer=(char *)HeapAlloc(hHeap,0,i);
	lstrcpy(buffer,MdiInfo[WndNum]->pMdiTextEdit->buffer);

	LineStr=(char *)HeapAlloc(hHeap,0,i+64);

	pFindPos[0]=(long)hEdit;
	i=0;
	i3=1;
	while(1){
		FindStr=CompareSuper(hDlg,buffer+i,str,IsBigSmall, isWordUnit, pobj_nv->bRegExp,&length);
		if(FindStr==(char *)-1){
			//エラー
			return;
		}
		if(!FindStr) break;

		i=FindStr-buffer;
		for(i4=0,i5=1;i>i4;i4++){
			if(buffer[i4-1]=='\r'&&buffer[i4]=='\n') i5++;
		}
		for(;i>0;i--){
			if(buffer[i-2]=='\r'&&buffer[i-1]=='\n') break;
		}

		FindPosCounter+=sizeof(long);
		pFindPos=(long *)HeapReAlloc(hHeap,0,pFindPos,FindPosCounter);
		pFindPos[i3]=i;

		sprintf(LineStr,"Line:%d  ",i5);
		for(i2=lstrlen(LineStr);;i++,i2++){
			if((buffer[i]=='\r'&&buffer[i+1]=='\n')||buffer[i]=='\0'){
				LineStr[i2]=0;
				break;
			}
			LineStr[i2]=buffer[i];
		}
		SendDlgItemMessage(hDlg,IDC_FINDLIST,LB_ADDSTRING,0,(long)LineStr);
		i3++;
	}
	HeapDefaultFree(buffer);
	HeapDefaultFree(LineStr);
}
BOOL CALLBACK DlgFindAll(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
	int i,WndNum;

	switch(message){
		case WM_INITDIALOG:
			SetPosCenter(hwnd);
			break;
		case WM_COMMAND:
			switch(LOWORD(wParam)){
				case IDC_SHOWITEM:
					i=SendDlgItemMessage(hwnd,IDC_FINDLIST,LB_GETCURSEL,0,0);
					if(i==LB_ERR) return 1;
					i++;

					if(!IsWindow((HWND)pFindPos[0])){
						MessageBeep(0);
						return 1;
					}

					WndNum=GetWndNum(GetParent((HWND)pFindPos[0]));
					if(WndNum==-1) return 1;

					CHARRANGE CharRange;
					CharRange.cpMin=pFindPos[i];

					char *pBuf;
					pBuf=MdiInfo[WndNum]->pMdiTextEdit->buffer;

					//行の末端位置を取得
					for(i=CharRange.cpMin;;i++){
						if(pBuf[i]=='\0') break;
						if(pBuf[i]=='\r'&&pBuf[i+1]=='\n') break;
					}
					CharRange.cpMax=i;

					TextEdit_SetSel(WndNum,CharRange.cpMin,CharRange.cpMax,TRUE);

					SetFocus((HWND)pFindPos[0]);
					return 1;
				case IDCANCEL:
					HeapDefaultFree(pFindPos);
					EndDialog(hwnd,0);
					return 1;
				case IDC_FINDLIST:
					if(HIWORD(wParam)==LBN_DBLCLK) SendMessage(hwnd,WM_COMMAND,IDC_SHOWITEM,0);
					return 1;
			}
			break;
		case WM_SIZE:
			RECT rect;
			GetClientRect(hwnd,&rect);
			MoveWindow(GetDlgItem(hwnd,IDC_FINDLIST),rect.left,26,rect.right,rect.bottom-26,1);
			return 1;
	}
	return 0;
}
BOOL StartSearch(HWND hDlg,char *FindString,_int8 IsBigSmall, bool isWordUnit, BOOL IsShowMessage){
	int i;
	char *pBuf,msg[255];
	CHARRANGE CharRange;

	int WndNum;
	WndNum=GetWndNum(GetWindow(hClient,GW_CHILD));
	if(WndNum==-1) return 0;

	pBuf=MdiInfo[WndNum]->pMdiTextEdit->buffer;

	TextEdit_GetSel(WndNum,&CharRange);
	i=CharRange.cpMax;

FindStart:

	int length;

	i=(int)CompareSuper(hDlg,pBuf+i,FindString,IsBigSmall, isWordUnit, pobj_nv->bRegExp,&length);
	if(i==-1){
		//エラー
		return 0;
	}

	if(i){
		//検索文字列を反転表示
		i-=(int)pBuf;
		CharRange.cpMin=i;
		CharRange.cpMax=i+length;
		TextEdit_SetSel(WndNum,CharRange.cpMin,CharRange.cpMax,TRUE);

		return 1;
	}
	else{
		if(!IsShowMessage) return 0;

		i=(int)CompareSuper(hDlg,pBuf,FindString,IsBigSmall, isWordUnit, pobj_nv->bRegExp,&length);
		if(i==-1){
			//エラー
			return 0;
		}

		if(i){
			//"ファイルの最初から検索しますか？"
			if(MessageBox(hDlg,STRING_SEARCH_AGAIN,"ProjectEditor - Search",MB_YESNO|MB_ICONINFORMATION)==IDYES){
				i=0;
				goto FindStart;
			}
		}
		else{
			//"文字列 \"%s\" が見つかりません"
			sprintf(msg,STRING_SEARCH_NOTFOUND,FindString);
			MessageBox(hDlg,msg,"ProjectEditor - Search",MB_OK|MB_ICONINFORMATION);
		}
	}
	return 0;
}
void AddFindData(HWND hwnd,char ppData[MAX_FINDLIST][MAX_PATH],char *str){
	int i;
	for(i=0;i<MAX_FINDLIST;i++){
		if(lstrcmp(ppData[i],str)==0) break;
	}
	if(i==MAX_FINDLIST) i--;
	for(;i>0;i--) lstrcpy(ppData[i],ppData[i-1]);
	lstrcpy(ppData[0],str);
	SendMessage(hwnd,CB_RESETCONTENT,0,0);
	for(i=0;i<MAX_FINDLIST;i++){
		if(ppData[i][0]=='\0') break;
		SendMessage(hwnd,CB_ADDSTRING,0,(long)ppData[i]);
	}
	SendMessage(hwnd,CB_SETCURSEL,0,0);
}
BOOL CALLBACK DlgFind(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
	extern HANDLE hHeap;
	HWND FindAllDlg;
	int i,WndNum;
	char temporary[8192],*pTemp;
	CHARRANGE CharRange;

	switch(message){
		case WM_INITDIALOG:
			SetPosCenter(hwnd);

			//大文字・小文字
			if(pobj_nv->bFindStrBigSmall) SendDlgItemMessage(hwnd,IDC_ISBIGSMALL,BM_SETCHECK,BST_CHECKED,0);

			// 単語単位
			if( pobj_nv->isWordUnit ){
				SendDlgItemMessage( hwnd, IDC_ISWORDUNIT, BM_SETCHECK, BST_CHECKED, 0 );
			}

			//正規表現
			if(pobj_nv->bRegExp) SendDlgItemMessage(hwnd,IDC_REGEXP,BM_SETCHECK,BST_CHECKED,0);

			//検索文字列コンボボックスを初期化
			SendDlgItemMessage(hwnd,IDC_FINDSTR,CB_RESETCONTENT,0,0);
			for(i=0;i<MAX_FINDLIST;i++){
				if(pobj_nv->FindStr[i][0]=='\0') break;
				SendDlgItemMessage(hwnd,IDC_FINDSTR,CB_ADDSTRING,0,(long)pobj_nv->FindStr[i]);
			}
			SendDlgItemMessage(hwnd,IDC_FINDSTR,CB_LIMITTEXT,8192,0);

			WndNum=GetWndNum(GetWindow(hClient,GW_CHILD));

			//選択されている文字列を取得
			TextEdit_GetSel(WndNum,&CharRange);
			pTemp=(char *)HeapAlloc(hHeap,0,CharRange.cpMax-CharRange.cpMin+1);
			memcpy(pTemp,
				MdiInfo[WndNum]->pMdiTextEdit->buffer+CharRange.cpMin,
				CharRange.cpMax-CharRange.cpMin);
			pTemp[CharRange.cpMax-CharRange.cpMin]=0;

			if(pTemp[0]) SetDlgItemText(hwnd,IDC_FINDSTR,pTemp);
			else SendDlgItemMessage(hwnd,IDC_FINDSTR,CB_SETCURSEL,0,0);

			HeapDefaultFree(pTemp);

			SetFocus(GetDlgItem(hwnd,IDC_FINDSTR));
			break;
		case WM_COMMAND:
			switch(LOWORD(wParam)){
				case IDOK:
					GetDlgItemText(hwnd,IDC_FINDSTR,temporary,MAX_PATH);
					if(temporary[0]==0) return 1;
					AddFindData(GetDlgItem(hwnd,IDC_FINDSTR),pobj_nv->FindStr,temporary);

					//大文字・小文字
					if(SendDlgItemMessage(hwnd,IDC_ISBIGSMALL,BM_GETCHECK,0,0)) pobj_nv->bFindStrBigSmall=1;
					else pobj_nv->bFindStrBigSmall=0;

					// 単語単位
					pobj_nv->isWordUnit =
						( SendDlgItemMessage( hwnd, IDC_ISWORDUNIT, BM_GETCHECK, 0, 0 ) != 0 );

					//正規表現
					if(SendDlgItemMessage(hwnd,IDC_REGEXP,BM_GETCHECK,0,0)) pobj_nv->bRegExp=1;
					else pobj_nv->bRegExp=0;

					StartSearch(hwnd,temporary,pobj_nv->bFindStrBigSmall, pobj_nv->isWordUnit, 1);
					return 1;
				case IDC_FINDALL:
					GetDlgItemText(hwnd,IDC_FINDSTR,temporary,MAX_PATH);
					if(temporary[0]==0) return 1;
					AddFindData(GetDlgItem(hwnd,IDC_FINDSTR),pobj_nv->FindStr,temporary);

					//大文字・小文字
					if(SendDlgItemMessage(hwnd,IDC_ISBIGSMALL,BM_GETCHECK,0,0)) pobj_nv->bFindStrBigSmall=1;
					else pobj_nv->bFindStrBigSmall=0;

					// 単語単位
					pobj_nv->isWordUnit =
						( SendDlgItemMessage( hwnd, IDC_ISWORDUNIT, BM_GETCHECK, 0, 0 ) != 0 );

					//正規表現
					if(SendDlgItemMessage(hwnd,IDC_REGEXP,BM_GETCHECK,0,0)) pobj_nv->bRegExp=1;
					else pobj_nv->bRegExp=0;

					FindAllDlg=CreateDialog(hResInst,MAKEINTRESOURCE(IDD_FINDALL),GetWindow(hwnd,GW_OWNER),(DLGPROC)DlgFindAll);
					ShowWindow(FindAllDlg,SW_SHOW);

					FindPosCounter=sizeof(long);
					pFindPos=(long *)HeapAlloc(hHeap,0,FindPosCounter);
					SetSearchData(FindAllDlg,temporary,pobj_nv->bFindStrBigSmall, pobj_nv->isWordUnit );
				case IDCANCEL:
					EndDialog(hwnd,0);
					return 1;
			}
			break;
	}
	return 0;
}
BOOL CALLBACK DlgPermutation(HWND hwnd,UINT message,WPARAM wParam,LPARAM lParam){
	extern HANDLE hHeap;
	extern HINSTANCE hInst;
	int i;
	int WndNum;
	char temporary[8192],temp2[8192],*pTemp;
	CHARRANGE CharRange;
	switch(message){
		case WM_INITDIALOG:
			SetPosCenter(hwnd);

			//大文字・小文字
			if(pobj_nv->bFindStrBigSmall) SendDlgItemMessage(hwnd,IDC_ISBIGSMALL,BM_SETCHECK,BST_CHECKED,0);

			// 単語単位
			if( pobj_nv->isWordUnit ){
				SendDlgItemMessage( hwnd, IDC_ISWORDUNIT, BM_SETCHECK, BST_CHECKED, 0 );
			}

			//正規表現
			if(pobj_nv->bRegExp) SendDlgItemMessage(hwnd,IDC_REGEXP,BM_SETCHECK,BST_CHECKED,0);


			//検索文字列コンボボックスを初期化
			SendDlgItemMessage(hwnd,IDC_FINDSTR,CB_RESETCONTENT,0,0);
			for(i=0;i<MAX_FINDLIST;i++){
				if(pobj_nv->FindStr[i][0]=='\0') break;
				SendDlgItemMessage(hwnd,IDC_FINDSTR,CB_ADDSTRING,0,(long)pobj_nv->FindStr[i]);
			}
			SendDlgItemMessage(hwnd,IDC_FINDSTR,CB_LIMITTEXT,8192,0);

			WndNum=GetWndNum(GetWindow(hClient,GW_CHILD));

			//選択されている文字列を取得
			TextEdit_GetSel(WndNum,&CharRange);
			pTemp=(char *)HeapAlloc(hHeap,0,CharRange.cpMax-CharRange.cpMin+1);
			memcpy(pTemp,
				MdiInfo[WndNum]->pMdiTextEdit->buffer+CharRange.cpMin,
				CharRange.cpMax-CharRange.cpMin);
			pTemp[CharRange.cpMax-CharRange.cpMin]=0;

			if(pTemp[0]) SetDlgItemText(hwnd,IDC_FINDSTR,pTemp);
			else SendDlgItemMessage(hwnd,IDC_FINDSTR,CB_SETCURSEL,0,0);

			HeapDefaultFree(pTemp);

			//置換文字列コンボボックスを初期化
			SendDlgItemMessage(hwnd,IDC_PERMUTATIONSTR,CB_RESETCONTENT,0,0);
			for(i=0;i<MAX_FINDLIST;i++){
				if(pobj_nv->PermutationStr[i][0]=='\0') break;
				SendDlgItemMessage(hwnd,IDC_PERMUTATIONSTR,CB_ADDSTRING,0,(long)pobj_nv->PermutationStr[i]);
			}
			SendDlgItemMessage(hwnd,IDC_PERMUTATIONSTR,CB_SETCURSEL,0,0);
			SendDlgItemMessage(hwnd,IDC_PERMUTATIONSTR,CB_LIMITTEXT,8192,0);

			SetFocus(GetDlgItem(hwnd,IDC_FINDSTR));
			break;
		case WM_COMMAND:
			switch(LOWORD(wParam)){
				case IDC_FIND:
					//大文字・小文字
					if(SendDlgItemMessage(hwnd,IDC_ISBIGSMALL,BM_GETCHECK,0,0)) pobj_nv->bFindStrBigSmall=1;
					else pobj_nv->bFindStrBigSmall=0;

					// 単語単位
					pobj_nv->isWordUnit =
						( SendDlgItemMessage( hwnd, IDC_ISWORDUNIT, BM_GETCHECK, 0, 0 ) != 0 );

					//正規表現
					if(SendDlgItemMessage(hwnd,IDC_REGEXP,BM_GETCHECK,0,0)) pobj_nv->bRegExp=1;
					else pobj_nv->bRegExp=0;

					GetDlgItemText(hwnd,IDC_FINDSTR,temporary,MAX_PATH);
					if(temporary[0]==0) return 1;
					AddFindData(GetDlgItem(hwnd,IDC_FINDSTR),pobj_nv->FindStr,temporary);

					StartSearch(hwnd,temporary,pobj_nv->bFindStrBigSmall, pobj_nv->isWordUnit, 1);
					return 1;
				case IDC_PERMUTATIONNEXT:
					//////////
					// 置換
					//////////

					//大文字・小文字
					if(SendDlgItemMessage(hwnd,IDC_ISBIGSMALL,BM_GETCHECK,0,0)) pobj_nv->bFindStrBigSmall=1;
					else pobj_nv->bFindStrBigSmall=0;

					// 単語単位
					pobj_nv->isWordUnit =
						( SendDlgItemMessage( hwnd, IDC_ISWORDUNIT, BM_GETCHECK, 0, 0 ) != 0 );

					//正規表現
					if(SendDlgItemMessage(hwnd,IDC_REGEXP,BM_GETCHECK,0,0)) pobj_nv->bRegExp=1;
					else pobj_nv->bRegExp=0;

					//検索する文字列を取得
					GetDlgItemText(hwnd,IDC_FINDSTR,temporary,MAX_PATH);
					if(temporary[0]==0) return 1;
					AddFindData(GetDlgItem(hwnd,IDC_FINDSTR),pobj_nv->FindStr,temporary);

					//置換する文字列を取得
					GetDlgItemText(hwnd,IDC_PERMUTATIONSTR,temp2,MAX_PATH);
					AddFindData(GetDlgItem(hwnd,IDC_PERMUTATIONSTR),pobj_nv->PermutationStr,temp2);

					WndNum=GetWndNum(GetWindow(hClient,GW_CHILD));

					//選択されている文字列を取得
					TextEdit_GetSel(WndNum,&CharRange);
					pTemp=(char *)HeapAlloc(hHeap,0,CharRange.cpMax-CharRange.cpMin+1);
					memcpy(pTemp,
						MdiInfo[WndNum]->pMdiTextEdit->buffer+CharRange.cpMin,
						CharRange.cpMax-CharRange.cpMin);
					pTemp[CharRange.cpMax-CharRange.cpMin]=0;

					int length;
					i=(int)CompareSuper(hwnd,pTemp,temporary,pobj_nv->bFindStrBigSmall, pobj_nv->isWordUnit, pobj_nv->bRegExp,&length);
					if(i==-1){
						HeapDefaultFree(pTemp);
						return 1;
					}

					if(i){
						if(pobj_nv->bRegExp){
							char *pTempPermu;

							//正規表現の結果文字列を取得（置換後用の文字列を取得）
							pTempPermu=obj_RegExp.GetPermuStr(hwnd,pTemp,temporary,temp2,pobj_nv->bFindStrBigSmall);
							if(pTempPermu==(char *)-1||pTempPermu==0){
								HeapDefaultFree(pTemp);
								return 1;
							}

							//置換する
							TextEdit_ReplaceUpdateUndoData(WndNum,pTempPermu,0,1);

							HeapDefaultFree(pTempPermu);
						}
						else{
							//置換する
							TextEdit_ReplaceUpdateUndoData(WndNum,temp2,0,1);
						}
					}
					HeapDefaultFree(pTemp);

					//次を検索
					SendMessage(hwnd,WM_COMMAND,IDC_FIND,0);

					return 1;
				case IDC_PERMUTATIONALL:
					//////////////
					// すべて置換
					//////////////

					//大文字・小文字
					if(SendDlgItemMessage(hwnd,IDC_ISBIGSMALL,BM_GETCHECK,0,0)) pobj_nv->bFindStrBigSmall=1;
					else pobj_nv->bFindStrBigSmall=0;

					// 単語単位
					pobj_nv->isWordUnit =
						( SendDlgItemMessage( hwnd, IDC_ISWORDUNIT, BM_GETCHECK, 0, 0 ) != 0 );

					//正規表現
					if(SendDlgItemMessage(hwnd,IDC_REGEXP,BM_GETCHECK,0,0)) pobj_nv->bRegExp=1;
					else pobj_nv->bRegExp=0;

					//検索する文字列を取得
					GetDlgItemText(hwnd,IDC_FINDSTR,temporary,MAX_PATH);
					if(temporary[0]==0) return 1;
					AddFindData(GetDlgItem(hwnd,IDC_FINDSTR),pobj_nv->FindStr,temporary);

					//置換する文字列を取得
					GetDlgItemText(hwnd,IDC_PERMUTATIONSTR,temp2,MAX_PATH);
					AddFindData(GetDlgItem(hwnd,IDC_PERMUTATIONSTR),pobj_nv->PermutationStr,temp2);

					//正規表現
					if(SendDlgItemMessage(hwnd,IDC_REGEXP,BM_GETCHECK,0,0)) pobj_nv->bRegExp=1;
					else pobj_nv->bRegExp=0;

					WndNum=GetWndNum(GetWindow(hClient,GW_CHILD));

					TextEdit_SetSel(WndNum,0,0,TRUE);

					while(StartSearch(hwnd,temporary,pobj_nv->bFindStrBigSmall, pobj_nv->isWordUnit, 0)){
						if(pobj_nv->bRegExp){
							//選択されている文字列を取得
							TextEdit_GetSel(WndNum,&CharRange);
							pTemp=(char *)HeapAlloc(hHeap,0,CharRange.cpMax-CharRange.cpMin+1);
							memcpy(pTemp,
								MdiInfo[WndNum]->pMdiTextEdit->buffer+CharRange.cpMin,
								CharRange.cpMax-CharRange.cpMin);
							pTemp[CharRange.cpMax-CharRange.cpMin]=0;

							char *pTempPermu;

							//正規表現の結果文字列を取得（置換後用の文字列を取得）
							pTempPermu=obj_RegExp.GetPermuStr(hwnd,pTemp,temporary,temp2,pobj_nv->bFindStrBigSmall);
							if(pTempPermu==(char *)-1||pTempPermu==0){
								HeapDefaultFree(pTemp);
								return 1;
							}

							//置換する
							TextEdit_ReplaceUpdateUndoData(WndNum,pTempPermu,0,1);

							HeapDefaultFree(pTempPermu);
							HeapDefaultFree(pTemp);
						}
						else{
							//置換する
							TextEdit_ReplaceUpdateUndoData(WndNum,temp2,0,1);
						}
					}

					return 1;
				case IDCANCEL:
					EndDialog(hwnd,0);
					return 1;
			}
			break;
	}
	return 0;
}