fixes #2170 (Missing UInfoEx items in contact menu)

1 files changed, 134 insertions, 0 deletions

diff --git a/plugins/UserInfoEx/src/svc_homepage.cpp b/plugins/UserInfoEx/src/svc_homepage.cpp
new file mode 100644
index 0000000000..4d6561c640
--- /dev/null
+++ b/plugins/UserInfoEx/src/svc_homepage.cpp
@@ -0,0 +1,134 @@
+/*
+UserinfoEx plugin for Miranda IM
+
+Copyright:
+© 2006-2010 DeathAxe, Yasnovidyashii, Merlin, K. Romanov, Kreol
+
+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"	
+
+static HGENMENU ghMenuItem = nullptr;	
+static HANDLE hPrebuildMenuHook = nullptr;	
+
+/**	
+* This function reads the homepage address of the contact.	
+*	
+* @param	hContact	- handle to contact to read email from	
+*	
+* @retval	URL to contacts homepage	
+* @retval	NULL if contact provides no homepage	
+**/	
+
+static LPSTR Get(MCONTACT hContact)	
+{	
+	// ignore owner	
+	if (hContact != NULL) {	
+		LPCSTR pszProto = Proto_GetBaseAccountName(hContact);	
+		if (pszProto != nullptr) {	
+			LPCSTR e[2] = { SET_CONTACT_HOMEPAGE, SET_CONTACT_COMPANY_HOMEPAGE };	
+			for (int i = 0; i < 2; i++) {	
+				LPSTR pszHomepage = DB::Setting::GetAStringEx(hContact, USERINFO, pszProto, e[i]);	
+				if (pszHomepage)	
+					return pszHomepage;	
+			}	
+		}	
+	}	
+	return nullptr;	
+}	
+
+/**	
+* Service function that opens the default browser and displays the homepage.	
+*	
+* @param	wParam		- handle to contact to send an email to	
+* @param	lParam		- not used	
+*	
+* @retval	0 if email was sent	
+* @retval	1 if no email can be sent	
+**/	
+
+static INT_PTR MenuCommand(WPARAM wParam, LPARAM lParam)	
+{	
+	LPSTR szUrl = Get(wParam);	
+	if (szUrl) {	
+		Utils_OpenUrl(szUrl);	
+		mir_free(szUrl);	
+	}	
+	else MessageBox((HWND)lParam, TranslateT("User has no valid homepage"), TranslateT("View Homepage"), MB_OK);	
+
+	return 0;	
+}	
+
+/***********************************************************************************************************	
+ * Event Handler functions	
+ ***********************************************************************************************************/	
+
+/**	
+* This function decides whether to show menuitem for sending emails or not.	
+*	
+* @param	wParam		- handle to contact to send an email to	
+* @param	lParam		- not used	
+*	
+* @return	always 0	
+**/	
+
+static int OnPreBuildMenu(WPARAM wParam, LPARAM)	
+{	
+	LPSTR val = Get(wParam);	
+	Menu_ShowItem(ghMenuItem, val != nullptr);	
+	mir_free(val);	
+	return 0;	
+}	
+
+/***********************************************************************************************************	
+ * public Module Interface functions	
+ ***********************************************************************************************************/	
+
+/**	
+* enable or disable menuitem	
+*	
+* @param	not used	
+* @return	nothing	
+**/	
+
+void SvcHomepageRebuildMenu()	
+{	
+	if (!hPrebuildMenuHook)	
+		hPrebuildMenuHook = HookEvent(ME_CLIST_PREBUILDCONTACTMENU, OnPreBuildMenu);	
+
+	if (!ghMenuItem) {	
+		// insert contact menuitem	
+		CMenuItem mi(&g_plugin);	
+		SET_UID(mi, 0xdb78c16e, 0x50db, 0x4a40, 0x80, 0x0, 0xd1, 0xa4, 0x1c, 0x1b, 0xa3, 0x2d);	
+		mi.position = -2000010000;	
+		mi.hIcolibItem = g_plugin.getIconHandle(IDI_BTN_GOTO);	
+		mi.name.a = LPGEN("&Homepage");	
+		mi.pszService = MS_USERINFO_HOMEPAGE_OPENURL;	
+		ghMenuItem = Menu_AddContactMenuItem(&mi);	
+	}	
+}	
+
+/**	
+* This function initially loads the module upon startup.	
+*	
+* @param	not used	
+* @return	nothing	
+**/	
+
+void SvcHomepageLoadModule()	
+{	
+	CreateServiceFunction(MS_USERINFO_HOMEPAGE_OPENURL, MenuCommand);	
+}