void UnloadClcModule()
{
if (!bModuleInitialized)
return;
for (int i = 0; i < arEvents.getCount(); i++)
UnhookEvent(arEvents[i]);
mir_free(cli.clcProto);
WindowList_Destroy(hClcWindowList); hClcWindowList = NULL;
FreeDisplayNameCache();
UninitCustomMenus();
UninitGenMenu();
}
static int ContactListShutdownProc(WPARAM wParam,LPARAM lParam)
{
HANDLE hContact,hNext;
//remove transitory contacts
hContact=(HANDLE)CallService(MS_DB_CONTACT_FINDFIRST,0,0);
while(hContact!=NULL) {
hNext=(HANDLE)CallService(MS_DB_CONTACT_FINDNEXT,(WPARAM)hContact,0);
if(DBGetContactSettingByte(hContact,"CList","NotOnList",0))
CallService(MS_DB_CONTACT_DELETE,(WPARAM)hContact,0);
hContact=hNext;
}
ImageList_Destroy(hCListImages);
UnhookEvent(hProtoAckHook);
UnhookEvent(hSettingChanged);
UninitCustomMenus();
UninitCListEvents();
FreeDisplayNameCache(&lContactsCache);
if (protoIconIndex) mir_free(protoIconIndex);
DestroyHookableEvent(hContactDoubleClicked);
return 0;
}
LRESULT CALLBACK ContactListControlWndProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
struct ClcData *dat = (struct ClcData*)GetWindowLongPtr(hwnd,0);
if ( msg >= CLM_FIRST && msg < CLM_LAST )
return pcli->pfnProcessExternalMessages(hwnd,dat,msg,wParam,lParam);
switch (msg) {
case WM_CREATE:
dat = (struct ClcData*)mir_calloc( sizeof(struct ClcData));
SetWindowLong(hwnd,0,(LPARAM)dat);
InitDisplayNameCache(&dat->lCLCContactsCache);
break;
case INTM_ICONCHANGED:
{ struct ClcContact *contact=NULL;
struct ClcGroup *group=NULL;
int recalcScrollBar=0,shouldShow;
HANDLE hSelItem=NULL;
struct ClcContact *selcontact=NULL;
pdisplayNameCacheEntry cacheEntry = GetContactFullCacheEntry((HANDLE)wParam);
WORD status;
int NeedResort=0;
char *szProto = cacheEntry->szProto;
if(szProto==NULL) status=ID_STATUS_OFFLINE;
else status=cacheEntry->status;
shouldShow=(GetWindowLong(hwnd,GWL_STYLE)&CLS_SHOWHIDDEN || !cacheEntry->Hidden) && (!pcli->pfnIsHiddenMode(dat,status)||cacheEntry->noHiddenOffline || CallService(MS_CLIST_GETCONTACTICON,wParam,0)!=LOWORD(lParam)); //this means an offline msg is flashing, so the contact should be shown
if(!FindItem(hwnd,dat,(HANDLE)wParam,&contact,&group,NULL)) {
if(shouldShow && CallService(MS_DB_CONTACT_IS, wParam, 0)) {
if(dat->selection>=0 && GetRowByIndex(dat,dat->selection,&selcontact,NULL)!=-1)
hSelItem=pcli->pfnContactToHItem(selcontact);
AddContactToTree(hwnd,dat,(HANDLE)wParam,0,0);
NeedResort=1;
recalcScrollBar=1;
FindItem(hwnd,dat,(HANDLE)wParam,&contact,NULL,NULL);
if (contact) {
contact->iImage=(WORD)lParam;
pcli->pfnNotifyNewContact(hwnd,(HANDLE)wParam);
dat->NeedResort=1;
}
}
}
else {
//item in list already
DWORD style=GetWindowLong(hwnd,GWL_STYLE);
if(contact->iImage== (WORD)lParam) break;
if (sortByStatus) dat->NeedResort=1;
if(!shouldShow && !(style&CLS_NOHIDEOFFLINE) && (style&CLS_HIDEOFFLINE || group->hideOffline)) {
if(dat->selection>=0 && GetRowByIndex(dat,dat->selection,&selcontact,NULL)!=-1)
hSelItem=pcli->pfnContactToHItem(selcontact);
RemoveItemFromGroup(hwnd,group,contact,0);
recalcScrollBar=1;
dat->NeedResort=1;
}
else {
int oldflags;
contact->iImage=(WORD)lParam;
oldflags=contact->flags;
if(!pcli->pfnIsHiddenMode(dat,status)||cacheEntry->noHiddenOffline) contact->flags|=CONTACTF_ONLINE;
else contact->flags&=~CONTACTF_ONLINE;
if (oldflags!=contact->flags)
dat->NeedResort=1;
} }
if(hSelItem) {
struct ClcGroup *selgroup;
if(FindItem(hwnd,dat,hSelItem,&selcontact,&selgroup,NULL))
dat->selection=GetRowsPriorTo(&dat->list,selgroup,li.List_IndexOf((SortedList*)&selgroup->cl, selcontact));
else
dat->selection=-1;
}
SortClcByTimer(hwnd);
if(recalcScrollBar) RecalcScrollBar(hwnd,dat);
goto LBL_Exit;
}
case INTM_STATUSMSGCHANGED:
{ struct ClcContact *contact=NULL;
struct ClcGroup *group=NULL;
DBVARIANT dbv;
if (!(dat->style&CLS_SHOWSTATUSMESSAGES)) break;
if(FindItem(hwnd,dat,(HANDLE)wParam,&contact,&group,NULL) && contact!=NULL) {
contact->flags &= ~CONTACTF_STATUSMSG;
if (!DBGetContactSettingTString((HANDLE)wParam, "CList", "StatusMsg", &dbv)) {
int j;
if (dbv.ptszVal==NULL||_tcslen(dbv.ptszVal)==0) break;
lstrcpyn(contact->szStatusMsg, dbv.ptszVal, SIZEOF(contact->szStatusMsg));
for (j=(int)_tcslen(contact->szStatusMsg)-1;j>=0;j--) {
if (contact->szStatusMsg[j]=='\r' || contact->szStatusMsg[j]=='\n' || contact->szStatusMsg[j]=='\t') {
contact->szStatusMsg[j] = ' ';
}
}
DBFreeVariant(&dbv);
if (_tcslen(contact->szStatusMsg)>0) {
contact->flags |= CONTACTF_STATUSMSG;
dat->NeedResort=TRUE;
}
}
}
InvalidateRect(hwnd,NULL,TRUE);
SortClcByTimer(hwnd);
RecalcScrollBar(hwnd,dat);
goto LBL_Exit;
}
case WM_TIMER:
if (wParam==TIMERID_DELAYEDREPAINT) {
KillTimer(hwnd,TIMERID_DELAYEDREPAINT);
InvalidateRect(hwnd,NULL,FALSE);
break;
}
if ( wParam == TIMERID_SUBEXPAND) {
KillTimer(hwnd,TIMERID_SUBEXPAND);
if (hitcontact) {
if (hitcontact->SubExpanded) hitcontact->SubExpanded=0; else hitcontact->SubExpanded=1;
DBWriteContactSettingByte(hitcontact->hContact,"CList","Expanded",hitcontact->SubExpanded);
}
hitcontact=NULL;
dat->NeedResort=1;
SortCLC(hwnd,dat,1);
RecalcScrollBar(hwnd,dat);
break;
}
break;
case WM_DESTROY:
FreeDisplayNameCache(&dat->lCLCContactsCache);
stopStatusUpdater = 1;
break;
}
{ LRESULT res = saveContactListControlWndProc(hwnd, msg, wParam, lParam);
switch (msg) {
case WM_CREATE:
mir_forkthread(StatusUpdaterThread,0);
break;
}
return res;
}
LBL_Exit:
return DefWindowProc(hwnd, msg, wParam, lParam);
}
int CListMod_ContactListShutdownProc(WPARAM wParam,LPARAM lParam)
{
ModernUnhookEvent(hookSystemShutdown_CListMod);
FreeDisplayNameCache();
return 0;
}
int UnLoadContactListModule(void)
{
FreeDisplayNameCache(&lContactsCache);
return 0;
}