MSN: folders restructurization

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

1 files changed, 428 insertions, 0 deletions

diff --git a/protocols/MSN/src/msn_mail.cpp b/protocols/MSN/src/msn_mail.cpp
new file mode 100644
index 0000000000..869642d1d4
--- /dev/null
+++ b/protocols/MSN/src/msn_mail.cpp
@@ -0,0 +1,428 @@
+/*

+Plugin of Miranda IM for communicating with users of the MSN Messenger protocol.

+Copyright (c) 2007-2012 Boris Krasnovskiy.

+

+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, see <http://www.gnu.org/licenses/>.

+*/

+

+#include "msn_global.h"

+#include "msn_proto.h"

+

+static const char oimRecvUrl[] = "https://rsi.hotmail.com/rsi/rsi.asmx";

+static const char mailReqHdr[] = 

+	"SOAPAction: \"http://www.hotmail.msn.com/ws/2004/09/oim/rsi/%s\"\r\n";

+

+ezxml_t CMsnProto::oimRecvHdr(const char* service, ezxml_t& tbdy, char*& httphdr)

+{

+	ezxml_t xmlp = ezxml_new("soap:Envelope");

+	ezxml_set_attr(xmlp, "xmlns:xsi",  "http://www.w3.org/2001/XMLSchema-instance");

+	ezxml_set_attr(xmlp, "xmlns:xsd",  "http://www.w3.org/2001/XMLSchema");

+	ezxml_set_attr(xmlp, "xmlns:soap", "http://schemas.xmlsoap.org/soap/envelope/");

+	

+	ezxml_t hdr = ezxml_add_child(xmlp, "soap:Header", 0);

+	ezxml_t cook = ezxml_add_child(hdr, "PassportCookie", 0);

+	ezxml_set_attr(cook, "xmlns", "http://www.hotmail.msn.com/ws/2004/09/oim/rsi");

+	ezxml_t tcook = ezxml_add_child(cook, "t", 0);

+	ezxml_set_txt(tcook, tAuthToken ? tAuthToken : "");

+	ezxml_t pcook = ezxml_add_child(cook, "p", 0);

+	ezxml_set_txt(pcook, pAuthToken ? pAuthToken : "");

+

+	ezxml_t bdy = ezxml_add_child(xmlp, "soap:Body", 0);

+	

+	tbdy = ezxml_add_child(bdy, service, 0);

+	ezxml_set_attr(tbdy, "xmlns", "http://www.hotmail.msn.com/ws/2004/09/oim/rsi");

+

+	size_t hdrsz = strlen(service) + sizeof(mailReqHdr) + 20;

+	httphdr = (char*)mir_alloc(hdrsz);

+

+	mir_snprintf(httphdr, hdrsz, mailReqHdr, service);

+

+	return xmlp;

+}

+

+

+void CMsnProto::getOIMs(ezxml_t xmli)

+{

+	ezxml_t toki = ezxml_child(xmli, "M");

+	if (toki == NULL) return;

+

+	char* getReqHdr;

+	ezxml_t reqmsg;

+	ezxml_t xmlreq = oimRecvHdr("GetMessage", reqmsg, getReqHdr);

+

+	ezxml_t reqmid = ezxml_add_child(reqmsg, "messageId", 0);

+	ezxml_t reqmrk = ezxml_add_child(reqmsg, "alsoMarkAsRead", 0);

+	ezxml_set_txt(reqmrk, "false");

+

+	char* delReqHdr;

+	ezxml_t delmsg;

+	ezxml_t xmldel = oimRecvHdr("DeleteMessages", delmsg, delReqHdr);

+	ezxml_t delmids = ezxml_add_child(delmsg, "messageIds", 0);

+

+	while (toki != NULL)

+	{

+		const char* szId    = ezxml_txt(ezxml_child(toki, "I"));

+		const char* szEmail = ezxml_txt(ezxml_child(toki, "E"));

+

+		ezxml_set_txt(reqmid, szId);

+		char* szData = ezxml_toxml(xmlreq, true);

+

+		unsigned status;

+		char* url = (char*)mir_strdup(oimRecvUrl);

+

+		char* tResult = getSslResult(&url, szData, getReqHdr, status);

+

+		free(szData);

+		mir_free(url);

+

+		if (tResult != NULL && status == 200)

+		{

+			ezxml_t xmlm = ezxml_parse_str(tResult, strlen(tResult));

+			ezxml_t body = getSoapResponse(xmlm, "GetMessage");

+

+			MimeHeaders mailInfo;

+			const char* mailbody = mailInfo.readFromBuffer((char*)ezxml_txt(body));

+

+			time_t evtm = time(NULL);

+			const char* arrTime = mailInfo["X-OriginalArrivalTime"];

+			if (arrTime != NULL)

+			{

+				char szTime[32], *p;

+				txtParseParam(arrTime, "FILETIME", "[", "]", szTime, sizeof(szTime));

+

+				unsigned filetimeLo = strtoul(szTime, &p, 16);

+				if (*p == ':') 

+				{ 

+					unsigned __int64 filetime = strtoul(p+1, &p, 16);

+					filetime <<= 32;

+					filetime |= filetimeLo;

+					filetime /= 10000000;

+#ifndef __GNUC__

+					filetime -= 11644473600ui64;

+#else

+					filetime -= 11644473600ull;

+#endif

+					evtm = (time_t)filetime;

+				}

+			}

+

+			PROTORECVEVENT pre = {0};

+			pre.szMessage = mailInfo.decodeMailBody((char*)mailbody);

+			pre.flags = PREF_UTF /*+ ((isRtl) ? PREF_RTL : 0)*/;

+			pre.timestamp = evtm;

+

+			CCSDATA ccs = {0};

+			ccs.hContact = MSN_HContactFromEmail(szEmail);

+			ccs.szProtoService = PSR_MESSAGE;

+			ccs.lParam = (LPARAM)&pre;

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

+			mir_free(pre.szMessage);

+

+			ezxml_t delmid = ezxml_add_child(delmids, "messageId", 0);

+			ezxml_set_txt(delmid, szId);

+			

+			ezxml_free(xmlm);

+		}

+		mir_free(tResult);

+		toki = ezxml_next(toki);

+	}

+	ezxml_free(xmlreq);

+	mir_free(getReqHdr);

+	

+	if (ezxml_child(delmids, "messageId") != NULL)

+	{

+		char* szData = ezxml_toxml(xmldel, true);

+			

+		unsigned status;

+		char* url = (char*)mir_strdup(oimRecvUrl);

+

+		char* tResult = getSslResult(&url, szData, delReqHdr, status);

+

+		mir_free(url);

+		mir_free(tResult);

+		free(szData);

+	}

+	ezxml_free(xmldel);

+	mir_free(delReqHdr);

+}

+

+

+void CMsnProto::getMetaData(void)

+{

+	char* getReqHdr;

+	ezxml_t reqbdy;

+	ezxml_t xmlreq = oimRecvHdr("GetMetadata", reqbdy, getReqHdr);

+

+	char* szData = ezxml_toxml(xmlreq, true);

+	ezxml_free(xmlreq);

+

+	unsigned status;

+	char* url = (char*)mir_strdup(oimRecvUrl);

+

+	char* tResult = getSslResult(&url, szData, getReqHdr, status);

+

+	mir_free(url);

+	free(szData);

+	mir_free(getReqHdr);

+

+	if (tResult != NULL && status == 200)

+	{

+		ezxml_t xmlm = ezxml_parse_str(tResult, strlen(tResult));

+		ezxml_t xmli = ezxml_get(xmlm, "s:Body", 0, "GetMetadataResponse", 0, "MD", -1);

+		if (!xmli)

+			xmli = ezxml_get(xmlm, "soap:Body", 0, "GetMetadataResponse", 0, "MD", -1);

+

+		getOIMs(xmli);

+		ezxml_free(xmlm);

+	}

+	mir_free(tResult);

+}

+

+

+void CMsnProto::processMailData(char* mailData)

+{

+	if (strcmp(mailData, "too-large") == 0)

+	{

+		getMetaData();

+	}

+	else

+	{

+		ezxml_t xmli = ezxml_parse_str(mailData, strlen(mailData));

+

+		ezxml_t toke = ezxml_child(xmli, "E");

+

+		const char* szIU = ezxml_txt(ezxml_child(toke, "IU"));

+		if (*szIU) mUnreadMessages = atol(szIU);

+

+		const char* szOU = ezxml_txt(ezxml_child(toke, "OU"));

+		if (*szOU) mUnreadJunkEmails = atol(szOU);

+

+		getOIMs(xmli);

+

+		ezxml_free(xmli);

+	}

+}

+

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

+// Processes e-mail notification

+

+void CMsnProto::sttNotificationMessage(char* msgBody, bool isInitial)

+{

+	TCHAR tBuffer[512];

+	TCHAR tBuffer2[512];

+	int  UnreadMessages = mUnreadMessages;

+	int  UnreadJunkEmails = mUnreadJunkEmails;

+	bool ShowPopUp = isInitial;

+

+	MimeHeaders tFileInfo;

+	tFileInfo.readFromBuffer(msgBody);

+

+	const char* From = tFileInfo["From"];

+	const char* Subject = tFileInfo["Subject"];

+	const char* Fromaddr = tFileInfo["From-Addr"];

+	const char* MsgDelta = tFileInfo["Message-Delta"];

+	const char* SrcFolder = tFileInfo["Src-Folder"];

+	const char* DestFolder = tFileInfo["Dest-Folder"];

+	const char* InboxUnread = tFileInfo["Inbox-Unread"];

+	const char* FoldersUnread = tFileInfo["Folders-Unread"];

+	

+	if (InboxUnread != NULL)

+		mUnreadMessages = atol(InboxUnread);

+	if (FoldersUnread != NULL)

+		mUnreadJunkEmails = atol(FoldersUnread);

+

+	if (MsgDelta != NULL)

+	{

+		int iDelta = atol(MsgDelta);

+		if (SrcFolder && strcmp(SrcFolder, "ACTIVE") == 0)

+			mUnreadMessages -= iDelta;

+		else if (DestFolder && strcmp(DestFolder, "ACTIVE") == 0)

+			mUnreadMessages += iDelta;

+		if (SrcFolder && strcmp(SrcFolder, "HM_BuLkMail_") == 0)

+			mUnreadJunkEmails -= iDelta;

+		else if (DestFolder && strcmp(DestFolder, "HM_BuLkMail_") == 0)

+			mUnreadJunkEmails += iDelta;

+

+		if (mUnreadJunkEmails < 0) mUnreadJunkEmails = 0;

+		if (mUnreadMessages < 0) mUnreadMessages = 0;

+	}

+

+	if (From != NULL && Subject != NULL && Fromaddr != NULL) 

+	{

+		if (DestFolder != NULL && SrcFolder == NULL) 

+		{

+			mUnreadMessages += strcmp(DestFolder, "ACTIVE") == 0;

+			mUnreadJunkEmails += strcmp(DestFolder, "HM_BuLkMail_") == 0;

+		}

+

+		wchar_t* mimeFromW = tFileInfo.decode(From);

+		wchar_t* mimeSubjectW = tFileInfo.decode(Subject);

+

+

+		mir_sntprintf(tBuffer2, SIZEOF(tBuffer2), TranslateT("Subject: %s"), mimeSubjectW);

+

+

+

+		TCHAR* msgtxt = _stricmp(From, Fromaddr) ?

+			TranslateT("Hotmail from %s (%S)") : TranslateT("Hotmail from %s");

+

+		mir_sntprintf(tBuffer, SIZEOF(tBuffer), msgtxt, mimeFromW, Fromaddr);

+		mir_free(mimeFromW);

+		mir_free(mimeSubjectW);

+		ShowPopUp = true;

+	}

+	else 

+	{

+		const char* MailData = tFileInfo["Mail-Data"];

+		if (MailData != NULL) processMailData((char*)MailData);

+

+		mir_sntprintf(tBuffer, SIZEOF(tBuffer), m_tszUserName);

+		mir_sntprintf(tBuffer2, SIZEOF(tBuffer2), TranslateT("Unread mail is available: %d in Inbox and %d in other folders)."),

+			mUnreadMessages, mUnreadJunkEmails);

+	}

+

+	if (UnreadMessages == mUnreadMessages && UnreadJunkEmails == mUnreadJunkEmails  && !isInitial)

+		return;

+

+	ShowPopUp &= mUnreadMessages != 0 || (mUnreadJunkEmails != 0 && !getByte("DisableHotmailJunk", 0));

+

+	HANDLE hContact = MSN_HContactFromEmail(MyOptions.szEmail);

+	if (hContact)

+	{

+		CallService(MS_CLIST_REMOVEEVENT, (WPARAM)hContact, (LPARAM) 1);

+		displayEmailCount(hContact);

+

+		if (ShowPopUp && !getByte("DisableHotmailTray", 1))

+		{

+			CLISTEVENT cle = {0};

+

+			cle.cbSize = sizeof(cle);

+			cle.hContact = hContact;

+			cle.hDbEvent = (HANDLE) 1;

+			cle.flags = CLEF_URGENT | CLEF_TCHAR;

+			cle.hIcon = LoadSkinnedIcon(SKINICON_OTHER_SENDEMAIL);

+			cle.ptszTooltip = tBuffer2;

+			char buf[64];

+			mir_snprintf(buf, SIZEOF(buf), "%s%s", m_szModuleName, MS_GOTO_INBOX);

+			cle.pszService = buf;

+

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

+		}

+	}

+

+	SendBroadcast(NULL, ACKTYPE_EMAIL, ACKRESULT_STATUS, NULL, 0);

+

+	// Disable to notify receiving hotmail

+	if (ShowPopUp && !getByte("DisableHotmail", 0))

+	{

+		SkinPlaySound(mailsoundname);

+

+		const char *msgurl = tFileInfo["Message-URL"];

+		if (msgurl)

+		{

+			const char *p = strchr(msgurl, '&'); if (p) *(char*)p = 0;

+			p = strstr(msgurl, "getmsg"); if (p) msgurl = p;

+		}

+		else

+			msgurl = "inbox";

+		

+		char szUrl[256];

+		mir_snprintf(szUrl, sizeof(szUrl), "http://mail.live.com?rru=%s", msgurl);

+

+		MSN_ShowPopup(tBuffer, tBuffer2, 

+			MSN_ALLOW_ENTER | MSN_ALLOW_MSGBOX | MSN_HOTMAIL_POPUP, 

+			szUrl);

+	}

+

+	if (!getByte("RunMailerOnHotmail", 0) || !ShowPopUp || isInitial)

+		return;

+

+	char mailerpath[MAX_PATH];

+	if (!getStaticString(NULL, "MailerPath", mailerpath, sizeof(mailerpath))) 

+	{

+		if (mailerpath[0]) 

+		{

+			char* tParams = NULL;

+			char* tCmd = mailerpath;

+

+			if (*tCmd == '\"') 

+			{

+				++tCmd; 

+				char* tEndPtr = strchr(tCmd, '\"');

+				if (tEndPtr != NULL) 

+				{

+					*tEndPtr = 0;

+					tParams = tEndPtr+1;

+				}	

+			}

+

+			if (tParams == NULL)

+			{

+				tParams = strchr(tCmd, ' ');

+				tParams = tParams ? tParams + 1 : strchr(tCmd, '\0');

+			}

+

+			while (*tParams == ' ') ++tParams;

+

+			MSN_DebugLog("Running mailer \"%s\" with params \"%s\"", tCmd, tParams);

+			ShellExecuteA(NULL, "open", tCmd, tParams, NULL, TRUE);

+		}

+	}	

+}

+

+static void TruncUtf8(char *str, size_t sz)

+{

+	size_t len = strlen(str);

+	if (sz > len) sz = len;

+

+	size_t cntl = 0, cnt = 0;

+	for (;;)

+	{

+		unsigned char p = (unsigned char)str[cnt];

+		

+		if (p >= 0xE0) cnt += 3;

+		else if (p >= 0xC0) cnt += 2;

+		else if (p != 0) ++cnt;

+		else break;

+		

+		if (cnt <= sz) cntl = cnt;

+		else break;

+	}

+	str[cntl] = 0;

+}

+

+void CMsnProto::displayEmailCount(HANDLE hContact)

+{

+	if (!emailEnabled || getByte("DisableHotmailCL", 0)) return;

+

+	TCHAR* name = GetContactNameT(hContact);

+	if (name == NULL) return;

+

+	TCHAR* ch = name-1;

+	do

+	{

+		ch = _tcschr(ch+1, '[');

+	}

+	while (ch && !_istdigit(ch[1]));  

+	if (ch) *ch = 0;

+	trtrim(name);

+

+	TCHAR szNick[128];

+	mir_sntprintf(szNick, SIZEOF(szNick), 

+		getByte("DisableHotmailJunk", 0) ? _T("%s [%d]") : _T("%s [%d][%d]"), name, mUnreadMessages, mUnreadJunkEmails);

+

+	nickChg = true;

+	DBWriteContactSettingTString(hContact, "CList", "MyHandle", szNick);

+	nickChg = false;

+}