int deRegisterToken(TCHAR *token)
{
if (token == NULL)
return -1;
TokenRegisterEntry *tre;
{
mir_cslock lck(csRegister);
tre = FindTokenRegisterByName(token);
if (tre == NULL)
return -1;
List_RemovePtr((SortedList*)&tokens, tre);
}
if (!(tre->tr.flags & TRF_PARSEFUNC) && tre->tr.szService != NULL)
mir_free(tre->tr.szService);
if (tre->tr.tszTokenString != NULL)
mir_free(tre->tr.tszTokenString);
if (tre->tr.szHelpText != NULL)
mir_free(tre->tr.szHelpText);
if ((tre->tr.flags & TRF_CLEANUP) && !(tre->tr.flags & TRF_CLEANUPFUNC) && tre->tr.szCleanupService != NULL)
mir_free(tre->tr.szCleanupService);
mir_free(tre);
return 0;
}
void li_RemovePtrDestruct(SortedList *pList, void * ptr, ItemDestuctor pItemDestructor)
{
if (List_RemovePtr(pList, ptr))
pItemDestructor(ptr);
}
static INT_PTR CALLBACK ConsoleDlgProc(HWND hwndDlg,UINT message,WPARAM wParam,LPARAM lParam)
{
switch(message) {
case WM_INITDIALOG:
{
TCHAR title[MAX_PATH];
TCHAR name[MAX_PATH] = {0};
TCHAR path[MAX_PATH] = {0};
hTabs = GetDlgItem(hwndDlg, IDC_TABS);
//TabCtrl_SetMinTabWidth(hTabs, 100);
// restore position
Utils_RestoreWindowPositionEx(hwndDlg,RWPF_HIDDEN,NULL,"Console","Console");
CallService(MS_DB_GETPROFILENAMET,(WPARAM)SIZEOF(name),(LPARAM)name);
CallService(MS_DB_GETPROFILEPATHT,(WPARAM)SIZEOF(path),(LPARAM)path);
mir_sntprintf(title, SIZEOF(title), _T("%s - %s\\%s"), TranslateT("Miranda Console"), path, name);
SetWindowText(hwndDlg, title);
SendMessage(hwndDlg,WM_SETICON,ICON_BIG,(LPARAM)hIcons[0]);
hwndConsole = hwndDlg;
SendMessage(hwndDlg, HM_ADD, 0, 0);
PostMessage(hwndDlg, WM_SIZE, 0, 0);
break;
}
case HM_DUMP:
{
// lParam = DUMPMSG
int idx;
LOGWIN *lw;
LOGWIN lw2;
DUMPMSG *dumpMsg = (DUMPMSG*)lParam;
if (!pActive) {
mir_free(dumpMsg);
break;
}
if (!gSingleMode)
{
lw2.Module = dumpMsg->szModule;
if (!List_GetIndex(&lModules, &lw2, &idx))
SendMessage(hwndDlg, HM_ADD, (WPARAM)idx, (LPARAM)dumpMsg->szModule);
lw = (LOGWIN*)lModules.items[idx];
}
else
lw = pActive;
if (lw->hwnd)
SendMessage(lw->hwnd, HM_DUMP, wParam, lParam);
else
PostMessage(hwndDlg, HM_DUMP, wParam, lParam); // loop msg until window will be ready
return TRUE;
}
case HM_ADD:
{
// wParam = index, lParam = module name
LOGWIN *lw;
COLORREF col;
TCITEM tci = {0};
int idx = (int)wParam;
char *str = (char*)lParam;
if (!str) str = ""; // startup window
lw = (LOGWIN*)mir_calloc( sizeof(LOGWIN));
lw->Module = (char*)mir_strdup(str);
List_Insert(&lModules, lw, idx);
if (!gSingleMode && lParam)
{
tci.mask = TCIF_PARAM | TCIF_TEXT;
tci.lParam = (LPARAM)lw;
tci.pszText = mir_a2u(lw->Module);
idx = TabCtrl_InsertItem(hTabs, tabCount, &tci);
mir_free(tci.pszText);
tabCount++;
}
GetClientRect(hTabs, &rcTabs);
TabCtrl_AdjustRect(hTabs, FALSE, &rcTabs);
CreateDialogParam(hInst, MAKEINTRESOURCE(IDD_LOG), hwndDlg, LogDlgProc, (LPARAM)lw);
ShowWindow(lw->hwnd, (tabCount > 1)?SW_HIDE:SW_SHOWNOACTIVATE);
if (pActive)
{
col = ListView_GetBkColor(pActive->hList);
ListView_SetBkColor(lw->hList, col);
ListView_SetTextBkColor(lw->hList, col);
col = ListView_GetTextColor(pActive->hList);
ListView_SetTextColor(lw->hList, col);
if (hfLogFont)
SendMessage(lw->hList, WM_SETFONT, (WPARAM)hfLogFont, TRUE);
}
// hide startup window
if (tabCount == 1)
{
ShowWindow(pActive->hwnd, SW_HIDE);
PostMessage(pActive->hwnd, WM_CLOSE, 0, 0);
pActive = lw;
}
if (!pActive)
pActive = lw;
return TRUE;
}
case HM_REMOVE:
{
// lParam = LOGWIN
LOGWIN *lw = (LOGWIN*)lParam;
if (!lw) break;
if (lw == pActive)
{
int tab = TabCtrl_GetCurSel(hTabs);
if (tab >= 0)
{
TCITEM tci={0};
TabCtrl_DeleteItem(hTabs, tab);
tabCount--;
if (tabCount)
{
tab--;
if (tab < 0 ) tab = 0;
TabCtrl_SetCurSel(hTabs, tab);
tci.mask = TCIF_PARAM;
TabCtrl_GetItem(hTabs, tab, &tci);
pActive = (LOGWIN*)tci.lParam;
SendMessage(pActive->hwnd, WM_SIZE, 0, 0);
ScrollDown(pActive);
ShowWindow(pActive->hwnd, SW_SHOWNOACTIVATE);
SetFocus(pActive->hList);
}
else
pActive = NULL;
}
}
List_RemovePtr(&lModules, lw);
mir_free(lw->Module);
mir_free(lw);
return TRUE;
}
case HM_SETFONT:
{
// wParam = font, lParam = font color
int i;
LOGWIN *lw;
for ( i = 0; i < lModules.realCount; i++ )
{
lw = (LOGWIN*)lModules.items[i];
ListView_SetTextColor(lw->hList, (COLORREF)lParam);
if (wParam)
SendMessage(lw->hList, WM_SETFONT, wParam, TRUE);
}
return TRUE;
}
case HM_SETCOLOR:
{
// wParam = font, lParam = background color
int i;
LOGWIN *lw;
for ( i = 0; i < lModules.realCount; i++ )
{
lw = (LOGWIN*)lModules.items[i];
ListView_SetBkColor(lw->hList, (COLORREF)lParam);
ListView_SetTextBkColor(lw->hList, (COLORREF)lParam);
if (wParam)
SendMessage(lw->hList, WM_SETFONT, wParam, TRUE);
}
return TRUE;
}
case HM_PAUSEALL:
{
// lParam = 1 to pause, 0 to start
int i;
LOGWIN *lw;
for ( i = 0; i < lModules.realCount; i++ )
{
lw = (LOGWIN*)lModules.items[i];
if (lw->Paused != (int)lParam)
SendMessage(lw->hwnd, WM_COMMAND, IDC_PAUSE, 0);
}
return TRUE;
}
case HM_RESTART:
{
if (pActive)
{
pActive = NULL;
PostMessage(hwndDlg, HM_RESTART, 0, 0);
return TRUE;
}
// close all tabs
if (!lParam)
{
LOGWIN *lw;
TabCtrl_DeleteAllItems(hTabs);
while ( lModules.realCount )
{
lw = (LOGWIN*)lModules.items[0];
SendMessage(lw->hwnd, WM_CLOSE, 0, 0);
}
tabCount = 0;
PostMessage(hwndDlg, HM_RESTART, 0, 1);
return TRUE;
}
LoadSettings();
SendMessage(hwndDlg, HM_ADD, 0, 0);
PostMessage(hwndDlg, WM_SIZE, 0, 0);
return TRUE;
}
case WM_SETFOCUS:
if (pActive) {
SetFocus(pActive->hList);
}
return TRUE;
case WM_NOTIFY:
switch(wParam) {
case IDC_TABS:
{
LPNMHDR lpnmhdr = (LPNMHDR)lParam;
if (lpnmhdr->code == TCN_SELCHANGE)
{
int newTab = TabCtrl_GetCurSel(hTabs);
if (newTab >= 0 )
{
TCITEM tci={0};
HWND hOld = pActive->hwnd;
tci.mask = TCIF_PARAM;
if (!TabCtrl_GetItem(hTabs, newTab, &tci)) break;
pActive = (LOGWIN*)tci.lParam;
SendMessage(pActive->hwnd, WM_SIZE, 0, 0);
ScrollDown(pActive);
ShowWindow(hOld, SW_HIDE);
ShowWindow(pActive->hwnd, SW_SHOWNOACTIVATE);
SetFocus(pActive->hList);
} else
SendMessage(pActive->hwnd, WM_SIZE, 0, 0);
}
break;
}
}
break;
case WM_SIZE:
{
UTILRESIZEDIALOG urd={0};
urd.cbSize=sizeof(urd);
urd.hInstance=hInst;
urd.hwndDlg=hwndDlg;
urd.lpTemplate=MAKEINTRESOURCEA(IDD_CONSOLE);
urd.pfnResizer=ConsoleResize;
CallService(MS_UTILS_RESIZEDIALOG,0,(LPARAM)&urd);
GetClientRect(hTabs, &rcTabs);
TabCtrl_AdjustRect(hTabs, FALSE, &rcTabs);
if ( pActive )
SendMessage(pActive->hwnd, WM_SIZE, 0, 0);
break;
}
case WM_GETMINMAXINFO:
{
MINMAXINFO *mmi=(MINMAXINFO*)lParam;
mmi->ptMinTrackSize.x=400;
mmi->ptMinTrackSize.y=200;
break;
}
case WM_CLOSE:
if ( lParam != 1 ) {
Utils_SaveWindowPosition(hwndDlg,NULL,"Console","Console");
ShowConsole(0);
return TRUE;
} else
DestroyWindow(hwndDlg);
break;
case WM_DESTROY:
pActive = NULL;
if (hfLogFont) DeleteObject(hfLogFont);
PostQuitMessage(0);
break;
}
return FALSE;
}
