initial commit

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

1 files changed, 271 insertions, 0 deletions

diff --git a/src/modules/addcontact/addcontact.cpp b/src/modules/addcontact/addcontact.cpp
new file mode 100644
index 0000000000..0be08b93ba
--- /dev/null
+++ b/src/modules/addcontact/addcontact.cpp
@@ -0,0 +1,271 @@
+/*

+

+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 AddContactDlgProc(HWND hdlg,UINT msg,WPARAM wparam,LPARAM lparam)

+{

+	ADDCONTACTSTRUCT *acs;

+

+	switch(msg) {

+	case WM_INITDIALOG:

+		{

+			char szUin[10];

+			acs=(ADDCONTACTSTRUCT *)lparam;

+			SetWindowLongPtr(hdlg,GWLP_USERDATA,(LONG_PTR)acs);

+

+			TranslateDialogDefault(hdlg);

+			Window_SetIcon_IcoLib(hdlg, SKINICON_OTHER_ADDCONTACT);

+			if ( acs->handleType == HANDLE_EVENT ) {

+				DWORD dwUin;

+				DBEVENTINFO dbei = { 0 };

+				dbei.cbSize=sizeof(dbei);

+				dbei.cbBlob=sizeof(DWORD);

+				dbei.pBlob=(PBYTE)&dwUin;

+				CallService(MS_DB_EVENT_GET,(WPARAM)acs->handle,(LPARAM)&dbei);

+				_ltoa(dwUin,szUin,10);

+				acs->szProto = dbei.szModule;

+			}

+			{

+				TCHAR *szName = NULL, *tmpStr = NULL;

+				if ( acs->handleType == HANDLE_CONTACT )

+					szName = cli.pfnGetContactDisplayName( acs->handle, GCDNF_TCHAR );

+				else {

+					int isSet = 0;

+

+					if (acs->handleType == HANDLE_EVENT) {

+						DBEVENTINFO dbei;

+						HANDLE hcontact;

+

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

+						dbei.cbSize=sizeof(dbei);

+						dbei.cbBlob=CallService(MS_DB_EVENT_GETBLOBSIZE,(WPARAM)acs->handle,0);

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

+						CallService(MS_DB_EVENT_GET,(WPARAM)acs->handle,(LPARAM)&dbei);

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

+						mir_free(dbei.pBlob);

+						if (hcontact!=INVALID_HANDLE_VALUE) {

+							szName = cli.pfnGetContactDisplayName( hcontact, 0 );

+							isSet = 1;

+						}

+					}

+					if (!isSet) {

+						szName = (acs->handleType == HANDLE_EVENT) ? (tmpStr = mir_a2t(szUin)) : 

+							(acs->psr->id ? acs->psr->id : acs->psr->nick);

+				}	}

+

+				if ( szName && szName[0] ) {

+					TCHAR  szTitle[128];

+					mir_sntprintf( szTitle, SIZEOF(szTitle), TranslateT("Add %s"), szName );

+					SetWindowText( hdlg, szTitle );

+				}

+				else SetWindowText( hdlg, TranslateT("Add Contact"));

+				mir_free(tmpStr);

+		}	}

+

+		if ( acs->handleType == HANDLE_CONTACT && acs->handle )

+			if ( acs->szProto == NULL || (acs->szProto != NULL && *acs->szProto == 0 ))

+				acs->szProto = (char*)CallService(MS_PROTO_GETCONTACTBASEPROTO,(WPARAM)acs->handle,0);

+		

+		{

+			int groupId;

+			for ( groupId = 0; groupId < 999; groupId++ ) {

+				DBVARIANT dbv;

+				char idstr[4];

+				int id;

+				_itoa(groupId,idstr,10);

+				if(DBGetContactSettingTString(NULL,"CListGroups",idstr,&dbv)) break;

+				id = SendDlgItemMessage(hdlg,IDC_GROUP,CB_ADDSTRING,0,(LPARAM)(dbv.ptszVal+1));

+				SendDlgItemMessage(hdlg,IDC_GROUP,CB_SETITEMDATA ,id,groupId+1);

+				DBFreeVariant(&dbv);

+		}	}

+

+		SendDlgItemMessage(hdlg,IDC_GROUP,CB_INSERTSTRING,0,(LPARAM)TranslateT("None"));

+		SendDlgItemMessage(hdlg,IDC_GROUP,CB_SETCURSEL,0,0);

+		/* acs->szProto may be NULL don't expect it */

+		{

+			// By default check both checkboxes

+			CheckDlgButton(hdlg,IDC_ADDED,BST_CHECKED);

+			CheckDlgButton(hdlg,IDC_AUTH,BST_CHECKED);

+

+			DWORD flags = (acs->szProto) ? CallProtoService(acs->szProto,PS_GETCAPS,PFLAGNUM_4,0) : 0;

+			if (flags&PF4_FORCEADDED) { // force you were added requests for this protocol

+				EnableWindow(GetDlgItem(hdlg,IDC_ADDED),FALSE);

+			}

+			if (flags&PF4_FORCEAUTH) { // force auth requests for this protocol

+				EnableWindow(GetDlgItem(hdlg,IDC_AUTH),FALSE);

+			}

+			if (flags&PF4_NOCUSTOMAUTH) {

+				EnableWindow(GetDlgItem(hdlg,IDC_AUTHREQ),FALSE);

+				EnableWindow(GetDlgItem(hdlg,IDC_AUTHGB),FALSE);

+			} 

+			else {

+				EnableWindow(GetDlgItem(hdlg,IDC_AUTHREQ),IsDlgButtonChecked(hdlg,IDC_AUTH));

+				EnableWindow(GetDlgItem(hdlg,IDC_AUTHGB),IsDlgButtonChecked(hdlg,IDC_AUTH));

+				SetDlgItemText(hdlg,IDC_AUTHREQ,TranslateT("Please authorize my request and add me to your contact list."));

+			}

+		}

+		break;

+

+	case WM_COMMAND:

+		acs = (ADDCONTACTSTRUCT *)GetWindowLongPtr(hdlg, GWLP_USERDATA);

+

+		switch (LOWORD(wparam))

+		{

+		case IDC_AUTH:

+			{

+				DWORD flags = CallProtoService(acs->szProto,PS_GETCAPS,PFLAGNUM_4,0);

+				if (flags & PF4_NOCUSTOMAUTH) {

+					EnableWindow(GetDlgItem(hdlg,IDC_AUTHREQ),FALSE);

+					EnableWindow(GetDlgItem(hdlg,IDC_AUTHGB),FALSE);

+				}

+				else {

+					EnableWindow(GetDlgItem(hdlg,IDC_AUTHREQ),IsDlgButtonChecked(hdlg,IDC_AUTH));

+					EnableWindow(GetDlgItem(hdlg,IDC_AUTHGB),IsDlgButtonChecked(hdlg,IDC_AUTH));

+				}

+			}

+			break;

+		case IDOK:

+			{

+				HANDLE hContact = INVALID_HANDLE_VALUE;

+				switch (acs->handleType) 

+				{

+				case HANDLE_EVENT:

+					{

+						DBEVENTINFO dbei = { 0 };

+						dbei.cbSize = sizeof(dbei);

+						CallService(MS_DB_EVENT_GET, (WPARAM)acs->handle, (LPARAM)&dbei);

+						hContact = (HANDLE)CallProtoService(dbei.szModule, PS_ADDTOLISTBYEVENT, 0, (LPARAM)acs->handle);

+					}

+					break;

+

+				case HANDLE_SEARCHRESULT:

+					hContact = (HANDLE)CallProtoService(acs->szProto, PS_ADDTOLIST, 0, (LPARAM)acs->psr);

+					break;

+

+				case HANDLE_CONTACT:

+					hContact = acs->handle;

+					break;

+				}

+

+				if (hContact == NULL)

+					break;

+

+				TCHAR szHandle[256];

+				if (GetDlgItemText(hdlg, IDC_MYHANDLE, szHandle, SIZEOF(szHandle)))

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

+

+				int item = SendDlgItemMessage(hdlg, IDC_GROUP, CB_GETCURSEL, 0, 0);

+				if (item > 0) 

+				{

+					item = SendDlgItemMessage(hdlg, IDC_GROUP, CB_GETITEMDATA, item, 0);

+					CallService(MS_CLIST_CONTACTCHANGEGROUP, (WPARAM)hContact, item);

+				}

+

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

+

+				if (IsDlgButtonChecked(hdlg, IDC_ADDED))

+					CallContactService(hContact, PSS_ADDED, 0, 0);

+

+				if (IsDlgButtonChecked(hdlg, IDC_AUTH)) 

+				{

+					DWORD flags = CallProtoService(acs->szProto, PS_GETCAPS, PFLAGNUM_4, 0);

+					if (flags & PF4_NOCUSTOMAUTH)

+						CallContactService(hContact, PSS_AUTHREQUESTT, 0, 0);

+					else 

+					{

+						TCHAR szReason[512];

+						GetDlgItemText(hdlg, IDC_AUTHREQ, szReason, SIZEOF(szReason));

+						CallContactService(hContact, PSS_AUTHREQUESTT, 0, (LPARAM)szReason);

+					}	

+				}

+			}

+			// fall through

+		case IDCANCEL:

+			if ( GetParent( hdlg ) == NULL)

+				DestroyWindow( hdlg );

+			else

+				EndDialog( hdlg, 0 );

+			break;

+		}

+		break;

+

+	case WM_CLOSE:

+		/* if there is no parent for the dialog, its a modeless dialog and can't be killed using EndDialog() */

+		if ( GetParent( hdlg ) == NULL )

+			DestroyWindow(hdlg);

+		else

+			EndDialog( hdlg, 0 );

+		break;

+

+	case WM_DESTROY:

+		Window_FreeIcon_IcoLib(hdlg);

+		acs = ( ADDCONTACTSTRUCT* )GetWindowLongPtr(hdlg,GWLP_USERDATA);

+		if (acs) {

+			if (acs->psr) {

+				mir_free(acs->psr->nick);

+				mir_free(acs->psr->firstName);

+				mir_free(acs->psr->lastName);

+				mir_free(acs->psr->email);

+				mir_free(acs->psr);

+			}

+			mir_free(acs);

+		}

+		break;

+	}

+

+	return FALSE;

+}

+

+INT_PTR AddContactDialog(WPARAM wParam,LPARAM lParam)

+{

+	if (lParam) {

+		ADDCONTACTSTRUCT* acs = ( ADDCONTACTSTRUCT* )mir_alloc(sizeof(ADDCONTACTSTRUCT));

+		memmove( acs, ( ADDCONTACTSTRUCT* )lParam, sizeof( ADDCONTACTSTRUCT ));

+		if ( acs->psr ) {

+			PROTOSEARCHRESULT *psr;

+			/* bad! structures that are bigger than psr will cause crashes if they define pointers within unreachable structural space */

+			psr = (PROTOSEARCHRESULT *)mir_alloc(acs->psr->cbSize);

+			memmove(psr,acs->psr,acs->psr->cbSize);

+			psr->nick = psr->flags & PSR_UNICODE ? mir_u2t((wchar_t*)psr->nick) : mir_a2t((char*)psr->nick);

+			psr->firstName = psr->flags & PSR_UNICODE ? mir_u2t((wchar_t*)psr->firstName) : mir_a2t((char*)psr->firstName);

+			psr->lastName = psr->flags & PSR_UNICODE ? mir_u2t((wchar_t*)psr->lastName) : mir_a2t((char*)psr->lastName);

+			psr->email = psr->flags & PSR_UNICODE ? mir_u2t((wchar_t*)psr->email) : mir_a2t((char*)psr->email);

+			psr->flags = psr->flags & ~PSR_UNICODE | PSR_TCHAR;

+			acs->psr = psr;

+			/* copied the passed acs structure, the psr structure with, the pointers within that  */

+		}

+

+		if ( wParam )

+			DialogBoxParam(hMirandaInst,MAKEINTRESOURCE(IDD_ADDCONTACT),(HWND)wParam,AddContactDlgProc,(LPARAM)acs);

+		else

+			CreateDialogParam(hMirandaInst,MAKEINTRESOURCE(IDD_ADDCONTACT),(HWND)wParam,AddContactDlgProc,(LPARAM)acs);

+		return 0;

+	}

+	return 1;

+}

+

+int LoadAddContactModule(void)

+{

+	CreateServiceFunction(MS_ADDCONTACT_SHOW,AddContactDialog);

+	return 0;

+}