void ShellMakeDir(Panel *SrcPanel)
{
string strDirName;
string strOriginalDirName;
wchar_t *lpwszDirName;
UserDefinedList DirList(0,0,ULF_UNIQUE);
DialogDataEx MkDirDlgData[]=
{
DI_DOUBLEBOX,3,1,72,8,0,0,MSG(MMakeFolderTitle),
DI_TEXT, 5,2, 0,2,0,0,MSG(MCreateFolder),
DI_EDIT, 5,3,70,3,(DWORD_PTR)L"NewFolder",DIF_FOCUS|DIF_EDITEXPAND|DIF_HISTORY|DIF_USELASTHISTORY|DIF_EDITPATH,L"",
DI_TEXT, 0,4, 0,4,0,DIF_SEPARATOR,L"",
DI_CHECKBOX, 5,5, 0,5,Opt.MultiMakeDir,0,MSG(MMultiMakeDir),
DI_TEXT, 0,6, 0,6,0,DIF_SEPARATOR,L"",
DI_BUTTON, 0,7, 0,7,0,DIF_DEFAULT|DIF_CENTERGROUP,MSG(MOk),
DI_BUTTON, 0,7, 0,7,0,DIF_CENTERGROUP,MSG(MCancel),
};
MakeDialogItemsEx(MkDirDlgData,MkDirDlg);
Dialog Dlg(MkDirDlg,ARRAYSIZE(MkDirDlg),MkDirDlgProc,reinterpret_cast<LONG_PTR>(&DirList));
Dlg.SetPosition(-1,-1,76,10);
Dlg.SetHelp(L"MakeFolder");
Dlg.SetId(MakeFolderId);
Dlg.Process();
if (Dlg.GetExitCode()==MKDIR_OK)
{
strDirName=MkDirDlg[MKDIR_EDIT].strData;
const wchar_t *OneDir;
DirList.Reset();
while (nullptr!=(OneDir=DirList.GetNext()))
{
strDirName = OneDir;
strOriginalDirName = strDirName;
//Unquote(DirName);
if (Opt.CreateUppercaseFolders && !IsCaseMixed(strDirName))
strDirName.Upper();
DeleteEndSlash(strDirName,true);
lpwszDirName = strDirName.GetBuffer();
bool bSuccess = false;
if(HasPathPrefix(lpwszDirName))
{
lpwszDirName += 4;
}
for (wchar_t *ChPtr=lpwszDirName; *ChPtr; ChPtr++)
{
if (IsSlash(*ChPtr))
{
WCHAR Ch = ChPtr[1];
ChPtr[1] = 0;
if (*lpwszDirName &&
(apiGetFileAttributes(lpwszDirName) == INVALID_FILE_ATTRIBUTES) &&
apiCreateDirectory(lpwszDirName,nullptr))
{
TreeList::AddTreeName(lpwszDirName);
bSuccess = true;
}
ChPtr[1] = Ch;
}
}
strDirName.ReleaseBuffer();
BOOL bSuccess2;
bool bSkip=false;
while (!(bSuccess2=apiCreateDirectory(strDirName,nullptr)))
{
int LastError=GetLastError();
if (LastError==ERROR_ALREADY_EXISTS || LastError==ERROR_BAD_PATHNAME ||
LastError==ERROR_INVALID_NAME || LastError == ERROR_DIRECTORY)
{
int ret;
if (DirList.IsEmpty())
ret=Message(MSG_WARNING|MSG_ERRORTYPE,1,MSG(MError),MSG(MCannotCreateFolder),strOriginalDirName,MSG(MCancel));
else
ret=Message(MSG_WARNING|MSG_ERRORTYPE,2,MSG(MError),MSG(MCannotCreateFolder),strOriginalDirName,MSG(MOk),MSG(MSkip));
bSkip = ret==1;
if (bSuccess || bSkip)
break;
else
return;
}
else
{
int ret;
if (DirList.IsEmpty())
{
ret=Message(MSG_WARNING|MSG_ERRORTYPE,2,MSG(MError),MSG(MCannotCreateFolder),strOriginalDirName,MSG(MRetry),MSG(MCancel));
}
else
{
ret=Message(MSG_WARNING|MSG_ERRORTYPE,3,MSG(MError),MSG(MCannotCreateFolder),strOriginalDirName,MSG(MRetry),MSG(MSkip),MSG(MCancel));
bSkip = ret==1;
}
if (ret)
{
if (bSuccess || bSkip) break;
else return;
}
}
}
if (bSuccess2)
TreeList::AddTreeName(strDirName);
else if (!bSkip)
break;
}
SrcPanel->Update(UPDATE_KEEP_SELECTION);
if (!strDirName.IsEmpty())
{
size_t pos;
if (FindSlash(pos,strDirName))
strDirName.SetLength(pos);
if (!SrcPanel->GoToFile(strDirName) && strDirName.At(strDirName.GetLength()-1)==L'.')
{
strDirName.SetLength(strDirName.GetLength()-1);
SrcPanel->GoToFile(strDirName);
}
}
SrcPanel->Redraw();
Panel *AnotherPanel=CtrlObject->Cp()->GetAnotherPanel(SrcPanel);
int AnotherType=AnotherPanel->GetType();
if (AnotherPanel->NeedUpdatePanel(SrcPanel) || AnotherType==QVIEW_PANEL)
{
AnotherPanel->Update(UPDATE_KEEP_SELECTION|UPDATE_SECONDARY);
AnotherPanel->Redraw();
}
}
}
void FileList::PutDizToPlugin(FileList *DestPanel,PluginPanelItem *ItemList,
int ItemNumber,int Delete,int Move,DizList *SrcDiz,
DizList *DestDiz)
{
_ALGO(CleverSysLog clv(L"FileList::PutDizToPlugin()"));
OpenPanelInfo Info;
CtrlObject->Plugins->GetOpenPanelInfo(DestPanel->hPlugin,&Info);
if (DestPanel->strPluginDizName.IsEmpty() && Info.DescrFilesNumber>0)
DestPanel->strPluginDizName = Info.DescrFiles[0];
if (((Opt.Diz.UpdateMode==DIZ_UPDATE_IF_DISPLAYED && IsDizDisplayed()) ||
Opt.Diz.UpdateMode==DIZ_UPDATE_ALWAYS) && !DestPanel->strPluginDizName.IsEmpty() &&
(!Info.HostFile || !*Info.HostFile || DestPanel->GetModalMode() ||
apiGetFileAttributes(Info.HostFile)!=INVALID_FILE_ATTRIBUTES))
{
CtrlObject->Cp()->LeftPanel->ReadDiz();
CtrlObject->Cp()->RightPanel->ReadDiz();
if (DestPanel->GetModalMode())
DestPanel->ReadDiz();
int DizPresent=FALSE;
for (int I=0; I<ItemNumber; I++)
if (ItemList[I].Flags & PPIF_PROCESSDESCR)
{
string strName = ItemList[I].FileName;
string strShortName = ItemList[I].AlternateFileName;
int Code;
if (Delete)
Code=DestDiz->DeleteDiz(strName,strShortName);
else
{
Code=SrcDiz->CopyDiz(strName,strShortName,strName,strShortName,DestDiz);
if (Code && Move)
SrcDiz->DeleteDiz(strName,strShortName);
}
if (Code)
DizPresent=TRUE;
}
if (DizPresent)
{
string strTempDir;
if (FarMkTempEx(strTempDir) && apiCreateDirectory(strTempDir,nullptr))
{
string strSaveDir;
apiGetCurrentDirectory(strSaveDir);
string strDizName=strTempDir+L"\\"+DestPanel->strPluginDizName;
DestDiz->Flush(L"", &strDizName);
if (Move)
SrcDiz->Flush(L"");
PluginPanelItem PanelItem;
if (FileNameToPluginItem(strDizName,&PanelItem))
CtrlObject->Plugins->PutFiles(DestPanel->hPlugin,&PanelItem,1,FALSE,OPM_SILENT|OPM_DESCR);
else if (Delete)
{
PluginPanelItem pi={};
pi.FileName = xf_wcsdup(DestPanel->strPluginDizName);
CtrlObject->Plugins->DeleteFiles(DestPanel->hPlugin,&pi,1,OPM_SILENT);
xf_free(pi.FileName);
}
FarChDir(strSaveDir);
DeleteFileWithFolder(strDizName);
}
}
}
}
void FileList::PluginToPluginFiles(int Move)
{
_ALGO(CleverSysLog clv(L"FileList::PluginToPluginFiles()"));
PluginPanelItem *ItemList;
int ItemNumber;
Panel *AnotherPanel=CtrlObject->Cp()->GetAnotherPanel(this);
string strTempDir;
if (AnotherPanel->GetMode()!=PLUGIN_PANEL)
return;
FileList *AnotherFilePanel=(FileList *)AnotherPanel;
if (!FarMkTempEx(strTempDir))
return;
SaveSelection();
apiCreateDirectory(strTempDir,nullptr);
CreatePluginItemList(ItemList,ItemNumber);
if (ItemList && ItemNumber>0)
{
const wchar_t *lpwszTempDir=strTempDir;
int PutCode=CtrlObject->Plugins->GetFiles(hPlugin,ItemList,ItemNumber,FALSE,&lpwszTempDir,OPM_SILENT);
strTempDir=lpwszTempDir;
if (PutCode==1 || PutCode==2)
{
string strSaveDir;
apiGetCurrentDirectory(strSaveDir);
FarChDir(strTempDir);
PutCode=CtrlObject->Plugins->PutFiles(AnotherFilePanel->hPlugin,ItemList,ItemNumber,FALSE,0);
if (PutCode==1 || PutCode==2)
{
if (!ReturnCurrentFile)
ClearSelection();
AnotherPanel->SetPluginModified();
PutDizToPlugin(AnotherFilePanel,ItemList,ItemNumber,FALSE,FALSE,&Diz,&AnotherFilePanel->Diz);
if (Move)
if (CtrlObject->Plugins->DeleteFiles(hPlugin,ItemList,ItemNumber,OPM_SILENT))
{
SetPluginModified();
PutDizToPlugin(this,ItemList,ItemNumber,TRUE,FALSE,nullptr,&Diz);
}
}
else if (!ReturnCurrentFile)
PluginClearSelection(ItemList,ItemNumber);
FarChDir(strSaveDir);
}
DeleteDirTree(strTempDir);
DeletePluginItemList(ItemList,ItemNumber);
Update(UPDATE_KEEP_SELECTION);
Redraw();
if (PanelMode==PLUGIN_PANEL)
AnotherPanel->Update(UPDATE_KEEP_SELECTION|UPDATE_SECONDARY);
else
AnotherPanel->Update(UPDATE_KEEP_SELECTION);
AnotherPanel->Redraw();
}
}
void FileList::ReadDiz(PluginPanelItem *ItemList,int ItemLength,DWORD dwFlags)
{
if (DizRead)
return;
DizRead=TRUE;
Diz.Reset();
if (PanelMode==NORMAL_PANEL)
{
Diz.Read(strCurDir);
}
else
{
PluginPanelItem *PanelData=nullptr;
size_t PluginFileCount=0;
OpenPanelInfo Info;
CtrlObject->Plugins->GetOpenPanelInfo(hPlugin,&Info);
if (!Info.DescrFilesNumber)
return;
int GetCode=TRUE;
/* $ 25.02.2001 VVM
+ Обработка флага RDF_NO_UPDATE */
if (!ItemList && !(dwFlags & RDF_NO_UPDATE))
{
GetCode=CtrlObject->Plugins->GetFindData(hPlugin,&PanelData,&PluginFileCount,0);
}
else
{
PanelData=ItemList;
PluginFileCount=ItemLength;
}
if (GetCode)
{
for (size_t I=0; I<Info.DescrFilesNumber; I++)
{
PluginPanelItem *CurPanelData=PanelData;
for (size_t J=0; J < PluginFileCount; J++, CurPanelData++)
{
string strFileName = CurPanelData->FileName;
if (!StrCmpI(strFileName,Info.DescrFiles[I]))
{
string strTempDir, strDizName;
if (FarMkTempEx(strTempDir) && apiCreateDirectory(strTempDir,nullptr))
{
if (CtrlObject->Plugins->GetFile(hPlugin,CurPanelData,strTempDir,strDizName,OPM_SILENT|OPM_VIEW|OPM_QUICKVIEW|OPM_DESCR))
{
strPluginDizName = Info.DescrFiles[I];
Diz.Read(L"", &strDizName);
DeleteFileWithFolder(strDizName);
I=Info.DescrFilesNumber;
break;
}
apiRemoveDirectory(strTempDir);
//ViewPanel->ShowFile(nullptr,FALSE,nullptr);
}
}
}
}
/* $ 25.02.2001 VVM
+ Обработка флага RDF_NO_UPDATE */
if (!ItemList && !(dwFlags & RDF_NO_UPDATE))
CtrlObject->Plugins->FreeFindData(hPlugin,PanelData,PluginFileCount);
}
}
for (int I=0; I<FileCount; I++)
{
if (!ListData[I]->DizText)
{
ListData[I]->DeleteDiz=FALSE;
ListData[I]->DizText=(wchar_t*)Diz.GetDizTextAddr(ListData[I]->strName,ListData[I]->strShortName,ListData[I]->FileSize);
}
}
}
// Кусок для создания SymLink для каталогов.
int MkSymLink(const wchar_t *SelName,const wchar_t *Dest,ReparsePointTypes LinkType,DWORD Flags)
{
if (SelName && *SelName && Dest && *Dest)
{
string strSrcFullName, strDestFullName, strSelOnlyName;
string strMsgBuf, strMsgBuf2;
// выделим имя
strSelOnlyName = SelName;
DeleteEndSlash(strSelOnlyName);
const wchar_t *PtrSelName=LastSlash(strSelOnlyName);
if (!PtrSelName)
PtrSelName=strSelOnlyName;
else
++PtrSelName;
if (SelName[1] == L':' && (!SelName[2] || (IsSlash(SelName[2]) && !SelName[3]))) // C: или C:/
{
// if(Flags&FCOPY_VOLMOUNT)
{
strSrcFullName = SelName;
AddEndSlash(strSrcFullName);
}
/*
Вот здесь - ну очень умное поведение!
Т.е. если в качестве SelName передали "C:", то в этом куске происходит
коррекция типа линка - с symlink`а на volmount
*/
LinkType=RP_VOLMOUNT;
}
else
ConvertNameToFull(SelName,strSrcFullName);
ConvertNameToFull(Dest,strDestFullName);
if (IsSlash(strDestFullName.At(strDestFullName.GetLength()-1)))
{
if (LinkType!=RP_VOLMOUNT)
strDestFullName += PtrSelName;
else
{
const wchar_t Tmp[]={L'D',L'i',L's',L'k',L'_',*SelName,L'\0'};
strDestFullName+=Tmp;
}
}
if (LinkType==RP_VOLMOUNT)
{
AddEndSlash(strSrcFullName);
AddEndSlash(strDestFullName);
}
DWORD JSAttr=apiGetFileAttributes(strDestFullName);
if (JSAttr != INVALID_FILE_ATTRIBUTES) // Существует такой?
{
if ((JSAttr&FILE_ATTRIBUTE_DIRECTORY)!=FILE_ATTRIBUTE_DIRECTORY)
{
if (!(Flags&FCOPY_NOSHOWMSGLINK))
{
Message(MSG_WARNING,1,MSG(MError),
MSG(MCopyCannotCreateJunctionToFile),
strDestFullName,MSG(MOk));
}
return 0;
}
if (TestFolder(strDestFullName) == TSTFLD_NOTEMPTY) // а пустой?
{
// не пустой, ну что же, тогда пробуем сделать dest\srcname
AddEndSlash(strDestFullName);
if (LinkType==RP_VOLMOUNT)
{
string strTmpName;
strTmpName.Format(MSG(MCopyMountName),*SelName);
strDestFullName += strTmpName;
AddEndSlash(strDestFullName);
}
else
strDestFullName += PtrSelName;
JSAttr=apiGetFileAttributes(strDestFullName);
if (JSAttr != INVALID_FILE_ATTRIBUTES) // И такой тоже есть???
{
if (TestFolder(strDestFullName) == TSTFLD_NOTEMPTY) // а пустой?
{
if (!(Flags&FCOPY_NOSHOWMSGLINK))
{
if (LinkType==RP_VOLMOUNT)
{
strMsgBuf.Format(MSG(MCopyMountVolFailed), SelName);
strMsgBuf2.Format(MSG(MCopyMountVolFailed2), strDestFullName.CPtr());
Message(MSG_WARNING,1,MSG(MError),
strMsgBuf,
strMsgBuf2,
MSG(MCopyFolderNotEmpty),
MSG(MOk));
}
else
Message(MSG_WARNING,1,MSG(MError),
MSG(MCopyCannotCreateLink),strDestFullName,
MSG(MCopyFolderNotEmpty),MSG(MOk));
}
return 0; // однозначно в морг
}
}
else // создаем.
{
if (apiCreateDirectory(strDestFullName,nullptr))
TreeList::AddTreeName(strDestFullName);
else
CreatePath(strDestFullName);
}
if (apiGetFileAttributes(strDestFullName) == INVALID_FILE_ATTRIBUTES) // так, все очень даже плохо.
{
if (!(Flags&FCOPY_NOSHOWMSGLINK))
{
Message(MSG_WARNING|MSG_ERRORTYPE,1,MSG(MError),
MSG(MCopyCannotCreateFolder),
strDestFullName,MSG(MOk));
}
return 0;
}
}
}
else
{
if (LinkType==RP_SYMLINK || LinkType==RP_SYMLINKFILE || LinkType==RP_SYMLINKDIR)
{
// в этом случае создается путь, но не сам каталог
string strPath=strDestFullName;
if (CutToSlash(strPath))
{
if (apiGetFileAttributes(strPath)==INVALID_FILE_ATTRIBUTES)
CreatePath(strPath);
}
}
else
{
bool CreateDir=true;
if (LinkType==RP_EXACTCOPY)
{
// в этом случае создается или каталог, или пустой файл
DWORD dwSrcAttr=apiGetFileAttributes(strSrcFullName);
if (dwSrcAttr!=INVALID_FILE_ATTRIBUTES && !(dwSrcAttr&FILE_ATTRIBUTE_DIRECTORY))
CreateDir=false;
}
if (CreateDir)
{
if (apiCreateDirectory(strDestFullName,nullptr))
TreeList::AddTreeName(strDestFullName);
else
CreatePath(strDestFullName);
}
else
{
string strPath=strDestFullName;
if (CutToSlash(strPath))
{
// создаём
if (apiGetFileAttributes(strPath)==INVALID_FILE_ATTRIBUTES)
CreatePath(strPath);
File file;
if(file.Open(strDestFullName, 0, 0, 0, CREATE_NEW, apiGetFileAttributes(strSrcFullName)))
{
file.Close();
}
}
}
if (apiGetFileAttributes(strDestFullName) == INVALID_FILE_ATTRIBUTES) // так. все очень даже плохо.
{
if (!(Flags&FCOPY_NOSHOWMSGLINK))
{
Message(MSG_WARNING|MSG_ERRORTYPE,1,MSG(MError),
MSG(MCopyCannotCreateLink),strDestFullName,MSG(MOk));
}
return 0;
}
}
}
if (LinkType!=RP_VOLMOUNT)
{
if (CreateReparsePoint(strSrcFullName,strDestFullName,LinkType))
{
return 1;
}
else
{
if (!(Flags&FCOPY_NOSHOWMSGLINK))
{
Message(MSG_WARNING|MSG_ERRORTYPE,1,MSG(MError),
MSG(MCopyCannotCreateLink),strDestFullName,MSG(MOk));
}
return 0;
}
}
else
{
if (CreateVolumeMountPoint(strSrcFullName,strDestFullName))
{
return 1;
}
else
{
if (!(Flags&FCOPY_NOSHOWMSGLINK))
{
strMsgBuf.Format(MSG(MCopyMountVolFailed),SelName);
strMsgBuf2.Format(MSG(MCopyMountVolFailed2),strDestFullName.CPtr());
Message(MSG_WARNING|MSG_ERRORTYPE,1,MSG(MError),strMsgBuf,strMsgBuf2,MSG(MOk));
}
return 0;
}
}
}
return 2;
}
bool WINAPI CreateReparsePoint(const wchar_t *Target, const wchar_t *Object,DWORD Type)
{
bool Result=false;
if (Object && *Object && Target && *Target)
{
switch (Type)
{
case RP_EXACTCOPY:
Result=DuplicateReparsePoint(Target,Object);
break;
case RP_SYMLINK:
case RP_SYMLINKFILE:
case RP_SYMLINKDIR:
if(Type == RP_SYMLINK)
{
DWORD Attr = apiGetFileAttributes(Target);
Type = ((Attr != INVALID_FILE_ATTRIBUTES) && (Attr&FILE_ATTRIBUTE_DIRECTORY)? RP_SYMLINKDIR : RP_SYMLINKFILE);
}
if (ifn.pfnCreateSymbolicLink)
{
Result=apiCreateSymbolicLink(Object,Target,Type==RP_SYMLINKDIR?SYMBOLIC_LINK_FLAG_DIRECTORY:0);
}
else
{
bool ObjectCreated=false;
if (Type==RP_SYMLINKDIR)
{
ObjectCreated=apiCreateDirectory(Object,nullptr)!=FALSE;
}
else
{
File file;
if(file.Open(Object,0,0,nullptr,CREATE_NEW))
{
ObjectCreated=true;
file.Close();
}
}
if (ObjectCreated)
{
LPBYTE szBuff=new BYTE[MAXIMUM_REPARSE_DATA_BUFFER_SIZE];
if(szBuff)
{
PREPARSE_DATA_BUFFER rdb=reinterpret_cast<PREPARSE_DATA_BUFFER>(szBuff);
rdb->ReparseTag=IO_REPARSE_TAG_SYMLINK;
string strPrintName=Target,strSubstituteName=Target;
if (IsAbsolutePath(Target))
{
strSubstituteName=L"\\??\\";
strSubstituteName+=(strPrintName.CPtr()+(HasPathPrefix(strPrintName)?4:0));
rdb->SymbolicLinkReparseBuffer.Flags=0;
}
else
{
rdb->SymbolicLinkReparseBuffer.Flags=SYMLINK_FLAG_RELATIVE;
}
if (FillREPARSE_DATA_BUFFER(rdb,strPrintName,strPrintName.GetLength(),strSubstituteName,strSubstituteName.GetLength()))
{
Result=SetREPARSE_DATA_BUFFER(Object,rdb);
}
else
{
SetLastError(ERROR_INSUFFICIENT_BUFFER);
}
delete[] szBuff;
}
}
}
break;
case RP_JUNCTION:
case RP_VOLMOUNT:
{
string strPrintName,strSubstituteName;
ConvertNameToFull(Target,strPrintName);
strSubstituteName=L"\\??\\";
strSubstituteName+=(strPrintName.CPtr()+(HasPathPrefix(strPrintName)?4:0));
BYTE szBuff[MAXIMUM_REPARSE_DATA_BUFFER_SIZE];
PREPARSE_DATA_BUFFER rdb=reinterpret_cast<PREPARSE_DATA_BUFFER>(szBuff);
rdb->ReparseTag=IO_REPARSE_TAG_MOUNT_POINT;
if (FillREPARSE_DATA_BUFFER(rdb,strPrintName,strPrintName.GetLength(),strSubstituteName,strSubstituteName.GetLength()))
{
Result=SetREPARSE_DATA_BUFFER(Object,rdb);
}
else
{
SetLastError(ERROR_INSUFFICIENT_BUFFER);
}
}
break;
}
}
return Result;
}
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 ShellMakeDir(Panel *SrcPanel)
{
FarList ComboList={sizeof(FarList)};
FarListItem LinkTypeItems[3]={};
ComboList.ItemsNumber=ARRAYSIZE(LinkTypeItems);
ComboList.Items=LinkTypeItems;
ComboList.Items[0].Text=MSG(MMakeFolderLinkNone);
ComboList.Items[1].Text=MSG(MMakeFolderLinkJunction);
ComboList.Items[2].Text=MSG(MMakeFolderLinkSymlink);
ComboList.Items[0].Flags|=LIF_SELECTED;
FarDialogItem MkDirDlgData[]=
{
{DI_DOUBLEBOX,3,1,72,10,0,nullptr,nullptr,0,MSG(MMakeFolderTitle)},
{DI_TEXT, 5,2, 0,2,0,nullptr,nullptr,0,MSG(MCreateFolder)},
{DI_EDIT, 5,3,70,3,0,L"NewFolder",nullptr,DIF_FOCUS|DIF_EDITEXPAND|DIF_HISTORY|DIF_USELASTHISTORY|DIF_EDITPATH,L""},
{DI_TEXT, 0,4, 0,4,0,nullptr,nullptr,DIF_SEPARATOR,L""},
{DI_TEXT, 5,5, 0,5,0,nullptr,nullptr,0,MSG(MMakeFolderLinkType)},
{DI_COMBOBOX,20,5,70,5,0,nullptr,nullptr,DIF_DROPDOWNLIST|DIF_LISTNOAMPERSAND|DIF_LISTWRAPMODE,L""},
{DI_TEXT, 5,6, 0,6,0,nullptr,nullptr,0,MSG(MMakeFolderLinkTarget)},
{DI_EDIT, 20,6,70,6,0,L"NewFolderLinkTarget",nullptr,DIF_DISABLE|DIF_EDITEXPAND|DIF_HISTORY|DIF_USELASTHISTORY|DIF_EDITPATH,L""},
{DI_CHECKBOX, 5,7, 0,7,Opt.MultiMakeDir,nullptr,nullptr,0,MSG(MMultiMakeDir)},
{DI_TEXT, 0,8, 0,8,0,nullptr,nullptr,DIF_SEPARATOR,L""},
{DI_BUTTON, 0,9, 0,9,0,nullptr,nullptr,DIF_DEFAULTBUTTON|DIF_CENTERGROUP,MSG(MOk)},
{DI_BUTTON, 0,9, 0,9,0,nullptr,nullptr,DIF_CENTERGROUP,MSG(MCancel)},
};
MakeDialogItemsEx(MkDirDlgData,MkDirDlg);
MkDirDlg[MKDIR_COMBOBOX_LINKTYPE].ListItems=&ComboList;
UserDefinedList DirList(ULF_UNIQUE);
Dialog Dlg(MkDirDlg,ARRAYSIZE(MkDirDlg),MkDirDlgProc,&DirList);
Dlg.SetPosition(-1,-1,76,12);
Dlg.SetHelp(L"MakeFolder");
Dlg.SetId(MakeFolderId);
Dlg.Process();
if (Dlg.GetExitCode()==MKDIR_OK)
{
string strDirName=MkDirDlg[MKDIR_EDIT].strData;
string strOriginalDirName;
const wchar_t *OneDir;
DirList.Reset();
bool SkipAll = false;
while (nullptr!=(OneDir=DirList.GetNext()))
{
strDirName = OneDir;
strOriginalDirName = strDirName;
//Unquote(DirName);
if (Opt.CreateUppercaseFolders && !IsCaseMixed(strDirName))
strDirName.Upper();
DeleteEndSlash(strDirName,true);
wchar_t* lpwszDirName = strDirName.GetBuffer();
bool bSuccess = false;
wchar_t *ChPtr;
if(ParsePath(lpwszDirName, const_cast<const wchar_t **>(&ChPtr)) == PATH_UNKNOWN)
{
ChPtr = lpwszDirName;
}
for (; ; ChPtr++)
{
if (IsSlash(*ChPtr) || !*ChPtr)
{
WCHAR Ch=0;
if(*ChPtr)
{
Ch = ChPtr[1];
ChPtr[1] = 0;
}
if (*lpwszDirName)
{
string _strDirName(lpwszDirName);
if (apiGetFileAttributes(_strDirName) == INVALID_FILE_ATTRIBUTES || !*ChPtr) // skip all intermediate dirs, but not last.
{
while(!(bSuccess=(apiCreateDirectory(_strDirName, nullptr)!=FALSE)) && !SkipAll)
{
int Ret = OperationFailed(strOriginalDirName, MError, MSG(MCannotCreateFolder));
if(Ret == 1) // skip
{
break;
}
else if(Ret == 2)
{
SkipAll = true;
break;
}
else if (Ret < 0 || Ret == 3) // cancel
{
return;
}
}
if(bSuccess)
{
TreeList::AddTreeName(_strDirName);
}
}
}
if(*ChPtr)
{
ChPtr[1] = Ch;
}
else
{
break;
}
}
}
strDirName.ReleaseBuffer();
if (bSuccess)
{
if(MkDirDlg[MKDIR_COMBOBOX_LINKTYPE].ListPos)
{
string strTarget=MkDirDlg[MKDIR_EDIT_LINKPATH].strData;
Unquote(strTarget);
while(!CreateReparsePoint(strTarget, strDirName, MkDirDlg[MKDIR_COMBOBOX_LINKTYPE].ListPos==1?RP_JUNCTION:RP_SYMLINKDIR) && !SkipAll)
{
int Ret = OperationFailed(strDirName, MError, MSG(MCopyCannotCreateLink));
if(Ret == 1) // skip
{
break;
}
else if(Ret == 2)
{
SkipAll = true;
break;
}
else if (Ret < 0 || Ret == 3) // cancel
{
return;
}
}
}
TreeList::AddTreeName(strDirName);
}
}
SrcPanel->Update(UPDATE_KEEP_SELECTION);
if (!strDirName.IsEmpty())
{
size_t pos;
if (FindSlash(pos,strDirName))
strDirName.SetLength(pos);
if (!SrcPanel->GoToFile(strDirName) && strDirName.At(strDirName.GetLength()-1)==L'.')
{
strDirName.SetLength(strDirName.GetLength()-1);
SrcPanel->GoToFile(strDirName);
}
}
SrcPanel->Redraw();
Panel *AnotherPanel=CtrlObject->Cp()->GetAnotherPanel(SrcPanel);
int AnotherType=AnotherPanel->GetType();
if (AnotherPanel->NeedUpdatePanel(SrcPanel) || AnotherType==QVIEW_PANEL)
{
AnotherPanel->Update(UPDATE_KEEP_SELECTION|UPDATE_SECONDARY);
AnotherPanel->Redraw();
}
}
}