4.자동 상용구

가.상용구 검색

상용구를 삽입하려면 상용구 창에서 원하는 상용구를 골라 더블클릭해야 한다. 즉, 상용구를 쓰고 싶으면 타이프중에 마우스로 손이 가야 한다는 얘기인데 이는 오히려 타이핑 속도를 떨어뜨리고 정신을 산만하게 만들어 안 쓰느니만도 못한 결과를 초래하기도 한다. 자동 상용구 기능은 미리 등록된 문자열을 입력하기만 하면 상용구로 대체해 주는 기능이다. 키보드로 상용구를 바로 입력할 수 있으므로 작업 속도가 훨씬 더 빠르다.

자동 상용구를 삽입할 시점은 컨트롤이 문장을 미리 약속된 문자열을 입력받았을 때이고 상용구 묶음은 호스트가 관리하므로 이 기능을 구현하려면 컨트롤과 호스트가 상호 긴밀히 협조해야 한다. 컨트롤은 입력된 문자열이 자동 상용구 삽입명이면 호스트에세 삽입명을 가지는 상용구가 있는지 물어보아야 하고 호스트는 상용구의 내용을 컨트롤에게 전달해야 한다. 이 기능을 구현하려면 호스트에 현재 열려진 상용구 묶음에서 삽입명으로 상용구를 검색하는 기능이 필요하다. Clip.cpp에 다음 두 함수를 추가한다.

// 열려진 상용구에서 상용구를 검색한다.

CClipRecord *FindClipRecord(TCHAR *Name,BOOL bAutoName)

{

HTREEITEM hRoot;

CClipRecord *cr;

hRoot=TreeView_GetRoot(hClipTree);

while (hRoot) {

cr=FindClipRecordSub(hRoot,Name,bAutoName);

if (cr) {

return cr;

}

hRoot=TreeView_GetNextSibling(hClipTree,hRoot);

}

return NULL;

}

// hRoot 트리에서 상용구를 검색한다.

CClipRecord *FindClipRecordSub(HTREEITEM hRoot,TCHAR *Name,BOOL bAutoName)

{

HTREEITEM hChild;

TVITEM TV;

CClipRecord *cr;

hChild=TreeView_GetChild(hClipTree,hRoot);

while (hChild) {

TV.mask=TVIF_PARAM | TVIF_IMAGE;

TV.hItem=hChild;

TreeView_GetItem(hClipTree,&TV);

// 폴더이면 재귀호출한다.

if (TV.iImage==DGI_CLIPFOLDER) {

cr=FindClipRecordSub(hChild,Name,bAutoName);

if (cr) {

return cr;

}

} else {

// 자동 삽입명 또는 이름으로 검색한다.

cr=(CClipRecord *)TV.lParam;

if (bAutoName) {

if (lstrcmpi(cr->AutoName,Name) == 0) {

return cr;

}

} else {

if (lstrcmpi(cr->Name,Name) == 0) {

return cr;

}

}

}

hChild=TreeView_GetNextSibling(hClipTree,hChild);

}

return NULL;

}

상용구 트리의 모든 노드를 다 순회하면서 이름, 자동삽입명으로 검색해야 하므로 재귀 호출을 사용해야 한다. 다행히 메모리내에서의 검색이라 빠르기는 하지만 모든 노드를 검색해야 하므로 상용구 묶음이 크다면 시간이 조금 걸릴 수도 있다. 또한 스페이스나 탭을 입력할 때마다 반복되기 때문에 전체적인 성능을 저하시키는 요인이 될 수도 있다. 이 동작을 좀 더 빠르게 하고 싶다면 별도의 인덱스를 유지하거나 캐시 기법을 도입하는 것이 좋다.

삽입명 검색에 대소문자 구분은 하지 않았는데 상용구끼리 대소문자가 다른 삽입명을 지정하는 경우는 거의 없을 것이므로 구분하지 않는 것이 더 바람직하다. 필요하다면 대소문자 구분 여부를 옵션으로 만들 수도 있을 것이다. 검색되었으면 상용구 레코드의 포인터를 리턴한다. 이 포인터는 트리의 각 노드에 할당되어 있으므로 항상 신속하게 참조할 수 있다.

나.자동 상용구 삽입

ApiEdit 에 자동 상용구 처리를 위한 옵션 변수들을 추가한다. 자동 상용구 기능을 사용할 것인가와 탭키로 자동 상용구를 삽입할 것인가를 지정한다.

class CApiEdit : public CWindow

{

private:

....

BOOL bUseAutoClip;

BOOL bAutoClipByTab;

public:

....

BOOL GetUseAutoClip() { return bUseAutoClip; }

void SetUseAutoClip(BOOL aValue) { bUseAutoClip=aValue; }

BOOL GetAutoClipByTab() { return bAutoClipByTab; }

void SetAutoClipByTab(BOOL aValue) { bAutoClipByTab=aValue; }

};

이 옵션값은 실시간으로 점검되며 옵션이 변경될 때 특별한 부가 처리가 필요없으므로 Set 함수도 인라인으로 작성했다. 테스트를 위해 생성자에서 둘 다 TRUE 로 초기화한다.

CApiEdit::CApiEdit()

{

....

bUseAutoClip=TRUE;

bAutoClipByTab=TRUE;

}

점검할 주체는 문자열 입력을 받는 뷰, 즉 텍스트 뷰에만 국한된다. 헥사뷰에서는 문자를 입력하는 것이 아니므로 의미없다. 텍스트 뷰에 다음 세 함수를 추가한다.

class CApiEditText : public CWindow

{

....

virtual void TestAutoClip(int ch);

virtual int GetAutoClipName();

virtual void ReplaceClipText(TCHAR *Text);

};

헥사 뷰는 이 함수를 쓰지 않지만 차후에 다른 뷰는 이 함수를 쓸 수도 있으므로 가상 함수로 선언해야 한다. 다음 두 함수는 자동 상용구 입력을 검사한다.

void CApiEditText::TestAutoClip(int ch)

{

TCHAR *pWord;

int toff,len;

// 최소한 2글자는 입력되어 있어야 검색의 의미가 있다.

if (pFrame->bUseAutoClip && off >= 2) {

if ((pFrame->bAutoClipByTab && ch=='\t') ||

(pFrame->bAutoClipByTab==FALSE && ch==' ')) {

toff=GetAutoClipName();

len=off-1-toff;

// len이 0인 경우 : 계속 공백만 이어지는 경우. 앞쪽 단어가 없음

if (len) {

pWord=(TCHAR *)calloc(len+1,1);

memcpy(pWord,pFrame->buf+toff,len);

if (SendMessage(GetParent(pFrame->hWnd),pFrame->UserBase+3,0,(LPARAM)pWord)) {

Invalidate(pFrame->FindParaStart(toff));

}

free(pWord);

}

}

}

}

int CApiEditText::GetAutoClipName()

{

int toff;

// 앞쪽의 공백 아닌 문자를 찾음. 구분자 개념이 없으므로 GetPrevWord 등을 쓸 수 없음

for (toff=off-2;;toff--) {

if (AeIsWhiteSpace(pFrame->buf[toff]) || pFrame->buf[toff] == '\n') {

toff++;

break;

}

if (toff==0) {

break;

}

}

return toff;

}

자동 상용구 옵션이 켜져 있어야 하고 최소한 2 글자는 입력되어 있어야 한다. 왜 최소한 두 글자인가 하면 자동삽입명 1자, 스페이스나 탭 1자 까지는 입력되어 있어야 하기 때문이다. 이 조건이 맞을 때 자동 상용구 삽입명이 입력되었는지 본다. GetAutoClipName 함수는 현재 위치에서 두 칸 앞쪽의 단어를 구한다. 삽입명 추출에 공백(탭 포함)이나 개행 코드만 구분자가 되며 따라서 GetPrevWord 따위의 함수를 사용할 수 없다. 이 함수가 조사한 오프셋에서 현재 위치-1까지, 즉 공백이나 탭은 제외한 단어를 취하면 이 단어가 삽입명이다.

임시 버퍼를 할당한 후 프레임의 부모 윈도우, 그러니까 ApiEdit 컨트롤의 부모 윈도우에게 UserBase+3 메시지를 보내 자동 상용구 점검을 요청한다. 사용자 정의 메시지를 사용하는 이유에 대해서는 앞서 몇 번 설명한 바 있다. 이때 lParam으로 추출된 앞쪽 단어를 전달한다. ApiEdit의 부모 윈도우는 UserBase+3을 받았을 때 상용구 묶음에서 삽입명 검색을 한 후 자동 상용구이면 ReplaceClipText 함수를 호출한다.

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

{

....

CClipRecord *cr;

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

if (pSi && iMessage > WM_USER) {

....

if (iMessage == pSi->Ae.GetUserBase()+3) {

cr=FindClipRecord((TCHAR *)lParam,TRUE);

if (cr) {

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

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

pSi->Ae.GetActiveView()->ReplaceClipText(cr->Content);

return 1;

}

return 0;

}

}

lParam으로 전달된 단어를 검색해 보고 있으면 자동 상용구로 대체한다. 다음 함수가 자동상용구 대체를 한다.

// 직전의 단어를 Text 상용구로 대체한다.

void CApiEditText::ReplaceClipText(TCHAR *Text)

{

int toff;

toff=GetAutoClipName();

pFrame->StartUndoGroup(23);

Delete(toff,off-toff);

off=toff;

InsertClipText(Text);

pFrame->EndUndoGroup();

}

InsertClipText 함수와 유사하되 자동삽입명을 찾아서 대체한다는 점이 다르다. 이때 자동 상용구 검사키인 탭이나 공백까지 같이 대체해야 한다. 한가지 아쉬운 점은 자동 들여쓰기까지 조정하지는 못한다는 점인데 예를 들어 for문을 삽입하면 현재 삽입되는 블록의 들여쓰기 상태에 따라 들여쓰기가 조정되는 것이 좋다. 이 기능은 컴파일러 수준의 구문 분석 능력을 요구하므로 일단은 있는 그대로 삽입하기로 하고 다음에 개선해 볼 생각이다. TestAutoClip 함수는 다음 두 함수에서 호출한다.

void CApiEditText::OnChar(HWND hWnd, TCHAR ch, int cRepeat)

{

....

SetCaret();

TestAutoClip(ch);

}

LRESULT CApiEditText::OnImeChar(HWND hWnd, WPARAM wParam, LPARAM lParam)

{

SetCaret();

TestAutoClip(wParam);

return 0;

}

문자 입력에 대한 모든 처리가 끝난 후 자동 상용구를 점검 한다. 한글 다음에 이어지는 공백이나 탭은 OnImeChar 함수로 전달되므로 이 함수에서도 자동상용구 점검을 해야 한다. 자동 상용구 삽입 문자로 공백이나 탭을 선택할 수 있는데 공백은 너무 자주 입력되고 우연히라도 삽입명과 같은 문자열이 입력될 수도 있으므로 가급적이면 탭을 사용하는 것이 효율상 유리하다.

다.상용구 삽입 명령

여기까지 작업하면 상용구에 대한 모든 처리는 완료되었다. 마지막으로 매크로 명령중에 상용구를 삽입하는 clip이라는 명령을 처리한다.

int DoCommand(const TCHAR *szCom)

{

....

switch (Verb) {

case DGC_CALL:

....

case DGC_CLIP:

CClipRecord *cr;

GetComString(p,str);

count=GetComNumber(p,1);

if (str) {

cr=FindClipRecord(str,FALSE);

if (cr) {

for (i=0;i<count;i++) {

pSi->Ae.GetActiveView()->InsertClipText(cr->Content);

}

}

free(str);

} else {

Result=-3;

goto End;

}

break;

....

이름으로 검색해서 발견되면 상용구를 삽입한다. 따라서 이 명령은 어떤 상용구 묶음이 열려 있는가에 따라 성공 여부가 달라지기도 한다. Macro1에 clip "test"라는 명령이 들어 있고 이 매크로에 F12 단축키가 지정되어 있을 때 F12를 누르면 다음 과정을 거쳐 상용구가 삽입된다.

리턴될 때는 이 순서의 역순으로 리턴될 것이며 이 과정에서 매크로 구문의 오류를 처리하거나 존재하지 않는 상용구를 무시한다. 어지간히도 복잡한데 그만큼 당근과 ApiEdit의 기능이 많이 확장되었다는 뜻이다. 만약 중첩 매크로에서 상용구를 삽입하면 이보다 호출 구조는 훨씬 더 복잡해질 것이다.