initial commit

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

2 files changed, 441 insertions, 0 deletions

diff --git a/src/modules/srauth/auth.cpp b/src/modules/srauth/auth.cpp
new file mode 100644
index 0000000000..d62c4af4f4
--- /dev/null
+++ b/src/modules/srauth/auth.cpp
@@ -0,0 +1,129 @@
+/*

+

+Miranda IM: the free IM client for Microsoft* Windows*

+

+Copyright 2000-2009 Miranda ICQ/IM project, 

+all portions of this codebase are copyrighted to the people 

+listed in contributors.txt.

+

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

+

+#define MS_AUTH_SHOWREQUEST	"Auth/ShowRequest"

+#define MS_AUTH_SHOWADDED	"Auth/ShowAdded"

+

+INT_PTR CALLBACK DlgProcAuthReq(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam);

+INT_PTR CALLBACK DlgProcAdded(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam);

+

+INT_PTR ShowReqWindow(WPARAM, LPARAM lParam)

+{

+	CreateDialogParam(hMirandaInst, MAKEINTRESOURCE(IDD_AUTHREQ), NULL, DlgProcAuthReq,

+		(LPARAM)((CLISTEVENT *)lParam)->hDbEvent);

+	return 0;

+}

+

+INT_PTR ShowAddedWindow(WPARAM, LPARAM lParam)

+{

+	CreateDialogParam(hMirandaInst, MAKEINTRESOURCE(IDD_ADDED), NULL, DlgProcAdded,

+		(LPARAM)((CLISTEVENT *)lParam)->hDbEvent);

+	return 0;

+}

+

+static int AuthEventAdded(WPARAM, LPARAM lParam)

+{

+    TCHAR szUid[128] = _T("");

+	TCHAR szTooltip[256];

+	const HANDLE hDbEvent = (HANDLE)lParam;

+

+	DBEVENTINFO dbei = {0};

+	dbei.cbSize = sizeof(dbei);

+	CallService(MS_DB_EVENT_GET,(WPARAM)lParam,(LPARAM)&dbei);

+	if (dbei.flags & (DBEF_SENT | DBEF_READ) || 

+		(dbei.eventType != EVENTTYPE_AUTHREQUEST && dbei.eventType != EVENTTYPE_ADDED)) 

+		return 0;

+

+	dbei.cbBlob = CallService(MS_DB_EVENT_GETBLOBSIZE, lParam, 0);

+	dbei.pBlob = (PBYTE)alloca(dbei.cbBlob);

+	CallService(MS_DB_EVENT_GET, lParam, (LPARAM)&dbei);

+

+	HANDLE hContact = *(PHANDLE)(dbei.pBlob + sizeof(DWORD));

+

+	CLISTEVENT cli ={0};

+	cli.cbSize = sizeof(cli);

+	cli.hContact = hContact;

+	cli.ptszTooltip = szTooltip;

+    cli.flags = CLEF_TCHAR;

+	cli.lParam = lParam;

+	cli.hDbEvent = hDbEvent;

+

+	CONTACTINFO ci = {0};

+    ci.cbSize = sizeof(ci);

+    ci.hContact = hContact;

+    ci.szProto = (char *)CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact, 0);

+    ci.dwFlag = CNF_UNIQUEID | CNF_TCHAR;

+    if (!CallService(MS_CONTACT_GETCONTACTINFO, 0, (LPARAM)&ci))

+	{

+        switch (ci.type)

+		{

+        case CNFT_ASCIIZ:

+            mir_sntprintf(szUid, SIZEOF(szUid), _T("%s"), ci.pszVal);

+            mir_free(ci.pszVal);

+            break;

+

+        case CNFT_DWORD:

+            mir_sntprintf(szUid, SIZEOF(szUid), _T("%u"), ci.dVal);

+            break;

+        }

+    }

+                    

+	if (dbei.eventType == EVENTTYPE_AUTHREQUEST)

+	{

+        SkinPlaySound("AuthRequest");

+        if (szUid[0])

+            mir_sntprintf(szTooltip, SIZEOF(szTooltip), TranslateT("%s requests authorization"), szUid);

+        else

+            mir_sntprintf(szTooltip, SIZEOF(szTooltip), TranslateT("%u requests authorization"), *((PDWORD)dbei.pBlob));

+

+		cli.hIcon = LoadSkinIcon(SKINICON_OTHER_MIRANDA);

+		cli.pszService = MS_AUTH_SHOWREQUEST;

+		CallService(MS_CLIST_ADDEVENT, 0, (LPARAM)&cli);

+	}

+	else if (dbei.eventType == EVENTTYPE_ADDED)

+	{

+        SkinPlaySound("AddedEvent");

+        if (szUid[0])

+            mir_sntprintf(szTooltip, SIZEOF(szTooltip), TranslateT("%s added you to their contact list"), szUid);

+        else

+            mir_sntprintf(szTooltip, SIZEOF(szTooltip), TranslateT("%u added you to their contact list"), *((PDWORD)dbei.pBlob));

+            

+		cli.hIcon = LoadSkinIcon(SKINICON_OTHER_MIRANDA);

+		cli.pszService = MS_AUTH_SHOWADDED;

+		CallService(MS_CLIST_ADDEVENT, 0, (LPARAM)&cli);

+	}

+	return 0;

+}

+

+int LoadSendRecvAuthModule(void)

+{

+	CreateServiceFunction(MS_AUTH_SHOWREQUEST, ShowReqWindow);

+	CreateServiceFunction(MS_AUTH_SHOWADDED, ShowAddedWindow);

+	HookEvent(ME_DB_EVENT_ADDED, AuthEventAdded);

+

+    SkinAddNewSoundEx("AuthRequest", "Alerts", "Authorization request");

+    SkinAddNewSoundEx("AddedEvent",  "Alerts", "Added event");

+

+    return 0;

+} 

diff --git a/src/modules/srauth/authdialogs.cpp b/src/modules/srauth/authdialogs.cpp
new file mode 100644
index 0000000000..07651da4ce
--- /dev/null
+++ b/src/modules/srauth/authdialogs.cpp
@@ -0,0 +1,312 @@
+/*

+

+Miranda IM: the free IM client for Microsoft* Windows*

+

+Copyright 2000-2009 Miranda ICQ/IM project, 

+all portions of this codebase are copyrighted to the people 

+listed in contributors.txt.

+

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

+

+INT_PTR CALLBACK DlgProcAdded(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam)

+{

+	HANDLE hDbEvent = (HANDLE)GetWindowLongPtr(hwndDlg, GWLP_USERDATA);

+

+	switch (msg) 

+	{

+	case WM_INITDIALOG:

+		{

+			TranslateDialogDefault(hwndDlg);

+			Button_SetIcon_IcoLib(hwndDlg, IDC_DETAILS, SKINICON_OTHER_USERDETAILS, LPGEN("View User's Details"));

+			Button_SetIcon_IcoLib(hwndDlg, IDC_ADD, SKINICON_OTHER_ADDCONTACT, LPGEN("Add Contact Permanently to List"));

+

+			hDbEvent = (HANDLE)lParam;

+			SetWindowLongPtr(hwndDlg, GWLP_USERDATA, lParam);

+

+			//blob is: uin(DWORD), hcontact(HANDLE), nick(ASCIIZ), first(ASCIIZ), last(ASCIIZ), email(ASCIIZ)

+			DBEVENTINFO dbei = {0};

+			dbei.cbSize = sizeof(dbei);

+			dbei.cbBlob = CallService(MS_DB_EVENT_GETBLOBSIZE,(WPARAM)hDbEvent,0);

+			dbei.pBlob  = (PBYTE)alloca(dbei.cbBlob);

+			CallService(MS_DB_EVENT_GET, (WPARAM)hDbEvent, (LPARAM)&dbei);

+

+			DWORD uin = *(PDWORD)dbei.pBlob;

+			HANDLE hContact = *(HANDLE*)(dbei.pBlob + sizeof(DWORD));

+			char* nick     = (char *)(dbei.pBlob + sizeof(DWORD) + sizeof(HANDLE));

+			char* first    = nick  + strlen(nick)  + 1;

+			char* last     = first + strlen(first) + 1;

+			char* email    = last  + strlen(last)  + 1;

+

+			SendMessage(hwndDlg, WM_SETICON, ICON_SMALL, CallProtoService(dbei.szModule, PS_LOADICON, PLI_PROTOCOL | PLIF_SMALL, 0));

+			SendMessage(hwndDlg, WM_SETICON, ICON_BIG, CallProtoService(dbei.szModule, PS_LOADICON, PLI_PROTOCOL | PLIF_LARGE, 0));

+

+			PROTOACCOUNT* acc = Proto_GetAccount(dbei.szModule);

+

+			TCHAR* lastT = dbei.flags & DBEF_UTF ? Utf8DecodeT(last) : mir_a2t(last);

+			TCHAR* firstT = dbei.flags & DBEF_UTF ? Utf8DecodeT(first) : mir_a2t(first);

+			TCHAR* nickT = dbei.flags & DBEF_UTF ? Utf8DecodeT(nick) : mir_a2t(nick);

+			TCHAR* emailT = dbei.flags & DBEF_UTF ? Utf8DecodeT(email) : mir_a2t(email);

+

+			TCHAR name[128] = _T("");

+			int off = 0;

+			if (firstT[0] && lastT[0])

+				off = mir_sntprintf(name, SIZEOF(name), _T("%s %s"), firstT, lastT);

+			else if (firstT[0])

+				off = mir_sntprintf(name, SIZEOF(name), _T("%s"), firstT);

+			else if (lastT[0])

+				off = mir_sntprintf(name, SIZEOF(name), _T("%s"), lastT);

+			if (nickT[0])

+			{

+				if (off)

+					mir_sntprintf(name + off, SIZEOF(name) - off, _T(" (%s)"), nickT);

+				else

+					mir_sntprintf(name, SIZEOF(name), _T("%s"), nickT);

+			}

+			if (!name[0])

+				_tcscpy(name, TranslateT("<Unknown>"));

+

+			TCHAR hdr[256];

+			if (uin && emailT[0])

+				mir_sntprintf(hdr, SIZEOF(hdr), TranslateT("%s added you to the contact list\n%u (%s) on %s"), name, uin, emailT, acc->tszAccountName);

+			else if (uin)

+				mir_sntprintf(hdr, SIZEOF(hdr), TranslateT("%s added you to the contact list\n%u on %s"), name, uin, acc->tszAccountName);

+			else

+				mir_sntprintf(hdr, SIZEOF(hdr), TranslateT("%s added you to the contact list\n%s on %s"), name, emailT[0] ? emailT : TranslateT("(Unknown)"), acc->tszAccountName);

+

+			SetDlgItemText(hwndDlg, IDC_HEADERBAR, hdr);

+

+			mir_free(lastT);

+			mir_free(firstT);

+			mir_free(nickT);

+			mir_free(emailT);

+

+			SetWindowLongPtr(GetDlgItem(hwndDlg, IDC_DETAILS), GWLP_USERDATA, (LONG_PTR)hContact);

+

+			if (hContact == INVALID_HANDLE_VALUE || !DBGetContactSettingByte(hContact, "CList", "NotOnList", 0))

+				ShowWindow(GetDlgItem(hwndDlg, IDC_ADD), FALSE);

+		}

+		return TRUE;

+

+	case WM_COMMAND:

+		switch (LOWORD(wParam))

+		{

+			case IDC_ADD:

+			{	

+				ADDCONTACTSTRUCT acs = {0};

+				acs.handle = hDbEvent;

+				acs.handleType = HANDLE_EVENT;

+				acs.szProto = "";

+				CallService(MS_ADDCONTACT_SHOW, (WPARAM)hwndDlg, (LPARAM)&acs);

+

+				HANDLE hContact = (HANDLE)GetWindowLongPtr(GetDlgItem(hwndDlg, IDC_DETAILS), GWLP_USERDATA);

+                if ((hContact == INVALID_HANDLE_VALUE) || !DBGetContactSettingByte(hContact, "CList", "NotOnList", 0))

+                    ShowWindow(GetDlgItem(hwndDlg,IDC_ADD),FALSE);

+				break;

+			}

+			case IDC_DETAILS:

+			{

+				HANDLE hContact = (HANDLE)GetWindowLongPtr(GetDlgItem(hwndDlg, IDC_DETAILS), GWLP_USERDATA);

+				CallService(MS_USERINFO_SHOWDIALOG, (WPARAM)hContact, 0);

+				break;

+			}

+

+			case IDOK:

+			{	

+				ADDCONTACTSTRUCT acs = {0};

+				acs.handle = hDbEvent;

+				acs.handleType = HANDLE_EVENT;

+				acs.szProto = "";

+				CallService(MS_ADDCONTACT_SHOW, (WPARAM)hwndDlg, (LPARAM)&acs);

+			}

+				//fall through

+			case IDCANCEL:

+				DestroyWindow(hwndDlg);

+				break;

+		}

+		break;

+

+	case WM_DESTROY:

+		Button_FreeIcon_IcoLib(hwndDlg,IDC_ADD);

+		Button_FreeIcon_IcoLib(hwndDlg,IDC_DETAILS);

+		DestroyIcon((HICON)SendMessage(hwndDlg, WM_SETICON, ICON_BIG, 0));

+		DestroyIcon((HICON)SendMessage(hwndDlg, WM_SETICON, ICON_SMALL, 0));

+		break;

+	}

+	return FALSE;

+}

+

+INT_PTR CALLBACK DlgProcAuthReq(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam)

+{

+	HANDLE hDbEvent = (HANDLE)GetWindowLongPtr(hwndDlg, GWLP_USERDATA);

+

+	switch (msg) 

+	{

+	case WM_INITDIALOG:

+		TranslateDialogDefault(hwndDlg);

+		Button_SetIcon_IcoLib(hwndDlg, IDC_DETAILS, SKINICON_OTHER_USERDETAILS, LPGEN("View User Details"));

+		Button_SetIcon_IcoLib(hwndDlg, IDC_ADD, SKINICON_OTHER_ADDCONTACT, LPGEN("Add Contact Permanently to List"));

+

+		{

+			DBEVENTINFO dbei = {0};

+			DWORD uin;

+			char *nick,*first,*last,*email,*reason;

+			HANDLE hContact;		

+			

+			hDbEvent = (HANDLE)lParam;

+			SetWindowLongPtr(hwndDlg, GWLP_USERDATA, lParam);

+

+			//blob is: uin(DWORD),hcontact(HANDLE),nick(ASCIIZ),first(ASCIIZ),last(ASCIIZ),email(ASCIIZ),reason(ASCIIZ)

+			dbei.cbSize = sizeof(dbei);

+			dbei.cbBlob = CallService(MS_DB_EVENT_GETBLOBSIZE, (WPARAM)hDbEvent, 0);

+			dbei.pBlob  = (PBYTE)alloca(dbei.cbBlob);

+			CallService(MS_DB_EVENT_GET, (WPARAM)hDbEvent, (LPARAM)&dbei);

+

+			uin = *(PDWORD)dbei.pBlob;

+			hContact = *(HANDLE*)(dbei.pBlob + sizeof(DWORD));

+			nick     = (char *)(dbei.pBlob + sizeof(DWORD) + sizeof(HANDLE));

+			first    = nick  + strlen(nick)  + 1;

+			last     = first + strlen(first) + 1;

+			email    = last  + strlen(last)  + 1;

+			reason   = email + strlen(email) + 1;

+

+			SendMessage(hwndDlg, WM_SETICON, ICON_SMALL, CallProtoService(dbei.szModule, PS_LOADICON, PLI_PROTOCOL | PLIF_SMALL, 0));

+			SendMessage(hwndDlg, WM_SETICON, ICON_BIG, CallProtoService(dbei.szModule, PS_LOADICON, PLI_PROTOCOL | PLIF_LARGE, 0));

+

+			PROTOACCOUNT* acc = Proto_GetAccount(dbei.szModule);

+

+			TCHAR* lastT = dbei.flags & DBEF_UTF ? Utf8DecodeT(last) : mir_a2t(last);

+			TCHAR* firstT = dbei.flags & DBEF_UTF ? Utf8DecodeT(first) : mir_a2t(first);

+			TCHAR* nickT = dbei.flags & DBEF_UTF ? Utf8DecodeT(nick) : mir_a2t(nick);

+			TCHAR* emailT = dbei.flags & DBEF_UTF ? Utf8DecodeT(email) : mir_a2t(email);

+			TCHAR* reasonT = dbei.flags & DBEF_UTF ? Utf8DecodeT(reason) : mir_a2t(reason);

+

+			TCHAR name[128] =_T("");

+			int off = 0;

+			if (firstT[0] && lastT[0])

+				off = mir_sntprintf(name, SIZEOF(name), _T("%s %s"), firstT, lastT);

+			else if (firstT[0])

+				off = mir_sntprintf(name, SIZEOF(name), _T("%s"), firstT);

+			else if (lastT[0])

+				off = mir_sntprintf(name, SIZEOF(name), _T("%s"), lastT);

+			if (nickT[0])

+			{

+				if (off)

+					mir_sntprintf(name + off, SIZEOF(name) - off, _T(" (%s)"), nickT);

+				else

+					mir_sntprintf(name, SIZEOF(name), _T("%s"), nickT);

+			}

+			if (!name[0])

+				_tcscpy(name, TranslateT("<Unknown>"));

+

+			TCHAR hdr[256];

+			if (uin && emailT[0])

+				mir_sntprintf(hdr, SIZEOF(hdr), TranslateT("%s requested authorization\n%u (%s) on %s"), name, uin, emailT, acc->tszAccountName);

+			else if (uin)

+				mir_sntprintf(hdr, SIZEOF(hdr), TranslateT("%s requested authorization\n%u on %s"), name, uin, acc->tszAccountName);

+			else

+				mir_sntprintf(hdr, SIZEOF(hdr), TranslateT("%s requested authorization\n%s on %s"), name, emailT[0] ? emailT : TranslateT("(Unknown)"), acc->tszAccountName);

+

+			SetDlgItemText(hwndDlg, IDC_HEADERBAR, hdr);

+			SetDlgItemText(hwndDlg, IDC_REASON, reasonT);

+

+			mir_free(lastT);

+			mir_free(firstT);

+			mir_free(nickT);

+			mir_free(emailT);

+			mir_free(reasonT);

+

+			if (hContact == INVALID_HANDLE_VALUE || !DBGetContactSettingByte(hContact, "CList", "NotOnList", 0))

+				ShowWindow(GetDlgItem(hwndDlg, IDC_ADD), FALSE);

+

+			SendDlgItemMessage(hwndDlg, IDC_DENYREASON, EM_LIMITTEXT, 255, 0);

+			if (CallProtoService(dbei.szModule, PS_GETCAPS,PFLAGNUM_4, 0) & PF4_NOAUTHDENYREASON)

+			{

+				EnableWindow(GetDlgItem(hwndDlg, IDC_DENYREASON), FALSE);

+				SetDlgItemText(hwndDlg, IDC_DENYREASON, TranslateT("Feature is not supported by protocol"));

+			}

+			if (!DBGetContactSettingByte(hContact, "CList", "NotOnList", 0))

+			{

+				EnableWindow(GetDlgItem(hwndDlg, IDC_ADDCHECK), FALSE);

+				CheckDlgButton(hwndDlg, IDC_ADDCHECK, BST_UNCHECKED);

+			}

+			else

+				CheckDlgButton(hwndDlg, IDC_ADDCHECK, BST_CHECKED);

+

+			SetWindowLongPtr(GetDlgItem(hwndDlg, IDC_DETAILS), GWLP_USERDATA, (LONG_PTR)hContact);

+		}

+		return TRUE;

+

+	case WM_COMMAND:

+		switch (LOWORD(wParam)) 

+		{

+		case IDC_DETAILS:

+			CallService(MS_USERINFO_SHOWDIALOG, GetWindowLongPtr((HWND)lParam, GWLP_USERDATA), 0);

+			break;

+

+		case IDC_DECIDELATER:

+			DestroyWindow(hwndDlg);

+			break;

+

+		case IDOK:

+			{	

+				DBEVENTINFO dbei = {0};

+				dbei.cbSize = sizeof(dbei);

+				CallService(MS_DB_EVENT_GET, (WPARAM)hDbEvent, (LPARAM)&dbei);

+				CallProtoService(dbei.szModule, PS_AUTHALLOW, (WPARAM)hDbEvent,0);

+

+				if (IsDlgButtonChecked(hwndDlg, IDC_ADDCHECK))

+				{

+					ADDCONTACTSTRUCT acs = {0};

+					acs.handle = hDbEvent;

+					acs.handleType = HANDLE_EVENT;

+					acs.szProto = "";

+					CallService(MS_ADDCONTACT_SHOW, (WPARAM)hwndDlg, (LPARAM)&acs);

+				}

+			}

+			DestroyWindow(hwndDlg);

+			break;

+

+		case IDCANCEL:

+			{

+				DBEVENTINFO dbei = {0};

+				dbei.cbSize = sizeof(dbei);

+				CallService(MS_DB_EVENT_GET, (WPARAM)hDbEvent, (LPARAM)&dbei);

+

+				if (IsWindowEnabled(GetDlgItem(hwndDlg, IDC_DENYREASON)))

+				{

+					TCHAR szReason[256];

+					GetDlgItemText(hwndDlg, IDC_DENYREASON, szReason, SIZEOF(szReason));

+					CallProtoService(dbei.szModule, PS_AUTHDENYT, (WPARAM)hDbEvent, (LPARAM)szReason);

+				}

+				else

+					CallProtoService(dbei.szModule, PS_AUTHDENYT, (WPARAM)hDbEvent, 0);

+			}

+			DestroyWindow(hwndDlg);

+			break;;

+		}

+		break;

+

+	case WM_DESTROY:

+		Button_FreeIcon_IcoLib(hwndDlg,IDC_ADD);

+		Button_FreeIcon_IcoLib(hwndDlg,IDC_DETAILS);

+		DestroyIcon((HICON)SendMessage(hwndDlg, WM_SETICON, ICON_BIG, 0));

+		DestroyIcon((HICON)SendMessage(hwndDlg, WM_SETICON, ICON_SMALL, 0));

+		break;

+	}

+	return FALSE;

+}