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;
}
static int MainProcess(
const wchar_t *lpwszEditName,
const wchar_t *lpwszViewName,
const wchar_t *lpwszDestName1,
const wchar_t *lpwszDestName2,
int StartLine,
int StartChar
)
{
{
ChangePriority ChPriority(ChangePriority::NORMAL);
ControlObject CtrlObj;
WORD InitAttributes=0;
Console.GetTextAttributes(InitAttributes);
SetRealColor(COL_COMMANDLINEUSERSCREEN);
if (*lpwszEditName || *lpwszViewName)
{
Opt.OnlyEditorViewerUsed=1;
Panel *DummyPanel=new Panel;
_tran(SysLog(L"create dummy panels"));
CtrlObj.CreateFilePanels();
CtrlObj.Cp()->LeftPanel=CtrlObj.Cp()->RightPanel=CtrlObj.Cp()->ActivePanel=DummyPanel;
CtrlObj.Plugins.LoadPlugins();
CtrlObj.Macro.LoadMacros(TRUE,FALSE);
if (*lpwszEditName)
{
FileEditor *ShellEditor=new FileEditor(lpwszEditName,CP_AUTODETECT,FFILEEDIT_CANNEWFILE|FFILEEDIT_ENABLEF6,StartLine,StartChar);
_tran(SysLog(L"make shelleditor %p",ShellEditor));
if (!ShellEditor->GetExitCode()) // ????????????
{
FrameManager->ExitMainLoop(0);
}
}
// TODO: Этот else убрать только после разборок с возможностью задавать несколько /e и /v в ком.строке
else if (*lpwszViewName)
{
FileViewer *ShellViewer=new FileViewer(lpwszViewName,FALSE);
if (!ShellViewer->GetExitCode())
{
FrameManager->ExitMainLoop(0);
}
_tran(SysLog(L"make shellviewer, %p",ShellViewer));
}
FrameManager->EnterMainLoop();
CtrlObj.Cp()->LeftPanel=CtrlObj.Cp()->RightPanel=CtrlObj.Cp()->ActivePanel=nullptr;
delete DummyPanel;
_tran(SysLog(L"editor/viewer closed, delete dummy panels"));
}
else
{
Opt.OnlyEditorViewerUsed=0;
Opt.SetupArgv=0;
FARString strPath;
// воспользуемся тем, что ControlObject::Init() создает панели
// юзая Opt.*
if (*lpwszDestName1) // актиная панель
{
Opt.SetupArgv++;
strPath = lpwszDestName1;
CutToNameUNC(strPath);
DeleteEndSlash(strPath); //BUGBUG!! если конечный слешь не убрать - получаем забавный эффект - отсутствует ".."
// if ((strPath.At(1)==L':' && !strPath.At(2)) || (HasPathPrefix(strPath) && strPath.At(5)==L':' && !strPath.At(6)))
// AddEndSlash(strPath);
// Та панель, которая имеет фокус - активна (начнем по традиции с Левой Панели ;-)
if (Opt.LeftPanel.Focus)
{
Opt.LeftPanel.Type=FILE_PANEL; // сменим моду панели
Opt.LeftPanel.Visible=TRUE; // и включим ее
Opt.strLeftFolder = strPath;
}
else
{
Opt.RightPanel.Type=FILE_PANEL;
Opt.RightPanel.Visible=TRUE;
Opt.strRightFolder = strPath;
}
if (*lpwszDestName2) // пассивная панель
{
Opt.SetupArgv++;
strPath = lpwszDestName2;
CutToNameUNC(strPath);
DeleteEndSlash(strPath); //BUGBUG!! если конечный слешь не убрать - получаем забавный эффект - отсутствует ".."
// if ((strPath.At(1)==L':' && !strPath.At(2)) || (HasPathPrefix(strPath) && strPath.At(5)==L':' && !strPath.At(6)))
// AddEndSlash(strPath);
// а здесь с точнотью наоборот - обрабатываем пассивную панель
if (Opt.LeftPanel.Focus)
{
Opt.RightPanel.Type=FILE_PANEL; // сменим моду панели
Opt.RightPanel.Visible=TRUE; // и включим ее
Opt.strRightFolder = strPath;
}
else
{
Opt.LeftPanel.Type=FILE_PANEL;
Opt.LeftPanel.Visible=TRUE;
Opt.strLeftFolder = strPath;
}
}
}
// теперь все готово - создаем панели!
CtrlObj.Init();
// а теперь "провалимся" в каталог или хост-файл (если получится ;-)
if (*lpwszDestName1) // актиная панель
{
FARString strCurDir;
Panel *ActivePanel=CtrlObject->Cp()->ActivePanel;
Panel *AnotherPanel=CtrlObject->Cp()->GetAnotherPanel(ActivePanel);
if (*lpwszDestName2) // пассивная панель
{
AnotherPanel->GetCurDir(strCurDir);
FarChDir(strCurDir);
if (IsPluginPrefixPath(lpwszDestName2))
{
AnotherPanel->SetFocus();
CtrlObject->CmdLine->ExecString(lpwszDestName2,0);
ActivePanel->SetFocus();
}
else
{
strPath = PointToNameUNC(lpwszDestName2);
if (!strPath.IsEmpty())
{
if (AnotherPanel->GoToFile(strPath))
AnotherPanel->ProcessKey(KEY_CTRLPGDN);
}
}
}
ActivePanel->GetCurDir(strCurDir);
FarChDir(strCurDir);
if (IsPluginPrefixPath(lpwszDestName1))
{
CtrlObject->CmdLine->ExecString(lpwszDestName1,0);
}
else
{
strPath = PointToNameUNC(lpwszDestName1);
if (!strPath.IsEmpty())
{
if (ActivePanel->GoToFile(strPath))
ActivePanel->ProcessKey(KEY_CTRLPGDN);
}
}
// !!! ВНИМАНИЕ !!!
// Сначала редравим пассивную панель, а потом активную!
AnotherPanel->Redraw();
ActivePanel->Redraw();
}
FrameManager->EnterMainLoop();
}
// очистим за собой!
SetScreen(0,0,ScrX,ScrY,L' ',COL_COMMANDLINEUSERSCREEN);
Console.SetTextAttributes(InitAttributes);
ScrBuf.ResetShadow();
ScrBuf.Flush();
MoveRealCursor(0,0);
}
CloseConsole();
return 0;
}
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);
}
}
