first version of WebView that compiles in Unicode (but certaily doesn't work)

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

1 files changed, 393 insertions, 696 deletions

diff --git a/plugins/WebView/src/webview_services.cpp b/plugins/WebView/src/webview_services.cpp
index 884408e8cd..1992092f8c 100644
--- a/plugins/WebView/src/webview_services.cpp
+++ b/plugins/WebView/src/webview_services.cpp
@@ -1,772 +1,469 @@
 /*

- * A plugin for Miranda IM which displays web page text in a window Copyright 

- * (C) 2005 Vincent Joyce.

- * 

- * Miranda IM: the free icq client for MS Windows  Copyright (C) 2000-2

- * Richard Hughes, Roland Rabien & Tristan Van de Vreede

- * 

- * 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. 

- */

+* A plugin for Miranda IM which displays web page text in a window Copyright 

+* (C) 2005 Vincent Joyce.

+* 

+* Miranda IM: the free icq client for MS Windows  Copyright (C) 2000-2

+* Richard Hughes, Roland Rabien & Tristan Van de Vreede

+* 

+* 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 "stdafx.h"

+#include "webview.h"

 

-static int      searchId = -1;

-static char     sID[32];

+static int searchId = -1;

+static TCHAR sID[32];

+

+/*****************************************************************************/

+static char szInvalidChars[] = { '\\', '/', ':', '*', '?', '\"', '<', '>', '|' };

 

-/************************/

 int DBSettingChanged(WPARAM wParam, LPARAM lParam)

 {

-

-   DBCONTACTWRITESETTING *cws = (DBCONTACTWRITESETTING *) lParam;

-   char *invalidchar;

-

-   // We can't upload changes to NULL contact

-   if ((HANDLE) wParam == NULL)

-      return 0;

-

-   if (!strcmp(cws->szModule, "CList"))

-   {

-      HANDLE hContact;

-      DBVARIANT       dbv;

-      char*szProto;

-      FILE  *pcachefile;

-      char cachepath[MAX_PATH];

-  

-      char cachedirectorypath[MAX_PATH];

-  

-      char newcachepath[MAX_PATH + 50];

-      char renamedcachepath[MAX_PATH + 50];

-      char*cacheend;

-      char OLDcontactname[100];

-      char NEWcontactname[100];

-       int ranNum;

-      char ranStr[7];

-      int invalidpresent = 0;

-

-      

-      hContact = (HANDLE) wParam;

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

-      if (szProto == NULL || strcmp(szProto, MODULENAME))

-         return 0;

-

-      // A contact is renamed

-      if (!strcmp(cws->szSetting, "MyHandle"))

-      {

-         hContact = (HANDLE) wParam;

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

-         if (szProto == NULL || strcmp(szProto, MODULENAME))

- return 0;

-///////

-         if (!DBGetContactSetting(hContact, MODULENAME, PRESERVE_NAME_KEY, &dbv))

-         {

- char nick[100];

-

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

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

-

- DBFreeVariant(&dbv);

-

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

-

- DBGetContactSetting(hContact, "CList", "MyHandle", &dbv);

- _snprintf(nick, sizeof(nick), "%s", dbv.pszVal);

- DBFreeVariant(&dbv);

-

- DBGetContactSetting((HANDLE) wParam, MODULENAME, PRESERVE_NAME_KEY, &dbv);

- _snprintf(OLDcontactname, sizeof(OLDcontactname), "%s", dbv.pszVal);

- DBFreeVariant(&dbv);

-

-  	if (strchr(nick, '\\') != NULL)

-  	{

-		     WErrorPopup("ERROR", Translate("Invalid symbol present in contact name."));

-		      invalidchar = strchr(nick, '\\');

-  *invalidchar = '_';

-  invalidpresent =1;

- }

- 

- if (strchr(nick, '/') != NULL)

- {

-  WErrorPopup("ERROR", Translate("Invalid symbol present in contact name."));

-		      invalidchar = strchr(nick, '/');

-  *invalidchar = '_';

-  invalidpresent =1;

- } 

- 

- if (strchr(nick, ':') != NULL)

- {

-  WErrorPopup("ERROR", Translate("Invalid symbol present in contact name."));

-		      invalidchar = strchr(nick, ':');

-  *invalidchar = '_';

-  invalidpresent =1;

-  }

-

- if (strchr(nick, '*') != NULL)

- {

-  WErrorPopup("ERROR", Translate("Invalid symbol present in contact name."));

-  invalidchar = strchr(nick, '*');

-  *invalidchar = '_';

-  invalidpresent =1;

-  }

-

- if (strchr(nick, '?') != NULL)

- {

-  WErrorPopup("ERROR", Translate("Invalid symbol present in contact name."));

-  invalidchar = strchr(nick, '?');

-  *invalidchar = '_';

-  invalidpresent =1;

-  }

-

- if (strchr(nick, '\"') != NULL)

- {

- WErrorPopup("ERROR", Translate("Invalid symbol present in contact name."));

- invalidchar = strchr(nick, '\"');

-  *invalidchar = '_';

-  invalidpresent =1;

- }

-

- if (strchr(nick, '<') != NULL)

- {

-   WErrorPopup("ERROR", Translate("Invalid symbol present in contact name."));

-   invalidchar = strchr(nick, '<');

-  *invalidchar = '_';

-  invalidpresent =1;

-   }

-       

- if (strchr(nick, '>') != NULL)

- {

-  WErrorPopup("ERROR", Translate("Invalid symbol present in contact name."));

-	 invalidchar = strchr(nick, '>');

-  *invalidchar = '_';

-  invalidpresent =1;

-  }

-

- if (strchr(nick, '|') != NULL)

- {

-   WErrorPopup("ERROR", Translate("Invalid symbol present in contact name."));

-   invalidchar = strchr(nick, '|');

-  *invalidchar = '_';

-  invalidpresent =1;

-   }

-  

-  if(invalidpresent)

-  {

-      srand((unsigned) time(NULL));

-      ranNum = (int) 10000 *rand() / (RAND_MAX + 1.0);

-      _snprintf(ranStr, sizeof(ranStr), "%d", ranNum);

-      strcat(nick, ranStr); 

-  }  

- 

-  

-

- if (((strchr(nick, '(')) == 0))

- {

-   db_set_s(hContact, MODULENAME, PRESERVE_NAME_KEY, nick);

-   db_set_s(hContact, MODULENAME, "Nick", nick);

-   db_set_s(hContact, "CList", "MyHandle", nick);

- }

- DBGetContactSetting((HANDLE) wParam, MODULENAME, PRESERVE_NAME_KEY, &dbv);

- _snprintf(NEWcontactname, sizeof(NEWcontactname), "%s", dbv.pszVal);

- DBFreeVariant(&dbv);

-

-//

-

- // TEST GET NAME FOR CACHE

- GetModuleFileName(hInst, cachepath, sizeof(cachepath));

- cacheend = strrchr(cachepath, '\\');

- cacheend++;

- *cacheend = '\0';

- _snprintf(cachedirectorypath, sizeof(cachedirectorypath), "%s%s%s", cachepath, MODULENAME, "cache\\");

- CreateDirectory(cachedirectorypath, NULL);

-       

- 

- 

- _snprintf(newcachepath, sizeof(newcachepath), "%s%s%s%s%s", cachepath, MODULENAME, "cache\\", OLDcontactname, ".txt");

- _snprintf(renamedcachepath, sizeof(newcachepath), "%s%s%s%s%s", cachepath, MODULENAME, "cache\\", NEWcontactname, ".txt");

- 

- 

- 

- // file exists?

- if ((_access(newcachepath, 0)) != -1)

- {

-   if ((pcachefile = fopen(newcachepath, "r")) != NULL)

-   {

-      fclose(pcachefile);

-      if (lstrcmp(newcachepath, renamedcachepath))

-      {

-         MoveFile(newcachepath, renamedcachepath);

-         db_set_s(hContact, MODULENAME, CACHE_FILE_KEY, renamedcachepath);

-      }

-         

-   }

- }

-//

-

-         }

-////////     

-      }

-   }

-   return 0;

+	// We can't upload changes to NULL contact

+	HANDLE hContact = (HANDLE)wParam;

+	if (hContact == NULL)

+		return 0;

+

+	DBCONTACTWRITESETTING *cws = (DBCONTACTWRITESETTING *) lParam;

+	if (!strcmp(cws->szModule, "CList")) {

+		int invalidpresent = 0;

+

+		char *szProto = GetContactProto(hContact);

+		if (szProto == NULL || strcmp(szProto, MODULENAME))

+			return 0;

+

+		// A contact is renamed

+		if (!strcmp(cws->szSetting, "MyHandle")) {

+			ptrT oldName( db_get_tsa(hContact, MODULENAME, PRESERVE_NAME_KEY));

+			if (oldName == NULL)

+				return 0;

+

+			TCHAR nick[100];

+			ptrT oldnick( db_get_tsa(hContact, "CList", "MyHandle"));

+			if (oldnick != NULL)

+				_tcsncpy_s(nick, SIZEOF(nick), oldnick, _TRUNCATE);

+			else

+				nick[0] = 0;

+

+			for (int i=0; i < SIZEOF(szInvalidChars); i++ ) {

+				TCHAR *p = _tcschr(nick, szInvalidChars[i]);

+				if (p != NULL) {

+					WErrorPopup("ERROR", TranslateT("Invalid symbol present in contact name."));

+					*p = '_';

+					invalidpresent =1;

+				}

+			}

+

+			if (invalidpresent) {

+				srand((unsigned)time(NULL));

+				TCHAR ranStr[7];

+				_itot((int)10000 *rand() / (RAND_MAX + 1.0), ranStr, 10);

+				_tcscat(nick, ranStr); 

+			}  

+

+			if ( _tcschr(nick, '(') == 0) {

+				db_set_ts(hContact, MODULENAME, PRESERVE_NAME_KEY, nick);

+				db_set_ts(hContact, MODULENAME, "Nick", nick);

+				db_set_ts(hContact, "CList", "MyHandle", nick);

+			}

+

+			// TEST GET NAME FOR CACHE

+			TCHAR cachepath[MAX_PATH], cachedirectorypath[MAX_PATH];

+			GetModuleFileName(hInst, cachepath, SIZEOF(cachepath));

+			TCHAR *cacheend = _tcsrchr(cachepath, '\\');

+			cacheend++;

+			*cacheend = '\0';

+			mir_sntprintf(cachedirectorypath, SIZEOF(cachedirectorypath), _T("%s%S%S"), cachepath, MODULENAME, "cache\\");

+			CreateDirectory(cachedirectorypath, NULL);

+

+			TCHAR newcachepath[MAX_PATH + 50], renamedcachepath[MAX_PATH + 50];

+			mir_sntprintf(newcachepath, SIZEOF(newcachepath), _T("%s%S%S%s%S"), cachepath, MODULENAME, "cache\\", oldName, ".txt");

+			mir_sntprintf(renamedcachepath, SIZEOF(newcachepath), _T("%s%S%S%s%S"), cachepath, MODULENAME, "cache\\", nick, ".txt");

+

+			// file exists?

+			if ( _taccess(newcachepath, 0) != -1) {

+				FILE *pcachefile = _tfopen(newcachepath, _T("r"));

+				if (pcachefile != NULL) {

+					fclose(pcachefile);

+					if (lstrcmp(newcachepath, renamedcachepath)) {

+						MoveFile(newcachepath, renamedcachepath);

+						db_set_ts(hContact, MODULENAME, CACHE_FILE_KEY, renamedcachepath);

+					}

+				}

+			}

+		}

+	}

+	return 0;

 }

-/************************/

 

-/************************/

+/*****************************************************************************/

 int SiteDeleted(WPARAM wParam, LPARAM lParam)

 {

-   FILE  *pcachefile;

-   char cachepath[MAX_PATH];

-   char cachedirectorypath[MAX_PATH];

-   char newcachepath[MAX_PATH + 50];

-   char*cacheend;

-   char contactname[100];

-   DBVARIANT       dbv;

-

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

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

-

-   if (lstrcmp((char *) CallService(MS_PROTO_GETCONTACTBASEPROTO, wParam, 0), MODULENAME))

-      return 0;

-

-   DBGetContactSetting((HANDLE) wParam, MODULENAME, PRESERVE_NAME_KEY, &dbv);

-   _snprintf(contactname, sizeof(contactname), "%s", dbv.pszVal);

-   DBFreeVariant(&dbv);

-

-   // TEST GET NAME FOR CACHE

-   GetModuleFileName(hInst, cachepath, sizeof(cachepath));

-   cacheend = strrchr(cachepath, '\\');

-   cacheend++;

-   *cacheend = '\0';

-

-   _snprintf(cachedirectorypath, sizeof(cachedirectorypath), "%s%s%s", cachepath, MODULENAME, "cache\\");

-   CreateDirectory(cachedirectorypath, NULL);

-   _snprintf(newcachepath, sizeof(newcachepath), "%s%s%s%s%s", cachepath, MODULENAME, "cache\\", contactname, ".txt");

-   // file exists?

-   if ((_access(newcachepath, 0)) != -1)

-   {

-      if ((pcachefile = fopen(newcachepath, "r")) != NULL)

-      {

-         fclose(pcachefile);

-         DeleteFile(newcachepath);

-         db_set_s((HANDLE) wParam, MODULENAME, CACHE_FILE_KEY, "");

-      }

-   }

-   return 0;

+	HANDLE hContact = (HANDLE)wParam;

+	if (lstrcmpA(GetContactProto(hContact), MODULENAME))

+		return 0;

+

+	ptrT contactName( db_get_tsa(hContact, MODULENAME, PRESERVE_NAME_KEY));

+

+	// TEST GET NAME FOR CACHE

+	TCHAR cachepath[MAX_PATH], cachedirectorypath[MAX_PATH], newcachepath[MAX_PATH + 50];

+	GetModuleFileName(hInst, cachepath, SIZEOF(cachepath));

+	TCHAR *cacheend = _tcsrchr(cachepath, '\\');

+	cacheend++;

+	*cacheend = '\0';

+

+	mir_sntprintf(cachedirectorypath, SIZEOF(cachedirectorypath), _T("%s%S%S"), cachepath, MODULENAME, "cache\\");

+	CreateDirectory(cachedirectorypath, NULL);

+	mir_sntprintf(newcachepath, SIZEOF(newcachepath), _T("%s%S%S%s%S"), cachepath, MODULENAME, "cache\\", contactName, ".txt");

+	// file exists?

+	if ( _taccess(newcachepath, 0) != -1) {

+		FILE *pcachefile = _tfopen(newcachepath, _T("r"));

+		if (pcachefile != NULL) {

+			fclose(pcachefile);

+			DeleteFile(newcachepath);

+			db_set_s(hContact, MODULENAME, CACHE_FILE_KEY, "");

+		}

+	}

+	return 0;

 }

-/************************/

 

-/************************/

+/*****************************************************************************/

 INT_PTR OpenCacheDir(WPARAM wParam, LPARAM lParam)

 {

-      char cachepath[MAX_PATH];

-      char cachedirectorypath[MAX_PATH];

-      char*cacheend;

-      DIR *pdir = NULL;

-  

-

- //GET NAME FOR CACHE

- GetModuleFileName(hInst, cachepath, sizeof(cachepath));

- cacheend = strrchr(cachepath, '\\');

- cacheend++;

- *cacheend = '\0';

-

- _snprintf(cachedirectorypath, sizeof(cachedirectorypath), "%s%s%s%s", cachepath, MODULENAME, "cache\\", cacheend);

- 

- 	  if((pdir = opendir(cachedirectorypath)) == NULL)

-       {

-		         WErrorPopup("ERROR", Translate("Cache folder does not exist."));

-     return 0;

-       }

- 

- ShellExecute(NULL, "open", cachedirectorypath, NULL, NULL, SW_SHOWNORMAL);

-

-   return 0;

+	//GET NAME FOR CACHE

+	TCHAR cachepath[MAX_PATH], cachedirectorypath[MAX_PATH];

+	GetModuleFileName(hInst, cachepath, sizeof(cachepath));

+	TCHAR *cacheend = _tcsrchr(cachepath, '\\');

+	cacheend++;

+	*cacheend = '\0';

+

+	mir_sntprintf(cachedirectorypath, SIZEOF(cachedirectorypath), _T("%s%S%S%s"), cachepath, MODULENAME, "cache\\", cacheend);

+

+	if( _taccess(cachedirectorypath, 0) != 0)

+		WErrorPopup("ERROR", TranslateT("Cache folder does not exist."));

+	else

+		ShellExecute(NULL, _T("open"), cachedirectorypath, NULL, NULL, SW_SHOWNORMAL);

+	return 0;

 }

-/************************/

-/************************/

+

+/*****************************************************************************/

 INT_PTR PingWebsiteMenuCommand(WPARAM wParam, LPARAM lParam)

 {

-   DBVARIANT       dbv;

-   char url[300];

-   static char    *Newnick;

-   static char    *Oldnick;

-   char*Nend;

-   char Cnick[255];

-   FILE  *pfile = NULL;

-  

-  	if ((pfile = fopen("psite.bat", "r")) == NULL)

-  	{

-    WErrorPopup("ERROR", Translate("Missing \"psite.bat\" file."));

-    return 0;

-    }

-

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

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

-   

-   DBGetContactSetting((HANDLE) wParam, MODULENAME, "URL", &dbv);

-    wsprintf(url, "%s", dbv.pszVal);

-	DBFreeVariant(&dbv);

-	

-	   strncpy(Cnick, url, sizeof(Cnick));

-   Oldnick = strdup(Cnick);

-

-    /**/

-      if ((strstr(Cnick, "://")) != 0)

-   {

-      Oldnick = strstr(Cnick, "://");

-      Oldnick = Oldnick + 3;

-   } else if ((strstr(Cnick, "://")) == 0)

-   {

-      strcpy(Oldnick, Cnick);

-   }

-   

-      Newnick = strdup(Oldnick);

-      if (strchr(Newnick, '/'))

-      {

-         Nend = strchr(Newnick, '/');

-         *Nend = '\0';

-      }

-   

-    //MessageBox(NULL, Newnick, MODULENAME, MB_OK);   

- 

-  ShellExecute(NULL, "open", "psite.bat", Newnick, NULL, SW_HIDE);

-  

-

-   return 0;

+	FILE *pfile = fopen("psite.bat", "r");

+	if (pfile == NULL) {

+		WErrorPopup("ERROR", TranslateT("Missing \"psite.bat\" file."));

+		return 0;

+	}

+

+	ptrT url( db_get_tsa((HANDLE) wParam, MODULENAME, "URL"));

+	if (url == NULL)

+		return 0;

+

+	TCHAR Cnick[200], *Oldnick;

+	_tcsncpy(Cnick, url, sizeof(Cnick));

+	if ((Oldnick = _tcsstr(Cnick, _T("://"))) != 0)

+		Oldnick += 3;

+	else 

+		Oldnick = Cnick;

+

+	TCHAR *Nend = _tcschr(Oldnick, '/');

+	if (Nend) *Nend = '\0';

+

+	ShellExecute(NULL, _T("open"), _T("psite.bat"), Oldnick, NULL, SW_HIDE);

+	return 0;

 }

-/************************/

-

 

-/************************/

+/*****************************************************************************/

 INT_PTR StpPrcssMenuCommand(WPARAM wParam, LPARAM lParam)

 {

-   DBVARIANT       dbv;

-

-  db_set_b((HANDLE) wParam, MODULENAME, STOP_KEY, 1);  

-

-   return 0;

+	db_set_b((HANDLE)wParam, MODULENAME, STOP_KEY, 1);  

+	return 0;

 }

-/************************/

-

-

 

 //=======================================================

 // GetCaps

 // =======================================================

 

-int GetCaps(WPARAM wParam, LPARAM lParam)

+INT_PTR GetCaps(WPARAM wParam, LPARAM lParam)

 {

-   int ret = 0;

-

-   if (wParam == PFLAGNUM_1)

-      ret = PF1_BASICSEARCH | PF1_ADDSEARCHRES | PF1_VISLIST;

-

-   if (wParam == PFLAGNUM_2)

-   {

-      if (!(db_get_b(NULL, MODULENAME, HIDE_STATUS_ICON_KEY, 0)))

-         return PF2_ONLINE | PF2_SHORTAWAY | PF2_LONGAWAY | PF2_LIGHTDND | PF2_HEAVYDND; // add 

-      // the

-      // possible

-      // statuses here

-

-   }

-   if (wParam == PFLAG_UNIQUEIDTEXT)

-      ret = (int) Translate("Site URL");

-

-   if (wParam == PFLAGNUM_3)

-      ret = 0;

-      

-      

-      if (wParam == PFLAGNUM_5)

-			ret = PF2_INVISIBLE|PF2_SHORTAWAY|PF2_LONGAWAY|PF2_LIGHTDND|PF2_HEAVYDND|PF2_FREECHAT|

-				PF2_OUTTOLUNCH|PF2_ONTHEPHONE;

-				

-   if (wParam == PFLAG_UNIQUEIDSETTING)

-      ret = (int) "PreserveName";

-

-   return ret;

+	if (wParam == PFLAGNUM_1)

+		return PF1_BASICSEARCH | PF1_ADDSEARCHRES | PF1_VISLIST;

+

+	if (wParam == PFLAGNUM_2)

+		if (!(db_get_b(NULL, MODULENAME, HIDE_STATUS_ICON_KEY, 0)))

+			return PF2_ONLINE | PF2_SHORTAWAY | PF2_LONGAWAY | PF2_LIGHTDND | PF2_HEAVYDND; // add 

+

+	if (wParam == PFLAG_UNIQUEIDTEXT)

+		return (INT_PTR)Translate("Site URL");

+

+	if (wParam == PFLAGNUM_3)

+		return 0;

+

+	if (wParam == PFLAGNUM_5)

+		return PF2_INVISIBLE|PF2_SHORTAWAY|PF2_LONGAWAY|PF2_LIGHTDND|PF2_HEAVYDND|PF2_FREECHAT|PF2_OUTTOLUNCH|PF2_ONTHEPHONE;

+

+	if (wParam == PFLAG_UNIQUEIDSETTING)

+		return (INT_PTR)"PreserveName";

+

+	return 0;

 }

 

-//=======================================================

 // =======================================================

 // GetName

 // =======================================================

-int GetName(WPARAM wParam, LPARAM lParam)

+

+INT_PTR GetName(WPARAM wParam, LPARAM lParam)

 {

-   lstrcpyn((char *) lParam, MODULENAME, wParam);

-   return 0;

+	lstrcpynA((char*) lParam, MODULENAME, wParam);

+	return 0;

 }

+

 //=======================================================

 // SetStatus

 // =======================================================

-int SetStatus(WPARAM wParam, LPARAM lParam)

+

+INT_PTR SetStatus(WPARAM wParam, LPARAM lParam)

 {

-   int oldStatus;

-   DBVARIANT       dbv;

-

-   oldStatus = bpStatus;

-   char*szProto;

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

-

-   if (wParam == ID_STATUS_ONLINE)

-   {

-      wParam = ID_STATUS_ONLINE;

-   } else if (wParam == ID_STATUS_OFFLINE)

-   {

-      wParam = ID_STATUS_OFFLINE;

-   } else

-   {

-      wParam = ID_STATUS_ONLINE;

-   }

-   // broadcast the message

-   bpStatus = wParam;

-

-   ProtoBroadcastAck(MODULENAME, NULL, ACKTYPE_STATUS, ACKRESULT_SUCCESS, (HANDLE) oldStatus, wParam);

-

-    /**/

-   // Make sure no contact has offline status for any reason on first time

-   // run     

-      if (DBGetContactSetting(NULL, MODULENAME, "FirstTime", &dbv))

-   {

-      while (hContact)

-      {

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

-         if (szProto != NULL && !lstrcmp(MODULENAME, szProto))

-         {

- db_set_w(hContact, MODULENAME, "Status", ID_STATUS_ONLINE);

-         }

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

-      }

-      if (DBGetContactSetting(NULL, MODULENAME, "FirstTime", &dbv))

-         db_set_b(NULL, MODULENAME, "FirstTime", 1);

-   }

-   DBFreeVariant(&dbv);

-    /**/

-

-      if (bpStatus == ID_STATUS_OFFLINE)

-      db_set_b(NULL, MODULENAME, OFFLINE_STATUS, 1);

-   else

-      db_set_b(NULL, MODULENAME, OFFLINE_STATUS, 0);

-

-   return 0;

+	int oldStatus = bpStatus;

+

+	if (wParam == ID_STATUS_ONLINE)

+		wParam = ID_STATUS_ONLINE;

+	else if (wParam == ID_STATUS_OFFLINE)

+		wParam = ID_STATUS_OFFLINE;

+	else

+		wParam = ID_STATUS_ONLINE;

+

+	// broadcast the message

+	bpStatus = wParam;

+

+	ProtoBroadcastAck(MODULENAME, NULL, ACKTYPE_STATUS, ACKRESULT_SUCCESS, (HANDLE) oldStatus, wParam);

+

+	// Make sure no contact has offline status for any reason on first time run     

+	if ( db_get_b(NULL, MODULENAME, "FirstTime", 100) == 100) {

+		for (HANDLE hContact = db_find_first(MODULENAME); hContact != NULL; hContact = db_find_next(hContact, MODULENAME))

+			db_set_w(hContact, MODULENAME, "Status", ID_STATUS_ONLINE);

+

+		db_set_b(NULL, MODULENAME, "FirstTime", 1);

+	}

+

+	db_set_b(NULL, MODULENAME, OFFLINE_STATUS, bpStatus == ID_STATUS_OFFLINE);

+	return 0;

 }

+

 //=======================================================

 // GetStatus

 // =======================================================

 

-int GetStatus(WPARAM wParam, LPARAM lParam)

+INT_PTR GetStatus(WPARAM wParam, LPARAM lParam)

 {

-

-   if (bpStatus == ID_STATUS_ONLINE)

-      return ID_STATUS_ONLINE;

-   else if (bpStatus == ID_STATUS_AWAY)

-      return ID_STATUS_AWAY;

-   else if (bpStatus == ID_STATUS_NA)

-      return ID_STATUS_NA;

-   else if (bpStatus == ID_STATUS_OCCUPIED)

-      return ID_STATUS_OCCUPIED;

-   else if (bpStatus == ID_STATUS_DND)

-      return ID_STATUS_DND;

-   else

-      return ID_STATUS_OFFLINE;

-

+	if (bpStatus == ID_STATUS_ONLINE)

+		return ID_STATUS_ONLINE;

+	if (bpStatus == ID_STATUS_AWAY)

+		return ID_STATUS_AWAY;

+	if (bpStatus == ID_STATUS_NA)

+		return ID_STATUS_NA;

+	if (bpStatus == ID_STATUS_OCCUPIED)

+		return ID_STATUS_OCCUPIED;

+	if (bpStatus == ID_STATUS_DND)

+		return ID_STATUS_DND;

+	return ID_STATUS_OFFLINE;

 }

 

 //=======================================================

 // BPLoadIcon

 // =======================================================

 

-int BPLoadIcon(WPARAM wParam, LPARAM lParam)

+INT_PTR BPLoadIcon(WPARAM wParam, LPARAM lParam)

 {

-   UINT id;

-

-   switch (wParam & 0xFFFF)

-   {

-   case PLI_PROTOCOL:

-      id = IDI_SITE;

-      break;

-   default:

-      return (int) (HICON) NULL;

-   }

-   return (int) LoadImage(hInst, MAKEINTRESOURCE(id), IMAGE_ICON, GetSystemMetrics(wParam & PLIF_SMALL ? SM_CXSMICON : SM_CXICON), GetSystemMetrics(wParam & PLIF_SMALL ? SM_CYSMICON : SM_CYICON), 0);

+	UINT id;

+

+	switch (wParam & 0xFFFF) {

+	case PLI_PROTOCOL:

+		id = IDI_SITE;

+		break;

+	default:

+		return 0;

+	}

+	return (INT_PTR)LoadImage(hInst, MAKEINTRESOURCE(id), IMAGE_ICON,

+		GetSystemMetrics(wParam & PLIF_SMALL ? SM_CXSMICON : SM_CXICON),

+		GetSystemMetrics(wParam & PLIF_SMALL ? SM_CYSMICON : SM_CYICON), 0);

 }

 

-/*******************/

+/*****************************************************************************/

 static void __cdecl BasicSearchTimerProc(void *pszNick)

 {

-   PROTOSEARCHRESULT psr;

-

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

-   psr.cbSize = sizeof(psr);

-   psr.nick = (char *) pszNick;

-   // 

+	PROTOSEARCHRESULT psr = { sizeof(psr) };

+	psr.nick = (TCHAR*) pszNick;

 

-   // broadcast the search result

-   ProtoBroadcastAck(MODULENAME, NULL, ACKTYPE_SEARCH, ACKRESULT_DATA, (HANDLE) 1, (LPARAM) & psr);

-   ProtoBroadcastAck(MODULENAME, NULL, ACKTYPE_SEARCH, ACKRESULT_SUCCESS, (HANDLE) 1, 0);

+	// broadcast the search result

+	ProtoBroadcastAck(MODULENAME, NULL, ACKTYPE_SEARCH, ACKRESULT_DATA, (HANDLE)1, (LPARAM)&psr);

+	ProtoBroadcastAck(MODULENAME, NULL, ACKTYPE_SEARCH, ACKRESULT_SUCCESS, (HANDLE)1, 0);

 

-   // exit the search

-   searchId = -1;

+	// exit the search

+	searchId = -1;

 }

 

-/*******************/

-

-/*******************/

-int BasicSearch(WPARAM wParam, LPARAM lParam)

+INT_PTR BasicSearch(WPARAM wParam, LPARAM lParam)

 {

-   static char     buf[300];

-   

+	static TCHAR buf[300];

 

-   if (lParam)

-      lstrcpyn(buf, (const char *) lParam, 256);

-   // 

+	if (lParam)

+		lstrcpyn(buf, (const TCHAR*) lParam, 256);

 

-   if (searchId != -1)

-      return 0; // only one search at a time

+	if (searchId != -1)

+		return 0; // only one search at a time

 

-   lstrcpyn(sID, (char *) lParam, sizeof(sID));

-   searchId = 1;

-   // create a thread for the ID search

-   forkthread(BasicSearchTimerProc, 0, &buf);

+	lstrcpyn(sID, (TCHAR*)lParam, SIZEOF(sID));

+	searchId = 1;

 

-   return searchId;

+	// create a thread for the ID search

+	mir_forkthread(BasicSearchTimerProc, &buf);

+	return searchId;

 }

-/*******************/

 

-/*******************/

-int AddToList(WPARAM wParam, LPARAM lParam)

+/*****************************************************************************/

+INT_PTR AddToList(WPARAM wParam, LPARAM lParam)

 {

-   PROTOSEARCHRESULT *psr = (PROTOSEARCHRESULT *) lParam;

-   DBVARIANT       dbv;

-   static char    *Newnick;

-   static char    *Oldnick;

-   char*Nend;

-   char Cnick[255];

-   int sameurl = 0;

-   int samename = 0;

-

-

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

-

-

-   // search for existing contact

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

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

-   char*szProto;

-

-

-    

- 

-

-   while (hContact != NULL)

-   {

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

-      // check if it is a webview contact

-      if (szProto != NULL && !lstrcmp(MODULENAME, szProto))

-      {

-         // check ID to see if the contact already exist in the database

-

-         if (!DBGetContactSetting(hContact, MODULENAME, "URL", &dbv))

-         {

- if (!lstrcmpi(psr->nick, dbv.pszVal))

- {

-   // remove the flag for not on list and hidden, thus make the

-   // contact visible

-   // and add them on the list

-   sameurl++;

-   if (db_get_b(hContact, "CList", "NotOnList", 1))

-   {

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

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

-   }

-   DBFreeVariant(&dbv);

- }

-         }

-         DBFreeVariant(&dbv);

-         

-      }

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

-   }

-

-

- 

-   if (psr->nick == NULL)

-  {

-     WErrorPopup("ERROR", Translate("Please select site in Find/Add Contacts..."));

-     return;

-  }   

- 

-   // if contact with the same ID was not found, add it

-   if (psr->cbSize != sizeof(PROTOSEARCHRESULT))

-      return (int) (HANDLE) NULL;

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

-   CallService(MS_PROTO_ADDTOCONTACT, (WPARAM) hContact, (LPARAM) MODULENAME);

-   

-

-/////////write to db

-   db_set_b(hContact, MODULENAME, ON_TOP_KEY, 0);

-   db_set_b(hContact, MODULENAME, DBLE_WIN_KEY, 1);

-   db_set_s(hContact, MODULENAME, END_STRING_KEY, "");

-   db_set_b(hContact, MODULENAME, RWSPACE_KEY, 1);

-  

- 

-

-

-//Convert url into a name for contact

-///

-  if (psr->nick != NULL)

-  strncpy(Cnick, psr->nick, sizeof(Cnick));// this crashes

-///   

- 

-   Oldnick = strdup(Cnick);

-

-

-    /**/

-      if ((strstr(Cnick, "://")) != 0)

-   {

-      Oldnick = strstr(Cnick, "://");

-      Oldnick = Oldnick + 3;

-

-   } else if ((strstr(Cnick, "://")) == 0)

-   {

-      strcpy(Oldnick, Cnick);

- 

-   }

-   if ((strstr(Oldnick, "www.")) != 0)

-   {

-      Newnick = strstr(Oldnick, "www.");

-      Newnick = Newnick + 4;

-      Nend = strchr(Newnick, '.');

-      *Nend = '\0';

-    

-   } else if ((strstr(Oldnick, "WWW.")) != 0)

-   {

-      Newnick = strstr(Oldnick, "WWW.");

-      Newnick = Newnick + 4;

-      Nend = strchr(Newnick, '.');

-      *Nend = '\0';

-       

-   } else

-   {

-       

-      Newnick = strdup(Oldnick);

-      if (strchr(Newnick, '.'))

-      {

-         Nend = strchr(Newnick, '.');

-         *Nend = '\0';

-  

-      }

-   }

-   

-

-   while (hContact2 != NULL)

-   {

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

-      // check if it is a webview contact

-      if (szProto != NULL && !lstrcmp(MODULENAME, szProto))

-      {

-         // check ID to see if the contact already exist in the database

-

-   

-		 

-		  if (!DBGetContactSetting(hContact2, MODULENAME, PRESERVE_NAME_KEY, &dbv))

-         {

- if (!lstrcmpi(Newnick, dbv.pszVal))

- {

-   // remove the flag for not on list and hidden, thus make the

-   // contact visible

-   // and add them on the list

-   samename++;

-   if (db_get_b(hContact2, "CList", "NotOnList", 1))

-   {

-      DBDeleteContactSetting(hContact2, "CList", "NotOnList");

-      DBDeleteContactSetting(hContact2, "CList", "Hidden");

-   }

-   DBFreeVariant(&dbv);

- }

-         }

-         DBFreeVariant(&dbv);

-

-      }

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

-   }

-

-

-   

-   if ((sameurl > 0) || (samename > 0)) // contact has the same url or name as another contact, add rand

-        // num to name

-

-   {

-      int ranNum;

-      char ranStr[7];

-

-      srand((unsigned) time(NULL));

-

-      ranNum = (int) 10000 *rand() / (RAND_MAX + 1.0);

-

-      _snprintf(ranStr, sizeof(ranStr), "%d", ranNum);

-      strcat(Newnick, ranStr);

-   }

-//end convert

-

-   db_set_s(hContact, "CList", "MyHandle", Newnick);

-   db_set_s(hContact, MODULENAME, PRESERVE_NAME_KEY, Newnick);

-   db_set_s(hContact, MODULENAME, "Nick", Newnick);

-   db_set_b(hContact, MODULENAME, CLEAR_DISPLAY_KEY, 1);

-   db_set_s(hContact, MODULENAME, START_STRING_KEY, "");

-   db_set_s(hContact, MODULENAME, URL_KEY, psr->nick);

-   db_set_s(hContact, MODULENAME, "Homepage", psr->nick);

-   db_set_b(hContact, MODULENAME, U_ALLSITE_KEY, 1);

-   db_set_w(hContact, MODULENAME, "Status", ID_STATUS_ONLINE);

-////////////////////////

-

-

-

-   // ignore status change

-   db_set_dw(hContact, "Ignore", "Mask", 8);

-

-   Sleep(2);

-

-   DBFreeVariant(&dbv);

-

-   

-   return (int) hContact;

+	PROTOSEARCHRESULT *psr = (PROTOSEARCHRESULT *) lParam;

+	DBVARIANT dbv;

+	TCHAR Cnick[255];

+	int sameurl = 0;

+	int samename = 0;

+

+	ZeroMemory(&Cnick, sizeof(Cnick));

+

+	// search for existing contact

+	HANDLE hContact;

+	for (hContact = db_find_first(MODULENAME); hContact != NULL; hContact = db_find_next(hContact, MODULENAME)) {

+		// check ID to see if the contact already exist in the database

+		if (!db_get_ts(hContact, MODULENAME, "URL", &dbv)) {

+			if (!lstrcmpi(psr->nick, dbv.ptszVal)) {

+				// remove the flag for not on list and hidden, thus make the

+				// contact visible

+				// and add them on the list

+				sameurl++;

+				if (db_get_b(hContact, "CList", "NotOnList", 1)) {

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

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

+				}

+				db_free(&dbv);

+			}

+		}

+		db_free(&dbv);

+	}

+

+	if (psr->nick == NULL) {

+		WErrorPopup("ERROR", TranslateT("Please select site in Find/Add Contacts..."));

+		return 0;

+	}   

+

+	// if contact with the same ID was not found, add it

+	if (psr->cbSize != sizeof(PROTOSEARCHRESULT))

+		return NULL;

+

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

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

+

+	/////////write to db

+	db_set_b(hContact, MODULENAME, ON_TOP_KEY, 0);

+	db_set_b(hContact, MODULENAME, DBLE_WIN_KEY, 1);

+	db_set_s(hContact, MODULENAME, END_STRING_KEY, "");

+	db_set_b(hContact, MODULENAME, RWSPACE_KEY, 1);

+

+	//Convert url into a name for contact

+	if (psr->nick != NULL)

+		_tcsncpy(Cnick, psr->nick, SIZEOF(Cnick));

+

+	TCHAR *Oldnick = _tcsstr(Cnick, _T("://"));

+	if (Oldnick != 0)

+		Oldnick += 3;

+	else

+		Oldnick = Cnick;

+

+	TCHAR *Newnick = _tcsstr(Oldnick, _T("www."));

+	if (Newnick != 0)

+		Newnick += 4;

+	else {

+		Newnick = _tcsstr(Oldnick, _T("WWW."));

+		if (Newnick != 0)

+			Newnick += 4;

+		else

+			Newnick = Oldnick;

+	}

+

+	TCHAR *Nend = _tcschr(Newnick, '.');

+	*Nend = '\0';

+

+	for (HANDLE hContact2 = db_find_first(MODULENAME); hContact2 != NULL; hContact2 = db_find_next(hContact2, MODULENAME)) {

+		if (!db_get_ts(hContact2, MODULENAME, PRESERVE_NAME_KEY, &dbv)) {

+			if (!lstrcmpi(Newnick, dbv.ptszVal)) {

+				// remove the flag for not on list and hidden, thus make the

+				// contact visible

+				// and add them on the list

+				samename++;

+				if (db_get_b(hContact2, "CList", "NotOnList", 1)) {

+					db_unset(hContact2, "CList", "NotOnList");

+					db_unset(hContact2, "CList", "Hidden");

+				}

+				db_free(&dbv);

+			}

+		}

+		db_free(&dbv);

+	}

+

+	if ((sameurl > 0) || (samename > 0)) // contact has the same url or name as another contact, add rand num to name

+	{

+		srand((unsigned) time(NULL));

+		

+		TCHAR ranStr[10];

+		_itot((int) 10000 *rand() / (RAND_MAX + 1.0), ranStr, 10);

+		_tcscat(Newnick, ranStr);

+	}

+	//end convert

+

+	db_set_ts(hContact, "CList", "MyHandle", Newnick);

+	db_set_ts(hContact, MODULENAME, PRESERVE_NAME_KEY, Newnick);

+	db_set_ts(hContact, MODULENAME, "Nick", Newnick);

+	db_set_b(hContact, MODULENAME, CLEAR_DISPLAY_KEY, 1);

+	db_set_s(hContact, MODULENAME, START_STRING_KEY, "");

+	db_set_ts(hContact, MODULENAME, URL_KEY, psr->nick);

+	db_set_ts(hContact, MODULENAME, "Homepage", psr->nick);

+	db_set_b(hContact, MODULENAME, U_ALLSITE_KEY, 1);

+	db_set_w(hContact, MODULENAME, "Status", ID_STATUS_ONLINE);

+

+	// ignore status change

+	db_set_dw(hContact, "Ignore", "Mask", 8);

+

+	Sleep(2);

+

+	db_free(&dbv);

+

+

+	return (int) hContact;

 }

-/*******************/

 

-/*******************/

-int GetInfo(WPARAM wParam, LPARAM lParam)

+/*****************************************************************************/

+INT_PTR GetInfo(WPARAM wParam, LPARAM lParam)

 {

-   forkthread(AckFunc, 0, NULL);

-   return 1;

+	mir_forkthread(AckFunc, NULL);

+	return 1;

 }

-/*******************/

-/*******************/

+

+/*****************************************************************************/

 void AckFunc(void *dummy)

 {

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

-   char*szProto;

-

-   while (hContact != NULL)

-   {

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

-      // 

-      if (szProto != NULL && !lstrcmp(MODULENAME, szProto))

-         ProtoBroadcastAck(MODULENAME, hContact, ACKTYPE_GETINFO, ACKRESULT_SUCCESS, (HANDLE) 1, 0);

-      // 

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

-   }

-

+	for (HANDLE hContact = db_find_first(MODULENAME); hContact != NULL; hContact = db_find_next(hContact, MODULENAME))

+		ProtoBroadcastAck(MODULENAME, hContact, ACKTYPE_GETINFO, ACKRESULT_SUCCESS, (HANDLE)1, 0);

 }

-/*******************/

-