protocols plugins moved to protocols

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

1 files changed, 0 insertions, 1404 deletions

diff --git a/plugins/NewsAggregator/Src/Utils.cpp b/plugins/NewsAggregator/Src/Utils.cpp
deleted file mode 100644
index c42a3f7dd1..0000000000
--- a/plugins/NewsAggregator/Src/Utils.cpp
+++ /dev/null
@@ -1,1404 +0,0 @@
-/* 

-Copyright (C) 2012 Mataes

-

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

-modify it under the terms of the GNU Library General Public

-License as published by the Free Software Foundation; either

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

-

-This 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

-Library General Public License for more details.

-

-You should have received a copy of the GNU Library General Public

-License along with this file; see the file license.txt.  If

-not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,

-Boston, MA 02111-1307, USA.  

-*/

-

-#include "common.h"

-

-HANDLE hNetlibUser = NULL, hNetlibHttp;

-BOOL UpdateListFlag = FALSE;

-

-BOOL IsMyContact(HANDLE hContact)

-{

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

-	return szProto != NULL && strcmp(MODULE, szProto) == 0;

-}

-

-VOID NetlibInit()

-{

-	NETLIBUSER nlu = {0};

-	nlu.cbSize = sizeof(nlu);

-	nlu.flags = NUF_OUTGOING | NUF_INCOMING | NUF_HTTPCONNS | NUF_TCHAR;	// | NUF_HTTPGATEWAY;

-	nlu.ptszDescriptiveName = TranslateT("NewsAggr HTTP connection");

-	nlu.szSettingsModule = MODULE;

-	hNetlibUser = (HANDLE)CallService(MS_NETLIB_REGISTERUSER, 0, (LPARAM)&nlu);

-}

-

-VOID NetlibUnInit()

-{

-	Netlib_CloseHandle(hNetlibUser);

-	hNetlibUser = NULL;

-}

-

-static void arrayToHex(BYTE* data, size_t datasz, char* res)

-{

-	char* resptr = res;

-	for (unsigned i=0; i<datasz ; i++)

-	{

-		const BYTE ch = data[i];

-

-		const char ch0 = (char)(ch >> 4);

-		*resptr++ = (char)((ch0 <= 9) ? ('0' + ch0) : (('a' - 10) + ch0));

-

-		const char ch1 = (char)(ch & 0xF);

-		*resptr++ = (char)((ch1 <= 9) ? ('0' + ch1) : (('a' - 10) + ch1));

-	}

-	*resptr = '\0';

-} 

-

-int GetImageFormat(const TCHAR* ext)

-{

-	if(lstrcmp(ext,_T(".jpg")) || lstrcmp(ext,_T(".jpeg")))

-	{

-		return PA_FORMAT_JPEG;

-	}

-	else if(lstrcmp(ext,_T(".png")))

-	{

-		return PA_FORMAT_PNG;

-	}

-	else if(lstrcmp(ext,_T(".gif")))

-	{

-		return PA_FORMAT_GIF;

-	}

-	else if(lstrcmp(ext,_T(".ico")))

-	{

-		return PA_FORMAT_ICON;

-	}

-	else if(lstrcmp(ext,_T(".bmp")))

-	{

-		return PA_FORMAT_BMP;

-	}

-	else if(lstrcmp(ext,_T(".swf")))

-	{

-		return PA_FORMAT_SWF;

-	}

-	else if(lstrcmp(ext,_T(".xml")))

-	{

-		return PA_FORMAT_XML;

-	}

-	else if(lstrcmp(ext,_T(".jpg")) || lstrcmp(ext,_T(".jpeg")))

-	{

-		return PA_FORMAT_JPEG;

-	}

-	else

-	{

-		return PA_FORMAT_UNKNOWN;

-	}

-}

-void CreateAuthString(char* auth, HANDLE hContact, HWND hwndDlg)

-{

-    char *user = NULL, *pass = NULL;

-	TCHAR *tlogin = NULL, *tpass = NULL, buf[MAX_PATH] = {0};

-	if (hContact && DBGetContactSettingByte(hContact, MODULE, "UseAuth", 0))

-	{

-		DBVARIANT dbLogin = {0};

-		if (!DBGetContactSettingTString(hContact, MODULE, "Login", &dbLogin))

-		{

-			tlogin = (TCHAR*)mir_alloc(_tcslen(dbLogin.ptszVal)*sizeof(TCHAR));

-			memcpy(tlogin, dbLogin.ptszVal, _tcslen(dbLogin.ptszVal)*sizeof(TCHAR));

-			tlogin[_tcslen(dbLogin.ptszVal)] = 0;

-			DBFreeVariant(&dbLogin);

-		}

-		DBVARIANT dbPass = {0};

-		if (!DBGetContactSettingTString(hContact, MODULE, "Password", &dbPass))

-		{

-			tpass = (TCHAR*)mir_alloc(_tcslen(dbPass.ptszVal)*sizeof(TCHAR));

-			memcpy(tpass, dbPass.ptszVal, _tcslen(dbPass.ptszVal)*sizeof(TCHAR));

-			tpass[_tcslen(dbPass.ptszVal)] = 0;

-			DBFreeVariant(&dbPass);

-		}

-	}

-	else if (hwndDlg && IsDlgButtonChecked(hwndDlg, IDC_USEAUTH))

-	{

-		GetDlgItemText(hwndDlg, IDC_LOGIN, buf, SIZEOF(buf));

-		tlogin = buf;

-		GetDlgItemText(hwndDlg, IDC_PASSWORD, buf, SIZEOF(buf));

-		tpass = buf;

-	}

-	user = mir_t2a(tlogin);

-	pass = mir_t2a(tpass);

-

-	char str[MAX_PATH];

-    int len = mir_snprintf(str, SIZEOF(str), "%s:%s", user, pass);

-	mir_free(user);

-	mir_free(pass);

-

-	strcpy(auth, "Basic ");

-	NETLIBBASE64 nlb = { auth+6, 250, (PBYTE)str, len };

-	CallService(MS_NETLIB_BASE64ENCODE, 0, LPARAM(&nlb));

-}

-

-VOID GetNewsData(TCHAR *tszUrl, char** szData, HANDLE hContact, HWND hwndDlg)

-{

-	char* szRedirUrl  = NULL;

-	NETLIBHTTPREQUEST nlhr = {0};

-	NETLIBHTTPHEADER headers[5];

-

-	// initialize the netlib request

-	nlhr.cbSize = sizeof(nlhr);

-	nlhr.requestType = REQUEST_GET;

-	nlhr.flags = NLHRF_NODUMP | NLHRF_HTTP11;

-	char *szUrl = mir_t2a(tszUrl);

-	nlhr.szUrl = szUrl;

-	nlhr.nlc = hNetlibHttp;

-

-	// change the header so the plugin is pretended to be IE 6 + WinXP

-	nlhr.headers = headers;

-	nlhr.headers[0].szName  = "User-Agent";

-	nlhr.headers[0].szValue = "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)";

-	nlhr.headers[1].szName  = "Cache-Control";

-	nlhr.headers[1].szValue = "no-cache";

-	nlhr.headers[2].szName  = "Pragma";

-	nlhr.headers[2].szValue = "no-cache";

-	nlhr.headers[3].szName  = "Connection";

-	nlhr.headers[3].szValue = "close";

-	nlhr.headers[4].szName  = "Accept";

-	nlhr.headers[4].szValue = "ext/html, application/xml";

-	if (DBGetContactSettingByte(hContact, MODULE, "UseAuth", 0) || IsDlgButtonChecked(hwndDlg, IDC_USEAUTH))

-	{

-		nlhr.headersCount = 6;

-		nlhr.headers[5].szName  = "Authorization";

-	

-		char auth[256];

-		CreateAuthString(auth, hContact, hwndDlg);

-		nlhr.headers[5].szValue = auth;

-	}

-	else

-		nlhr.headersCount = 5;

-

-	// download the page

-	NETLIBHTTPREQUEST *nlhrReply = (NETLIBHTTPREQUEST*)CallService(MS_NETLIB_HTTPTRANSACTION, (WPARAM)hNetlibUser, (LPARAM)&nlhr);

-	if (nlhrReply) 

-	{

-		// if the recieved code is 200 OK

-		switch(nlhrReply->resultCode)

-		{

-			case 200: 

-			{

-				if (nlhrReply->dataLength)

-				{

-					// allocate memory and save the retrieved data

-					*szData = (char *)mir_alloc(nlhrReply->dataLength + 2);

-					memcpy(*szData, nlhrReply->pData, nlhrReply->dataLength);

-					(*szData)[nlhrReply->dataLength] = 0;

-				}

-				break;

-			}

-

-			case 401:

-			{

-				//ShowMessage(0, TranslateT("Cannot upload VersionInfo. Incorrect username or password"));

-				break;

-			}

-

-			case 301:

-			case 302:

-			case 307:

-				// get the url for the new location and save it to szInfo

-				// look for the reply header "Location"

-				for (int i=0; i<nlhrReply->headersCount; i++) 

-				{

-					if (!strcmp(nlhrReply->headers[i].szName, "Location")) 

-					{

-						size_t rlen = 0;

-						if (nlhrReply->headers[i].szValue[0] == '/')

-						{

-							const char* szPath;

-							const char* szPref = strstr(szUrl, "://");

-							szPref = szPref ? szPref + 3 : szUrl;

-							szPath = strchr(szPref, '/');

-							rlen = szPath != NULL ? szPath - szUrl : strlen(szUrl); 

-						}

-

-						szRedirUrl = (char*)mir_realloc(szRedirUrl, 

-							rlen + strlen(nlhrReply->headers[i].szValue)*3 + 1);

-

-						strncpy(szRedirUrl, szUrl, rlen);

-						strcpy(szRedirUrl+rlen, nlhrReply->headers[i].szValue); 

-							

-						nlhr.szUrl = szRedirUrl;

-						break;

-					}

-				}

-				break;

-

-			default:

-				//ShowMessage(0, TranslateT("Cannot upload VersionInfo. Unknown error"));

-				break;

-		}

-		CallService(MS_NETLIB_FREEHTTPREQUESTSTRUCT, 0, (LPARAM)nlhrReply);

-	}

-	mir_free(szUrl);

-}

-

-VOID CreateList (HWND hwndList)

-{

-	SendMessage(hwndList, LVM_SETEXTENDEDLISTVIEWSTYLE, 0, LVS_EX_FULLROWSELECT | LVS_EX_CHECKBOXES);	

-

-	LVCOLUMN lvc = {0}; 

-	// Initialize the LVCOLUMN structure.

-	// The mask specifies that the format, width, text, and

-	// subitem members of the structure are valid. 

-	lvc.mask = LVCF_FMT | LVCF_WIDTH | LVCF_TEXT | LVCF_SUBITEM; 

-	lvc.fmt = LVCFMT_LEFT;

-	  

-	lvc.iSubItem = 0;

-	lvc.pszText = TranslateT("Feed");	

-	lvc.cx = 160;     // width of column in pixels

-	ListView_InsertColumn(hwndList, 0, &lvc);

-

-	lvc.iSubItem = 1;

-	lvc.pszText = TranslateT("URL");	

-	lvc.cx = 280;     // width of column in pixels

-	ListView_InsertColumn(hwndList, 1, &lvc);

-}

-

-VOID UpdateList (HWND hwndList)

-{

-	LVITEM lvI = {0};

-

-	// Some code to create the list-view control.

-	// Initialize LVITEM members that are common to all

-	// items.

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

-	int i = 0;

-	while (hContact != NULL) 

-	{

-		if (IsMyContact(hContact)) 

-		{

-			UpdateListFlag = TRUE;

-			lvI.mask = LVIF_TEXT;

-			lvI.iSubItem = 0;

-			DBVARIANT dbNick = {0};

-			if (!DBGetContactSettingTString(hContact, MODULE, "Nick", &dbNick))

-			{

-				lvI.pszText = dbNick.ptszVal;

-				lvI.iItem = i;

-				ListView_InsertItem(hwndList, &lvI);

-				lvI.iSubItem = 1;

-				DBVARIANT dbURL = {0};

-				if (!DBGetContactSettingTString(hContact, MODULE, "URL", &dbURL))

-				{

-					lvI.pszText = dbURL.ptszVal;

-					ListView_SetItem(hwndList, &lvI);

-					i += 1;

-					ListView_SetCheckState(hwndList, lvI.iItem, DBGetContactSettingByte(hContact, MODULE, "CheckState", 1));

-					DBFreeVariant(&dbURL);

-				}

-				DBFreeVariant(&dbNick);

-			}

-		}

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

-	}

-	UpdateListFlag = FALSE;

-}

-

-VOID DeleteAllItems(HWND hwndList)

-{	

-	ListView_DeleteAllItems(hwndList);

-}

-

-time_t __stdcall DateToUnixTime(TCHAR* stamp, BOOL FeedType)

-{

-	struct tm timestamp;

-	TCHAR date[9];

-	int i, y;

-	time_t t;

-

-	if ( stamp == NULL ) return ( time_t ) 0;

-

-	TCHAR *p = stamp;

-

-	if (FeedType)

-	{

-		// skip '-' chars

-		int si = 0, sj = 0;

-		while (1) {

-			if ( p[si] == _T('-') )

-				si++;

-			else

-				if ( !( p[sj++] = p[si++] ))

-					break;

-		};

-	}

-	else

-	{

-		TCHAR weekday[4], monthstr[4], timezonesign[2];

-		INT day, month, year, hour, min, sec, timezoneh, timezonem;

-		if (_tcsstr(p, _T(",")))

-		{

-			_stscanf( p, _T("%3s, %d %3s %d %d:%d:%d %1s%02d%02d"), &weekday, &day, &monthstr, &year, &hour, &min, &sec, &timezonesign, &timezoneh, &timezonem);

-			if (lstrcmpi(monthstr, _T("Jan")) ==0)

-				month = 1;

-			if (lstrcmpi(monthstr, _T("Feb")) ==0)

-				month = 2;

-			if (lstrcmpi(monthstr, _T("Mar")) ==0)

-				month = 3;

-			if (lstrcmpi(monthstr, _T("Apr")) ==0)

-				month = 4;

-			if (lstrcmpi(monthstr, _T("May")) ==0)

-				month = 5;

-			if (lstrcmpi(monthstr, _T("Jun")) ==0)

-				month = 6;

-			if (lstrcmpi(monthstr, _T("Jul")) ==0)

-				month = 7;

-			if (lstrcmpi(monthstr, _T("Aug")) ==0)

-				month = 8;

-			if (lstrcmpi(monthstr, _T("Sep")) ==0)

-				month = 9;

-			if (lstrcmpi(monthstr, _T("Oct")) ==0)

-				month = 10;

-			if (lstrcmpi(monthstr, _T("Nov")) ==0)

-				month = 11;

-			if (lstrcmpi(monthstr, _T("Dec")) ==0)

-				month = 12;

-			if (lstrcmp(timezonesign, _T("+")) ==0)

-				mir_sntprintf(p, 4+2+2+1+2+1+2+1+2+1, _T("%04d%02d%02dT%02d:%02d:%02d"), year, month, day, hour-timezoneh, min-timezonem, sec);

-			else if (lstrcmp(timezonesign, _T("-")) ==0)

-				mir_sntprintf(p, 4+2+2+1+2+1+2+1+2+1, _T("%04d%02d%02dT%02d:%02d:%02d"), year, month, day, hour+timezoneh, min+timezonem, sec);

-			else

-				mir_sntprintf(p, 4+2+2+1+2+1+2+1+2+1, _T("%04d%02d%02dT%02d:%02d:%02d"), year, month, day, hour, min, sec);

-		}

-		else

-		{

-			_stscanf( p, _T("%d-%d-%d %d:%d:%d %1s%02d%02d"), &year, &month, &day,  &hour, &min, &sec, &timezonesign, &timezoneh, &timezonem);

-			if (lstrcmp(timezonesign, _T("+")) ==0)

-				mir_sntprintf(p, 4+2+2+1+2+1+2+1+2+1, _T("%04d%02d%02dT%02d:%02d:%02d"), year, month, day, hour-timezoneh, min-timezonem, sec);

-			else if (lstrcmp(timezonesign, _T("-")) ==0)

-				mir_sntprintf(p, 4+2+2+1+2+1+2+1+2+1, _T("%04d%02d%02dT%02d:%02d:%02d"), year, month, day, hour+timezoneh, min+timezonem, sec);

-			else

-				mir_sntprintf(p, 4+2+2+1+2+1+2+1+2+1, _T("%04d%02d%02dT%02d:%02d:%02d"), year, month, day, hour, min, sec);

-		}

-	}

-	// Get the date part

-	for ( i=0; *p!='\0' && i<8 && isdigit( *p ); p++,i++ )

-		date[i] = *p;

-

-	// Parse year

-	if ( i == 6 ) {

-		// 2-digit year ( 1970-2069 )

-		y = ( date[0]-'0' )*10 + ( date[1]-'0' );

-		if ( y < 70 ) y += 100;

-	}

-	else if ( i == 8 ) {

-		// 4-digit year

-		y = ( date[0]-'0' )*1000 + ( date[1]-'0' )*100 + ( date[2]-'0' )*10 + date[3]-'0';

-		y -= 1900;

-	}

-	else

-		return ( time_t ) 0;

-	timestamp.tm_year = y;

-	// Parse month

-	timestamp.tm_mon = ( date[i-4]-'0' )*10 + date[i-3]-'0' - 1;

-	// Parse date

-	timestamp.tm_mday = ( date[i-2]-'0' )*10 + date[i-1]-'0';

-

-	// Skip any date/time delimiter

-	for ( ; *p!='\0' && !isdigit( *p ); p++ );

-

-	// Parse time

-	if ( _stscanf( p, _T("%d:%d:%d"), &timestamp.tm_hour, &timestamp.tm_min, &timestamp.tm_sec ) != 3 )

-		return ( time_t ) 0;

-

-	timestamp.tm_isdst = 0;	// DST is already present in _timezone below

-	t = mktime( &timestamp );

-

-	_tzset();

-	t -= _timezone;

-

-	if ( t >= 0 )

-		return t;

-	else

-		return ( time_t ) 0;

-}

-

-TCHAR* StrReplace (TCHAR* Search, TCHAR* Replace, TCHAR* Resource)

-{

-	int i = 0;

-	int SearchLen = (int)_tcslen(Search);

-	TCHAR* Work = mir_tstrdup(Replace);

-	int ReplaceLen = (int)_tcslen(Work);

-

-	TCHAR* Pointer = _tcsstr(Resource, Search);

-

-	while (Pointer != NULL)

-	{

-		int PointerLen = (int)_tcslen(Pointer);

-		int ResourceLen = (int)_tcslen(Resource);

-

-		TCHAR* NewText = (TCHAR*)mir_calloc((ResourceLen - SearchLen + ReplaceLen + 1)*sizeof(TCHAR));

-

-		_tcsncpy(NewText, Resource, ResourceLen - PointerLen);

-		_tcscat(NewText, Work);

-		_tcscat(NewText, Pointer + SearchLen);

-

-		Resource = (TCHAR*)mir_alloc((ResourceLen - SearchLen + ReplaceLen + 1)*sizeof(TCHAR));

-

-		for (i = 0; i < (ResourceLen - SearchLen + ReplaceLen); i++)

-			Resource[i] = NewText[i];

-		Resource[i] = 0;

-		mir_free(NewText);

-

-		Pointer = _tcsstr(Resource + (ResourceLen - PointerLen + ReplaceLen), Search);

-	}

-	mir_free(Work);

-

-	return Resource;

-}

-

-BOOL DownloadFile(LPCTSTR tszURL, LPCTSTR tszLocal)

-{

-	HANDLE hFile = NULL;

-	DWORD dwBytes;

-

-	NETLIBHTTPREQUEST nlhr = {0};

-	nlhr.cbSize = sizeof(nlhr);

-	nlhr.requestType = REQUEST_GET;

-	nlhr.flags = NLHRF_DUMPASTEXT | NLHRF_HTTP11;

-	char* szUrl = mir_t2a(tszURL);

-	nlhr.szUrl = szUrl;

-	nlhr.headersCount = 4;

-	nlhr.headers=(NETLIBHTTPHEADER*)mir_alloc(sizeof(NETLIBHTTPHEADER)*nlhr.headersCount);

-	nlhr.headers[0].szName   = "User-Agent";

-	nlhr.headers[0].szValue = "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)";

-	nlhr.headers[1].szName  = "Connection";

-	nlhr.headers[1].szValue = "close";

-	nlhr.headers[2].szName  = "Cache-Control";

-	nlhr.headers[2].szValue = "no-cache";

-	nlhr.headers[3].szName  = "Pragma";

-	nlhr.headers[3].szValue = "no-cache";

-

-	bool ret = false;

-	NETLIBHTTPREQUEST *pReply = (NETLIBHTTPREQUEST*)CallService(MS_NETLIB_HTTPTRANSACTION, (WPARAM)hNetlibUser,(LPARAM)&nlhr);

-

-	if(pReply)

-	{

-		if ((200 == pReply->resultCode) && (pReply->dataLength > 0)) 

-		{

-			char *date = NULL, *size = NULL;

-			for (int i = 0; i < pReply->headersCount; i++)

-			{

-				if (lstrcmpiA(pReply->headers[i].szName, "Last-Modified") == 0)

-				{

-					date = pReply->headers[i].szValue;

-					continue;

-				}

-				if (lstrcmpiA(pReply->headers[i].szName, "Content-Length") == 0)

-				{

-					size = pReply->headers[i].szValue;

-					continue;

-				}

-			}

-			if (date != NULL && size != NULL)

-			{

-				TCHAR *tdate = mir_a2t(date);

-				TCHAR *tsize = mir_a2t(size);

-				int fh;

-				struct _stat buf;

-

-		        fh = _topen(tszLocal, _O_RDONLY);

-				if (fh != -1)

-				{

-					_fstat(fh, &buf);

-					time_t modtime = DateToUnixTime(tdate, 0);

-					time_t filemodtime = mktime(localtime(&buf.st_atime));

-					if (modtime > filemodtime && buf.st_size != _ttoi(tsize))

-					{

-						hFile = CreateFile(tszLocal, GENERIC_READ | GENERIC_WRITE, NULL, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);

-						WriteFile(hFile, pReply->pData, (DWORD)pReply->dataLength, &dwBytes, NULL);

-						ret = true;

-					}

-					_close(fh);

-				}

-				else

-				{

-					hFile = CreateFile(tszLocal, GENERIC_READ | GENERIC_WRITE, NULL, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);

-					WriteFile(hFile, pReply->pData, (DWORD)pReply->dataLength, &dwBytes, NULL);

-					ret = true;

-				}

-				mir_free(tdate);

-				mir_free(tsize);

-			}

-			else

-			{

-				hFile = CreateFile(tszLocal, GENERIC_READ | GENERIC_WRITE, NULL, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);

-				WriteFile(hFile, pReply->pData, (DWORD)pReply->dataLength, &dwBytes, NULL);

-				ret = true;

-			}

-		}

-		CallService(MS_NETLIB_FREEHTTPREQUESTSTRUCT,0,(LPARAM)pReply);

-	}

-

-	mir_free(szUrl);

-	mir_free(nlhr.headers);

-

-	if (hFile)

-		CloseHandle(hFile);

-

-	return ret;

-}

-

-size_t PathToRelative(const TCHAR *pSrc, TCHAR *pOut)

-{	return CallService( MS_UTILS_PATHTORELATIVET, (WPARAM)pSrc, (LPARAM)pOut );

-}

-

-TCHAR* CheckFeed(TCHAR* tszURL, HWND hwndDlg)

-{

-	char *szData = NULL;

-	DBVARIANT dbVar = {0};

-	if (CallProtoService(MODULE, PS_GETSTATUS, 0, 0) != ID_STATUS_OFFLINE)

-	{

-		GetNewsData(tszURL, &szData, NULL, hwndDlg);

-		if (szData)

-		{

-			TCHAR *tszData = mir_a2t(szData);

-			int bytesParsed = 0;

-			HXML hXml = xi.parseString(tszData, &bytesParsed, NULL);

-			BOOL UtfEncode = FALSE;

-			TCHAR *newtszData = mir_utf8decodeT(szData);

-			if (newtszData)

-			{

-				UtfEncode = TRUE;

-				mir_free(newtszData);

-			}

-			mir_free(tszData);

-			mir_free(szData);

-			if(hXml != NULL)

-			{

-				int childcount = 0;

-				HXML node = xi.getChild(hXml, childcount);

-				while(node)

-				{

-					if (lstrcmpi(xi.getName(node), _T("rss")) == 0 || lstrcmpi(xi.getName(node), _T("rdf")) == 0)

-					{

-						HXML chan = xi.getChild(node, 0);

-						for (int j = 0; j < xi.getChildCount(chan); j++)

-						{

-							HXML child = xi.getChild(chan, j);

-							if (lstrcmpi(xi.getName(child), _T("title")) == 0)

-							{

-								TCHAR mes[MAX_PATH];

-								mir_sntprintf(mes, SIZEOF(mes), TranslateT("%s\nis a valid feed's address."), tszURL);

-								MessageBox(NULL, mes, TranslateT("New Aggregator"), MB_OK|MB_ICONINFORMATION);

-								TCHAR *tszTitle = (TCHAR*)xi.getText(child);

-								if (UtfEncode)

-								{

-									char* szstring = mir_t2a(tszTitle);

-									TCHAR* tszstring = mir_utf8decodeT(szstring);

-									tszTitle = (TCHAR*)mir_alloc(sizeof(TCHAR)*lstrlen(tszstring)+1);

-									_tcscpy(tszTitle, tszstring);

-									mir_free(tszstring);

-									mir_free(szstring);

-								}

-								return tszTitle;

-							}

-						}

-					}

-					else if (lstrcmpi(xi.getName(node), _T("feed")) == 0)

-					{

-						for (int j = 0; j < xi.getChildCount(node); j++)

-						{

-							HXML child = xi.getChild(node, j);

-							if (lstrcmpi(xi.getName(child), _T("title")) == 0)

-							{

-								TCHAR mes[MAX_PATH];

-								mir_sntprintf(mes, SIZEOF(mes), TranslateT("%s\nis a valid feed's address."), tszURL);

-								MessageBox(NULL, mes, TranslateT("New Aggregator"), MB_OK|MB_ICONINFORMATION);

-								TCHAR *tszTitle = (TCHAR*)xi.getText(child);

-								if (UtfEncode)

-								{

-									char* szstring = mir_t2a(tszTitle);

-									TCHAR* tszstring = mir_utf8decodeT(szstring);

-									tszTitle = (TCHAR*)mir_alloc(sizeof(TCHAR)*lstrlen(tszstring)+1);

-									_tcscpy(tszTitle, tszstring);

-									mir_free(tszstring);

-									mir_free(szstring);

-								}

-								return tszTitle;

-							}

-						}

-					}

-					childcount +=1;

-					node = xi.getChild(hXml, childcount);

-				}

-			}

-			xi.destroyNode(hXml);

-		}

-		else

-		{

-			TCHAR mes[MAX_PATH];

-			mir_sntprintf(mes, SIZEOF(mes), TranslateT("%s\nis a not valid feed's address."), tszURL);

-			MessageBox(NULL, mes, TranslateT("New Aggregator"), MB_OK|MB_ICONERROR);

-		}

-	}

-	return NULL;

-}

-

-VOID CheckCurrentFeed(HANDLE hContact)

-{

-	char *szData = NULL;

-	DBVARIANT dbURL = {0};

-	if (DBGetContactSettingTString(hContact, MODULE, "URL", &dbURL))

-		return;

-	else if ((DBGetContactSettingWord(hContact, MODULE, "Status", ID_STATUS_OFFLINE) != ID_STATUS_OFFLINE) && DBGetContactSettingByte(hContact, MODULE, "CheckState", 1) != 0)

-	{

-		GetNewsData(dbURL.ptszVal, &szData, hContact, NULL);

-		DBFreeVariant(&dbURL);

-		if (szData)

-		{

-			TCHAR *tszData = mir_a2t(szData);

-			int bytesParsed = 0;

-			HXML hXml = xi.parseString(tszData, &bytesParsed, NULL);

-			BOOL UtfEncode = FALSE;

-			TCHAR *newtszData = mir_utf8decodeT(szData);

-			if (newtszData)

-			{

-				UtfEncode = TRUE;

-				mir_free(newtszData);

-			}

-			mir_free(tszData);

-			mir_free(szData);

-			if(hXml != NULL)

-			{

-				int childcount = 0;

-				HXML node = xi.getChild(hXml, childcount);

-				while(node)

-				{

-					if (lstrcmpi(xi.getName(node), _T("rss")) == 0 || lstrcmpi(xi.getName(node), _T("rdf")) == 0)

-					{

-						if (lstrcmpi(xi.getName(node), _T("rss")) == 0)

-						{

-							for (int i = 0; i < xi.getAttrCount(node); i++)

-							{

-								if (lstrcmpi(xi.getAttrName(node, i), _T("version")) == 0)

-								{

-									TCHAR ver[MAX_PATH];

-									mir_sntprintf(ver, SIZEOF(ver), _T("RSS %s"), xi.getAttrValue(node, xi.getAttrName(node, i)));

-									DBWriteContactSettingTString(hContact, MODULE, "MirVer", ver);

-									break;

-								}

-							}

-						}

-						else if (lstrcmpi(xi.getName(node), _T("rdf")) == 0)

-						{

-							DBWriteContactSettingTString(hContact, MODULE, "MirVer", _T("RSS 1.0"));

-						}

-

-						HXML chan = xi.getChild(node, 0);

-						for (int j = 0; j < xi.getChildCount(chan); j++)

-						{

-							HXML child = xi.getChild(chan, j);

-							if (lstrcmpi(xi.getName(child), _T("title")) == 0 && xi.getText(child))

-							{

-								char* szstring = mir_t2a(xi.getText(child));

-								decode_html_entities_utf8(szstring, 0);

-								boost::regex xRegEx("<(.|\n)*?>");

-								std::string xStr(szstring);

-								strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-								if (UtfEncode)

-								{

-									TCHAR* tszstring = mir_utf8decodeT(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "FirstName", tszstring);

-									mir_free(tszstring);

-								}

-								else

-								{

-									TCHAR* tszstring = mir_a2t(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "FirstName", tszstring);

-									mir_free(tszstring);

-								}

-								mir_free(szstring);

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("link")) == 0)

-							{

-								DBWriteContactSettingTString(hContact, MODULE, "Homepage", xi.getText(child));

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("description")) == 0 && xi.getText(child))

-							{

-								char* szstring = mir_t2a(xi.getText(child));

-								decode_html_entities_utf8(szstring, 0);

-								boost::regex xRegEx("<(.|\n)*?>");

-								std::string xStr(szstring);

-								strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-								if (UtfEncode)

-								{

-									TCHAR* tszstring = mir_utf8decodeT(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "About", tszstring);

-									DBWriteContactSettingTString(hContact, "CList", "StatusMsg", tszstring);

-									mir_free(tszstring);

-								}

-								else

-								{

-									TCHAR* tszstring = mir_a2t(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "About", tszstring);

-									DBWriteContactSettingTString(hContact, "CList", "StatusMsg", tszstring);

-									mir_free(tszstring);

-								}

-								mir_free(szstring);

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("language")) == 0 && xi.getText(child))

-							{

-								char* szstring = mir_t2a(xi.getText(child));

-								decode_html_entities_utf8(szstring, 0);

-								boost::regex xRegEx("<(.|\n)*?>");

-								std::string xStr(szstring);

-								strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-								if (UtfEncode)

-								{

-									TCHAR* tszstring = mir_utf8decodeT(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "Language1", tszstring);

-									mir_free(tszstring);

-								}

-								else

-								{

-									TCHAR* tszstring = mir_a2t(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "Language1", tszstring);

-									mir_free(tszstring);

-								}

-								mir_free(szstring);

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("managingEditor")) == 0 && xi.getText(child))

-							{

-								char* szstring = mir_t2a(xi.getText(child));

-								decode_html_entities_utf8(szstring, 0);

-								boost::regex xRegEx("<(.|\n)*?>");

-								std::string xStr(szstring);

-								strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-								if (UtfEncode)

-								{

-									TCHAR* tszstring = mir_utf8decodeT(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "e-mail", tszstring);

-									mir_free(tszstring);

-								}

-								else

-								{

-									TCHAR* tszstring = mir_a2t(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "e-mail", tszstring);

-									mir_free(tszstring);

-								}

-								mir_free(szstring);

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("category")) == 0 && xi.getText(child))

-							{

-								char* szstring = mir_t2a(xi.getText(child));

-								decode_html_entities_utf8(szstring, 0);

-								boost::regex xRegEx("<(.|\n)*?>");

-								std::string xStr(szstring);

-								strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-								if (UtfEncode)

-								{

-									TCHAR* tszstring = mir_utf8decodeT(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "Interest0Text", tszstring);

-									mir_free(tszstring);

-								}

-								else

-								{

-									TCHAR* tszstring = mir_a2t(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "Interest0Text", tszstring);

-									mir_free(tszstring);

-								}

-								mir_free(szstring);

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("image")) == 0)

-							{

-								for (int x = 0; x < xi.getChildCount(child); x++)

-								{

-									HXML imageval = xi.getChild(child, x);

-									if (lstrcmpi(xi.getName(imageval), _T("url")) == 0)

-									{

-										LPCTSTR url = xi.getText(imageval);

-										DBWriteContactSettingTString(hContact, MODULE, "ImageURL", url);

-

-										PROTO_AVATAR_INFORMATIONT pai = {NULL};

-										pai.cbSize = sizeof(pai);

-										pai.hContact = hContact;

-										DBVARIANT dbVar = {0};

-

-										if (!DBGetContactSettingTString(hContact, MODULE, "Nick", &dbVar))

-										{

-											TCHAR *ext = _tcsrchr((TCHAR*)url, _T('.')) + 1;

-											pai.format = GetImageFormat(ext);

-

-											TCHAR *filename = dbVar.ptszVal;

-											mir_sntprintf(pai.filename, SIZEOF(pai.filename), _T("%s\\%s.%s"), tszRoot, filename, ext);

-											if (DownloadFile(url, pai.filename))

-											{

-												DBWriteContactSettingTString(hContact, MODULE, "ImagePath", pai.filename);

-												ProtoBroadcastAck(MODULE, hContact, ACKTYPE_AVATAR, ACKRESULT_SUCCESS, (HANDLE) &pai, NULL);

-											}

-											else

-												ProtoBroadcastAck(MODULE, hContact, ACKTYPE_AVATAR, ACKRESULT_FAILED, (HANDLE) &pai, NULL);

-											DBFreeVariant(&dbVar);

-											break;

-										}

-									}

-									else

-									{

-										DBDeleteContactSetting(hContact, MODULE, "ImageURL");

-										DBDeleteContactSetting(hContact, MODULE, "ImagePath");

-									}

-								}

-							}

-							if (lstrcmpi(xi.getName(child), _T("lastBuildDate")) == 0 && xi.getText(child))

-							{

-								TCHAR *lastupdtime = (TCHAR*)xi.getText(child);

-								time_t stamp = DateToUnixTime(lastupdtime, 0);

-								double deltaupd = difftime(time(NULL), stamp);

-								double deltacheck = difftime(time(NULL), DBGetContactSettingDword(hContact, MODULE, "LastCheck", 0));

-								if (deltaupd - deltacheck >= 0)

-								{

-									DBWriteContactSettingDword(hContact, MODULE, "LastCheck", time(NULL));

-									xi.destroyNode(hXml);

-									return;

-								}

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("item")) == 0)

-							{

-								TCHAR *title = NULL, *link = NULL, *datetime = NULL, *descr = NULL, *author = NULL, *comments = NULL, *guid = NULL, *category = NULL;

-								for (int z = 0; z < xi.getChildCount(child); z++)

-								{

-									HXML itemval = xi.getChild(child, z);

-									if (lstrcmpi(xi.getName(itemval), _T("title")) == 0)

-									{

-										title = (TCHAR*)xi.getText(itemval);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("link")) == 0)

-									{

-										link = (TCHAR*)xi.getText(itemval);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("pubDate")) == 0)

-									{

-										datetime = (TCHAR*)xi.getText(itemval);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("dc:date")) == 0)

-									{

-										datetime = (TCHAR*)xi.getText(itemval);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("description")) == 0)

-									{

-										descr = (TCHAR*)xi.getText(itemval);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("author")) == 0)

-									{

-										author = (TCHAR*)xi.getText(itemval);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("comments")) == 0)

-									{

-										comments = (TCHAR*)xi.getText(itemval);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("guid")) == 0)

-									{

-										guid = (TCHAR*)xi.getText(itemval);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("category")) == 0)

-									{

-										category = (TCHAR*)xi.getText(itemval);

-										continue;

-									}

-								}

-								TCHAR* message;

-								DBVARIANT dbMsg = {0};

-								if (DBGetContactSettingTString(hContact, MODULE, "MsgFormat", &dbMsg))

-									message = _T(TAGSDEFAULT);

-								else

-								{

-									message = (TCHAR*)mir_alloc(_tcslen(dbMsg.ptszVal)*sizeof(TCHAR));

-									memcpy(message, dbMsg.ptszVal, _tcslen(dbMsg.ptszVal)*sizeof(TCHAR));

-									message[_tcslen(dbMsg.ptszVal)] = 0;

-									DBFreeVariant(&dbMsg);

-								}

-								if (lstrcmp(title, NULL) == 0)

-									message = StrReplace(_T("#<title>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<title>#"), title, message);

-								if (lstrcmp(link, NULL) == 0)

-									message = StrReplace(_T("#<link>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<link>#"), link, message);

-								if (lstrcmp(descr, NULL) == 0)

-									message = StrReplace(_T("#<description>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<description>#"), descr, message);

-								if (lstrcmp(author, NULL) == 0)

-									message = StrReplace(_T("#<author>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<author>#"), author, message);

-								if (lstrcmp(comments, NULL) == 0)

-									message = StrReplace(_T("#<comments>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<comments>#"), comments, message);

-								if (lstrcmp(guid, NULL) == 0)

-									message = StrReplace(_T("#<guid>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<guid>#"), guid, message);

-								if (lstrcmp(category, NULL) == 0)

-									message = StrReplace(_T("#<category>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<category>#"), category, message);

-

-								message = StrReplace(_T("<br>"), _T("\n"), message);

-								message = StrReplace(_T("<br/>"), _T("\n"), message);

-								message = StrReplace(_T("<br />"), _T("\n"), message);

-

-								char* pszUtf;

-								if (!UtfEncode)

-									pszUtf = mir_utf8encodeT(message);

-								else

-									pszUtf = mir_t2a(message);

-								decode_html_entities_utf8(pszUtf, 0);

-								boost::regex xRegEx("<(.|\n)*?>");

-								std::string xStr(pszUtf);

-								strcpy(pszUtf, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-								xRegEx = "^\\s+";

-								xStr = pszUtf;

-								strcpy(pszUtf, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-

-								time_t stamp;

-								if (lstrcmpi(datetime, NULL) ==0)

-									stamp = time(NULL);

-								else

-									stamp = DateToUnixTime(datetime, 0);

-

-								DBEVENTINFO olddbei = { 0 };

-								HANDLE		hDbEvent = (HANDLE)CallService(MS_DB_EVENT_FINDFIRST, (WPARAM)hContact, 0);

-								BOOL MesExist = FALSE;

-								while(hDbEvent)

-								{

-									ZeroMemory(&olddbei, sizeof(olddbei));

-									olddbei.cbSize = sizeof(olddbei);

-									olddbei.cbBlob = CallService(MS_DB_EVENT_GETBLOBSIZE, (WPARAM)hDbEvent, 0);

-									olddbei.pBlob = (PBYTE)mir_alloc(olddbei.cbBlob);

-									CallService(MS_DB_EVENT_GET, (WPARAM)hDbEvent, (LPARAM)&olddbei);

-									if (olddbei.cbBlob == lstrlenA(pszUtf) + 1 && lstrcmpA((char*)olddbei.pBlob, pszUtf) == 0)

-										MesExist = TRUE;

-									hDbEvent = (HANDLE)CallService(MS_DB_EVENT_FINDNEXT, (WPARAM)hDbEvent, 0);

-									mir_free(olddbei.pBlob);

-								}

-

-								if (!MesExist)

-								{

-									DBEVENTINFO dbei = {0};

-									dbei.cbSize = sizeof(dbei);

-									dbei.eventType = EVENTTYPE_MESSAGE;

-									dbei.flags = DBEF_UTF;

-									dbei.szModule = MODULE;

-									dbei.timestamp = stamp;

-									dbei.cbBlob = lstrlenA(pszUtf) + 1;

-									dbei.pBlob = (PBYTE)pszUtf;

-									CallService(MS_DB_EVENT_ADD, (WPARAM)hContact, (LPARAM)&dbei);

-								}

-								mir_free(pszUtf);

-								mir_free(message);

-							}

-						}

-					}

-					else if (lstrcmpi(xi.getName(node), _T("feed")) == 0)

-					{

-						DBWriteContactSettingTString(hContact, MODULE, "MirVer", _T("Atom 3"));

-						for (int j = 0; j < xi.getChildCount(node); j++)

-						{

-							HXML child = xi.getChild(node, j);

-							if (lstrcmpi(xi.getName(child), _T("title")) == 0 && xi.getText(child))

-							{

-								char* szstring = mir_t2a(xi.getText(child));

-								decode_html_entities_utf8(szstring, 0);

-								boost::regex xRegEx("<(.|\n)*?>");

-								std::string xStr(szstring);

-								strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-								if (UtfEncode)

-								{

-									TCHAR* tszstring = mir_utf8decodeT(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "FirstName", tszstring);

-									mir_free(tszstring);

-								}

-								else

-								{

-									TCHAR* tszstring = mir_a2t(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "FirstName", tszstring);

-									mir_free(tszstring);

-								}

-								mir_free(szstring);

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("link")) == 0)

-							{

-								for (int x = 0; x < xi.getAttrCount(child); x++)

-								{

-									if (lstrcmpi(xi.getAttrName(child, x), _T("rel")) == 0)

-									{

-										if (lstrcmpi(xi.getAttrValue(child, xi.getAttrName(child, x)), _T("self")) == 0)

-											break;

-									}

-									if (lstrcmpi(xi.getAttrName(child, x), _T("href")) == 0)

-									{

-										DBWriteContactSettingTString(hContact, MODULE, "Homepage", xi.getAttrValue(child, xi.getAttrName(child, x)));

-									}

-								}

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("subtitle")) == 0 && xi.getText(child))

-							{

-								char* szstring = mir_t2a(xi.getText(child));

-								decode_html_entities_utf8(szstring, 0);

-								boost::regex xRegEx("<(.|\n)*?>");

-								std::string xStr(szstring);

-								strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-								if (UtfEncode)

-								{

-									TCHAR* tszstring = mir_utf8decodeT(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "About", tszstring);

-									DBWriteContactSettingTString(hContact, "CList", "StatusMsg", tszstring);

-									mir_free(tszstring);

-								}

-								else

-								{

-									TCHAR* tszstring = mir_a2t(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "About", tszstring);

-									DBWriteContactSettingTString(hContact, "CList", "StatusMsg", tszstring);

-									mir_free(tszstring);

-								}

-								mir_free(szstring);

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("language")) == 0 && xi.getText(child))

-							{

-								char* szstring = mir_t2a(xi.getText(child));

-								decode_html_entities_utf8(szstring, 0);

-								boost::regex xRegEx("<(.|\n)*?>");

-								std::string xStr(szstring);

-								strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-								if (UtfEncode)

-								{

-									TCHAR* tszstring = mir_utf8decodeT(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "Language1", tszstring);

-									mir_free(tszstring);

-								}

-								else

-								{

-									TCHAR* tszstring = mir_a2t(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "Language1", tszstring);

-									mir_free(tszstring);

-								}

-								mir_free(szstring);

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("author")) == 0)

-							{

-								for (int x = 0; x < xi.getChildCount(child); x++)

-								{

-									HXML authorval = xi.getChild(child, x);

-									if (lstrcmpi(xi.getName(authorval), _T("name")) == 0)

-									{

-										DBWriteContactSettingTString(hContact, MODULE, "e-mail", xi.getText(authorval));

-										break;

-									}

-								}

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("category")) == 0 && xi.getText(child))

-							{

-								char* szstring = mir_t2a(xi.getText(child));

-								decode_html_entities_utf8(szstring, 0);

-								boost::regex xRegEx("<(.|\n)*?>");

-								std::string xStr(szstring);

-								strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-								if (UtfEncode)

-								{

-									TCHAR* tszstring = mir_utf8decodeT(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "Interest0Text", tszstring);

-									mir_free(tszstring);

-								}

-								else

-								{

-									TCHAR* tszstring = mir_a2t(szstring);

-									DBWriteContactSettingTString(hContact, MODULE, "Interest0Text", tszstring);

-									mir_free(tszstring);

-								}

-								mir_free(szstring);

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("icon")) == 0)

-							{

-								for (int x = 0; x < xi.getChildCount(child); x++)

-								{

-									HXML imageval = xi.getChild(child, x);

-									if (lstrcmpi(xi.getName(imageval), _T("url")) == 0)

-									{

-										LPCTSTR url = xi.getText(imageval);

-										DBWriteContactSettingTString(hContact, MODULE, "ImageURL", url);

-

-										PROTO_AVATAR_INFORMATIONT pai = {NULL};

-										pai.cbSize = sizeof(pai);

-										pai.hContact = hContact;

-										DBVARIANT dbVar = {0};

-

-										if (!DBGetContactSettingTString(hContact, MODULE, "Nick", &dbVar))

-										{

-											TCHAR *ext = _tcsrchr((TCHAR*)url, _T('.')) + 1;

-											pai.format = GetImageFormat(ext);

-

-											TCHAR *filename = dbVar.ptszVal;

-											mir_sntprintf(pai.filename, SIZEOF(pai.filename), _T("%s\\%s.%s"), tszRoot, filename, ext);

-											if (DownloadFile(url, pai.filename))

-											{

-												DBWriteContactSettingTString(hContact, MODULE, "ImagePath", pai.filename);

-												ProtoBroadcastAck(MODULE, hContact, ACKTYPE_AVATAR, ACKRESULT_SUCCESS, (HANDLE) &pai, NULL);

-											}

-											else

-												ProtoBroadcastAck(MODULE, hContact, ACKTYPE_AVATAR, ACKRESULT_FAILED, (HANDLE) &pai, NULL);

-											DBFreeVariant(&dbVar);

-											break;

-										}

-									}

-									else

-									{

-										DBDeleteContactSetting(hContact, MODULE, "ImageURL");

-										DBDeleteContactSetting(hContact, MODULE, "ImagePath");

-									}

-								}

-							}

-							if (lstrcmpi(xi.getName(child), _T("updated")) == 0 && xi.getText(child))

-							{

-								TCHAR *lastupdtime = (TCHAR*)xi.getText(child);

-								time_t stamp = DateToUnixTime(lastupdtime, 1);

-								double deltaupd = difftime(time(NULL), stamp);

-								double deltacheck = difftime(time(NULL), DBGetContactSettingDword(hContact, MODULE, "LastCheck", 0));

-								if (deltaupd - deltacheck >= 0)

-								{

-									DBWriteContactSettingDword(hContact, MODULE, "LastCheck", time(NULL));

-									xi.destroyNode(hXml);

-									return;

-								}

-								continue;

-							}

-							if (lstrcmpi(xi.getName(child), _T("entry")) == 0)

-							{

-								TCHAR *title = NULL, *link = NULL, *datetime = NULL, *descr = NULL, *author = NULL, *comments = NULL, *guid = NULL, *category = NULL;

-								for (int z = 0; z < xi.getChildCount(child); z++)

-								{

-									HXML itemval = xi.getChild(child, z);

-									if (lstrcmpi(xi.getName(itemval), _T("title")) == 0 && xi.getText(itemval))

-									{

-										char* szstring = mir_t2a(xi.getText(itemval));

-										decode_html_entities_utf8(szstring, 0);

-										boost::regex xRegEx("<(.|\n)*?>");

-										std::string xStr(szstring);

-										strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-										title = mir_a2t(szstring);

-										mir_free(szstring);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("link")) == 0)

-									{

-										for (int x = 0; x < xi.getAttrCount(itemval); x++)

-										{

-											if (lstrcmpi(xi.getAttrName(itemval, x), _T("href")) == 0)

-											{

-												link = (TCHAR*)xi.getAttrValue(itemval, xi.getAttrName(itemval, x));

-												break;

-											}

-										}

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("updated")) == 0)

-									{

-										datetime = (TCHAR*)xi.getText(itemval);

-										continue;

-									}

-									if ((lstrcmpi(xi.getName(itemval), _T("summary")) == 0 || lstrcmpi(xi.getName(itemval), _T("content")) == 0) && xi.getText(itemval))

-									{

-										char* szstring = mir_t2a(xi.getText(itemval));

-										decode_html_entities_utf8(szstring, 0);

-										boost::regex xRegEx("<(.|\n)*?>");

-										std::string xStr(szstring);

-										strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-										descr = mir_a2t(szstring);

-										mir_free(szstring);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("author")) == 0)

-									{

-										for (int x = 0; x < xi.getChildCount(itemval); x++)

-										{

-											HXML authorval = xi.getChild(itemval, x);

-											if (lstrcmpi(xi.getName(authorval), _T("name")) == 0 && xi.getText(authorval))

-											{

-												char* szstring = mir_t2a(xi.getText(authorval));

-												decode_html_entities_utf8(szstring, 0);

-												boost::regex xRegEx("<(.|\n)*?>");

-												std::string xStr(szstring);

-												strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-												author = mir_a2t(szstring);

-												mir_free(szstring);

-												break;

-											}

-										}

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("comments")) == 0 && xi.getText(itemval))

-									{

-										char* szstring = mir_t2a(xi.getText(itemval));

-										decode_html_entities_utf8(szstring, 0);

-										boost::regex xRegEx("<(.|\n)*?>");

-										std::string xStr(szstring);

-										strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-										comments = mir_a2t(szstring);

-										mir_free(szstring);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("id")) == 0)

-									{

-										guid = (TCHAR*)xi.getText(itemval);

-										continue;

-									}

-									if (lstrcmpi(xi.getName(itemval), _T("category")) == 0)

-									{

-										for (int x = 0; x < xi.getAttrCount(itemval); x++)

-										{

-											if (lstrcmpi(xi.getAttrName(itemval, x), _T("term")) == 0 && xi.getText(itemval))

-											{

-												char* szstring = mir_t2a(xi.getAttrValue(itemval, xi.getAttrName(itemval, x)));

-												decode_html_entities_utf8(szstring, 0);

-												boost::regex xRegEx("<(.|\n)*?>");

-												std::string xStr(szstring);

-												strcpy(szstring, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-												category = mir_a2t(szstring);

-												mir_free(szstring);

-												break;

-											}

-										}

-										continue;

-									}

-								}

-								TCHAR* message;

-								DBVARIANT dbMsg = {0};

-								if (DBGetContactSettingTString(hContact, MODULE, "MsgFormat", &dbMsg))

-									message = _T(TAGSDEFAULT);

-								else

-								{

-									message = (TCHAR*)mir_alloc(_tcslen(dbMsg.ptszVal)*sizeof(TCHAR));

-									memcpy(message, dbMsg.ptszVal, _tcslen(dbMsg.ptszVal)*sizeof(TCHAR));

-									message[_tcslen(dbMsg.ptszVal)] = 0;

-									DBFreeVariant(&dbMsg);

-								}

-								if (lstrcmp(title, NULL) == 0)

-									message = StrReplace(_T("#<title>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<title>#"), title, message);

-								if (lstrcmp(link, NULL) == 0)

-									message = StrReplace(_T("#<link>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<link>#"), link, message);

-								if (lstrcmp(descr, NULL) == 0)

-									message = StrReplace(_T("#<description>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<description>#"), descr, message);

-								if (lstrcmp(author, NULL) == 0)

-									message = StrReplace(_T("#<author>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<author>#"), author, message);

-								if (lstrcmp(comments, NULL) == 0)

-									message = StrReplace(_T("#<comments>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<comments>#"), comments, message);

-								if (lstrcmp(guid, NULL) == 0)

-									message = StrReplace(_T("#<guid>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<guid>#"), guid, message);

-								if (lstrcmp(category, NULL) == 0)

-									message = StrReplace(_T("#<category>#"), TranslateT("empty"), message);

-								else

-									message = StrReplace(_T("#<category>#"), category, message);

-

-								message = StrReplace(_T("<br>"), _T("\n"), message);

-								message = StrReplace(_T("<br/>"), _T("\n"), message);

-								message = StrReplace(_T("<br />"), _T("\n"), message);

-

-								char* pszUtf;

-								if (!UtfEncode)

-									pszUtf = mir_utf8encodeT(message);

-								else

-									pszUtf = mir_t2a(message);

-								decode_html_entities_utf8(pszUtf, 0);

-								boost::regex xRegEx("<(.|\n)*?>");

-								std::string xStr(pszUtf);

-								strcpy(pszUtf, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-								xRegEx = "^\\s+";

-								xStr = pszUtf;

-								strcpy(pszUtf, boost::regex_replace(xStr, xRegEx, "", boost::match_default | boost::format_perl).c_str());

-

-								time_t stamp;

-								if (lstrcmpi(datetime, NULL) ==0)

-									stamp = time(NULL);

-								else

-									stamp = DateToUnixTime(datetime, 1);

-

-								DBEVENTINFO olddbei = { 0 };

-								HANDLE		hDbEvent = (HANDLE)CallService(MS_DB_EVENT_FINDFIRST, (WPARAM)hContact, 0);

-								BOOL MesExist = FALSE;

-								while(hDbEvent)

-								{

-									ZeroMemory(&olddbei, sizeof(olddbei));

-									olddbei.cbSize = sizeof(olddbei);

-									olddbei.cbBlob = CallService(MS_DB_EVENT_GETBLOBSIZE, (WPARAM)hDbEvent, 0);

-									olddbei.pBlob = (PBYTE)malloc(olddbei.cbBlob);

-									CallService(MS_DB_EVENT_GET, (WPARAM)hDbEvent, (LPARAM)&olddbei);

-									if (olddbei.cbBlob == lstrlenA(pszUtf) + 1 && lstrcmpA((char*)olddbei.pBlob, pszUtf) == 0)

-										MesExist = TRUE;

-									hDbEvent = (HANDLE)CallService(MS_DB_EVENT_FINDNEXT, (WPARAM)hDbEvent, 0);

-								}

-

-								if (!MesExist)

-								{

-									DBEVENTINFO dbei = {0};

-									dbei.cbSize = sizeof(dbei);

-									dbei.eventType = EVENTTYPE_MESSAGE;

-									dbei.flags = DBEF_UTF;

-									dbei.szModule = MODULE;

-									dbei.timestamp = stamp;

-									dbei.cbBlob = lstrlenA(pszUtf) + 1;

-									dbei.pBlob = (PBYTE)pszUtf;

-									CallService(MS_DB_EVENT_ADD, (WPARAM)hContact, (LPARAM)&dbei);

-								}

-								mir_free(pszUtf);

-							}

-						}

-					}

-					childcount +=1;

-					node = xi.getChild(hXml, childcount);

-				}

-				xi.destroyNode(hXml);

-			}

-		}

-		DBWriteContactSettingDword(hContact, MODULE, "LastCheck", time(NULL));

-	}

-}
\ No newline at end of file