adaptation of old good E-mage LAN proto

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

1 files changed, 394 insertions, 0 deletions

diff --git a/protocols/EmLanProto/src/amdproto.cpp b/protocols/EmLanProto/src/amdproto.cpp
new file mode 100644
index 0000000000..20f20a954e
--- /dev/null
+++ b/protocols/EmLanProto/src/amdproto.cpp
@@ -0,0 +1,394 @@
+//////////////////////////////////////////////////////////////////////////

+// AMD local protocol main file

+

+#include "stdafx.h"

+#include "mlan.h"

+#include "resource.h"

+

+//////////////////////////////////////////////////////////////////////////

+

+PLUGININFOEX pluginInfo={

+	sizeof(PLUGININFOEX),

+	"E-mage LAN Protocol",

+	VER,

+	"Communicating over LAN using UDP protocol",

+	"kva",

+	"kva@fromru.com",

+	"Viktor Kuzmin of e-mage",

+	"",

+	0

+};

+

+HINSTANCE g_hInstance = NULL;

+CMLan* g_lan = NULL;

+HANDLE g_heOptions = NULL;

+

+int hLangpack;

+bool g_InitOptions = false;

+

+#ifdef VERBOSE

+std::fstream emlanLog("EmLanLog.txt", std::ios::out|std::ios::app);

+#endif

+

+extern "C" __declspec(dllexport)  PLUGININFOEX* __cdecl MirandaPluginInfoEx(DWORD mirandaVersion)

+{

+	return &pluginInfo;

+}

+

+//////////////////////////////////////////////////////////////////////////

+// Interface information

+

+extern "C" __declspec(dllexport) const MUUID MirandaInterfaces[] = {MIID_PROTOCOL, MIID_LAST};

+

+//////////////////////////////////////////////////////////////////////////

+

+BOOL APIENTRY DllMain( HINSTANCE hInstDLL,DWORD reason,LPVOID )

+{

+	g_hInstance = hInstDLL;

+	if (reason == DLL_PROCESS_ATTACH) {

+		EMLOG("EmLan Started");

+		DisableThreadLibraryCalls( hInstDLL);

+	}

+	else if (reason == DLL_PROCESS_DETACH) {

+		EMLOG("EmLan Stopped");

+	}

+

+	return TRUE;

+}

+

+//////////////////////////////////////////////////////////////////////////

+

+static INT_PTR __cdecl EMPGetCaps(WPARAM wParam,LPARAM )

+{

+	int res = 0;

+	switch(wParam) {

+	case PFLAGNUM_1:

+		res = PF1_IM|PF1_BASICSEARCH|PF1_ADDSEARCHRES|PF1_PEER2PEER|PF1_INDIVSTATUS|

+		      PF1_URL|PF1_MODEMSG|PF1_FILE|PF1_CANRENAMEFILE|PF1_FILERESUME;

+		break;

+	case PFLAGNUM_2:		

+		res = PF2_ONLINE | PF2_SHORTAWAY | PF2_LONGAWAY | PF2_LIGHTDND | PF2_HEAVYDND | PF2_FREECHAT;

+		break;

+	case PFLAGNUM_3:

+		res = PF2_SHORTAWAY | PF2_LONGAWAY | PF2_LIGHTDND | PF2_HEAVYDND | PF2_FREECHAT;

+		break;

+	case PFLAG_UNIQUEIDTEXT:

+		res = (INT_PTR)Translate("User name or '*'");

+		break;

+	}

+	return res;

+}

+

+static INT_PTR __cdecl EMPGetName(WPARAM wParam,LPARAM lParam)

+{

+	lstrcpyn((char*)lParam, "EmLan", wParam);

+	return 0;

+}

+

+static INT_PTR __cdecl EMPLoadIcon(WPARAM wParam, LPARAM)

+{

+	UINT id = IDI_ICON_ONLINE;	

+	if ((wParam & 0xFFFF) == PLI_OFFLINE)

+		id = IDI_ICON_OFFLINE;	

+	HICON res = LoadIcon(g_hInstance, MAKEINTRESOURCE(id));	

+	return (INT_PTR)res;

+}

+

+static INT_PTR __cdecl EMPGetStatus(WPARAM ,LPARAM )

+{

+	return g_lan->GetMirandaStatus();

+}

+

+INT_PTR __cdecl EMPSetStatus(WPARAM new_status, LPARAM lParam)

+{

+	g_lan->SetMirandaStatus(new_status);

+	return 0;

+}

+

+static INT_PTR __cdecl EMPSendMessage(WPARAM ,LPARAM lParam)

+{

+	return g_lan->SendMessageUrl((CCSDATA*)lParam, false);

+}

+

+static INT_PTR __cdecl EMPSendUrl(WPARAM ,LPARAM lParam)

+{

+	return g_lan->SendMessageUrl((CCSDATA*)lParam, true);

+}

+

+static INT_PTR __cdecl EMPRecvMessageUrl(WPARAM ,LPARAM lParam)

+{

+	g_lan->RecvMessageUrl((CCSDATA*)lParam);

+	return 0;

+}

+

+static INT_PTR __cdecl EMPAddToList(WPARAM flags,LPARAM lParam)

+{

+	return g_lan->AddToContactList((u_int)flags, (EMPSEARCHRESULT*)lParam);

+}

+

+static INT_PTR __cdecl EMPBasicSearch(WPARAM, LPARAM lParam)

+{

+	return g_lan->Search((const char*)lParam);

+}

+

+static INT_PTR __cdecl EMPGetAwayMsg(WPARAM, LPARAM lParam)

+{

+	return g_lan->GetAwayMsg((CCSDATA*)lParam);

+}

+

+static INT_PTR __cdecl EMPRecvAwayMessage(WPARAM, LPARAM lParam)

+{

+	return g_lan->RecvAwayMsg((CCSDATA*)lParam);

+}

+

+static INT_PTR __cdecl EMPSetAwayMsg(WPARAM wParam, LPARAM lParam)

+{

+	return g_lan->SetAwayMsg((u_int)wParam, (char*)lParam);

+}

+

+static INT_PTR __cdecl EMPFileResume(WPARAM wParam, LPARAM lParam)

+{

+	return g_lan->FileResume((int)wParam, (PROTOFILERESUME*)lParam);

+}

+

+static INT_PTR __cdecl EMPSendFileAllow(WPARAM wParam, LPARAM lParam)

+{

+	return g_lan->FileAllow((CCSDATA*)lParam);

+}

+

+static INT_PTR __cdecl EMPSendFileDeny(WPARAM wParam, LPARAM lParam)

+{

+	return g_lan->FileDeny((CCSDATA*)lParam);

+}

+

+static INT_PTR __cdecl EMPSendFileCancel(WPARAM wParam, LPARAM lParam)

+{

+	return g_lan->FileCancel((CCSDATA*)lParam);

+}

+

+static INT_PTR __cdecl EMPSendFile(WPARAM wParam, LPARAM lParam)

+{

+	return g_lan->SendFile((CCSDATA*)lParam);

+}

+

+static INT_PTR __cdecl EMPRecvFile(WPARAM wParam, LPARAM lParam)

+{

+	g_lan->RecvFile((CCSDATA*)lParam);

+	return 0;

+}

+

+//////////////////////////////////////////////////////////////////////////

+

+INT_PTR CALLBACK EMPDlgProcMainOpts(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)

+{

+	switch (uMsg) {

+	case WM_INITDIALOG:

+		g_InitOptions = true;

+		TranslateDialogDefault(hwndDlg);

+		{

+			int count = g_lan->GetHostAddrCount();

+			in_addr caddr = g_lan->GetCurHostAddress();

+			int cind = 0;

+			for (int i=0; i<count; i++)

+			{

+				in_addr addr  = g_lan->GetHostAddress(i);

+				char* ipStr = inet_ntoa(addr);

+				if (addr.S_un.S_addr == caddr.S_un.S_addr)

+					cind = i;

+				SendDlgItemMessage(hwndDlg, IDC_LIST_IP, LB_ADDSTRING, 0, (LPARAM)ipStr);

+			}

+			SendDlgItemMessage(hwndDlg, IDC_LIST_IP, LB_SETCURSEL, cind, 0);

+			SetDlgItemText(hwndDlg, IDC_EDIT_NAME, g_lan->GetName());

+			if (g_lan->GetUseHostName())

+			{

+				SendDlgItemMessage(hwndDlg, IDC_RADIO_USECOMPNAME, BM_SETCHECK, BST_CHECKED, 0);

+				SendDlgItemMessage(hwndDlg, IDC_RADIO_USEOWN, BM_SETCHECK, BST_UNCHECKED, 0);

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

+			}

+			else

+			{

+				SendDlgItemMessage(hwndDlg, IDC_RADIO_USECOMPNAME, BM_SETCHECK, BST_UNCHECKED, 0);

+				SendDlgItemMessage(hwndDlg, IDC_RADIO_USEOWN, BM_SETCHECK, BST_CHECKED, 0);

+				EnableWindow(GetDlgItem(hwndDlg, IDC_EDIT_NAME), TRUE);

+			}

+		}

+		g_InitOptions = false;

+		return TRUE;

+

+	case WM_COMMAND:

+		{

+			if (g_InitOptions)

+				break;

+

+			bool changed = false;

+			switch(LOWORD(wParam)) {

+			case IDC_RADIO_USECOMPNAME:

+				g_lan->SetUseHostName(true);

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

+				changed = true;

+				break;

+			case IDC_RADIO_USEOWN:

+				g_lan->SetUseHostName(false);

+				EnableWindow(GetDlgItem(hwndDlg, IDC_EDIT_NAME), TRUE);

+				changed = true;

+				break;

+			case IDC_LIST_IP:

+				{

+					u_long addr = g_lan->GetHostAddress(SendDlgItemMessage(hwndDlg, IDC_LIST_IP, LB_GETCURSEL, 0, 0)).S_un.S_addr;

+					if (addr != g_lan->GetCurHostAddress().S_un.S_addr)

+					{

+						g_lan->SetRequiredIp(addr);

+						changed = true;

+					}

+				}

+				break;

+			case IDC_EDIT_NAME:

+				if (HIWORD(wParam)==EN_CHANGE)

+					changed = true;

+				break;

+			}

+			if (changed)

+				SendMessage(GetParent(hwndDlg), PSM_CHANGED,0,0);

+		}

+		break;

+	case WM_NOTIFY:

+		switch(((LPNMHDR)lParam)->idFrom) 

+		{

+		case 0:

+			switch (((LPNMHDR)lParam)->code) 

+			{

+			case PSN_RESET:	

+				g_lan->LoadSettings();

+				return TRUE;

+			case PSN_APPLY:

+				{

+					int status = g_lan->GetMirandaStatus();

+					g_lan->SetMirandaStatus(ID_STATUS_OFFLINE);

+

+					GetDlgItemText(hwndDlg, IDC_EDIT_NAME, g_lan->GetName(), MAX_HOSTNAME_LEN);

+

+					g_lan->SaveSettings();

+					g_lan->LoadSettings();

+

+					g_lan->SetMirandaStatus(status);

+				}

+				return TRUE;

+			}

+		}

+		break;

+	}

+	return FALSE;

+}

+

+int __cdecl EMPCreateOptionsDlg(WPARAM wParam,LPARAM)

+{

+	OPTIONSDIALOGPAGE odp = { sizeof(odp) };

+	odp.position = 100000000;

+	odp.hInstance = g_hInstance;

+	odp.pszTemplate = MAKEINTRESOURCE(IDD_EMP_FORM_OPT);

+	odp.pszTitle = LPGEN("E-mage LAN protocol");

+	odp.pszGroup = LPGEN("Network");

+	odp.groupPosition = 910000000;

+	odp.flags = ODPF_BOLDGROUPS;

+	odp.pfnDlgProc = EMPDlgProcMainOpts;

+	Options_AddPage(wParam, &odp);

+

+	return 0;

+}

+

+//////////////////////////////////////////////////////////////////////////

+

+INT_PTR CALLBACK EMPDlgProcMessage(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)

+{

+	switch (uMsg) {

+	case WM_INITDIALOG:

+		{

+			HWND hwndOwner; 

+			RECT rc, rcDlg, rcOwner; 

+			if ((hwndOwner = GetParent(hwndDlg)) == NULL) 

+			{

+				hwndOwner = GetDesktopWindow(); 

+			}

+

+			GetWindowRect(hwndOwner, &rcOwner); 

+			GetWindowRect(hwndDlg, &rcDlg); 

+			CopyRect(&rc, &rcOwner); 

+

+			OffsetRect(&rcDlg, -rcDlg.left, -rcDlg.top); 

+			OffsetRect(&rc, -rc.left, -rc.top); 

+			OffsetRect(&rc, -rcDlg.right, -rcDlg.bottom); 

+

+			SetWindowPos(hwndDlg, 

+				HWND_TOP, 

+				rcOwner.left + (rc.right / 2), 

+				rcOwner.top + (rc.bottom / 2), 

+				0, 0,          // ignores size arguments 

+				SWP_NOSIZE); 

+

+			if (GetDlgCtrlID((HWND) wParam) != IDOK) { 

+				SetFocus(GetDlgItem(hwndDlg, IDOK)); 

+				return FALSE; 

+			} 

+			return TRUE;

+		}

+		break;

+

+	case WM_CLOSE:

+		EndDialog(hwndDlg, 0);

+		return TRUE;

+

+	case WM_COMMAND:

+		switch(LOWORD(wParam)) {

+		case IDOK:

+			EndDialog(hwndDlg, 0);

+			return TRUE;

+		}

+		break;

+	}

+	return FALSE;

+}

+

+extern "C" int __declspec(dllexport) __cdecl Load()

+{

+	mir_getLP(&pluginInfo);

+

+	PROTOCOLDESCRIPTOR pd = { PROTOCOLDESCRIPTOR_V3_SIZE };

+	pd.szName = PROTONAME;

+	pd.type = PROTOTYPE_PROTOCOL;

+	CallService(MS_PROTO_REGISTERMODULE, 0, (LPARAM)&pd);

+

+	CreateServiceFunction(PROTONAME PS_GETCAPS, EMPGetCaps);

+	CreateServiceFunction(PROTONAME PS_GETNAME, EMPGetName);

+	CreateServiceFunction(PROTONAME PS_LOADICON, EMPLoadIcon);

+	CreateServiceFunction(PROTONAME PS_SETSTATUS, EMPSetStatus);

+	CreateServiceFunction(PROTONAME PS_GETSTATUS, EMPGetStatus);

+	CreateServiceFunction(PROTONAME PS_BASICSEARCH, EMPBasicSearch);

+	CreateServiceFunction(PROTONAME PS_ADDTOLIST, EMPAddToList);

+	CreateServiceFunction(PROTONAME PSS_MESSAGE, EMPSendMessage);

+	CreateServiceFunction(PROTONAME PSS_URL, EMPSendUrl);

+	CreateServiceFunction(PROTONAME PSR_MESSAGE, EMPRecvMessageUrl);

+	CreateServiceFunction(PROTONAME PSR_URL, EMPRecvMessageUrl);

+	CreateServiceFunction(PROTONAME PSS_GETAWAYMSG, EMPGetAwayMsg);

+	CreateServiceFunction(PROTONAME PS_SETAWAYMSG, EMPSetAwayMsg);

+	CreateServiceFunction(PROTONAME PSR_AWAYMSG, EMPRecvAwayMessage);

+

+	CreateServiceFunction(PROTONAME PS_FILERESUME, EMPFileResume);

+	CreateServiceFunction(PROTONAME PSS_FILEALLOW, EMPSendFileAllow);

+	CreateServiceFunction(PROTONAME PSS_FILEDENY, EMPSendFileDeny);

+	CreateServiceFunction(PROTONAME PSS_FILECANCEL, EMPSendFileCancel);

+	CreateServiceFunction(PROTONAME PSS_FILE, EMPSendFile);

+	CreateServiceFunction(PROTONAME PSR_FILE, EMPRecvFile);

+

+	g_heOptions = HookEvent(ME_OPT_INITIALISE,EMPCreateOptionsDlg);

+

+	g_lan = new CMLan();

+	return 0;

+}

+

+extern "C" int __declspec(dllexport) __cdecl Unload()

+{

+	UnhookEvent(g_heOptions);

+

+	delete g_lan;

+	return 0;

+}