2.검색 기능 개선

가.예약어

당근 1.0의 검색 기능은 텍스트만 검색 가능하다. 텍스트 편집기이므로 당연한 얘기일지 모르겠지만 텍스트에도 탭이나 개행 코드 같은 제어 코드들이 존재하므로 이들도 검색 대상에 포함되어야 한다. 또한 키보드로 직접 입력할 수 없는 코드값도 검색할 수 있어야 한다.

텍스트외의 제어 코드는 문자열로 직접 표현할 수 없으므로 확장열을 사용해야 한다. 확장열 관련 기능은 매크로 구문을 작성할 때 이미 함수를 작성해 두었으므로 이 함수들을 활용하기로 한다. AeUtil에 확장열을 처리하는 다음 함수를 추가한다.

// 확장열을 변환해 준다. 변환 후의 길이를 리턴한다.

int AeEscapeString(TCHAR *src,TCHAR *dest)

{

const TCHAR *s;

TCHAR *d;

s=src;

d=dest;

for (;*s;) {

AeEscapeChar(s,d);

}

return d-dest;

}

매크로의 확장열 처리 루틴중 한 문자에 대해 확장열을 처리하는 함수를 호출했다. 매크로와는 다른 면이 조금 있는데 매크로의 문자열은 따옴표로 둘러싸여 있으므로 따옴표 자체를 \"로만 표현할 수 있지만 검색의 확장열에는 "를 바로 쓸 수 있다. 따라서 따옴표의 짝이 맞지 않는 에러가 발생하지 않으며 의미없는 확장열은 무시될 뿐이다.

찾을 문자열은 arFind에 저장되는데 이 배열에 저장되는 포맷은 문자열 형태 그대로이다. 확장열은 치환하지 않은채로 유지하는데 그래야 사용자가 이미 입력한 검색식을 수정해서 다시 검색할 수 있다. FindText 함수에서 검색을 시작할 때 확장열을 치환한다.

BOOL CApiEditText::FindText(int nPos, TCHAR *what, DWORD dwFlag)

{

int nStart;

TCHAR *pFound;

BOOL bWrap;

TCHAR szCom[256];

TCHAR *pWhat;

int len;

pWhat=(TCHAR *)malloc(lstrlen(what)+1);

if (strchr(what,'\\')==NULL) {

lstrcpy(pWhat,what);

len=lstrlen(pWhat);

} else {

len=AeEscapeString(what,pWhat);

}

wsprintf(szCom,"find \"%s\"",what);

if ((dwFlag & AE_FIND_WRAP)==0)

lstrcat(szCom," nowrap");

if (dwFlag & AE_FIND_UP)

lstrcat(szCom," up");

if (dwFlag & AE_FIND_WHOLEWORD)

lstrcat(szCom," word");

if (dwFlag & AE_FIND_MATCHCASE)

lstrcat(szCom," case");

AeMc.RecordCommand(szCom);

assert(nPos >= 0 && nPos <= pFrame->doclen);

if (nPos == -1) {

if (SelStart==SelEnd) {

nStart=off;

} else {

if (dwFlag & AE_FIND_UP) {

nStart=min(SelStart,SelEnd);

} else {

nStart=max(SelStart,SelEnd);

}

}

} else {

nStart=nPos;

}

bWrap=((dwFlag & AE_FIND_WRAP)!=0);

if (dwFlag & AE_FIND_UP) {

nStart=nStart-len;

if (nStart<0) {

if (bWrap) {

bWrap=FALSE;

nStart=max(0,pFrame->doclen-1);

} else {

free(pWhat);

return FALSE;

}

}

}

for (;;) {

pFound=FindString(pFrame->buf,nStart,what,(dwFlag & AE_FIND_UP)==0,

(dwFlag & AE_FIND_MATCHCASE)!=0);

if (pFound) {

if (dwFlag & AE_FIND_WHOLEWORD) {

if ((pFound==pFrame->buf || IsDelimiter(pFound-pFrame->buf-1)) &&

IsDelimiter(pFound-pFrame->buf+len)) {

break;

} else {

if (dwFlag & AE_FIND_UP) {

nStart=pFound-pFrame->buf-1;

} else {

nStart=pFound-pFrame->buf+len;

}

continue;

}

}

break;

}

if (bWrap) {

bWrap=FALSE;

if ((dwFlag & AE_FIND_UP)==0) {

nStart=0;

} else {

nStart=max(0,pFrame->doclen-1);

}

continue;

}

break;

}

free(pWhat);

if (pFound) {

// 선택 영역 길이에 변화가 생긴다.

SetSelect(pFound-pFrame->buf,pFound-pFrame->buf+len,TRUE);

return TRUE;

}

return FALSE;

}

pWhat 버퍼를 새로 할당하고 검색식에 \가 있으면 확장하고 없으면 단순히 복사한다. 이후 검색 대상은 what이 아니라 pWhat이 된다. 치환후의 길이가 바뀔 수 있기 때문에 len변수에 별도로 길이를 저장하고 길이를 참조하는 모든 코드에서 lstrlen(what)을 len으로 바꾼다. 사용자들이 확장자 예약어를 외워서 쓰지는 않으므로 검색 대화상자에 팝업 메뉴를 제공한다.

BOOL CALLBACK FindDlgProc(HWND hDlg,UINT iMessage,WPARAM wParam,LPARAM lParam)

{

....

HMENU hMenu, hPopup;

POINT pt;

static int PopupID;

switch(iMessage) {

....

case WM_COMMAND:

switch (LOWORD(wParam)) {

....

case IDC_BTNINSCODE:

case IDC_BTNINSCODE2:

if (LOWORD(wParam)==IDC_BTNINSCODE) {

PopupID=IDC_FIND_WHAT;

} else {

PopupID=IDC_FIND_TO;

}

hMenu=LoadMenu(g_hInst, MAKEINTRESOURCE(IDR_POPUP));

hPopup=GetSubMenu(hMenu, 5);

GetCursorPos(&pt);

TrackPopupMenu(hPopup, TPM_LEFTALIGN, pt.x, pt.y,

0, hDlg, NULL);

DestroyMenu(hMenu);

return TRUE;

case IDM_CODE_ENTER:

case IDM_CODE_TAB:

case IDM_CODE_HEXA:

case IDM_CODE_DECIMAL:

case IDM_CODE_BACKSLASH:

GetDlgItemText(hDlg,PopupID,szTemp,256);

switch (LOWORD(wParam)) {

case IDM_CODE_ENTER:

lstrcat(szTemp,"\\n");

break;

case IDM_CODE_TAB:

lstrcat(szTemp,"\\t");

break;

case IDM_CODE_HEXA:

lstrcat(szTemp,"\\x");

break;

case IDM_CODE_DECIMAL:

lstrcat(szTemp,"\\i");

break;

case IDM_CODE_BACKSLASH:

lstrcat(szTemp,"\\\\");

break;

}

SetDlgItemText(hDlg,PopupID,szTemp);

SetFocus(GetDlgItem(hDlg,PopupID));

SendDlgItemMessage(hDlg,PopupID,CB_SETEDITSEL,0,MAKELPARAM(-1,0));

PostMessage(hDlg,WM_COMMAND,MAKEWPARAM(IDC_FIND_WHAT,CBN_EDITCHANGE),0);

return TRUE;

}

버튼을 누르면 팝업 메뉴를 보여 주고 선택된 예약어를 콤보 박스 끝에 덧붙인다. FileFindDlgProc도 완전히 동일한 방식으로 수정한다. 컨트롤롤의 ID가 일치하기 때문에 코드만 그대로 복사해 넣으면 된다.

나.이진 검색 지원

당근 2.0은 이진 편집을 지원하므로 문서 중간에 언제든지 NULL문자가 나올 수 있으며 또한 검색식에도 NULL문자가 포함될 수 있다. 그래서 지금부터 검색은 문자열 검색이 아니라 임의의 이진 스트림에 대한 검색이어야 한다. 검색식에 모든 바이트가 올 수 있으며 NULL문자 이후도 검색해야 한다. AeUtil.cpp에 문자열 검색을 하는 FindString이라는 함수가 작성되어 있는데 이 함수가 임의의 이진 스트림의 검색할 수 있도록 수정한다. 검색식은 물론이고 검색 대상 버퍼도 이진 데이터이므로 둘 다 길이값을 인수로 전달받아야 한다.

TCHAR *FindString(TCHAR *buf, int buflen, int nPos, TCHAR* what,int len,BOOL bDown, BOOL bCase)

{

TCHAR *pWhat,*p;

int nOff;

TCHAR *pResult;

BOOL bFind;

int Inc;

int len;

TCHAR ch;

pWhat=(TCHAR *)malloc(len);

memcpy(pWhat,what,len);

if (bCase==FALSE) {

for (p=pWhat;p-pWhat<len;p++) {

*p=toupper(*p);

}

}

len=lstrlen(pWhat);

if (bDown) {

Inc=1;

} else {

Inc=-1;

}

for (;;nPos+=Inc) {

if (nPos>buflen-len || nPos<0) {

pResult=NULL;

break;

}

....

버퍼의 길이를 지정하는 buflen 인수와 검색식의 길이를 지정하는 len 인수가 추가되었다. 길이가 별도의 인수로 전달되므로 지역변수 len은 필요치 않으며 길이를 구하는 lstrlen 함수 호출문도 필요가 없다. 대소문자 구분 무시 옵션이 설정되어 있을 경우 모두 대문자로 바꾼 후 검색을 시작하는데 이때 대문자로 바꾸기 위해 CharUpper 함수를 사용할 수 없다. 왜냐하면 이 함수는 문자열에 대해서만 동작하기 때문이다. 버퍼를 직접 순회하면서 모든 소문자를 대문자로 바꿔야 한다.

검색을 끝낼 조건도 약간 달라진다. 이전의 조건은 buf[nPos]==0이었으며 문서의 끝까지 검색했었으나 이제 NULL문자가 문서의 끝이 아니기 때문에 이 조건으로는 문서의 끝을 알 수 없다. 그래서 인수로 전달된 buflen 길이만큼 검색해야 하는데 이때 검색식의 길이만큼은 빼야 한다. 문서끝까지 검색해 버리면 다음과 같은 재수없는 경우가 발생할 수 있기 때문이다.

"Dangeun first"라는 문서에서 "student"라는 문자열을 찾는다고 할때 문서 끝까지 찾아 버리면 마지막 뒷쪽의 s, t까지 일치할 때 문서 너머까지 나머지 문자의 일치 여부를 검사하려고 할 것이다. 이 뒤쪽에는 쓰레기값이 들어 있는데 여기에 우연히 "udent"라는 문자열이 들어 있었다면 이 위치에서 문자열을 찾았다고 리턴할 것이다. 확률적으로 희박할 것 같지만 문서 끝에서 검색식의 앞부분이 일치하는 경우는 생각보다 훨씬 더 많다.

더 큰 문제는 문서 뒷부분이 허가되지 않은 메모리 영역일 수도 있다는 점인데 이 영역이 읽기 금지일 경우 프로그램은 죽을 수도 있다. 설사 읽기 가능한 영역이라 요행히 죽지 않았다 하더라도 ApiEdit가 검색된 문자열을 표시하기 위해 문서 너머까지 선택을 확장하는 과정에서 비정상적인 액세스가 이루어진다. 이 영역은 문서 바깥일 뿐만 아니라 정렬 버퍼에도 없는 영역이므로 검색 후에 프로그램을 다운시키는 치명적인 문제를 일으킨다.

이진 검색을 고려하지 않았던 이전 버전에도 이 문제는 마찬가지여서 당근 1.0의 가장 큰 버그였었다. 이 함수가 길이를 전달받고 정확하게 길이까지 검색하므로 문서 중간의 NULL문자 이후도 검색할 수 있을 뿐만 아니라 검색식에도 NULL문자를 쓸 수 있다. 검색의 핵심 함수가 수정되었으므로 이 함수를 사용하는 모든 곳을 다 수정해야 한다. 먼저 검색 함수인 FindText를 수정한다.

BOOL CApiEditText::FindText(int nPos, TCHAR *what, DWORD dwFlag)

{

....

if (dwFlag & AE_FIND_UP) {

nStart=nStart-len;

if (nStart<0) {

if (bWrap) {

bWrap=FALSE;

nStart=max(0,pFrame->doclen-len);

} else {

free(pWhat);

return FALSE;

}

}

}

....

for (;;) {

pFound=FindString(pFrame->buf,pFrame->doclen,nStart,pWhat,len,(dwFlag & AE_FIND_UP)==0,

(dwFlag & AE_FIND_MATCHCASE)!=0);

....

if (bWrap) {

bWrap=FALSE;

if ((dwFlag & AE_FIND_UP)==0) {

nStart=0;

} else {

nStart=max(0,pFrame->doclen-len);

}

continue;

}

FindString 함수로 문서의 길이와 검색식의 길이를 전달했다. 이 함수가 전달받는 검색식은 문자열이지만 확장열을 처리한 후에는 이진 문자열이 되며 그 길이가 len 지역 변수에 조사되므로 이 지역 변수를 검색 함수로 넘기면 된다. 아래쪽에 수정된 코드는 이전 찾기(Shift+F3)를 제대로 지원하기 위해서이다. 래핑 옵션이 선택된 상태에서 위쪽으로 검색할 때 문서 앞쪽에서 검색에 실패하면 문서 끝에서부터 다시 한번 더 검색해야 한다. 이때 검색을 시작할 문서의 끝은 문서 길이에서 검색문자열의 길이를 뺀 위치여야 한다.

원래 이 자리에는 pFrame->doclen-1 수식이 작성되어 있었는데 문서의 끝에서부터 역검색을 했다. 앞에서 설명했다시피 이 위치부터 검색식을 비교하면 문서 범위를 넘어서기 때문에 위험해진다. 더구나 지금은 바로 앞에서 FindString이 유효한 범위인지를 점검하도록 코드를 수정했기 때문에 이대로라면 Shift+F3는 래핑이 되지 않는다. 그래서 문서끝에서 검색식의 길이만큼 앞쪽에서 역검색을 하도록 수정했다. 다음은 파일 검색 함수를 수정한다.

int OnFindFile(TCHAR *Path,DWORD Attr,LPVOID pCustom)

{

....

int len;

if (Attr & FILE_ATTRIBUTE_DIRECTORY)

return 0;

if (strchr(arFind[0].Get(0),'\\')==NULL) {

lstrcpy(what,arFind[0].Get(0));

len=lstrlen(what);

} else {

len=AeEscapeString(arFind[0].Get(0),what);

}

hFile=CreateFile(Path,GENERIC_READ,0,NULL,

OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);

if (hFile==INVALID_HANDLE_VALUE) {

return -1;

}

size=GetFileSize(hFile,NULL);

size=min(size,30*1048576);

buf=(TCHAR *)malloc(size);

ReadFile(hFile,buf,size,&dwRead,NULL);

buf[size]=0;

for (pbuf=buf;;) {

p=FindString(pbuf,size-(pbuf-buf),0,what,len,TRUE,(FindFlag & AE_FIND_MATCHCASE)!=0);

if (p == NULL)

break;

if (FindFlag & AE_FIND_WHOLEWORD) {

if (!((p==buf || IsDelimiter(*(p-1))) && IsDelimiter(*(p+len)))) {

pbuf=p+len;

continue;

}

}

TotalFind++;

GetLineNumAndText(buf,size,p,Text,line,col);

....

pbuf=p+len;

if (bContFIF==FALSE)

break;

}

free(buf);

CloseHandle(hFile);

return 0;

}

FindText 함수와 비슷한 방법으로 수정한다. 조사된 검색식은 아직 문자열이므로 확장열을 치환해야 이진 검색식을 얻을 수 있으며 이 길이를 FindString에게 전달한다. 검색할 길이는 전체 문서 길이에서 문서 뒤쪽의 남은 부분만큼이다. 예를 들어 1000바이트 문서에서 길이 5의 데이터를 찾는데 230번째에서 처음 발견되었다면 pbuf는 235가 되며 다음 검색 문서의 길이는 1000-235가 되는 것이 맞다. 이 길이를 잘못 계산하면 마찬가지로 프로그램이 다운될 위험이 있다. 검색된 위치의 텍스트와 행열 번호를 구하는 함수도 수정한다.

void GetLineNumAndText(TCHAR *szBuf, int buflen, TCHAR *ptr, TCHAR *Text, int &line, int &col)

{

....

while ((p-szBuf < buflen) && (*p != '\r') && (*p != '\n') && (t-Text < 499)) {

....

szBuf가 널 종료 문자열이라고 가정하고 있었기 때문에 문서의 끝을 *p가 0일 때로 조사했었으나 이진 파일은 별도의 길이를 전달받은 후 길이를 직접 비교해야 한다. 검색된 문자열을 찾아가는 방법도 달라진다.

void OpenFileFromOutput(int idx)

{

TCHAR LastFIF2[256];

int len;

....

hActive=(HWND)SendMessage(g_hMDIClient,WM_MDIGETACTIVE,0,NULL);

pSi=(SInfo *)GetWindowLongPtr(hActive,0);

if (pSi->Ae.GetActiveView()->ViewType==HEXA_VIEW) {

MessageBox(g_hFrameWnd,"활성 뷰가 헥사 뷰일 때는 검색 결과를 찾아갈 수 "

"없습니다.","알림",MB_OK);

return;

}

toff=pSi->Ae.GetOffFromPara(line,col);

if (strchr(LastFIF,'\\')==NULL) {

lstrcpy(LastFIF2,LastFIF);

len=lstrlen(LastFIF2);

} else {

len=AeEscapeString(LastFIF,LastFIF2);

}

pSi->Ae.GetText(Text,MAX_PATH,toff,toff+len);

Text[len]=0;

if (stricmp(Text,LastFIF2) != 0) {

MessageBox(g_hFrameWnd,"검색 후에 파일이 수정되었습니다. "

"검색된 줄의 첫 위치로 이동합니다.","알림",MB_OK);

pSi->Ae.GotoLine(line,0,1);

} else {

pSi->Ae.GotoLine(line,col,1);

pSi->Ae.SetSelect(toff,toff+len,TRUE);

}

}

LastFIF에는 검색식이 그대로 저장되어 있으므로 확장열을 치환한 후 이 문자열을 찾아간다. LastFIF2가 문서의 텍스트와 같은지 비교하기 위해 여전히 stricmp 함수로 비교하고 있는데 메모리 비교는 대소문자를 구분하기 때문이다. 이 경우는 대소문자를 구분하지 않고 비교하는 것이 옳다. LastFIF2는 이진 스트림이므로 가끔 정확하지 않을 수도 있는데 어디까지나 극단적인 상황에 대한 에러 처리 코드이므로 대충 작성했다. 파일 바꾸기는 파일을 다루기 때문에 좀 더 복잡하다.

int OnReplaceFile(TCHAR *Path, DWORD Attr, LPVOID pCustom)

{

....

if (FindChildWithFile(Path) != NULL) {

wsprintf(Mes, "%s 파일은 열려 있으므로 바꾸기를 수행할 수 없습니다.",Path);

MessageBox(g_hFrameWnd,Mes,"알림",MB_OK);

return -1;

}

if (strchr(arFind[0].Get(0),'\\')==NULL) {

lstrcpy(what,arFind[0].Get(0));

len1=lstrlen(what);

} else {

len1=AeEscapeString(arFind[0].Get(0),what);

}

if (strchr(arFind[1].Get(0),'\\')==NULL) {

lstrcpy(to,arFind[1].Get(0));

len2=lstrlen(to);

} else {

len2=AeEscapeString(arFind[1].Get(0),to);

}

hFile=CreateFile(Path,GENERIC_READ,0,NULL,

OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);

size=GetFileSize(hFile,NULL);

if (size > 30*1048576) {

CloseHandle(hFile);

return -1;

}

extra=10000;

memsize=size+extra+1;

buf=(TCHAR *)malloc(memsize);

ReadFile(hFile,buf,size,&dwRead,NULL);

buf[size]=0;

for (pbuf=buf;;) {

....

p=FindString(pbuf,size-(pbuf-buf),0,what,len1,TRUE,(FindFlag & AE_FIND_MATCHCASE)!=0);

if (p == NULL)

break;

if (FindFlag & AE_FIND_WHOLEWORD) {

if (!((p==buf || IsDelimiter(*(p-1))) && IsDelimiter(*(p+len1)))) {

pbuf=p+len1;

continue;

}

}

bReplace=TRUE;

memmove(p+len2,p+len1,size-(p+len1-buf));

memcpy(p,to,len2);

size+=(len2-len1);

TotalFind++;

GetLineNumAndText(buf,size,p,Text,line,col);

....

ListView_SetItemText(hList,idx,2,Text);

ListView_EnsureVisible(hList,idx,FALSE);

UpdateWindow(hList);

....

if (hFile!=INVALID_HANDLE_VALUE) {

WriteFile(hFile,buf,size,&dwRead,NULL);

CloseHandle(hFile);

}

찾을 문자열과 바꿀 문자열을 모두 확장열로 일단 치환해 놓는다. FindString을 호출하는 방식은 OnFindFile 함수와 동일하다. 메모리 이동시 이동 길이를 계산할 때는 lstrlen 함수를 사용할 수 없다. p+len-buf는 검색된 문자열 다음의 오프셋이며 이 값을 현재의 파일 크기 size에서 빼면 버퍼의 끝까지 이동된다.

치환을 할 때마다 리스트 뷰에 즉시 결과를 보여주기 위해 EnsureVisible 함수를 호출했는데 이 호출이 당연히 있어야 하나 1.0에서 누락되었다. 파일 크기 size는 치환될 때마다 두 문자열의 차이만큼 같이 늘어나며 최종적으로 파일을 저장할 때 이 크기만큼 저장해야 한다. 바꾸기 함수도 비슷한 방법으로 수정한다.

int CApiEditText::ReplaceText(int nPos, TCHAR *what, DWORD dwFlag, TCHAR *to)

{

int len,tolen;

TCHAR *pSel;

TCHAR *pWhat,*pTo;

int Result;

TCHAR szDesc[1024];

TCHAR szCom[256];

TCHAR *p;

// 매크로 기록

wsprintf(szCom,"replace \"%s\" \"%s\"",what,to);

if ((dwFlag & AE_FIND_WRAP)==0)

lstrcat(szCom," nowrap");

if (dwFlag & AE_FIND_UP)

lstrcat(szCom," up");

if (dwFlag & AE_FIND_WHOLEWORD)

lstrcat(szCom," word");

if (dwFlag & AE_FIND_MATCHCASE)

lstrcat(szCom," case");

AeMc.RecordCommand(szCom);

// 검색되지 않은 상태에서 바꾸기이면 검색부터 한다.

if (SelStart == SelEnd) {

if (FindText(nPos,what,dwFlag) == TRUE) {

Result=1;

} else {

Result=0;

}

} else {

// 확장열이면 먼저 변환한다.

pWhat=(TCHAR *)malloc(lstrlen(what)+1);

if (strchr(what,'\\')==NULL) {

lstrcpy(pWhat,what);

len=lstrlen(pWhat);

} else {

len=AeEscapeString(what,pWhat);

}

pTo=(TCHAR *)malloc(lstrlen(to)+1);

if (strchr(to,'\\')==NULL) {

lstrcpy(pTo,to);

tolen=lstrlen(pTo);

} else {

tolen=AeEscapeString(to,pTo);

}

// 선택 영역의 텍스트를 읽는다.

pSel=(TCHAR *)malloc(len);

memcpy(pSel,pFrame->buf+min(SelStart,SelEnd),len);

// 대소 구분없이 비교한다면 모두 대문자로 변경한다.

if ((dwFlag & AE_FIND_MATCHCASE) == 0) {

for (p=pWhat;p-pWhat<len;p++) *p=toupper(*p);

for (p=pSel;p-pSel<len;p++) *p=toupper(*p);

}

// 선택영역이 검색할 내용이 아니면 검색 명령을 대신 실행한다.

if (memcmp(pWhat,pSel,len) != 0) {

if (FindText(nPos,what,dwFlag) == TRUE) {

Result=1;

} else {

Result=0;

}

} else {

// 선택영역을 지우고 대체 문자열을 삽입한다.

wsprintf(szDesc," (%s -> %s)",what,to);

pFrame->StartUndoGroup(11,szDesc);

DeleteSelection();

Insert(off,pTo,tolen);

off+=tolen;

SetCaret();

Invalidate(-1);

// 다음 검색 결과가 없으면 0을 리턴하여 바꾸기를 중지한다.

if (FindText(off,what,dwFlag) == TRUE) {

Result=2;

} else {

Result=0;

}

pFrame->EndUndoGroup();

}

free(pWhat);

free(pTo);

free(pSel);

}

return Result;

}

원형은 그대로이지만 내부에서 확장열 변환 후 검색하기 때문에 여기 저기 수정할 곳이 많아졌다. 매크로 기록문에 find를 기록하는 오타도 있었는데 같이 수정했으며 다음 검색 결과가 없을 때도 무조건 2를 리턴하는 버그도 잡았다. 복잡하기 때문에 주석 작업도 새로 했다.

다.기능 수정

당근 1.0의 모두 바꾸기 기능은 항상 현재 위치 이후만 바꾸는 문제가 있다. 모두 바꾸기는 편집하고 있는 파일 전체를 대상으로 하는 것이 더 좋은데 1.0을 만들 때 기획을 잘못했다. 다음과 같이 수정한다.

void OnUser2(HWND hWnd,WPARAM wParam,LPARAM lParam)

{

....

case 3:

int Result;

pSi->Ae.StartUndoGroup(6);

for (i=0;;) {

tFlag=FindFlag;

tFlag &= ~AE_FIND_WRAP;

Result=pSi->Ae.ReplaceText(0,arFind[0].Get(0), tFlag,arFind[1].Get(0));

UpdateWindow(pSi->Ae.hWnd);

ReplaceText 함수의 첫번째 인수를 -1에서 0으로 수정하기만 하면 된다. 옵션으로 둘 수도 있으나 현재 위치 이후만 모두 바꾸기를 하는 경우가 드물 것 같아 옵션으로 만들지 않았다. 바꾸기 대화상자의 버튼 사용 금지 코드에 논리상의 허점이 있다. 검색 대화상자의 코드를 보면 다음과 같이 되어 있다.

BOOL CALLBACK FindDlgProc(HWND hDlg,UINT iMessage,WPARAM wParam,LPARAM lParam)

{

....

case WM_COMMAND:

....

case IDC_FIND_TO:

switch (HIWORD(wParam)) {

case CBN_EDITCHANGE:

if (GetWindowTextLength(GetDlgItem(hDlg,IDC_FIND_TO)) == 0 ||

GetWindowTextLength(GetDlgItem(hDlg,IDC_FIND_WHAT)) == 0) {

EnableWindow(GetDlgItem(hDlg,IDC_BTNREPLACE),FALSE);

EnableWindow(GetDlgItem(hDlg,IDC_BTNREPLACEALL),FALSE);

} else {

EnableWindow(GetDlgItem(hDlg,IDC_BTNREPLACE),TRUE);

EnableWindow(GetDlgItem(hDlg,IDC_BTNREPLACEALL),TRUE);

}

break;

....

찾을 문자열과 바꿀 문자열 중 하나라도 입력되지 않으면 찾기, 바꾸기 모두를 할 수 없다. 그러나 바꿀 문자열은 없어도 바꾸기를 할 수 있어야 한다. 왜냐하면 특정 문자열을 찾아서 지울 수도 있기 때문이다. 다음과 같이 수정한다.

case IDC_FIND_TO:

switch (HIWORD(wParam)) {

case CBN_EDITCHANGE:

if (GetWindowTextLength(GetDlgItem(hDlg,IDC_FIND_WHAT)) == 0) {

EnableWindow(GetDlgItem(hDlg,IDC_BTNREPLACE),FALSE);

EnableWindow(GetDlgItem(hDlg,IDC_BTNREPLACEALL),FALSE);

} else {

EnableWindow(GetDlgItem(hDlg,IDC_BTNREPLACE),TRUE);

EnableWindow(GetDlgItem(hDlg,IDC_BTNREPLACEALL),TRUE);

}

break;

....

case IDC_BTNFIND:

case IDC_BTNREPLACE:

case IDC_BTNREPLACEALL:

case IDC_BTNFINDALL:

....

GetDlgItemText(hDlg,IDC_FIND_TO,szTemp,255);

if (lstrlen(szTemp)) {

arFind[1].Add(szTemp);

RefillHistory(GetDlgItem(hDlg,IDC_FIND_TO),arFind[1]);

}

IDC_FIND_TO의 길이는 점검할 필요없다. 바꿀 문자열이 빈 문자열이더라도 ApiEdit의 Insert가 아무 것도 하지 않으므로 찾은 문자열을 지우기만 한다. 히스토리 추가 코드에도 길이 점검 조건문을 삭제한다. 파일 바꾸기에도 동일한 오류가 있으므로 다음과 같이 수정한다.

BOOL CALLBACK FileFindDlgProc(HWND hDlg,UINT iMessage,WPARAM wParam,LPARAM lParam)

{

....

case IDC_FIND_TO:

switch (HIWORD(wParam)) {

case CBN_EDITCHANGE:

if (GetWindowTextLength(GetDlgItem(hDlg,IDC_FIND_WHAT)) == 0 ||

GetWindowTextLength(GetDlgItem(hDlg,IDC_FIND_FOLDER)) == 0 ||

GetWindowTextLength(GetDlgItem(hDlg,IDC_FIND_TYPE)) == 0) {

EnableWindow(GetDlgItem(hDlg,IDC_BTNFIND),FALSE);

EnableWindow(GetDlgItem(hDlg,IDC_BTNREPLACEALL),FALSE);

} else {

EnableWindow(GetDlgItem(hDlg,IDC_BTNFIND),TRUE);

EnableWindow(GetDlgItem(hDlg,IDC_BTNREPLACEALL),TRUE);

}

break;

....

case IDC_BTNFIND:

....

GetDlgItemText(hDlg,IDC_FIND_TO,szTemp,255);

if (lstrlen(szTemp)) {

arFind[1].Add(szTemp);

}

EndDialog(hDlg,IDOK);

검색 후 SetCaret이 검색 단어 위치로 스크롤한다. 그러나 거의 항상 포맷팅 영역의 제일 끝에 있다. 중앙으로 옮기는 것이 주변 문장을 살펴볼 수 있어 더 좋다. 다음 함수를 추가한다.

void CApiEditText::ArrangeVerticalCenter(int nPos)

{

int x,y;

GetXYFromOff(nPos,x,y);

yPos=max(0,((y-frt.top)-(frt.bottom-frt.top)/2)/LineHeight*LineHeight);

if (IsWindowEnabled(hVertScroll)) {

SetScrollPos(hVertScroll, SB_CTL, yPos, TRUE);

}

Invalidate(-1);

SetCaret();

}

nPos 오프셋이 가리키는 위치가 화면의 수직 중앙이 되도록 맞춘다. FindText에서 검색 결과를 보여줄 때 이 함수를 호출한다.

BOOL CApiEditText::FindText(int nPos, TCHAR *what, DWORD dwFlag)

{

....

int OldyPos;

....

free(pWhat);

if (pFound) {

OldyPos=yPos;

// 선택 영역 길이에 변화가 생긴다.

SetSelect(pFound-pFrame->buf,pFound-pFrame->buf+len,TRUE);

if (OldyPos!=yPos) {

ArrangeVerticalCenter(SelStart);

}

return TRUE;

}

return FALSE;

}

검색 단어를 선택하기 전에 수직 스크롤 위치를 저장해 두고 선택 후의 값과 비교해 보고 달라졌으면 강제로 선택 단어의 처음을 포맷팅 영역의 중앙으로 이동시켰다. 단 같은 화면안에서라면 캐럿만 이동하면 되므로 굳이 스크롤하지 않는 것이 더 좋다. 마찬가지 이유로 북마크 이동할 때도 가급적 중앙에 맞춘다.

void CApiEditText::GotoBookmark(int Mark)

{

int OldyPos;

....

OldyPos=yPos;

GotoLine(Para,0,(ViewType==HEXA_VIEW) ? 0:1);

if (OldyPos!=yPos) {

ArrangeVerticalCenter(off);

}

}

검색 결과창에서 더블클릭할 때도 중앙으로 이동한다.

void OpenFileFromOutput(int idx)

{

int OldyPos;

....

if (stricmp(Text,LastFIF) != 0) {

MessageBox(g_hFrameWnd,"검색 후에 파일이 수정되었습니다. "

"검색된 줄의 첫 위치로 이동합니다.","알림",MB_OK);

pSi->Ae.GotoLine(line,0,1);

} else {

OldyPos=pSi->Ae.GetActiveView()->GetYPos();

pSi->Ae.GotoLine(line,col,1);

pSi->Ae.SetSelect(toff,toff+len,TRUE);

if (OldyPos != pSi->Ae.GetActiveView()->GetYPos()) {

pSi->Ae.GetActiveView()->ArrangeVerticalCenter(toff);

}

}

무조건 수직 중앙으로 이동한다. yPos가 보호된 멤버이기 때문에 외부에서 바로 읽을 수는 없다. 그래서 이 값을 읽는 별도의 멤버 함수를 추가한다. 파생 뷰에서 재정의할 가능성이 낮은 함수이므로 굳이 가상 함수일 필요는 없다.

class CApiEditText : public CWindow

{

public:

....

int GetYPos() { return yPos; }

파일 바꾸기 대화상자에 폴더 드래그 기능을 작성한다. 찾아보기 버튼을 눌러 시작 폴더를 고르도록 되어 있는데 탐색기와 함께 사용할 때는 이 방법이 오히려 더 편리하다. 아주 잡스러운 기능같지만 파일 검색을 자주 사용하는 사람에게는 굉장히 유용한 기능이다.

BOOL CALLBACK FileFindDlgProc(HWND hDlg,UINT iMessage,WPARAM wParam,LPARAM lParam)

{

....

switch(iMessage) {

case WM_INITDIALOG:

....

DragAcceptFiles(hDlg,TRUE);

return TRUE;

case WM_DROPFILES:

DragQueryFile((HDROP)wParam,0,Folder,MAX_PATH);

if ((GetFileAttributes(Folder) & FILE_ATTRIBUTE_DIRECTORY)!=0) {

SetDlgItemText(hDlg,IDC_FIND_FOLDER,Folder);

}

return TRUE;

....

파일 검색을 시작하기 전에 상태란에 검색 시작 메시지를 출력하고 검색을 완료한 후에 완료 메시지를 출력한다.

void FindOrReplaceInFiles(BOOL bReplace)

{

....

SetStatusText(1,"파일 검색중...");

if (bReplace) {

lstrcpy(LastFIF,arFind[1].Get(0));

hFIFThread=CreateThread(NULL, 0, FIFThread,(LPVOID)OnReplaceFile,0,&ThreadID);

} else {

lstrcpy(LastFIF,arFind[0].Get(0));

hFIFThread=CreateThread(NULL, 0, FIFThread,(LPVOID)OnFindFile,0,&ThreadID);

}

}

DWORD WINAPI FIFThread(LPVOID pCallback)

{

TCHAR Mes[128];

bContFIF=TRUE;

FindInFiles(arFind[2].Get(0),arFind[3].Get(0),FIF_DEEP | FIF_INCHID,

(FIFCALLBACK)pCallback,(LPVOID)NULL);

if (TotalFind != 0) {

wsprintf(Mes,"파일 검색 완료 : %d 개 발견",TotalFind);

} else {

if (Option.bSoundFindFail) {

MessageBeep(MB_ICONASTERISK);

}

wsprintf(Mes,"찾는 문자열이 없습니다.");

}

SetStatusText(1,Mes);

return 0;

}

검색 스레드가 너무 조용히 끝나 버리기 때문에 이 메시지를 출력하지 않으면 검색 완료를 알 수가 없다.

마.모두 찾기

모두 찾기는 편집하던 파일에서 특정 문자열을 모두 찾아 검색 결과창에 보여 주는 기능이다. 이 기능은 여러 모로 까다로운 면이 많다. FindText 함수의 구조부터 수정해야 한다. 이 함수는 검색 및 선택까지 같이 하는데 모두 찾기에서 필요한 기능은 검색만 하는 것이다. 다음 두 개의 함수로 분할한다.

BOOL CApiEditText::FindTextSub(int nPos, TCHAR *what, DWORD dwFlag,int &s, int &e)

{

int nStart;

TCHAR *pFound;

BOOL bWrap;

TCHAR *pWhat;

int len;

pWhat=(TCHAR *)malloc(lstrlen(what)+1);

if (strchr(what,'\\')==NULL) {

lstrcpy(pWhat,what);

len=lstrlen(pWhat);

} else {

len=AeEscapeString(what,pWhat);

}

if (nPos == -1) {

....

for (;;) {

....

}

free(pWhat);

if (pFound) {

s=pFound-pFrame->buf;

e=s+len;

return TRUE;

} else {

s=e=-1;

return FALSE;

}

}

FindText 함수에서 실제 검색을 하는 코드들이 모두 이 함수로 이동되었다. FindTextSub는 검색 결과를 오프셋 범위로 리턴한다. 실제 검색하는 코드가 졸병 함수로 옮겨졌으므로 FindText는 다음과 같이 같단해진다.

BOOL CApiEditText::FindText(int nPos, TCHAR *what, DWORD dwFlag)

{

TCHAR szCom[256];

int s,e;

int OldyPos;

wsprintf(szCom,"find \"%s\"",what);

if ((dwFlag & AE_FIND_WRAP)==0)

lstrcat(szCom," nowrap");

if (dwFlag & AE_FIND_UP)

lstrcat(szCom," up");

if (dwFlag & AE_FIND_WHOLEWORD)

lstrcat(szCom," word");

if (dwFlag & AE_FIND_MATCHCASE)

lstrcat(szCom," case");

AeMc.RecordCommand(szCom);

if (FindTextSub(nPos,what,dwFlag,s,e)) {

OldyPos=yPos;

SetSelect(s,e,TRUE);

if (OldyPos!=yPos) {

ArrangeVerticalCenter(SelStart);

}

return TRUE;

}

return FALSE;

}

편집 기록 작성과 검색 결과를 선택하는 코드만 남았다. 이상의 뷰의 검색 함수를 수정한 것이고 프레임에도 검색만 하는 함수가 필요하다. 실제 코드는 작성할 필요없고 활성 뷰의 함수를 호출하면 된다.

BOOL CApiEdit::FindTextSub(int nPos, TCHAR *what, DWORD dwFlag,int &s, int &e)

{

return GetActiveView()->FindTextSub(nPos,what,dwFlag,s,e);

}

모두 찾기는 검색 결과가 여러 개이므로 캐럿을 이동하는 방식으로는 결과를 출력할 수 없으며 검색 결과창에 출력해야 한다. 검색 결과창에는 주변 문자열도 같이 출력하므로 특정 문단의 텍스트를 구하는 함수가 필요하다. ApiEditText에 다음 함수를 추가한다.

void CApiEditText::GetParaText(int nPara,TCHAR *Text,int len)

{

int ts,te;

int i;

TCHAR *p;

ts=GetOffFromPara(nPara,0);

te=pLine[GetParaLastLine(nPara)].End;

for (p=Text,i=ts;i<te;i++) {

if (pFrame->buf[i]=='\t') {

*p++=' ';

*p++=' ';

*p++=' ';

*p++=' ';

} else {

if (pFrame->IsDBCS(i)) {

*p++=pFrame->buf[i++];

}

*p++=pFrame->buf[i];

}

if (p-Text >= len-2) {

break;

}

}

*p=0;

}

리스트 뷰는 제어 코드를 출력하지 못하므로 탭 문자는 4개의 공백으로 바꾼다. 필요한 함수들이 완성되었으며 검색 대화상자에서 모두 찾기 버튼의 명령을 처리한다.

BOOL CALLBACK FindDlgProc(HWND hDlg,UINT iMessage,WPARAM wParam,LPARAM lParam)

{

....

case WM_COMMAND:

....

case IDC_FIND_WHAT:

switch (HIWORD(wParam)) {

case CBN_EDITCHANGE:

if (GetWindowTextLength(GetDlgItem(hDlg,IDC_FIND_WHAT)) == 0) {

EnableWindow(GetDlgItem(hDlg,IDC_BTNFIND),FALSE);

EnableWindow(GetDlgItem(hDlg,IDC_BTNFINDALL),FALSE);

} else {

EnableWindow(GetDlgItem(hDlg,IDC_BTNFIND),TRUE);

EnableWindow(GetDlgItem(hDlg,IDC_BTNFINDALL),TRUE);

}

....

case IDC_BTNFIND:

case IDC_BTNREPLACE:

case IDC_BTNREPLACEALL:

case IDC_BTNFINDALL:

....

switch (LOWORD(wParam)) {

....

case IDC_BTNFINDALL:

SendMessage(GetParent(hDlg),WM_USER+2,4,0);

if (FindFlag & AE_FIND_CLOSE) {

GetWindowRect(hDlg,&drt);

DestroyWindow(hDlg);

}

break;

}

모두 찾기 버튼도 찾기 버튼과 마찬가지로 사용 금지 여부를 통제한다. 이 명령을 선택하면 메인 윈도우로 WM_USER+2 메시지를 보내되 wParam으로 모두 찾기를 뜻하는 4를 보낸다. OnUser2에서 이 명령을 처리한다.

void OnUser2(HWND hWnd,WPARAM wParam,LPARAM lParam)

{

....

case 4:

int toff;

int s,e;

LVITEM LI;

int idx;

CApiEditText *pView;

int line,col;

TCHAR Text[501];

// 헥사 뷰에서는 모두 찾기를 할 수 없음.

pView=pSi->Ae.GetActiveView();

if (pView->ViewType==HEXA_VIEW) {

break;

}

lstrcpy(LastFIF,arFind[0].Get(0));

TotalFind=0;

if (bShowOutput==FALSE) {

bShowOutput=TRUE;

Relayout();

}

SendMessage(hList,LVM_DELETEALLITEMS,0,0);

tFlag=FindFlag;

tFlag &= ~AE_FIND_WRAP;

for (toff=0;;) {

if (pSi->Ae.FindTextSub(toff,arFind[0].Get(0),tFlag,s,e) == FALSE) {

break;

}

TotalFind++;

pView->GetParaFromOff(s,line,col);

pView->GetParaText(line,Text,500);

LI.mask=LVIF_TEXT | LVIF_PARAM;

LI.state=0;

LI.stateMask=0;

LI.iSubItem=0;

LI.iItem=ListView_GetItemCount(hList);

itoa(TotalFind,Mes,10);

LI.pszText=Mes;

LI.lParam=(LPARAM)hActive;

idx=ListView_InsertItem(hList,&LI);

wsprintf(Mes,"%s(%d,%d)",pSi->NowFile,line+1,col+1);

ListView_SetItemText(hList,idx,1,Mes);

ListView_SetItemText(hList,idx,2,Text);

ListView_EnsureVisible(hList,idx,FALSE);

UpdateWindow(hList);

// 다음 오프셋으로 이동

toff=e;

}

if (TotalFind == 0) {

wsprintf(Mes, "찾는 문자열 \"%s\"가 없습니다",arFind[0].Get(0));

if (Option.bSoundFindFail) {

MessageBeep(MB_ICONASTERISK);

}

} else {

wsprintf(Mes, "총 %d개의 \"%s\"문자열을 찾았습니다.",

TotalFind,arFind[0].Get(0));

}

SetStatusText(1,Mes);

break;

}

}

헥사 뷰에서는 모두 찾기를 할 수 없다. 왜냐하면 검색 결과 위치를 문단과 열 번호로 보여주는데 헥사 뷰는 이런 것이 없기 때문이다. 검색 결과창이 보이지 않으면 보이도록 만들고 검색한 오프셋으로부터 텍스트와 위치를 구해 리스트 뷰에 출력한다.

리스트 뷰의 lParam에 검색 대상 윈도우의 핸들을 저장해 놓는다. 파일 검색과는 달리 편집중인 문서를 검색하는 것이고 문서가 메모리상에만 있을 수도 있기 때문에 파일의 경로만으로는 대상 문서를 정확하게 찾을 수 없다. OpenFileFromOutput 함수는 검색 결과로부터 문서로 이동하는 코드를 수정한다. 구조가 조금 바뀐다.

void OpenFileFromOutput(int idx)

{

....

LVITEM LI;

ListView_GetItemText(hList,idx,1,Text,MAX_PATH);

p=strrchr(Text,',');

col=atoi(p+1)-1;

p=strrchr(Text,'(');

line=atoi(p+1)-1;

*p=0;

LI.mask=LVIF_PARAM;

LI.iItem=idx;

LI.iSubItem=0;

ListView_GetItem(hList,&LI);

if (LI.lParam) {

hActive=(HWND)LI.lParam;

pSi=(SInfo *)GetWindowLong(hActive,0);

// 없는 윈도우이거나 파일명이 다르면 아무것도 하지 않음

if (pSi==NULL || strcmp(Text,pSi->NowFile)!=0) {

MessageBox(g_hFrameWnd,"검색 대상 문서가 존재하지 않습니다. "

"다시 검색해 주십시오","알림",MB_OK);

return;

}

} else {

if (FindFlag & AE_FIND_SHORTPATH) {

wsprintf(Path,"%s\\%s",arFind[2].Get(0),Text);

} else {

lstrcpy(Path,Text);

}

if (OpenFromFile(Path)==FALSE) {

return;

}

hActive=(HWND)SendMessage(g_hMDIClient,WM_MDIGETACTIVE,0,NULL);

pSi=(SInfo *)GetWindowLong(hActive,0);

}

if (pSi->Ae.GetActiveView()->ViewType==HEXA_VIEW) {

MessageBox(g_hFrameWnd,"활성 뷰가 헥사 뷰일 때는 검색 결과를 찾아갈 수 "

"없습니다.","알림",MB_OK);

return;

}

toff=pSi->Ae.GetOffFromPara(line,col);

....

리스트 뷰의 lParam에 윈도우 핸들이 있으면 파일 검색을 한 결과가 아니고 모두 찾기를 한 결과이다. 파일을 다시 열 필요없이 검색 대상 윈도우에서 검색 결과를 찾아 가면 된다. 검색 후 이 윈도우가 닫혔다면 찾아갈 수 없다.

바.바로 찾기

바로 찾기는 검색 대화상자를 띄울 필요없이 원하는 검색식을 바로 입력하면서 찾는 방식이다. 상태란에 검색식 입력을 위한 에디트 컨트롤을 만들고 이 에디트에 검색식을 입력하는 족족 찾아 준다. 에디트 컨트롤이 직접 검색을 지휘해야 하므로 서브클래싱한다. 다음 두 개의 전역 변수를 Dangeun.cpp에 추가한다.

static HWND hInstEdit;

static WNDPROC OldInstEditProc;

검색/바로 찾기 명령을 선택하면 바로 찾기 모드로 들어간다.

void OnCommand(HWND hWnd,WPARAM wParam,LPARAM lParam)

{

....

case IDM_SEARCH_INST:

InstantSearch(hInstEdit==NULL);

return;

InstantSearch 함수는 바로 찾기 모드를 토글하는데 bStart가 TRUE이면 바로 찾기를 시작하고 FALSE이면 바로 찾기를 끝낸다. hInstEdit가 생성되어 있지 않다면 바로 찾기를 시작하고 이미 생성되어 있다면 바로 찾기를 끝낸다.

void InstantSearch(BOOL bStart)

{

RECT prt;

HWND hActive;

TCHAR szTemp[256];

hActive=(HWND)SendMessage(g_hMDIClient,WM_MDIGETACTIVE,0,NULL);

if (hActive==NULL) {

return;

}

if (bStart) {

SetStatusText(1,"바로 찾기");

SendMessage(hStatus,SB_GETRECT,0,(LPARAM)&prt);

hInstEdit=CreateWindowEx(WS_EX_STATICEDGE,"Edit",NULL,

WS_CHILD | WS_VISIBLE | ES_AUTOHSCROLL,

prt.left+60,prt.top+1,130,prt.bottom-prt.top-2,

hStatus,(HMENU)0,g_hInst,NULL);

OldInstEditProc=(WNDPROC)SetWindowLongPtr(hInstEdit,GWLP_WNDPROC,(LONG_PTR)InstEditProc);

SendMessage(hInstEdit,WM_SETFONT,(WPARAM)hGul9,MAKELPARAM(FALSE,0));

SendMessage(hInstEdit,EM_LIMITTEXT,255,0);

SetFocus(hInstEdit);

} else {

GetWindowText(hInstEdit,szTemp,256);

if (lstrlen(szTemp)) {

arFind[0].Add(szTemp);

}

SetStatusText(1,NULL);

SetWindowLongPtr(hInstEdit,GWLP_WNDPROC,(LONG_PTR)OldInstEditProc);

DestroyWindow(hInstEdit);

hInstEdit=NULL;

SetFocus(hActive);

}

}

상태란의 첫번째 파트의 문자열을 "바로 찾기"로 수정하고 에디트 컨트롤을 생성한다. 에디트 컨트롤이 자신에게 입력된 문자열로 직접 검색을 해야 하며 몇가지 단축키 지원을 위해 서블클래싱했다. 상태란의 높이에 제약이 있으므로 글꼴은 굴림 9포인트를 사용한다. 바로 찾기를 종료할 때는 상태란의 텍스트를 원래대로 바꾸어 놓고 에디트 컨트롤을 파괴한다. 검색 히스토리에도 기록해 놓는다.

LRESULT CALLBACK InstEditProc(HWND hWnd,UINT iMessage,WPARAM wParam,LPARAM lParam)

{

LRESULT Result;

DWORD tFlag;

switch (iMessage) {

case WM_CHAR:

if (wParam=='\t')

return TRUE;

Result=CallWindowProc(OldInstEditProc,hWnd,iMessage,wParam,lParam);

InstSrchNow(hWnd,0,FindFlag);

return Result;

case WM_KEYDOWN:

switch (wParam) {

case VK_RETURN:

case VK_ESCAPE:

InstantSearch(FALSE);

return TRUE;

case VK_TAB:

SetWindowText(hWnd,"");

return TRUE;

case VK_DOWN:

tFlag=FindFlag;

tFlag &= ~AE_FIND_UP;

InstSrchNow(hWnd,-1,tFlag);

return TRUE;

case VK_UP:

tFlag=FindFlag;

tFlag |= AE_FIND_UP;

InstSrchNow(hWnd,-1,tFlag);

return TRUE;

}

break;

case WM_KILLFOCUS:

InstantSearch(FALSE);

return TRUE;

}

return CallWindowProc(OldInstEditProc,hWnd,iMessage,wParam,lParam);

}

void InstSrchNow(HWND hEdit,int Start,DWORD Flag)

{

TCHAR szTemp[256];

HWND hActive;

SInfo *pSi;

hActive=(HWND)SendMessage(g_hMDIClient,WM_MDIGETACTIVE,0,NULL);

if (hActive!=NULL) {

pSi=(SInfo *)GetWindowLong(hActive,0);

GetWindowText(hEdit,szTemp,256);

if (pSi->Ae.FindText(Start,szTemp,Flag) == FALSE) {

if (Option.bSoundFindFail) {

MessageBeep(MB_ICONASTERISK);

}

}

}

}

문자가 입력될 때마다 활성창에 대해 즉시 검색을 실행한다. Enter나 Esc는 바로 찾기를 종료하며 Tab은 검색식을 다시 입력하고 아래위 커서 이동키는 다음, 이전 찾기이다. 포커스를 잃으면 즉시 바로 찾기 모드를 빠져 나가도록 했으므로 마우스로 문서를 찍으면 즉시 종료된다. 바로 찾기는 속도가 빠른 것이 장점인데 끝내는 것도 이렇게 신속하다. 바로 찾기를 지원하기 위해 SetCaret을 수정한다.

void CApiEditText::SetCaret(BOOL bUpdatePrevX/*=TRUE*/, BOOL bScrollToCaret/*=TRUE*/)

{

....

CreateCaret(hWnd,NULL,caretwidth,FontHeight);

if (GetFocus()==hWnd) {

CreateCaret(hWnd,NULL,caretwidth,FontHeight);

ShowCaret(hWnd);

}

....

if (GetFocus()==hWnd) {

SetCaretPos(x-xPos,y-yPos+GetCharYPos());

}

바로 찾기 에디트에서 검색을 위해 FindText를 호출하면 이 함수는 뷰의 SetCaret을 호출하는데 여기서 캐럿을 조작한다. 자신이 포커스를 가지고 있지 않으면 아예 캐럿을 만들지도 말고 움직이지도 말아야 한다. 캐럿은 시스템 전체를 통틀어 단 하나밖에 없기 때문에 포커스를 가진 컨트롤만 캐럿을 조작할 수 있다. 헥사 뷰도 마찬가지 방법으로 수정한다. 이 처리를 하지 않으면 검색 에디트에서 글자를 입력하면 에디트의 캐럿이 사라져 버린다.

바로 찾기에는 단축키 F4를 할당해 놓았다. 조합키도 아니고 한 키로 누를 수 있는 단축키를 할당했다는 것이 그만큼 이 기능이 유용하다고 평가했다는 뜻이며 개발자로서 자신이 만든 기능에 대해 나름대로 애정 표현을 한 것이다. 실제로 사용해 보면 이 기능은 정말 편리하다.

사.반쪽 한글 선택

당근의 모든 루틴은 한글의 경계에 오프셋이 오지 않도록 철저하게 관리하며 이 관리 정책이 비교적 정교해서 별 말썽이 없었다. 그러나 헥사 편집 기능이 들어가면서 한글의 경계 오프셋에 걸치는 문제가 발생하기 시작했다. 이 버그도 아주 간단하게 테스트할 수 있다. 알파 4에서 새 문서를 만들고 "ABCD 대한민국"만 입력해 놓는다. 그리고 찾기 대화상자를 열고 다음 검색식을 입력해 보아라.

\x41은 16진수로 문자코드 41을 검색하라는 뜻이며 이 경우 제일 처음의 "A"가 아주 정상적으로 검색된다. 그러나 검색식에 \xc7을 주고 검색하면 즉시 다운된다. \xc7은 "한"자의 앞쪽 바이트인데 반쪽 한글을 검색한 후 이걸 선택하려고 하니 다운되는 것이다. 검색 루틴은 \xc7 문자를 제대로 찾았지만 검색 후 이 문자를 선택할 수가 없는 것이다. 좀 더 기가 막힌 상황도 테스트해 보자.

빈 문서에 "정지한다"라는 문자열만 써 넣고 한글 모음 "ㅑ'를 검색하면 역시 다운된다. 모음만 있는 "ㅑ"도 분명히 문자이고 코드가 있는데 이 문자의 코드인 A1C4가 "정"자의 뒷쪽 바이트와 "지"자의 앞쪽 바이트와 일치하는 것이다. A1C4라는 문자열이 분명히 존재하므로 검색 루틴은 이 오프셋을 리턴하고 SetCaret은 두 글자의 반쪽씩으로 한 글자를 선택하려고 시도하는데 이 오프셋이 무효하기 때문에 다운되는 것이다.

이 문제는 검색 루틴이 DBCS를 제대로 인식하지 못해서 발생한 것이므로 글자의 중간을 검색하지 않도록 해야 한다. 검색의 실제 주체인 FindString 전역 함수는 단순히 코드의 스트림만 검색하는데 이 함수가 DBCS를 인식하도록 수정하면 문제가 해결된다. 그러나 이 함수는 헥사 뷰에서도 호출하는 일반적인 검색 함수이므로 여전히 DBCS를 인식하지 않는 것이 옳다. 수정 대상은 검색 결과를 점검하는 FindTextSub이다.

BOOL CApiEditText::FindTextSub(int nPos, TCHAR *what, DWORD dwFlag,int &s, int &e)

{

....

for (;;) {

pFound=FindString(pFrame->buf,pFrame->doclen,nStart,pWhat,len,(dwFlag & AE_FIND_UP)==0,

(dwFlag & AE_FIND_MATCHCASE)!=0);

if (pFound) {

// 텍스트 뷰에서 DBCS 중간에 걸치면 검색 실패한 것으로 간주한다.

if (ViewType != HEXA_VIEW && pFrame->IsInDBCS(pFound-pFrame->buf)) {

if (dwFlag & AE_FIND_UP) {

nStart=pFound-pFrame->buf-1;

} else {

nStart=pFound-pFrame->buf+len;

}

continue;

}

// 단어 단위로 검색할 경우 양쪽에 공백이 있어야 한다.

if (dwFlag & AE_FIND_WHOLEWORD) {

FindString을 호출하여 검색한 후 이 위치가 DBCS의 중간인지를 점검하여 무효한 위치라면 다시 검색한다. 단, 헥사뷰는 DBCS에 상관없이 바이트 검색을 해야 하므로 이 규칙을 적용하지 않는 것이 옳다.