// Добавляем разделитель
void AddSeparator(LPCWSTR Label=nullptr,int position = -1)
{
if (CallbackCallSource == CodePagesFill)
{
if (position==-1)
{
FarListInfo info;
SendDlgMessage(dialog, DM_LISTINFO, control, (LONG_PTR)&info);
position = info.ItemsNumber;
}
FarListInsert item = {position, {}};
item.Item.Text = Label;
item.Item.Flags = LIF_SEPARATOR;
SendDlgMessage(dialog, DM_LISTINSERT, control, (LONG_PTR)&item);
}
else
{
MenuItemEx item;
item.Clear();
item.strName = Label;
item.Flags = MIF_SEPARATOR;
if (position>=0)
CodePages->AddItem(&item, position);
else
CodePages->AddItem(&item);
}
}
// заполнение меню
int FillUserMenu(VMenu& FarUserMenu,DList<UserMenuItem> *Menu,int MenuPos,int *FuncPos,const string& Name,const string& ShortName)
{
FarUserMenu.DeleteItems();
MenuItemEx FarUserMenuItem;
int NumLines=0;
for (UserMenuItem *MenuItem=Menu->First(); MenuItem; MenuItem=Menu->Next(MenuItem), NumLines++)
{
FarUserMenuItem.Clear();
int FuncNum=0;
// сепаратором является случай, когда хоткей == "--"
if (!StrCmp(MenuItem->strHotKey,L"--"))
{
FarUserMenuItem.Flags|=LIF_SEPARATOR;
FarUserMenuItem.strName=MenuItem->strLabel;
if (NumLines==MenuPos)
{
MenuPos++;
}
}
else
{
string strLabel = MenuItem->strLabel;
SubstFileName(strLabel,Name,ShortName,nullptr,nullptr,nullptr,nullptr,TRUE);
apiExpandEnvironmentStrings(strLabel, strLabel);
string strHotKey = MenuItem->strHotKey;
FuncNum = PrepareHotKey(strHotKey);
int Offset = strHotKey.At(0)==L'&'?5:4;
FarUserMenuItem.strName=FormatString()<<((!strHotKey.IsEmpty() && !FuncNum)?L"&":L"")<<fmt::LeftAlign()<<fmt::ExactWidth(Offset)<<strHotKey;
FarUserMenuItem.strName+=strLabel;
if (MenuItem->Submenu)
{
FarUserMenuItem.Flags|=MIF_SUBMENU;
}
FarUserMenuItem.SetSelect(NumLines==MenuPos);
}
int ItemPos=FarUserMenu.AddItem(&FarUserMenuItem);
FarUserMenu.SetUserData(&MenuItem,sizeof(MenuItem),ItemPos);
if (FuncNum>0)
{
FuncPos[FuncNum-1]=ItemPos;
}
}
FarUserMenuItem.Clear();
FarUserMenuItem.SetSelect(NumLines==MenuPos);
FarUserMenu.AddItem(&FarUserMenuItem);
return NumLines;
}
// Каллбак для диалога редактирования имени кодовой страницы
intptr_t WINAPI EditDialogProc(HANDLE hDlg, intptr_t Msg, intptr_t Param1, void* Param2)
{
if (Msg==DN_CLOSE)
{
if (Param1==EDITCP_OK || Param1==EDITCP_RESET)
{
string strCodePageName;
uintptr_t CodePage = GetMenuItemCodePage();
FormatString strCodePage;
strCodePage<<CodePage;
if (Param1==EDITCP_OK)
{
FarDialogItemData item = {sizeof(FarDialogItemData)};
item.PtrLength = SendDlgMessage(hDlg, DM_GETTEXT, EDITCP_EDIT, 0);
item.PtrData = strCodePageName.GetBuffer(item.PtrLength+1);
SendDlgMessage(hDlg, DM_GETTEXT, EDITCP_EDIT, &item);
strCodePageName.ReleaseBuffer();
}
// Если имя кодовой страницы пустое, то считаем, что имя не задано
if (!strCodePageName.GetLength())
GeneralCfg->DeleteValue(NamesOfCodePagesKey, strCodePage);
else
GeneralCfg->SetValue(NamesOfCodePagesKey, strCodePage, strCodePageName);
// Получаем информацию о кодовой странице
CPINFOEX cpiex;
if (GetCodePageInfo(CodePage, cpiex))
{
// Формируем имя таблиц символов
bool IsCodePageNameCustom = false;
wchar_t *CodePageName = FormatCodePageName(CodePage, cpiex.CodePageName, sizeof(cpiex.CodePageName)/sizeof(wchar_t), IsCodePageNameCustom);
// Формируем строку представления
strCodePage.Clear();
FormatCodePageString(CodePage, CodePageName, strCodePage, IsCodePageNameCustom);
// Обновляем имя кодовой страницы
int Position = CodePages->GetSelectPos();
CodePages->DeleteItem(Position);
MenuItemEx NewItem;
NewItem.Clear();
NewItem.strName = strCodePage;
NewItem.UserData = &CodePage;
NewItem.UserDataSize = sizeof(CodePage);
CodePages->AddItem(&NewItem, Position);
CodePages->SetSelectPos(Position, 1);
}
}
}
return DefDlgProc(hDlg, Msg, Param1, Param2);
}
static int FillFileTypesMenu(VMenu *TypesMenu,int MenuPos)
{
int DizWidth=GetDescriptionWidth();
MenuItemEx TypesMenuItem;
TypesMenu->DeleteItems();
int NumLine=0;
for (;; NumLine++)
{
string strRegKey;
strRegKey.Format(FTS.TypeFmt,NumLine);
TypesMenuItem.Clear();
string strMask;
if (!GetRegKey(strRegKey,FTS.Mask,strMask,L""))
{
break;
}
string strMenuText;
if (DizWidth)
{
string strDescription;
GetRegKey(strRegKey,FTS.Desc,strDescription,L"");
string strTitle=strDescription;
size_t Pos=0;
bool Ampersand=strTitle.Pos(Pos,L'&');
if (DizWidth+Ampersand > ScrX/2 && Ampersand && static_cast<int>(Pos) > DizWidth)
Ampersand=false;
strMenuText.Format(L"%-*.*s %c ",DizWidth+Ampersand,DizWidth+Ampersand,strTitle.CPtr(),BoxSymbols[BS_V1]);
}
//TruncStr(strMask,ScrX-DizWidth-14);
strMenuText += strMask;
TypesMenuItem.strName = strMenuText;
TypesMenuItem.SetSelect(NumLine==MenuPos);
TypesMenu->AddItem(&TypesMenuItem);
}
TypesMenuItem.strName.Clear();
TypesMenuItem.SetSelect(NumLine==MenuPos);
TypesMenu->AddItem(&TypesMenuItem);
return NumLine;
}
// Каллбак для диалога редактирования имени кодовой страницы
LONG_PTR WINAPI EditDialogProc(HANDLE hDlg, int Msg, int Param1, LONG_PTR Param2)
{
if (Msg==DN_CLOSE)
{
if (Param1==EDITCP_OK || Param1==EDITCP_RESET)
{
FARString strCodePageName;
UINT CodePage = GetMenuItemCodePage();
FormatString strCodePage;
strCodePage<<CodePage;
if (Param1==EDITCP_OK)
{
wchar_t *CodePageName = strCodePageName.GetBuffer(SendDlgMessage(hDlg, DM_GETTEXTPTR, EDITCP_EDIT, 0)+1);
SendDlgMessage(hDlg, DM_GETTEXTPTR, EDITCP_EDIT, (LONG_PTR)CodePageName);
strCodePageName.ReleaseBuffer();
}
// Если имя кодовой страницы пустое, то считаем, что имя не задано
if (!strCodePageName.GetLength())
DeleteRegValue(NamesOfCodePagesKey, strCodePage);
else
SetRegKey(NamesOfCodePagesKey, strCodePage, strCodePageName);
// Получаем информацию о кодовой странице
CPINFOEX cpiex;
if (GetCodePageInfo(CodePage, cpiex))
{
// Формируем имя таблиц символов
bool IsCodePageNameCustom = false;
wchar_t *CodePageName = FormatCodePageName(CodePage, cpiex.CodePageName, sizeof(cpiex.CodePageName)/sizeof(wchar_t), IsCodePageNameCustom);
// Формируем строку представления
strCodePage.Clear();
FormatCodePageString(CodePage, CodePageName, strCodePage, IsCodePageNameCustom);
// Обновляем имя кодовой страницы
int Position = CodePages->GetSelectPos();
CodePages->DeleteItem(Position);
MenuItemEx NewItem;
NewItem.Clear();
NewItem.strName = strCodePage;
NewItem.UserData = (char *)(UINT_PTR)CodePage;
NewItem.UserDataSize = sizeof(UINT);
CodePages->AddItem(&NewItem, Position);
CodePages->SetSelectPos(Position, 1);
}
}
}
return DefDlgProc(hDlg, Msg, Param1, Param2);
}
void HighlightFiles::FillMenu(VMenu *HiMenu,int MenuPos)
{
MenuItemEx HiMenuItem;
const int Count[4][2] =
{
{0, FirstCount},
{FirstCount, FirstCount+UpperCount},
{FirstCount+UpperCount, FirstCount+UpperCount+LowerCount},
{FirstCount+UpperCount+LowerCount,FirstCount+UpperCount+LowerCount+LastCount}
};
HiMenu->DeleteItems();
HiMenuItem.Clear();
for (int j=0; j<4; j++)
{
for (int i=Count[j][0]; i<Count[j][1]; i++)
{
MenuString(HiMenuItem.strName,HiData.getItem(i),true);
HiMenu->AddItem(&HiMenuItem);
}
HiMenuItem.strName.Clear();
HiMenu->AddItem(&HiMenuItem);
if (j<3)
{
if (!j)
HiMenuItem.strName = MSG(MHighlightUpperSortGroup);
else if (j==1)
HiMenuItem.strName = MSG(MHighlightLowerSortGroup);
else
HiMenuItem.strName = MSG(MHighlightLastGroup);
HiMenuItem.Flags|=LIF_SEPARATOR;
HiMenu->AddItem(&HiMenuItem);
HiMenuItem.Flags=0;
}
}
HiMenu->SetSelectPos(MenuPos,1);
}
static void AddToPrintersMenu(VMenu *PrinterList, PRINTER_INFO *pi, int PrinterNumber)
{
// Получаем принтер по умолчанию
string strDefaultPrinter;
DWORD pcchBuffer = 0;
if (!GetDefaultPrinter(nullptr, &pcchBuffer) && ERROR_INSUFFICIENT_BUFFER==GetLastError())
{
if (!GetDefaultPrinter(strDefaultPrinter.GetBuffer(pcchBuffer), &pcchBuffer))
strDefaultPrinter.ReleaseBuffer(0);
else
strDefaultPrinter.ReleaseBuffer();
}
// Элемент меню
MenuItemEx Item;
// Признак наличия принтера по умолчанию
bool bDefaultPrinterFound = false;
// Заполняем список принтеров
for (int i=0; i<PrinterNumber; i++)
{
PRINTER_INFO *printer = &pi[i];
Item.Clear();
Item.strName = printer->pPrinterName;
if (!StrCmp(printer->pPrinterName, strDefaultPrinter))
{
bDefaultPrinterFound = true;
Item.SetCheck(TRUE);
Item.SetSelect(TRUE);
}
PrinterList->SetUserData(printer->pPrinterName,0,PrinterList->AddItem(&Item));
}
if (!bDefaultPrinterFound)
PrinterList->SetSelectPos(0, 1);
}
/* $ 06.07.2001
+ Используем CFileMask вместо GetCommaWord, этим самым добиваемся того, что
можно использовать маски исключения
- Убрал непонятный мне запрет на использование маски файлов типа "*.*"
(был когда-то, вроде, такой баг-репорт)
*/
bool ProcessLocalFileTypes(const wchar_t *Name, const wchar_t *ShortName, int Mode, bool AlwaysWaitFinish)
{
RenumKeyRecord(FTS.Associations,FTS.TypeFmt,FTS.Type0);
MenuItemEx TypesMenuItem;
VMenu TypesMenu(MSG(MSelectAssocTitle),nullptr,0,ScrY-4);
TypesMenu.SetHelp(FTS.Help);
TypesMenu.SetFlags(VMENU_WRAPMODE);
TypesMenu.SetPosition(-1,-1,0,0);
int DizWidth=GetDescriptionWidth(Name, ShortName);
int ActualCmdCount=0; // отображаемых ассоциаций в меню
CFileMask FMask; // для работы с масками файлов
string strCommand, strDescription;
int CommandCount=0;
for (int I=0;; I++)
{
strCommand.Clear();
string strRegKey, strMask;
strRegKey.Format(FTS.TypeFmt,I);
if (!GetRegKey(strRegKey,FTS.Mask,strMask,L""))
break;
if (FMask.Set(strMask,FMF_SILENT))
{
if (FMask.Compare(Name))
{
LPCWSTR Type=nullptr;
switch (Mode)
{
case FILETYPE_EXEC:
Type=FTS.Execute;
break;
case FILETYPE_VIEW:
Type=FTS.View;
break;
case FILETYPE_EDIT:
Type=FTS.Edit;
break;
case FILETYPE_ALTEXEC:
Type=FTS.AltExec;
break;
case FILETYPE_ALTVIEW:
Type=FTS.AltView;
break;
case FILETYPE_ALTEDIT:
Type=FTS.AltEdit;
break;
}
DWORD State=GetRegKey(strRegKey,FTS.State,0xffffffff);
if (State&(1<<Mode))
{
string strNewCommand;
GetRegKey(strRegKey,Type,strNewCommand,L"");
if (!strNewCommand.IsEmpty())
{
strCommand = strNewCommand;
GetRegKey(strRegKey,FTS.Desc,strDescription,L"");
CommandCount++;
}
}
}
if (strCommand.IsEmpty())
continue;
}
TypesMenuItem.Clear();
string strCommandText = strCommand;
SubstFileName(strCommandText,Name,ShortName,nullptr,nullptr,nullptr,nullptr,TRUE);
// все "подставлено", теперь проверим условия "if exist"
if (!ExtractIfExistCommand(strCommandText))
continue;
ActualCmdCount++;
string strMenuText;
if (DizWidth)
{
string strTitle;
if (!strDescription.IsEmpty())
{
strTitle = strDescription;
SubstFileName(strTitle, Name,ShortName,nullptr,nullptr,nullptr,nullptr,TRUE);
}
size_t Pos=0;
bool Ampersand=strTitle.Pos(Pos,L'&');
if (DizWidth+Ampersand>ScrX/2 && Ampersand && static_cast<int>(Pos)>DizWidth)
Ampersand=false;
strMenuText.Format(L"%-*.*s %c ",DizWidth+Ampersand,DizWidth+Ampersand,strTitle.CPtr(),BoxSymbols[BS_V1]);
}
TruncStr(strCommandText,ScrX-DizWidth-14);
strMenuText += strCommandText;
TypesMenuItem.strName = strMenuText;
TypesMenuItem.SetSelect(!I);
TypesMenu.SetUserData(strCommand.CPtr(),0,TypesMenu.AddItem(&TypesMenuItem));
}
if (!CommandCount)
return false;
if (!ActualCmdCount)
return true;
int ExitCode=0;
if (ActualCmdCount>1)
{
TypesMenu.Process();
ExitCode=TypesMenu.Modal::GetExitCode();
if (ExitCode<0)
return true;
}
int Size=TypesMenu.GetUserDataSize(ExitCode);
LPWSTR Command=strCommand.GetBuffer(Size/sizeof(wchar_t));
TypesMenu.GetUserData(Command,Size,ExitCode);
strCommand.ReleaseBuffer(Size);
string strListName, strAnotherListName;
string strShortListName, strAnotherShortListName;
int PreserveLFN=SubstFileName(strCommand,Name,ShortName,&strListName,&strAnotherListName, &strShortListName, &strAnotherShortListName);
bool ListFileUsed=!strListName.IsEmpty()||!strAnotherListName.IsEmpty()||!strShortListName.IsEmpty()||!strAnotherShortListName.IsEmpty();
// Снова все "подставлено", теперь проверим условия "if exist"
if (ExtractIfExistCommand(strCommand))
{
PreserveLongName PreserveName(ShortName,PreserveLFN);
RemoveExternalSpaces(strCommand);
if (!strCommand.IsEmpty())
{
bool isSilent=(strCommand.At(0)==L'@');
if (isSilent)
{
strCommand.LShift(1);
}
ProcessOSAliases(strCommand);
if (!isSilent)
{
CtrlObject->CmdLine->ExecString(strCommand,AlwaysWaitFinish, false, false, ListFileUsed);
if (!(Opt.ExcludeCmdHistory&EXCLUDECMDHISTORY_NOTFARASS) && !AlwaysWaitFinish) //AN
CtrlObject->CmdHistory->AddToHistory(strCommand);
}
else
{
#if 1
SaveScreen SaveScr;
CtrlObject->Cp()->LeftPanel->CloseFile();
CtrlObject->Cp()->RightPanel->CloseFile();
Execute(strCommand,AlwaysWaitFinish, 0, 0, 0, ListFileUsed, true);
#else
// здесь была бага с прорисовкой (и... вывод данных
// на команду "@type !@!" пропадал с экрана)
// сделаем по аналогии с CommandLine::CmdExecute()
{
RedrawDesktop RdrwDesktop(TRUE);
Execute(strCommand,AlwaysWaitFinish, 0, 0, 0, ListFileUsed);
ScrollScreen(1); // обязательно, иначе деструктор RedrawDesktop
// проредравив экран забьет последнюю строку вывода.
}
CtrlObject->Cp()->LeftPanel->UpdateIfChanged(UIC_UPDATE_FORCE);
CtrlObject->Cp()->RightPanel->UpdateIfChanged(UIC_UPDATE_FORCE);
CtrlObject->Cp()->Redraw();
#endif
}
if (FrameManager->GetCurrentFrame()->GetType()==MODALTYPE_VIEWER)
{
TypesMenu.ResetCursor();
}
}
}
if (!strListName.IsEmpty())
apiDeleteFile(strListName);
if (!strAnotherListName.IsEmpty())
apiDeleteFile(strAnotherListName);
if (!strShortListName.IsEmpty())
apiDeleteFile(strShortListName);
if (!strAnotherShortListName.IsEmpty())
apiDeleteFile(strAnotherShortListName);
return true;
}
// Обработка добавления/удаления в/из список выбранных таблиц символов
void ProcessSelected(bool select)
{
if (Opt.CPMenuMode && select)
return;
UINT itemPosition = CodePages->GetSelectPos();
UINT codePage = GetMenuItemCodePage();
if ((select && IsPositionFavorite(itemPosition)) || (!select && IsPositionNormal(itemPosition)))
{
// Преобразуем номер таблицы символов в строку
FormatString strCPName;
strCPName<<codePage;
// Получаем текущее состояние флага в реестре
int selectType = 0;
GetRegKey(FavoriteCodePagesKey, strCPName, selectType, 0);
// Удаляем/добавляем в ресестре информацию о выбранной кодовой странице
if (select)
SetRegKey(FavoriteCodePagesKey, strCPName, CPST_FAVORITE | (selectType & CPST_FIND ? CPST_FIND : 0));
else if (selectType & CPST_FIND)
SetRegKey(FavoriteCodePagesKey, strCPName, CPST_FIND);
else
DeleteRegValue(FavoriteCodePagesKey, strCPName);
// Создаём новый элемент меню
MenuItemEx newItem;
newItem.Clear();
newItem.strName = CodePages->GetItemPtr()->strName;
newItem.UserData = (char *)(UINT_PTR)codePage;
newItem.UserDataSize = sizeof(UINT);
// Сохраняем позицию курсора
int position=CodePages->GetSelectPos();
// Удаляем старый пункт меню
CodePages->DeleteItem(CodePages->GetSelectPos());
// Добавляем пункт меню в новое место
if (select)
{
// Добавляем разделитель, если выбранных кодовых страниц ещё не было
// и после добавления останутся нормальные кодовые страницы
if (!favoriteCodePages && normalCodePages>1)
AddSeparator(MSG(MGetCodePageFavorites),CodePages->GetItemCount()-normalCodePages);
// Ищем позицию, куда добавить элемент
int newPosition = GetCodePageInsertPosition(
codePage,
CodePages->GetItemCount()-normalCodePages-favoriteCodePages,
favoriteCodePages
);
// Добавляем кодовою страницу в выбранные
CodePages->AddItem(&newItem, newPosition);
// Удаляем разделитель, если нет обыкновынных кодовых страниц
if (normalCodePages==1)
CodePages->DeleteItem(CodePages->GetItemCount()-1);
// Изменяем счётчики нормальных и выбранных кодовых страниц
favoriteCodePages++;
normalCodePages--;
position++;
}
else
{
// Удаляем разделитеь, если после удаления не останнется ни одной
// выбранной таблицы символов
if (favoriteCodePages==1 && normalCodePages>0)
CodePages->DeleteItem(CodePages->GetItemCount()-normalCodePages-2);
// Переносим элемент в нормальные таблицы, только если они показываются
if (!Opt.CPMenuMode)
{
// Добавляем разделитель, если не было ни одной нормальной кодовой страницы
if (!normalCodePages)
AddSeparator(MSG(MGetCodePageOther));
// Добавляем кодовою страницу в нормальные
CodePages->AddItem(
&newItem,
GetCodePageInsertPosition(
codePage,
CodePages->GetItemCount()-normalCodePages,
normalCodePages
)
);
normalCodePages++;
}
// Если в режиме скрытия нормальных таблиц мы удалили последнюю выбранную таблицу, то удаляем и разделитель
else if (favoriteCodePages==1)
CodePages->DeleteItem(CodePages->GetItemCount()-normalCodePages-1);
favoriteCodePages--;
if (position==CodePages->GetItemCount()-normalCodePages-1)
position--;
}
// Устанавливаем позицию в меню
CodePages->SetSelectPos(position>=CodePages->GetItemCount() ? CodePages->GetItemCount()-1 : position, 1);
// Показываем меню
if (Opt.CPMenuMode)
CodePages->SetPosition(-1, -1, 0, 0);
CodePages->Show();
}
}
// Добавляем таблицу символов
void AddCodePage(const wchar_t *codePageName, UINT codePage, int position, bool enabled, bool checked, bool IsCodePageNameCustom)
{
if (CallbackCallSource == CodePagesFill)
{
// Вычисляем позицию вставляемого элемента
if (position==-1)
{
FarListInfo info;
SendDlgMessage(dialog, DM_LISTINFO, control, (LONG_PTR)&info);
position = info.ItemsNumber;
}
// Вставляем элемент
FarListInsert item = {position, {}};
FormatString name;
FormatCodePageString(codePage, codePageName, name, IsCodePageNameCustom);
item.Item.Text = name;
if (selectedCodePages && checked)
{
item.Item.Flags |= MIF_CHECKED;
}
if (!enabled)
{
item.Item.Flags |= MIF_GRAYED;
}
SendDlgMessage(dialog, DM_LISTINSERT, control, (LONG_PTR)&item);
// Устанавливаем данные для элемента
FarListItemData data;
data.Index = position;
data.Data = (void*)(DWORD_PTR)codePage;
data.DataSize = sizeof(UINT);
SendDlgMessage(dialog, DM_LISTSETDATA, control, (LONG_PTR)&data);
}
else
{
// Создаём новый элемент меню
MenuItemEx item;
item.Clear();
if (!enabled)
item.Flags |= MIF_GRAYED;
FormatString name;
FormatCodePageString(codePage, codePageName, name, IsCodePageNameCustom);
item.strName = name;
item.UserData = (char *)(UINT_PTR)codePage;
item.UserDataSize = sizeof(UINT);
// Добавляем новый элемент в меню
if (position>=0)
CodePages->AddItem(&item, position);
else
CodePages->AddItem(&item);
// Если надо позиционируем курсор на добавленный элемент
if (currentCodePage==codePage)
{
if ((CodePages->GetSelectPos()==-1 || GetMenuItemCodePage()!=codePage))
{
CodePages->SetSelectPos(position>=0?position:CodePages->GetItemCount()-1, 1);
}
}
}
}
/*
Return:
-1 - Error???
0 - Esc
1 - Enter
2 - Shift-Enter
3 - Ctrl-Enter
4 - F3
5 - F4
6 - Ctrl-Shift-Enter
7 - Ctrl-Alt-Enter
*/
int History::ProcessMenu(string &strStr, const wchar_t *Title, VMenu &HistoryMenu, int Height, int &Type, Dialog *Dlg)
{
MenuItemEx MenuItem;
HistoryRecord *SelectedRecord=nullptr;
FarListPos Pos={0,0};
int Code=-1;
int RetCode=1;
bool Done=false;
bool SetUpMenuPos=false;
if (TypeHistory == HISTORYTYPE_DIALOG && HistoryList.Empty())
return 0;
while (!Done)
{
bool IsUpdate=false;
HistoryMenu.DeleteItems();
HistoryMenu.Modal::ClearDone();
// заполнение пунктов меню
for (const HistoryRecord *HistoryItem=TypeHistory==HISTORYTYPE_DIALOG?HistoryList.Last():HistoryList.First(); HistoryItem ; HistoryItem=TypeHistory==HISTORYTYPE_DIALOG?HistoryList.Prev(HistoryItem):HistoryList.Next(HistoryItem))
{
string strRecord = HistoryItem->strName;
strRecord.Clear();
if (TypeHistory == HISTORYTYPE_VIEW)
{
strRecord += GetTitle(HistoryItem->Type);
strRecord += L":";
strRecord += (HistoryItem->Type==4?L"-":L" ");
}
/*
TODO: возможно здесь! или выше....
char Date[16],Time[16], OutStr[32];
ConvertDate(HistoryItem->Timestamp,Date,Time,5,TRUE,FALSE,TRUE,TRUE);
а дальше
strRecord += дату и время
*/
strRecord += HistoryItem->strName;;
if (TypeHistory != HISTORYTYPE_DIALOG)
ReplaceStrings(strRecord, L"&",L"&&", -1);
MenuItem.Clear();
MenuItem.strName = strRecord;
MenuItem.SetCheck(HistoryItem->Lock?1:0);
if (!SetUpMenuPos)
MenuItem.SetSelect(CurrentItem==HistoryItem || (!CurrentItem && HistoryItem==HistoryList.Last()));
HistoryMenu.SetUserData(HistoryItem,sizeof(HistoryItem),HistoryMenu.AddItem(&MenuItem));
}
//MenuItem.Clear ();
//MenuItem.strName = L" ";
//if (!SetUpMenuPos)
//MenuItem.SetSelect(CurLastPtr==-1 || CurLastPtr>=HistoryList.Length);
//HistoryMenu.SetUserData(nullptr,sizeof(OneItem *),HistoryMenu.AddItem(&MenuItem));
if (TypeHistory == HISTORYTYPE_DIALOG)
Dlg->SetComboBoxPos();
else
HistoryMenu.SetPosition(-1,-1,0,0);
if (SetUpMenuPos)
{
Pos.SelectPos=Pos.SelectPos < (int)HistoryList.Count() ? Pos.SelectPos : (int)HistoryList.Count()-1;
Pos.TopPos=Min(Pos.TopPos,HistoryMenu.GetItemCount()-Height);
HistoryMenu.SetSelectPos(&Pos);
SetUpMenuPos=false;
}
/*BUGBUG???
if (TypeHistory == HISTORYTYPE_DIALOG)
{
// Перед отрисовкой спросим об изменении цветовых атрибутов
BYTE RealColors[VMENU_COLOR_COUNT];
FarListColors ListColors={0};
ListColors.ColorCount=VMENU_COLOR_COUNT;
ListColors.Colors=RealColors;
HistoryMenu.GetColors(&ListColors);
if(DlgProc((HANDLE)this,DN_CTLCOLORDLGLIST,CurItem->ID,(LONG_PTR)&ListColors))
HistoryMenu.SetColors(&ListColors);
}
*/
HistoryMenu.Show();
while (!HistoryMenu.Done())
{
if (TypeHistory == HISTORYTYPE_DIALOG && (!Dlg->GetDropDownOpened() || HistoryList.Empty()))
{
HistoryMenu.ProcessKey(KEY_ESC);
continue;
}
int Key=HistoryMenu.ReadInput();
if (TypeHistory == HISTORYTYPE_DIALOG && Key==KEY_TAB) // Tab в списке хистори диалогов - аналог Enter
{
HistoryMenu.ProcessKey(KEY_ENTER);
continue;
}
HistoryMenu.GetSelectPos(&Pos);
HistoryRecord *CurrentRecord=(HistoryRecord *)HistoryMenu.GetUserData(nullptr,sizeof(HistoryRecord *),Pos.SelectPos);
switch (Key)
{
case KEY_CTRLR: // обновить с удалением недоступных
{
if (TypeHistory == HISTORYTYPE_FOLDER || TypeHistory == HISTORYTYPE_VIEW)
{
bool ModifiedHistory=false;
for (HistoryRecord *HistoryItem=HistoryList.First(); HistoryItem ; HistoryItem=HistoryList.Next(HistoryItem))
{
if (HistoryItem->Lock) // залоченные не трогаем
continue;
// убить запись из истории
if (apiGetFileAttributes(HistoryItem->strName) == INVALID_FILE_ATTRIBUTES)
{
HistoryItem=HistoryList.Delete(HistoryItem);
ModifiedHistory=true;
}
}
if (ModifiedHistory) // избавляемся от лишних телодвижений
{
SaveHistory(); // сохранить
HistoryMenu.Modal::SetExitCode(Pos.SelectPos);
HistoryMenu.SetUpdateRequired(TRUE);
IsUpdate=true;
}
ResetPosition();
}
break;
}
case KEY_CTRLSHIFTNUMENTER:
case KEY_CTRLNUMENTER:
case KEY_SHIFTNUMENTER:
case KEY_CTRLSHIFTENTER:
case KEY_CTRLENTER:
case KEY_SHIFTENTER:
case KEY_CTRLALTENTER:
case KEY_CTRLALTNUMENTER:
{
if (TypeHistory == HISTORYTYPE_DIALOG)
break;
HistoryMenu.Modal::SetExitCode(Pos.SelectPos);
Done=true;
RetCode = Key==KEY_CTRLALTENTER||Key==KEY_CTRLALTNUMENTER?7:(Key==KEY_CTRLSHIFTENTER||Key==KEY_CTRLSHIFTNUMENTER?6:(Key==KEY_SHIFTENTER||Key==KEY_SHIFTNUMENTER?2:3));
break;
}
case KEY_F3:
case KEY_F4:
case KEY_NUMPAD5: case KEY_SHIFTNUMPAD5:
{
if (TypeHistory == HISTORYTYPE_DIALOG)
break;
HistoryMenu.Modal::SetExitCode(Pos.SelectPos);
Done=true;
RetCode=(Key==KEY_F4? 5 : 4);
break;
}
// $ 09.04.2001 SVS - Фича - копирование из истории строки в Clipboard
case KEY_CTRLC:
case KEY_CTRLINS: case KEY_CTRLNUMPAD0:
{
if (CurrentRecord)
CopyToClipboard(CurrentRecord->strName);
break;
}
// Lock/Unlock
case KEY_INS:
case KEY_NUMPAD0:
{
if (HistoryMenu.GetItemCount()/* > 1*/)
{
CurrentItem=CurrentRecord;
CurrentItem->Lock=CurrentItem->Lock?false:true;
HistoryMenu.Hide();
ResetPosition();
SaveHistory();
HistoryMenu.Modal::SetExitCode(Pos.SelectPos);
HistoryMenu.SetUpdateRequired(TRUE);
IsUpdate=true;
SetUpMenuPos=true;
}
break;
}
case KEY_SHIFTNUMDEL:
case KEY_SHIFTDEL:
{
if (HistoryMenu.GetItemCount()/* > 1*/)
{
if (!CurrentRecord->Lock)
{
HistoryMenu.Hide();
Delete(CurrentRecord);
HistoryMenu.Modal::SetExitCode(Pos.SelectPos);
HistoryMenu.SetUpdateRequired(TRUE);
IsUpdate=true;
SetUpMenuPos=true;
}
}
break;
}
case KEY_NUMDEL:
case KEY_DEL:
{
if (HistoryMenu.GetItemCount()/* > 1*/ &&
(!Opt.Confirm.HistoryClear ||
(Opt.Confirm.HistoryClear &&
!Message(MSG_WARNING,2,
MSG((TypeHistory==HISTORYTYPE_CMD || TypeHistory==HISTORYTYPE_DIALOG?MHistoryTitle:
(TypeHistory==HISTORYTYPE_FOLDER?MFolderHistoryTitle:MViewHistoryTitle))),
MSG(MHistoryClear),
MSG(MClear),MSG(MCancel)))))
{
for (HistoryRecord *HistoryItem=HistoryList.First(); HistoryItem ; HistoryItem=HistoryList.Next(HistoryItem))
{
if (HistoryItem->Lock) // залоченные не трогаем
continue;
HistoryItem=HistoryList.Delete(HistoryItem);
}
ResetPosition();
HistoryMenu.Hide();
SaveHistory();
HistoryMenu.Modal::SetExitCode(Pos.SelectPos);
HistoryMenu.SetUpdateRequired(TRUE);
IsUpdate=true;
}
break;
}
default:
HistoryMenu.ProcessInput();
break;
}
}
if (IsUpdate)
continue;
Done=true;
Code=HistoryMenu.Modal::GetExitCode();
if (Code >= 0)
{
SelectedRecord=(HistoryRecord *)HistoryMenu.GetUserData(nullptr,sizeof(HistoryRecord *),Code);
if (!SelectedRecord)
return -1;
//BUGUBUG: eliminate those magic numbers!
if (SelectedRecord->Type != 2 && SelectedRecord->Type != 3 // ignore external
&& RetCode != 3 && ((TypeHistory == HISTORYTYPE_FOLDER && !SelectedRecord->Type) || TypeHistory == HISTORYTYPE_VIEW) && apiGetFileAttributes(SelectedRecord->strName) == INVALID_FILE_ATTRIBUTES)
{
SetLastError(ERROR_FILE_NOT_FOUND);
if (SelectedRecord->Type == 1 && TypeHistory == HISTORYTYPE_VIEW) // Edit? тогда спросим и если надо создадим
{
if (!Message(MSG_WARNING|MSG_ERRORTYPE,2,Title,SelectedRecord->strName,MSG(MViewHistoryIsCreate),MSG(MHYes),MSG(MHNo)))
break;
}
else
{
Message(MSG_WARNING|MSG_ERRORTYPE,1,Title,SelectedRecord->strName,MSG(MOk));
}
Done=false;
SetUpMenuPos=true;
HistoryMenu.Modal::SetExitCode(Pos.SelectPos=Code);
continue;
}
}
}
if (Code < 0 || !SelectedRecord)
return 0;
if (KeepSelectedPos)
{
CurrentItem = SelectedRecord;
}
strStr = SelectedRecord->strName;
if (RetCode < 4 || RetCode == 6 || RetCode == 7)
{
Type=SelectedRecord->Type;
}
else
{
Type=RetCode-4;
if (Type == 1 && SelectedRecord->Type == 4)
Type=4;
RetCode=1;
}
return RetCode;
}
int Manager::ProcessKey(DWORD Key)
{
int ret=FALSE;
if (CurrentFrame)
{
DWORD KeyM=(Key&(~KEY_CTRLMASK));
if (!((KeyM >= KEY_MACRO_BASE && KeyM <= KEY_MACRO_ENDBASE) || (KeyM >= KEY_OP_BASE && KeyM <= KEY_OP_ENDBASE))) // пропустим макро-коды
{
switch (CurrentFrame->GetType())
{
case MODALTYPE_PANELS:
{
_ALGO(CleverSysLog clv(L"Manager::ProcessKey()"));
_ALGO(SysLog(L"Key=%s",_FARKEY_ToName(Key)));
#ifndef NO_WRAPPER
if (CtrlObject->Cp()->ActivePanel->GetMode() == PLUGIN_PANEL)
{
PluginHandle *ph=(PluginHandle*)CtrlObject->Cp()->ActivePanel->GetPluginHandle();
if (ph && ph->pPlugin->IsOemPlugin())
if (CtrlObject->Cp()->ActivePanel->SendKeyToPlugin(Key,TRUE))
return TRUE;
}
#endif // NO_WRAPPER
break;
}
#if 0
case MODALTYPE_VIEWER:
//if(((FileViewer*)CurrentFrame)->ProcessViewerInput(FrameManager->GetLastInputRecord()))
// return TRUE;
break;
case MODALTYPE_EDITOR:
//if(((FileEditor*)CurrentFrame)->ProcessEditorInput(FrameManager->GetLastInputRecord()))
// return TRUE;
break;
case MODALTYPE_DIALOG:
//((Dialog*)CurrentFrame)->CallDlgProc(DN_KEY,((Dialog*)CurrentFrame)->GetDlgFocusPos(),Key);
break;
case MODALTYPE_VMENU:
case MODALTYPE_HELP:
case MODALTYPE_COMBOBOX:
case MODALTYPE_USER:
case MODALTYPE_FINDFOLDER:
default:
break;
#endif
}
}
#if defined(FAR_ALPHA_VERSION)
// сей код для проверки исключатор, просьба не трогать :-)
if (Key == KEY_CTRLALTAPPS || Key == KEY_RCTRLRALTAPPS || Key == KEY_CTRLRALTAPPS || Key == KEY_RCTRLALTAPPS)
{
struct __ECODE
{
NTSTATUS Code;
const wchar_t *Name;
} ECode[]=
{
{EXCEPTION_ACCESS_VIOLATION,L"Access Violation (Read)"},
{EXCEPTION_ACCESS_VIOLATION,L"Access Violation (Write)"},
{EXCEPTION_INT_DIVIDE_BY_ZERO,L"Divide by zero"},
{EXCEPTION_ILLEGAL_INSTRUCTION,L"Illegal instruction"},
{EXCEPTION_STACK_OVERFLOW,L"Stack Overflow"},
{EXCEPTION_FLT_DIVIDE_BY_ZERO,L"Floating-point divide by zero"},
{EXCEPTION_BREAKPOINT,L"Breakpoint"},
#ifdef _M_IA64
{EXCEPTION_DATATYPE_MISALIGNMENT,L"Alignment fault (IA64 specific)",},
#endif
/*
{EXCEPTION_FLT_OVERFLOW,"EXCEPTION_FLT_OVERFLOW"},
{EXCEPTION_SINGLE_STEP,"EXCEPTION_SINGLE_STEP",},
{EXCEPTION_ARRAY_BOUNDS_EXCEEDED,"EXCEPTION_ARRAY_BOUNDS_EXCEEDED",},
{EXCEPTION_FLT_DENORMAL_OPERAND,"EXCEPTION_FLT_DENORMAL_OPERAND",},
{EXCEPTION_FLT_INEXACT_RESULT,"EXCEPTION_FLT_INEXACT_RESULT",},
{EXCEPTION_FLT_INVALID_OPERATION,"EXCEPTION_FLT_INVALID_OPERATION",},
{EXCEPTION_FLT_STACK_CHECK,"EXCEPTION_FLT_STACK_CHECK",},
{EXCEPTION_FLT_UNDERFLOW,"EXCEPTION_FLT_UNDERFLOW",},
{EXCEPTION_INT_OVERFLOW,"EXCEPTION_INT_OVERFLOW",0},
{EXCEPTION_PRIV_INSTRUCTION,"EXCEPTION_PRIV_INSTRUCTION",0},
{EXCEPTION_IN_PAGE_ERROR,"EXCEPTION_IN_PAGE_ERROR",0},
{EXCEPTION_NONCONTINUABLE_EXCEPTION,"EXCEPTION_NONCONTINUABLE_EXCEPTION",0},
{EXCEPTION_INVALID_DISPOSITION,"EXCEPTION_INVALID_DISPOSITION",0},
{EXCEPTION_GUARD_PAGE,"EXCEPTION_GUARD_PAGE",0},
{EXCEPTION_INVALID_HANDLE,"EXCEPTION_INVALID_HANDLE",0},
*/
};
static union
{
int i;
int *iptr;
double d;
} zero_const; //, refers;
zero_const.i=0L;
MenuItemEx ModalMenuItem;
ModalMenuItem.Clear();
VMenu2 ModalMenu(L"Test Exceptions",nullptr,0,ScrY-4);
ModalMenu.SetFlags(VMENU_WRAPMODE);
ModalMenu.SetPosition(-1,-1,0,0);
for (size_t I=0; I<ARRAYSIZE(ECode); I++)
{
ModalMenuItem.strName = ECode[I].Name;
ModalMenu.AddItem(&ModalMenuItem);
}
int ExitCode=ModalMenu.Run();
switch (ExitCode)
{
case -1:
return TRUE;
case 0:
zero_const.i=*zero_const.iptr;
break;
case 1:
*zero_const.iptr = 0;
break;
case 2:
zero_const.i=1/zero_const.i;
break;
case 3:
#if defined(_MSC_VER)
#ifdef _M_IA64
#define __REG_IA64_IntR0 1024
__setReg(__REG_IA64_IntR0, 666);
#else
__ud2();
#endif
#elif defined(__GNUC__)
asm("ud2");
#else
#error "Unsupported compiler"
#endif
break;
case 4:
Test_EXCEPTION_STACK_OVERFLOW(nullptr);
break;
case 5:
//refers.d = 1.0/zero_const.d;
break;
case 6:
DebugBreak();
break;
#ifdef _M_IA64
case 7:
{
BYTE temp[10]={};
double* val;
val = (double*)(&temp[3]);
printf("%lf\n", *val);
}
#endif
}
Message(MSG_WARNING, 1, L"Test Exceptions failed", L"", ECode[ExitCode].Name, L"", MSG(MOk));
return TRUE;
}
#endif
/*** БЛОК ПРИВЕЛЕГИРОВАННЫХ КЛАВИШ ! ***/
/*** КОТОРЫЕ НЕЛЬЗЯ НАМАКРОСИТЬ ***/
switch (Key)
{
case KEY_ALT|KEY_NUMPAD0:
case KEY_RALT|KEY_NUMPAD0:
case KEY_ALTINS:
case KEY_RALTINS:
{
RunGraber();
return TRUE;
}
case KEY_CONSOLE_BUFFER_RESIZE:
Sleep(1);
ResizeAllFrame();
return TRUE;
}
/*** А вот здесь - все остальное! ***/
if (!Global->IsProcessAssignMacroKey)
// в любом случае если кому-то не нужны все клавиши или
{
bool scrollable = false;
if ( Global->Opt->WindowMode )
{
int frame_type = CurrentFrame->GetType();
scrollable = frame_type != MODALTYPE_EDITOR && frame_type != MODALTYPE_VIEWER;
};
switch (Key)
{
// <Удалить после появления макрофункции Scroll>
case KEY_CTRLALTUP:
case KEY_RCTRLRALTUP:
case KEY_CTRLRALTUP:
case KEY_RCTRLALTUP:
if(scrollable)
{
Global->Console->ScrollWindow(-1);
return TRUE;
}
break;
case KEY_CTRLALTDOWN:
case KEY_RCTRLRALTDOWN:
case KEY_CTRLRALTDOWN:
case KEY_RCTRLALTDOWN:
if(scrollable)
{
Global->Console->ScrollWindow(1);
return TRUE;
}
break;
case KEY_CTRLALTPGUP:
case KEY_RCTRLRALTPGUP:
case KEY_CTRLRALTPGUP:
case KEY_RCTRLALTPGUP:
if(scrollable)
{
Global->Console->ScrollWindow(-ScrY);
return TRUE;
}
break;
case KEY_CTRLALTHOME:
case KEY_RCTRLRALTHOME:
case KEY_CTRLRALTHOME:
case KEY_RCTRLALTHOME:
if(scrollable)
{
while(Global->Console->ScrollWindow(-ScrY));
return TRUE;
}
break;
case KEY_CTRLALTPGDN:
case KEY_RCTRLRALTPGDN:
case KEY_CTRLRALTPGDN:
case KEY_RCTRLALTPGDN:
if(scrollable)
{
Global->Console->ScrollWindow(ScrY);
return TRUE;
}
break;
case KEY_CTRLALTEND:
case KEY_RCTRLRALTEND:
case KEY_CTRLRALTEND:
case KEY_RCTRLALTEND:
if(scrollable)
{
while(Global->Console->ScrollWindow(ScrY));
return TRUE;
}
break;
// </Удалить после появления макрофункции Scroll>
case KEY_CTRLW:
case KEY_RCTRLW:
ShowProcessList();
return TRUE;
case KEY_F11:
PluginsMenu();
FrameManager->RefreshFrame();
//_MANAGER(SysLog(-1));
return TRUE;
case KEY_ALTF9:
case KEY_RALTF9:
{
//_MANAGER(SysLog(1,"Manager::ProcessKey, KEY_ALTF9 pressed..."));
Sleep(1);
SetVideoMode();
Sleep(1);
/* В процессе исполнения Alt-F9 (в нормальном режиме) в очередь
консоли попадает WINDOW_BUFFER_SIZE_EVENT, формируется в
ChangeVideoMode().
В режиме исполнения макросов ЭТО не происходит по вполне понятным
причинам.
*/
if (CtrlObject->Macro.IsExecuting())
{
int PScrX=ScrX;
int PScrY=ScrY;
Sleep(1);
GetVideoMode(CurSize);
if (PScrX+1 == CurSize.X && PScrY+1 == CurSize.Y)
{
//_MANAGER(SysLog(-1,"GetInputRecord(WINDOW_BUFFER_SIZE_EVENT); return KEY_NONE"));
return TRUE;
}
else
{
PrevScrX=PScrX;
PrevScrY=PScrY;
//_MANAGER(SysLog(-1,"GetInputRecord(WINDOW_BUFFER_SIZE_EVENT); return KEY_CONSOLE_BUFFER_RESIZE"));
Sleep(1);
return ProcessKey(KEY_CONSOLE_BUFFER_RESIZE);
}
}
//_MANAGER(SysLog(-1));
return TRUE;
}
case KEY_F12:
{
int TypeFrame=FrameManager->GetCurrentFrame()->GetType();
if (TypeFrame != MODALTYPE_HELP && TypeFrame != MODALTYPE_DIALOG)
{
DeactivateFrame(FrameMenu(),0);
//_MANAGER(SysLog(-1));
return TRUE;
}
break; // отдадим F12 дальше по цепочке
}
case KEY_CTRLALTSHIFTPRESS:
case KEY_RCTRLALTSHIFTPRESS:
{
if (!(Global->Opt->CASRule&1) && Key == KEY_CTRLALTSHIFTPRESS)
break;
if (!(Global->Opt->CASRule&2) && Key == KEY_RCTRLALTSHIFTPRESS)
break;
if (!Global->Opt->OnlyEditorViewerUsed)
{
if (CurrentFrame->FastHide())
{
int isPanelFocus=CurrentFrame->GetType() == MODALTYPE_PANELS;
if (isPanelFocus)
{
int LeftVisible=CtrlObject->Cp()->LeftPanel->IsVisible();
int RightVisible=CtrlObject->Cp()->RightPanel->IsVisible();
int CmdLineVisible=CtrlObject->CmdLine->IsVisible();
int KeyBarVisible=CtrlObject->Cp()->MainKeyBar.IsVisible();
CtrlObject->CmdLine->ShowBackground();
CtrlObject->Cp()->LeftPanel->Hide0();
CtrlObject->Cp()->RightPanel->Hide0();
switch (Global->Opt->PanelCtrlAltShiftRule)
{
case 0:
CtrlObject->CmdLine->Show();
CtrlObject->Cp()->MainKeyBar.Show();
break;
case 1:
CtrlObject->Cp()->MainKeyBar.Show();
break;
}
WaitKey(Key==KEY_CTRLALTSHIFTPRESS?KEY_CTRLALTSHIFTRELEASE:KEY_RCTRLALTSHIFTRELEASE);
if (LeftVisible) CtrlObject->Cp()->LeftPanel->Show();
if (RightVisible) CtrlObject->Cp()->RightPanel->Show();
if (CmdLineVisible) CtrlObject->CmdLine->Show();
if (KeyBarVisible) CtrlObject->Cp()->MainKeyBar.Show();
}
else
{
ImmediateHide();
WaitKey(Key==KEY_CTRLALTSHIFTPRESS?KEY_CTRLALTSHIFTRELEASE:KEY_RCTRLALTSHIFTRELEASE);
}
FrameManager->RefreshFrame();
}
return TRUE;
}
break;
}
case KEY_CTRLTAB:
case KEY_RCTRLTAB:
case KEY_CTRLSHIFTTAB:
case KEY_RCTRLSHIFTTAB:
if (CurrentFrame->GetCanLoseFocus())
{
DeactivateFrame(CurrentFrame,(Key==KEY_CTRLTAB||Key==KEY_RCTRLTAB)?1:-1);
}
_MANAGER(SysLog(-1));
return TRUE;
}
}
CurrentFrame->UpdateKeyBar();
CurrentFrame->ProcessKey(Key);
}
_MANAGER(SysLog(-1));
return ret;
}
/*!
\return Возвращает nullptr если нажат "отказ" или если нажат текущий фрейм.
Другими словами, если немодальный фрейм не поменялся.
Если же фрейм поменялся, то тогда функция должна возвратить
указатель на предыдущий фрейм.
*/
Frame *Manager::FrameMenu()
{
/* $ 28.04.2002 KM
Флаг для определения того, что меню переключения
экранов уже активировано.
*/
static int AlreadyShown=FALSE;
if (AlreadyShown)
return nullptr;
int ExitCode, CheckCanLoseFocus=CurrentFrame->GetCanLoseFocus();
{
MenuItemEx ModalMenuItem;
VMenu2 ModalMenu(MSG(MScreensTitle),nullptr,0,ScrY-4);
ModalMenu.SetHelp(L"ScrSwitch");
ModalMenu.SetFlags(VMENU_WRAPMODE);
ModalMenu.SetPosition(-1,-1,0,0);
if (!CheckCanLoseFocus)
ModalMenuItem.SetDisable(TRUE);
for (int I=0; I<FrameCount; I++)
{
string strType, strName, strNumText;
FrameList[I]->GetTypeAndName(strType, strName);
ModalMenuItem.Clear();
if (I<10)
strNumText.Format(L"&%d. ",I);
else if (I<36)
strNumText.Format(L"&%c. ",I+55); // 55='A'-10
else
strNumText = L"& ";
//TruncPathStr(strName,ScrX-24);
ReplaceStrings(strName,L"&",L"&&",-1);
/* добавляется "*" если файл изменен */
ModalMenuItem.strName.Format(L"%s%-10.10s %c %s", strNumText.CPtr(), strType.CPtr(),(FrameList[I]->IsFileModified()?L'*':L' '), strName.CPtr());
ModalMenuItem.SetSelect(I==FramePos);
ModalMenu.AddItem(&ModalMenuItem);
}
AlreadyShown=TRUE;
ExitCode=ModalMenu.Run();
AlreadyShown=FALSE;
}
if (CheckCanLoseFocus)
{
if (ExitCode>=0)
{
ActivateFrame(ExitCode);
return (ActivatedFrame==CurrentFrame || !CurrentFrame->GetCanLoseFocus()?nullptr:CurrentFrame);
}
return (ActivatedFrame==CurrentFrame?nullptr:CurrentFrame);
}
return nullptr;
}
bool FileFilter::FilterEdit()
{
if (bMenuOpen)
return false;
Changed = true;
bMenuOpen = true;
MenuItemEx ListItem;
int ExitCode;
bool bNeedUpdate=false;
VMenu FilterList(MSG(MFilterTitle),nullptr,0,ScrY-6);
FilterList.SetHelp(L"FiltersMenu");
FilterList.SetPosition(-1,-1,0,0);
FilterList.SetBottomTitle(MSG(MFilterBottom));
FilterList.SetFlags(/*VMENU_SHOWAMPERSAND|*/VMENU_WRAPMODE);
for (size_t i=0; i<FilterData.getCount(); i++)
{
ListItem.Clear();
MenuString(ListItem.strName,FilterData.getItem(i));
if (!i)
ListItem.Flags|=LIF_SELECTED;
int Check = GetCheck(FilterData.getItem(i));
if (Check)
ListItem.SetCheck(Check);
FilterList.AddItem(&ListItem);
}
ListItem.Clear();
if (!FilterData.getCount())
ListItem.Flags|=LIF_SELECTED;
FilterList.AddItem(&ListItem);
if (m_FilterType != FFT_CUSTOM)
{
wchar_t *ExtPtr=nullptr;
int ExtCount=0;
{
enumFileFilterFlagsType FFFT = GetFFFT();
for (size_t i=0; i<TempFilterData.getCount(); i++)
{
//AY: Будем показывать только те выбранные авто фильтры
//(для которых нету файлов на панели) которые выбраны в области данного меню
if (!TempFilterData.getItem(i)->GetFlags(FFFT))
continue;
const wchar_t *FMask;
TempFilterData.getItem(i)->GetMask(&FMask);
string strMask = FMask;
Unquote(strMask);
if (!ParseAndAddMasks(&ExtPtr,strMask,0,ExtCount,GetCheck(TempFilterData.getItem(i))))
break;
}
}
ListItem.Clear();
ListItem.Flags|=LIF_SEPARATOR;
FilterList.AddItem(&ListItem);
ListItem.Clear();
FoldersFilter.SetTitle(MSG(MFolderFileType));
MenuString(ListItem.strName,&FoldersFilter,false,L'0');
int Check = GetCheck(&FoldersFilter);
if (Check)
ListItem.SetCheck(Check);
FilterList.AddItem(&ListItem);
if (GetHostPanel()->GetMode()==NORMAL_PANEL)
{
string strCurDir, strFileName;
FAR_FIND_DATA_EX fdata;
GetHostPanel()->GetCurDir(strCurDir);
ScanTree ScTree(FALSE,FALSE);
ScTree.SetFindPath(strCurDir,L"*");
while (ScTree.GetNextName(&fdata,strFileName))
if (!ParseAndAddMasks(&ExtPtr,fdata.strFileName,fdata.dwFileAttributes,ExtCount,0))
break;
}
else
{
string strFileName;
DWORD FileAttr;
for (int i=0; GetHostPanel()->GetFileName(strFileName,i,FileAttr); i++)
if (!ParseAndAddMasks(&ExtPtr,strFileName,FileAttr,ExtCount,0))
break;
}
far_qsort((void *)ExtPtr,ExtCount,MAX_PATH*sizeof(wchar_t),ExtSort);
ListItem.Clear();
for (int i=0, h=L'1'; i<ExtCount; i++, (h==L'9'?h=L'A':(h==L'Z'||h?h++:h=0)))
{
wchar_t *CurExtPtr=ExtPtr+i*MAX_PATH;
MenuString(ListItem.strName,nullptr,false,h,true,CurExtPtr,MSG(MPanelFileType));
int Length = StrLength(CurExtPtr)+1;
ListItem.SetCheck(CurExtPtr[Length]);
FilterList.SetUserData(CurExtPtr, Length*sizeof(wchar_t), FilterList.AddItem(&ListItem));
}
xf_free(ExtPtr);
}
FilterList.Show();
while (!FilterList.Done())
{
int Key=FilterList.ReadInput();
if (Key==KEY_ADD)
Key=L'+';
else if (Key==KEY_SUBTRACT)
Key=L'-';
else if (Key==L'i')
Key=L'I';
else if (Key==L'x')
Key=L'X';
switch (Key)
{
case L'+':
case L'-':
case L'I':
case L'X':
case KEY_SPACE:
case KEY_BS:
{
int SelPos=FilterList.GetSelectPos();
if (SelPos<0 || SelPos==(int)FilterData.getCount())
break;
int Check=FilterList.GetCheck(SelPos);
int NewCheck;
if (Key==KEY_BS)
NewCheck = 0;
else if (Key==KEY_SPACE)
NewCheck = Check ? 0 : L'+';
else
NewCheck = (Check == Key) ? 0 : Key;
FilterList.SetCheck(NewCheck,SelPos);
FilterList.SetSelectPos(SelPos,1);
FilterList.SetUpdateRequired(TRUE);
FilterList.FastShow();
FilterList.ProcessKey(KEY_DOWN);
bNeedUpdate=true;
break;
}
case KEY_SHIFTBS:
{
for (int I=0; I < FilterList.GetItemCount(); I++)
{
FilterList.SetCheck(FALSE, I);
}
FilterList.SetUpdateRequired(TRUE);
FilterList.FastShow();
break;
}
case KEY_F4:
{
int SelPos=FilterList.GetSelectPos();
if (SelPos<0)
break;
if (SelPos<(int)FilterData.getCount())
{
if (FileFilterConfig(FilterData.getItem(SelPos)))
{
ListItem.Clear();
MenuString(ListItem.strName,FilterData.getItem(SelPos));
int Check = GetCheck(FilterData.getItem(SelPos));
if (Check)
ListItem.SetCheck(Check);
FilterList.DeleteItem(SelPos);
FilterList.AddItem(&ListItem,SelPos);
FilterList.SetSelectPos(SelPos,1);
FilterList.SetUpdateRequired(TRUE);
FilterList.FastShow();
bNeedUpdate=true;
}
}
else if (SelPos>(int)FilterData.getCount())
{
Message(MSG_WARNING,1,MSG(MFilterTitle),MSG(MCanEditCustomFilterOnly),MSG(MOk));
}
break;
}
case KEY_NUMPAD0:
case KEY_INS:
case KEY_F5:
{
int pos=FilterList.GetSelectPos();
if (pos<0)
break;
size_t SelPos=pos;
size_t SelPos2=pos+1;
SelPos = Min(FilterData.getCount(), SelPos);
FileFilterParams *NewFilter = FilterData.insertItem(SelPos);
if (!NewFilter)
break;
if (Key==KEY_F5)
{
if (SelPos2 < FilterData.getCount())
{
*NewFilter = *FilterData.getItem(SelPos2);
NewFilter->SetTitle(L"");
NewFilter->ClearAllFlags();
}
else if (SelPos2 == FilterData.getCount()+2)
{
*NewFilter = FoldersFilter;
NewFilter->SetTitle(L"");
NewFilter->ClearAllFlags();
}
else if (SelPos2 > FilterData.getCount()+2)
{
NewFilter->SetMask(1,static_cast<const wchar_t*>(FilterList.GetUserData(nullptr, 0, static_cast<int>(SelPos2-1))));
//Авто фильтры они только для файлов, папки не должны к ним подходить
NewFilter->SetAttr(1,0,FILE_ATTRIBUTE_DIRECTORY);
}
else
{
FilterData.deleteItem(SelPos);
break;
}
}
else
{
//AY: Раз создаём новый фильтр то думаю будет логично если он будет только для файлов
NewFilter->SetAttr(1,0,FILE_ATTRIBUTE_DIRECTORY);
}
if (FileFilterConfig(NewFilter))
{
ListItem.Clear();
MenuString(ListItem.strName,NewFilter);
FilterList.AddItem(&ListItem,static_cast<int>(SelPos));
FilterList.SetSelectPos(static_cast<int>(SelPos),1);
FilterList.SetPosition(-1,-1,0,0);
FilterList.Show();
bNeedUpdate=true;
}
else
FilterData.deleteItem(SelPos);
break;
}
case KEY_NUMDEL:
case KEY_DEL:
{
int SelPos=FilterList.GetSelectPos();
if (SelPos<0)
break;
if (SelPos<(int)FilterData.getCount())
{
string strQuotedTitle=FilterData.getItem(SelPos)->GetTitle();
InsertQuote(strQuotedTitle);
if (!Message(0,2,MSG(MFilterTitle),MSG(MAskDeleteFilter),
strQuotedTitle,MSG(MDelete),MSG(MCancel)))
{
FilterData.deleteItem(SelPos);
FilterList.DeleteItem(SelPos);
FilterList.SetSelectPos(SelPos,1);
FilterList.SetPosition(-1,-1,0,0);
FilterList.Show();
bNeedUpdate=true;
}
}
else if (SelPos>(int)FilterData.getCount())
{
Message(MSG_WARNING,1,MSG(MFilterTitle),MSG(MCanDeleteCustomFilterOnly),MSG(MOk));
}
break;
}
case KEY_CTRLUP:
case KEY_RCTRLUP:
case KEY_CTRLDOWN:
case KEY_RCTRLDOWN:
{
int SelPos=FilterList.GetSelectPos();
if (SelPos<0)
break;
if (SelPos<(int)FilterData.getCount() && !((Key==KEY_CTRLUP || Key==KEY_RCTRLUP) && !SelPos) &&
!((Key==KEY_CTRLDOWN || Key==KEY_RCTRLDOWN) && SelPos==(int)(FilterData.getCount()-1)))
{
int NewPos = SelPos + ((Key == KEY_CTRLDOWN || Key == KEY_RCTRLDOWN) ? 1 : -1);
MenuItemEx CurItem = *FilterList.GetItemPtr(SelPos);
MenuItemEx NextItem = *FilterList.GetItemPtr(NewPos);
FilterData.swapItems(NewPos,SelPos);
if (NewPos<SelPos)
{
FilterList.DeleteItem(NewPos,2);
FilterList.AddItem(&CurItem,NewPos);
FilterList.AddItem(&NextItem,SelPos);
}
else
{
FilterList.DeleteItem(SelPos,2);
FilterList.AddItem(&NextItem,SelPos);
FilterList.AddItem(&CurItem,NewPos);
}
FilterList.SetSelectPos(NewPos,1);
FilterList.SetUpdateRequired(TRUE);
FilterList.FastShow();
bNeedUpdate=true;
}
break;
}
default:
{
FilterList.ProcessInput();
//заставляем хоткеи позиционировать курсор на пункте но не закрывать меню
if (Key!=KEY_NUMENTER && Key!=KEY_ENTER && Key!=KEY_ESC && Key!=KEY_F10 && (IsAlphaNum(Key) || Key&(KEY_ALT|KEY_RALT)))
FilterList.ClearDone();
}
}
}
FilterList.Hide();
ExitCode=FilterList.Modal::GetExitCode();
if (ExitCode!=-1)
ProcessSelection(&FilterList);
if (Opt.AutoSaveSetup)
SaveFilters();
if (ExitCode!=-1 || bNeedUpdate)
{
if (m_FilterType == FFT_PANEL)
{
GetHostPanel()->Update(UPDATE_KEEP_SELECTION);
GetHostPanel()->Redraw();
}
}
bMenuOpen = false;
return (ExitCode!=-1);
}
