#include "headers.h"

INT_PTR IsContactPassed(WPARAM wParam, LPARAM /*lParam*/)
{
	HANDLE hContact = ( HANDLE )wParam;
	std::string proto = GetContactProto(hContact);
	
	if ( !plSets->ProtoDisabled( proto.c_str()))
		return CS_PASSED;

	if ( db_get_b(hContact, pluginName, answeredSetting, 0))
		return CS_PASSED;

	if ( !db_get_b(hContact, "CList", "NotOnList", 0) && db_get_w( hContact, proto.c_str(), "SrvGroupId", -1 ) != 1)
		return CS_PASSED;

	if ( IsExistMyMessage(hContact))
		return CS_PASSED;

	return CS_NOTPASSED;
}

INT_PTR RemoveTempContacts(WPARAM wParam,LPARAM lParam)
{
	for (HANDLE hContact = db_find_first(); hContact; ) {
		HANDLE hNext = db_find_next(hContact);
		ptrT szGroup( db_get_tsa( hContact, "CList", "Group"));

		if ( db_get_b(hContact, "CList", "NotOnList", 0) || db_get_b(hContact, "CList", "Hidden", 0 ) || (szGroup != NULL && (_tcsstr(szGroup, _T("Not In List")) || _tcsstr(szGroup, TranslateT("Not In List"))))) {
			char *szProto = GetContactProto(hContact);
			if (szProto != NULL) {
				// Check if protocol uses server side lists
				DWORD caps = CallProtoService(szProto, PS_GETCAPS, PFLAGNUM_1, 0);
				if ( caps & PF1_SERVERCLIST ) {
					int status = CallProtoService(szProto, PS_GETSTATUS, 0, 0);
					if (status == ID_STATUS_OFFLINE || (status >= ID_STATUS_CONNECTING && status < ID_STATUS_CONNECTING + MAX_CONNECT_RETRIES))
						// Set a flag so we remember to delete the contact when the protocol goes online the next time
						db_set_b( hContact, "CList", "Delete", 1 );
					else
						CallService(MS_DB_CONTACT_DELETE, (WPARAM)hContact, 0 );
				}
			}
		}

		hContact = hNext;
	}
		
	int hGroup = 1;
	char *group_name;
	do {
		group_name = (char *)CallService(MS_CLIST_GROUPGETNAME, (WPARAM)hGroup, 0);
		if (group_name != NULL && strstr(group_name, "Not In List")) {
			BYTE ConfirmDelete = db_get_b(NULL, "CList", "ConfirmDelete", SETTING_CONFIRMDELETE_DEFAULT);
			if ( ConfirmDelete )
				db_set_b( NULL, "CList", "ConfirmDelete", 0 );

			CallService(MS_CLIST_GROUPDELETE, (WPARAM)hGroup, 0 );
			if ( ConfirmDelete ) 
				db_set_b( NULL, "CList", "ConfirmDelete", ConfirmDelete );
			break;
		}
		hGroup++;
	}
	while( group_name );
	if (!lParam)
		MessageBox(NULL, TranslateT("Complete"), TranslateT(pluginName), MB_ICONINFORMATION);

	return 0;
}

int OnSystemModulesLoaded(WPARAM wParam, LPARAM lParam)
{
	UnhookEvent(hLoadHook);
	if (plSets->RemTmpAll.Get())
		RemoveTempContacts(0,1);
	return 0;
}