int LoadDatabaseModule(void)
{
TCHAR szProfile[MAX_PATH];
PathToAbsoluteT(_T("."), szProfile);
_tchdir(szProfile);
szProfile[0] = 0;
LoadDatabaseServices();
// find out which profile to load
if (!getProfile(szProfile, SIZEOF(szProfile)))
return 1;
EnsureCheckerLoaded(false); // unload dbchecker
if (arDbPlugins.getCount() == 0) {
TCHAR buf[256];
TCHAR* p = _tcsrchr(szProfile, '\\');
mir_sntprintf(buf, SIZEOF(buf), TranslateT("Miranda is unable to open '%s' because you do not have any profile plugins installed.\nYou need to install dbx_mmap.dll"), p ? ++p : szProfile);
MessageBox(0, buf, TranslateT("No profile support installed!"), MB_OK | MB_ICONERROR);
}
// find a driver to support the given profile
bool retry;
int rc;
do {
retry = false;
if ( _taccess(szProfile, 0) && shouldAutoCreate(szProfile))
rc = tryCreateDatabase(szProfile);
else
rc = tryOpenDatabase(szProfile);
if (rc > 0) {
// if there were drivers but they all failed cos the file is locked, try and find the miranda which locked it
if (fileExist(szProfile)) {
// file isn't locked, just no driver could open it.
TCHAR buf[256];
TCHAR* p = _tcsrchr(szProfile, '\\');
mir_sntprintf(buf, SIZEOF(buf), TranslateT("Miranda was unable to open '%s', it's in an unknown format.\nThis profile might also be damaged, please run DbChecker which should be installed."), p ? ++p : szProfile);
MessageBox(0, buf, TranslateT("Miranda can't understand that profile"), MB_OK | MB_ICONERROR);
}
else if (!FindMirandaForProfile(szProfile)) {
TCHAR buf[256];
TCHAR* p = _tcsrchr(szProfile, '\\');
mir_sntprintf(buf, SIZEOF(buf), TranslateT("Miranda was unable to open '%s'\nIt's inaccessible or used by other application or Miranda instance"), p ? ++p : szProfile);
retry = MessageBox(0, buf, TranslateT("Miranda can't open that profile"), MB_RETRYCANCEL | MB_ICONERROR) == IDRETRY;
}
}
}
while (retry);
if (rc == ERROR_SUCCESS) {
InitIni();
return 0;
}
return rc;
}
int getProfileManager(PROFILEMANAGERDATA *pd)
{
EnsureCheckerLoaded(true);
return CProfileManager(pd).DoModal();
}
static INT_PTR CALLBACK DlgProfileSelect(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam)
{
DlgProfData *dat = (struct DlgProfData *)GetWindowLongPtr(hwndDlg, GWLP_USERDATA);
HWND hwndList = GetDlgItem(hwndDlg, IDC_PROFILELIST);
switch (msg) {
case WM_INITDIALOG:
TranslateDialogDefault(hwndDlg);
EnsureCheckerLoaded(true);
{
dat = (DlgProfData*)lParam;
SetWindowLongPtr(hwndDlg, GWLP_USERDATA, (LONG_PTR)dat);
// set columns
LVCOLUMN col;
col.mask = LVCF_TEXT | LVCF_WIDTH;
col.pszText = TranslateT("Profile");
col.cx = 100;
ListView_InsertColumn(hwndList, 0, &col);
col.pszText = TranslateT("Driver");
col.cx = 150 - GetSystemMetrics(SM_CXVSCROLL);
ListView_InsertColumn(hwndList, 1, &col);
col.pszText = TranslateT("Size");
col.cx = 60;
ListView_InsertColumn(hwndList, 2, &col);
// icons
HIMAGELIST hImgList = ImageList_Create(16, 16, ILC_MASK | ILC_COLOR32, 2, 1);
ImageList_AddIcon_NotShared(hImgList, MAKEINTRESOURCE(IDI_USERDETAILS));
ImageList_AddIcon_NotShared(hImgList, MAKEINTRESOURCE(IDI_DELETE));
// LV will destroy the image list
SetWindowLongPtr(hwndList, GWL_STYLE, GetWindowLongPtr(hwndList, GWL_STYLE) | LVS_SORTASCENDING);
ListView_SetImageList(hwndList, hImgList, LVSIL_SMALL);
ListView_SetExtendedListViewStyle(hwndList,
ListView_GetExtendedListViewStyle(hwndList) | LVS_EX_DOUBLEBUFFER | LVS_EX_INFOTIP | LVS_EX_LABELTIP | LVS_EX_FULLROWSELECT);
// find all the profiles
ProfileEnumData ped = { hwndDlg, dat->pd->szProfile };
findProfiles(dat->pd->szProfileDir, EnumProfilesForList, (LPARAM)&ped);
PostMessage(hwndDlg, WM_FOCUSTEXTBOX, 0, 0);
dat->hFileNotify = FindFirstChangeNotification(dat->pd->szProfileDir, TRUE, FILE_NOTIFY_CHANGE_FILE_NAME | FILE_NOTIFY_CHANGE_LAST_WRITE);
if (dat->hFileNotify != INVALID_HANDLE_VALUE)
SetTimer(hwndDlg, 0, 1200, NULL);
return TRUE;
}
case WM_DESTROY:
KillTimer(hwndDlg, 0);
FindCloseChangeNotification(dat->hFileNotify);
break;
case WM_TIMER:
if (WaitForSingleObject(dat->hFileNotify, 0) == WAIT_OBJECT_0) {
ListView_DeleteAllItems(hwndList);
ProfileEnumData ped = { hwndDlg, dat->pd->szProfile };
findProfiles(dat->pd->szProfileDir, EnumProfilesForList, (LPARAM)&ped);
FindNextChangeNotification(dat->hFileNotify);
}
break;
case WM_FOCUSTEXTBOX:
SetFocus(hwndList);
if (dat->pd->szProfile[0] == 0 || ListView_GetSelectedCount(hwndList) == 0)
ListView_SetItemState(hwndList, 0, LVIS_SELECTED | LVIS_FOCUSED, LVIS_SELECTED | LVIS_FOCUSED);
break;
case WM_SHOWWINDOW:
if (wParam) {
SetWindowText(dat->hwndOK, TranslateT("&Run"));
EnableWindow(dat->hwndSM, TRUE);
EnableWindow(dat->hwndOK, ListView_GetSelectedCount(hwndList) == 1);
}
break;
case WM_CONTEXTMENU:
{
LVHITTESTINFO lvht = { 0 };
lvht.pt.x = GET_X_LPARAM(lParam);
lvht.pt.y = GET_Y_LPARAM(lParam);
ScreenToClient(hwndList, &lvht.pt);
if (ListView_HitTest(hwndList, &lvht) < 0) {
if (lParam != -1)
break;
lvht.iItem = ListView_GetSelectionMark(hwndList);
RECT rc = { 0 };
if (!ListView_GetItemRect(hwndList, lvht.iItem, &rc, LVIR_LABEL))
break;
lvht.pt.x = rc.left;
lvht.pt.y = rc.bottom;
ClientToScreen(hwndList, &lvht.pt);
}
else {
lvht.pt.x = GET_X_LPARAM(lParam);
lvht.pt.y = GET_Y_LPARAM(lParam);
}
HMENU hMenu = CreatePopupMenu();
AppendMenu(hMenu, MF_STRING, 1, TranslateT("Run"));
AppendMenu(hMenu, MF_SEPARATOR, 0, NULL);
if (ServiceExists(MS_DB_CHECKPROFILE)) {
AppendMenu(hMenu, MF_STRING, 2, TranslateT("Check database"));
AppendMenu(hMenu, MF_SEPARATOR, 0, NULL);
}
AppendMenu(hMenu, MF_STRING, 3, TranslateT("Delete"));
int index = TrackPopupMenu(hMenu, TPM_RETURNCMD, lvht.pt.x, lvht.pt.y, 0, hwndDlg, NULL);
switch (index) {
case 1:
SendMessage(GetParent(hwndDlg), WM_COMMAND, IDOK, 0);
break;
case 2:
CheckProfile(hwndList, lvht.iItem, dat);
break;
case 3:
DeleteProfile(hwndList, lvht.iItem, dat);
break;
}
DestroyMenu(hMenu);
}
break;
case WM_NOTIFY:
LPNMHDR hdr = (LPNMHDR)lParam;
if (hdr && hdr->code == PSN_INFOCHANGED)
break;
if (hdr && hdr->idFrom == IDC_PROFILELIST) {
switch (hdr->code) {
case LVN_ITEMCHANGED:
EnableWindow(dat->hwndOK, ListView_GetSelectedCount(hwndList) == 1);
case NM_DBLCLK:
if (dat != NULL) {
TCHAR profile[MAX_PATH];
LVITEM item = { 0 };
item.mask = LVIF_TEXT;
item.iItem = ListView_GetNextItem(hwndList, -1, LVNI_SELECTED | LVNI_ALL);
item.pszText = profile;
item.cchTextMax = SIZEOF(profile);
if (ListView_GetItem(hwndList, &item)) {
// profile is placed in "profile_name" subfolder
TCHAR tmpPath[MAX_PATH];
mir_sntprintf(tmpPath, SIZEOF(tmpPath), _T("%s\\%s.dat"), dat->pd->szProfileDir, profile);
HANDLE hFile = CreateFile(tmpPath, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_FLAG_BACKUP_SEMANTICS, NULL);
if (hFile == INVALID_HANDLE_VALUE)
mir_sntprintf(dat->pd->szProfile, MAX_PATH, _T("%s\\%s\\%s.dat"), dat->pd->szProfileDir, profile, profile);
else
_tcscpy(dat->pd->szProfile, tmpPath);
CloseHandle(hFile);
if (hdr->code == NM_DBLCLK) EndDialog(GetParent(hwndDlg), 1);
}
}
return TRUE;
case LVN_KEYDOWN:
if (((LPNMLVKEYDOWN)lParam)->wVKey == VK_DELETE)
DeleteProfile(hwndList, ListView_GetNextItem(hwndList, -1, LVNI_SELECTED | LVNI_ALL), dat);
break;
case LVN_GETINFOTIP:
NMLVGETINFOTIP *pInfoTip = (NMLVGETINFOTIP *)lParam;
if (pInfoTip != NULL) {
TCHAR profilename[MAX_PATH], fullpath[MAX_PATH];
struct _stat statbuf;
ListView_GetItemText(hwndList, pInfoTip->iItem, 0, profilename, MAX_PATH);
mir_sntprintf(fullpath, SIZEOF(fullpath), _T("%s\\%s\\%s.dat"), dat->pd->szProfileDir, profilename, profilename);
_tstat(fullpath, &statbuf);
mir_sntprintf(pInfoTip->pszText, pInfoTip->cchTextMax, _T("%s\n%s: %s\n%s: %s"), fullpath, TranslateT("Created"), rtrimt(NEWTSTR_ALLOCA(_tctime(&statbuf.st_ctime))), TranslateT("Modified"), rtrimt(NEWTSTR_ALLOCA(_tctime(&statbuf.st_mtime))));
}
}
}
break;
}
return FALSE;
}