initial commit

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

1 files changed, 491 insertions, 0 deletions

diff --git a/plugins/StatusPlugins/StartupStatus/startupstatus.cpp b/plugins/StatusPlugins/StartupStatus/startupstatus.cpp
new file mode 100644
index 0000000000..13b58e2e52
--- /dev/null
+++ b/plugins/StatusPlugins/StartupStatus/startupstatus.cpp
@@ -0,0 +1,491 @@
+/*

+    StartupStatus Plugin for Miranda-IM (www.miranda-im.org)

+    Copyright 2003-2006 P. Boon

+

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

+#include "startupstatus.h"

+

+// {4B733944-5A70-4b52-AB2D-68B1EF38FFE8}

+#define MIID_STARTUPSTATUS { 0x4b733944, 0x5a70, 0x4b52, { 0xab, 0x2d, 0x68, 0xb1, 0xef, 0x38, 0xff, 0xe8 } }

+

+static UINT_PTR setStatusTimerId = 0;

+

+int CompareSettings( const TSSSetting* p1, const TSSSetting* p2 )

+{	return lstrcmpA( p1->szName, p2->szName );

+}

+

+static TSettingsList startupSettings( 10, CompareSettings );

+

+TSSSetting::TSSSetting( PROTOACCOUNT* pa )

+{

+	cbSize = sizeof(PROTOCOLSETTINGEX);

+	szName = pa->szModuleName;

+	tszAccName = pa->tszAccountName;

+	status = lastStatus = CallProtoService( pa->szModuleName, PS_GETSTATUS, 0, 0 );

+	szMsg = NULL;

+}

+

+TSSSetting::TSSSetting( int profile, PROTOACCOUNT* pa )

+{

+	cbSize = sizeof(PROTOCOLSETTINGEX);

+

+	// copy name

+	szName = pa->szModuleName;

+	tszAccName = pa->tszAccountName;

+

+	// load status

+	char setting[80];

+	_snprintf(setting, sizeof(setting), "%d_%s", profile, pa->szModuleName);

+	int iStatus = DBGetContactSettingWord(NULL, MODULENAME, setting, 0);

+	if ( iStatus < MIN_STATUS || iStatus > MAX_STATUS )

+		iStatus = DEFAULT_STATUS;

+	status = iStatus;

+

+	// load last status

+	_snprintf(setting, sizeof(setting), "%s%s", PREFIX_LAST, szName);

+	iStatus = DBGetContactSettingWord(NULL, MODULENAME, setting, 0);

+	if ( iStatus < MIN_STATUS || iStatus > MAX_STATUS )

+		iStatus = DEFAULT_STATUS;

+	lastStatus = iStatus;

+

+	szMsg = GetStatusMessage(profile, szName);

+	if ( szMsg )

+		szMsg = _strdup( szMsg );

+}

+

+TSSSetting::~TSSSetting()

+{

+	if ( szMsg != NULL )

+		free( szMsg );

+}

+

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

+

+static HANDLE 

+	hOptionsHook,

+	hShutdownHook,

+	hAccChangeHook,

+	hProtoAckHook,

+	hCSStatusChangeHook,

+	hStatusChangeHook;

+

+static HWND hMessageWindow;

+

+static BYTE showDialogOnStartup = 0;

+

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

+// command line options

+

+static PROTOCOLSETTINGEX* IsValidProtocol(TSettingsList& protoSettings, char* protoName)

+{

+	for ( int i=0; i < protoSettings.getCount(); i++ )

+		if ( !strncmp( protoSettings[i].szName, protoName, strlen(protoSettings[i].szName )))

+			return &protoSettings[i];

+	

+	return NULL;

+}

+

+static int IsValidStatusDesc(char* statusDesc)

+{

+	if (!strncmp("away", statusDesc, 4))

+		return ID_STATUS_AWAY;

+	if (!strncmp("na", statusDesc, 2))

+		return ID_STATUS_NA;

+	if (!strncmp("dnd", statusDesc, 3))

+		return ID_STATUS_DND;

+	if (!strncmp("occupied", statusDesc, 8))

+		return ID_STATUS_OCCUPIED;

+	if (!strncmp("freechat", statusDesc, 8))

+		return ID_STATUS_FREECHAT;

+	if (!strncmp("online", statusDesc, 6))

+		return ID_STATUS_ONLINE;

+	if (!strncmp("offline", statusDesc, 7))

+		return ID_STATUS_OFFLINE;

+	if (!strncmp("invisible", statusDesc, 9))

+		return ID_STATUS_INVISIBLE;

+	if (!strncmp("onthephone", statusDesc, 10))

+		return ID_STATUS_ONTHEPHONE;

+	if (!strncmp("outtolunch", statusDesc, 10))

+		return ID_STATUS_OUTTOLUNCH;

+	if (!strncmp("last", statusDesc, 4))

+		return ID_STATUS_LAST;

+	

+	return 0;

+}

+

+static void ProcessCommandLineOptions(TSettingsList& protoSettings)

+{

+	if ( protoSettings.getCount() == 0 ) 

+		return;

+

+	char *cmdl = GetCommandLineA();

+	while (*cmdl != '\0') {

+		while (*cmdl != '/') {

+			if (*cmdl == '\0') 

+				return;

+

+			cmdl++;

+		}

+		if (*cmdl == '\0') 			

+			return;

+

+		cmdl++;

+		if (!strncmp(cmdl, "showdialog", 10)) {

+			showDialogOnStartup = TRUE;

+			continue;

+		}

+		char *protoName = cmdl; // first protocol ?

+		PROTOCOLSETTINGEX* protoSetting = IsValidProtocol(protoSettings, protoName);

+		if (protoSetting != NULL) {

+			while (*cmdl != '=') {

+				if (*cmdl == '\0') 

+					return;

+

+				cmdl++; // skip to status

+			}

+

+			if (*cmdl == '\0') 

+				return;

+

+			cmdl++;

+			char *statusDesc = cmdl;

+			int status = IsValidStatusDesc(statusDesc);

+			if (status != 0)

+				protoSetting->status = status;

+}	}	}

+

+static void SetLastStatusMessages(TSettingsList& ps)

+{

+	for (int i=0; i < ps.getCount(); i++ ) {

+		if (ps[i].status != ID_STATUS_LAST)

+			continue;

+

+		char dbSetting[128];

+		_snprintf(dbSetting, sizeof(dbSetting), "%s%s", PREFIX_LASTMSG, ps[i].szName);

+

+		DBVARIANT dbv;

+		if ( ps[i].szMsg == NULL && !DBGetContactSetting(NULL, MODULENAME, dbSetting, &dbv)) {

+			ps[i].szMsg = _strdup(dbv.pszVal); // remember this won't be freed

+			DBFreeVariant(&dbv);

+}	}	}

+

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

+// Account control event

+

+int OnAccChanged(WPARAM wParam,LPARAM lParam)

+{

+	PROTOACCOUNT* pa = ( PROTOACCOUNT* )lParam;

+	switch( wParam ) {

+	case PRAC_ADDED:

+		startupSettings.insert( new TSSSetting( -1, pa ));

+		break;

+		

+	case PRAC_REMOVED:

+		{

+			for ( int i=0; i < startupSettings.getCount(); i++ ) {

+				if ( !lstrcmpA( startupSettings[i].szName, pa->szModuleName )) {

+					startupSettings.remove( i );

+					break;

+		}	}	}

+		break;

+	}

+

+	return 0;

+}

+

+// 'allow override'

+static int ProcessProtoAck(WPARAM wParam,LPARAM lParam)

+{

+	// 'something' made a status change

+	ACKDATA *ack=(ACKDATA*)lParam;

+	if ( ack->type != ACKTYPE_STATUS && ack->result != ACKRESULT_FAILED )

+		return 0;

+

+	if ( !DBGetContactSettingByte(NULL, MODULENAME, SETTING_OVERRIDE, 1) || startupSettings.getCount() == 0 )

+		return 0;

+

+	for (int i=0; i < startupSettings.getCount(); i++) {

+		if ( !strcmp( ack->szModule, startupSettings[i].szName )) {

+			startupSettings[i].szName = "";

+			log_debugA("StartupStatus: %s overridden by ME_PROTO_ACK, status will not be set", ack->szModule);

+	}	}

+

+	return 0;

+}

+

+static int StatusChange(WPARAM wParam, LPARAM lParam)

+{

+	// change by menu

+	if ( !DBGetContactSettingByte(NULL, MODULENAME, SETTING_OVERRIDE, 1) || startupSettings.getCount() == 0 )

+		return 0;

+

+	char* szProto = (char *)lParam;

+	if (szProto == NULL) { // global status change

+		for ( int i=0; i < startupSettings.getCount(); i++ ) {

+			startupSettings[i].szName = "";

+			log_debugA("StartupStatus: all protos overridden by ME_CLIST_STATUSMODECHANGE, status will not be set");

+		}

+	}

+	else {

+		for ( int i=0; i < startupSettings.getCount(); i++) {

+			if ( !strcmp( startupSettings[i].szName, szProto )) {

+				startupSettings[i].szName = "";

+				log_debugA("StartupStatus: %s overridden by ME_CLIST_STATUSMODECHANGE, status will not be set", szProto);

+	}	}	}

+

+	return 0;

+}

+

+static int CSStatusChangeEx(WPARAM wParam, LPARAM lParam)

+{

+	// another status plugin made the change

+	if ( !DBGetContactSettingByte(NULL, MODULENAME, SETTING_OVERRIDE, 1) || startupSettings.getCount() == 0 )

+		return 0;

+

+	if (wParam != 0) {

+		PROTOCOLSETTINGEX** ps = *(PROTOCOLSETTINGEX***)wParam;

+		if (ps == NULL)

+			return -1;

+

+		for (int i=0; i < startupSettings.getCount(); i++ ) {

+			for ( int j=0; j < startupSettings.getCount(); j++ ) {

+				if ( ps[i]->szName == NULL || startupSettings[j].szName == NULL )

+					continue;

+

+				if ( !strcmp( ps[i]->szName, startupSettings[j].szName )) {

+					log_debugA("StartupStatus: %s overridden by MS_CS_SETSTATUSEX, status will not be set", ps[i]->szName);

+					// use a hack to disable this proto

+					startupSettings[j].szName = "";

+	}	}	}	}

+

+	return 0;

+}

+

+static VOID CALLBACK SetStatusTimed(HWND hwnd,UINT message, UINT_PTR idEvent,DWORD dwTime)

+{

+	KillTimer(NULL, setStatusTimerId);

+	UnhookEvent(hProtoAckHook);

+	UnhookEvent(hCSStatusChangeHook);

+	UnhookEvent(hStatusChangeHook);

+	CallService(MS_CS_SETSTATUSEX, (WPARAM)&startupSettings, 0);

+}

+

+int LoadMainOptions()

+{

+	ReinitProfileModule();

+	return 0;

+}

+

+static int Exit(WPARAM wParam, LPARAM lParam)

+{

+	DeinitProfilesModule();

+	UnhookEvent(hOptionsHook);

+	UnhookEvent(hShutdownHook);

+	UnhookEvent(hAccChangeHook);

+

+	// save last protocolstatus

+	int count;

+	PROTOACCOUNT** protos;

+	ProtoEnumAccounts( &count, &protos );

+

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

+		if ( !IsSuitableProto( protos[i] ))

+			continue;

+

+		char lastName[128], lastMsg[128];

+		mir_snprintf(lastName, sizeof(lastName), "%s%s", PREFIX_LAST, protos[i]->szModuleName);

+		if (CallService(MS_PROTO_ISPROTOCOLLOADED, 0, (LPARAM)protos[i]->szModuleName)) {

+			DBWriteContactSettingWord(NULL, MODULENAME, lastName, (WORD)CallProtoService(protos[i]->szModuleName, PS_GETSTATUS, 0, 0));

+			mir_snprintf(lastMsg, sizeof(lastMsg), "%s%s", PREFIX_LASTMSG, protos[i]->szModuleName);

+			DBDeleteContactSetting(NULL, MODULENAME, lastMsg);

+			

+			int status = CallProtoService(protos[i]->szModuleName, PS_GETSTATUS, 0, 0);

+			if ( !CallService(MS_PROTO_ISPROTOCOLLOADED, 0, (LPARAM)protos[i]->szModuleName))

+				continue;

+

+			if ( !(CallProtoService(protos[i]->szModuleName, PS_GETCAPS, (WPARAM)PFLAGNUM_1, 0) & PF1_MODEMSGSEND & ~PF1_INDIVMODEMSG ))

+				continue;

+

+			if ( !(CallProtoService(protos[i]->szModuleName, PS_GETCAPS, (WPARAM)PFLAGNUM_3, 0)&Proto_Status2Flag(status)))

+				continue;

+

+			if (ServiceExists(MS_NAS_GETSTATE)) {

+				// NewAwaySys

+				NAS_PROTOINFO npi = { 0 };

+				npi.cbSize = sizeof(NAS_PROTOINFO);

+				npi.szProto = protos[i]->szModuleName;

+				npi.status = 0;

+				CallService(MS_NAS_GETSTATEA, (WPARAM)&npi, (LPARAM)1);

+				if (npi.szMsg == NULL) {

+					npi.status = 0;

+					npi.szProto = NULL;

+					CallService(MS_NAS_GETSTATEA, (WPARAM)&npi, (LPARAM)1);

+				}

+				if (npi.szMsg != NULL) {

+					DBWriteContactSettingString(NULL, MODULENAME, lastMsg, npi.szMsg);

+					mir_free(npi.szMsg);

+	}	}	}	}

+

+	if ( (DBGetContactSettingByte(NULL, MODULENAME, SETTING_SETPROFILE, 1)) || (DBGetContactSettingByte(NULL, MODULENAME, SETTING_OFFLINECLOSE, 0)) ) {

+		if (ServiceExists(MS_CLIST_SETSTATUSMODE))

+			CallService(MS_CLIST_SETSTATUSMODE, (WPARAM)ID_STATUS_OFFLINE, 0);

+		else

+			log_debugA("StartupStatus: MS_CLIST_SETSTATUSMODE not available!");

+	}

+

+	// set windowstate and docked for next startup

+	if (DBGetContactSettingByte(NULL, MODULENAME, SETTING_SETWINSTATE, 0)) {

+		int state = DBGetContactSettingByte(NULL, MODULENAME, SETTING_WINSTATE, SETTING_STATE_NORMAL);

+		HWND hClist = (HWND)CallService(MS_CLUI_GETHWND, 0, 0);

+		BOOL isHidden = !IsWindowVisible(hClist);

+		switch (state) {

+		case SETTING_STATE_HIDDEN:

+			// try to use services where possible

+			if (!isHidden)

+				CallService(MS_CLIST_SHOWHIDE, 0, 0);

+			break;

+

+		case SETTING_STATE_MINIMIZED:

+			if (!DBGetContactSettingByte(NULL, MODULE_CLIST, SETTING_TOOLWINDOW, 0))

+				ShowWindow(hClist, SW_SHOWMINIMIZED);

+			break;

+			

+		case SETTING_STATE_NORMAL:

+			// try to use services where possible (that's what they're for)

+			if (isHidden)

+				CallService(MS_CLIST_SHOWHIDE, 0, 0);

+			break;

+	}	}

+

+	// hangup

+	if (DBGetContactSettingByte(NULL, MODULENAME, SETTING_AUTOHANGUP, 0))

+		InternetAutodialHangup(0);

+	

+	int state = DBGetContactSettingByte(NULL, MODULENAME, SETTING_WINSTATE, SETTING_STATE_NORMAL);

+	// set windowstate and docked for next startup

+	if (DBGetContactSettingByte(NULL, MODULENAME, SETTING_SETWINSTATE, 0))

+		DBWriteContactSettingByte(NULL, MODULE_CLIST, SETTING_WINSTATE, (BYTE)state);

+			

+	if ( hMessageWindow )

+		DestroyWindow(hMessageWindow);

+

+	startupSettings.destroy();

+	return 0;

+}

+

+/* Window proc for poweroff event */

+static DWORD CALLBACK MessageWndProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)

+{

+	switch(msg) {

+	case WM_ENDSESSION:

+		log_debugA("WM_ENDSESSION");

+		if (wParam) {

+			log_debugA("WM_ENDSESSION: calling exit");

+			Exit(0, 0);

+			log_debugA("WM_ENDSESSION: exit called");

+		}

+		break;

+	}

+

+	return TRUE;

+}

+

+int CSModuleLoaded(WPARAM wParam, LPARAM lParam)

+{

+	protoList = ( OBJLIST<PROTOCOLSETTINGEX>* )&startupSettings;

+

+	InitProfileModule();

+

+	hAccChangeHook = HookEvent(ME_PROTO_ACCLISTCHANGED, OnAccChanged);

+	hOptionsHook = HookEvent(ME_OPT_INITIALISE, OptionsInit);

+

+	/* shutdown hook for normal shutdown */

+	hShutdownHook = HookEvent(ME_SYSTEM_OKTOEXIT, Exit);

+	/* message window for poweroff */

+	hMessageWindow = CreateWindowEx(0, _T("STATIC"), NULL, 0, 0, 0, 0, 0, NULL, NULL, NULL, NULL);

+	SetWindowLongPtr(hMessageWindow, GWLP_WNDPROC, (LONG_PTR)MessageWndProc);

+

+	GetProfile( -1, startupSettings );

+

+	// override with cmdl

+	ProcessCommandLineOptions( startupSettings );

+	if (startupSettings.getCount() == 0)

+		return 0;// no protocols are loaded

+

+	SetLastStatusMessages(startupSettings);

+	showDialogOnStartup = (showDialogOnStartup || DBGetContactSettingByte(NULL, MODULENAME, SETTING_SHOWDIALOG, 0));

+

+	// dial

+	if ( showDialogOnStartup || DBGetContactSettingByte(NULL, MODULENAME, SETTING_SETPROFILE, 1))

+		if (DBGetContactSettingByte(NULL, MODULENAME, SETTING_AUTODIAL, 0))

+			InternetAutodial(0, NULL);

+

+	// set the status!

+	if ( showDialogOnStartup || DBGetContactSettingByte(NULL, MODULENAME, SETTING_SHOWDIALOG, 0)) {

+		CallService(MS_CS_SHOWCONFIRMDLGEX, (WPARAM)&startupSettings, DBGetContactSettingDword(NULL, MODULENAME, SETTING_DLGTIMEOUT, 5));

+	}

+	else if (DBGetContactSettingByte(NULL, MODULENAME, SETTING_SETPROFILE, 1)) {

+		// set hooks for override

+		if (DBGetContactSettingByte(NULL, MODULENAME, SETTING_OVERRIDE, 1))  {

+			hProtoAckHook = HookEvent(ME_PROTO_ACK, ProcessProtoAck);

+			hCSStatusChangeHook = HookEvent(ME_CS_STATUSCHANGEEX, CSStatusChangeEx);

+			hStatusChangeHook = HookEvent(ME_CLIST_STATUSMODECHANGE, StatusChange);

+		}

+		setStatusTimerId = SetTimer(NULL, 0, DBGetContactSettingDword(NULL,MODULENAME,SETTING_SETPROFILEDELAY,500), SetStatusTimed);

+	}

+

+	// win size and location

+	if ( DBGetContactSettingByte(NULL, MODULENAME, SETTING_SETWINLOCATION, 0) ||

+		  DBGetContactSettingByte(NULL, MODULENAME, SETTING_SETWINSIZE, 0))

+	{

+		WINDOWPLACEMENT wndpl = { 0 };

+		wndpl.length = sizeof(wndpl);

+		

+		HWND hClist = (HWND)CallService(MS_CLUI_GETHWND, 0, 0);

+

+		// store in db

+		if (DBGetContactSettingByte(NULL, MODULENAME, SETTING_SETWINLOCATION, 0)) {

+			DBWriteContactSettingDword(NULL, MODULE_CLIST, SETTING_XPOS, DBGetContactSettingDword(NULL, MODULENAME, SETTING_XPOS, 0));

+			DBWriteContactSettingDword(NULL, MODULE_CLIST, SETTING_YPOS, DBGetContactSettingDword(NULL, MODULENAME, SETTING_YPOS, 0));

+		}

+		if (DBGetContactSettingByte(NULL, MODULENAME, SETTING_SETWINSIZE, 0)) {

+			DBWriteContactSettingDword(NULL, MODULE_CLIST, SETTING_WIDTH, DBGetContactSettingDword(NULL, MODULENAME, SETTING_WIDTH, 0));

+			if (!DBGetContactSettingByte(NULL, MODULE_CLUI, SETTING_AUTOSIZE, 0))

+				DBWriteContactSettingDword(NULL, MODULE_CLIST, SETTING_HEIGHT, DBGetContactSettingDword(NULL, MODULENAME, SETTING_HEIGHT, 0));

+		}

+		if ( GetWindowPlacement( hClist, &wndpl )) {

+			if ( wndpl.showCmd == SW_SHOWNORMAL && !CallService(MS_CLIST_DOCKINGISDOCKED, 0, 0)) {

+				RECT rc;

+				if (GetWindowRect(hClist, &rc)) {

+					int x = rc.left;

+					int y = rc.top;

+					int width = rc.right - rc.left;

+					int height = rc.bottom - rc.top;

+					if (DBGetContactSettingByte(NULL, MODULENAME, SETTING_SETWINLOCATION, 0)) {

+						x = DBGetContactSettingDword(NULL, MODULENAME, SETTING_XPOS, x);

+						y = DBGetContactSettingDword(NULL, MODULENAME, SETTING_YPOS, y);

+					}

+					if (DBGetContactSettingByte(NULL, MODULENAME, SETTING_SETWINSIZE, 0)) {

+						width = DBGetContactSettingDword(NULL, MODULENAME, SETTING_WIDTH, width);

+						if (!DBGetContactSettingByte(NULL, MODULE_CLUI, SETTING_AUTOSIZE, 0))

+							height = DBGetContactSettingDword(NULL, MODULENAME, SETTING_HEIGHT, height);

+					}

+					MoveWindow(hClist, x, y, width, height, TRUE);

+	}	}	}	}

+	

+	return 0;

+}