Yahoo: folders restructurization

git-svn-id: http://svn.miranda-ng.org/main/trunk@1918 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

1 files changed, 276 insertions, 0 deletions

diff --git a/protocols/Yahoo/src/im.cpp b/protocols/Yahoo/src/im.cpp
new file mode 100644
index 0000000000..5e28ec9d5f
--- /dev/null
+++ b/protocols/Yahoo/src/im.cpp
@@ -0,0 +1,276 @@
+/*

+ * $Id: im.cpp 12307 2010-08-11 21:49:46Z Michael.Kunz@s2005.TU-Chemnitz.de $

+ *

+ * myYahoo Miranda Plugin 

+ *

+ * Authors: Gennady Feldman (aka Gena01) 

+ *          Laurent Marechal (aka Peorth)

+ *

+ * This code is under GPL and is based on AIM, MSN and Miranda source code.

+ * I want to thank Robert Rainwater and George Hazan for their code and support

+ * and for answering some of my questions during development of this plugin.

+ */

+

+#include "yahoo.h"

+#include <m_langpack.h>

+#include <m_protosvc.h>

+

+#include "avatar.h"

+#include "im.h"

+#include "ignore.h"

+

+void CYahooProto::send_msg(const char *id, int protocol, const char *msg, int utf8)

+{

+	LOG(("[send_msg] Who: %s: protocol: %d Msg: '%s', utf: %d", id, protocol, msg, utf8));

+	

+	int buddy_icon = (GetDword("AvatarHash", 0) != 0) ? 2: 0;

+	yahoo_send_im(m_id, NULL, id, protocol, msg, utf8, buddy_icon);

+}

+

+void CYahooProto::ext_got_im(const char *me, const char *who, int protocol, const char *msg, 

+								long tm, int stat, int utf8, int buddy_icon, 

+								const char *seqn, int sendn)

+{

+	char 		*umsg;

+	const char	*c = msg;

+	int 		oidx = 0;

+	CCSDATA 		ccs;

+	PROTORECVEVENT 	pre;

+	HANDLE 			hContact;

+

+

+	LOG(("YAHOO_GOT_IM id:%s %s: %s (len: %d) tm:%lu stat:%i utf8:%i buddy_icon: %i", me, who, msg, lstrlenA(msg), tm, stat, utf8, buddy_icon));

+

+	if(stat == 2) {

+		char z[1024];

+

+		snprintf(z, sizeof z, "Error sending message to %s", who);

+		LOG((z));

+		ShowError(Translate("Yahoo Error"), z);

+		return;

+	}

+

+	if (!msg) {

+		LOG(("Empty Incoming Message, exiting."));

+		return;

+	}

+

+	if (GetByte( "IgnoreUnknown", 0 )) {

+

+		/*

+		* Check our buddy list to see if we have it there. And if it's not on the list then we don't accept any IMs.

+		*/

+		if (getbuddyH(who) == NULL) {

+			LOG(("Ignoring unknown user messages. User '%s'. Dropping Message.", who));

+			return;

+		}

+	}

+

+	if ( BuddyIgnored( who )) {

+		LOG(("User '%s' on our Ignore List. Dropping Message.", who));

+		return;

+	}

+

+	// make a bigger buffer for \n -> \r\n conversion (x2)

+	umsg = (char *) alloca(lstrlenA(msg) * 2 + 1); 

+

+	while ( *c != '\0') {

+		// Strip the font tag

+		if (!_strnicmp(c,"<font ",6) || !_strnicmp(c,"</font>",6) ||

+			// strip the fade tag

+			!_strnicmp(c, "<FADE ",6) || !_strnicmp(c,"</FADE>",7) ||

+			// strip the alternate colors tag

+			!_strnicmp(c, "<ALT ",5) || !_strnicmp(c, "</ALT>",6)) { 

+				while ((*c++ != '>') && (*c != '\0')); 

+		} else

+			// strip ANSI color combination

+			if ((*c == 0x1b) && (*(c+1) == '[')) { 

+				while ((*c++ != 'm') && (*c != '\0')); 

+			} else

+

+				if (*c != '\0') {

+					umsg[oidx++] = *c;

+

+					/* Adding \r to \r\n conversion */

+					if (*c == '\r' && *(c + 1) != '\n') 

+						umsg[oidx++] = '\n';

+

+					c++;

+				}

+	}

+

+	umsg[oidx++]= '\0';

+

+	/* Need to strip off formatting stuff first. Then do all decoding/converting */

+	LOG(("%s: %s", who, umsg));

+

+	//if (!strcmp(umsg, "<ding>")) 

+	//	:P("\a");

+

+	ccs.szProtoService = PSR_MESSAGE;

+	ccs.hContact = hContact = add_buddy(who, who, protocol, PALF_TEMPORARY);

+	//SetWord(hContact, "yprotoid", protocol);

+	Set_Protocol(hContact, protocol);

+

+	ccs.wParam = 0;

+	ccs.lParam = (LPARAM) &pre;

+	pre.flags = (utf8) ? PREF_UTF : 0;

+

+	if (tm) {

+		HANDLE hEvent = (HANDLE)CallService(MS_DB_EVENT_FINDLAST, (WPARAM)hContact, 0);

+

+		if (hEvent) { // contact has events

+			DBEVENTINFO dbei;

+			DWORD dummy;

+

+			dbei.cbSize = sizeof (DBEVENTINFO);

+			dbei.pBlob = (BYTE*)&dummy;

+			dbei.cbBlob = 2;

+			if (!CallService(MS_DB_EVENT_GET, (WPARAM)hEvent, (LPARAM)&dbei)) 

+				// got that event, if newer than ts then reset to current time

+				if ((DWORD)tm < dbei.timestamp) tm = (long)time(NULL);

+		}

+

+		pre.timestamp = (DWORD)time(NULL);

+		

+		if ((DWORD)tm < pre.timestamp)

+			pre.timestamp = tm;

+		

+	} else

+		pre.timestamp = (DWORD)time(NULL);

+

+	pre.szMessage = umsg;

+	pre.lParam = 0;

+

+	// Turn off typing

+	CallService(MS_PROTO_CONTACTISTYPING, (WPARAM) hContact, PROTOTYPE_CONTACTTYPING_OFF);

+	CallService(MS_PROTO_CHAINRECV, 0, (LPARAM) & ccs);

+

+	// ack the message we just got

+	if (seqn)

+		yahoo_send_im_ack(m_id, me, who, seqn, sendn);

+

+	if (buddy_icon < 0) return;

+

+	//?? Don't generate floods!!

+	DBWriteContactSettingByte(hContact, m_szModuleName, "AvatarType", (BYTE)buddy_icon);

+	if (buddy_icon != 2) {

+		reset_avatar(hContact);

+	} else if (DBGetContactSettingDword(hContact, m_szModuleName,"PictCK", 0) == 0) {

+		/* request the buddy image */

+		request_avatar(who); 

+	} 

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// SendMessage - sends a message

+

+void __cdecl CYahooProto::im_sendacksuccess(HANDLE hContact)

+{

+	ProtoBroadcastAck(m_szModuleName, hContact, ACKTYPE_MESSAGE, ACKRESULT_SUCCESS, (HANDLE) 1, 0);

+}

+

+void __cdecl CYahooProto::im_sendackfail(HANDLE hContact)

+{

+	SleepEx(1000, TRUE);

+	ProtoBroadcastAck(m_szModuleName, hContact, ACKTYPE_MESSAGE, ACKRESULT_FAILED, (HANDLE) 1, 

+						(LPARAM) Translate("The message send timed out."));

+}

+

+void __cdecl CYahooProto::im_sendackfail_longmsg(HANDLE hContact)

+{

+	SleepEx(1000, TRUE);

+	ProtoBroadcastAck(m_szModuleName, hContact, ACKTYPE_MESSAGE, ACKRESULT_FAILED, (HANDLE) 1, 

+						(LPARAM)Translate("Message is too long: Yahoo messages are limited by 800 UTF8 chars"));

+}

+

+int __cdecl CYahooProto::SendMsg( HANDLE hContact, int flags, const char* pszSrc )

+{

+	DBVARIANT dbv;

+	char *msg;

+	int  bANSI;

+

+	bANSI = 0;/*GetByte( "DisableUTF8", 0 );*/

+

+	if (!m_bLoggedIn) {/* don't send message if we not connected! */

+		YForkThread( &CYahooProto::im_sendackfail, hContact );

+		return 1;

+	}

+

+	if (bANSI) 

+		/* convert to ANSI */

+		msg = ( char* )pszSrc;

+	else if ( flags & PREF_UNICODE )

+		/* convert to utf8 */

+		msg = mir_utf8encodeW(( wchar_t* )&pszSrc[ strlen(pszSrc)+1 ] );

+	else if ( flags & PREF_UTF )

+		msg = mir_strdup(( char* )pszSrc );

+	else

+		msg = mir_utf8encode(( char* )pszSrc );

+

+	if (lstrlenA(msg) > 800) {

+		YForkThread( &CYahooProto::im_sendackfail_longmsg, hContact );

+		return 1;

+	}

+

+	if (!GetString( hContact, YAHOO_LOGINID, &dbv)) {

+		send_msg(dbv.pszVal, GetWord( hContact, "yprotoid", 0), msg, (!bANSI) ? 1 : 0);

+

+		if (!bANSI)

+			mir_free(msg);

+

+		YForkThread( &CYahooProto::im_sendacksuccess, hContact );

+

+		DBFreeVariant(&dbv);

+		return 1;

+	}

+

+	return 0;

+}

+

+////////////////////////////////////////////////////////////////////////////////////////

+// RecvMsg

+

+int __cdecl CYahooProto::RecvMsg( HANDLE hContact, PROTORECVEVENT* pre )

+{

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

+

+	// NUDGES

+	if ( !lstrcmpA(pre->szMessage, "<ding>")  && ServiceExists("NUDGE/Send")) {

+		DebugLog("[YahooRecvMessage] Doing Nudge Service!");

+		NotifyEventHooks(hYahooNudge, (WPARAM)hContact, pre->timestamp);

+		return 0;

+	} 

+

+	return Proto_RecvMessage(hContact, pre);

+}

+

+//=======================================================

+//Send a nudge

+//=======================================================

+

+INT_PTR __cdecl CYahooProto::SendNudge(WPARAM wParam, LPARAM lParam)

+{

+	HANDLE hContact = (HANDLE) wParam;

+

+	DebugLog("[YAHOO_SENDNUDGE]");

+

+	if (!m_bLoggedIn) {/* don't send nudge if we not connected! */

+		YForkThread( &CYahooProto::im_sendackfail, hContact );

+		return 1;

+	}

+

+	DBVARIANT dbv;

+	if (!GetString(hContact, YAHOO_LOGINID, &dbv)) {

+		send_msg(dbv.pszVal, GetWord(hContact, "yprotoid", 0), "<ding>", 0);

+		DBFreeVariant(&dbv);

+

+		YForkThread( &CYahooProto::im_sendacksuccess, hContact );

+		return 1;

+	}

+

+	return 0;

+}

+

+

+