adopted YahooGroups Plugin

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

1 files changed, 454 insertions, 0 deletions

diff --git a/plugins/YahooGroups/utils.cpp b/plugins/YahooGroups/utils.cpp
new file mode 100644
index 0000000000..d037d81a63
--- /dev/null
+++ b/plugins/YahooGroups/utils.cpp
@@ -0,0 +1,454 @@
+/*

+YahooGroups plugin for Miranda IM

+

+Copyright © 2007 Cristian Libotean

+

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

+

+int LogInit()

+{

+#ifdef USE_LOG

+	//FILE *fout = fopen(LOG_FILE, "wt");

+	//fclose(fout);

+	Log("********************** Miranda started **********************");

+#endif

+	return 0;

+}

+

+int Log(char *format, ...)

+{

+#ifdef USE_LOG

+	char		str[4096];

+	va_list	vararg;

+	int tBytes;

+	FILE *fout = fopen(LOG_FILE, "at");

+	if (!fout)

+		{

+//			MessageBox(0, "can't open file", NULL, MB_OK);

+			return -1;

+		}

+	time_t tNow = time(NULL);

+	struct tm *now = localtime(&tNow);

+	strftime(str, sizeof(str), "%d %b %Y @ %H:%M:%S: ", now);

+	fputs(str, fout);

+	va_start(vararg, format);

+	

+	tBytes = _vsnprintf(str, sizeof(str), format, vararg);

+	if (tBytes > 0)

+		{

+			str[tBytes] = 0;

+		}

+

+	va_end(vararg);

+	if (str[strlen(str) - 1] != '\n')

+		{

+			strcat(str, "\n");

+		}

+	fputs(str, fout);

+	fclose(fout);

+#endif

+	return 0;

+}

+

+int Info(char *title, char *format, ...)

+{

+	char str[4096];

+	va_list vararg;

+	int tBytes;

+	va_start(vararg, format);

+	tBytes = _vsnprintf(str, sizeof(str), format, vararg);

+	if (tBytes > 0)

+		{

+			str[tBytes] = 0;

+		}

+	va_end(vararg);

+	return MessageBoxA(0, str, title, MB_OK | MB_ICONINFORMATION);		

+}

+

+int MyPUShowMessage(char *lpzText, BYTE kind)

+{

+	if (ServiceExists(MS_POPUP_SHOWMESSAGE))

+	{

+		return PUShowMessage(lpzText, kind);

+	}

+	else{

+		char *title = (kind == SM_NOTIFY) ? Translate("Notify") : Translate("Warning");

+		

+		return MessageBox(NULL, lpzText, title, MB_OK | (kind == SM_NOTIFY) ? MB_ICONINFORMATION : MB_ICONEXCLAMATION);

+	}

+}

+

+#define HEX_SIZE 8

+

+char *BinToHex(int size, PBYTE data)

+{

+	char *szresult = NULL;

+	char buffer[32] = {0}; //should be more than enough

+	int maxSize = size * 2 + HEX_SIZE + 1;

+	szresult = (char *) new char[ maxSize ];

+	memset(szresult, 0, maxSize);

+	sprintf(buffer, "%0*X", HEX_SIZE, size);

+	strcpy(szresult, buffer);

+	int i;

+	for (i = 0; i < size; i++)

+		{

+			sprintf(buffer, "%02X", data[i]);

+			strcpy(szresult + (HEX_SIZE + i * 2), buffer);

+		}

+	return szresult; 

+}

+

+void HexToBin(char *inData, ULONG &size, LPBYTE &outData)

+{

+	char buffer[32] = {0};

+	strcpy(buffer, "0x");

+	STRNCPY(buffer + 2, inData, HEX_SIZE);

+	sscanf(buffer, "%x", &size);

+	outData = (unsigned char*)new char[size*2];

+	UINT i;

+	//size = i;

+	char *tmp = inData + HEX_SIZE;

+	buffer[4] = '\0'; //mark the end of the string

+	for (i = 0; i < size; i++)

+		{

+			STRNCPY(buffer + 2, &tmp[i * 2], 2);

+			sscanf(buffer, "%x", &outData[i]);

+		}

+	i = size;

+}

+

+int GetStringFromDatabase(HANDLE hContact, char *szModule, char *szSettingName, char *szError, char *szResult, int size)

+{

+	DBVARIANT dbv = {0};

+	int res = 1;

+	int len;

+	dbv.type = DBVT_ASCIIZ;

+	if (db_get_ts(hContact, szModule, szSettingName, &dbv) == 0)

+		{

+			res = 0;

+			int tmp = strlen(dbv.pszVal);

+			len = (tmp < size - 1) ? tmp : size - 1;

+			strncpy(szResult, dbv.pszVal, len);

+			szResult[len] = '\0';

+			mir_free(dbv.pszVal);

+		}

+		else{

+			res = 1;

+			if (szError)

+				{

+					int tmp = strlen(szError);

+					len = (tmp < size - 1) ? tmp : size - 1;

+					strncpy(szResult, szError, len);

+					szResult[len] = '\0';

+				}

+				else{

+					szResult[0] = '\0';

+				}

+		}

+	return res;

+}

+

+int GetStringFromDatabase(HANDLE hContact, char *szModule, char *szSettingName, WCHAR *szError, WCHAR *szResult, int count)

+{

+	DBVARIANT dbv = {0};

+	int res = 1;

+	int len;

+	dbv.type = DBVT_WCHAR;

+	if (DBGetContactSettingWString(hContact, szModule, szSettingName, &dbv) == 0)

+		{

+			res = 0;

+			if (dbv.type != DBVT_WCHAR)

+			{

+				MultiByteToWideChar(CP_ACP, 0, dbv.pszVal, -1, szResult, count);

+			}

+			else{

+				int tmp = wcslen(dbv.pwszVal);

+				len = (tmp < count - 1) ? tmp : count - 1;

+				wcsncpy(szResult, dbv.pwszVal, len);

+				szResult[len] = L'\0';

+			}

+			mir_free(dbv.pwszVal);

+		}

+		else{

+			res = 1;

+			if (szError)

+				{

+					int tmp = wcslen(szError);

+					len = (tmp < count - 1) ? tmp : count - 1;

+					wcsncpy(szResult, szError, len);

+					szResult[len] = L'\0';

+				}

+				else{

+					szResult[0] = L'\0';

+				}

+		}

+	return res;

+}

+

+int GetStringFromDatabase(char *szSettingName, char *szError, char *szResult, int size)

+{

+	return GetStringFromDatabase(NULL, ModuleName, szSettingName, szError, szResult, size);

+}

+

+int GetStringFromDatabase(char *szSettingName, WCHAR *szError, WCHAR *szResult, int count)

+{

+	return GetStringFromDatabase(NULL, ModuleName, szSettingName, szError, szResult, count);

+}

+

+#pragma warning (disable: 4312) 

+TCHAR *GetContactName(HANDLE hContact, char *szProto)

+{

+	CONTACTINFO ctInfo;

+	char proto[200];

+	

+	ZeroMemory((void *) &ctInfo, sizeof(ctInfo));	

+	ctInfo.cbSize = sizeof(ctInfo);

+	if (szProto)

+		{

+			ctInfo.szProto = szProto;

+		}

+		else{

+			GetContactProtocol(hContact, proto, sizeof(proto));

+			ctInfo.szProto = proto;

+		}

+	ctInfo.dwFlag = CNF_DISPLAY | CNF_TCHAR;

+	ctInfo.hContact = hContact;

+	//_debug_message("retrieving contact name for %d", hContact);

+	INT_PTR ret = CallService(MS_CONTACT_GETCONTACTINFO, 0, (LPARAM) &ctInfo);

+	//_debug_message("	contact name %s", ctInfo.pszVal);

+	TCHAR *buffer;

+	if (!ret)

+		{

+			buffer = _tcsdup(ctInfo.pszVal);

+		}

+	mir_free(ctInfo.pszVal);

+	if (!ret)

+		{

+			return buffer;

+		}

+		else{

+			return NULL;

+		}

+	return buffer;

+}

+#pragma warning (default: 4312)

+

+#pragma warning (disable: 4312) 

+void GetContactProtocol(HANDLE hContact, char *szProto, int size)

+{

+	GetStringFromDatabase(hContact, "Protocol", "p", NULL, szProto, size);

+}

+#pragma warning (default: 4312)

+

+#pragma warning (disable: 4312)

+TCHAR *GetContactID(HANDLE hContact)

+{

+	char protocol[256];

+	GetContactProtocol(hContact, protocol, sizeof(protocol));

+

+	return GetContactID(hContact, protocol);

+}

+

+TCHAR *GetContactID(HANDLE hContact, char *szProto)

+{

+	CONTACTINFO ctInfo;

+

+	ZeroMemory((void *) &ctInfo, sizeof(ctInfo));	

+	ctInfo.cbSize = sizeof(ctInfo);

+	ctInfo.szProto = szProto;

+	ctInfo.dwFlag = CNF_DISPLAY | CNF_TCHAR;

+	ctInfo.hContact = hContact;

+	INT_PTR ret = CallService(MS_CONTACT_GETCONTACTINFO, 0, (LPARAM) &ctInfo);

+	TCHAR *buffer;

+	if (!ret)

+		{

+			TCHAR tmp[16];

+			switch (ctInfo.type)

+				{

+					case CNFT_BYTE:

+						{

+							_stprintf(tmp, _T("%d"), ctInfo.bVal);

+							buffer = _tcsdup(tmp);

+						

+							break;

+						}

+						

+					case CNFT_WORD:

+						{

+							_stprintf(tmp, _T("%d"), ctInfo.wVal);

+							buffer = _tcsdup(tmp);

+						

+							break;

+						}

+						

+					case CNFT_DWORD:

+						{

+							_stprintf(tmp, _T("%ld"), ctInfo.dVal);

+							buffer = _tcsdup(tmp);

+							

+							break;

+						}

+						

+					case CNFT_ASCIIZ:

+					default:

+						{

+							buffer = _tcsdup(ctInfo.pszVal);

+							

+							break;

+						}

+				}

+				

+

+		}

+	mir_free(ctInfo.pszVal);

+	if (!ret)

+		{

+			return buffer;

+		}

+		else{

+			return NULL;

+		}

+}

+#pragma warning (default: 4312)

+

+#pragma warning (disable: 4312)

+HANDLE GetContactFromID(TCHAR *szID, char *szProto)

+{

+	HANDLE hContact = db_find_first();

+	TCHAR *szHandle;

+	TCHAR dispName[1024];

+	char cProtocol[256];

+	char *tmp;

+

+	int found = 0;

+	while (hContact)

+	{

+		GetContactProtocol(hContact, cProtocol, sizeof(cProtocol));

+		szHandle = GetContactID(hContact, cProtocol);

+		

+		tmp = (char *) CallService(MS_CLIST_GETCONTACTDISPLAYNAME, (WPARAM) hContact, 0);

+		STRNCPY(dispName, tmp, sizeof(dispName));

+		

+		if ((szHandle) && ((_tcsicmp(szHandle, szID) == 0) || (_tcsicmp(dispName, szID) == 0)) && ((szProto == NULL) || (_stricmp(szProto, cProtocol) == 0)))

+		{

+			found = 1;

+		}

+		if (szHandle) { free(szHandle); }

+	

+		if (found) { break; }

+		hContact = db_find_next(hContact);

+	}

+	

+	return hContact;

+}

+#pragma warning (default: 4312)

+

+#pragma warning (disable: 4312)

+HANDLE GetContactFromID(TCHAR *szID, wchar_t *szProto)

+{

+	char protocol[1024];

+	WideCharToMultiByte(CP_ACP, 0, szProto, -1, protocol, sizeof(protocol), NULL, NULL);

+	return GetContactFromID(szID, protocol);

+}

+#pragma warning (default: 4312)

+

+void ScreenToClient(HWND hWnd, LPRECT rect)

+{

+	POINT pt;

+	int cx = rect->right - rect->left;

+	int cy = rect->bottom - rect->top;

+	pt.x = rect->left;

+	pt.y = rect->top;

+	ScreenToClient(hWnd, &pt);

+	rect->left = pt.x;

+	rect->top = pt.y;

+	rect->right = pt.x + cx;

+	rect->bottom = pt.y + cy;

+}

+

+void AnchorMoveWindow(HWND window, const WINDOWPOS *parentPos, int anchors)

+{

+	RECT rParent;

+	RECT rChild;

+	

+	if (parentPos->flags & SWP_NOSIZE)

+		{

+			return;

+		}

+	GetWindowRect(parentPos->hwnd, &rParent);

+	rChild = AnchorCalcPos(window, &rParent, parentPos, anchors);

+	MoveWindow(window, rChild.left, rChild.top, rChild.right - rChild.left, rChild.bottom - rChild.top, FALSE);

+}

+

+RECT AnchorCalcPos(HWND window, const RECT *rParent, const WINDOWPOS *parentPos, int anchors)

+{

+	RECT rChild;

+	RECT rTmp;

+

+	GetWindowRect(window, &rChild);

+	ScreenToClient(parentPos->hwnd, &rChild);

+

+	int cx = rParent->right - rParent->left;

+	int cy = rParent->bottom - rParent->top;

+	if ((cx == parentPos->cx) && (cy == parentPos->cy))

+		{

+			return rChild;

+		}

+	if (parentPos->flags & SWP_NOSIZE)

+		{

+			return rChild;

+		}

+

+	rTmp.left = parentPos->x - rParent->left;

+	rTmp.right = (parentPos->x + parentPos->cx) - rParent->right;

+	rTmp.bottom = (parentPos->y + parentPos->cy) - rParent->bottom;

+	rTmp.top = parentPos->y - rParent->top;

+	

+	cx = (rTmp.left) ? -rTmp.left : rTmp.right;

+	cy = (rTmp.top) ? -rTmp.top : rTmp.bottom;	

+	

+	rChild.right += cx;

+	rChild.bottom += cy;

+	//expanded the window accordingly, now we need to enforce the anchors

+	if ((anchors & ANCHOR_LEFT) && (!(anchors & ANCHOR_RIGHT)))

+		{

+			rChild.right -= cx;

+		}

+	if ((anchors & ANCHOR_TOP) && (!(anchors & ANCHOR_BOTTOM)))

+		{

+			rChild.bottom -= cy;

+		}

+	if ((anchors & ANCHOR_RIGHT) && (!(anchors & ANCHOR_LEFT)))

+		{

+			rChild.left += cx;

+		}

+	if ((anchors & ANCHOR_BOTTOM) && (!(anchors & ANCHOR_TOP)))

+		{

+			rChild.top += cy;

+		}

+	return rChild;

+}

+

+inline char *STRNCPY(char *output, const char *input, size_t size)

+{

+	char *res = strncpy(output, input, size);

+	output[size - 1] = 0;

+	

+	return res;

+}
\ No newline at end of file