int ScreenSaver(int EnableExit)
{
INPUT_RECORD rec;
clock_t WaitTime;
if (ScreenSaverActive)
return 1;
ChangePriority ChPriority(ChangePriority::IDLE);
for (WaitTime=GetProcessUptimeMSec(); GetProcessUptimeMSec()-WaitTime<500;)
{
if (PeekInputRecord(&rec))
return 1;
WINPORT(Sleep)(100);
}
ScreenSaverActive=TRUE;
CONSOLE_CURSOR_INFO CursorInfo;
Console.GetCursorInfo(CursorInfo);
{
SaveScreen SaveScr;
SetCursorType(0,10);
randomize();
SetScreen(0,0,ScrX,ScrY,L' ',F_LIGHTGRAY|B_BLACK);
for (size_t I=0; I<ARRAYSIZE(Star); I++)
{
Star[I].Type=STAR_NONE;
Star[I].Color=0;
}
int Step=0;
while (!PeekInputRecord(&rec))
{
clock_t CurTime=GetProcessUptimeMSec();
if (EnableExit && Opt.InactivityExit && Opt.InactivityExitTime>0 &&
CurTime-StartIdleTime>Opt.InactivityExitTime*60000 &&
FrameManager->GetFrameCount()==1)
{
FrameManager->ExitMainLoop(FALSE);
return 0;
}
WINPORT(Sleep)(50);
ShowSaver(Step++);
}
}
SetCursorType(CursorInfo.bVisible!=FALSE, CursorInfo.dwSize);
ScreenSaverActive=FALSE;
FlushInputBuffer();
StartIdleTime=GetProcessUptimeMSec();
return 1;
}
void main(void)
{
int nFrame, nStay;
int x, y;
SetCursorType(NOCURSOR), init_rand();
for (; 1;) // 게임이 끝났을 경우 다시 시작하거나 끝내는 루프
{
Score = 0, bricknum = 0;
CLS; // 무한루프에 들어가기전 초기화
for (x = 0; x < BW + 2; x++) // 외부벽 초기화
{
for (y = 0; y < BH + 2; y++)
{
board[x][y] = (y == 0 || y == BH + 1 || x == 0 || x == BW + 1) ? WALL : EMPTY;
}
}
DrawScreen();
nFrame = 10;
nbrick = make_rand(sizeof(Shape) / sizeof(Shape[0]));
for (; 2;) // 전체 게임 루프
{
bricknum++;
brick = nbrick;
nbrick = make_rand(sizeof(Shape) / sizeof(Shape[0])); // 새 벽돌 생성
DrawNext();
//DrawPresent()
nx = BW / 2, ny = 2;
rot = 0;
PrintBrick(TRUE);
if (GetAround(nx, ny, brick, rot) != EMPTY) break; // 게임 끝 점검
nStay = nFrame;
for (; 3;) // 벽돌 하나 처리 루프
{
if (--nStay == 0)
{
nStay = nFrame;
if (MoveDown()) break; // 벽돌 내림
}
if (ProcessKey()) break; // 키처리
delay(1000 / 20); // 시간 지연
}
if (bricknum % 5 == 0 && nFrame > 3)
nFrame--;
}
CLS;
gotoxy(30, 12), puts("G A M E O V E R"); // 게임 끝 처리
gotoxy(23, 14), puts("If you want restart game press [ Y ]"); // 재시작
gotoxy(27, 16), puts("another any key [ Exit ]");
if (tolower(getch()) != 'y') break;
}
SetCursorType(NORMALCURSOR);
}
Grabber::Grabber()
{
Frame *pFrame = FrameManager->GetCurrentFrame();
pFrame->Lock();
SaveScr=new SaveScreen;
PrevMacroMode=CtrlObject->Macro.GetMode();
CtrlObject->Macro.SetMode(MACRO_OTHER);
ClearStruct(GArea);
ClearStruct(PrevArea);
bool Visible=false;
DWORD Size=0;
GetCursorType(Visible,Size);
if (Visible)
GetCursorPos(GArea.CurX,GArea.CurY);
else
{
GArea.CurX=0;
GArea.CurY=0;
}
GArea.X1=-1;
SetCursorType(TRUE,60);
PrevArea=GArea;
ResetArea=TRUE;
VerticalBlock=FALSE;
DisplayObject();
Process();
delete SaveScr;
pFrame->Unlock();
FrameManager->RefreshFrame();
}
/*
VMenu2:Call() (т.е. функция обработки меню)
должна возвращать true если она обработала событие и дальше ничего делать не надо
(вне зависимости что говорит енц. о кодах возврата различных DN_*).
*/
int VMenu2::Call(int Msg, void *param)
{
if(!mfn)
return 0;
SendMessage(DM_ENABLEREDRAW, 0, nullptr);
int r=mfn(Msg, param);
bool Visible;
DWORD Size;
SHORT X, Y;
GetCursorType(Visible, Size);
GetCursorPos(X, Y);
if(SendMessage(DM_ENABLEREDRAW, -1, nullptr)<0)
SendMessage(DM_ENABLEREDRAW, 1, nullptr);
if(NeedResize)
Resize();
SetCursorType(Visible, Size);
MoveCursor(X, Y);
if(closing)
{
closing=false;
if(Msg==DN_CLOSE)
return false;
SendMessage(DM_CLOSE, -1, nullptr);
}
return r;
}
void SaveScreen::RestoreArea(int RestoreCursor)
{
if (ScreenBuf.empty())
return;
PutText(m_X1, m_Y1, m_X2, m_Y2, ScreenBuf.data());
if (RestoreCursor)
{
SetCursorType(CurVisible,CurSize);
MoveCursor(CurPosX,CurPosY);
}
}
//-------------------------------- Input --------------------------------------
// 사용자의 입력값을 처리해주는 함수
//-----------------------------------------------------------------------------
void Snake_Game::Input()
{
int ch;
if (!kbhit()) {
return;
}
ch=getch();
//뱀은 현재 진행방향의 반대방향으로는 움직이지 못한다.
//스페이스를 누르면 멈출수 있다.
if (ch == 0xE0 || ch == 0)
{
ch=getch();
switch (ch)
{
case Snake::LEFT:
if (snake_->GetDirection() != Snake::RIGHT) snake_->SetDirection(Snake::LEFT);
break;
case Snake::RIGHT:
if (snake_->GetDirection() != Snake::LEFT) snake_->SetDirection(Snake::RIGHT);
break;
case Snake::UP:
if (snake_->GetDirection() != Snake::DOWN) snake_->SetDirection(Snake::UP);
break;
case Snake::DOWN:
if (snake_->GetDirection() != Snake::UP) snake_->SetDirection(Snake::DOWN);
break;
}
}
else
{
switch (tolower(ch))
{
case 27:
SetCursorType(NORMALCURSOR);
exit(0);
case ' ':
WaitAnyKey();
break;
}
}
}
//------------------------------- InitGame ------------------------------------
// 게임을 초기화한다.
//-----------------------------------------------------------------------------
bool Snake_Game::InitGame()
{
SetCursorType(NOCURSOR);
this->LoadGame();
srand(time(NULL));
//남은 아이템만큼 아이템을 그려준다.
for (int i=item_num_; i<goal_item_num_; i++)
{
while(true)
{
Position dummy(rand()%kMaxItemPosWidth,rand()%kMaxItemPosHeigh);
if(Getchon(dummy) == ' ')
{
DrawObject(dummy,rand()%9+1);
break;
}
}
}
return true;
}
int Grabber::ProcessKey(int Key)
{
if(CloseFAR)
{
Key = KEY_ESC;
}
/* $ 14.03.2001 SVS
[-] Неправильно воспроизводился макрос в режиме грабления экрана.
При воспроизведении клавиша Home перемещала курсор в координаты
0,0 консоли.
Не было учтено режима выполнения макроса.
*/
SetCursorType(TRUE,60);
if (CtrlObject->Macro.IsExecuting())
{
if ((Key&KEY_SHIFT) && Key!=KEY_NONE && ResetArea)
Reset();
else if (Key!=KEY_IDLE && Key!=KEY_NONE && !(Key&KEY_SHIFT) && !IntKeyState.ShiftPressed && !IntKeyState.AltPressed)
ResetArea=TRUE;
}
else
{
if ((IntKeyState.ShiftPressed || Key!=KEY_SHIFT) && (Key&KEY_SHIFT) && Key!=KEY_NONE && Key!=KEY_CTRLA && Key!=KEY_RCTRLA && !IntKeyState.AltPressed && ResetArea)
Reset();
else if (Key!=KEY_IDLE && Key!=KEY_NONE && Key!=KEY_SHIFT && Key!=KEY_CTRLA && Key!=KEY_RCTRLA && !IntKeyState.ShiftPressed && !IntKeyState.AltPressed && !(Key&KEY_SHIFT))
ResetArea=TRUE;
}
switch (Key)
{
case KEY_CTRLU:
case KEY_RCTRLU:
Reset();
GArea.X1=-2;
break;
case KEY_ESC:
SetExitCode(0);
break;
case KEY_NUMENTER:
case KEY_ENTER:
case KEY_CTRLINS: case KEY_CTRLNUMPAD0:
case KEY_RCTRLINS: case KEY_RCTRLNUMPAD0:
case KEY_CTRLADD:
case KEY_RCTRLADD:
CopyGrabbedArea(Key == KEY_CTRLADD || Key == KEY_RCTRLADD,VerticalBlock);
SetExitCode(1);
break;
case KEY_LEFT: case KEY_NUMPAD4: case L'4':
if (GArea.CurX>0)
GArea.CurX--;
break;
case KEY_RIGHT: case KEY_NUMPAD6: case L'6':
if (GArea.CurX<ScrX)
GArea.CurX++;
break;
case KEY_UP: case KEY_NUMPAD8: case L'8':
if (GArea.CurY>0)
GArea.CurY--;
break;
case KEY_DOWN: case KEY_NUMPAD2: case L'2':
if (GArea.CurY<ScrY)
GArea.CurY++;
break;
case KEY_HOME: case KEY_NUMPAD7: case L'7':
GArea.CurX=0;
break;
case KEY_END: case KEY_NUMPAD1: case L'1':
GArea.CurX=ScrX;
break;
case KEY_PGUP: case KEY_NUMPAD9: case L'9':
GArea.CurY=0;
break;
case KEY_PGDN: case KEY_NUMPAD3: case L'3':
GArea.CurY=ScrY;
break;
case KEY_CTRLHOME: case KEY_CTRLNUMPAD7:
case KEY_RCTRLHOME: case KEY_RCTRLNUMPAD7:
GArea.CurX=GArea.CurY=0;
break;
case KEY_CTRLEND: case KEY_CTRLNUMPAD1:
case KEY_RCTRLEND: case KEY_RCTRLNUMPAD1:
GArea.CurX=ScrX;
GArea.CurY=ScrY;
break;
case KEY_CTRLLEFT: case KEY_CTRLNUMPAD4:
case KEY_RCTRLLEFT: case KEY_RCTRLNUMPAD4:
case KEY_CTRLSHIFTLEFT: case KEY_CTRLSHIFTNUMPAD4:
case KEY_RCTRLSHIFTLEFT: case KEY_RCTRLSHIFTNUMPAD4:
if ((GArea.CurX-=10)<0)
GArea.CurX=0;
if (Key == KEY_CTRLSHIFTLEFT || Key == KEY_RCTRLSHIFTLEFT || Key == KEY_CTRLSHIFTNUMPAD4 || Key == KEY_RCTRLSHIFTNUMPAD4)
GArea.X1=GArea.CurX;
break;
case KEY_CTRLRIGHT: case KEY_CTRLNUMPAD6:
case KEY_RCTRLRIGHT: case KEY_RCTRLNUMPAD6:
case KEY_CTRLSHIFTRIGHT: case KEY_CTRLSHIFTNUMPAD6:
case KEY_RCTRLSHIFTRIGHT: case KEY_RCTRLSHIFTNUMPAD6:
if ((GArea.CurX+=10)>ScrX)
GArea.CurX=ScrX;
if (Key == KEY_CTRLSHIFTRIGHT || Key == KEY_RCTRLSHIFTRIGHT || Key == KEY_CTRLSHIFTNUMPAD6 || Key == KEY_RCTRLSHIFTNUMPAD6)
GArea.X1=GArea.CurX;
break;
case KEY_CTRLUP: case KEY_CTRLNUMPAD8:
case KEY_RCTRLUP: case KEY_RCTRLNUMPAD8:
case KEY_CTRLSHIFTUP: case KEY_CTRLSHIFTNUMPAD8:
case KEY_RCTRLSHIFTUP: case KEY_RCTRLSHIFTNUMPAD8:
if ((GArea.CurY-=5)<0)
GArea.CurY=0;
if (Key == KEY_CTRLSHIFTUP || Key == KEY_RCTRLSHIFTUP || Key == KEY_CTRLSHIFTNUMPAD8 || Key == KEY_RCTRLSHIFTNUMPAD8)
GArea.Y1=GArea.CurY;
break;
case KEY_CTRLDOWN: case KEY_CTRLNUMPAD2:
case KEY_RCTRLDOWN: case KEY_RCTRLNUMPAD2:
case KEY_CTRLSHIFTDOWN: case KEY_CTRLSHIFTNUMPAD2:
case KEY_RCTRLSHIFTDOWN: case KEY_RCTRLSHIFTNUMPAD2:
if ((GArea.CurY+=5)>ScrY)
GArea.CurY=ScrY;
if (Key == KEY_CTRLSHIFTDOWN || Key == KEY_RCTRLSHIFTDOWN || Key == KEY_CTRLSHIFTNUMPAD8 || Key == KEY_RCTRLSHIFTNUMPAD8)
GArea.Y1=GArea.CurY;
break;
case KEY_SHIFTLEFT: case KEY_SHIFTNUMPAD4:
if (GArea.X1>0)
GArea.X1--;
GArea.CurX=GArea.X1;
GArea.CurY=GArea.Y1;
break;
case KEY_SHIFTRIGHT: case KEY_SHIFTNUMPAD6:
if (GArea.X1<ScrX)
GArea.X1++;
GArea.CurX=GArea.X1;
GArea.CurY=GArea.Y1;
break;
case KEY_SHIFTUP: case KEY_SHIFTNUMPAD8:
if (GArea.Y1>0)
GArea.Y1--;
GArea.CurX=GArea.X1;
GArea.CurY=GArea.Y1;
break;
case KEY_SHIFTDOWN: case KEY_SHIFTNUMPAD2:
if (GArea.Y1<ScrY)
GArea.Y1++;
GArea.CurX=GArea.X1;
GArea.CurY=GArea.Y1;
break;
case KEY_SHIFTHOME: case KEY_SHIFTNUMPAD7:
GArea.CurX=GArea.X1=0;
break;
case KEY_SHIFTEND: case KEY_SHIFTNUMPAD1:
GArea.CurX=GArea.X1=ScrX;
break;
case KEY_SHIFTPGUP: case KEY_SHIFTNUMPAD9:
GArea.CurY=GArea.Y1=0;
break;
case KEY_SHIFTPGDN: case KEY_SHIFTNUMPAD3:
GArea.CurY=GArea.Y1=ScrY;
break;
case KEY_ALTSHIFTHOME: case KEY_ALTSHIFTNUMPAD7:
case KEY_RALTSHIFTHOME: case KEY_RALTSHIFTNUMPAD7:
GArea.X2=0;
break;
case KEY_ALTSHIFTEND: case KEY_ALTSHIFTNUMPAD1:
case KEY_RALTSHIFTEND: case KEY_RALTSHIFTNUMPAD1:
GArea.X2=ScrX;
break;
case KEY_ALTSHIFTPGUP: case KEY_ALTSHIFTNUMPAD9:
case KEY_RALTSHIFTPGUP: case KEY_RALTSHIFTNUMPAD9:
GArea.Y2=0;
break;
case KEY_ALTSHIFTPGDN: case KEY_ALTSHIFTNUMPAD3:
case KEY_RALTSHIFTPGDN: case KEY_RALTSHIFTNUMPAD3:
GArea.Y2=ScrY;
break;
case KEY_ALTSHIFTLEFT: case KEY_ALTSHIFTNUMPAD4:
case KEY_RALTSHIFTLEFT: case KEY_RALTSHIFTNUMPAD4:
if (GArea.X2>0)
GArea.X2--;
break;
case KEY_ALTSHIFTRIGHT: case KEY_ALTSHIFTNUMPAD6:
case KEY_RALTSHIFTRIGHT: case KEY_RALTSHIFTNUMPAD6:
if (GArea.X2<ScrX)
GArea.X2++;
break;
case KEY_ALTSHIFTUP: case KEY_ALTSHIFTNUMPAD8:
case KEY_RALTSHIFTUP: case KEY_RALTSHIFTNUMPAD8:
if (GArea.Y2>0)
GArea.Y2--;
break;
case KEY_ALTSHIFTDOWN: case KEY_ALTSHIFTNUMPAD2:
case KEY_RALTSHIFTDOWN: case KEY_RALTSHIFTNUMPAD2:
if (GArea.Y2<ScrY)
GArea.Y2++;
break;
case KEY_CTRLA:
case KEY_RCTRLA:
GArea.X1=GArea.CurX=ScrX;
GArea.X2=0;
GArea.Y1=GArea.CurY=ScrY;
GArea.Y2=0;
break;
case KEY_ALTLEFT:
case KEY_RALTLEFT:
if ((GArea.X1>0) && (GArea.X2>0))
{
GArea.X1--;
GArea.X2--;
GArea.CurX=GArea.X1;
GArea.CurY=GArea.Y1;
}
break;
case KEY_ALTRIGHT:
case KEY_RALTRIGHT:
if ((GArea.X1<ScrX) && (GArea.X2<ScrX))
{
GArea.X1++;
GArea.X2++;
GArea.CurX=GArea.X1;
GArea.CurY=GArea.Y1;
}
break;
case KEY_ALTUP:
case KEY_RALTUP:
if ((GArea.Y1>0) && (GArea.Y2>0))
{
GArea.Y1--;
GArea.Y2--;
GArea.CurX=GArea.X1;
GArea.CurY=GArea.Y1;
}
break;
case KEY_ALTDOWN:
case KEY_RALTDOWN:
if ((GArea.Y1<ScrY) && (GArea.Y2<ScrY))
{
GArea.Y1++;
GArea.Y2++;
GArea.CurX=GArea.X1;
GArea.CurY=GArea.Y1;
}
break;
case KEY_ALTHOME:
case KEY_RALTHOME:
GArea.X1=GArea.CurX=abs(GArea.X1-GArea.X2);
GArea.X2=0;
break;
case KEY_ALTEND:
case KEY_RALTEND:
GArea.X2=ScrX-abs(GArea.X1-GArea.X2);
GArea.X1=GArea.CurX=ScrX;
break;
case KEY_ALTPGUP:
case KEY_RALTPGUP:
GArea.Y1=GArea.CurY=abs(GArea.Y1-GArea.Y2);
GArea.Y2=0;
break;
case KEY_ALTPGDN:
case KEY_RALTPGDN:
GArea.Y2=ScrY-abs(GArea.Y1-GArea.Y2);
GArea.Y1=GArea.CurY=ScrY;
break;
}
DisplayObject();
return TRUE;
}
void ShellDelete(Panel *SrcPanel,int Wipe)
{
ChangePriority ChPriority(Opt.DelThreadPriority);
TPreRedrawFuncGuard preRedrawFuncGuard(PR_ShellDeleteMsg);
FAR_FIND_DATA_EX FindData;
string strDeleteFilesMsg;
string strSelName;
string strSelShortName;
string strDizName;
string strFullName;
DWORD FileAttr;
int SelCount,UpdateDiz;
int DizPresent;
int Ret;
BOOL NeedUpdate=TRUE, NeedSetUpADir=FALSE;
int Opt_DeleteToRecycleBin=Opt.DeleteToRecycleBin;
/*& 31.05.2001 OT Запретить перерисовку текущего фрейма*/
Frame *FrameFromLaunched=FrameManager->GetCurrentFrame();
FrameFromLaunched->Lock();
DeleteAllFolders=!Opt.Confirm.DeleteFolder;
UpdateDiz=(Opt.Diz.UpdateMode==DIZ_UPDATE_ALWAYS ||
(SrcPanel->IsDizDisplayed() &&
Opt.Diz.UpdateMode==DIZ_UPDATE_IF_DISPLAYED));
if (!(SelCount=SrcPanel->GetSelCount()))
goto done;
// Удаление в корзину только для FIXED-дисков
{
string strRoot;
// char FSysNameSrc[NM];
SrcPanel->GetSelName(nullptr,FileAttr);
SrcPanel->GetSelName(&strSelName,FileAttr);
ConvertNameToFull(strSelName, strRoot);
GetPathRoot(strRoot,strRoot);
//_SVS(SysLog(L"Del: SelName='%s' Root='%s'",SelName,Root));
if (Opt.DeleteToRecycleBin && FAR_GetDriveType(strRoot) != DRIVE_FIXED)
Opt.DeleteToRecycleBin=0;
}
if (SelCount==1)
{
SrcPanel->GetSelName(nullptr,FileAttr);
SrcPanel->GetSelName(&strSelName,FileAttr);
if (TestParentFolderName(strSelName) || strSelName.IsEmpty())
{
NeedUpdate=FALSE;
goto done;
}
strDeleteFilesMsg = strSelName;
}
else
{
// в зависимости от числа ставим нужное окончание
const wchar_t *Ends;
wchar_t StrItems[16];
_itow(SelCount,StrItems,10);
Ends=MSG(MAskDeleteItemsA);
int LenItems=StrLength(StrItems);
if (LenItems > 0)
{
if ((LenItems >= 2 && StrItems[LenItems-2] == L'1') ||
StrItems[LenItems-1] >= L'5' ||
StrItems[LenItems-1] == L'0')
Ends=MSG(MAskDeleteItemsS);
else if (StrItems[LenItems-1] == L'1')
Ends=MSG(MAskDeleteItems0);
}
strDeleteFilesMsg.Format(MSG(MAskDeleteItems),SelCount,Ends);
}
Ret=1;
// Обработка "удаления" линков
if ((FileAttr & FILE_ATTRIBUTE_REPARSE_POINT) && SelCount==1)
{
string strJuncName;
ConvertNameToFull(strSelName,strJuncName);
if (GetReparsePointInfo(strJuncName, strJuncName)) // ? SelName ?
{
NormalizeSymlinkName(strJuncName);
//SetMessageHelp(L"DeleteLink");
string strAskDeleteLink=MSG(MAskDeleteLink);
DWORD dwAttr=apiGetFileAttributes(strJuncName);
if (dwAttr!=INVALID_FILE_ATTRIBUTES)
{
strAskDeleteLink+=L" ";
strAskDeleteLink+=dwAttr&FILE_ATTRIBUTE_DIRECTORY?MSG(MAskDeleteLinkFolder):MSG(MAskDeleteLinkFile);
}
Ret=Message(0,3,MSG(MDeleteLinkTitle),
strDeleteFilesMsg,
strAskDeleteLink,
strJuncName,
MSG(MDeleteLinkDelete),MSG(MDeleteLinkUnlink),MSG(MCancel));
if (Ret == 1)
{
ConvertNameToFull(strSelName, strJuncName);
if (Opt.Confirm.Delete)
{
; // ;-%
}
if ((NeedSetUpADir=CheckUpdateAnotherPanel(SrcPanel,strSelName)) != -1) //JuncName?
{
DeleteReparsePoint(strJuncName);
ShellUpdatePanels(SrcPanel,NeedSetUpADir);
}
goto done;
}
if (Ret )
goto done;
}
}
if (Ret && (Opt.Confirm.Delete || SelCount>1 || (FileAttr & FILE_ATTRIBUTE_DIRECTORY)))
{
const wchar_t *DelMsg;
const wchar_t *TitleMsg=MSG(Wipe?MDeleteWipeTitle:MDeleteTitle);
/* $ 05.01.2001 IS
! Косметика в сообщениях - разные сообщения в зависимости от того,
какие и сколько элементов выделено.
*/
BOOL folder=(FileAttr & FILE_ATTRIBUTE_DIRECTORY);
if (SelCount==1)
{
if (Wipe && !(FileAttr & FILE_ATTRIBUTE_REPARSE_POINT))
DelMsg=MSG(folder?MAskWipeFolder:MAskWipeFile);
else
{
if (Opt.DeleteToRecycleBin && !(FileAttr & FILE_ATTRIBUTE_REPARSE_POINT))
DelMsg=MSG(folder?MAskDeleteRecycleFolder:MAskDeleteRecycleFile);
else
DelMsg=MSG(folder?MAskDeleteFolder:MAskDeleteFile);
}
}
else
{
if (Wipe && !(FileAttr & FILE_ATTRIBUTE_REPARSE_POINT))
{
DelMsg=MSG(MAskWipe);
TitleMsg=MSG(MDeleteWipeTitle);
}
else if (Opt.DeleteToRecycleBin && !(FileAttr & FILE_ATTRIBUTE_REPARSE_POINT))
DelMsg=MSG(MAskDeleteRecycle);
else
DelMsg=MSG(MAskDelete);
}
SetMessageHelp(L"DeleteFile");
if (Message(0,2,TitleMsg,DelMsg,strDeleteFilesMsg,MSG(Wipe?MDeleteWipe:Opt.DeleteToRecycleBin?MDeleteRecycle:MDelete),MSG(MCancel)))
{
NeedUpdate=FALSE;
goto done;
}
}
if (Opt.Confirm.Delete && SelCount>1)
{
//SaveScreen SaveScr;
SetCursorType(FALSE,0);
SetMessageHelp(L"DeleteFile");
if (Message(MSG_WARNING,2,MSG(Wipe?MWipeFilesTitle:MDeleteFilesTitle),MSG(Wipe?MAskWipe:MAskDelete),
strDeleteFilesMsg,MSG(MDeleteFileAll),MSG(MDeleteFileCancel)))
{
NeedUpdate=FALSE;
goto done;
}
}
if (UpdateDiz)
SrcPanel->ReadDiz();
SrcPanel->GetDizName(strDizName);
DizPresent=(!strDizName.IsEmpty() && apiGetFileAttributes(strDizName)!=INVALID_FILE_ATTRIBUTES);
DeleteTitle = new ConsoleTitle(MSG(MDeletingTitle));
if ((NeedSetUpADir=CheckUpdateAnotherPanel(SrcPanel,strSelName)) == -1)
goto done;
if (SrcPanel->GetType()==TREE_PANEL)
FarChDir(L"\\");
{
TaskBar TB;
wakeful W;
bool Cancel=false;
//SaveScreen SaveScr;
SetCursorType(FALSE,0);
ReadOnlyDeleteMode=-1;
SkipMode=-1;
SkipWipeMode=-1;
SkipFoldersMode=-1;
ULONG ItemsCount=0;
ProcessedItems=0;
if (Opt.DelOpt.DelShowTotal)
{
SrcPanel->GetSelName(nullptr,FileAttr);
DWORD StartTime=GetTickCount();
bool FirstTime=true;
while (SrcPanel->GetSelName(&strSelName,FileAttr,&strSelShortName) && !Cancel)
{
if (!(FileAttr&FILE_ATTRIBUTE_REPARSE_POINT))
{
if (FileAttr&FILE_ATTRIBUTE_DIRECTORY)
{
DWORD CurTime=GetTickCount();
if (CurTime-StartTime>RedrawTimeout || FirstTime)
{
StartTime=CurTime;
FirstTime=false;
if (CheckForEscSilent() && ConfirmAbortOp())
{
Cancel=true;
break;
}
ShellDeleteMsg(strSelName,Wipe,-1);
}
ULONG CurrentFileCount,CurrentDirCount,ClusterSize;
UINT64 FileSize,CompressedFileSize,RealSize;
if (GetDirInfo(nullptr,strSelName,CurrentDirCount,CurrentFileCount,FileSize,CompressedFileSize,RealSize,ClusterSize,-1,nullptr,0)>0)
{
ItemsCount+=CurrentFileCount+CurrentDirCount+1;
}
else
{
Cancel=true;
}
}
else
{
ItemsCount++;
}
}
}
}
SrcPanel->GetSelName(nullptr,FileAttr);
DWORD StartTime=GetTickCount();
bool FirstTime=true;
while (SrcPanel->GetSelName(&strSelName,FileAttr,&strSelShortName) && !Cancel)
{
int Length=(int)strSelName.GetLength();
if (!Length || (strSelName.At(0)==L'\\' && Length<2) ||
(strSelName.At(1)==L':' && Length<4))
continue;
DWORD CurTime=GetTickCount();
if (CurTime-StartTime>RedrawTimeout || FirstTime)
{
StartTime=CurTime;
FirstTime=false;
if (CheckForEscSilent() && ConfirmAbortOp())
{
Cancel=true;
break;
}
ShellDeleteMsg(strSelName,Wipe,Opt.DelOpt.DelShowTotal?(ItemsCount?(ProcessedItems*100/ItemsCount):0):-1);
}
if (FileAttr & FILE_ATTRIBUTE_DIRECTORY)
{
if (!DeleteAllFolders)
{
ConvertNameToFull(strSelName, strFullName);
if (TestFolder(strFullName) == TSTFLD_NOTEMPTY)
{
int MsgCode=0;
// для symlink`а не нужно подтверждение
if (!(FileAttr & FILE_ATTRIBUTE_REPARSE_POINT))
MsgCode=Message(MSG_WARNING,4,MSG(Wipe?MWipeFolderTitle:MDeleteFolderTitle),
MSG(Wipe?MWipeFolderConfirm:MDeleteFolderConfirm),strFullName,
MSG(Wipe?MDeleteFileWipe:MDeleteFileDelete),MSG(MDeleteFileAll),
MSG(MDeleteFileSkip),MSG(MDeleteFileCancel));
if (MsgCode<0 || MsgCode==3)
{
NeedSetUpADir=FALSE;
break;
}
if (MsgCode==1)
DeleteAllFolders=1;
if (MsgCode==2)
continue;
}
}
bool DirSymLink=(FileAttr&FILE_ATTRIBUTE_DIRECTORY && FileAttr&FILE_ATTRIBUTE_REPARSE_POINT);
if (!DirSymLink && (!Opt.DeleteToRecycleBin || Wipe))
{
string strFullName;
ScanTree ScTree(TRUE,TRUE,FALSE);
string strSelFullName;
if (IsAbsolutePath(strSelName))
{
strSelFullName=strSelName;
}
else
{
SrcPanel->GetCurDir(strSelFullName);
AddEndSlash(strSelFullName);
strSelFullName+=strSelName;
}
ScTree.SetFindPath(strSelFullName,L"*", 0);
DWORD StartTime=GetTickCount();
while (ScTree.GetNextName(&FindData,strFullName))
{
DWORD CurTime=GetTickCount();
if (CurTime-StartTime>RedrawTimeout)
{
StartTime=CurTime;
if (CheckForEscSilent())
{
int AbortOp = ConfirmAbortOp();
if (AbortOp)
{
Cancel=true;
break;
}
}
ShellDeleteMsg(strFullName,Wipe,Opt.DelOpt.DelShowTotal?(ItemsCount?(ProcessedItems*100/ItemsCount):0):-1);
}
if (FindData.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
{
if (FindData.dwFileAttributes & FILE_ATTRIBUTE_REPARSE_POINT)
{
if (FindData.dwFileAttributes & FILE_ATTRIBUTE_READONLY)
apiSetFileAttributes(strFullName,FILE_ATTRIBUTE_NORMAL);
int MsgCode=ERemoveDirectory(strFullName,Wipe);
if (MsgCode==DELETE_CANCEL)
{
Cancel=true;
break;
}
else if (MsgCode==DELETE_SKIP)
{
ScTree.SkipDir();
continue;
}
TreeList::DelTreeName(strFullName);
if (UpdateDiz)
SrcPanel->DeleteDiz(strFullName,strSelShortName);
continue;
}
if (!DeleteAllFolders && !ScTree.IsDirSearchDone() && TestFolder(strFullName) == TSTFLD_NOTEMPTY)
{
int MsgCode=Message(MSG_WARNING,4,MSG(Wipe?MWipeFolderTitle:MDeleteFolderTitle),
MSG(Wipe?MWipeFolderConfirm:MDeleteFolderConfirm),strFullName,
MSG(Wipe?MDeleteFileWipe:MDeleteFileDelete),MSG(MDeleteFileAll),
MSG(MDeleteFileSkip),MSG(MDeleteFileCancel));
if (MsgCode<0 || MsgCode==3)
{
Cancel=true;
break;
}
if (MsgCode==1)
DeleteAllFolders=1;
if (MsgCode==2)
{
ScTree.SkipDir();
continue;
}
}
if (ScTree.IsDirSearchDone())
{
if (FindData.dwFileAttributes & FILE_ATTRIBUTE_READONLY)
apiSetFileAttributes(strFullName,FILE_ATTRIBUTE_NORMAL);
int MsgCode=ERemoveDirectory(strFullName,Wipe);
if (MsgCode==DELETE_CANCEL)
{
Cancel=true;;
break;
}
else if (MsgCode==DELETE_SKIP)
{
//ScTree.SkipDir();
continue;
}
TreeList::DelTreeName(strFullName);
}
}
else
{
int AskCode=AskDeleteReadOnly(strFullName,FindData.dwFileAttributes,Wipe);
if (AskCode==DELETE_CANCEL)
{
Cancel=true;
break;
}
if (AskCode==DELETE_YES)
if (ShellRemoveFile(strFullName,Wipe)==DELETE_CANCEL)
{
Cancel=true;
break;
}
}
}
}
if (!Cancel)
{
if (FileAttr & FILE_ATTRIBUTE_READONLY)
apiSetFileAttributes(strSelName,FILE_ATTRIBUTE_NORMAL);
int DeleteCode;
// нефига здесь выделываться, а надо учесть, что удаление
// симлинка в корзину чревато потерей оригинала.
if (DirSymLink || !Opt.DeleteToRecycleBin || Wipe)
{
DeleteCode=ERemoveDirectory(strSelName,Wipe);
if (DeleteCode==DELETE_CANCEL)
break;
else if (DeleteCode==DELETE_SUCCESS)
{
TreeList::DelTreeName(strSelName);
if (UpdateDiz)
SrcPanel->DeleteDiz(strSelName,strSelShortName);
}
}
else
{
DeleteCode=RemoveToRecycleBin(strSelName);
if (!DeleteCode)
Message(MSG_WARNING|MSG_ERRORTYPE,1,MSG(MError),
MSG(MCannotDeleteFolder),strSelName,MSG(MOk));
else
{
TreeList::DelTreeName(strSelName);
if (UpdateDiz)
SrcPanel->DeleteDiz(strSelName,strSelShortName);
}
}
}
}
else
{
int AskCode=AskDeleteReadOnly(strSelName,FileAttr,Wipe);
if (AskCode==DELETE_CANCEL)
break;
if (AskCode==DELETE_YES)
{
int DeleteCode=ShellRemoveFile(strSelName,Wipe);
if (DeleteCode==DELETE_SUCCESS && UpdateDiz)
{
SrcPanel->DeleteDiz(strSelName,strSelShortName);
}
if (DeleteCode==DELETE_CANCEL)
break;
}
}
}
}
if (UpdateDiz)
if (DizPresent==(!strDizName.IsEmpty() && apiGetFileAttributes(strDizName)!=INVALID_FILE_ATTRIBUTES))
SrcPanel->FlushDiz();
delete DeleteTitle;
done:
Opt.DeleteToRecycleBin=Opt_DeleteToRecycleBin;
// Разрешить перерисовку фрейма
FrameFromLaunched->Unlock();
if (NeedUpdate)
{
ShellUpdatePanels(SrcPanel,NeedSetUpADir);
}
}
int main()
{
goods *root = NULL;//pointer to the root product of the tree
goods **prev;
goods *product;
goods *search;
//pointers for freeing memory
goods *delete1;
goods *delete2;
int value;//star location
int q;
for(q = 0; q < 4; q++)
{
//save some products in memory
product = NULL;
product = malloc(sizeof(struct goods));
if(product != NULL)
{
if(q == 0)
{
strcpy(product->product_name, "APPLES");
product->code = 852;
product->price = 1.25;
product->supply = 30;
}
if(q == 1)
{
strcpy(product->product_name, "MILK");
product->code = 123;
product->price = 2;
product->supply = 30;
}
if(q == 2)
{
strcpy(product->product_name, "JUICE");
product->code = 121;
product->price = 2.39;
product->supply = 30;
}
if(q == 3)
{
strcpy(product->product_name, "CHOCOLATE");
product->code = 567;
product->price = 1.5;
product->supply = 30;
}
product->left = NULL;
product->right = NULL;
prev = &root;
search = root;
while(search != NULL)
{
if(search->code < product->code)
{
prev = &search->right;
search = search->right;
}
else if(search->code > product->code)
{
prev = &search->left;
search = search->left;
}
}
*prev = product;
}
else
{
printf("Not enough memory to start program!");
getch();
goto out;
}
}
do
{
value = Menu();
//turn on cursor
SetCursorType(NORMAL_CURSOR);
switch(value)
{
case 0: EnterProd(&root);
break;
case 1: DeleteProd(&root);
break;
case 2: FindProd(&root);
break;
case 3: SellProd(&root);
break;
case 4: DisplayProd(&root);
break;
case 5: LoadProd(&root);
break;
case 6: SaveProd(&root);
break;
case 7: CheckSave(z, &root);
break;
}
}while(value != 7);
out:;
//free allocated memory for all products with a help of recursion
FreeBST(root);
root = NULL;
return 0;
}
void HMenu::DisplayObject()
{
SetScreen(X1,Y1,X2,Y2,L' ',ColorIndexToColor(COL_HMENUTEXT));
SetCursorType(0,10);
ShowMenu();
}
/* read in a command line */
BOOL ReadCommand(LPTSTR str, INT maxlen)
{
CONSOLE_SCREEN_BUFFER_INFO csbi;
SHORT orgx; /* origin x/y */
SHORT orgy;
SHORT curx; /*current x/y cursor position*/
SHORT cury;
SHORT tempscreen;
INT count; /*used in some for loops*/
INT current = 0; /*the position of the cursor in the string (str)*/
INT charcount = 0;/*chars in the string (str)*/
INPUT_RECORD ir;
#ifdef FEATURE_UNIX_FILENAME_COMPLETION
WORD wLastKey = 0;
#endif
TCHAR ch;
BOOL bReturn = FALSE;
BOOL bCharInput;
#ifdef FEATURE_4NT_FILENAME_COMPLETION
TCHAR szPath[MAX_PATH];
#endif
#ifdef FEATURE_HISTORY
//BOOL bContinue=FALSE;/*is TRUE the second case will not be executed*/
TCHAR PreviousChar;
#endif
if (!GetConsoleScreenBufferInfo(GetStdHandle(STD_OUTPUT_HANDLE), &csbi))
{
/* No console */
HANDLE hStdin = GetStdHandle(STD_INPUT_HANDLE);
DWORD dwRead;
CHAR chr;
do
{
if (!ReadFile(hStdin, &chr, 1, &dwRead, NULL) || !dwRead)
return FALSE;
#ifdef _UNICODE
MultiByteToWideChar(InputCodePage, 0, &chr, 1, &str[charcount++], 1);
#endif
} while (chr != '\n' && charcount < maxlen);
str[charcount] = _T('\0');
return TRUE;
}
/* get screen size */
maxx = csbi.dwSize.X;
maxy = csbi.dwSize.Y;
curx = orgx = csbi.dwCursorPosition.X;
cury = orgy = csbi.dwCursorPosition.Y;
memset (str, 0, maxlen * sizeof (TCHAR));
SetCursorType (bInsert, TRUE);
do
{
bReturn = FALSE;
ConInKey (&ir);
if (ir.Event.KeyEvent.dwControlKeyState &
(RIGHT_ALT_PRESSED |LEFT_ALT_PRESSED|
RIGHT_CTRL_PRESSED|LEFT_CTRL_PRESSED) )
{
switch (ir.Event.KeyEvent.wVirtualKeyCode)
{
#ifdef FEATURE_HISTORY
case 'K':
/*add the current command line to the history*/
if (ir.Event.KeyEvent.dwControlKeyState &
(LEFT_CTRL_PRESSED|RIGHT_CTRL_PRESSED))
{
if (str[0])
History(0,str);
ClearCommandLine (str, maxlen, orgx, orgy);
current = charcount = 0;
curx = orgx;
cury = orgy;
//bContinue=TRUE;
break;
}
case 'D':
/*delete current history entry*/
if (ir.Event.KeyEvent.dwControlKeyState &
(LEFT_CTRL_PRESSED|RIGHT_CTRL_PRESSED))
{
ClearCommandLine (str, maxlen, orgx, orgy);
History_del_current_entry(str);
current = charcount = _tcslen (str);
ConOutPrintf (_T("%s"), str);
GetCursorXY (&curx, &cury);
//bContinue=TRUE;
break;
}
#endif /*FEATURE_HISTORY*/
}
}
bCharInput = FALSE;
switch (ir.Event.KeyEvent.wVirtualKeyCode)
{
case VK_BACK:
/* <BACKSPACE> - delete character to left of cursor */
if (current > 0 && charcount > 0)
{
if (current == charcount)
{
/* if at end of line */
str[current - 1] = _T('\0');
if (GetCursorX () != 0)
{
ConOutPrintf (_T("\b \b"));
curx--;
}
else
{
SetCursorXY ((SHORT)(maxx - 1), (SHORT)(GetCursorY () - 1));
ConOutChar (_T(' '));
SetCursorXY ((SHORT)(maxx - 1), (SHORT)(GetCursorY () - 1));
cury--;
curx = maxx - 1;
}
}
else
{
for (count = current - 1; count < charcount; count++)
str[count] = str[count + 1];
if (GetCursorX () != 0)
{
SetCursorXY ((SHORT)(GetCursorX () - 1), GetCursorY ());
curx--;
}
else
{
SetCursorXY ((SHORT)(maxx - 1), (SHORT)(GetCursorY () - 1));
cury--;
curx = maxx - 1;
}
GetCursorXY (&curx, &cury);
ConOutPrintf (_T("%s "), &str[current - 1]);
SetCursorXY (curx, cury);
}
charcount--;
current--;
}
break;
case VK_INSERT:
/* toggle insert/overstrike mode */
bInsert ^= TRUE;
SetCursorType (bInsert, TRUE);
break;
case VK_DELETE:
/* delete character under cursor */
if (current != charcount && charcount > 0)
{
for (count = current; count < charcount; count++)
str[count] = str[count + 1];
charcount--;
GetCursorXY (&curx, &cury);
ConOutPrintf (_T("%s "), &str[current]);
SetCursorXY (curx, cury);
}
break;
case VK_HOME:
/* goto beginning of string */
if (current != 0)
{
SetCursorXY (orgx, orgy);
curx = orgx;
cury = orgy;
current = 0;
}
break;
case VK_END:
/* goto end of string */
if (current != charcount)
{
SetCursorXY (orgx, orgy);
ConOutPrintf (_T("%s"), str);
GetCursorXY (&curx, &cury);
current = charcount;
}
break;
case VK_TAB:
#ifdef FEATURE_UNIX_FILENAME_COMPLETION
/* expand current file name */
if ((current == charcount) ||
(current == charcount - 1 &&
str[current] == _T('"'))) /* only works at end of line*/
{
if (wLastKey != VK_TAB)
{
/* if first TAB, complete filename*/
tempscreen = charcount;
CompleteFilename (str, charcount);
charcount = _tcslen (str);
current = charcount;
SetCursorXY (orgx, orgy);
ConOutPrintf (_T("%s"), str);
if (tempscreen > charcount)
{
GetCursorXY (&curx, &cury);
for (count = tempscreen - charcount; count--; )
ConOutChar (_T(' '));
SetCursorXY (curx, cury);
}
else
{
if (((charcount + orgx) / maxx) + orgy > maxy - 1)
orgy += maxy - ((charcount + orgx) / maxx + orgy + 1);
}
/* set cursor position */
SetCursorXY ((orgx + current) % maxx,
orgy + (orgx + current) / maxx);
GetCursorXY (&curx, &cury);
}
else
{
/*if second TAB, list matches*/
if (ShowCompletionMatches (str, charcount))
{
PrintPrompt();
GetCursorXY(&orgx, &orgy);
ConOutPrintf(_T("%s"), str);
/* set cursor position */
SetCursorXY((orgx + current) % maxx,
orgy + (orgx + current) / maxx);
GetCursorXY(&curx, &cury);
}
}
}
else
{
MessageBeep(-1);
}
#endif
#ifdef FEATURE_4NT_FILENAME_COMPLETION
/* used to later see if we went down to the next line */
tempscreen = charcount;
szPath[0]=_T('\0');
/* str is the whole things that is on the current line
that is and and out. arg 2 is weather it goes back
one file or forward one file */
CompleteFilename(str, !(ir.Event.KeyEvent.dwControlKeyState & SHIFT_PRESSED), szPath, current);
/* Attempt to clear the line */
ClearCommandLine (str, maxlen, orgx, orgy);
curx = orgx;
cury = orgy;
current = charcount = 0;
/* Everything is deleted, lets add it back in */
_tcscpy(str,szPath);
/* Figure out where cusor is going to be after we print it */
charcount = _tcslen(str);
current = charcount;
SetCursorXY(orgx, orgy);
/* Print out what we have now */
ConOutPrintf(_T("%s"), str);
/* Move cursor accordingly */
if (tempscreen > charcount)
{
GetCursorXY(&curx, &cury);
for(count = tempscreen - charcount; count--; )
ConOutChar(_T(' '));
SetCursorXY(curx, cury);
}
else
{
if (((charcount + orgx) / maxx) + orgy > maxy - 1)
orgy += maxy - ((charcount + orgx) / maxx + orgy + 1);
}
SetCursorXY((short)(((int)orgx + current) % maxx), (short)((int)orgy + ((int)orgx + current) / maxx));
GetCursorXY(&curx, &cury);
#endif
break;
case _T('M'):
case _T('C'):
/* ^M does the same as return */
bCharInput = TRUE;
if (!(ir.Event.KeyEvent.dwControlKeyState &
(RIGHT_CTRL_PRESSED|LEFT_CTRL_PRESSED)))
{
break;
}
case VK_RETURN:
/* end input, return to main */
#ifdef FEATURE_HISTORY
/* add to the history */
if (str[0])
History (0, str);
#endif
str[charcount++] = _T('\n');
str[charcount] = _T('\0');
ConOutChar(_T('\n'));
bReturn = TRUE;
break;
case VK_ESCAPE:
/* clear str Make this callable! */
ClearCommandLine (str, maxlen, orgx, orgy);
curx = orgx;
cury = orgy;
current = charcount = 0;
break;
#ifdef FEATURE_HISTORY
case VK_F3:
History_move_to_bottom();
#endif
case VK_UP:
#ifdef FEATURE_HISTORY
/* get previous command from buffer */
ClearCommandLine (str, maxlen, orgx, orgy);
History (-1, str);
current = charcount = _tcslen (str);
if (((charcount + orgx) / maxx) + orgy > maxy - 1)
orgy += maxy - ((charcount + orgx) / maxx + orgy + 1);
ConOutPrintf (_T("%s"), str);
GetCursorXY (&curx, &cury);
#endif
break;
case VK_DOWN:
#ifdef FEATURE_HISTORY
/* get next command from buffer */
ClearCommandLine (str, maxlen, orgx, orgy);
History (1, str);
current = charcount = _tcslen (str);
if (((charcount + orgx) / maxx) + orgy > maxy - 1)
orgy += maxy - ((charcount + orgx) / maxx + orgy + 1);
ConOutPrintf (_T("%s"), str);
GetCursorXY (&curx, &cury);
#endif
break;
case VK_LEFT:
/* move cursor left */
if (current > 0)
{
current--;
if (GetCursorX () == 0)
{
SetCursorXY ((SHORT)(maxx - 1), (SHORT)(GetCursorY () - 1));
curx = maxx - 1;
cury--;
}
else
{
SetCursorXY ((SHORT)(GetCursorX () - 1), GetCursorY ());
curx--;
}
}
else
{
MessageBeep (-1);
}
break;
case VK_RIGHT:
/* move cursor right */
if (current != charcount)
{
current++;
if (GetCursorX () == maxx - 1)
{
SetCursorXY (0, (SHORT)(GetCursorY () + 1));
curx = 0;
cury++;
}
else
{
SetCursorXY ((SHORT)(GetCursorX () + 1), GetCursorY ());
curx++;
}
}
#ifdef FEATURE_HISTORY
else
{
LPCTSTR last = PeekHistory(-1);
if (last && charcount < (INT)_tcslen (last))
{
PreviousChar = last[current];
ConOutChar(PreviousChar);
GetCursorXY(&curx, &cury);
str[current++] = PreviousChar;
charcount++;
}
}
#endif
break;
default:
/* This input is just a normal char */
bCharInput = TRUE;
}
#ifdef _UNICODE
ch = ir.Event.KeyEvent.uChar.UnicodeChar;
if (ch >= 32 && (charcount != (maxlen - 2)) && bCharInput)
#else
ch = ir.Event.KeyEvent.uChar.AsciiChar;
if ((UCHAR)ch >= 32 && (charcount != (maxlen - 2)) && bCharInput)
#endif /* _UNICODE */
{
/* insert character into string... */
if (bInsert && current != charcount)
{
/* If this character insertion will cause screen scrolling,
* adjust the saved origin of the command prompt. */
tempscreen = _tcslen(str + current) + curx;
if ((tempscreen % maxx) == (maxx - 1) &&
(tempscreen / maxx) + cury == (maxy - 1))
{
orgy--;
cury--;
}
for (count = charcount; count > current; count--)
str[count] = str[count - 1];
str[current++] = ch;
if (curx == maxx - 1)
curx = 0, cury++;
else
curx++;
ConOutPrintf (_T("%s"), &str[current - 1]);
SetCursorXY (curx, cury);
charcount++;
}
else
{
if (current == charcount)
charcount++;
str[current++] = ch;
if (GetCursorX () == maxx - 1 && GetCursorY () == maxy - 1)
orgy--, cury--;
if (GetCursorX () == maxx - 1)
curx = 0, cury++;
else
curx++;
ConOutChar (ch);
}
}
//wLastKey = ir.Event.KeyEvent.wVirtualKeyCode;
}
while (!bReturn);
SetCursorType (bInsert, TRUE);
#ifdef FEATURE_ALIASES
/* expand all aliases */
ExpandAlias (str, maxlen);
#endif /* FEATURE_ALIAS */
return TRUE;
}
void PrintFiles(Panel *SrcPanel)
{
_ALGO(CleverSysLog clv(L"Alt-F5 (PrintFiles)"));
string strPrinterName;
DWORD Needed,Returned;
int PrinterNumber;
DWORD FileAttr;
string strSelName;
long DirsCount=0;
int SelCount=SrcPanel->GetSelCount();
if (!SelCount)
{
_ALGO(SysLog(L"Error: !SelCount"));
return;
}
// проверка каталогов
_ALGO(SysLog(L"Check for FILE_ATTRIBUTE_DIRECTORY"));
SrcPanel->GetSelName(nullptr,FileAttr);
while (SrcPanel->GetSelName(&strSelName,FileAttr))
{
if (TestParentFolderName(strSelName) || (FileAttr & FILE_ATTRIBUTE_DIRECTORY))
DirsCount++;
}
if (DirsCount==SelCount)
return;
PRINTER_INFO *pi = nullptr;
if (EnumPrinters(PRINTER_ENUM_LOCAL|PRINTER_ENUM_CONNECTIONS,nullptr,PRINTER_INFO_LEVEL,nullptr,0,&Needed,&Returned) || Needed<=0)
return;
pi = (PRINTER_INFO *)xf_malloc(Needed);
if (!EnumPrinters(PRINTER_ENUM_LOCAL|PRINTER_ENUM_CONNECTIONS,nullptr,PRINTER_INFO_LEVEL,(LPBYTE)pi,Needed,&Needed,&Returned))
{
Message(MSG_WARNING|MSG_ERRORTYPE,1,MSG(MPrintTitle),MSG(MCannotEnumeratePrinters),MSG(MOk));
xf_free(pi);
return;
}
{
_ALGO(CleverSysLog clv2(L"Show Menu"));
string strTitle;
string strName;
if (SelCount==1)
{
SrcPanel->GetSelName(nullptr,FileAttr);
SrcPanel->GetSelName(&strName,FileAttr);
TruncStr(strName,50);
strSelName=strName;
InsertQuote(strSelName);
strTitle.Format(MSG(MPrintTo), strSelName.CPtr());
}
else
{
_ALGO(SysLog(L"Correct: SelCount-=DirsCount"));
SelCount-=DirsCount;
strTitle.Format(MSG(MPrintFilesTo),SelCount);
}
VMenu PrinterList(strTitle,nullptr,0,ScrY-4);
PrinterList.SetFlags(VMENU_WRAPMODE|VMENU_SHOWAMPERSAND);
PrinterList.SetPosition(-1,-1,0,0);
AddToPrintersMenu(&PrinterList,pi,Returned);
PrinterList.Process();
PrinterNumber=PrinterList.Modal::GetExitCode();
if (PrinterNumber<0)
{
xf_free(pi);
_ALGO(SysLog(L"ESC"));
return;
}
int nSize = PrinterList.GetUserDataSize();
wchar_t *PrinterName = strPrinterName.GetBuffer(nSize);
PrinterList.GetUserData(PrinterName, nSize);
strPrinterName.ReleaseBuffer();
}
HANDLE hPrinter;
if (!OpenPrinter((wchar_t*)strPrinterName.CPtr(),&hPrinter,nullptr))
{
Message(MSG_WARNING|MSG_ERRORTYPE,1,MSG(MPrintTitle),MSG(MCannotOpenPrinter),
strPrinterName,MSG(MOk));
xf_free(pi);
_ALGO(SysLog(L"Error: Cannot Open Printer"));
return;
}
{
_ALGO(CleverSysLog clv3(L"Print selected Files"));
//SaveScreen SaveScr;
TPreRedrawFuncGuard preRedrawFuncGuard(PR_PrintMsg);
SetCursorType(FALSE,0);
PR_PrintMsg();
HANDLE hPlugin=SrcPanel->GetPluginHandle();
int PluginMode=SrcPanel->GetMode()==PLUGIN_PANEL &&
!CtrlObject->Plugins.UseFarCommand(hPlugin,PLUGIN_FARGETFILE);
SrcPanel->GetSelName(nullptr,FileAttr);
while (SrcPanel->GetSelName(&strSelName,FileAttr))
{
if (TestParentFolderName(strSelName) || (FileAttr & FILE_ATTRIBUTE_DIRECTORY))
continue;
int Success=FALSE;
LPCWSTR FileName = nullptr;
string strTempDir, strTempName;
if (PluginMode)
{
if (FarMkTempEx(strTempDir))
{
apiCreateDirectory(strTempDir,nullptr);
FileListItem ListItem;
if (SrcPanel->GetLastSelectedItem(&ListItem))
{
PluginPanelItem PanelItem;
FileList::FileListToPluginItem(&ListItem,&PanelItem);
if (CtrlObject->Plugins.GetFile(hPlugin,&PanelItem,strTempDir,strTempName,OPM_SILENT))
FileName = strTempName;
else
apiRemoveDirectory(strTempDir);
FileList::FreePluginPanelItem(&PanelItem);
}
}
}
else
FileName = strSelName;
File SrcFile;
if(SrcFile.Open(FileName, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE, nullptr, OPEN_EXISTING))
{
DOC_INFO_1 di1 = {const_cast<LPWSTR>(FileName)};
if (StartDocPrinter(hPrinter,1,(LPBYTE)&di1))
{
char Buffer[8192];
DWORD Read,Written;
Success=TRUE;
while (SrcFile.Read(Buffer, sizeof(Buffer), Read) && Read > 0)
if (!WritePrinter(hPrinter,Buffer,Read,&Written))
{
Success=FALSE;
break;
}
EndDocPrinter(hPrinter);
}
SrcFile.Close();
}
if (!strTempName.IsEmpty())
{
DeleteFileWithFolder(strTempName);
}
if (Success)
SrcPanel->ClearLastGetSelection();
else
{
if (Message(MSG_WARNING|MSG_ERRORTYPE,2,MSG(MPrintTitle),MSG(MCannotPrint),
strSelName,MSG(MSkip),MSG(MCancel)))
break;
}
}
ClosePrinter(hPrinter);
}
SrcPanel->Redraw();
xf_free(pi);
}
void PrintFiles(FileList* SrcPanel)
{
_ALGO(CleverSysLog clv(L"Alt-F5 (PrintFiles)"));
string strPrinterName;
DWORD Needed = 0, Returned;
DWORD FileAttr;
string strSelName;
size_t DirsCount=0;
size_t SelCount=SrcPanel->GetSelCount();
if (!SelCount)
{
_ALGO(SysLog(L"Error: !SelCount"));
return;
}
// проверка каталогов
_ALGO(SysLog(L"Check for FILE_ATTRIBUTE_DIRECTORY"));
SrcPanel->GetSelName(nullptr,FileAttr);
while (SrcPanel->GetSelName(&strSelName,FileAttr))
{
if (TestParentFolderName(strSelName) || (FileAttr & FILE_ATTRIBUTE_DIRECTORY))
DirsCount++;
}
if (DirsCount==SelCount)
return;
EnumPrinters(PRINTER_ENUM_LOCAL | PRINTER_ENUM_CONNECTIONS, nullptr, PRINTER_INFO_LEVEL, nullptr, 0, &Needed, &Returned);
if (!Needed)
return;
block_ptr<PRINTER_INFO> pi(Needed);
if (!EnumPrinters(PRINTER_ENUM_LOCAL|PRINTER_ENUM_CONNECTIONS,nullptr,PRINTER_INFO_LEVEL,(LPBYTE)pi.get(),Needed,&Needed,&Returned))
{
Global->CatchError();
Message(MSG_WARNING|MSG_ERRORTYPE,1,MSG(MPrintTitle),MSG(MCannotEnumeratePrinters),MSG(MOk));
return;
}
{
_ALGO(CleverSysLog clv2(L"Show Menu"));
LangString strTitle;
string strName;
if (SelCount==1)
{
SrcPanel->GetSelName(nullptr,FileAttr);
SrcPanel->GetSelName(&strName,FileAttr);
strSelName = TruncStr(strName,50);
strTitle = MPrintTo;
strTitle << InsertQuote(strSelName);
}
else
{
_ALGO(SysLog(L"Correct: SelCount-=DirsCount"));
SelCount-=DirsCount;
strTitle = MPrintFilesTo;
strTitle << SelCount;
}
VMenu2 PrinterList(strTitle,nullptr,0,ScrY-4);
PrinterList.SetFlags(VMENU_WRAPMODE|VMENU_SHOWAMPERSAND);
PrinterList.SetPosition(-1,-1,0,0);
AddToPrintersMenu(&PrinterList,pi.get(),Returned);
if (PrinterList.Run()<0)
{
_ALGO(SysLog(L"ESC"));
return;
}
strPrinterName = NullToEmpty(static_cast<const wchar_t*>(PrinterList.GetUserData(nullptr, 0)));
}
HANDLE hPrinter;
if (!OpenPrinter(UNSAFE_CSTR(strPrinterName), &hPrinter,nullptr))
{
Global->CatchError();
Message(MSG_WARNING|MSG_ERRORTYPE,1,MSG(MPrintTitle),MSG(MCannotOpenPrinter),
strPrinterName.data(),MSG(MOk));
_ALGO(SysLog(L"Error: Cannot Open Printer"));
return;
}
{
_ALGO(CleverSysLog clv3(L"Print selected Files"));
SCOPED_ACTION(SaveScreen);
auto PR_PrintMsg = [](){ Message(0, 0, MSG(MPrintTitle), MSG(MPreparingForPrinting)); };
SCOPED_ACTION(TPreRedrawFuncGuard)(std::make_unique<PreRedrawItem>(PR_PrintMsg));
SetCursorType(false, 0);
PR_PrintMsg();
auto hPlugin=SrcPanel->GetPluginHandle();
int PluginMode=SrcPanel->GetMode()==PLUGIN_PANEL &&
!Global->CtrlObject->Plugins->UseFarCommand(hPlugin,PLUGIN_FARGETFILE);
SrcPanel->GetSelName(nullptr,FileAttr);
while (SrcPanel->GetSelName(&strSelName,FileAttr))
{
if (TestParentFolderName(strSelName) || (FileAttr & FILE_ATTRIBUTE_DIRECTORY))
continue;
int Success=FALSE;
string FileName;
string strTempDir, strTempName;
if (PluginMode)
{
if (FarMkTempEx(strTempDir))
{
api::CreateDirectory(strTempDir,nullptr);
auto ListItem = SrcPanel->GetLastSelectedItem();
if (ListItem)
{
PluginPanelItem PanelItem;
FileList::FileListToPluginItem(*ListItem, &PanelItem);
if (Global->CtrlObject->Plugins->GetFile(hPlugin,&PanelItem,strTempDir,strTempName,OPM_SILENT))
FileName = strTempName;
else
api::RemoveDirectory(strTempDir);
FreePluginPanelItem(PanelItem);
}
}
}
else
FileName = strSelName;
api::File SrcFile;
if(SrcFile.Open(FileName, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE, nullptr, OPEN_EXISTING))
{
DOC_INFO_1 di1 = {UNSAFE_CSTR(FileName)};
if (StartDocPrinter(hPrinter,1,(LPBYTE)&di1))
{
char Buffer[8192];
DWORD Read,Written;
Success=TRUE;
while (SrcFile.Read(Buffer, sizeof(Buffer), Read) && Read > 0)
if (!WritePrinter(hPrinter,Buffer,Read,&Written))
{
Global->CatchError();
Success=FALSE;
break;
}
EndDocPrinter(hPrinter);
}
SrcFile.Close();
}
if (!strTempName.empty())
{
DeleteFileWithFolder(strTempName);
}
if (Success)
SrcPanel->ClearLastGetSelection();
else
{
if (Message(MSG_WARNING|MSG_ERRORTYPE,2,MSG(MPrintTitle),MSG(MCannotPrint),
strSelName.data(),MSG(MSkip),MSG(MCancel)))
break;
}
}
ClosePrinter(hPrinter);
}
SrcPanel->Redraw();
}
int FileViewer::ProcessKey(int Key)
{
if (RedrawTitle && (((unsigned int)Key & 0x00ffffff) < KEY_END_FKEY || IsInternalKeyReal((unsigned int)Key & 0x00ffffff)))
ShowConsoleTitle();
if (Key!=KEY_F3 && Key!=KEY_IDLE)
F3KeyOnly=false;
switch (Key)
{
#if 0
/* $ 30.05.2003 SVS
Фича :-) Shift-F4 в редакторе/вьювере позволяет открывать другой редактор/вьювер
Пока закомментим
*/
case KEY_SHIFTF4:
{
if (!Opt.OnlyEditorViewerUsed)
CtrlObject->Cp()->ActivePanel->ProcessKey(Key);
return TRUE;
}
#endif
/* $ 22.07.2000 tran
+ выход по ctrl-f10 с установкой курсора на файл */
case KEY_CTRLF10:
case KEY_RCTRLF10:
{
if (View.isTemporary())
{
return TRUE;
}
SaveScreen Sc;
string strFileName;
View.GetFileName(strFileName);
CtrlObject->Cp()->GoToFile(strFileName);
RedrawTitle = TRUE;
return (TRUE);
}
// $ 15.07.2000 tran + CtrlB switch KeyBar
case KEY_CTRLB:
case KEY_RCTRLB:
Opt.ViOpt.ShowKeyBar=!Opt.ViOpt.ShowKeyBar;
if (Opt.ViOpt.ShowKeyBar)
ViewKeyBar.Show();
else
ViewKeyBar.Hide0(); // 0 mean - Don't purge saved screen
Show();
KeyBarVisible = Opt.ViOpt.ShowKeyBar;
return (TRUE);
case KEY_CTRLSHIFTB:
case KEY_RCTRLSHIFTB:
{
Opt.ViOpt.ShowTitleBar=!Opt.ViOpt.ShowTitleBar;
TitleBarVisible = Opt.ViOpt.ShowTitleBar;
Show();
return (TRUE);
}
case KEY_CTRLO:
case KEY_RCTRLO:
if (!Opt.OnlyEditorViewerUsed)
{
if (FrameManager->ShowBackground())
{
SetCursorType(FALSE,0);
WaitKey();
FrameManager->RefreshFrame();
}
}
return TRUE;
case KEY_F3:
case KEY_NUMPAD5: case KEY_SHIFTNUMPAD5:
if (F3KeyOnly)
return TRUE;
case KEY_ESC:
case KEY_F10:
FrameManager->DeleteFrame();
return TRUE;
case KEY_F6:
if (!DisableEdit)
{
UINT cp=View.VM.CodePage;
string strViewFileName;
View.GetFileName(strViewFileName);
File Edit;
while(!Edit.Open(strViewFileName, FILE_READ_DATA, FILE_SHARE_READ|(Opt.EdOpt.EditOpenedForWrite?FILE_SHARE_WRITE:0), nullptr, OPEN_EXISTING, FILE_FLAG_SEQUENTIAL_SCAN))
{
if(!OperationFailed(strViewFileName, MEditTitle, MSG(MEditCannotOpen), false))
continue;
else
return TRUE;
}
Edit.Close();
__int64 FilePos=View.GetFilePos();
DWORD flags = (GetCanLoseFocus()?FFILEEDIT_ENABLEF6:0)|(SaveToSaveAs?FFILEEDIT_SAVETOSAVEAS:0)|(DisableHistory?FFILEEDIT_DISABLEHISTORY:0);
FileEditor *ShellEditor = new FileEditor(
strViewFileName, cp, flags, -2,
static_cast<int>(FilePos), // TODO: Editor StartChar should be __int64
str_title.IsEmpty() ? nullptr: &str_title,
-1,-1, -1, -1, delete_on_close );
ShellEditor->SetEnableF6(TRUE);
/* $ 07.05.2001 DJ сохраняем NamesList */
ShellEditor->SetNamesList(View.GetNamesList());
// Если переключаемся в редактор, то удалять файл уже не нужно
SetTempViewName(L"");
SetExitCode(0);
FrameManager->DeleteFrame(this); // Insert уже есть внутри конструктора
ShowTime(2);
}
return TRUE;
case KEY_ALTSHIFTF9:
case KEY_RALTSHIFTF9:
// Работа с локальной копией ViewerOptions
ViewerConfig(View.ViOpt, true);
if (Opt.ViOpt.ShowKeyBar)
ViewKeyBar.Show();
View.Show();
return TRUE;
case KEY_ALTF11:
case KEY_RALTF11:
if (GetCanLoseFocus())
CtrlObject->CmdLine->ShowViewEditHistory();
return TRUE;
default:
// Этот кусок - на будущее (по аналогии с редактором :-)
// if (CtrlObject->Macro.IsExecuting() || !View.ProcessViewerInput(&ReadRec))
{
/* $ 22.03.2001 SVS
Это помогло от залипания :-)
*/
if (!CtrlObject->Macro.IsExecuting())
if (Opt.ViOpt.ShowKeyBar)
ViewKeyBar.Show();
if (!ViewKeyBar.ProcessKey(Key))
return(View.ProcessKey(Key));
}
return TRUE;
}
}
void DizList::Read(const string& Path, const string* DizName)
{
Reset();
struct DizPreRedrawItem : public PreRedrawItem
{
DizPreRedrawItem() : PreRedrawItem(PR_ReadingMsg) {}
};
SCOPED_ACTION(TPreRedrawFuncGuard)(std::make_unique<DizPreRedrawItem>());
const wchar_t *NamePtr=Global->Opt->Diz.strListNames.data();
for (;;)
{
if (DizName)
{
strDizFileName = *DizName;
}
else
{
strDizFileName = Path;
if (!PathCanHoldRegularFile(strDizFileName))
break;
string strArgName;
NamePtr = GetCommaWord(NamePtr, strArgName);
if (!NamePtr)
break;
AddEndSlash(strDizFileName);
strDizFileName += strArgName;
}
os::fs::file DizFile;
if (DizFile.Open(strDizFileName,GENERIC_READ, FILE_SHARE_READ, nullptr, OPEN_EXISTING))
{
clock_t StartTime=clock();
uintptr_t CodePage=CP_DEFAULT;
bool bSigFound=false;
if (!GetFileFormat(DizFile,CodePage,&bSigFound,false) || !bSigFound)
CodePage = Global->Opt->Diz.AnsiByDefault ? CP_ACP : CP_OEMCP;
GetFileString GetStr(DizFile, CodePage);
auto LastAdded = DizData.end();
string DizText;
while (GetStr.GetString(DizText))
{
if (!(DizData.size() & 127) && clock() - StartTime > CLOCKS_PER_SEC)
{
SetCursorType(false, 0);
PR_ReadingMsg();
if (CheckForEsc())
break;
}
RemoveTrailingSpaces(DizText);
if (!DizText.empty())
{
if(!IsSpace(DizText.front()))
{
LastAdded = AddRecord(DizText);
}
else
{
if (LastAdded != DizData.end())
{
LastAdded->second.emplace_back(DizText);
}
}
}
}
OrigCodePage=CodePage;
Modified=false;
DizFile.Close();
return;
}
if (DizName)
break;
}
Modified=false;
strDizFileName.clear();
}
int Message(
DWORD Flags,
size_t Buttons,
const wchar_t *Title,
const wchar_t * const *Items,
size_t ItemsNumber,
Plugin* PluginNumber,
const GUID* Id
)
{
string strTempStr;
string strClipText;
int X1,Y1,X2,Y2;
int Length, BtnLength;
DWORD I, MaxLength, StrCount;
BOOL ErrorSets=FALSE;
const wchar_t **Str;
wchar_t *PtrStr;
const wchar_t *CPtrStr;
string strErrStr;
IsWarningStyle = (Flags&MSG_WARNING) != 0;
IsErrorType = (Flags&MSG_ERRORTYPE) != 0;
if(IsErrorType)
{
LastError = GetLastError();
NtStatus = ifn.RtlGetLastNtStatus();
ErrorSets = GetErrorString(strErrStr);
}
#if 1 // try to replace inserts
if (Items && 0 != (Flags & MSG_INSERT_STRINGS))
{
string str_err(strErrStr);
DWORD insert_mask = 0;
size_t len = strErrStr.GetLength(), pos = 0, inserts_n = 0, inserts[10];
for (size_t i = 1; i <= ItemsNumber-Buttons; ++i)
{
if (0 != (Flags & MSG_INSERT_STR(i)))
{
inserts[inserts_n++] = i;
if (inserts_n >= ARRAYSIZE(inserts))
break;
}
}
while (str_err.Pos(pos, L"%", pos))
{
if (pos >= len-1)
break;
if (str_err.At(pos+1) >= L'1' && str_err.At(pos+1) <= L'9')
{
size_t insert_i = 0, pos1 = pos+1;
while (pos1 < len && str_err.At(pos1) >= L'0' && str_err.At(pos1) <= L'9')
{
insert_i = 10*insert_i + str_err.At(pos1) - L'0';
++pos1;
}
if (insert_i >= 1 && insert_i <= inserts_n)
{
insert_mask |= MSG_INSERT_STR(inserts[insert_i-1]);
const wchar_t *replacement = Items[inserts[insert_i-1]-1];
str_err.Replace(pos,pos1-pos,replacement);
len += wcslen(replacement) - (pos1-pos);
pos += wcslen(replacement) - (pos1-pos);
}
else
pos = pos1;
}
else if (str_err.At(pos+1) == L'%') // "%%"
pos += 2;
else
++pos;
}
if (insert_mask == (Flags & MSG_INSERT_STRINGS))
strErrStr = str_err;
}
#endif
// выделим пам¤ть под рабочий массив указателей на строки (+запас 16)
Str=(const wchar_t **)xf_malloc((ItemsNumber+ADDSPACEFORPSTRFORMESSAGE) * sizeof(wchar_t*));
if (!Str)
return -1;
StrCount=static_cast<DWORD>(ItemsNumber-Buttons);
// предварительный обсчет максимального размера.
for (BtnLength=0,I=0; I<static_cast<DWORD>(Buttons); I++) //??
{
BtnLength+=HiStrlen(Items[I+StrCount])+2+2+1; // "[ ", " ]", " "
}
if(BtnLength)
{
BtnLength--;
}
DWORD MAX_WIDTH_MESSAGE = Max(ScrX-1-5-5, BtnLength);
for (MaxLength=BtnLength,I=0; I<StrCount; I++)
{
if (static_cast<DWORD>(Length=StrLength(Items[I]))>MaxLength)
MaxLength=Length;
}
// учтем размер заголовка
if (Title && *Title)
{
I=(DWORD)StrLength(Title)+2;
if (MaxLength < I)
MaxLength=I;
strClipText.Append(Title).Append(L"\r\n\r\n");
}
// перва¤ коррекци¤ максимального размера
MaxLength = Min(MaxLength, MAX_WIDTH_MESSAGE);
// теперь обработаем MSG_ERRORTYPE
DWORD CountErrorLine=0;
if ((Flags & MSG_ERRORTYPE) && ErrorSets)
{
strClipText.Append(strErrStr).Append(L"\r\n");
// подсчет количества строк во врапенном сообщениеи
++CountErrorLine;
//InsertQuote(ErrStr); // оквочим
// вычисление "красивого" размера
DWORD LenErrStr=(DWORD)strErrStr.GetLength();
if (LenErrStr > MAX_WIDTH_MESSAGE)
{
// половина меньше?
if (LenErrStr/2 < MAX_WIDTH_MESSAGE)
{
// а половина + 1/3?
if ((LenErrStr+LenErrStr/3)/2 < MAX_WIDTH_MESSAGE)
LenErrStr=(LenErrStr+LenErrStr/3)/2;
else
LenErrStr/=2;
}
else
LenErrStr=MAX_WIDTH_MESSAGE;
}
MaxLength = Max(MaxLength, LenErrStr);
// а теперь проврапим
FarFormatText(strErrStr,LenErrStr,strErrStr,L"\n",0); //?? MaxLength ??
PtrStr = strErrStr.GetBuffer();
//BUGBUG: string не предназначен дл¤ хранени¤ строк разделЄнных \0
while ((PtrStr=wcschr(PtrStr,L'\n')) )
{
*PtrStr++=0;
if (*PtrStr)
CountErrorLine++;
}
strErrStr.ReleaseBuffer();
if (CountErrorLine > ADDSPACEFORPSTRFORMESSAGE)
CountErrorLine=ADDSPACEFORPSTRFORMESSAGE; //??
}
//BUGBUG: string не предназначен дл¤ хранени¤ строк разделЄнных \0
// заполн¤ем массив...
CPtrStr=strErrStr;
for (I=0; I < CountErrorLine; I++)
{
Str[I]=CPtrStr;
CPtrStr+=StrLength(CPtrStr)+1;
if (!*CPtrStr) // два идущих подр¤д нул¤ - "хандец" всему
{
++I;
break;
}
}
bool EmptyText=false;
if(ItemsNumber==Buttons && !I)
{
EmptyText=true;
Str[I]=L"";
I++;
StrCount++;
ItemsNumber++;
}
for (size_t J=0; J < ItemsNumber-(EmptyText?1:0); ++J, ++I)
{
Str[I]=Items[J];
}
for (size_t i = 0; i < ItemsNumber-Buttons; ++i)
{
strClipText.Append(Items[i]).Append(L"\r\n");
}
strClipText.Append(L"\r\n");
for (size_t i = ItemsNumber-Buttons; i < ItemsNumber; ++i)
{
if(i > ItemsNumber-Buttons)
{
strClipText.Append(L' ');
}
strClipText.Append(Items[i]);
}
StrCount+=CountErrorLine;
MessageX1=X1=(int(ScrX-MaxLength))/2-4;
MessageX2=X2=X1+MaxLength+9;
Y1=(ScrY-static_cast<int>(StrCount))/2-2;
if (Y1 < 0)
Y1=0;
MessageY1=Y1;
MessageY2=Y2=Y1+StrCount+3;
string strHelpTopic(strMsgHelpTopic);
strMsgHelpTopic.Clear();
// *** ¬ариант с ƒиалогом ***
if (Buttons>0)
{
size_t ItemCount=StrCount+Buttons+1;
DialogItemEx *PtrMsgDlg;
DialogItemEx *MsgDlg = new DialogItemEx[ItemCount+1];
if (!MsgDlg)
{
xf_free(Str);
return -1;
}
for (DWORD i=0; i<ItemCount+1; i++)
MsgDlg[i].Clear();
int RetCode;
MessageY2=++Y2;
MsgDlg[0].Type=DI_DOUBLEBOX;
MsgDlg[0].X1=3;
MsgDlg[0].Y1=1;
MsgDlg[0].X2=X2-X1-3;
MsgDlg[0].Y2=Y2-Y1-1;
if (Title && *Title)
MsgDlg[0].strData = Title;
FARDIALOGITEMTYPES TypeItem=DI_TEXT;
unsigned __int64 FlagsItem=DIF_SHOWAMPERSAND;
BOOL IsButton=FALSE;
int CurItem=0;
bool StrSeparator=false;
bool Separator=false;
for (PtrMsgDlg=MsgDlg+1,I=1; I < ItemCount; ++I, ++PtrMsgDlg, ++CurItem)
{
if (I==StrCount+1 && !StrSeparator && !Separator)
{
PtrMsgDlg->Type=DI_TEXT;
PtrMsgDlg->Flags=DIF_SEPARATOR;
PtrMsgDlg->Y1=PtrMsgDlg->Y2=I+1;
CurItem--;
I--;
Separator=true;
continue;
}
if(I==StrCount+1)
{
TypeItem=DI_BUTTON;
FlagsItem=DIF_CENTERGROUP|DIF_DEFAULTBUTTON|DIF_FOCUS;
IsButton=TRUE;
FirstButtonIndex=CurItem+1;
LastButtonIndex=CurItem;
}
else
{
FlagsItem&=~DIF_DEFAULTBUTTON;
}
PtrMsgDlg->Type=TypeItem;
PtrMsgDlg->Flags|=FlagsItem;
CPtrStr=Str[CurItem];
if (IsButton)
{
PtrMsgDlg->Y1=Y2-Y1-2+(Separator?1:0);
PtrMsgDlg->strData+=CPtrStr;
LastButtonIndex++;
}
else
{
PtrMsgDlg->X1=(Flags & MSG_LEFTALIGN)?5:-1;
PtrMsgDlg->Y1=I+1;
wchar_t Chr=*CPtrStr;
if (Chr == L'\1' || Chr == L'\2')
{
CPtrStr++;
PtrMsgDlg->Flags|=(Chr==2?DIF_SEPARATOR2:DIF_SEPARATOR);
if(I==StrCount)
{
StrSeparator=true;
}
}
else
{
if (StrLength(CPtrStr)>X2-X1-9)
{
PtrMsgDlg->Type=DI_EDIT;
PtrMsgDlg->Flags|=DIF_READONLY|DIF_BTNNOCLOSE|DIF_SELECTONENTRY;
PtrMsgDlg->X1=5;
PtrMsgDlg->X2=X2-X1-5;
PtrMsgDlg->strData=CPtrStr;
}
else
{
//xstrncpy(PtrMsgDlg->Data,CPtrStr,Min((int)MAX_WIDTH_MESSAGE,(int)sizeof(PtrMsgDlg->Data))); //?? ScrX-15 ??
PtrMsgDlg->strData = CPtrStr; //BUGBUG, wrong len
}
}
}
}
{
if(Separator)
{
FirstButtonIndex++;
LastButtonIndex++;
MessageY2++;
Y2++;
MsgDlg[0].Y2++;
ItemCount++;
}
Dialog Dlg(MsgDlg,ItemCount,MsgDlgProc, &strClipText);
if (X1 == -1) X1 = 0;
if (Y1 == -1) Y1 = 0;
Dlg.SetPosition(X1,Y1,X2,Y2);
if(Id) Dlg.SetId(*Id);
if (!strHelpTopic.IsEmpty())
Dlg.SetHelp(strHelpTopic);
Dlg.SetPluginOwner(reinterpret_cast<Plugin*>(PluginNumber)); // «апомним номер плагина
if (IsWarningStyle)
{
Dlg.SetDialogMode(DMODE_WARNINGSTYLE);
}
Dlg.SetDialogMode(DMODE_MSGINTERNAL);
if (Flags & MSG_NOPLUGINS)
Dlg.SetDialogMode(DMODE_NOPLUGINS);
FlushInputBuffer();
if (Flags & MSG_KILLSAVESCREEN)
SendDlgMessage((HANDLE)&Dlg,DM_KILLSAVESCREEN,0,0);
Dlg.Process();
RetCode=Dlg.GetExitCode();
}
delete [] MsgDlg;
xf_free(Str);
return(RetCode<0?RetCode:RetCode-StrCount-1-(Separator?1:0));
}
// *** Ѕез ƒиалога! ***
SetCursorType(0,0);
if (!(Flags & MSG_KEEPBACKGROUND))
{
SetScreen(X1,Y1,X2,Y2,L' ',ColorIndexToColor((Flags & MSG_WARNING)?COL_WARNDIALOGTEXT:COL_DIALOGTEXT));
MakeShadow(X1+2,Y2+1,X2+2,Y2+1);
MakeShadow(X2+1,Y1+1,X2+2,Y2+1);
Box(X1+3,Y1+1,X2-3,Y2-1,ColorIndexToColor((Flags & MSG_WARNING)?COL_WARNDIALOGBOX:COL_DIALOGBOX),DOUBLE_BOX);
}
SetColor((Flags & MSG_WARNING)?COL_WARNDIALOGTEXT:COL_DIALOGTEXT);
if (Title && *Title)
{
string strTempTitle = Title;
if (strTempTitle.GetLength() > MaxLength)
strTempTitle.SetLength(MaxLength);
GotoXY(X1+(X2-X1-1-(int)strTempTitle.GetLength())/2,Y1+1);
FS<<L" "<<strTempTitle<<L" ";
}
for (I=0; I<StrCount; I++)
{
CPtrStr=Str[I];
wchar_t Chr=*CPtrStr;
if (Chr == 1 || Chr == 2)
{
Length=X2-X1-5;
if (Length>1)
{
SetColor((Flags & MSG_WARNING)?COL_WARNDIALOGBOX:COL_DIALOGBOX);
GotoXY(X1+3,Y1+I+2);
DrawLine(Length,(Chr == 2?3:1));
CPtrStr++;
int TextLength=StrLength(CPtrStr);
if (TextLength<Length)
{
GotoXY(X1+3+(Length-TextLength)/2,Y1+I+2);
Text(CPtrStr);
}
SetColor((Flags & MSG_WARNING)?COL_WARNDIALOGBOX:COL_DIALOGTEXT);
}
continue;
}
if ((Length=StrLength(CPtrStr))>ScrX-15)
Length=ScrX-15;
int Width=X2-X1+1;
wchar_t *lpwszTemp = nullptr;
int PosX;
if (Flags & MSG_LEFTALIGN)
{
lpwszTemp = (wchar_t*)xf_malloc((Width-10+1)*sizeof(wchar_t));
_snwprintf(lpwszTemp,Width-10+1,L"%.*s",Width-10,CPtrStr);
GotoXY(X1+5,Y1+I+2);
}
else
{
PosX=X1+(Width-Length)/2;
lpwszTemp = (wchar_t*)xf_malloc((PosX-X1-4+Length+X2-PosX-Length-3+1)*sizeof(wchar_t));
_snwprintf(lpwszTemp,PosX-X1-4+Length+X2-PosX-Length-3+1,L"%*s%.*s%*s",PosX-X1-4,L"",Length,CPtrStr,X2-PosX-Length-3,L"");
GotoXY(X1+4,Y1+I+2);
}
Text(lpwszTemp);
xf_free(lpwszTemp);
}
/* $ 13.01.2003 IS
- ѕринудительно уберем запрет отрисовки экрана, если количество кнопок
в сообщении равно нулю и макрос закончил выполн¤тьс¤. Ёто необходимо,
чтобы заработал прогресс-бар от плагина, который был запущен при помощи
макроса запретом отрисовки (bugz#533).
*/
xf_free(Str);
if (!Buttons)
{
if (ScrBuf.GetLockCount()>0 && !CtrlObject->Macro.PeekKey())
ScrBuf.SetLockCount(0);
ScrBuf.Flush();
}
return 0;
}
void DizList::Read(const string& Path, const string* DizName)
{
Reset();
TPreRedrawFuncGuard preRedrawFuncGuard(DizList::PR_ReadingMsg);
const wchar_t *NamePtr=Opt.Diz.strListNames;
for (;;)
{
if (DizName)
{
strDizFileName = *DizName;
}
else
{
strDizFileName = Path;
if (!PathCanHoldRegularFile(strDizFileName))
break;
string strArgName;
if (!(NamePtr=GetCommaWord(NamePtr,strArgName)))
break;
AddEndSlash(strDizFileName);
strDizFileName += strArgName;
}
File DizFile;
if (DizFile.Open(strDizFileName,GENERIC_READ, FILE_SHARE_READ, nullptr, OPEN_EXISTING))
{
GetFileString GetStr(DizFile);
wchar_t *DizText;
int DizLength;
clock_t StartTime=clock();
uintptr_t CodePage=CP_DEFAULT;
bool bSigFound=false;
if (!GetFileFormat(DizFile,CodePage,&bSigFound,false) || !bSigFound)
CodePage = Opt.Diz.AnsiByDefault ? CP_ACP : CP_OEMCP;
while (GetStr.GetString(&DizText, CodePage, DizLength) > 0)
{
if (!(DizCount & 127) && clock()-StartTime>1000)
{
SetCursorType(FALSE,0);
PR_ReadingMsg();
if (CheckForEsc())
break;
}
RemoveTrailingSpaces(DizText);
if (*DizText)
AddRecord(DizText);
}
OrigCodePage=CodePage;
Modified=false;
DizFile.Close();
return;
}
if (DizName)
break;
}
Modified=false;
strDizFileName.Clear();
}
int FileViewer::ProcessKey(int Key)
{
if (RedrawTitle && (((unsigned int)Key & 0x00ffffff) < KEY_END_FKEY || IS_INTERNAL_KEY_REAL((unsigned int)Key & 0x00ffffff)))
ShowConsoleTitle();
if (Key!=KEY_F3 && Key!=KEY_IDLE)
F3KeyOnly=false;
switch (Key)
{
#if 0
/* $ 30.05.2003 SVS
Фича :-) Shift-F4 в редакторе/вьювере позволяет открывать другой редактор/вьювер
Пока закомментим
*/
case KEY_SHIFTF4:
{
if (!Opt.OnlyEditorViewerUsed)
CtrlObject->Cp()->ActivePanel->ProcessKey(Key);
return TRUE;
}
#endif
/* $ 22.07.2000 tran
+ выход по ctrl-f10 с установкой курсора на файл */
case KEY_CTRLF10:
{
if (View.isTemporary())
{
return TRUE;
}
SaveScreen Sc;
string strFileName;
View.GetFileName(strFileName);
CtrlObject->Cp()->GoToFile(strFileName);
RedrawTitle = TRUE;
return (TRUE);
}
// $ 15.07.2000 tran + CtrlB switch KeyBar
case KEY_CTRLB:
Opt.ViOpt.ShowKeyBar=!Opt.ViOpt.ShowKeyBar;
if (Opt.ViOpt.ShowKeyBar)
ViewKeyBar.Show();
else
ViewKeyBar.Hide0(); // 0 mean - Don't purge saved screen
Show();
KeyBarVisible = Opt.ViOpt.ShowKeyBar;
return (TRUE);
case KEY_CTRLSHIFTB:
{
Opt.ViOpt.ShowTitleBar=!Opt.ViOpt.ShowTitleBar;
TitleBarVisible = Opt.ViOpt.ShowTitleBar;
Show();
return (TRUE);
}
case KEY_CTRLO:
if (!Opt.OnlyEditorViewerUsed)
{
if (FrameManager->ShowBackground())
{
SetCursorType(FALSE,0);
WaitKey();
FrameManager->RefreshFrame();
}
}
return TRUE;
case KEY_F3:
case KEY_NUMPAD5: case KEY_SHIFTNUMPAD5:
if (F3KeyOnly)
return TRUE;
case KEY_ESC:
case KEY_F10:
FrameManager->DeleteFrame();
return TRUE;
case KEY_F6:
if (!DisableEdit)
{
UINT cp=View.VM.CodePage;
string strViewFileName;
View.GetFileName(strViewFileName);
File Edit;
if(!Edit.Open(strViewFileName, GENERIC_READ, FILE_SHARE_READ|(Opt.EdOpt.EditOpenedForWrite?FILE_SHARE_WRITE:0), nullptr, OPEN_EXISTING, FILE_FLAG_SEQUENTIAL_SCAN))
{
Message(MSG_WARNING|MSG_ERRORTYPE,1,MSG(MEditTitle),MSG(MEditCannotOpen),strViewFileName,MSG(MOk));
return TRUE;
}
Edit.Close();
// Если переключаемся в редактор, то удалять файл уже не нужно
SetTempViewName(L"");
SetExitCode(0);
__int64 FilePos=View.GetFilePos();
/* $ 07.07.2006 IS
Тут косяк, замеченный при чтении warnings - FilePos теряет информацию при преобразовании __int64 -> int
Надо бы поправить FileEditor на этот счет.
*/
FileEditor *ShellEditor = new FileEditor(strViewFileName, cp,
(GetCanLoseFocus()?FFILEEDIT_ENABLEF6:0)|(SaveToSaveAs?FFILEEDIT_SAVETOSAVEAS:0)|(DisableHistory?FFILEEDIT_DISABLEHISTORY:0),-2, static_cast<int>(FilePos), nullptr);
ShellEditor->SetEnableF6(TRUE);
/* $ 07.05.2001 DJ сохраняем NamesList */
ShellEditor->SetNamesList(View.GetNamesList());
FrameManager->DeleteFrame(this); // Insert уже есть внутри конструктора
ShowTime(2);
}
return TRUE;
// Печать файла с использованием плагина PrintMan
case KEY_ALTF5:
{
if (Opt.UsePrintManager && CtrlObject->Plugins.FindPlugin(SYSID_PRINTMANAGER))
CtrlObject->Plugins.CallPlugin(SYSID_PRINTMANAGER,OPEN_VIEWER,0); // printman
return TRUE;
}
case KEY_ALTSHIFTF9:
// Работа с локальной копией ViewerOptions
ViewerOptions ViOpt;
ViOpt.TabSize=View.GetTabSize();
ViOpt.AutoDetectCodePage=View.GetAutoDetectCodePage();
ViOpt.ShowScrollbar=View.GetShowScrollbar();
ViOpt.ShowArrows=View.GetShowArrows();
ViOpt.PersistentBlocks=View.GetPersistentBlocks();
ViewerConfig(ViOpt,true);
View.SetTabSize(ViOpt.TabSize);
View.SetAutoDetectCodePage(ViOpt.AutoDetectCodePage);
View.SetShowScrollbar(ViOpt.ShowScrollbar);
View.SetShowArrows(ViOpt.ShowArrows);
View.SetPersistentBlocks(ViOpt.PersistentBlocks);
if (Opt.ViOpt.ShowKeyBar)
ViewKeyBar.Show();
View.Show();
return TRUE;
case KEY_ALTF11:
if (GetCanLoseFocus())
CtrlObject->CmdLine->ShowViewEditHistory();
return TRUE;
default:
// Этот кусок - на будущее (по аналогии с редактором :-)
// if (CtrlObject->Macro.IsExecuting() || !View.ProcessViewerInput(&ReadRec))
{
/* $ 22.03.2001 SVS
Это помогло от залипания :-)
*/
if (!CtrlObject->Macro.IsExecuting())
if (Opt.ViOpt.ShowKeyBar)
ViewKeyBar.Show();
if (!ViewKeyBar.ProcessKey(Key))
return(View.ProcessKey(Key));
}
return TRUE;
}
}
int Message(
DWORD Flags,
int Buttons,
const wchar_t *Title,
const wchar_t * const *Items,
int ItemsNumber,
INT_PTR PluginNumber
)
{
FARString strTempStr;
int X1,Y1,X2,Y2;
int Length, BtnLength, J;
DWORD I, MaxLength, StrCount;
BOOL ErrorSets=FALSE;
const wchar_t **Str;
wchar_t *PtrStr;
const wchar_t *CPtrStr;
FARString strErrStr;
if (Flags & MSG_ERRORTYPE)
ErrorSets = GetErrorString(strErrStr);
// выделим память под рабочий массив указателей на строки (+запас 16)
Str=(const wchar_t **)xf_malloc((ItemsNumber+ADDSPACEFORPSTRFORMESSAGE) * sizeof(wchar_t*));
if (!Str)
return -1;
StrCount=ItemsNumber-Buttons;
// предварительный обсчет максимального размера.
for (BtnLength=0,I=0; I<static_cast<DWORD>(Buttons); I++) //??
{
BtnLength+=HiStrlen(Items[I+StrCount])+2+2+1; // "[ ", " ]", " "
}
if(BtnLength)
{
BtnLength--;
}
for (MaxLength=BtnLength,I=0; I<StrCount; I++)
{
if (static_cast<DWORD>(Length=StrLength(Items[I]))>MaxLength)
MaxLength=Length;
}
// учтем так же размер заголовка
if (Title && *Title)
{
I=(DWORD)StrLength(Title)+2;
if (MaxLength < I)
MaxLength=I;
}
// певая коррекция максимального размера
if (MaxLength > MAX_WIDTH_MESSAGE)
MaxLength=MAX_WIDTH_MESSAGE;
// теперь обработаем MSG_ERRORTYPE
DWORD CountErrorLine=0;
if ((Flags & MSG_ERRORTYPE) && ErrorSets)
{
// подсчет количества строк во врапенном сообщениеи
++CountErrorLine;
//InsertQuote(ErrStr); // оквочим
// вычисление "красивого" размера
DWORD LenErrStr=(DWORD)strErrStr.GetLength();
if (LenErrStr > MAX_WIDTH_MESSAGE)
{
// половина меньше?
if (LenErrStr/2 < MAX_WIDTH_MESSAGE)
{
// а половина + 1/3?
if ((LenErrStr+LenErrStr/3)/2 < MAX_WIDTH_MESSAGE)
LenErrStr=(LenErrStr+LenErrStr/3)/2;
else
LenErrStr/=2;
}
else
LenErrStr=MAX_WIDTH_MESSAGE;
}
else if (LenErrStr < MaxLength)
LenErrStr=MaxLength;
if (MaxLength > LenErrStr && MaxLength >= MAX_WIDTH_MESSAGE)
MaxLength=LenErrStr;
if (MaxLength < LenErrStr && LenErrStr <= MAX_WIDTH_MESSAGE)
MaxLength=LenErrStr;
// а теперь проврапим
//PtrStr=FarFormatText(ErrStr,MaxLength-(MaxLength > MAX_WIDTH_MESSAGE/2?1:0),ErrStr,sizeof(ErrStr),"\n",0); //?? MaxLength ??
FarFormatText(strErrStr,LenErrStr,strErrStr,L"\n",0); //?? MaxLength ??
PtrStr = strErrStr.GetBuffer();
//BUGBUG: FARString не преднозначен для хранения строк разделённых \0
while ((PtrStr=wcschr(PtrStr,L'\n')) )
{
*PtrStr++=0;
if (*PtrStr)
CountErrorLine++;
}
strErrStr.ReleaseBuffer();
if (CountErrorLine > ADDSPACEFORPSTRFORMESSAGE)
CountErrorLine=ADDSPACEFORPSTRFORMESSAGE; //??
}
//BUGBUG: FARString не преднозначен для хранения строк разделённых \0
// заполняем массив...
CPtrStr=strErrStr;
for (I=0; I < CountErrorLine; I++)
{
Str[I]=CPtrStr;
CPtrStr+=StrLength(CPtrStr)+1;
if (!*CPtrStr) // два идущих подряд нуля - "хандец" всему
{
++I;
break;
}
}
bool EmptyText=false;
if(ItemsNumber==Buttons && !I)
{
EmptyText=true;
Str[I]=L"";
I++;
StrCount++;
ItemsNumber++;
}
for (J=0; J < ItemsNumber-(EmptyText?1:0); ++J, ++I)
{
Str[I]=Items[J];
}
StrCount+=CountErrorLine;
MessageX1=X1=(ScrX-MaxLength)/2-4;
MessageX2=X2=X1+MaxLength+9;
Y1=(ScrY-StrCount)/2-2;
if (Y1 < 0)
Y1=0;
MessageY1=Y1;
MessageY2=Y2=Y1+StrCount+3;
FARString strHelpTopic(strMsgHelpTopic);
strMsgHelpTopic.Clear();
// *** Вариант с Диалогом ***
if (Buttons>0)
{
DWORD ItemCount=StrCount+Buttons+1;
DialogItemEx *PtrMsgDlg;
DialogItemEx *MsgDlg = new(std::nothrow) DialogItemEx[ItemCount+1];
if (!MsgDlg)
{
xf_free(Str);
return -1;
}
for (DWORD i=0; i<ItemCount+1; i++)
MsgDlg[i].Clear();
int RetCode;
MessageY2=++Y2;
MsgDlg[0].Type=DI_DOUBLEBOX;
MsgDlg[0].X1=3;
MsgDlg[0].Y1=1;
MsgDlg[0].X2=X2-X1-3;
MsgDlg[0].Y2=Y2-Y1-1;
if (Title && *Title)
MsgDlg[0].strData = Title;
int TypeItem=DI_TEXT;
DWORD FlagsItem=DIF_SHOWAMPERSAND;
BOOL IsButton=FALSE;
int CurItem=0;
bool StrSeparator=false;
bool Separator=false;
for (PtrMsgDlg=MsgDlg+1,I=1; I < ItemCount; ++I, ++PtrMsgDlg, ++CurItem)
{
if (I==StrCount+1 && !StrSeparator && !Separator)
{
PtrMsgDlg->Type=DI_TEXT;
PtrMsgDlg->Flags=DIF_SEPARATOR;
PtrMsgDlg->Y1=PtrMsgDlg->Y2=I+1;
CurItem--;
I--;
Separator=true;
continue;
}
if(I==StrCount+1)
{
PtrMsgDlg->DefaultButton=TRUE;
PtrMsgDlg->Focus=TRUE;
TypeItem=DI_BUTTON;
FlagsItem=DIF_CENTERGROUP;
IsButton=TRUE;
FirstButtonIndex=CurItem+1;
LastButtonIndex=CurItem;
}
PtrMsgDlg->Type=TypeItem;
PtrMsgDlg->Flags|=FlagsItem;
CPtrStr=Str[CurItem];
if (IsButton)
{
PtrMsgDlg->Y1=Y2-Y1-2+(Separator?1:0);
PtrMsgDlg->strData+=CPtrStr;
LastButtonIndex++;
}
else
{
PtrMsgDlg->X1=(Flags & MSG_LEFTALIGN)?5:-1;
PtrMsgDlg->Y1=I+1;
wchar_t Chr=*CPtrStr;
if (Chr == L'\1' || Chr == L'\2')
{
CPtrStr++;
PtrMsgDlg->Flags|=(Chr==2?DIF_SEPARATOR2:DIF_SEPARATOR);
if(I==StrCount)
{
StrSeparator=true;
}
}
else if (StrLength(CPtrStr)>X2-X1-9)
{
PtrMsgDlg->Type=DI_EDIT;
PtrMsgDlg->Flags|=DIF_READONLY|DIF_BTNNOCLOSE|DIF_SELECTONENTRY;
PtrMsgDlg->X1=5;
PtrMsgDlg->X2=X2-X1-5;
PtrMsgDlg->strData=CPtrStr;
continue;
}
//xstrncpy(PtrMsgDlg->Data,CPtrStr,Min((int)MAX_WIDTH_MESSAGE,(int)sizeof(PtrMsgDlg->Data))); //?? ScrX-15 ??
PtrMsgDlg->strData = CPtrStr; //BUGBUG, wrong len
}
}
{
if(Separator)
{
FirstButtonIndex++;
LastButtonIndex++;
MessageY2++;
Y2++;
MsgDlg[0].Y2++;
ItemCount++;
}
IsWarningStyle=Flags&MSG_WARNING;
Dialog Dlg(MsgDlg,ItemCount,MsgDlgProc);
Dlg.SetPosition(X1,Y1,X2,Y2);
if (!strHelpTopic.IsEmpty())
Dlg.SetHelp(strHelpTopic);
Dlg.SetPluginNumber(PluginNumber); // Запомним номер плагина
if (IsWarningStyle)
{
Dlg.SetDialogMode(DMODE_WARNINGSTYLE);
}
Dlg.SetDialogMode(DMODE_MSGINTERNAL);
FlushInputBuffer();
if (Flags & MSG_KILLSAVESCREEN)
SendDlgMessage((HANDLE)&Dlg,DM_KILLSAVESCREEN,0,0);
Dlg.Process();
RetCode=Dlg.GetExitCode();
}
delete [] MsgDlg;
xf_free(Str);
return(RetCode<0?RetCode:RetCode-StrCount-1-(Separator?1:0));
}
// *** Без Диалога! ***
SetCursorType(0,0);
if (!(Flags & MSG_KEEPBACKGROUND))
{
SetScreen(X1,Y1,X2,Y2,L' ',(Flags & MSG_WARNING)?COL_WARNDIALOGTEXT:COL_DIALOGTEXT);
MakeShadow(X1+2,Y2+1,X2+2,Y2+1);
MakeShadow(X2+1,Y1+1,X2+2,Y2+1);
Box(X1+3,Y1+1,X2-3,Y2-1,(Flags & MSG_WARNING)?COL_WARNDIALOGBOX:COL_DIALOGBOX,DOUBLE_BOX);
}
SetColor((Flags & MSG_WARNING)?COL_WARNDIALOGTEXT:COL_DIALOGTEXT);
if (Title && *Title)
{
FARString strTempTitle = Title;
if (strTempTitle.GetLength() > MaxLength)
strTempTitle.SetLength(MaxLength);
GotoXY(X1+(X2-X1-1-(int)strTempTitle.GetLength())/2,Y1+1);
FS<<L" "<<strTempTitle<<L" ";
}
for (I=0; I<StrCount; I++)
{
int PosX;
CPtrStr=Str[I];
wchar_t Chr=*CPtrStr;
if (Chr == 1 || Chr == 2)
{
int Length=X2-X1-5;
if (Length>1)
{
SetColor((Flags & MSG_WARNING)?COL_WARNDIALOGBOX:COL_DIALOGBOX);
GotoXY(X1+3,Y1+I+2);
DrawLine(Length,(Chr == 2?3:1));
CPtrStr++;
int TextLength=StrLength(CPtrStr);
if (TextLength<Length)
{
GotoXY(X1+3+(Length-TextLength)/2,Y1+I+2);
Text(CPtrStr);
}
SetColor((Flags & MSG_WARNING)?COL_WARNDIALOGBOX:COL_DIALOGTEXT);
}
continue;
}
if ((Length=StrLength(CPtrStr))>ScrX-15)
Length=ScrX-15;
int Width=X2-X1+1;
wchar_t *lpwszTemp = nullptr;
if (Flags & MSG_LEFTALIGN)
{
lpwszTemp = (wchar_t*)xf_malloc((Width-10+1)*sizeof(wchar_t));
swprintf(lpwszTemp,Width-10+1,L"%.*ls",Width-10,CPtrStr);
GotoXY(X1+5,Y1+I+2);
}
else
{
PosX=X1+(Width-Length)/2;
lpwszTemp = (wchar_t*)xf_malloc((PosX-X1-4+Length+X2-PosX-Length-3+1)*sizeof(wchar_t));
swprintf(lpwszTemp,PosX-X1-4+Length+X2-PosX-Length-3+1,L"%*ls%.*ls%*ls",PosX-X1-4,L"",Length,CPtrStr,X2-PosX-Length-3,L"");
GotoXY(X1+4,Y1+I+2);
}
Text(lpwszTemp);
xf_free(lpwszTemp);
}
/* $ 13.01.2003 IS
- Принудительно уберем запрет отрисовки экрана, если количество кнопок
в сообщении равно нулю и макрос закончил выполняться. Это необходимо,
чтобы заработал прогресс-бар от плагина, который был запущен при помощи
макроса запретом отрисовки (bugz#533).
*/
xf_free(Str);
if (!Buttons)
{
if (ScrBuf.GetLockCount()>0 && !CtrlObject->Macro.PeekKey())
ScrBuf.SetLockCount(0);
ScrBuf.Flush();
}
return 0;
}
