//---------------------------------------------------------------------------
void __fastcall TGUIConfiguration::LoadData(THierarchicalStorage * Storage)
{
TConfiguration::LoadData(Storage);
// duplicated from core\configuration.cpp
#define KEYEX(TYPE, VAR, NAME) VAR = Storage->Read ## TYPE(NAME, VAR)
#pragma warn -eas
REGCONFIG(false);
#pragma warn +eas
#undef KEYEX
if (Storage->OpenSubKey(L"Interface\\CopyParam", false, true))
try
{
// must be loaded before eventual setting defaults for CopyParamList
FDefaultCopyParam.Load(Storage);
int CopyParamListCount = Storage->ReadInteger(L"CopyParamList", -1);
FCopyParamListDefaults = (CopyParamListCount < 0);
if (!FCopyParamListDefaults)
{
FCopyParamList->Clear();
FCopyParamList->Load(Storage, CopyParamListCount);
}
else if (FCopyParamList->Modified)
{
FCopyParamList->Clear();
FCopyParamListDefaults = false;
}
FCopyParamList->Reset();
}
__finally
{
Storage->CloseSubKey();
}
// Make it compatible with versions prior to 3.7.1 that have not saved PuttyPath
// with quotes. First check for absence of quotes.
// Add quotes either if the path is set to default putty path (even if it does
// not exists) or when the path points to existing file (so there are no parameters
// yet in the string). Note that FileExists may display error dialog, but as
// it should be called only for custom users path, let's expect that the user
// can take care of it.
if ((FPuttyPath.SubString(1, 1) != L"\"") &&
(CompareFileName(ExpandEnvironmentVariables(FPuttyPath), FDefaultPuttyPathOnly) ||
FileExists(ExpandEnvironmentVariables(FPuttyPath))))
{
FPuttyPath = FormatCommand(FPuttyPath, L"");
}
if (Storage->OpenSubKey(L"Interface\\NewDirectory2", false, true))
try
{
FNewDirectoryProperties.Load(Storage);
}
__finally
{
Storage->CloseSubKey();
}
}
void __fastcall BrowseForExecutableT(T * Control, UnicodeString Title,
UnicodeString Filter, bool FileNameCommand, bool Escape)
{
UnicodeString Executable, Program, Params, Dir;
Executable = Control->Text;
if (FileNameCommand)
{
ReformatFileNameCommand(Executable);
}
SplitCommand(Executable, Program, Params, Dir);
TOpenDialog * FileDialog = new TOpenDialog(Application);
try
{
if (Escape)
{
Program = ReplaceStr(Program, L"\\\\", L"\\");
}
UnicodeString ExpandedProgram = ExpandEnvironmentVariables(Program);
FileDialog->FileName = ExpandedProgram;
UnicodeString InitialDir = ExtractFilePath(ExpandedProgram);
if (!InitialDir.IsEmpty())
{
FileDialog->InitialDir = InitialDir;
}
FileDialog->Filter = Filter;
FileDialog->Title = Title;
if (FileDialog->Execute())
{
TNotifyEvent PrevOnChange = Control->OnChange;
Control->OnChange = NULL;
try
{
// preserve unexpanded file, if the destination has not changed actually
if (!CompareFileName(ExpandedProgram, FileDialog->FileName))
{
Program = FileDialog->FileName;
if (Escape)
{
Program = ReplaceStr(Program, L"\\", L"\\\\");
}
}
Control->Text = FormatCommand(Program, Params);
}
__finally
{
Control->OnChange = PrevOnChange;
}
if (Control->OnExit != NULL)
{
Control->OnExit(Control);
}
}
}
NTSTATUS
BrowseIndexEntries(PINDEX_ENTRY_ATTRIBUTE FirstEntry,
PINDEX_ENTRY_ATTRIBUTE LastEntry,
PUNICODE_STRING FileName,
PULONG StartEntry,
PULONG CurrentEntry,
BOOLEAN DirSearch,
ULONGLONG *OutMFTIndex)
{
PINDEX_ENTRY_ATTRIBUTE IndexEntry;
IndexEntry = FirstEntry;
while (IndexEntry < LastEntry &&
!(IndexEntry->Flags & NTFS_INDEX_ENTRY_END))
{
UNICODE_STRING EntryName;
EntryName.Buffer = IndexEntry->FileName.Name;
EntryName.Length =
EntryName.MaximumLength = IndexEntry->FileName.NameLength * sizeof(WCHAR);
if ((IndexEntry->Data.Directory.IndexedFile & NTFS_MFT_MASK) > 0x10 &&
*CurrentEntry >= *StartEntry &&
CompareFileName(FileName, IndexEntry, DirSearch))
{
*StartEntry = *CurrentEntry;
*OutMFTIndex = (IndexEntry->Data.Directory.IndexedFile & NTFS_MFT_MASK);
return STATUS_SUCCESS;
}
(*CurrentEntry) += 1;
ASSERT(IndexEntry->Length >= sizeof(INDEX_ENTRY_ATTRIBUTE));
IndexEntry = (PINDEX_ENTRY_ATTRIBUTE)((PCHAR)IndexEntry + IndexEntry->Length);
}
if (IndexEntry->Flags & NTFS_INDEX_ENTRY_NODE)
DPRINT1("Sub-node available\n");
return STATUS_OBJECT_PATH_NOT_FOUND;
}
