teraterm/teraterm/buffer.c

/* Tera Term
 Copyright(C) 1994-1998 T. Teranishi
 All rights reserved. */

/* TERATERM.EXE, scroll buffer routines */

#include "teraterm.h"
#include "tttypes.h"
#include <string.h>

#include "ttwinman.h"
#include "teraprn.h"
#include "vtdisp.h"
#include "clipboar.h"
#include "telnet.h"
#include "ttplug.h" /* TTPLUG */

#include "buffer.h"

// URLを強調する（石崎氏パッチ 2005/4/2）
#define URL_EMPHASIS 1

#define BuffXMax TermWidthMax
//#define BuffYMax 100000
//#define BuffSizeMax 8000000
// スクロールバッファの最大長を拡張 (2004.11.28 yutaka)
#define BuffYMax 500000
#define BuffSizeMax (BuffYMax * 80)

// status line
int StatusLine; //0: none 1: shown 
/* top & bottom margin */
int CursorTop, CursorBottom;
BOOL Selected;
BOOL Wrap;

static WORD TabStops[256];
static int NTabStops;

static WORD BuffLock = 0;
static HANDLE HCodeBuff = 0;
static HANDLE HAttrBuff = 0;
static HANDLE HAttrBuff2 = 0;
static HANDLE HAttrBuffFG = 0;
static HANDLE HAttrBuffBG = 0;

static PCHAR CodeBuff;  /* Character code buffer */
static PCHAR AttrBuff;  /* Attribute buffer */
static PCHAR AttrBuff2; /* Color attr buffer */
static PCHAR AttrBuffFG; /* Foreground color attr buffer */
static PCHAR AttrBuffBG; /* Background color attr buffer */
static PCHAR CodeLine;
static PCHAR AttrLine;
static PCHAR AttrLine2;
static PCHAR AttrLineFG;
static PCHAR AttrLineBG;
static LONG LinePtr;
static LONG BufferSize;
static int NumOfLinesInBuff;
static int BuffStartAbs, BuffEndAbs;
static POINT SelectStart, SelectEnd, SelectEndOld;
static BOOL BoxSelect;
static POINT DblClkStart, DblClkEnd;

static int StrChangeStart, StrChangeCount;

static BOOL SeveralPageSelect;  // add (2005.5.15 yutaka)

static TCharAttr CurCharAttr;

HANDLE SaveBuff = NULL;
int SaveBuffX;
int SaveBuffY;

LONG GetLinePtr(int Line)
{
        LONG Ptr;

        Ptr = (LONG)(BuffStartAbs + Line) * (LONG)(NumOfColumns);
        while (Ptr>=BufferSize) {
                Ptr = Ptr - BufferSize;
        }
        return Ptr;
}

LONG NextLinePtr(LONG Ptr)
{
        Ptr = Ptr + (LONG)NumOfColumns;
        if (Ptr >= BufferSize) {
                Ptr = Ptr - BufferSize;
        }
        return Ptr;
}

LONG PrevLinePtr(LONG Ptr)
{
        Ptr = Ptr - (LONG)NumOfColumns;
        if (Ptr < 0) {
                Ptr = Ptr + BufferSize;
        }
        return Ptr;
}

BOOL ChangeBuffer(int Nx, int Ny)
{
        HANDLE HCodeNew, HAttrNew, HAttr2New, HAttrFGNew, HAttrBGNew;
        LONG NewSize;
        int NxCopy, NyCopy, i;
        PCHAR CodeDest, AttrDest, AttrDest2, AttrDestFG, AttrDestBG;
        LONG SrcPtr, DestPtr;
        WORD LockOld;

        if (Nx > BuffXMax) {
                Nx = BuffXMax;
        }
        if (ts.ScrollBuffMax > BuffYMax) {
                ts.ScrollBuffMax = BuffYMax;
        }
        if (Ny > ts.ScrollBuffMax) {
                Ny = ts.ScrollBuffMax;
        }

        if ( (LONG)Nx * (LONG)Ny > BuffSizeMax ) {
                Ny = BuffSizeMax / Nx;
        }

        NewSize = (LONG)Nx * (LONG)Ny;

        HCodeNew = NULL;
        HAttrNew = NULL;
        HAttr2New = NULL;
        HAttrFGNew = NULL;
        HAttrBGNew = NULL;

        if ((HCodeNew=GlobalAlloc(GMEM_MOVEABLE, NewSize)) == NULL || (CodeDest=GlobalLock(HCodeNew)) == NULL) {
                goto allocate_error;
        }
        if ((HAttrNew=GlobalAlloc(GMEM_MOVEABLE, NewSize)) == NULL || (AttrDest=GlobalLock(HAttrNew)) == NULL) {
                goto allocate_error;
        }
        if ((HAttr2New=GlobalAlloc(GMEM_MOVEABLE, NewSize)) == NULL || (AttrDest2=GlobalLock(HAttr2New)) == NULL) {
                goto allocate_error;
        }
        if ((HAttrFGNew=GlobalAlloc(GMEM_MOVEABLE, NewSize)) == NULL || (AttrDestFG=GlobalLock(HAttrFGNew)) == NULL) {
                goto allocate_error;
        }
        if ((HAttrBGNew=GlobalAlloc(GMEM_MOVEABLE, NewSize)) == NULL || (AttrDestBG=GlobalLock(HAttrBGNew)) == NULL) {
                goto allocate_error;
        }

        memset(&CodeDest[0], 0x20, NewSize);
        memset(&AttrDest[0], AttrDefault, NewSize);
        memset(&AttrDest2[0], AttrDefault, NewSize);
        memset(&AttrDestFG[0], AttrDefaultFG, NewSize);
        memset(&AttrDestBG[0], AttrDefaultBG, NewSize);
        if ( HCodeBuff!=0 ) {
                if ( NumOfColumns > Nx ) {
                        NxCopy = Nx;
                }
                else {
                        NxCopy = NumOfColumns;
                }

                if ( BuffEnd > Ny ) {
                        NyCopy = Ny;
                }
                else {
                        NyCopy = BuffEnd;
                }
                LockOld = BuffLock;
                LockBuffer();
                SrcPtr = GetLinePtr(BuffEnd-NyCopy);
                DestPtr = 0;
                for (i = 1 ; i <= NyCopy ; i++) {
                        memcpy(&CodeDest[DestPtr],&CodeBuff[SrcPtr],NxCopy);
                        memcpy(&AttrDest[DestPtr],&AttrBuff[SrcPtr],NxCopy);
                        memcpy(&AttrDest2[DestPtr],&AttrBuff2[SrcPtr],NxCopy);
                        memcpy(&AttrDestFG[DestPtr],&AttrBuffFG[SrcPtr],NxCopy);
                        memcpy(&AttrDestBG[DestPtr],&AttrBuffBG[SrcPtr],NxCopy);
                        if (AttrDest[DestPtr+NxCopy-1] & AttrKanji) {
                                CodeDest[DestPtr+NxCopy-1] = ' ';
                                AttrDest[DestPtr+NxCopy-1] ^= AttrKanji;
                        }
                        SrcPtr = NextLinePtr(SrcPtr);
                        DestPtr = DestPtr + (LONG)Nx;
                }
                FreeBuffer();
        }
        else {
                LockOld = 0;
                NyCopy = NumOfLines;
                Selected = FALSE;
        }

        if (Selected) {
                SelectStart.y = SelectStart.y - BuffEnd + NyCopy;
                SelectEnd.y = SelectEnd.y - BuffEnd + NyCopy;
                if (SelectStart.y < 0) {
                        SelectStart.y = 0;
                        SelectStart.x = 0;
                }
                if (SelectEnd.y<0) {
                        SelectEnd.x = 0;
                        SelectEnd.y = 0;
                }

                Selected = (SelectEnd.y > SelectStart.y) ||
                           ((SelectEnd.y=SelectStart.y) &&
                            (SelectEnd.x > SelectStart.x));
        }

        HCodeBuff = HCodeNew;
        HAttrBuff = HAttrNew;
        HAttrBuff2 = HAttr2New;
        HAttrBuffFG = HAttrFGNew;
        HAttrBuffBG = HAttrBGNew;
        BufferSize = NewSize;
        NumOfLinesInBuff = Ny;
        BuffStartAbs = 0;
        BuffEnd = NyCopy;

        if (BuffEnd==NumOfLinesInBuff) {
                BuffEndAbs = 0;
        }
        else {
                BuffEndAbs = BuffEnd;
        }

        PageStart = BuffEnd - NumOfLines;

        LinePtr = 0;
        if (LockOld>0) {
                CodeBuff = (PCHAR)GlobalLock(HCodeBuff);
                AttrBuff = (PCHAR)GlobalLock(HAttrBuff);
                AttrBuff2 = (PCHAR)GlobalLock(HAttrBuff2);
                AttrBuffFG = (PCHAR)GlobalLock(HAttrBuffFG);
                AttrBuffBG = (PCHAR)GlobalLock(HAttrBuffBG);
                CodeLine = CodeBuff;
                AttrLine = AttrBuff;
                AttrLine2 = AttrBuff2;
                AttrLineFG = AttrBuffFG;
                AttrLineBG = AttrBuffBG;
        }
        else {
                GlobalUnlock(HCodeNew);
                GlobalUnlock(HAttrNew);
                GlobalUnlock(HAttr2New);
                GlobalUnlock(HAttrFGNew);
                GlobalUnlock(HAttrBGNew);
        }
        BuffLock = LockOld;

        return TRUE;

allocate_error:
        if (CodeDest)   GlobalUnlock(HCodeNew);
        if (AttrDest)   GlobalUnlock(HAttrNew);
        if (AttrDest2)  GlobalUnlock(HAttr2New);
        if (AttrDestFG) GlobalUnlock(HAttrFGNew);
        if (AttrDestBG) GlobalUnlock(HAttrBGNew);
        if (HCodeNew)   GlobalFree(HCodeNew);
        if (HAttrNew)   GlobalFree(HAttrNew);
        if (HAttr2New)  GlobalFree(HAttr2New);
        if (HAttrFGNew) GlobalFree(HAttrFGNew);
        if (HAttrBGNew) GlobalFree(HAttrBGNew);
        return FALSE;
}

void InitBuffer()
{
        int Ny;

        /* setup terminal */
        NumOfColumns = ts.TerminalWidth;
        NumOfLines = ts.TerminalHeight;

        /* setup window */
        if (ts.EnableScrollBuff>0) {
                if (ts.ScrollBuffSize < NumOfLines) {
                        ts.ScrollBuffSize = NumOfLines;
                }
                Ny = ts.ScrollBuffSize;
        }
        else {
                Ny = NumOfLines;
        }

        if (! ChangeBuffer(NumOfColumns,Ny)) {
                PostQuitMessage(0);
        }

        if (ts.EnableScrollBuff>0) {
                ts.ScrollBuffSize = NumOfLinesInBuff;
        }

        StatusLine = 0;
}

void NewLine(int Line)
{
        LinePtr = GetLinePtr(Line);
        CodeLine = &CodeBuff[LinePtr];
        AttrLine = &AttrBuff[LinePtr];
        AttrLine2 = &AttrBuff2[LinePtr];
        AttrLineFG = &AttrBuffFG[LinePtr];
        AttrLineBG = &AttrBuffBG[LinePtr];
}

void LockBuffer()
{
        BuffLock++;
        if (BuffLock>1) {
                return;
        }
        CodeBuff = (PCHAR)GlobalLock(HCodeBuff);
        AttrBuff = (PCHAR)GlobalLock(HAttrBuff);
        AttrBuff2 = (PCHAR)GlobalLock(HAttrBuff2);
        AttrBuffFG = (PCHAR)GlobalLock(HAttrBuffFG);
        AttrBuffBG = (PCHAR)GlobalLock(HAttrBuffBG);
        NewLine(PageStart+CursorY);
}

void UnlockBuffer()
{
        if (BuffLock==0) {
                return;
        }
        BuffLock--;
        if (BuffLock>0) {
                return;
        }
        if (HCodeBuff!=NULL) {
                GlobalUnlock(HCodeBuff);
        }
        if (HAttrBuff!=NULL) {
                GlobalUnlock(HAttrBuff);
        }
        if (HAttrBuff2!=NULL) {
                GlobalUnlock(HAttrBuff2);
        }
        if (HAttrBuffFG!=NULL) {
                GlobalUnlock(HAttrBuffFG);
        }
        if (HAttrBuffBG!=NULL) {
                GlobalUnlock(HAttrBuffBG);
        }
}

void FreeBuffer()
{
        BuffLock = 1;
        UnlockBuffer();
        if (HCodeBuff!=NULL) {
                GlobalFree(HCodeBuff);
                HCodeBuff = NULL;
        }
        if (HAttrBuff!=NULL) {
                GlobalFree(HAttrBuff);
                HAttrBuff = NULL;
        }
        if (HAttrBuff2!=NULL) {
                GlobalFree(HAttrBuff2);
                HAttrBuff2 = NULL;
        }
        if (HAttrBuffFG!=NULL) {
                GlobalFree(HAttrBuffFG);
                HAttrBuffFG = NULL;
        }
        if (HAttrBuffBG!=NULL) {
                GlobalFree(HAttrBuffBG);
                HAttrBuffBG = NULL;
        }
}

void BuffAllSelect()
{
        SelectStart.x = 0;
        SelectStart.y = 0;
        SelectEnd.x = 0;
        SelectEnd.y = BuffEnd;
//      SelectEnd.x = NumOfColumns;
//      SelectEnd.y = BuffEnd - 1;
}

void BuffScreenSelect()
{
        int X, Y;
        DispConvWinToScreen(0, 0, &X, &Y, NULL);
        SelectStart.x = X;
        SelectStart.y = Y + PageStart;
        SelectEnd.x = 0;
        SelectEnd.y = SelectStart.y + NumOfLines;
//      SelectEnd.x = X + NumOfColumns;
//      SelectEnd.y = Y + PageStart + NumOfLines - 1;
}

void BuffCancelSelection()
{
        SelectStart.x = 0;
        SelectStart.y = 0;
        SelectEnd.x = 0;
        SelectEnd.y = 0;
}

void BuffReset()
// Reset buffer status. don't update real display
//   called by ResetTerminal()
{
        int i;

        /* Cursor */
        NewLine(PageStart);
        WinOrgX = 0;
        WinOrgY = 0;
        NewOrgX = 0;
        NewOrgY = 0;

        /* Top/bottom margin */
        CursorTop = 0;
        CursorBottom = NumOfLines-1;

        /* Tab stops */
        NTabStops = (NumOfColumns-1) >> 3;
        for (i=1 ; i<=NTabStops ; i++) {
                TabStops[i-1] = i*8;
        }

        /* Initialize text selection region */
        SelectStart.x = 0;
        SelectStart.y = 0;
        SelectEnd = SelectStart;
        SelectEndOld = SelectStart;
        Selected = FALSE;

        StrChangeCount = 0;
        Wrap = FALSE;
        StatusLine = 0;

        SeveralPageSelect = FALSE; // yutaka

        /* Alternate Screen Buffer */
        BuffDiscardSavedScreen();
}

void BuffScroll(int Count, int Bottom)
{
        int i, n;
        LONG SrcPtr, DestPtr;
        int BuffEndOld;

        if (Count>NumOfLinesInBuff) {
                Count = NumOfLinesInBuff;
        }

        DestPtr = GetLinePtr(PageStart+NumOfLines-1+Count);
        n = Count;
        if (Bottom<NumOfLines-1) {
                SrcPtr = GetLinePtr(PageStart+NumOfLines-1);
                for (i=NumOfLines-1; i>=Bottom+1; i--) {
                        memcpy(&(CodeBuff[DestPtr]),&(CodeBuff[SrcPtr]),NumOfColumns);
                        memcpy(&(AttrBuff[DestPtr]),&(AttrBuff[SrcPtr]),NumOfColumns);
                        memcpy(&(AttrBuff2[DestPtr]),&(AttrBuff2[SrcPtr]),NumOfColumns);
                        memcpy(&(AttrBuffFG[DestPtr]),&(AttrBuffFG[SrcPtr]),NumOfColumns);
                        memcpy(&(AttrBuffBG[DestPtr]),&(AttrBuffBG[SrcPtr]),NumOfColumns);
                        memset(&(CodeBuff[SrcPtr]),0x20,NumOfColumns);
                        memset(&(AttrBuff[SrcPtr]),AttrDefault,NumOfColumns);
                        memset(&(AttrBuff2[SrcPtr]),CurCharAttr.Attr2,NumOfColumns);
                        memset(&(AttrBuffFG[SrcPtr]),CurCharAttr.Fore,NumOfColumns);
                        memset(&(AttrBuffBG[SrcPtr]),CurCharAttr.Back,NumOfColumns);
                        SrcPtr = PrevLinePtr(SrcPtr);
                        DestPtr = PrevLinePtr(DestPtr);
                        n--;
                }
        }
        for (i = 1 ; i <= n ; i++) {
                memset(&CodeBuff[DestPtr],0x20,NumOfColumns);
                memset(&AttrBuff[DestPtr],AttrDefault,NumOfColumns);
                memset(&AttrBuff2[DestPtr],CurCharAttr.Attr2,NumOfColumns);
                memset(&AttrBuffFG[DestPtr],CurCharAttr.Fore,NumOfColumns);
                memset(&AttrBuffBG[DestPtr],CurCharAttr.Back,NumOfColumns);
                DestPtr = PrevLinePtr(DestPtr);
        }

        BuffEndAbs = BuffEndAbs + Count;
        if (BuffEndAbs >= NumOfLinesInBuff) {
                BuffEndAbs = BuffEndAbs - NumOfLinesInBuff;
        }
        BuffEndOld = BuffEnd;
        BuffEnd = BuffEnd + Count;
        if (BuffEnd >= NumOfLinesInBuff) {
                BuffEnd = NumOfLinesInBuff;
                BuffStartAbs = BuffEndAbs;
        }
        PageStart = BuffEnd-NumOfLines;

        if (Selected) {
                SelectStart.y = SelectStart.y - Count + BuffEnd - BuffEndOld;
                SelectEnd.y = SelectEnd.y - Count + BuffEnd - BuffEndOld;
                if ( SelectStart.y<0 ) {
                        SelectStart.x = 0;
                        SelectStart.y = 0;
                }
                if ( SelectEnd.y<0 ) {
                        SelectEnd.x = 0;
                        SelectEnd.y = 0;
                }
                Selected = (SelectEnd.y > SelectStart.y) ||
                       ((SelectEnd.y==SelectStart.y) &&
                        (SelectEnd.x > SelectStart.x));
        }

        NewLine(PageStart+CursorY);
}

void NextLine()
{
        LinePtr = NextLinePtr(LinePtr);
        CodeLine = &CodeBuff[LinePtr];
        AttrLine = &AttrBuff[LinePtr];
        AttrLine2 = &AttrBuff2[LinePtr];
        AttrLineFG = &AttrBuffFG[LinePtr];
        AttrLineBG = &AttrBuffBG[LinePtr];
}

void PrevLine()
{
        LinePtr = PrevLinePtr(LinePtr);
        CodeLine = &CodeBuff[LinePtr];
        AttrLine = &AttrBuff[LinePtr];
        AttrLine2 = &AttrBuff2[LinePtr];
        AttrLineFG = &AttrBuffFG[LinePtr];
        AttrLineBG = &AttrBuffBG[LinePtr];
}

void EraseKanji(int LR)
{
// If cursor is on left/right half of a Kanji, erase it.
//   LR: left(0)/right(1) flag

        if ((CursorX-LR>=0) &&
            ((AttrLine[CursorX-LR] & AttrKanji) != 0)) {
                CodeLine[CursorX-LR] = 0x20;
                AttrLine[CursorX-LR] = CurCharAttr.Attr;
                AttrLine2[CursorX-LR] = CurCharAttr.Attr2;
                AttrLineFG[CursorX-LR] = CurCharAttr.Fore;
                AttrLineBG[CursorX-LR] = CurCharAttr.Back;
                if (CursorX-LR+1 < NumOfColumns) {
                        CodeLine[CursorX-LR+1] = 0x20;
                        AttrLine[CursorX-LR+1] = CurCharAttr.Attr;
                        AttrLine2[CursorX-LR+1] = CurCharAttr.Attr2;
                        AttrLineFG[CursorX-LR+1] = CurCharAttr.Fore;
                        AttrLineBG[CursorX-LR+1] = CurCharAttr.Back;
                }
        }
}

void BuffInsertSpace(int Count)
// Insert space characters at the current position
//   Count: Number of characters to be inserted
{
        NewLine(PageStart+CursorY);

        if (ts.Language==IdJapanese || ts.Language==IdKorean || ts.Language==IdUtf8) {
                EraseKanji(1); /* if cursor is on right half of a kanji, erase the kanji */
        }

        if (Count > NumOfColumns - CursorX) {
                Count = NumOfColumns - CursorX;
        }

        memmove(&(CodeLine[CursorX+Count]),&(CodeLine[CursorX]),
                NumOfColumns-Count-CursorX);
        memmove(&(AttrLine[CursorX+Count]),&(AttrLine[CursorX]),
                NumOfColumns-Count-CursorX);
        memmove(&(AttrLine2[CursorX+Count]),&(AttrLine2[CursorX]),
                NumOfColumns-Count-CursorX);
        memmove(&(AttrLineFG[CursorX+Count]),&(AttrLineFG[CursorX]),
                NumOfColumns-Count-CursorX);
        memmove(&(AttrLineBG[CursorX+Count]),&(AttrLineBG[CursorX]),
                NumOfColumns-Count-CursorX);
        memset(&(CodeLine[CursorX]),0x20,Count);
        memset(&(AttrLine[CursorX]),AttrDefault,Count);
        memset(&(AttrLine2[CursorX]),CurCharAttr.Attr2,Count);
        memset(&(AttrLineFG[CursorX]),CurCharAttr.Fore,Count);
        memset(&(AttrLineBG[CursorX]),CurCharAttr.Back,Count);
        /* last char in current line is kanji first? */
        if ((AttrLine[NumOfColumns-1] & AttrKanji) != 0) {
                /* then delete it */
                CodeLine[NumOfColumns-1] = 0x20;
                AttrLine[NumOfColumns-1] = AttrDefault;
                AttrLine2[NumOfColumns-1] = CurCharAttr.Attr2;
                AttrLineFG[NumOfColumns-1] = CurCharAttr.Fore;
                AttrLineBG[NumOfColumns-1] = CurCharAttr.Back;
        }
        BuffUpdateRect(CursorX,CursorY,NumOfColumns-1,CursorY);
}

void BuffEraseCurToEnd()
// Erase characters from cursor to the end of screen
{
        LONG TmpPtr;
        int offset;
        int i, YEnd;

        NewLine(PageStart+CursorY);
        if (ts.Language==IdJapanese || ts.Language==IdKorean || ts.Language==IdUtf8) {
                EraseKanji(1); /* if cursor is on right half of a kanji, erase the kanji */
        }
        offset = CursorX;
        TmpPtr = GetLinePtr(PageStart+CursorY);
        YEnd = NumOfLines-1;
        if ((StatusLine>0) &&
                (CursorY<NumOfLines-1)) {
                YEnd--;
        }
        for (i = CursorY ; i <= YEnd ; i++) {
                memset(&(CodeBuff[TmpPtr+offset]),0x20,NumOfColumns-offset);
                memset(&(AttrBuff[TmpPtr+offset]),AttrDefault,NumOfColumns-offset);
                memset(&(AttrBuff2[TmpPtr+offset]),CurCharAttr.Attr2,NumOfColumns-offset);
                memset(&(AttrBuffFG[TmpPtr+offset]),CurCharAttr.Fore,NumOfColumns-offset);
                memset(&(AttrBuffBG[TmpPtr+offset]),CurCharAttr.Back,NumOfColumns-offset);
                offset = 0;
                TmpPtr = NextLinePtr(TmpPtr);
        }
        /* update window */
        DispEraseCurToEnd(YEnd);
}

void BuffEraseHomeToCur()
// Erase characters from home to cursor
{
        LONG TmpPtr;
        int offset;
        int i, YHome;

        NewLine(PageStart+CursorY);
        if (ts.Language==IdJapanese || ts.Language==IdKorean || ts.Language==IdUtf8) {
                EraseKanji(0); /* if cursor is on left half of a kanji, erase the kanji */
        }
        offset = NumOfColumns;
        if ((StatusLine>0) && (CursorY==NumOfLines-1)) {
                YHome = CursorY;
        }
        else {
                YHome = 0;
        }
        TmpPtr = GetLinePtr(PageStart+YHome);
        for (i = YHome ; i <= CursorY ; i++) {
                if (i==CursorY) {
                        offset = CursorX+1;
                }
                memset(&(CodeBuff[TmpPtr]),0x20,offset);
                memset(&(AttrBuff[TmpPtr]),AttrDefault,offset);
                memset(&(AttrBuff2[TmpPtr]),CurCharAttr.Attr2,offset);
                memset(&(AttrBuffFG[TmpPtr]),CurCharAttr.Fore,offset);
                memset(&(AttrBuffBG[TmpPtr]),CurCharAttr.Back,offset);
                TmpPtr = NextLinePtr(TmpPtr);
        }

        /* update window */
        DispEraseHomeToCur(YHome);
}

void BuffInsertLines(int Count, int YEnd)
// Insert lines at current position
//   Count: number of lines to be inserted
//   YEnd: bottom line number of scroll region (screen coordinate)
{
        int i;
        LONG SrcPtr, DestPtr;

        BuffUpdateScroll();

        SrcPtr = GetLinePtr(PageStart+YEnd-Count);
        DestPtr = GetLinePtr(PageStart+YEnd);
        for (i= YEnd-Count ; i>=CursorY ; i--) {
                memcpy(&(CodeBuff[DestPtr]),&(CodeBuff[SrcPtr]),NumOfColumns);
                memcpy(&(AttrBuff[DestPtr]),&(AttrBuff[SrcPtr]),NumOfColumns);
                memcpy(&(AttrBuff2[DestPtr]),&(AttrBuff2[SrcPtr]),NumOfColumns);
                memcpy(&(AttrBuffFG[DestPtr]),&(AttrBuffFG[SrcPtr]),NumOfColumns);
                memcpy(&(AttrBuffBG[DestPtr]),&(AttrBuffBG[SrcPtr]),NumOfColumns);
                SrcPtr = PrevLinePtr(SrcPtr);
                DestPtr = PrevLinePtr(DestPtr);
        }
        for (i = 1 ; i <= Count ; i++) {
                memset(&(CodeBuff[DestPtr]),0x20,NumOfColumns);
                memset(&(AttrBuff[DestPtr]),AttrDefault,NumOfColumns);
                memset(&(AttrBuff2[DestPtr]),CurCharAttr.Attr2,NumOfColumns);
                memset(&(AttrBuffFG[DestPtr]),CurCharAttr.Fore,NumOfColumns);
                memset(&(AttrBuffBG[DestPtr]),CurCharAttr.Back,NumOfColumns);
                DestPtr = PrevLinePtr(DestPtr);
        }

        if (! DispInsertLines(Count,YEnd)) {
                BuffUpdateRect(WinOrgX,CursorY,WinOrgX+WinWidth-1,YEnd);
        }
}

void BuffEraseCharsInLine(int XStart, int Count)
// erase characters in the current line
//  XStart: start position of erasing
//  Count: number of characters to be erased
{
#ifndef NO_COPYLINE_FIX
        BOOL LineContinued=FALSE;

        if (ts.EnableContinuedLineCopy && XStart == 0 && (AttrLine[0] & AttrLineContinued)) {
                LineContinued = TRUE;
        }
#endif /* NO_COPYLINE_FIX */

        if (ts.Language==IdJapanese || ts.Language==IdKorean || ts.Language==IdUtf8) {
                EraseKanji(1); /* if cursor is on right half of a kanji, erase the kanji */
        }

        NewLine(PageStart+CursorY);
        memset(&(CodeLine[XStart]),0x20,Count);
        memset(&(AttrLine[XStart]),AttrDefault,Count);
        memset(&(AttrLine2[XStart]),CurCharAttr.Attr2,Count);
        memset(&(AttrLineFG[XStart]),CurCharAttr.Fore,Count);
        memset(&(AttrLineBG[XStart]),CurCharAttr.Back,Count);

#ifndef NO_COPYLINE_FIX
        if (ts.EnableContinuedLineCopy) {
                if (LineContinued) {
                        BuffLineContinued(TRUE);
                }

                if (XStart + Count >= NumOfColumns) {
                        AttrBuff[NextLinePtr(LinePtr)] &= ~AttrLineContinued;
                }
        }
#endif /* NO_COPYLINE_FIX */

        DispEraseCharsInLine(XStart, Count);
}

void BuffDeleteLines(int Count, int YEnd)
// Delete lines from current line
//   Count: number of lines to be deleted
//   YEnd: bottom line number of scroll region (screen coordinate)
{
        int i;
        LONG SrcPtr, DestPtr;

        BuffUpdateScroll();

        SrcPtr = GetLinePtr(PageStart+CursorY+Count);
        DestPtr = GetLinePtr(PageStart+CursorY);
        for (i=CursorY ; i<= YEnd-Count ; i++) {
                memcpy(&(CodeBuff[DestPtr]),&(CodeBuff[SrcPtr]),NumOfColumns);
                memcpy(&(AttrBuff[DestPtr]),&(AttrBuff[SrcPtr]),NumOfColumns);
                memcpy(&(AttrBuff2[DestPtr]),&(AttrBuff2[SrcPtr]),NumOfColumns);
                memcpy(&(AttrBuffFG[DestPtr]),&(AttrBuffFG[SrcPtr]),NumOfColumns);
                memcpy(&(AttrBuffBG[DestPtr]),&(AttrBuffBG[SrcPtr]),NumOfColumns);
                SrcPtr = NextLinePtr(SrcPtr);
                DestPtr = NextLinePtr(DestPtr);
        }
        for (i = YEnd+1-Count ; i<=YEnd ; i++) {
                memset(&(CodeBuff[DestPtr]),0x20,NumOfColumns);
                memset(&(AttrBuff[DestPtr]),AttrDefault,NumOfColumns);
                memset(&(AttrBuff2[DestPtr]),CurCharAttr.Attr2,NumOfColumns);
                memset(&(AttrBuffFG[DestPtr]),CurCharAttr.Fore,NumOfColumns);
                memset(&(AttrBuffBG[DestPtr]),CurCharAttr.Back,NumOfColumns);
                DestPtr = NextLinePtr(DestPtr);
        }

        if (! DispDeleteLines(Count,YEnd)) {
                BuffUpdateRect(WinOrgX,CursorY,WinOrgX+WinWidth-1,YEnd);
        }
}

void BuffDeleteChars(int Count)
// Delete characters in current line from cursor
//   Count: number of characters to be deleted
{
        NewLine(PageStart+CursorY);

        if (ts.Language==IdJapanese || ts.Language==IdKorean || ts.Language==IdUtf8) {
                EraseKanji(0); /* if cursor is on left harf of a kanji, erase the kanji */
                EraseKanji(1); /* if cursor on right half... */
        }

        if (Count > NumOfColumns-CursorX) {
                Count = NumOfColumns-CursorX;
        }
        memmove(&(CodeLine[CursorX]),&(CodeLine[CursorX+Count]),
                NumOfColumns-Count-CursorX);
        memmove(&(AttrLine[CursorX]),&(AttrLine[CursorX+Count]),
                NumOfColumns-Count-CursorX);
        memmove(&(AttrLine2[CursorX]),&(AttrLine2[CursorX+Count]),
                NumOfColumns-Count-CursorX);
        memmove(&(AttrLineFG[CursorX]),&(AttrLineFG[CursorX+Count]),
                NumOfColumns-Count-CursorX);
        memmove(&(AttrLineBG[CursorX]),&(AttrLineBG[CursorX+Count]),
                NumOfColumns-Count-CursorX);
        memset(&(CodeLine[NumOfColumns-Count]),0x20,Count);
        memset(&(AttrLine[NumOfColumns-Count]),AttrDefault,Count);
        memset(&(AttrLine2[NumOfColumns-Count]),CurCharAttr.Attr2,Count);
        memset(&(AttrLineFG[NumOfColumns-Count]),CurCharAttr.Fore,Count);
        memset(&(AttrLineBG[NumOfColumns-Count]),CurCharAttr.Back,Count);

        BuffUpdateRect(CursorX,CursorY,WinOrgX+WinWidth-1,CursorY);
}

void BuffEraseChars(int Count)
// Erase characters in current line from cursor
//   Count: number of characters to be deleted
{
        NewLine(PageStart+CursorY);

        if (ts.Language==IdJapanese || ts.Language==IdKorean || ts.Language==IdUtf8) {
                EraseKanji(0); /* if cursor is on left harf of a kanji, erase the kanji */
                EraseKanji(1); /* if cursor on right half... */
        }

        if (Count > NumOfColumns-CursorX) {
                Count = NumOfColumns-CursorX;
        }
        memset(&(CodeLine[CursorX]),0x20,Count);
        memset(&(AttrLine[CursorX]),AttrDefault,Count);
        memset(&(AttrLine2[CursorX]),CurCharAttr.Attr2,Count);
        memset(&(AttrLineFG[CursorX]),CurCharAttr.Fore,Count);
        memset(&(AttrLineBG[CursorX]),CurCharAttr.Back,Count);

        /* update window */
        DispEraseCharsInLine(CursorX,Count);
}

void BuffFillWithE()
// Fill screen with 'E' characters
{
        LONG TmpPtr;
        int i;

        TmpPtr = GetLinePtr(PageStart);
        for (i = 0 ; i <= NumOfLines-1-StatusLine ; i++) {
                memset(&(CodeBuff[TmpPtr]),'E',NumOfColumns);
                memset(&(AttrBuff[TmpPtr]),AttrDefault,NumOfColumns);
                memset(&(AttrBuff2[TmpPtr]),AttrDefault,NumOfColumns);
                memset(&(AttrBuffFG[TmpPtr]),AttrDefaultFG,NumOfColumns);
                memset(&(AttrBuffBG[TmpPtr]),AttrDefaultBG,NumOfColumns);
                TmpPtr = NextLinePtr(TmpPtr);
        }
        BuffUpdateRect(WinOrgX,WinOrgY,WinOrgX+WinWidth-1,WinOrgY+WinHeight-1);
}

void BuffDrawLine(TCharAttr Attr, int Direction, int C)
{ // IO-8256 terminal
        LONG Ptr;
        int i, X, Y;

        if (C==0) {
                return;
        }
        Attr.Attr |= AttrSpecial;

        switch (Direction) {
                case 3:
                case 4:
                        if (Direction==3) {
                                if (CursorY==0) {
                                        return;
                                }
                                Y = CursorY-1;
                        }
                        else {
                                if (CursorY==NumOfLines-1-StatusLine) {
                                        return;
                                }
                                Y = CursorY+1;
                        }
                        if (CursorX+C > NumOfColumns) {
                                C = NumOfColumns-CursorX;
                        }
                        Ptr = GetLinePtr(PageStart+Y);
                        memset(&(CodeBuff[Ptr+CursorX]),'q',C);
                        memset(&(AttrBuff[Ptr+CursorX]),Attr.Attr,C);
                        memset(&(AttrBuff2[Ptr+CursorX]),Attr.Attr2,C);
                        memset(&(AttrBuffFG[Ptr+CursorX]),Attr.Fore,C);
                        memset(&(AttrBuffBG[Ptr+CursorX]),Attr.Back,C);
                        BuffUpdateRect(CursorX,Y,CursorX+C-1,Y);
                        break;
                case 5:
                case 6:
                        if (Direction==5) {
                                if (CursorX==0) {
                                        return;
                                }
                                X = CursorX - 1;
                        }
                        else {
                                if (CursorX==NumOfColumns-1) {
                                        X = CursorX-1;
                                }
                                else {
                                        X = CursorX+1;
                                }
                        }
                        Ptr = GetLinePtr(PageStart+CursorY);
                        if (CursorY+C > NumOfLines-StatusLine) {
                                C = NumOfLines-StatusLine-CursorY;
                        }
                        for (i=1; i<=C; i++) {
                                CodeBuff[Ptr+X] = 'x';
                                AttrBuff[Ptr+X] = Attr.Attr;
                                AttrBuff2[Ptr+X] = Attr.Attr2;
                                AttrBuffFG[Ptr+X] = Attr.Fore;
                                AttrBuffBG[Ptr+X] = Attr.Back;
                                Ptr = NextLinePtr(Ptr);
                        }
                        BuffUpdateRect(X,CursorY,X,CursorY+C-1);
                        break;
        }
}

void BuffEraseBox
  (int XStart, int YStart, int XEnd, int YEnd)
// IO-8256 terminal
{
        int C, i;
        LONG Ptr;

        if (XEnd>NumOfColumns-1) {
                XEnd = NumOfColumns-1;
        }
        if (YEnd>NumOfLines-1-StatusLine) {
                YEnd = NumOfLines-1-StatusLine;
        }
        if (XStart>XEnd) {
                return;
        }
        if (YStart>YEnd) {
                return;
        }
        C = XEnd-XStart+1;
        Ptr = GetLinePtr(PageStart+YStart);
        for (i=YStart; i<=YEnd; i++) {
                if ((XStart>0) &&
                    ((AttrBuff[Ptr+XStart-1] & AttrKanji) != 0)) {
                        CodeBuff[Ptr+XStart-1] = 0x20;
                        AttrBuff[Ptr+XStart-1] = CurCharAttr.Attr;
                        AttrBuff2[Ptr+XStart-1] = CurCharAttr.Attr2;
                        AttrBuffFG[Ptr+XStart-1] = CurCharAttr.Fore;
                        AttrBuffBG[Ptr+XStart-1] = CurCharAttr.Back;
                }
                if ((XStart+C<NumOfColumns) &&
                    ((AttrBuff[Ptr+XStart+C-1] & AttrKanji) != 0)) {
                        CodeBuff[Ptr+XStart+C] = 0x20;
                        AttrBuff[Ptr+XStart+C] = CurCharAttr.Attr;
                        AttrBuff2[Ptr+XStart+C] = CurCharAttr.Attr2;
                        AttrBuffFG[Ptr+XStart+C] = CurCharAttr.Fore;
                        AttrBuffBG[Ptr+XStart+C] = CurCharAttr.Back;
                }
                memset(&(CodeBuff[Ptr+XStart]),0x20,C);
                memset(&(AttrBuff[Ptr+XStart]),AttrDefault,C);
                memset(&(AttrBuff2[Ptr+XStart]),CurCharAttr.Attr2,C);
                memset(&(AttrBuffFG[Ptr+XStart]),CurCharAttr.Fore,C);
                memset(&(AttrBuffBG[Ptr+XStart]),CurCharAttr.Back,C);
                Ptr = NextLinePtr(Ptr);
        }
        BuffUpdateRect(XStart,YStart,XEnd,YEnd);
}

int LeftHalfOfDBCS(LONG Line, int CharPtr)
// If CharPtr is on the right half of a DBCS character,
// return pointer to the left half
//   Line: points to a line in CodeBuff
//   CharPtr: points to a char
//   return: points to the left half of the DBCS
{
        if ((CharPtr>0) &&
                ((AttrBuff[Line+CharPtr-1] & AttrKanji) != 0)) {
                CharPtr--;
        }
        return CharPtr;
}

int MoveCharPtr(LONG Line, int *x, int dx)
// move character pointer x by dx character unit
//   in the line specified by Line
//   Line: points to a line in CodeBuff
//   x: points to a character in the line
//   dx: moving distance in character unit (-: left, +: right)
//      One DBCS character is counted as one character.
//      The pointer stops at the beginning or the end of line.
// Output
//   x: new pointer. x points to a SBCS character or
//      the left half of a DBCS character.
//   return: actual moving distance in character unit
{
        int i;

        *x = LeftHalfOfDBCS(Line,*x);
        i = 0;
        while (dx!=0) {
                if (dx>0) { // move right
                        if ((AttrBuff[Line+*x] & AttrKanji) != 0) {
                                if (*x<NumOfColumns-2) {
                                        i++;
                                        *x = *x + 2;
                                }
                        }
                        else if (*x<NumOfColumns-1) {
                                i++;
                                (*x)++;
                        }
                        dx--;
                }
                else { // move left
                        if (*x>0) {
                                i--;
                                (*x)--;
                        }
                        *x = LeftHalfOfDBCS(Line,*x);
                        dx++;
                }
        }
        return i;
}

void BuffCBCopy(BOOL Table)
// copy selected text to clipboard
{
        LONG MemSize;
        PCHAR CBPtr;
        LONG TmpPtr;
        int i, j, k, IStart, IEnd;
        BOOL Sp, FirstChar;
        BYTE b;
#ifndef NO_COPYLINE_FIX
        BOOL LineContinued, PrevLineContinued;
        LineContinued = FALSE;
#endif /* NO_COPYLINE_FIX */

        if (TalkStatus==IdTalkCB) {
                return;
        }
        if (! Selected) {
                return;
        }

// --- open clipboard and get CB memory
        if (BoxSelect) {
                MemSize = (SelectEnd.x-SelectStart.x+3)*
                          (SelectEnd.y-SelectStart.y+1) + 1;
        }
        else {
                MemSize = (SelectEnd.y-SelectStart.y)*
                          (NumOfColumns+2) +
                          SelectEnd.x - SelectStart.x + 1;
        }
        CBPtr = CBOpen(MemSize);
        if (CBPtr==NULL) {
                return;
        }

// --- copy selected text to CB memory
        LockBuffer();

        CBPtr[0] = 0;
        TmpPtr = GetLinePtr(SelectStart.y);
        k = 0;
        for (j = SelectStart.y ; j<=SelectEnd.y ; j++) {
                if (BoxSelect) {
                        IStart = SelectStart.x;
                        IEnd = SelectEnd.x-1;
                }
                else {
                        IStart = 0;
                        IEnd = NumOfColumns-1;
                        if (j==SelectStart.y) {
                                IStart = SelectStart.x;
                        }
                        if (j==SelectEnd.y) {
                                IEnd = SelectEnd.x-1;
                        }
                }
                i = LeftHalfOfDBCS(TmpPtr,IStart);
                if (i!=IStart) {
                        if (j==SelectStart.y) {
                                IStart = i;
                        }
                        else {
                                IStart = i + 2;
                        }
                }

                // exclude right-side space characters
                IEnd = LeftHalfOfDBCS(TmpPtr,IEnd);
#ifndef NO_COPYLINE_FIX
                PrevLineContinued = LineContinued;
                LineContinued = FALSE;
                if (ts.EnableContinuedLineCopy && j!=SelectEnd.y && !BoxSelect) {
                        LONG NextTmpPtr = NextLinePtr(TmpPtr);
                        if ((AttrBuff[NextTmpPtr] & AttrLineContinued) != 0) {
                                LineContinued = TRUE;
                        }
                        if (IEnd == NumOfColumns-1 &&
                                (AttrBuff[TmpPtr + IEnd] & AttrLineContinued) != 0) {
                                MoveCharPtr(TmpPtr,&IEnd,-1);
                        }
                }
                if (!LineContinued)
#endif /* NO_COPYLINE_FIX */
                        while ((IEnd>0) && (CodeBuff[TmpPtr+IEnd]==0x20)) {
                                MoveCharPtr(TmpPtr,&IEnd,-1);
                        }
                if ((IEnd==0) && (CodeBuff[TmpPtr]==0x20)) {
                        IEnd = -1;
                }
                else if ((AttrBuff[TmpPtr+IEnd] & AttrKanji) != 0) { /* DBCS first byte? */
                        IEnd++;
                }

                Sp = FALSE;
                FirstChar = TRUE;
                i = IStart;
                while (i <= IEnd) {
                        b = CodeBuff[TmpPtr+i];
                        i++;
                        if (! Sp) {
                                if ((Table) && (b<=0x20)) {
                                        Sp = TRUE;
                                        b = 0x09;
                                }
#ifndef NO_COPYLINE_FIX
                                if ((b!=0x09) || (! FirstChar) || PrevLineContinued) {
#else
                                if ((b!=0x09) || (! FirstChar)) {
#endif
                                        FirstChar = FALSE;
                                        CBPtr[k] = b;
                                        k++;
                                }
                        }
                        else {
                                if (b>0x20) {
                                        Sp = FALSE;
                                        FirstChar = FALSE;
                                        CBPtr[k] = b;
                                        k++;
                                }
                        }
                }

#ifndef NO_COPYLINE_FIX
                if (!LineContinued)
#endif /* NO_COPYLINE_FIX */
                        if (j < SelectEnd.y) {
                                CBPtr[k] = 0x0d;
                                k++;
                                CBPtr[k] = 0x0a;
                                k++;
                        }

                TmpPtr = NextLinePtr(TmpPtr);
        }
        CBPtr[k] = 0;
#ifndef NO_COPYLINE_FIX
        LineContinued = FALSE;
        if (ts.EnableContinuedLineCopy && j!=SelectEnd.y && !BoxSelect && j<BuffEnd-1) {
                LONG NextTmpPtr = NextLinePtr(TmpPtr);
                if ((AttrBuff[NextTmpPtr] & AttrLineContinued) != 0) {
                        LineContinued = TRUE;
                }
                if (IEnd == NumOfColumns-1 &&
                        (AttrBuff[TmpPtr + IEnd] & AttrLineContinued) != 0) {
                        MoveCharPtr(TmpPtr,&IEnd,-1);
                }
        }
        if (!LineContinued)
#endif /* NO_COPYLINE_FIX */
                UnlockBuffer();

// --- send CB memory to clipboard
        CBClose();
        return;
}

void BuffPrint(BOOL ScrollRegion)
// Print screen or selected text
{
        int Id;
        POINT PrintStart, PrintEnd;
        TCharAttr CurAttr, TempAttr;
        int i, j, count;
        int IStart, IEnd;
        LONG TmpPtr;

        TempAttr = DefCharAttr;

        if (ScrollRegion) {
                Id = VTPrintInit(IdPrnScrollRegion);
        }
        else if (Selected) {
                Id = VTPrintInit(IdPrnScreen | IdPrnSelectedText);
        }
        else {
                Id = VTPrintInit(IdPrnScreen);
        }
        if (Id==IdPrnCancel) {
                return;
        }

        /* set print region */
        if (Id==IdPrnSelectedText) {
                /* print selected region */
                PrintStart = SelectStart;
                PrintEnd = SelectEnd;
        }
        else if (Id==IdPrnScrollRegion) {
                /* print scroll region */
                PrintStart.x = 0;
                PrintStart.y = PageStart + CursorTop;
                PrintEnd.x = NumOfColumns;
                PrintEnd.y = PageStart + CursorBottom;
        }
        else {
                /* print current screen */
                PrintStart.x = 0;
                PrintStart.y = PageStart;
                PrintEnd.x = NumOfColumns;
                PrintEnd.y = PageStart + NumOfLines - 1;
        }
        if (PrintEnd.y > BuffEnd-1) {
                PrintEnd.y = BuffEnd-1;
        }

        LockBuffer();

        TmpPtr = GetLinePtr(PrintStart.y);
        for (j = PrintStart.y ; j <= PrintEnd.y ; j++) {
                if (j==PrintStart.y) {
                        IStart = PrintStart.x;
                }
                else {
                        IStart = 0;
                }
                if (j == PrintEnd.y) {
                        IEnd = PrintEnd.x - 1;
                }
                else {
                        IEnd = NumOfColumns - 1;
                }

                while ((IEnd>=IStart) &&
                       (CodeBuff[TmpPtr+IEnd]==0x20) &&
                       (AttrBuff[TmpPtr+IEnd]==AttrDefault) &&
                       (AttrBuff2[TmpPtr+IEnd]==AttrDefault)) {
                        IEnd--;
                }

                i = IStart;
                while (i <= IEnd) {
                        CurAttr.Attr = AttrBuff[TmpPtr+i] & ~ AttrKanji;
                        CurAttr.Attr2 = AttrBuff2[TmpPtr+i];
                        CurAttr.Fore = AttrBuffFG[TmpPtr+i];
                        CurAttr.Back = AttrBuffBG[TmpPtr+i];

                        count = 1;
                        while ((i+count <= IEnd) &&
                               (CurAttr.Attr == (AttrBuff[TmpPtr+i+count] & ~ AttrKanji)) &&
                               (CurAttr.Attr2 == AttrBuff2[TmpPtr+i+count]) &&
                               (CurAttr.Fore == AttrBuffFG[TmpPtr+i+count]) &&
                               (CurAttr.Back == AttrBuffBG[TmpPtr+i+count]) ||
                               (i+count<NumOfColumns) &&
                               ((AttrBuff[TmpPtr+i+count-1] & AttrKanji) != 0)) {
                                count++;
                        }

                        if (TCharAttrCmp(CurAttr, TempAttr) != 0) {
                                PrnSetAttr(CurAttr);
                                TempAttr = CurAttr;
                        }
                        PrnOutText(&(CodeBuff[TmpPtr+i]),count);
                        i = i+count;
                }
                PrnNewLine();
                TmpPtr = NextLinePtr(TmpPtr);
        }

        UnlockBuffer();
        VTPrintEnd();
}

void BuffDumpCurrentLine(BYTE TERM)
// Dumps current line to the file (for path through printing)
//   HFile: file handle
//   TERM: terminator character
//      = LF or VT or FF
{
        int i, j;

        i = NumOfColumns;
        while ((i>0) && (CodeLine[i-1]==0x20)) {
                i--;
        }
        for (j=0; j<i; j++) {
                WriteToPrnFile(CodeLine[j],FALSE);
        }
        WriteToPrnFile(0,TRUE);
        if ((TERM>=LF) && (TERM<=FF)) {
                WriteToPrnFile(0x0d,FALSE);
                WriteToPrnFile(TERM,TRUE);
        }
}


/* begin - ishizaki */
static void markURL(int x)
{
#ifdef URL_EMPHASIS
        // RFC3986(Uniform Resource Identifier (URI): Generic Syntax)に準拠する
        // by sakura editor 1.5.2.1: etc_uty.cpp
        static const char       url_char[] = {
          /* +0  +1  +2  +3  +4  +5  +6  +7  +8  +9  +A  +B  +C  +D  +E  +F */
                  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,        /* +00: */
                  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,        /* +10: */
                  0, -1,  0, -1, -1, -1, -1,  0,  0,  0,  0, -1, -1, -1, -1, -1,        /* +20: " !"#$%&'()*+,-./" */
                 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,  0, -1,  0, -1,        /* +30: "0123456789:;<=>?" */
                 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,        /* +40: "@ABCDEFGHIJKLMNO" */
                 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,  0, -1,  0,  0, -1,        /* +50: "PQRSTUVWXYZ[\]^_" */
                  0, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,        /* +60: "`abcdefghijklmno" */
                 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,  0,  0,  0, -1,  0,        /* +70: "pqrstuvwxyz{|}~ " */
                /* 0    : not url char
                 * -1   : url char
                 * other: url head char --> url_table array number + 1
                 */
        };
        static char *prefix[] = {
                "https://",
                "http://",
                "sftp://",
                "tftp://",
                "news://",
                "ftp://",
                "mms://",
                NULL
        };
        unsigned char ch = CodeLine[x];

        if (ts.EnableClickableUrl == FALSE && 
                (ts.ColorFlag & CF_URLCOLOR) == 0)
                return;

        // 直前の行から連結しているか。
        // TODO: 1つ前の行の終端文字が URL の一部なら、強制的に現在の行頭文字もURLの一部とみなす。
        // (2005.4.3 yutaka)
        if (x == 0) {
                if (AttrLine > AttrBuff && (AttrLine[x-1] & AttrURL)) {
                        if (!(ch & 0x80 || url_char[ch]==0)) { // かつURL構成文字なら
                                AttrLine[x] |= AttrURL; 
                        }
                }
                return;
        }

        if ((x-1>=0) && (AttrLine[x-1] & AttrURL) &&
                !(ch & 0x80 || url_char[ch]==0)) {
//              !((CodeLine[x] <= ' ') && !(AttrLine[x] & AttrKanji))) {
                        AttrLine[x] |= AttrURL; 
                return;
        }

        if ((x-2>=0) && !strncmp(&CodeLine[x-2], "://", 3)) {
                int i, len = -1;
                RECT rc;
                int CaretX, CaretY;
                char **p = prefix;

                while (*p) {
                        len = strlen(*p) - 1;
                        if ((x-len>=0) && !strncmp(&CodeLine[x-len], *p, len)) {
                                for (i = 0; i <= len; i++) {
                                        AttrLine[x-i] |= AttrURL; 
                                }
                                break;
                        }
                        p++;
                }

                /* ハイパーリンクの色属性変更は、すでに画面へ出力後に、バッファを遡って URL 属性を
                 * 付け直すというロジックであるため、色が正しく描画されない場合がある。
                 * 少々強引だが、ハイパーリンクを発見したタイミングで、その行に再描画指示を出すことで、
                 * リアルタイムな色描画を実現する。
                 * (2009.8.26 yutaka)
                 */
                CaretX = (0-WinOrgX)*FontWidth;
                CaretY = (CursorY-WinOrgY)*FontHeight;
                rc.left = CaretX;
                rc.top = CaretY;
                rc.right = CaretX + NumOfColumns * FontWidth;
                rc.bottom = CaretY + FontHeight;
                InvalidateRect(HVTWin, &rc, FALSE);
        }
#endif
}
/* end - ishizaki */

void BuffPutChar(BYTE b, TCharAttr Attr, BOOL Insert)
// Put a character in the buffer at the current position
//   b: character
//   Attr: attributes
//   Insert: Insert flag
{
        int XStart;

#ifndef NO_COPYLINE_FIX
        if (ts.EnableContinuedLineCopy && CursorX == 0 && (AttrLine[0] & AttrLineContinued)) {
                Attr.Attr |= AttrLineContinued;
        }
#endif /* NO_COPYLINE_FIX */

        if (ts.Language==IdJapanese || ts.Language==IdKorean || ts.Language==IdUtf8) {
                EraseKanji(1); /* if cursor is on right half of a kanji, erase the kanji */
                if (! Insert) {
                        EraseKanji(0); /* if cursor on left half... */
                }
        }

        if (Insert) {
                memmove(&CodeLine[CursorX+1],&CodeLine[CursorX],NumOfColumns-1-CursorX);
                memmove(&AttrLine[CursorX+1],&AttrLine[CursorX],NumOfColumns-1-CursorX);
                memmove(&AttrLine2[CursorX+1],&AttrLine2[CursorX],NumOfColumns-1-CursorX);
                memmove(&AttrLineFG[CursorX+1],&AttrLineFG[CursorX],NumOfColumns-1-CursorX);
                memmove(&AttrLineBG[CursorX+1],&AttrLineBG[CursorX],NumOfColumns-1-CursorX);
                CodeLine[CursorX] = b;
                AttrLine[CursorX] = Attr.Attr;
                AttrLine2[CursorX] = Attr.Attr2;
                AttrLineFG[CursorX] = Attr.Fore;
                AttrLineBG[CursorX] = Attr.Back;
                /* last char in current line is kanji first? */
                if ((AttrLine[NumOfColumns-1] & AttrKanji) != 0) {
                        /* then delete it */
                        CodeLine[NumOfColumns-1] = 0x20;
                        AttrLine[NumOfColumns-1] = CurCharAttr.Attr;
                        AttrLine2[NumOfColumns-1] = CurCharAttr.Attr2;
                        AttrLineFG[NumOfColumns-1] = CurCharAttr.Fore;
                        AttrLineBG[NumOfColumns-1] = CurCharAttr.Back;
                }
                /* begin - ishizaki */
                markURL(CursorX+1);
                markURL(CursorX);
                /* end - ishizaki */

                if (StrChangeCount==0) {
                        XStart = CursorX;
                }
                else {
                        XStart = StrChangeStart;
                }
                StrChangeCount = 0;
                BuffUpdateRect(XStart,CursorY,NumOfColumns-1,CursorY);
        }
        else {
                CodeLine[CursorX] = b;
                AttrLine[CursorX] = Attr.Attr;
                AttrLine2[CursorX] = Attr.Attr2;
                AttrLineFG[CursorX] = Attr.Fore;
                AttrLineBG[CursorX] = Attr.Back;
                /* begin - ishizaki */
                markURL(CursorX);
                /* end - ishizaki */

                if (StrChangeCount==0) {
                        StrChangeStart = CursorX;
                }
                StrChangeCount++;
        }
}

void BuffPutKanji(WORD w, TCharAttr Attr, BOOL Insert)
// Put a kanji character in the buffer at the current position
//   b: character
//   Attr: attributes
//   Insert: Insert flag
{
        int XStart;

#ifndef NO_COPYLINE_FIX
        if (ts.EnableContinuedLineCopy && CursorX == 0 && (AttrLine[0] & AttrLineContinued)) {
                Attr.Attr |= AttrLineContinued;
        }
#endif /* NO_COPYLINE_FIX */

        EraseKanji(1); /* if cursor is on right half of a kanji, erase the kanji */

        if (Insert) {
                memmove(&CodeLine[CursorX+2],&CodeLine[CursorX],NumOfColumns-2-CursorX);
                memmove(&AttrLine[CursorX+2],&AttrLine[CursorX],NumOfColumns-2-CursorX);
                memmove(&AttrLine2[CursorX+2],&AttrLine2[CursorX],NumOfColumns-2-CursorX);
                memmove(&AttrLineFG[CursorX+2],&AttrLineFG[CursorX],NumOfColumns-2-CursorX);
                memmove(&AttrLineBG[CursorX+2],&AttrLineBG[CursorX],NumOfColumns-2-CursorX);

                CodeLine[CursorX] = HIBYTE(w);
                AttrLine[CursorX] = Attr.Attr | AttrKanji; /* DBCS first byte */
                AttrLine2[CursorX] = Attr.Attr2;
                AttrLineFG[CursorX] = Attr.Fore;
                AttrLineBG[CursorX] = Attr.Back;
                if (CursorX < NumOfColumns-1) {
                        CodeLine[CursorX+1] = LOBYTE(w);
                        AttrLine[CursorX+1] = Attr.Attr;
                        AttrLine2[CursorX+1] = Attr.Attr2;
                        AttrLineFG[CursorX+1] = Attr.Fore;
                        AttrLineBG[CursorX+1] = Attr.Back;
                }
                /* begin - ishizaki */
                markURL(CursorX);
                markURL(CursorX+1);
                /* end - ishizaki */

                /* last char in current line is kanji first? */
                if ((AttrLine[NumOfColumns-1] & AttrKanji) != 0) {
                        /* then delete it */
                        CodeLine[NumOfColumns-1] = 0x20;
                        AttrLine[NumOfColumns-1] = CurCharAttr.Attr;
                        AttrLine2[NumOfColumns-1] = CurCharAttr.Attr2;
                        AttrLineFG[NumOfColumns-1] = CurCharAttr.Fore;
                        AttrLineBG[NumOfColumns-1] = CurCharAttr.Back;
                }

                if (StrChangeCount==0) {
                        XStart = CursorX;
                }
                else {
                        XStart = StrChangeStart;
                }
                StrChangeCount = 0;
                BuffUpdateRect(XStart,CursorY,NumOfColumns-1,CursorY);
        }
        else {
                CodeLine[CursorX] = HIBYTE(w);
                AttrLine[CursorX] = Attr.Attr | AttrKanji; /* DBCS first byte */
                AttrLine2[CursorX] = Attr.Attr2;
                AttrLineFG[CursorX] = Attr.Fore;
                AttrLineBG[CursorX] = Attr.Back;
                if (CursorX < NumOfColumns-1) {
                        CodeLine[CursorX+1] = LOBYTE(w);
                        AttrLine[CursorX+1] = Attr.Attr;
                        AttrLine2[CursorX+1] = Attr.Attr2;
                        AttrLineFG[CursorX+1] = Attr.Fore;
                        AttrLineBG[CursorX+1] = Attr.Back;
                }
                /* begin - ishizaki */
                markURL(CursorX);
                markURL(CursorX+1);
                /* end - ishizaki */

                if (StrChangeCount==0) {
                        StrChangeStart = CursorX;
                }
                StrChangeCount = StrChangeCount + 2;
        }
}

BOOL CheckSelect(int x, int y)
//  subroutine called by BuffUpdateRect
{
        LONG L, L1, L2;

        if (BoxSelect) {
                return (Selected &&
                ((SelectStart.x<=x) && (x<SelectEnd.x) ||
                 (SelectEnd.x<=x) && (x<SelectStart.x)) &&
                ((SelectStart.y<=y) && (y<=SelectEnd.y) ||
                 (SelectEnd.y<=y) && (y<=SelectStart.y)));
        }
        else {
                L = MAKELONG(x,y);
                L1 = MAKELONG(SelectStart.x,SelectStart.y);
                L2 = MAKELONG(SelectEnd.x,SelectEnd.y);

                return (Selected &&
                        ((L1<=L) && (L<L2) || (L2<=L) && (L<L1)));
        }
}

void BuffUpdateRect
  (int XStart, int YStart, int XEnd, int YEnd)
// Display text in a rectangular region in the screen
//   XStart: x position of the upper-left corner (screen cordinate)
//   YStart: y position
//   XEnd: x position of the lower-right corner (last character)
//   YEnd: y position
{
        int i, j, count;
        int IStart, IEnd;
        int X, Y;
        LONG TmpPtr;
        TCharAttr CurAttr, TempAttr;
        BOOL CurSel, TempSel, Caret;

        if (XStart >= WinOrgX+WinWidth) {
                return;
        }
        if (YStart >= WinOrgY+WinHeight) {
                return;
        }
        if (XEnd < WinOrgX) {
                return;
        }
        if (YEnd < WinOrgY) {
                return;
        }

        if (XStart < WinOrgX) {
                XStart = WinOrgX;
        }
        if (YStart < WinOrgY) {
                YStart = WinOrgY;
        }
        if (XEnd >= WinOrgX+WinWidth) {
                XEnd = WinOrgX+WinWidth-1;
        }
        if (YEnd >= WinOrgY+WinHeight) {
                YEnd = WinOrgY+WinHeight-1;
        }

        TempAttr = DefCharAttr;
        TempSel = FALSE;

        Caret = IsCaretOn();
        if (Caret) {
                CaretOff();
        }

        DispSetupDC(DefCharAttr, TempSel);

        Y = (YStart-WinOrgY)*FontHeight;
        TmpPtr = GetLinePtr(PageStart+YStart);
        for (j = YStart+PageStart ; j <= YEnd+PageStart ; j++) {
                IStart = XStart;
                IEnd = XEnd;

                IStart = LeftHalfOfDBCS(TmpPtr,IStart);

                X = (IStart-WinOrgX)*FontWidth;

                i = IStart;
                do {
                        CurAttr.Attr = AttrBuff[TmpPtr+i] & ~ AttrKanji;
                        CurAttr.Attr2 = AttrBuff2[TmpPtr+i];
                        CurAttr.Fore = AttrBuffFG[TmpPtr+i];
                        CurAttr.Back = AttrBuffBG[TmpPtr+i];
                        CurSel = CheckSelect(i,j);
                        count = 1;
                        while ( (i+count <= IEnd) &&
                                (CurAttr.Attr == (AttrBuff[TmpPtr+i+count] & ~ AttrKanji)) &&
                                (CurAttr.Attr2==AttrBuff2[TmpPtr+i+count]) &&
                                (CurAttr.Fore==AttrBuffFG[TmpPtr+i+count]) &&
                                (CurAttr.Back==AttrBuffBG[TmpPtr+i+count]) &&
                                (CurSel==CheckSelect(i+count,j)) ||
                                (i+count<NumOfColumns) &&
                                ((AttrBuff[TmpPtr+i+count-1] & AttrKanji) != 0) ) {
                                count++;
                        }

                        if (TCharAttrCmp(CurAttr, TempAttr) != 0 || (CurSel != TempSel)) {
                                DispSetupDC(CurAttr, CurSel);
                                TempAttr = CurAttr;
                                TempSel = CurSel;
                        }
                        DispStr(&CodeBuff[TmpPtr+i],count,Y, &X);
                        i = i+count;
                }
                while (i<=IEnd);
                Y = Y + FontHeight;
                TmpPtr = NextLinePtr(TmpPtr);
        }
        if (Caret) {
                CaretOn();
        }
}

void UpdateStr()
// Display not-yet-displayed string
{
        int X, Y;
        TCharAttr TempAttr;
        int pos, len;

        if (StrChangeCount==0) {
                return;
        }
        X = StrChangeStart;
        Y = CursorY;
        if (! IsLineVisible(&X, &Y)) {
                StrChangeCount = 0;
                return;
        }

        TempAttr.Attr = AttrLine[StrChangeStart];
        TempAttr.Attr2 = AttrLine2[StrChangeStart];
        TempAttr.Fore = AttrLineFG[StrChangeStart];
        TempAttr.Back = AttrLineBG[StrChangeStart];

        /* これから描画する文字列の始まりが「URL構成文字属性」だった場合、
         * 当該色で行末までペイントされないようにする。
         * (2009.10.24 yutaka)
         */
        if (TempAttr.Attr & AttrURL) {
                /* 開始位置からどこまでが AttrURL かをカウントする */
                len = 0;
                for (pos = 0 ; pos < StrChangeCount ; pos++) {
                        if (TempAttr.Attr != AttrLine[StrChangeStart + pos])
                                break;
                        len++;
                }
                DispSetupDC(TempAttr, FALSE);
                DispStr(&CodeLine[StrChangeStart], len, Y, &X);

                /* 残りの文字列があれば、ふつうに描画を行う。*/
                if (len < StrChangeCount) {
                        TempAttr.Attr = AttrLine[StrChangeStart + pos];
                        TempAttr.Attr2 = AttrLine2[StrChangeStart + pos];
                        TempAttr.Fore = AttrLineFG[StrChangeStart + pos];
                        TempAttr.Back = AttrLineBG[StrChangeStart + pos];

                        DispSetupDC(TempAttr, FALSE);
                        DispStr(&CodeLine[StrChangeStart + pos], (StrChangeCount - len), Y, &X);
                }
        } else {
                DispSetupDC(TempAttr, FALSE);
                DispStr(&CodeLine[StrChangeStart],StrChangeCount,Y, &X);
        }

        StrChangeCount = 0;
}

#if 0
void UpdateStrUnicode(void)
// Display not-yet-displayed string
{
  int X, Y;
  TCharAttr TempAttr;

  if (StrChangeCount==0) return;
  X = StrChangeStart;
  Y = CursorY;
  if (! IsLineVisible(&X, &Y))
  {
    StrChangeCount = 0;
    return;
  }

  TempAttr.Attr = AttrLine[StrChangeStart];
  TempAttr.Attr2 = AttrLine2[StrChangeStart];
  TempAttr.Fore = AttrLineFG[StrChangeStart];
  TempAttr.Back = AttrLineBG[StrChangeStart];
  DispSetupDC(TempAttr, FALSE);
  DispStr(&CodeLine[StrChangeStart],StrChangeCount,Y, &X);
  StrChangeCount = 0;
}
#endif

void MoveCursor(int Xnew, int Ynew)
{
        UpdateStr();

        if (CursorY!=Ynew) {
                NewLine(PageStart+Ynew);
        }

        CursorX = Xnew;
        CursorY = Ynew;
        Wrap = FALSE;

        /* 最下行でだけ自動スクロールする*/
        if (ts.AutoScrollOnlyInBottomLine == 0 || WinOrgY == 0) {
                DispScrollToCursor(CursorX, CursorY);
        }
}

void MoveRight()
/* move cursor right, but dont update screen.
  this procedure must be called from DispChar&DispKanji only */
{
        CursorX++;
        /* 最下行でだけ自動スクロールする */
        if (ts.AutoScrollOnlyInBottomLine == 0 || WinOrgY == 0) {
                DispScrollToCursor(CursorX, CursorY);
        }
}

void BuffSetCaretWidth()
{
        BOOL DW;

        /* check whether cursor on a DBCS character */
        DW = (((BYTE)(AttrLine[CursorX]) & AttrKanji) != 0);
        DispSetCaretWidth(DW);
}

void ScrollUp1Line()
{
        int i;
        LONG SrcPtr, DestPtr;

        if ((CursorTop<=CursorY) && (CursorY<=CursorBottom)) {
                UpdateStr();

                DestPtr = GetLinePtr(PageStart+CursorBottom);
                for (i = CursorBottom-1 ; i >= CursorTop ; i--) {
                        SrcPtr = PrevLinePtr(DestPtr);
                        memcpy(&(CodeBuff[DestPtr]),&(CodeBuff[SrcPtr]),NumOfColumns);
                        memcpy(&(AttrBuff[DestPtr]),&(AttrBuff[SrcPtr]),NumOfColumns);
                        memcpy(&(AttrBuff2[DestPtr]),&(AttrBuff2[SrcPtr]),NumOfColumns);
                        memcpy(&(AttrBuffFG[DestPtr]),&(AttrBuffFG[SrcPtr]),NumOfColumns);
                        memcpy(&(AttrBuffBG[DestPtr]),&(AttrBuffBG[SrcPtr]),NumOfColumns);
                        DestPtr = SrcPtr;
                }
                memset(&(CodeBuff[SrcPtr]),0x20,NumOfColumns);
                memset(&(AttrBuff[SrcPtr]),AttrDefault,NumOfColumns);
                memset(&(AttrBuff2[SrcPtr]),CurCharAttr.Attr2,NumOfColumns);
                memset(&(AttrBuffFG[SrcPtr]),CurCharAttr.Fore,NumOfColumns);
                memset(&(AttrBuffBG[SrcPtr]),CurCharAttr.Back,NumOfColumns);

                DispScrollNLines(CursorTop,CursorBottom,-1);
        }
}

void BuffScrollNLines(int n)
{
        int i;
        LONG SrcPtr, DestPtr;

        if (n<1) {
                return;
        }
        UpdateStr();

        if ((CursorTop == 0) && (CursorBottom == NumOfLines-1)) {
                WinOrgY = WinOrgY-n;
                /* 最下行でだけ自動スクロールする */
                if (ts.AutoScrollOnlyInBottomLine != 0 && NewOrgY != 0) {
                        NewOrgY = WinOrgY;
                }
                BuffScroll(n,CursorBottom);
                DispCountScroll(n);
        }
        else if ((CursorTop==0) && (CursorY<=CursorBottom)) {
                /* 最下行でだけ自動スクロールする */
                if (ts.AutoScrollOnlyInBottomLine != 0 && NewOrgY != 0) {
                        /* スクロールさせない場合の処理 */
                        WinOrgY = WinOrgY-n;
                        NewOrgY = WinOrgY;
                        BuffScroll(n,CursorBottom);
                        DispCountScroll(n);
                } else {
                        BuffScroll(n,CursorBottom);
                        DispScrollNLines(WinOrgY,CursorBottom,n);
                }
        }
        else if ((CursorTop<=CursorY) && (CursorY<=CursorBottom)) {
                DestPtr = GetLinePtr(PageStart+CursorTop);
                if (n<CursorBottom-CursorTop+1) {
                        SrcPtr = GetLinePtr(PageStart+CursorTop+n);
                        for (i = CursorTop+n ; i<=CursorBottom ; i++) {
                                memmove(&(CodeBuff[DestPtr]),&(CodeBuff[SrcPtr]),NumOfColumns);
                                memmove(&(AttrBuff[DestPtr]),&(AttrBuff[SrcPtr]),NumOfColumns);
                                memmove(&(AttrBuff2[DestPtr]),&(AttrBuff2[SrcPtr]),NumOfColumns);
                                memmove(&(AttrBuffFG[DestPtr]),&(AttrBuffFG[SrcPtr]),NumOfColumns);
                                memmove(&(AttrBuffBG[DestPtr]),&(AttrBuffBG[SrcPtr]),NumOfColumns);
                                SrcPtr = NextLinePtr(SrcPtr);
                                DestPtr = NextLinePtr(DestPtr);
                        }
                }
                else {
                        n = CursorBottom-CursorTop+1;
                }
                for (i = CursorBottom+1-n ; i<=CursorBottom; i++) {
                        memset(&(CodeBuff[DestPtr]),0x20,NumOfColumns);
                        memset(&(AttrBuff[DestPtr]),AttrDefault,NumOfColumns);
                        memset(&(AttrBuff2[DestPtr]),CurCharAttr.Attr2,NumOfColumns);
                        memset(&(AttrBuffFG[DestPtr]),CurCharAttr.Fore,NumOfColumns);
                        memset(&(AttrBuffBG[DestPtr]),CurCharAttr.Back,NumOfColumns);
                        DestPtr = NextLinePtr(DestPtr);
                }
                DispScrollNLines(CursorTop,CursorBottom,n);
        }
}

void BuffRegionScrollUpNLines(int n) {
        int i;
        LONG SrcPtr, DestPtr;

        if (n<1) {
                return;
        }
        UpdateStr();

        if (n > 0) {
                if ((CursorTop == 0) && (CursorBottom == NumOfLines-1)) {
                        WinOrgY = WinOrgY-n;
                        BuffScroll(n,CursorBottom);
                        DispCountScroll(n);
                }
                else if (CursorTop==0) {
                        BuffScroll(n,CursorBottom);
                        DispScrollNLines(WinOrgY,CursorBottom,n);
                }
                else {
                        DestPtr = GetLinePtr(PageStart+CursorTop);
                        if (n<CursorBottom-CursorTop+1) {
                                SrcPtr = GetLinePtr(PageStart+CursorTop+n);
                                for (i = CursorTop+n ; i<=CursorBottom ; i++) {
                                        memmove(&(CodeBuff[DestPtr]),&(CodeBuff[SrcPtr]),NumOfColumns);
                                        memmove(&(AttrBuff[DestPtr]),&(AttrBuff[SrcPtr]),NumOfColumns);
                                        memmove(&(AttrBuff2[DestPtr]),&(AttrBuff2[SrcPtr]),NumOfColumns);
                                        memmove(&(AttrBuffFG[DestPtr]),&(AttrBuffFG[SrcPtr]),NumOfColumns);
                                        memmove(&(AttrBuffBG[DestPtr]),&(AttrBuffBG[SrcPtr]),NumOfColumns);
                                        SrcPtr = NextLinePtr(SrcPtr);
                                        DestPtr = NextLinePtr(DestPtr);
                                }
                        }
                        else {
                                n = CursorBottom-CursorTop+1;
                        }
                        for (i = CursorBottom+1-n ; i<=CursorBottom; i++) {
                                memset(&(CodeBuff[DestPtr]),0x20,NumOfColumns);
                                memset(&(AttrBuff[DestPtr]),AttrDefault,NumOfColumns);
                                memset(&(AttrBuff2[DestPtr]),CurCharAttr.Attr2,NumOfColumns);
                                memset(&(AttrBuffFG[DestPtr]),CurCharAttr.Fore,NumOfColumns);
                                memset(&(AttrBuffBG[DestPtr]),CurCharAttr.Back,NumOfColumns);
                                DestPtr = NextLinePtr(DestPtr);
                        }
                        DispScrollNLines(CursorTop,CursorBottom,n);
                }
        }
}

void BuffRegionScrollDownNLines(int n) {
        int i;
        LONG SrcPtr, DestPtr;

        if (n<1) {
                return;
        }
        UpdateStr();

        DestPtr = GetLinePtr(PageStart+CursorBottom);
        if (n < CursorBottom-CursorTop+1) {
                SrcPtr = GetLinePtr(PageStart+CursorBottom-n);
                for (i=CursorBottom-n ; i>=CursorTop ; i--) {
                        memmove(&(CodeBuff[DestPtr]),&(CodeBuff[SrcPtr]),NumOfColumns);
                        memmove(&(AttrBuff[DestPtr]),&(AttrBuff[SrcPtr]),NumOfColumns);
                        memmove(&(AttrBuff2[DestPtr]),&(AttrBuff2[SrcPtr]),NumOfColumns);
                        memmove(&(AttrBuffFG[DestPtr]),&(AttrBuffFG[SrcPtr]),NumOfColumns);
                        memmove(&(AttrBuffBG[DestPtr]),&(AttrBuffBG[SrcPtr]),NumOfColumns);
                        SrcPtr = PrevLinePtr(SrcPtr);
                        DestPtr = PrevLinePtr(DestPtr);
                }
        }
        else {
                n = CursorBottom - CursorTop + 1;
        }
        for (i = CursorTop+n-1; i>=CursorTop; i--) {
                memset(&(CodeBuff[DestPtr]),0x20,NumOfColumns);
                memset(&(AttrBuff[DestPtr]),AttrDefault,NumOfColumns);
                memset(&(AttrBuff2[DestPtr]),CurCharAttr.Attr2,NumOfColumns);
                memset(&(AttrBuffFG[DestPtr]),CurCharAttr.Fore,NumOfColumns);
                memset(&(AttrBuffBG[DestPtr]),CurCharAttr.Back,NumOfColumns);
                DestPtr = PrevLinePtr(DestPtr);
        }

        DispScrollNLines(CursorTop,CursorBottom,-n);
}

void BuffClearScreen()
{ // clear screen
        if ((StatusLine>0) && (CursorY==NumOfLines-1)) {
                BuffScrollNLines(1); /* clear status line */
        }
        else { /* clear main screen */
                UpdateStr();
                BuffScroll(NumOfLines-StatusLine,NumOfLines-1-StatusLine);
                DispScrollNLines(WinOrgY,NumOfLines-1-StatusLine,NumOfLines-StatusLine);
        }
}

void BuffUpdateScroll()
// Updates scrolling
{
        UpdateStr();
        DispUpdateScroll();
}

void CursorUpWithScroll()
{
        if ((0<CursorY) && (CursorY<CursorTop) ||
            (CursorTop<CursorY)) {
                MoveCursor(CursorX,CursorY-1);
        }
        else if (CursorY==CursorTop) {
                ScrollUp1Line();
        }
}

// called by BuffDblClk
//   check if a character is the word delimiter
BOOL IsDelimiter(LONG Line, int CharPtr)
{
        if ((AttrBuff[Line+CharPtr] & AttrKanji) !=0) {
                return (ts.DelimDBCS!=0);
        }
        return (strchr(ts.DelimList,CodeBuff[Line+CharPtr])!=NULL);
}

void GetMinMax(int i1, int i2, int i3,
               int *min, int *max)
{
        if (i1<i2) {
                *min = i1;
                *max = i2;
        }
        else {
                *min = i2;
                *max = i1;
        }
        if (i3<*min) {
                *min = i3;
        }
        if (i3>*max) {
                *max = i3;
        }
}

/* start - ishizaki */
static void invokeBrowser(LONG ptr)
{
#ifdef URL_EMPHASIS
        LONG i, start, end;
        char url[1024];
        char *uptr, ch;

        start = ptr;
        while (AttrBuff[start] & AttrURL) {
                start--;
        }
        start++;

        end = ptr;
        while (AttrBuff[end] & AttrURL) {
                end++;
        }
        end--;
 
        if (start + (LONG)sizeof(url) <= end) {
                end = start + sizeof(url) - 1;
                end--;  // '\0'の分は引いておく。
        }
        uptr = url;
        for (i = 0; i < end - start + 1; i++) {
                ch = CodeBuff[start + i];
                if ((start + i) % NumOfColumns == NumOfColumns - 1 
                        && ch == '\\') {
                        // Emacs対応。行末に \ が来ている場合は、次の行に続くという意味で emacs が
                        // 自動で挿入する文字なので、URLには含めないようにする。
                        // (2007.8.7 yutaka)

                } else {
                        *uptr++ = ch;
                }
        }
        *uptr = '\0';
        ShellExecute(NULL, NULL, url, NULL, NULL,SW_SHOWNORMAL);
#endif
}
/* end - ishizaki */

void ChangeSelectRegion()
{
        POINT TempStart, TempEnd;
        int j, IStart, IEnd;
        BOOL Caret;

        if ((SelectEndOld.x==SelectEnd.x) &&
            (SelectEndOld.y==SelectEnd.y)) {
                return;
        }

        if (BoxSelect) {
                GetMinMax(SelectStart.x,SelectEndOld.x,SelectEnd.x,
                          (int *)&TempStart.x,(int *)&TempEnd.x);
                GetMinMax(SelectStart.y,SelectEndOld.y,SelectEnd.y,
                          (int *)&TempStart.y,(int *)&TempEnd.y);
                TempEnd.x--;
                Caret = IsCaretOn();
                if (Caret) {
                        CaretOff();
                }
                DispInitDC();
                BuffUpdateRect(TempStart.x,TempStart.y-PageStart,
                               TempEnd.x,TempEnd.y-PageStart);
                DispReleaseDC();
                if (Caret) {
                        CaretOn();
                }
                SelectEndOld = SelectEnd;
                return;
        }

        if ((SelectEndOld.y < SelectEnd.y) ||
            (SelectEndOld.y==SelectEnd.y) &&
            (SelectEndOld.x<=SelectEnd.x)) {
                TempStart = SelectEndOld;
                TempEnd.x = SelectEnd.x-1;
                TempEnd.y = SelectEnd.y;
        }
        else {
                TempStart = SelectEnd;
                TempEnd.x = SelectEndOld.x-1;
                TempEnd.y = SelectEndOld.y;
        }
        if (TempEnd.x < 0) {
                TempEnd.x = NumOfColumns - 1;
                TempEnd.y--;
        }

        Caret = IsCaretOn();
        if (Caret) {
                CaretOff();
        }
        for (j = TempStart.y ; j <= TempEnd.y ; j++) {
                IStart = 0;
                IEnd = NumOfColumns-1;
                if (j==TempStart.y) {
                        IStart = TempStart.x;
                }
                if (j==TempEnd.y) {
                        IEnd = TempEnd.x;
                }

                if ((IEnd>=IStart) && (j >= PageStart+WinOrgY) &&
                    (j < PageStart+WinOrgY+WinHeight)) {
                        DispInitDC();
                        BuffUpdateRect(IStart,j-PageStart,IEnd,j-PageStart);
                        DispReleaseDC();
                }
        }
        if (Caret) {
                CaretOn();
        }

        SelectEndOld = SelectEnd;
}

BOOL BuffUrlDblClk(int Xw, int Yw)
{
        int X, Y;
        LONG TmpPtr;
        BOOL url_invoked = FALSE;

        if (! ts.EnableClickableUrl) {
                return FALSE;
        }

        CaretOff();

        DispConvWinToScreen(Xw,Yw,&X,&Y,NULL);
        Y = Y + PageStart;
        if ((Y<0) || (Y>=BuffEnd)) {
                return 0;
        }
        if (X<0) X = 0;
        if (X>=NumOfColumns) {
                X = NumOfColumns-1;
        }

        if ((Y>=0) && (Y<BuffEnd)) {
                LockBuffer();
                TmpPtr = GetLinePtr(Y);
                /* start - ishizaki */
                if (AttrBuff[TmpPtr+X] & AttrURL) {
                        BoxSelect = FALSE;
                        SelectEnd = SelectStart;
                        ChangeSelectRegion();

                        url_invoked = TRUE;
                        invokeBrowser(TmpPtr+X);

                        SelectStart.x = 0;
                        SelectStart.y = 0;
                        SelectEnd.x = 0;
                        SelectEnd.y = 0;
                        SelectEndOld.x = 0;
                        SelectEndOld.y = 0;
                        Selected = FALSE;
                }
                UnlockBuffer();
        }
        return url_invoked;
}

void BuffDblClk(int Xw, int Yw)
//  Select a word at (Xw, Yw) by mouse double click
//    Xw: horizontal position in window coordinate (pixels)
//    Yw: vertical
{
        int X, Y, YStart, YEnd;
        int IStart, IEnd, i;
        LONG TmpPtr;
        BYTE b;
        BOOL DBCS;

        CaretOff();

        DispConvWinToScreen(Xw,Yw,&X,&Y,NULL);
        Y = Y + PageStart;
        if ((Y<0) || (Y>=BuffEnd)) {
                return;
        }
        if (X<0) X = 0;
        if (X>=NumOfColumns) X = NumOfColumns-1;

        BoxSelect = FALSE;
        LockBuffer();
        SelectEnd = SelectStart;
        ChangeSelectRegion();

        if ((Y>=0) && (Y<BuffEnd)) {
                TmpPtr = GetLinePtr(Y);

                IStart = X;
                IStart = LeftHalfOfDBCS(TmpPtr,IStart);
                IEnd = IStart;
                YStart = YEnd = Y;

                if (IsDelimiter(TmpPtr,IStart)) {
                        b = CodeBuff[TmpPtr+IStart];
                        DBCS = (AttrBuff[TmpPtr+IStart] & AttrKanji) != 0;
                        while ((b==CodeBuff[TmpPtr+IStart]) ||
                               DBCS &&
                               ((AttrBuff[TmpPtr+IStart] & AttrKanji)!=0)) {
                                MoveCharPtr(TmpPtr,&IStart,-1); // move left
                                if (ts.EnableContinuedLineCopy) {
                                        if (IStart<=0) {
                                                // 左端の場合
                                                if (YStart>0 && AttrBuff[TmpPtr] & AttrLineContinued) {
                                                        // 前の行に移動する
                                                        YStart--;
                                                        TmpPtr = GetLinePtr(YStart);
                                                        IStart = NumOfColumns;
                                                }
                                                else {
                                                        break;
                                                }
                                        }
                                }
                                else {
                                        if (IStart<=0) {
                                                // 左端の場合は終わり
                                                break;
                                        }
                                }
                        }
                        if ((b!=CodeBuff[TmpPtr+IStart]) &&
                            ! (DBCS && ((AttrBuff[TmpPtr+IStart] & AttrKanji)!=0))) {