svn.miranda.im is moving to a new home!

git-svn-id: http://miranda-plugins.googlecode.com/svn/trunk@7 e753b5eb-9565-29b2-b5c5-2cc6f99dfbcb

1 files changed, 305 insertions, 0 deletions

diff --git a/irc_mod/clist.cpp b/irc_mod/clist.cpp
new file mode 100644
index 0000000..13522f8
--- /dev/null
+++ b/irc_mod/clist.cpp
@@ -0,0 +1,305 @@
+

+/*

+IRC plugin for Miranda IM

+

+Copyright (C) 2003 Jörgen Persson

+

+This program is free software; you can redistribute it and/or

+modify it under the terms of the GNU General Public License

+as published by the Free Software Foundation; either version 2

+of the License, or (at your option) any later version.

+

+This program is distributed in the hope that it will be useful,

+but WITHOUT ANY WARRANTY; without even the implied warranty of

+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

+GNU General Public License for more details.

+

+You should have received a copy of the GNU General Public License

+along with this program; if not, write to the Free Software

+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

+*/

+

+#include "irc.h"

+

+extern PREFERENCES *prefs;

+extern char * IRCPROTONAME;

+

+

+BOOL CList_AddDCCChat(String name, String hostmask, unsigned long adr, int port) 

+{

+	CLISTEVENT cle = {0};

+	HANDLE hContact;

+	HANDLE hc;

+	char szNick[256];

+	char szService[256];

+	bool bFlag = false;

+

+	CONTACT usertemp ={(char *)name.c_str(), NULL, NULL, false, false, true};

+	hc = CList_FindContact(&usertemp);

+	if(hc && DBGetContactSettingByte(hc,"CList", "NotOnList", 0) == 0

+		&& DBGetContactSettingByte(hc,"CList", "Hidden", 0) == 0)

+	{

+		bFlag = true;

+	}

+

+	String contactname = name + DCCSTRING;

+

+	CONTACT user ={(char *)contactname.c_str(), NULL, NULL, false, false, true};

+	hContact = CList_AddContact(&user, false, false);

+	DBWriteContactSettingByte(hContact, IRCPROTONAME, "DCC", 1);

+

+	DCCINFO * pdci = new DCCINFO;

+	ZeroMemory(pdci, sizeof(DCCINFO));

+	pdci->sHostmask = hostmask;

+	pdci->hContact = hContact;

+	pdci->dwAdr = (DWORD) adr;

+	pdci->iPort = port;

+	pdci->iType = DCC_CHAT;

+	pdci->bSender = false;

+	pdci->sContactName = name;

+

+	if(prefs->DCCChatAccept == 3 || prefs->DCCChatAccept == 2 && bFlag)

+	{

+		CDccSession * dcc = new CDccSession(pdci);

+

+		CDccSession * olddcc = g_ircSession.FindDCCSession(hContact);

+		if (olddcc)

+			olddcc->Disconnect();

+

+		g_ircSession.AddDCCSession(hContact, dcc);

+

+		dcc->Connect();

+

+	}

+	else 

+	{

+		cle.cbSize=sizeof(cle);

+		cle.hContact=(HANDLE)hContact;

+		cle.hDbEvent=(HANDLE)"dccchat";	

+		cle.flags = 0;

+		cle.hIcon=LoadIconEx(IDI_DCC,"dcc",GetSystemMetrics(SM_CXSMICON),GetSystemMetrics(SM_CYSMICON));

+		mir_snprintf(szService, sizeof(szService),"%s/DblClickEvent", IRCPROTONAME);

+		cle.pszService= szService ;

+		mir_snprintf(szNick, sizeof(szNick), Translate("CTCP chat request from %s"), name.c_str());

+		cle.pszTooltip= szNick;

+		cle.lParam = (LPARAM)pdci;

+

+		if(CallService(MS_CLIST_GETEVENT, (WPARAM)hContact, (LPARAM)0))

+			CallService(MS_CLIST_REMOVEEVENT, (WPARAM)hContact, (LPARAM)"dccchat");

+		CallService(MS_CLIST_ADDEVENT,(WPARAM) hContact,(LPARAM) &cle);

+	}

+	return TRUE;

+}

+

+HANDLE CList_AddContact(struct CONTACT_TYPE * user, bool InList, bool SetOnline)

+{

+//	#ifdef _DEBUG

+//		DBGprintf( "Event: CList AddContact\n");

+//		DBGprintf( "Nick -> %s\n", user->name);

+//	#endif

+

+	if (user->name == NULL)

+		return 0;

+	HANDLE hContact = CList_FindContact(user);

+	if (hContact ) 

+	{

+		if (InList)

+			DBDeleteContactSetting(hContact, "CList", "NotOnList");

+		DBWriteContactSettingString(hContact, IRCPROTONAME, "Nick", user->name);

+		DBDeleteContactSetting(hContact, "CList", "Hidden");

+		if (SetOnline && DBGetContactSettingWord(hContact, IRCPROTONAME, "Status", ID_STATUS_OFFLINE)== ID_STATUS_OFFLINE)

+			DBWriteContactSettingWord(hContact, IRCPROTONAME, "Status", ID_STATUS_ONLINE);

+		return hContact;

+	}

+	

+	// here we create a new one since no one is to be found

+	hContact = (HANDLE) CallService(MS_DB_CONTACT_ADD, 0, 0);

+	if (hContact)

+	{

+		CallService(MS_PROTO_ADDTOCONTACT, (WPARAM) hContact, (LPARAM) IRCPROTONAME);

+

+		if (InList)

+			DBDeleteContactSetting(hContact, "CList", "NotOnList");

+		else

+			DBWriteContactSettingByte(hContact, "CList", "NotOnList", 1);

+		DBDeleteContactSetting(hContact, "CList", "Hidden");

+		DBWriteContactSettingString(hContact, IRCPROTONAME, "Nick", user->name);

+		DBWriteContactSettingString(hContact, IRCPROTONAME, "Default", user->name);

+		DBWriteContactSettingWord(hContact, IRCPROTONAME, "Status", SetOnline ? ID_STATUS_ONLINE:ID_STATUS_OFFLINE);

+		return hContact;

+	}

+	return false;

+}

+

+HANDLE CList_SetOffline(struct CONTACT_TYPE * user)

+{

+	DBVARIANT dbv;

+    HANDLE hContact = CList_FindContact(user);

+	if (hContact ) 

+	{

+		if (!DBGetContactSetting(hContact, IRCPROTONAME, "Default", &dbv) && dbv.type == DBVT_ASCIIZ)

+		{

+			DBWriteContactSettingString(hContact, IRCPROTONAME, "User", "");

+			DBWriteContactSettingString(hContact, IRCPROTONAME, "Host", "");

+			DBWriteContactSettingString(hContact, IRCPROTONAME, "Nick", dbv.pszVal);

+			DBWriteContactSettingWord(hContact, IRCPROTONAME, "Status", ID_STATUS_OFFLINE);

+

+			//Addon

+//			DBDeleteContactSetting(hContact, IRCPROTONAME,  "MirVer");

+			DBDeleteContactSetting(hContact, IRCPROTONAME,  "Version");

+			DBDeleteContactSetting(hContact, IRCPROTONAME,  "XStatus");

+			DBDeleteContactSetting(hContact, IRCPROTONAME,  DBSETTING_XSTATUSID);

+			DBDeleteContactSetting(hContact, IRCPROTONAME,  DBSETTING_XSTATUSNAME);

+			DBDeleteContactSetting(hContact, IRCPROTONAME,  DBSETTING_XSTATUSMSG);

+

+			DBFreeVariant(&dbv);

+			return hContact;

+		}

+	}

+

+	return 0;

+}

+bool CList_SetAllOffline(BYTE ChatsToo)

+{

+    HANDLE hContact;

+    char *szProto;

+	DBVARIANT dbv;

+

+

+	g_ircSession.DisconnectAllDCCSessions(false);

+

+

+    hContact = (HANDLE) CallService(MS_DB_CONTACT_FINDFIRST, 0, 0);

+    while (hContact) 

+	{

+       szProto = (char *) CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM) hContact, 0);

+       if (szProto != NULL && !lstrcmpi(szProto, IRCPROTONAME)) 

+	   {

+			if(DBGetContactSettingByte(hContact, IRCPROTONAME, "ChatRoom", 0) == 0)

+			{

+				if (DBGetContactSettingByte(hContact, IRCPROTONAME, "DCC", 0) != 0)

+				{

+					if(ChatsToo)

+						DBWriteContactSettingWord(hContact, IRCPROTONAME, "Status", ID_STATUS_OFFLINE);

+				}

+				else if (!DBGetContactSetting(hContact, IRCPROTONAME, "Default", &dbv) && dbv.type == DBVT_ASCIIZ)

+				{

+					DBWriteContactSettingString(hContact, IRCPROTONAME, "Nick", dbv.pszVal);

+					DBWriteContactSettingWord(hContact, IRCPROTONAME, "Status", ID_STATUS_OFFLINE);

+

+					//Addon

+//					DBDeleteContactSetting(hContact, IRCPROTONAME,  "MirVer");

+					DBDeleteContactSetting(hContact, IRCPROTONAME,  "Version");

+					DBDeleteContactSetting(hContact, IRCPROTONAME,  "XStatus");

+					DBDeleteContactSetting(hContact, IRCPROTONAME,  DBSETTING_XSTATUSID);

+					DBDeleteContactSetting(hContact, IRCPROTONAME,  DBSETTING_XSTATUSNAME);

+					DBDeleteContactSetting(hContact, IRCPROTONAME,  DBSETTING_XSTATUSMSG);

+

+					DBFreeVariant(&dbv);

+				}

+				DBDeleteContactSetting(hContact, IRCPROTONAME, "IP");

+				DBWriteContactSettingString(hContact, IRCPROTONAME, "User", "");

+				DBWriteContactSettingString(hContact, IRCPROTONAME, "Host", "");

+			}

+		}

+		hContact = (HANDLE) CallService(MS_DB_CONTACT_FINDNEXT, (WPARAM) hContact, 0);

+	}

+	return true;

+}

+

+HANDLE CList_FindContact (struct CONTACT_TYPE * user) 

+{

+	if (!user || !user->name)

+		return 0;

+	char * lowercasename = new char [lstrlen(user->name)+2];

+	lstrcpyn(lowercasename, user->name, lstrlen(user->name)+1);

+	CharLower(lowercasename);

+	HANDLE hContact;

+	char *szProto;

+	DBVARIANT dbv1;

+	DBVARIANT dbv2;	

+	DBVARIANT dbv3;	

+	DBVARIANT dbv4;	

+	DBVARIANT dbv5;	

+	hContact = (HANDLE) CallService(MS_DB_CONTACT_FINDFIRST, 0, 0);

+	while (hContact) 

+	{

+		szProto = (char *) CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM) hContact, 0);

+		if (szProto != NULL && !lstrcmpi(szProto, IRCPROTONAME)) 

+		{

+			if(DBGetContactSettingByte(hContact, IRCPROTONAME, "ChatRoom", 0) == 0)

+			{

+				HANDLE hContact_temp =NULL;

+				char * DBDefault = NULL;

+				char * DBNick = NULL;

+				char * DBWildcard = NULL;

+				char * DBUser = NULL;

+				char * DBHost = NULL;

+				if (!DBGetContactSetting(hContact, IRCPROTONAME, "Default", &dbv1) && dbv1.type == DBVT_ASCIIZ) DBDefault = dbv1.pszVal;

+				if (!DBGetContactSetting(hContact, IRCPROTONAME, "Nick", &dbv2)&& dbv2.type == DBVT_ASCIIZ) DBNick = dbv2.pszVal;

+				if (!DBGetContactSetting(hContact, IRCPROTONAME, "UWildcard", &dbv3)&& dbv3.type == DBVT_ASCIIZ) DBWildcard = dbv3.pszVal;

+				if (!DBGetContactSetting(hContact, IRCPROTONAME, "UUser", &dbv4)&& dbv4.type == DBVT_ASCIIZ) DBUser = dbv4.pszVal;

+				if (!DBGetContactSetting(hContact, IRCPROTONAME, "UHost", &dbv5)&& dbv5.type == DBVT_ASCIIZ) DBHost = dbv5.pszVal;

+				

+				if (DBWildcard)

+					CharLower(DBWildcard);

+				if (IsChannel(user->name)){

+					if(DBDefault && !lstrcmpi(DBDefault, user->name))

+						hContact_temp = (HANDLE)-1;

+				}

+				else if (user->ExactNick && DBNick && !lstrcmpi(DBNick, user->name))

+					hContact_temp = hContact;

+				

+				else if (user->ExactOnly && DBDefault && !lstrcmpi(DBDefault, user->name))

+					hContact_temp = hContact;

+			

+				else if (user->ExactWCOnly)

+				{

+					if(DBWildcard && !lstrcmpi(DBWildcard, lowercasename) 

+						|| (DBWildcard && !lstrcmpi(DBNick, lowercasename) && !WCCmp(DBWildcard, lowercasename) )

+						|| (!DBWildcard && !lstrcmpi(DBNick, lowercasename))		)

+					{

+						hContact_temp = hContact;

+					}

+				}

+				else if(strchr(user->name, ' ') == 0)

+				{

+					if ((DBDefault && !lstrcmpi(DBDefault, user->name) || DBNick && !lstrcmpi(DBNick, user->name) || DBWildcard && WCCmp(DBWildcard, lowercasename))

+						&& (WCCmp(DBUser, user->user) && WCCmp(DBHost, user->host)))

+					{

+							hContact_temp = hContact;

+					}

+				}

+

+				if (DBDefault)

+					DBFreeVariant(&dbv1);

+				if (DBNick)

+					DBFreeVariant(&dbv2);

+				if (DBWildcard)

+					DBFreeVariant(&dbv3);

+				if (DBUser)

+					DBFreeVariant(&dbv4);

+				if (DBHost)

+					DBFreeVariant(&dbv5);

+

+				if (hContact_temp != NULL) {

+					delete [] lowercasename;

+					if(hContact_temp != (HANDLE)-1)

+						return hContact_temp;

+					return 0;

+				}

+			}

+			

+		}

+		hContact = (HANDLE) CallService(MS_DB_CONTACT_FINDNEXT, (WPARAM) hContact, 0);

+	}

+	delete [] lowercasename;

+	return 0;

+}

+

+

+

+

+

+

+