summaryrefslogtreecommitdiff
path: root/tools/_deprecated/StatusPlugins/commonstatus.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'tools/_deprecated/StatusPlugins/commonstatus.cpp')
-rw-r--r--tools/_deprecated/StatusPlugins/commonstatus.cpp328
1 files changed, 328 insertions, 0 deletions
diff --git a/tools/_deprecated/StatusPlugins/commonstatus.cpp b/tools/_deprecated/StatusPlugins/commonstatus.cpp
new file mode 100644
index 0000000000..621f5f372c
--- /dev/null
+++ b/tools/_deprecated/StatusPlugins/commonstatus.cpp
@@ -0,0 +1,328 @@
+/*
+ AdvancedAutoAway Plugin for Miranda-IM (www.miranda-im.org)
+ KeepStatus Plugin for Miranda-IM (www.miranda-im.org)
+ 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"
+
+// handles for hooks and other Miranda thingies
+static HANDLE hCSStatusChangedExEvent;
+
+OBJLIST<PROTOCOLSETTINGEX> *protoList;
+
+// prototypes
+char* StatusModeToDbSetting(int status, const char *suffix);
+DWORD StatusModeToProtoFlag(int status);
+INT_PTR SetStatusEx(WPARAM wParam, LPARAM lParam);
+int InitCommonStatus();
+int GetProtoCount();
+
+// extern
+extern INT_PTR ShowConfirmDialogEx(WPARAM wParam, LPARAM lParam);
+
+// some helpers from awaymsg.c ================================================================
+char *StatusModeToDbSetting(int status, const char *suffix)
+{
+ char *prefix;
+ static char str[64];
+
+ switch (status) {
+ case ID_STATUS_AWAY: prefix = "Away"; break;
+ case ID_STATUS_NA: prefix = "Na"; break;
+ case ID_STATUS_DND: prefix = "Dnd"; break;
+ case ID_STATUS_OCCUPIED: prefix = "Occupied"; break;
+ case ID_STATUS_FREECHAT: prefix = "FreeChat"; break;
+ case ID_STATUS_ONLINE: prefix = "On"; break;
+ case ID_STATUS_OFFLINE: prefix = "Off"; break;
+ case ID_STATUS_INVISIBLE: prefix = "Inv"; break;
+ case ID_STATUS_ONTHEPHONE: prefix = "Otp"; break;
+ case ID_STATUS_OUTTOLUNCH: prefix = "Otl"; break;
+ default: return NULL;
+ }
+ mir_strcpy(str, prefix); mir_strcat(str, suffix);
+ return str;
+}
+
+DWORD StatusModeToProtoFlag(int status)
+{
+ // *not* the same as in core, <offline>
+ switch (status) {
+ case ID_STATUS_ONLINE: return PF2_ONLINE;
+ case ID_STATUS_OFFLINE: return PF2_OFFLINE;
+ case ID_STATUS_INVISIBLE: return PF2_INVISIBLE;
+ case ID_STATUS_OUTTOLUNCH: return PF2_OUTTOLUNCH;
+ case ID_STATUS_ONTHEPHONE: return PF2_ONTHEPHONE;
+ case ID_STATUS_AWAY: return PF2_SHORTAWAY;
+ case ID_STATUS_NA: return PF2_LONGAWAY;
+ case ID_STATUS_OCCUPIED: return PF2_LIGHTDND;
+ case ID_STATUS_DND: return PF2_HEAVYDND;
+ case ID_STATUS_FREECHAT: return PF2_FREECHAT;
+ }
+ return 0;
+}
+
+int GetActualStatus(PROTOCOLSETTINGEX *protoSetting)
+{
+ if (protoSetting->status == ID_STATUS_LAST) {
+ if ((protoSetting->lastStatus < MIN_STATUS) || (protoSetting->lastStatus > MAX_STATUS))
+ return CallProtoService(protoSetting->szName, PS_GETSTATUS, 0, 0);
+ return protoSetting->lastStatus;
+ }
+ if (protoSetting->status == ID_STATUS_CURRENT)
+ return CallProtoService(protoSetting->szName, PS_GETSTATUS, 0, 0);
+
+ if ((protoSetting->status < ID_STATUS_OFFLINE) || (protoSetting->status > ID_STATUS_OUTTOLUNCH)) {
+ log_debugA("invalid status detected: %d", protoSetting->status);
+ return 0;
+ }
+ return protoSetting->status;
+}
+
+// helper, from core
+static wchar_t* GetDefaultMessage(int status)
+{
+ switch (status) {
+ case ID_STATUS_AWAY: return TranslateT("I've been away since %time%.");
+ case ID_STATUS_NA: return TranslateT("Give it up, I'm not in!");
+ case ID_STATUS_OCCUPIED: return TranslateT("Not right now.");
+ case ID_STATUS_DND: return TranslateT("Give a guy some peace, would ya?");
+ case ID_STATUS_FREECHAT: return TranslateT("I'm a chatbot!");
+ case ID_STATUS_ONLINE: return TranslateT("Yep, I'm here.");
+ case ID_STATUS_OFFLINE: return TranslateT("Nope, not here.");
+ case ID_STATUS_INVISIBLE: return TranslateT("I'm hiding from the mafia.");
+ case ID_STATUS_ONTHEPHONE: return TranslateT("That'll be the phone.");
+ case ID_STATUS_OUTTOLUNCH: return TranslateT("Mmm... food.");
+ case ID_STATUS_IDLE: return TranslateT("idleeeeeeee");
+ }
+ return NULL;
+}
+
+wchar_t* GetDefaultStatusMessage(PROTOCOLSETTINGEX *ps, int newstatus)
+{
+ if (ps->szMsg != NULL) {// custom message set
+ log_infoA("CommonStatus: Status message set by calling plugin");
+ return mir_wstrdup(ps->szMsg);
+ }
+
+ wchar_t *tMsg = (wchar_t*)CallService(MS_AWAYMSG_GETSTATUSMSGW, newstatus, (LPARAM)ps->szName);
+ log_debugA("CommonStatus: Status message retrieved from general awaysys: %S", tMsg);
+ return tMsg;
+}
+
+static int equalsGlobalStatus(PROTOCOLSETTINGEX **ps)
+{
+
+ int i, j, pstatus = 0, gstatus = 0;
+
+ for (i = 0; i < protoList->getCount(); i++)
+ if (ps[i]->szMsg != NULL && GetActualStatus(ps[i]) != ID_STATUS_OFFLINE)
+ return 0;
+
+ int count;
+ PROTOACCOUNT **protos;
+ Proto_EnumAccounts(&count, &protos);
+
+ for (i = 0; i < count; i++) {
+ if (!IsSuitableProto(protos[i]))
+ continue;
+
+ pstatus = 0;
+ for (j = 0; j < protoList->getCount(); j++)
+ if (!mir_strcmp(protos[i]->szModuleName, ps[j]->szName))
+ pstatus = GetActualStatus(ps[j]);
+
+ if (pstatus == 0)
+ pstatus = CallProtoService(protos[i]->szModuleName, PS_GETSTATUS, 0, 0);
+
+ if (db_get_b(NULL, protos[i]->szModuleName, "LockMainStatus", 0)) {
+ // if proto is locked, pstatus must be the current status
+ if (pstatus != CallProtoService(protos[i]->szModuleName, PS_GETSTATUS, 0, 0))
+ return 0;
+ }
+ else {
+ if (gstatus == 0)
+ gstatus = pstatus;
+
+ if (pstatus != gstatus)
+ return 0;
+ }
+ }
+
+ return gstatus;
+}
+
+static void SetStatusMsg(PROTOCOLSETTINGEX *ps, int newstatus)
+{
+ wchar_t* tszMsg = GetDefaultStatusMessage(ps, newstatus);
+ if (tszMsg) {
+ /* replace the default vars in msg (I believe this is from core) */
+ for (int j = 0; tszMsg[j]; j++) {
+ if (tszMsg[j] != '%')
+ continue;
+
+ wchar_t substituteStr[128];
+ if (!wcsnicmp(tszMsg + j, L"%time%", 6))
+ GetTimeFormat(LOCALE_USER_DEFAULT, TIME_NOSECONDS, 0, 0, substituteStr, _countof(substituteStr));
+ else if (!wcsnicmp(tszMsg + j, L"%date%", 6))
+ GetDateFormat(LOCALE_USER_DEFAULT, DATE_SHORTDATE, 0, 0, substituteStr, _countof(substituteStr));
+ else
+ continue;
+
+ if (mir_wstrlen(substituteStr) > 6)
+ tszMsg = (wchar_t*)mir_realloc(tszMsg, sizeof(wchar_t)*(mir_wstrlen(tszMsg) + 1 + mir_wstrlen(substituteStr) - 6));
+ memmove(tszMsg + j + mir_wstrlen(substituteStr), tszMsg + j + 6, sizeof(wchar_t)*(mir_wstrlen(tszMsg) - j - 5));
+ memcpy(tszMsg + j, substituteStr, sizeof(wchar_t)*mir_wstrlen(substituteStr));
+ }
+
+ wchar_t *szFormattedMsg = variables_parsedup(tszMsg, ps->tszAccName, NULL);
+ if (szFormattedMsg != NULL) {
+ mir_free(tszMsg);
+ tszMsg = szFormattedMsg;
+ }
+ }
+ log_debugA("CommonStatus sets status message for %s directly", ps->szName);
+ CallProtoService(ps->szName, PS_SETAWAYMSG, newstatus, (LPARAM)tszMsg);
+ mir_free(tszMsg);
+}
+
+INT_PTR SetStatusEx(WPARAM wParam, LPARAM)
+{
+ PROTOCOLSETTINGEX** protoSettings = *(PROTOCOLSETTINGEX***)wParam;
+ if (protoSettings == NULL)
+ return -1;
+
+ int globStatus = equalsGlobalStatus(protoSettings);
+
+ // issue with setting global status;
+ // things get messy because SRAway hooks ME_CLIST_STATUSMODECHANGE, so the status messages of SRAway and
+ // commonstatus will clash
+ NotifyEventHooks(hCSStatusChangedExEvent, (WPARAM)&protoSettings, protoList->getCount());
+
+ // set all status messages first
+ for (int i = 0; i < protoList->getCount(); i++) {
+ char *szProto = protoSettings[i]->szName;
+ if (!Proto_GetAccount(szProto)) {
+ log_debugA("CommonStatus: %s is not loaded", szProto);
+ continue;
+ }
+ // some checks
+ int newstatus = GetActualStatus(protoSettings[i]);
+ if (newstatus == 0) {
+ log_debugA("CommonStatus: incorrect status for %s (%d)", szProto, protoSettings[i]->status);
+ continue;
+ }
+ int oldstatus = CallProtoService(szProto, PS_GETSTATUS, 0, 0);
+ // set last status
+ protoSettings[i]->lastStatus = oldstatus;
+ if (IsStatusConnecting(oldstatus)) {
+ // ignore if connecting, but it didn't came this far if it did
+ log_debugA("CommonStatus: %s is already connecting", szProto);
+ continue;
+ }
+
+ // status checks
+ long protoFlag = Proto_Status2Flag(newstatus);
+ int b_Caps2 = CallProtoService(szProto, PS_GETCAPS, PFLAGNUM_2, 0) & protoFlag;
+ int b_Caps5 = CallProtoService(szProto, PS_GETCAPS, PFLAGNUM_5, 0) & protoFlag;
+ if (newstatus != ID_STATUS_OFFLINE && (!b_Caps2 || b_Caps5)) {
+ // status and status message for this status not supported
+ //log_debug("CommonStatus: status not supported %s", szProto);
+ continue;
+ }
+
+ int b_Caps1 = CallProtoService(szProto, PS_GETCAPS, PFLAGNUM_1, 0) & PF1_MODEMSGSEND & ~PF1_INDIVMODEMSG;
+ int b_Caps3 = CallProtoService(szProto, PS_GETCAPS, PFLAGNUM_3, 0) & protoFlag;
+ if (newstatus == oldstatus && (!b_Caps1 || !b_Caps3)) {
+ // no status change and status messages are not supported
+ //log_debug("CommonStatus: no change, %s (%d %d)", szProto, oldstatus, newstatus);
+ continue;
+ }
+
+ // set status message first
+ if (b_Caps1 && b_Caps3)
+ SetStatusMsg(protoSettings[i], newstatus);
+
+ // set the status
+ if (newstatus != oldstatus /*&& !(b_Caps1 && b_Caps3 && ServiceExists(MS_NAS_SETSTATE))*/) {
+ log_debugA("CommonStatus sets status for %s to %d", szProto, newstatus);
+ CallProtoService(szProto, PS_SETSTATUS, newstatus, 0);
+ }
+ }
+
+ if (globStatus != 0) {
+ if (!ServiceExists(MS_CLIST_SETSTATUSMODE)) {
+ log_debugA("CommonStatus: MS_CLIST_SETSTATUSMODE not available!");
+ return -1;
+ }
+ log_debugA("CommonStatus: setting global status %u", globStatus);
+ CallService(MS_CLIST_SETSTATUSMODE, globStatus, 0);
+ }
+
+ return 0;
+}
+
+static INT_PTR GetProtocolCountService(WPARAM, LPARAM)
+{
+ return GetProtoCount();
+}
+
+bool IsSuitableProto(PROTOACCOUNT *pa)
+{
+ return (pa == NULL) ? false : (pcli->pfnGetProtocolVisibility(pa->szModuleName) != 0);
+}
+
+int GetProtoCount()
+{
+ int pCount = 0, count;
+ PROTOACCOUNT **accs;
+ Proto_EnumAccounts(&count, &accs);
+
+ for (int i = 0; i < count; i++)
+ if (IsSuitableProto(accs[i]))
+ pCount++;
+
+ return pCount;
+}
+
+static int CreateServices()
+{
+ if (ServiceExists(MS_CS_SETSTATUSEX))
+ return -1;
+
+ hCSStatusChangedExEvent = CreateHookableEvent(ME_CS_STATUSCHANGEEX);
+
+ CreateServiceFunction(MS_CS_SETSTATUSEX, SetStatusEx);
+ CreateServiceFunction(MS_CS_SHOWCONFIRMDLGEX, ShowConfirmDialogEx);
+ CreateServiceFunction(MS_CS_GETPROTOCOUNT, GetProtocolCountService);
+ return 0;
+}
+
+static int onShutdown(WPARAM, LPARAM)
+{
+ DestroyHookableEvent(hCSStatusChangedExEvent);
+ return 0;
+}
+
+int InitCommonStatus()
+{
+ if (!CreateServices())
+ HookEvent(ME_SYSTEM_PRESHUTDOWN, onShutdown);
+
+ return 0;
+}