diff options
Diffstat (limited to 'newstatusnotify/main.c')
| -rw-r--r-- | newstatusnotify/main.c | 2378 |
1 files changed, 0 insertions, 2378 deletions
diff --git a/newstatusnotify/main.c b/newstatusnotify/main.c deleted file mode 100644 index 3885d73..0000000 --- a/newstatusnotify/main.c +++ /dev/null @@ -1,2378 +0,0 @@ -/*
-===============================================================================
- NewStatusNotify plugin
-
-This plugin notifies you when a contact changes his/hers status with a PopUp.
-You can customize its look (style of popup, font, text...) and behaviour (the
-position in the screen, the time to live, the action on a mouse click).
-
-File name: "main.c"
-
-Written by: Hrk (Luca Santarelli) (2002-2004), Vasilich (2005-2008)
-
-Miranda IM can be found here:
-http://miranda-im.org/
-
-===============================================================================
-*/
-
-#define _MERGE_RDATA_
-#include "newstatusnotify.h"
-#include "res\version.h"
-
-//extern int CallServiceSync(const char *name, WPARAM wParam, LPARAM lParam);
-
-/*
-HANDLE hContact = (HANDLE)wParam;
-WORD oldStatus = LOWORD(lParam);
-WORD newStatus = HIWORD(lParam);
-oldStatus is the status the contact was before the change.
-newStatus is the status the contact is now.
-Cast them to (int) if you need them that way.
-*/
-#define ME_STATUSCHANGE_CONTACTSTATUSCHANGED "Miranda/StatusChange/ContactStatusChanged"
-
-//malloc functions
-//#define malloc(size) GlobalAlloc(GMEM_ZEROINIT | GMEM_FIXED, size)
-//#define free(something) GlobalFree(something)
-
-const char* ModuleName = "NewStatusNotify";
-//const char *ModuleIndSounds = "NewStatusNotifyIS";
-
-#define POPUPCOLOR_BG_40071 RGB(0x80, 0x80, 0x80)
-#define POPUPCOLOR_TX_40071 RGB(0xFF, 0xFF, 0xFF)
-#define POPUPCOLOR_BG_40072 RGB(0x95, 0x95, 0xFF)
-#define POPUPCOLOR_TX_40072 RGB(0x00, 0x00, 0xFF)
-#define POPUPCOLOR_BG_40073 RGB(0x00, 0x40, 0x80)
-#define POPUPCOLOR_TX_40073 RGB(0xFF, 0xFF, 0xFF)
-#define POPUPCOLOR_BG_40074 RGB(0x00, 0x00, 0x00)
-#define POPUPCOLOR_TX_40074 RGB(0xFF, 0x00, 0x00)
-#define POPUPCOLOR_BG_40075 RGB(0x00, 0x00, 0x80)
-#define POPUPCOLOR_TX_40075 RGB(0xFF, 0xFF, 0xFF)
-#define POPUPCOLOR_BG_40076 RGB(0xFF, 0x80, 0x80)
-#define POPUPCOLOR_TX_40076 RGB(0x00, 0x00, 0x00)
-#define POPUPCOLOR_BG_40077 RGB(0xFF, 0xFF, 0x00)
-#define POPUPCOLOR_TX_40077 RGB(0x00, 0x00, 0x00)
-#define POPUPCOLOR_BG_40078 RGB(0xC0, 0xC0, 0xC0)
-#define POPUPCOLOR_TX_40078 RGB(0x60, 0x60, 0x60)
-#define POPUPCOLOR_BG_40079 RGB(0x00, 0x80, 0x00)
-#define POPUPCOLOR_TX_40079 RGB(0xFF, 0xFF, 0xFF)
-#define POPUPCOLOR_BG_40080 RGB(0x00, 0xFF, 0x00)
-#define POPUPCOLOR_TX_40080 RGB(0x00, 0x00, 0x00)
-
-//Actions
-#define ACTION_OPENMSG 0x01
-#define ACTION_DISMISS 0x02
-#define ACTION_USERMENU 0x03
-
-#define BEEP_DURATION_DEFAULT 155
-#define BEEP_HZ_DEFAULT 155
-
-#define UM_SETDLGITEMINT 5674
-
-#define PROTO_POPUPS_ON 1
-#define PROTO_POPUPS_OFF 0
-
-#define UM_SETCONTACT (WM_USER + 452)
-#define UM_PROCESS (WM_USER + 453)
-
-#define TIMEOUT_POPUP 1
-#define TIMEOUT_CUSTOM 2
-#define TIMEOUT_PERMANENT 3
-#define TIMEOUT_MINVALUE 1
-#define TIMEOUT_MAXVALUE 60
-
-//Defaults
-#define DEFAULT_PROTO_POPUPS PROTO_POPUPS_ON
-#define DEFAULT_USEWINCOLORS 0
-#define DEFAULT_USEDULLTEXT 0
-#define DEFAULT_TEMPDISABLE 0
-#define DEFAULT_AUTODISABLE 0
-#define DEFAULT_FROMOFFLINE 1
-#define DEFAULT_ENABLESOUNDS 1
-#define DEFAULT_USESPEAKER 0
-#define DEFAULT_AVOIDCLIPPING 1
-#define DEFAULT_HIDDENCONTACTSTOO 0
-#define DEFAULT_SHOWONCONNECTION 0
-#define DEFAULT_SHOWDISABLEMENU 1
-#define DEFAULT_NOTIFYWITHPOPUP 1
-#define DEFAULT_NOTIFYWITHSOUND 1
-#define DEFAULT_READAWAYMSG 0
-#define DEFAULT_SHOWPREVIOUSSTATUS 0
-#define DEFAULT_LOG 0
-#define DEFAULT_LOGFILE _T("NewStatusNotify.log")
-#define DEFAULT_BLINKICON FALSE
-#define DEFAULT_BLINKICON_STATUS FALSE
-#define DEFAULT_TIMEOUT TIMEOUT_POPUP
-#define DEFAULT_TIMEOUT_VALUE 7
-#define DEFAULT_USE_IND_SOUNDS 1
-#define DEFAULT_SHOWGROUP 0
-
-#define STRING_SHOWPREVIOUSSTATUS _T("(was %s)")
-/*This is needed to send a message with safe multithreading.
-We'll create a private hook and we'll call it via NotifyEventHooks, which brings execution
-back to the main thread.
-What we'll need is:
-- hHookSendMessage, the handle to the created hook.
-- hSendMessage, the hook we'll use (i.e.: the hook which will be notified)
-- ME_NSN_CONTACTSENDMESSAGE, the service name
-- ContactSendMessage(WPARAM, LPARAM) which will do the job
-- (finally) move the send code to ContactSendMessage and put a NotifyEventHooks inside WM_COMMAND.
-*/
-
-#define ME_NSN_CONTACTSENDMESSAGE "NewStatusNotify/ContactSendMessage"
-
-#define WM_AWAYMSG (WM_USER + 0x0192)
-//===== PopUp =====
-LRESULT CALLBACK PopupDlgProc(HWND, UINT, WPARAM, LPARAM);
-//===== DB functions =====
-BYTE GetGender(HANDLE);
-//===== MessageBoxes =====
-void Log(TCHAR*); //This one is used to notify the user
-
-static int ModulesLoaded(WPARAM wParam,LPARAM lParam);
-//===== Options =====
-void LoadOptions();
-void installMainMenuItem();
-static int OptionsInitialize(WPARAM,LPARAM);
-static BOOL CALLBACK DlgProcGeneralOpts(HWND, UINT, WPARAM, LPARAM);
-static BOOL CALLBACK DlgProcPopUpOpts(HWND, UINT, WPARAM, LPARAM);
-extern BOOL CALLBACK DlgProcSoundOpts2(HWND, UINT, WPARAM, LPARAM);
-extern BOOL CALLBACK DlgProcSoundUIPage(HWND, UINT, WPARAM, LPARAM);
-static BOOL CALLBACK DlgProcAutoDisableOpts(HWND, UINT, WPARAM, LPARAM);
-static int OpenUserDetails(WPARAM, LPARAM);
-extern int UserInfoInitialise(WPARAM, LPARAM);
-//===== Plugin specific =====
-static int ContactSettingChanged(WPARAM,LPARAM);
-static int ContactStatusChanged(WPARAM, LPARAM);
-static int EnableDisableMenuCommand(WPARAM,LPARAM);
-static int ProtoAck(WPARAM,LPARAM);
-static int ContactSendMessage(WPARAM, LPARAM);
-static BOOL StatusHasAwayMessage(char *szProto, int status);
-void PlaySpeakerBeep(void);
-int SortPUWinList(void* it1, void * it2);
-
-//===== Initializations =====
-void InitStatusList();
-void InitPopUpFont();
-
-//HANDLE hhkProtoAck = NULL;
-HANDLE hPopupList = NULL;
-void CALLBACK ConnectionTimerProc(HWND,UINT,UINT,DWORD);
-void ReceivedAwayMessage(HWND, LPARAM , PLUGINDATA *);
-void ReceivedStatusMessage (HANDLE, BOOL);
-BOOL QueryAwayMessage(HWND , PLUGINDATA *);
-
-//===== Global variables =====
-//===== General Plugin =====
-HINSTANCE hInst;
-PLUGINLINK *pluginLink;
-//CLISTMENUITEM mi;
-int hEnableDisableMenu;
-BOOL IsOptionsOpened=FALSE;
-//===== Event Handles =====
-HANDLE hOptionsInitialize, hModulesLoaded, hOpenUserDetails;
-HANDLE hUserInfoInitialise;
-HANDLE hContactSettingChanged, hHookContactStatusChanged, hContactStatusChanged;
-//HANDLE hEventStatusModeChange;
-HANDLE hProtoAck;
-HANDLE hHookSendMessage, hSendMessage; //Internal "private" event.
-//HANDLE hHookMenuProcessCommand, hMenuProcessCommand; //Internal "private" event.
-HANDLE hServiceMenu;
-extern HWND hCListClone;
-HWND SecretWnd;
-//HWND hRightClickWnd; //This is needed to bring menu commands back to the main Miranda thread.
-//static LRESULT CALLBACK RightClickWndProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
-//===== Other stuff... =====
-BYTE count = 0;
-int uniqueEventId = 0;
-#define ID_STATUS_ALLSTATUSES 40070
-#define STATUSES 11
-aStatus StatusesList[STATUSES];
-MYOPTIONS MyOptions = { 0 };
-struct MM_INTERFACE mmi = { 0 };
-struct LIST_INTERFACE li = { 0 };
-SortedList *PopupList = NULL;
-
-//===== Plugin informations struct =====
-PLUGININFO pluginInfo={
- sizeof(PLUGININFO),
- __PLUGIN_NAME,
- PLUGIN_MAKE_VERSION(__MAJOR_VERSION, __MINOR_VERSION, __RELEASE_NUM, __BUILD_NUM),
- __DESC,
- __AUTHOR,
- __AUTHOREMAIL,
- __COPYRIGHT,
- __AUTHORWEB,
- UNICODE_AWARE,
- DEFMOD_RNDUSERONLINE //Replaces UserOnline functionality
-};
-
-//===== New Plugin informations struct =====
-PLUGININFOEX pluginInfoEx={
- sizeof(PLUGININFOEX),
- __PLUGIN_NAME,
- PLUGIN_MAKE_VERSION(__MAJOR_VERSION, __MINOR_VERSION, __RELEASE_NUM, __BUILD_NUM),
- __DESC,
- __AUTHOR,
- __AUTHOREMAIL,
- __COPYRIGHT,
- __AUTHORWEB,
- UNICODE_AWARE,
- DEFMOD_RNDUSERONLINE, //Replaces UserOnline functionality
- MIID_NSN
-};
-
-//===== Basic plugin (template) functions =====
-//=== DllMain =====
-BOOL WINAPI DllMain(HINSTANCE hinstDLL,DWORD fdwReason,LPVOID lpvReserved) {
- hInst=hinstDLL;
- DisableThreadLibraryCalls(hInst);
- return TRUE;
-}
-
-//===== MirandaPluginInfo =====
-//extern "C"
-__declspec(dllexport) PLUGININFO* MirandaPluginInfo(DWORD mirandaVersion) {
- return &pluginInfo;
-}
-
-//extern "C"
-__declspec(dllexport) PLUGININFOEX* MirandaPluginInfoEx(DWORD mirandaVersion) {
- return &pluginInfoEx;
-}
-
-static const MUUID interfaces[] = { MIID_USERONLINE, MIID_LAST };
-
-__declspec(dllexport) const MUUID *MirandaPluginInterfaces(void) {
- return interfaces;
-}
-
-//===== Load =====
-//extern "C"
-int __declspec(dllexport) Load(PLUGINLINK *link) {
- int i = 0;
- pluginLink=link;
- mir_getMMI(&mmi);
- mir_getLI(&li);
-
- //Hooks
- //"Service" Hook, used when the DB settings change: we'll monitor the "status" setting.
- hContactSettingChanged = HookEvent(ME_DB_CONTACT_SETTINGCHANGED,ContactSettingChanged);
- //We create this Hook which will notify everyone when a contact changes his status.
- hHookContactStatusChanged = CreateHookableEvent(ME_STATUSCHANGE_CONTACTSTATUSCHANGED);
- hModulesLoaded = HookEvent(ME_SYSTEM_MODULESLOADED, ModulesLoaded);
- //We add the option page and the user info page (it's needed because options are loaded after plugins)
- hOptionsInitialize = HookEvent(ME_OPT_INITIALISE,OptionsInitialize);
- //Protocol status: we use this for "PopUps on Connection".
- hProtoAck = HookEvent(ME_PROTO_ACK,ProtoAck);
- //This is needed for "NoSound"-like routines.
-// hEventStatusModeChange = HookEvent(ME_CLIST_STATUSMODECHANGE,StatusModeChanged);
- //open user details dialog on proper page when clicking on contact in our SOUNDS2 options page
- hOpenUserDetails=HookEvent(ME_CLIST_DOUBLECLICKED, OpenUserDetails);
- //Internal hooks used to bring the send dialog to the main thread.
- hHookSendMessage = CreateHookableEvent(ME_NSN_CONTACTSENDMESSAGE);
- hSendMessage = HookEvent(ME_NSN_CONTACTSENDMESSAGE, ContactSendMessage);
-// hHookMenuProcessCommand = CreateHookableEvent(ME_NSN_CONTACTMENUPROCESSCOMMAND);
-// hMenuProcessCommand = HookEvent(ME_NSN_CONTACTMENUPROCESSCOMMAND, ContactMenuProcessCommand);
- //Menu item
- if (DBGetContactSettingByte(NULL,ModuleName,"ShowDisableMenu",DEFAULT_SHOWDISABLEMENU)==TRUE)
- installMainMenuItem();
-/* {
- CLISTMENUITEM mi = { 0 };
- CreateServiceFunction("NewStatusNotify/EnableDisableMenuCommand",EnableDisableMenuCommand);
- mi.cbSize = sizeof(mi);
- //mi.position=-0x7FFFFFFF;
- mi.flags=0;
- if (DBGetContactSettingByte(NULL,ModuleName,"TempDisable",DEFAULT_TEMPDISABLE)==TRUE)
- {
- //If Miranda is 0.1.2.1-, we can't change both text and icon.
- //If it's 0.1.2.2+, we can and we do.
- mi.pszName = Translate("Enable status ¬ification");
- //if (CallService(MS_SYSTEM_GETVERSION,(WPARAM)0,(LPARAM)0) >= 0x00010202)
- mi.hIcon = LoadIcon(hInst,MAKEINTRESOURCE(IDI_NOPOPUP));
- }
- else
- {
- mi.pszName = Translate("Disable status ¬ification");
- //if (CallService(MS_SYSTEM_GETVERSION,(WPARAM)0,(LPARAM)0) >= 0x00010202)
- mi.hIcon = LoadIcon(hInst,MAKEINTRESOURCE(IDI_POPUP));
- }
- mi.pszService="NewStatusNotify/EnableDisableMenuCommand";
- mi.pszPopupName = NULL; //Translate("PopUps");
- hEnableDisableMenu = CallService(MS_CLIST_ADDMAINMENUITEM,0,(LPARAM)&mi);
- }
-*/
- InitStatusList();
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++)
- SkinAddNewSoundEx( StatusesList[Index(i)].lpzSkinSoundName, "Status Notify", StatusesList[Index(i)].lpzSkinSoundDesc);
-
- SkinAddNewSoundEx("UserFromOffline", "Status Notify", "User: from offline (has priority!)");
- count = 0;
-
- LoadOptions();
- CallService(MS_DB_SETSETTINGRESIDENT, (WPARAM)TRUE,(LPARAM)"MetaContacts/LastOnline");
- CallService(MS_DB_SETSETTINGRESIDENT, (WPARAM)TRUE,(LPARAM)"NewStatusNotify/"LASTPOPUPTEXT);
-
- //if (PopupList == NULL)
- PopupList = li.List_Create(0,10);
- PopupList->sortFunc = SortPUWinList;
- return 0;
-}
-
-//===== Unload =====
-//extern "C"
-int __declspec(dllexport) Unload(void) {
- li.List_Destroy(PopupList);
- //Hooks
- UnhookEvent(hContactSettingChanged);
- UnhookEvent(hOptionsInitialize);
- UnhookEvent(hModulesLoaded);
- UnhookEvent(hUserInfoInitialise);
- //UnhookEvent(hEventStatusModeChange);
- UnhookEvent(hProtoAck);
- UnhookEvent(hSendMessage);
- UnhookEvent(hOpenUserDetails);
-
- DestroyHookableEvent(hHookContactStatusChanged);
- DestroyHookableEvent(hHookSendMessage);
-
- if (ServiceExists("NewStatusNotify/EnableDisableMenuCommand"))
- DestroyServiceFunction(hServiceMenu);
-
-// UnhookEvent(hMenuProcessCommand);
- return 0;
-}
-/*
-#ifdef _TINYCONFIG
-BOOL WINAPI _DllMainCRTStartup(HINSTANCE hinstDLL,DWORD fdwReason,LPVOID lpReserved)
-{
- return DllMain(hinstDLL,fdwReason,lpReserved);
-}
-#endif
-*/
-
-//===== Options pages =====
-void LoadOptions() {
- //ZeroMemory(&MyOptions, sizeof(MyOptions));
- //PopUp Options
- MyOptions.Colors =DBGetContactSettingByte(NULL,ModuleName, "Colors", DEFAULT_COLORS);
- MyOptions.UseDullText = DBGetContactSettingByte(NULL, ModuleName, "UseDullText", DEFAULT_USEDULLTEXT);
- MyOptions.ReadAwayMsg = DBGetContactSettingByte(NULL, ModuleName, "ReadAwayMsg", DEFAULT_READAWAYMSG);
- MyOptions.ShowGroup = DBGetContactSettingByte(NULL, ModuleName, "ShowGroup", DEFAULT_SHOWGROUP);
- MyOptions.ShowPreviousStatus = DBGetContactSettingByte(NULL, ModuleName, "ShowPreviousStatus", DEFAULT_SHOWPREVIOUSSTATUS);
- MyOptions.FromOfflinePopup = DBGetContactSettingByte(NULL, ModuleName, "FromOfflinePopup", 0);
- //General Options
- MyOptions.FromOffline = DBGetContactSettingByte(NULL, ModuleName, "FromOffline", DEFAULT_FROMOFFLINE);
- MyOptions.TempDisable = DBGetContactSettingByte(NULL, ModuleName, "TempDisable", DEFAULT_TEMPDISABLE);
- MyOptions.AutoDisable = DBGetContactSettingByte(NULL, ModuleName, "AutoDisable", DEFAULT_AUTODISABLE);
- MyOptions.EnableSoundForMyCurrentStatus = DEFAULT_NOTIFYWITHSOUND;
- MyOptions.EnablePopupForMyCurrentStatus = DEFAULT_NOTIFYWITHPOPUP;
- MyOptions.UseSpeaker = DBGetContactSettingByte(NULL, ModuleName, "UseSpeaker", DEFAULT_USESPEAKER);
- MyOptions.AvoidClipping = DBGetContactSettingByte(NULL, ModuleName, "AvoidClipping", DEFAULT_AVOIDCLIPPING);
- MyOptions.HiddenContactsToo = DBGetContactSettingByte(NULL, ModuleName, "HiddenContactsToo", DEFAULT_HIDDENCONTACTSTOO);
- MyOptions.Log = DBGetContactSettingByte(NULL, ModuleName, "Log", DEFAULT_LOG);
- MyOptions.BlinkIcon = DBGetContactSettingByte(NULL, ModuleName, "BlinkIcon", DEFAULT_BLINKICON);
- MyOptions.BlinkIcon_Status = DBGetContactSettingByte(NULL, ModuleName, "BlinkIcon_Status", DEFAULT_BLINKICON_STATUS);
- MyOptions.byTimeout = DBGetContactSettingByte(NULL, ModuleName, "byTimeout", DEFAULT_TIMEOUT);
- MyOptions.iTimeout = DBGetContactSettingDword(NULL, ModuleName, "iTimeout", DEFAULT_TIMEOUT_VALUE);
- MyOptions.UseIndSnd = DBGetContactSettingByte(NULL, ModuleName, "UseIndSounds", DEFAULT_USE_IND_SOUNDS);
- return;
-}
-
-static int OptionsInitialize(WPARAM wParam,LPARAM lParam) {
- OPTIONSDIALOGPAGE odp = { 0 };
-
- odp.cbSize = sizeof(odp);
- odp.position = 100000000;
- odp.hInstance = hInst;
- odp.pszTemplate = MAKEINTRESOURCEA(IDD_NSN_OPT);
- odp.pszTitle = "Notify";
- odp.pszGroup = "Status";
- odp.groupPosition = 910000000;
- odp.flags=ODPF_BOLDGROUPS;
- odp.pfnDlgProc = DlgProcGeneralOpts;
- CallService(MS_OPT_ADDPAGE,wParam,(LPARAM)&odp);
-
- if (ServiceExists(MS_POPUP_ADDPOPUP)) {
- ZeroMemory(&odp,sizeof(odp));
- odp.cbSize = sizeof(odp);
- odp.position = 100000000;
- odp.hInstance = hInst;
- odp.pszTemplate = MAKEINTRESOURCEA(IDD_NSN_OPT_POPUP);
- odp.pszTitle = "Status Notify";
- odp.pszGroup = "PopUps";
- odp.groupPosition = 910000000;
- odp.flags=ODPF_BOLDGROUPS;
- odp.pfnDlgProc = DlgProcPopUpOpts;
- CallService(MS_OPT_ADDPAGE,wParam,(LPARAM)&odp);
- }
- ZeroMemory(&odp,sizeof(odp));
- odp.cbSize = sizeof(odp);
- odp.position = 100000000;
- odp.hInstance = hInst;
- odp.pszTemplate = MAKEINTRESOURCEA(IDD_NSN_OPT_EVENTS_ENABLE);
- odp.pszTitle = "Status Notify";
- odp.pszGroup = "Events";
- odp.groupPosition = 910000000;
- odp.flags=ODPF_BOLDGROUPS;
- odp.pfnDlgProc = DlgProcSoundOpts2;
- CallService(MS_OPT_ADDPAGE,wParam,(LPARAM)&odp);
- return 0;
-}
-
-//===== MessageBoxes =====
-void Log(TCHAR* str) {
- MessageBox(NULL, str, _T("NewStatusNotify"), MB_OK | MB_ICONINFORMATION);
-}
-
-void HigherLower(int maxValue, int minValue) {
- TCHAR str[64] = { 0 };
- wsprintf(str, TranslateT("You cannot specify a value lower than %d and higher than %d."), minValue, maxValue);
- Log(str);
-}
-
-//====== list function===
-int SortPUWinList(void* it1, void * it2) {
- PUWinItem* item1=(PUWinItem*)it1;
- PUWinItem* item2=(PUWinItem*)it2;
- return (int)(item1->hContact) - (int)(item2->hContact);
-}
-
-//===== DB Functions ====
-//This function has the purpose of finding out the gender of a given contact.
-//Currently only ICQ supports gender, as far as I know, but this could change in
-//the future (i.e.: if I make a LAN protocol plugin).
-//It works quite easy: it gets the base protocol for the contact and compares it
-//with the known protocols. This can't be done automatically because each protocol
-//could store gender informations in a different way, so it'a all manual.
-//The first comparison which goes fine, checks for the gender and returns.
-#define GENDER_UNSPECIFIED 0
-#define GENDER_MALE 1
-#define GENDER_FEMALE 2
-
-BYTE GetGender(HANDLE hContact) {
- char* lpzProtocol =(char*)CallService(MS_PROTO_GETCONTACTBASEPROTO,(WPARAM)hContact,0);
- if (lpzProtocol) {
- switch (DBGetContactSettingByte((HANDLE)hContact,lpzProtocol,"Gender",0)) {
- case 'M':
- case 'm':
- return GENDER_MALE;
- case 'F':
- case 'f':
- return GENDER_FEMALE;
- default:
- return GENDER_UNSPECIFIED;
- }
- }
- else
- return GENDER_UNSPECIFIED;
-}
-// New Status Notify PopUp Window Message Proc
-LRESULT CALLBACK PopupDlgProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) {
- HANDLE hContact = NULL;
- PLUGINDATA * pdp = NULL;
- char *szProto={0};
- hContact = PUGetContact(hwnd);
-
- switch(message) {
- case WM_MEASUREITEM: //Needed by the contact's context menu
- return CallService(MS_CLIST_MENUMEASUREITEM,wParam,lParam);
- case WM_DRAWITEM: //Needed by the contact's context menu
- return CallService(MS_CLIST_MENUDRAWITEM,wParam,lParam);
- case WM_COMMAND: { //This one returns TRUE if it processed the menu command, and FALSE if it did not process it.
- if(CallServiceSync(MS_CLIST_MENUPROCESSCOMMAND, MAKEWPARAM(LOWORD(wParam),MPCF_CONTACTMENU),(LPARAM)hContact))
- break;
- //If we get here, it was not a menu process command, but a click on one of our controls.
- if (hContact > 0) {
- //Get the plugin data (we need the PopUp service to do it)
- pdp = (PLUGINDATA*)PUGetPluginData(hwnd);
- if (!pdp || ((int)pdp == -1))
- return 0; // (== -1, == 0);
- //If the contact (MS_POPUP_GETCONTACT) is < 0 (wrong) or = 0 (it's us) we do exit.
- //Now we can act.
- if ((DBGetContactSettingByte(NULL, ModuleName, "LeftClickAction", ACTION_OPENMSG) == ACTION_OPENMSG)
- /*&& (pdp->newStatus != ID_STATUS_OFFLINE) */)
- NotifyEventHooks(hHookSendMessage, (WPARAM)hContact, 0);
- }
- //After a click, we destroy it nevertheless: message window or not.
- PUDeletePopUp(hwnd);
- break;
- }
- case WM_CONTEXTMENU: {
- if (DBGetContactSettingByte(NULL, ModuleName, "RightClickAction", ACTION_DISMISS) == ACTION_DISMISS)
- PUDeletePopUp(hwnd);
- else {
- //What do I do? This:
- if (hContact < 0) break;
- if (hContact != NULL) {
- POINT pt = { 0 };
- HMENU hMenu=(HMENU)CallService(MS_CLIST_MENUBUILDCONTACT,(WPARAM)hContact,0);
- GetCursorPos(&pt);
- TrackPopupMenu(hMenu,0,pt.x,pt.y,0,hwnd,NULL);
- DestroyMenu(hMenu);
- }
- }
- break;
- }
- case UM_FREEPLUGINDATA: {
- PUWinItem PULItem = {0};
- PUWinItem* pPULItem = {0};
- //PLUGINDATA * pdp = {0};
- pdp = (PLUGINDATA*)PUGetPluginData(hwnd);
- if (pdp != 0) {
-// if (pdp->hAwayMsgHook != NULL) UnhookEvent(pdp->hAwayMsgHook);
- mir_free(pdp);
- }
- PULItem.hContact = hContact;
- pPULItem = li.List_Find(PopupList, &PULItem);
- if ( (pPULItem != NULL) && (pPULItem->hWnd == hwnd ) ) // if we have item in list for this contact and this window
- li.List_RemovePtr(PopupList, pPULItem);
- return 0;
- //break;
- }
- case UM_INITPOPUP: {
- pdp = (PLUGINDATA*)PUGetPluginData(hwnd);
-
- if (!PUIsSecondLineShown()) //There is no second line, it's not needed to check for away message.
- return 0;
-
- szProto= (char*)CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)(HANDLE)PUGetContact(hwnd),(LPARAM)0);
-
- if (MyOptions.ReadAwayMsg && StatusHasAwayMessage(szProto, pdp->newStatus)) {
-// BOOL bNeedCreateItem;
- PUWinItem PULItem = {0};
- PUWinItem* pPULItem = {0};
- PULItem.hContact = hContact;
- pPULItem = li.List_Find(PopupList, &PULItem);
- if ((pPULItem != NULL) /*&& (pPULItem->hWnd != NULL)*/) // if we have any list item for this contact AND popup already exists
-// li.List_RemovePtr(PopupList, pPULItem); // remove item from popupList to have only ONE entry for that contact in list
- {
- pPULItem->hWnd = hwnd;
- time(&(pPULItem->TimeStamp));
- }
-
- // if we (had any list item for this contact AND popup already exists) OR do not have any item for this contact
- /*bNeedCreateItem = ((pPULItem != NULL) && (pPULItem->hWnd != NULL)) || (pPULItem == NULL);
- if (bNeedCreateItem)
- {
- pPULItem = (PUWinItem*)mir_alloc(sizeof(PULItem)); // create new list item
- pPULItem->hContact = hContact;
- lstrcpyn(pPULItem->StatMsg, _T(""), MAX_SECONDLINE);
- }
- pPULItem->hWnd = hwnd;
-
- time(&(pPULItem->TimeStamp));
- pPULItem->Status = pdp->newStatus;
- if (bNeedCreateItem)
- li.List_Insert(PopupList, (void*)pPULItem, 0); // insert item to list
- */
- if (szProto && (strstr(szProto, "ICQ") || strstr(szProto, "AIM")) )
- { //A bit useless (to receive a status change, szProto wasn't NULL in the first place)
- WORD myStatus = (WORD)CallProtoService(szProto,PS_GETSTATUS, (WPARAM)0, (LPARAM)0);
- if (myStatus != ID_STATUS_INVISIBLE) // do not retrieve status messages when we are in ICQ invisible mode - otherwise it will show us to other side!
- QueryAwayMessage(hwnd, pdp);
- /*else //not ICQ, query the away message whatever status we're in.
- QueryAwayMessage(hwnd, pdp);*/
- }
- }
- return 0;
- }
- case WM_AWAYMSG: { //We're here because ME_PROTO_ACK has been hooked to this window (too!).
- pdp = (PLUGINDATA*)PUGetPluginData(hwnd);
- ReceivedAwayMessage(hwnd, lParam, pdp);
- //Since we're in a Hook routine, we need to return 0 or the hook chain will stop.
- return FALSE;
- }
- default:
- break;
- }
- return DefWindowProc(hwnd, message, wParam, lParam);
-};
-
-//===== Function called when the settings for a contact are changed.
-// We'll basically see if the changed setting regards contact's Status: either
-// exit from the function to let other modules do their job, or do *our* job.
-// A significant part of this code has been copied from Miranda's original code
-// by Cyreve, but I have changed something.
-static int ContactSettingChanged(WPARAM wParam,LPARAM lParam) {
- DBCONTACTWRITESETTING *cws=(DBCONTACTWRITESETTING*)lParam;
- WORD newStatus = 0,oldStatus = 0;
- DWORD dwStatuses = 0;
-
- //We need to exit from this function as fast as possible, so we'll first check
- //if the setting regards us (exit) or if it's not related to status (exit).
- //If we're there, it means it's a status change we *could* notify, so let's see
- //if we are ignoring that event. This means if *Miranda* ignores it (ignores every
- //notification) and then if *We* ignore the event.
- //Lastly, we check if we're offline: this will happen only once per connection, while
- //the checks above will happen more frequently.
-
- //The setting must belong to a contact different from myself (NULL) and needs
- //to be related to the status. Otherwise, exit as fast as possible.
- if ((HANDLE)wParam != NULL && !lstrcmpA(cws->szSetting,"Status")) {
- //Ok, if we're here we have a contact who is changing his status.
- //The first thing we need to do is save the new Status in place of the old
- //one, then we'll proceed.
- //If we don't do this, we may exit from the function without updating the
- //UserOnline settings.
- DBVARIANT dbvProto = { 0 };
- newStatus = cws->value.wVal;
- //--------------------------------need to check if it is really a protocol
- if (DBGetContactSettingString((HANDLE)wParam, "Protocol", "p", &dbvProto) == DB_READ_SUCCESS) {
- BOOL temp = strcmp(cws->szModule, dbvProto.pszVal) != 0;
- DBFreeVariant(&dbvProto);
- if ( temp ) {
- //MessageBox(0,_T("Not a proto. Return!"), _T("NSN"), 0);
- return 0;
- }
- }
- oldStatus = DBGetContactSettingRangedWord((HANDLE)wParam,"UserOnline","OldStatus",ID_STATUS_OFFLINE, ID_STATUS_MIN, ID_STATUS_MAX);
- //If they are the same, you don't need to write to the DB or do anything else.
- if (oldStatus == newStatus)
- return 0;
- //If we get here, the two stauses differ, so we can proceed.
- DBWriteContactSettingWord((HANDLE)wParam,"UserOnline","OldStatus",(WORD)newStatus);
-
- //If *Miranda* ignores the UserOnline event, exit!
- if(CallService(MS_IGNORE_ISIGNORED,wParam,IGNOREEVENT_USERONLINE))
- return 0;
-
- //If we get here, we have to notify the Hooks.
- dwStatuses = MAKELPARAM(oldStatus, newStatus);
- NotifyEventHooks(hHookContactStatusChanged, (WPARAM)wParam, (LPARAM)dwStatuses);
-
- return 0;
- }
- if ( ((HANDLE)wParam != NULL) //not our own status message
- && MyOptions.ReadAwayMsg //and we should show status message in popup
- && !lstrcmpA(cws->szSetting,"StatusMsg")) //and changed DB value is StatusMessage
- ReceivedStatusMessage((HANDLE)wParam, TRUE);
-
- return 0;
-}
-
-static int ContactStatusChanged(WPARAM wParam, LPARAM lParam) {
- WORD oldStatus = LOWORD(lParam);
- WORD newStatus = HIWORD(lParam);
- char str[8] = { 0 };
- WORD myStatus;
- char lpszSubProto[MAX_PROTONAMELEN] = { 0 };
- char *lpzProto = (char*)CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)wParam,0);
-
- //------------------------------ if NewStatusNotify has been disabled, exit!
- if (MyOptions.TempDisable)
- return 0;
-
- myStatus = (WORD)CallProtoService(lpzProto,PS_GETSTATUS, (WPARAM)0, (LPARAM)0);
-
- //------------------------------- if it is metacontact - get subcontact and test if its proto is offline or we don't want to be notified at connect
- if ( (ServiceExists(MS_MC_GETPROTOCOLNAME)) &&
- (strcmp(lpzProto,(char*)CallService(MS_MC_GETPROTOCOLNAME,0,0)) == 0) ) //this contact is Meta
- {
- //get Most Online contact - it is DefContact if DefContact is Online,
- // otherwise first online contact in the Subcontacts list
- char cMCBaseProto[MAX_PROTONAMELEN] = {0};
- HANDLE hSubContact = (HANDLE)CallService(MS_MC_GETMOSTONLINECONTACT,wParam,0);
- // get Proto name from Subcontact
- if (hSubContact)
- strncpy(cMCBaseProto, (char*)CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hSubContact,0), MAX_PROTONAMELEN);
- if (cMCBaseProto == NULL)
- mir_snprintf(lpszSubProto, MAX_PROTONAMELEN,
- "No subcontact returned for given metacontact %d. Probably, this metacontact is corrupted", wParam);
- else
- {
- strncpy(lpszSubProto, cMCBaseProto, sizeof(lpszSubProto)-1 );
- if (newStatus > ID_STATUS_OFFLINE)
- // write last online protocol for Metacontact. from MIM 0.6+ this setting is resident
- DBWriteContactSettingString((HANDLE)wParam, lpzProto, "LastOnline", lpszSubProto);
- else
- {
- // read last online proto for metaconatct if exists,
- // to avoid notifying when meta went offline but default contact's proto still online
- DBVARIANT dbvProto = { 0 };
- if (DBGetContactSettingString((HANDLE)wParam, lpzProto, "LastOnline", &dbvProto) == DB_READ_SUCCESS)
- {
- //strcpy(lpzSubProto, dbvProto.pszVal);
- //lpszSubProto = (char*)_malloca( strlen(dbvProto.pszVal)+1 );
- strncpy( lpszSubProto, dbvProto.pszVal, sizeof(lpszSubProto)-1 );
- DBFreeVariant(&dbvProto);
- }
- }
- /*
- { //debug out for metas
- char outtxt[200];
- WORD mySubStatus;
- // get Proto Status from Subcontact
- mySubStatus = (WORD)CallProtoService(lpzSubProto,PS_GETSTATUS, (WPARAM)0, (LPARAM)0);
- mir_snprintf(outtxt,sizeof(outtxt), "Main Proto: %s\nMain Status: %d\nSubProto: %s\nSubStatus: %d",lpzProto, myStatus, lpzSubProto, mySubStatus);
- PUShowMessage(outtxt, SM_NOTIFY);
- } */
-
- // check if Subcontact's proto is offline and we shouldn't notify about status change on connect
- if ( (DBGetContactSettingByte(NULL, ModuleName, lpszSubProto, DEFAULT_PROTO_POPUPS) == PROTO_POPUPS_OFF &&
- DBGetContactSettingByte(NULL, ModuleName, "ShowOnConnection", DEFAULT_SHOWONCONNECTION) == FALSE) )
- return(0);
- }
- }
- //------------------------------- end of meta --
- else
- {
- //------------------------------ if we're offline (=> we've just switched to offline), exit as fast as possible.
- if (myStatus == ID_STATUS_OFFLINE)
- return 0;
- //------------------------------ if the user doesn't want sounds on connect, exit. (If this was a popup after a connection 8))
- if (DBGetContactSettingByte(NULL, ModuleName, lpzProto, DEFAULT_PROTO_POPUPS) == PROTO_POPUPS_OFF &&
- DBGetContactSettingByte(NULL, ModuleName, "ShowOnConnection", DEFAULT_SHOWONCONNECTION) == FALSE)
- //ShowOnConnection must be FALSE to get here.
- //lpzProto must be FALSE (0) (PROTO_POPUPS_OFF) to get here (value for that proto in NSN settings is 0(=disable notifications)).
- //It means that we don't want to be notified at startup/connection and we're at startup/connection.
- return 0;
- }
- //If *we* ignore the event, exit as fast as possible, but if the previous status was Offline, there's the chance
- //we want to be notified.
- if ( !(MyOptions.FromOffline && (oldStatus == ID_STATUS_OFFLINE)) )
- { // Either it wasn't a change from Offline or we didn't enable that.
- wsprintfA(str, "%d", newStatus);
- if (DBGetContactSettingByte(NULL, ModuleName, str,0) == 1)
- return 0; // "Notify when a contact changes to one of..." is unchecked
- }
- //If the contact is hidden (i.e.: not in Contact List), exit.
- //This is here because it's a read from the DB and it has lesser chances to be called than the others.
- //I mean: it's easier that the user disabled something, than a hidden contact is changing status.
- if ((!MyOptions.HiddenContactsToo) && (DBGetContactSettingByte((HANDLE)wParam, "CList", "Hidden", 0) == 1))
- return 0;
- // we don't want to be notified if new chatroom comes online
- if (DBGetContactSettingByte((HANDLE)wParam, lpzProto, "ChatRoom", 0) == 1)
- return 0;
- //Ok, we want to be notified. :-)
-
- { // check if that proto from which we received statuschange notification, isn't in autodisable list
- char statusIDs[12] = { 0 }, statusIDp[12] = { 0 }; //2 (my) + 5 (40078) + 1 (\0) = 8; 12 - 8 = 4 free bytes, you never can tell.
-
- if (MyOptions.AutoDisable == TRUE)
- {
- wsprintfA(statusIDs,"s%d", myStatus);
- wsprintfA(statusIDp,"p%d", myStatus);
- //Now statusIDs contains "s40078", "s40072" or whatever.
- //DBGetContactSettingByte(NULL, ModuleName, statusIDs,xx) will give me one of these two values:
- // 1 (TRUE) meaning that we want sounds and popups
- // 0 (FALSE) meaning that we don't want them.
- MyOptions.EnableSoundForMyCurrentStatus = DBGetContactSettingByte(NULL, ModuleName, statusIDs, DEFAULT_NOTIFYWITHSOUND) ? TRUE : FALSE;
- MyOptions.EnablePopupForMyCurrentStatus = DBGetContactSettingByte(NULL, ModuleName, statusIDp, DEFAULT_NOTIFYWITHPOPUP) ? TRUE : FALSE;
- }
- }
-
- //-------------------------------------------------===== Status PopUp =====---------------------------------------------------------
- if ( MyOptions.EnablePopupForMyCurrentStatus && DBGetContactSettingByte((HANDLE)wParam, ModuleName, "EnablePopups",1) ) //DBGetContactSettingByte(NULL, "CList", "DisableTrayFlash", FALSE) == FALSE)
- {
- // Create the window, add its corresponding structure to our list of visible NSN windows, show the list.
- BOOL NotifyMe = FALSE;
- BOOL bIsICQ = FALSE;
- POPUPDATAT ppd = { 0 };
- PLUGINDATA * pdp = (PLUGINDATA*)mir_alloc(sizeof(PLUGINDATA));
- TCHAR lptzStatusText[MAX_SECONDLINE] = { 0 };
- BOOL bReadAwayMsg = TRUE;
- //implementation of contact status event filtering
- if (MyOptions.FromOfflinePopup && (oldStatus == ID_STATUS_OFFLINE) )
- NotifyMe = TRUE;
-
- if (NotifyMe == FALSE)
- { // Either it wasn't a change from Offline or we didn't enable that.
- wsprintfA(str, "%dp", newStatus);
- if (DBGetContactSettingByte(NULL, ModuleName, str,0) == 1)
- NotifyMe=TRUE; // "Notify when a contact changes to one of..." is checked
- }
-
- if (NotifyMe == TRUE)
- {
- ppd.lchContact = (HANDLE)wParam; //You need to give me a valid hContact, because I don't check its existance.
- ppd.lchIcon = LoadSkinnedProtoIcon(lpzProto, newStatus);
- lstrcpyn(ppd.lptzContactName, (TCHAR*)CallService(MS_CLIST_GETCONTACTDISPLAYNAME, (WPARAM)wParam, GCMDF_TCHAR), SIZEOF(ppd.lptzContactName)-1);
-
- if (MyOptions.ShowGroup)
- {//add group name to popup title
- DBVARIANT dbv = { 0 };
- if ((DBGetContactSettingTString((HANDLE)wParam, "CList", "Group", &dbv)) == DB_READ_SUCCESS)
- {
- mir_sntprintf(ppd.lptzContactName, SIZEOF(ppd.lptzContactName)-1, _T("%s (%s)"), ppd.lptzContactName, dbv.ptszVal);
- DBFreeVariant(&dbv);
- }
- }
- if (lpzProto)
- { //A bit useless (to receive a status change, szProto wasn't NULL in the first place)
- if (strstr(lpzProto, "ICQ"))
- {
- bIsICQ = TRUE;
- if (myStatus == ID_STATUS_INVISIBLE)
- // do not retrieve status messages when we are in ICQ invisible mode - otherwise it will show us to other side!
- bReadAwayMsg = FALSE;
- }
- }
-
- if (lpszSubProto[0] != '\0')
-// if ( assign lpszSubProto)
- {
- if (StatusHasAwayMessage(lpszSubProto, newStatus) == FALSE)
- bReadAwayMsg = FALSE;
- }
-
- bReadAwayMsg = bReadAwayMsg && MyOptions.ReadAwayMsg && StatusHasAwayMessage(lpzProto, newStatus);
- //--------------
- {
- if (MyOptions.UseDullText == 1)
- lstrcpyn(lptzStatusText,StatusesList[Index(newStatus)].lpzStandardText, MAX_STATUSTEXT);
- else if (MyOptions.UseDullText == 2)
- {
- //Get gender and load status text.
- switch (GetGender((HANDLE)wParam))
- {
- case GENDER_MALE:
- lstrcpyn(lptzStatusText,StatusesList[Index(newStatus)].lpzMStatusText, MAX_STATUSTEXT);
- break;
- case GENDER_FEMALE:
- lstrcpyn(lptzStatusText,StatusesList[Index(newStatus)].lpzFStatusText, MAX_STATUSTEXT);
- break;
- case GENDER_UNSPECIFIED:
- lstrcpyn(lptzStatusText,StatusesList[Index(newStatus)].lpzUStatusText, MAX_STATUSTEXT);
- break;
- }
- }
- //Now we add the old status.
- if (MyOptions.ShowPreviousStatus && ((oldStatus>=ID_STATUS_OFFLINE)||(oldStatus<=ID_STATUS_OUTTOLUNCH) ))
- {
- TCHAR szAux[MAX_STATUSTEXT] = { 0 };
- wsprintf(szAux, TranslateTS(STRING_SHOWPREVIOUSSTATUS), StatusesList[Index(oldStatus)].lpzStandardText);
- lstrcat(lstrcat(lptzStatusText, _T(" ")), szAux);
- }
- }
-
- if (DBGetContactSettingByte(NULL, ModuleName, "ShowMirVer",0))
- {//add MirVer Text if key is set
- DBVARIANT dbv = { 0 };
- if ((DBGetContactSettingTString((HANDLE)wParam, lpzProto, "MirVer", &dbv)) == DB_READ_SUCCESS)
- {
- lstrcat(ppd.lptzText, dbv.ptszVal);
- lstrcat(ppd.lptzText, _T("\n"));
- DBFreeVariant(&dbv);
- }
- else
- lstrcpy(ppd.lptzText, _T(""));
- }
- //--------------
- if (bReadAwayMsg)
- {
- PUWinItem PULItem = {0};
- PUWinItem* pPULItem = {0};
- DBVARIANT dbv = { 0 };
- TCHAR sztDBStatMes[MAX_SECONDLINE] = {0};
- time_t now;
- time(&now);
- PULItem.hContact = (HANDLE)wParam;
- pPULItem = li.List_Find(PopupList, &PULItem);
- if ((pPULItem != NULL) /*&& ( ((pPULItem->TimeStamp + 1) < now) || (pPULItem->hWnd != NULL) )*/ )
- {
- //li.List_RemovePtr(PopupList, pPULItem); // remove record from popupList if we have any for this contact
- if (pPULItem->hWnd != NULL)
- {
- pPULItem->hWnd = NULL;
- PUDeletePopUp(pPULItem->hWnd);
- }
- }
-
- DBWriteContactSettingTString((HANDLE)wParam, ModuleName, LASTPOPUPTEXT, lptzStatusText);
- if ((DBGetContactSettingTString((HANDLE)wParam, "Clist", "StatusMsg", &dbv)) == DB_READ_SUCCESS)
- {
- lstrcpyn(sztDBStatMes, dbv.ptszVal, MAX_SECONDLINE);
- DBFreeVariant(&dbv);
- }
- else
- lstrcpyn(sztDBStatMes, _T(""), MAX_SECONDLINE);
-
- mir_sntprintf(lptzStatusText, MAX_SECONDLINE, _T("%s\n%s"), lptzStatusText,
- (pPULItem != NULL) ? pPULItem->StatMsg : ( bIsICQ ? TranslateT("<retrieving status message>") : sztDBStatMes ) );
- }
- //--------------
- lstrcat(ppd.lptzText, lptzStatusText);
-
- switch (MyOptions.Colors)
- {
- case byCOLOR_OWN:
- ppd.colorBack = StatusesList[Index(newStatus)].colorBack;
- ppd.colorText = StatusesList[Index(newStatus)].colorText;
- break;
- case byCOLOR_WINDOWS:
- ppd.colorBack = GetSysColor(COLOR_BTNFACE);
- ppd.colorText = GetSysColor(COLOR_WINDOWTEXT);
- break;
- case byCOLOR_POPUP:
- ppd.colorBack = ppd.colorText = 0;
- break;
- }
- ppd.PluginWindowProc = (WNDPROC)PopupDlgProc;
- //Now the "additional" data.
- pdp->oldStatus = oldStatus;
- pdp->newStatus = newStatus;
- //Now that the plugin data has been filled, we add it to the PopUpData.
- ppd.PluginData = pdp;
- switch (MyOptions.byTimeout)
- {
- case TIMEOUT_CUSTOM:
- ppd.iSeconds = MyOptions.iTimeout;
- break;
- case TIMEOUT_PERMANENT:
- ppd.iSeconds = -1;
- break;
- case TIMEOUT_POPUP:
- default:
- ppd.iSeconds = 0;
- break;
- }
- PUAddPopUpT(&ppd);
- }
- }
- //-------------------------------------------------===== Blinking Icon section =====---------------------------------------------------
- if ((MyOptions.BlinkIcon) && (newStatus > ID_STATUS_OFFLINE)) //emulate behavior of core - don't show tray icon when contact went offline
- {
- CLISTEVENT cle = { 0 };
- TCHAR szTooltip[256];
-
- cle.cbSize = sizeof(cle);
- cle.flags = CLEF_ONLYAFEW|CLEF_TCHAR;
- cle.hContact = (HANDLE)wParam;
- cle.hDbEvent = (HANDLE)wParam;
- if (MyOptions.BlinkIcon_Status)
- cle.hIcon = LoadSkinnedProtoIcon(lpzProto, newStatus);
- else
- cle.hIcon = LoadSkinnedIcon(SKINICON_OTHER_USERONLINE);
- cle.pszService = "UserOnline/Description";
- wsprintf(szTooltip, TranslateT("%s is now %s"), (TCHAR*)CallService(MS_CLIST_GETCONTACTDISPLAYNAME, wParam, GCDNF_TCHAR),
- StatusesList[Index(newStatus)].lpzStandardText);
- cle.ptszTooltip = szTooltip;
- CallService(MS_CLIST_ADDEVENT, 0, (LPARAM)&cle);
- }
- //-------------------------------------------------===== Log to file section =====------------------------------------------------------
- if (MyOptions.Log) {
- HANDLE hFile = NULL;
- DBVARIANT dbv = { 0 };
- SECURITY_ATTRIBUTES sa = { 0 };
- BOOL bResult = FALSE;
- TCHAR szName[1024] = { 0 }, szStatus[MAX_STATUSTEXT] = { 0 }, szOldStatus[MAX_STATUSTEXT] = { 0 };
- TCHAR szDate[MAX_STATUSTEXT] = { 0 }, szTime[MAX_STATUSTEXT] = { 0 };
- TCHAR szFile[MAX_PATH] = { 0 }, szFileRel[MAX_PATH] = { 0 };
- REPLACEVARSDATA dat = {0};
- TCHAR *pszText = NULL, *res;
- DWORD dwBytes = 0, dwWritten = 0;
-
- if (DBGetContactSettingTString(NULL, ModuleName, "Logfile", &dbv) == 0) {
- lstrcpyn(szFileRel, dbv.ptszVal, MAX_PATH);
- DBFreeVariant(&dbv);
- }
- else
- lstrcpyn(szFileRel, DEFAULT_LOGFILE, MAX_PATH);
-
- dat.cbSize = sizeof(dat);
- dat.dwFlags = RVF_TCHAR;
-
- res = (TCHAR*)CallService(MS_UTILS_REPLACEVARS, (WPARAM)szFileRel, (LPARAM)&dat);
- if (res) {
- _tcscpy(szFileRel, res);
- mir_free(res);
- }
-
- CallService(MS_UTILS_PATHTOABSOLUTET, (WPARAM)szFileRel, (LPARAM)szFile);
-
- sa.nLength = sizeof(SECURITY_ATTRIBUTES);
- sa.lpSecurityDescriptor = NULL;
- sa.bInheritHandle = TRUE;
-
- hFile = CreateFile(szFile,
- GENERIC_WRITE, FILE_SHARE_READ, &sa,
- OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
-
- if (hFile != INVALID_HANDLE_VALUE) { // The file was successfully opened
- DWORD FilePos = SetFilePointer(hFile, 0, NULL, FILE_END);
- if (FilePos != INVALID_SET_FILE_POINTER) { // and positioned.
-#ifdef _UNICODE
- if (FilePos == 0)
- fputwc((const wchar_t)"\xFF\xFE", hFile); // newly created file - write UTF-16 LE BOM
-#endif
- lstrcpyn(szName, (TCHAR*)CallService(MS_CLIST_GETCONTACTDISPLAYNAME, (WPARAM)wParam, GCDNF_TCHAR), SIZEOF(szName)-1);
- lstrcpyn(szStatus,StatusesList[Index(newStatus)].lpzStandardText, MAX_STATUSTEXT);
- lstrcpyn(szOldStatus,StatusesList[Index(oldStatus)].lpzStandardText, MAX_STATUSTEXT);
- GetTimeFormat(LOCALE_USER_DEFAULT, 0, NULL,_T("HH':'mm"),szTime, SIZEOF(szTime));
- GetDateFormat(LOCALE_USER_DEFAULT, 0, NULL,_T("dd'.'MM'.'yyyy"),szDate, SIZEOF(szDate));
-
- dwBytes = lstrlen(TranslateT("%s, %s. %s changed to: %s (was: %s).\r\n")) + lstrlen(szDate) + lstrlen(szTime) +
- lstrlen(szName) + lstrlen(szStatus) + lstrlen(szOldStatus) + 1; //'\0'
- pszText = (TCHAR*)mir_alloc(dwBytes * sizeof(TCHAR));
- wsprintf(pszText, TranslateT("%s, %s. %s changed to: %s (was: %s).\r\n"), szDate, szTime, szName, szStatus, szOldStatus);
- bResult = WriteFile(hFile, pszText, lstrlen(pszText)* sizeof(TCHAR), &dwWritten, NULL);
- SetEndOfFile(hFile);
- mir_free(pszText);
- }
- CloseHandle(hFile); //This closes the handle both if the write routine worked or not.
- }
- }
- //-------------------------------------------------===== Sound section =====---------------------------------------------------------
- if (DBGetContactSettingByte(NULL, "Skin", "UseSound", TRUE)
- && MyOptions.EnableSoundForMyCurrentStatus
- && DBGetContactSettingByte((HANDLE)wParam,ModuleName,"EnableSounds",1) ) {
- // We want to hear something, ok. Every status has a sound associated,
- // and we get it via the StatusesList[Index(newStatus)].lpzSkinSoundName.
- // Before we play, however, we check if we have to use the sound card or the speaker:
- // we'll add here individual sounds too, with a check for a group and contact specific sound.
- // Since speaker and individual sounds don't get played automatically by the skin module,
- // we have to check manually if they're enabled or disabled.
-
- // Check for individualized sounds.
- if (MyOptions.UseIndSnd) { // -----------------------------Individual sounds are enabled-----------------------
- TCHAR stzSound[MAX_PATH] = { 0 };
- DBVARIANT dbvDefIndStatus = { 0 }, dbvDefIndFO = { 0 };
- if (oldStatus == ID_STATUS_OFFLINE) {
- if (DBGetContactSettingTString((HANDLE)wParam, ModuleName, "UserFromOffline", &dbvDefIndFO)==DB_READ_SUCCESS) {
- // individual FromOffline sound defined and contact came from offline
- lstrcpyn(stzSound, dbvDefIndFO.ptszVal, SIZEOF(stzSound)-1);
- DBFreeVariant(&dbvDefIndFO);
- }
- }
- else // check other individual sounds
- if (DBGetContactSettingTString((HANDLE)wParam, ModuleName, StatusesList[Index(newStatus)].lpzSkinSoundName, &dbvDefIndStatus) == DB_READ_SUCCESS) {
- lstrcpyn(stzSound, dbvDefIndStatus.ptszVal, SIZEOF(stzSound)-1);
- DBFreeVariant(&dbvDefIndStatus);
- }
- if (stzSound[0] != 0) { // check if any of above checks is succeed and we need to play sound
- if (MyOptions.UseSpeaker)
- PlaySpeakerBeep();
- else { // play through soundcard
- // Now make path to IndSound absolute, as it isn't registered
- TCHAR stzTranslatedSound[MAX_PATH] = { 0 };
- CallService(MS_UTILS_PATHTOABSOLUTET, (WPARAM)stzSound, (LPARAM)stzTranslatedSound);
- #ifdef DEBUG
- if (!szTranslatedSound) PUShowMessage("ToAbsolutePath failed.", SM_WARNING);
- #endif
- //finally play Individual sound and return
-#ifdef MS_SKIN_PLAYSOUNDEX
- if (ServiceExists(MS_SKIN_PLAYSOUNDEX))
- {
- SkinPlaySoundEx(szTranslatedSound);
- }
- else
-#endif
-#ifdef RegIndivSounds
- SkinPlaySound(szTranslatedSound);
-#else
- if (MyOptions.AvoidClipping)
- PlaySound(stzTranslatedSound, NULL, SND_ASYNC | SND_FILENAME | SND_NOSTOP);
- else
- PlaySound(stzTranslatedSound, NULL, SND_ASYNC | SND_FILENAME);
-#endif
- }
- return 0; //sound is played - exit
- }
- }
- //----------------------------------------------------check global sounds --------------------------------
- // Here there's the automatic check by Skin module, and this is right:
- // if a user hasn't a specific sound, he is a "default" user, withstanding the rules of Skin module.
- {
- char szSoundFile[MAX_PATH] = { 0 };
- DBVARIANT dbvSound = { 0 };
-
- if ( ( DBGetContactSettingByte(NULL, "SkinSoundsOff", "UserFromOffline",FALSE) == FALSE)
- && (DBGetContactSettingString(NULL,"SkinSounds", "UserFromOffline",&dbvSound) == DB_READ_SUCCESS)
- && (oldStatus == ID_STATUS_OFFLINE )) //The "UserFromOffline" sound isn't disabled, is defined and old status is offline
- lstrcpyA(szSoundFile, "UserFromOffline");
- else if ( (DBGetContactSettingByte(NULL, "SkinSoundsOff", StatusesList[Index(newStatus)].lpzSkinSoundName,FALSE) == FALSE)
- && (DBGetContactSettingString(NULL,"SkinSounds", StatusesList[Index(newStatus)].lpzSkinSoundName,&dbvSound) == DB_READ_SUCCESS) )
- lstrcpynA(szSoundFile, StatusesList[Index(newStatus)].lpzSkinSoundName, SIZEOF(szSoundFile)-1);
- DBFreeVariant(&dbvSound);
- if (szSoundFile[0]!=0) { // check if any of above checks is succeed and we need to play sound
- if (MyOptions.UseSpeaker) PlaySpeakerBeep();
- else SkinPlaySound(szSoundFile);
- }
- } //end of global sounds
- } // End of sound playing
- return 0;
-} //--------------------------------------------------============End of ContactStatusChanged=======------------------------------
-
-//This is for the PopUp Options: style, position, color, font...
-static BOOL CALLBACK DlgProcPopUpOpts(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam) {
- WORD i = 0;
- char str[8] = {0};
-
- switch (msg) {
-
-/************************************************************************
- case WM_CONTEXTMENU:
- {
- POINT pt = { 0 };
- HMENU hMenu=(HMENU)CallService(MS_CLIST_MENUBUILDCONTACT,214849,0);
- GetCursorPos(&pt);
- TrackPopupMenu(hMenu,0,pt.x,pt.y,0,hwndDlg,NULL);
- DestroyMenu(hMenu);
- break;
- }
-*///-------------------------------------------------------------------------
-
-
- case WM_INITDIALOG:
- TranslateDialogDefault(hwndDlg);
- //Colours.
- if (MyOptions.Colors == byCOLOR_OWN) {
- CheckDlgButton(hwndDlg, IDC_USEOWNCOLORS, BST_CHECKED);
- CheckDlgButton(hwndDlg, IDC_USEPOPUPCOLORS, BST_UNCHECKED);
- CheckDlgButton(hwndDlg, IDC_USEWINCOLORS, BST_UNCHECKED);
- //EnableWindow(GetDlgItem(hwndDlg, IDC_USEPOPUPCOLORS), FALSE);
- //EnableWindow(GetDlgItem(hwndDlg, IDC_USEWINCOLORS), TRUE);
- }
- if (MyOptions.Colors == byCOLOR_WINDOWS) {
- CheckDlgButton(hwndDlg, IDC_USEOWNCOLORS, BST_UNCHECKED);
- CheckDlgButton(hwndDlg, IDC_USEPOPUPCOLORS, BST_UNCHECKED);
- CheckDlgButton(hwndDlg, IDC_USEWINCOLORS, BST_CHECKED);
- //EnableWindow(GetDlgItem(hwndDlg, IDC_USEPOPUPCOLORS), FALSE);
- //EnableWindow(GetDlgItem(hwndDlg, IDC_USEWINCOLORS), TRUE);
- }
- if (MyOptions.Colors == byCOLOR_POPUP) {
- CheckDlgButton(hwndDlg, IDC_USEOWNCOLORS, BST_UNCHECKED);
- CheckDlgButton(hwndDlg, IDC_USEPOPUPCOLORS, BST_CHECKED);
- CheckDlgButton(hwndDlg, IDC_USEWINCOLORS, BST_UNCHECKED);
- //EnableWindow(GetDlgItem(hwndDlg, IDC_USEWINCOLORS), FALSE);
- //EnableWindow(GetDlgItem(hwndDlg, IDC_USEPOPUPCOLORS), TRUE);
- }
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++) {
- SendDlgItemMessage(hwndDlg,(i+2000),CPM_SETCOLOUR,0,StatusesList[Index(i)].colorBack);
- SendDlgItemMessage(hwndDlg,(i+1000),CPM_SETCOLOUR,0,StatusesList[Index(i)].colorText);
- EnableWindow(GetDlgItem(hwndDlg, i+2000), (MyOptions.Colors == byCOLOR_OWN));
- EnableWindow(GetDlgItem(hwndDlg, (i+1000)), (MyOptions.Colors == byCOLOR_OWN));
- }
- //Ugly dull text...
- CheckDlgButton(hwndDlg, IDC_CHK_USEDULLTEXT, MyOptions.UseDullText == 1 ? BST_CHECKED : BST_UNCHECKED);
- CheckDlgButton(hwndDlg, IDC_CHK_SHOWALTDESCS, MyOptions.UseDullText == 2 ? BST_CHECKED : BST_UNCHECKED);
- //Away messages
- CheckDlgButton(hwndDlg, IDC_READAWAYMSG, MyOptions.ReadAwayMsg?BST_CHECKED:BST_UNCHECKED);
- //Previous status
- CheckDlgButton(hwndDlg, IDC_SHOWPREVIOUSSTATUS, MyOptions.ShowPreviousStatus?BST_CHECKED:BST_UNCHECKED);
- if (MyOptions.UseDullText == 0)
- EnableWindow(GetDlgItem(hwndDlg, IDC_SHOWPREVIOUSSTATUS), FALSE);
- //Show group name in title
- CheckDlgButton(hwndDlg, IDC_SHOWGROUP, MyOptions.ShowGroup?BST_CHECKED:BST_UNCHECKED);
- //Timeout
- CheckDlgButton(hwndDlg, IDC_TIMEOUT_POPUP, (MyOptions.byTimeout == TIMEOUT_POPUP)?BST_CHECKED:BST_UNCHECKED);
- CheckDlgButton(hwndDlg, IDC_TIMEOUT_CUSTOM, (MyOptions.byTimeout == TIMEOUT_CUSTOM)?BST_CHECKED:BST_UNCHECKED);
- CheckDlgButton(hwndDlg, IDC_TIMEOUT_PERMANENT, (MyOptions.byTimeout == TIMEOUT_PERMANENT)?BST_CHECKED:BST_UNCHECKED);
- SetDlgItemInt(hwndDlg, IDC_TIMEOUT_VALUE, MyOptions.iTimeout, FALSE);
- EnableWindow(GetDlgItem(hwndDlg, IDC_TIMEOUT_VALUE), MyOptions.byTimeout == TIMEOUT_CUSTOM);
- //Mouse actions
- switch(DBGetContactSettingByte(NULL, ModuleName, "LeftClickAction",ACTION_OPENMSG))
- {
- case ACTION_OPENMSG:
- CheckDlgButton(hwndDlg, IDC_LC_OPENMSG, BST_CHECKED);
- break;
- case ACTION_DISMISS:
- CheckDlgButton(hwndDlg, IDC_LC_DISMISS, BST_CHECKED);
- break;
- }
- switch(DBGetContactSettingByte(NULL, ModuleName, "RightClickAction",ACTION_DISMISS))
- {
- case ACTION_USERMENU:
- CheckDlgButton(hwndDlg, IDC_RC_USERMENU, BST_CHECKED);
- break;
- case ACTION_DISMISS:
- CheckDlgButton(hwndDlg, IDC_RC_DISMISS, BST_CHECKED);
- break;
- }
- //Statuses notified
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++)
- {
- wsprintfA(str, "%dp", i);
- CheckDlgButton(hwndDlg, i, (DBGetContactSettingByte(NULL, ModuleName, str, 1))?BST_CHECKED:BST_UNCHECKED);
- }
- //Always notify when changing from offline?
- CheckDlgButton(hwndDlg, IDC_CHK_PFROMOFFLINE, (MyOptions.FromOfflinePopup)?BST_CHECKED:BST_UNCHECKED);
- return TRUE;
- //End WM_INITDIALOG
- case WM_COMMAND:
- {
-//-----------------------
-// if(CallService(MS_CLIST_MENUPROCESSCOMMAND, MAKEWPARAM(LOWORD(wParam),MPCF_CONTACTMENU),214849)) break;
-//------------------------
- WORD idCtrl = LOWORD(wParam), wNotifyCode = HIWORD(wParam);
- if (wNotifyCode == EN_KILLFOCUS && idCtrl == IDC_TIMEOUT_VALUE) { //Check if it's in the range.
- int newValue, oldValue = GetDlgItemInt(hwndDlg, idCtrl, NULL, FALSE);
- int maxValue, minValue;
- //newValue gets set in WM_COMMAND to the right value. We only update the edit field.
- newValue = MyOptions.iTimeout;
- maxValue = TIMEOUT_MAXVALUE;
- minValue = TIMEOUT_MINVALUE;
- if (oldValue > maxValue || oldValue < minValue) {
- HigherLower(maxValue, minValue);
- SendMessage(hwndDlg,UM_SETDLGITEMINT,idCtrl,newValue);
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- }
- return TRUE;
- }
- if(idCtrl == IDC_TIMEOUT_VALUE && (wNotifyCode != EN_CHANGE || (HWND)lParam != GetFocus())) {
- return TRUE;
- }
- if (wNotifyCode == CPN_COLOURCHANGED) {
- //It's a colour picker change. idCtrl is the control id.
- COLORREF colour = SendDlgItemMessage(hwndDlg,idCtrl,CPM_GETCOLOUR,0,0);
- int ctlID = idCtrl;
- if ((ctlID > 41070) && (ctlID < 42070) ) //It's 41071 or above => Text colour.
- StatusesList[Index(ctlID-1000)].colorText = colour;
- else //Background colour.
- StatusesList[Index(ctlID-2000)].colorBack = colour;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- return TRUE;
- }
- switch(idCtrl)
- {
- case IDC_USEOWNCOLORS:
- {
- BOOL bEnableOthers = FALSE;
- if (wNotifyCode != BN_CLICKED)
- break;
- MyOptions.Colors = byCOLOR_OWN;
- bEnableOthers = TRUE;
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++)
- {
- EnableWindow(GetDlgItem(hwndDlg,( i+2000)), bEnableOthers); //Background
- EnableWindow(GetDlgItem(hwndDlg, (i+1000)), bEnableOthers); //Text
- }
-// EnableWindow(GetDlgItem(hwndDlg, IDC_USEPOPUPCOLORS), bEnableOthers);
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- }
- case IDC_USEWINCOLORS:
- {
- BOOL bEnableOthers = FALSE;
- if (wNotifyCode != BN_CLICKED)
- break;
- //Use Windows colours.
- MyOptions.Colors = byCOLOR_WINDOWS;
- bEnableOthers = FALSE;
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++)
- {
- EnableWindow(GetDlgItem(hwndDlg,( i+2000)), bEnableOthers); //Background
- EnableWindow(GetDlgItem(hwndDlg, (i+1000)), bEnableOthers); //Text
- }
- //EnableWindow(GetDlgItem(hwndDlg, IDC_USEPOPUPCOLORS), bEnableOthers);
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- }
- case IDC_USEPOPUPCOLORS:
- {
- BOOL bEnableOthers = FALSE;
- if (wNotifyCode != BN_CLICKED)
- break;
- //Use Windows colours.
- MyOptions.Colors = byCOLOR_POPUP;
- bEnableOthers = FALSE;
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++)
- {
- EnableWindow(GetDlgItem(hwndDlg, (i+2000)), bEnableOthers); //Background
- EnableWindow(GetDlgItem(hwndDlg, (i+1000)), bEnableOthers); //Text
- }
-// EnableWindow(GetDlgItem(hwndDlg, IDC_USEWINCOLORS), bEnableOthers);
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- }
- case IDC_PREVIEW:
- {//Declarations and initializations
- POPUPDATAT ppd = { 0 };
- PLUGINDATA * pd = NULL;
- //int i = 0;
- for (i = ID_STATUS_MIN; i <= (ID_STATUS_MAX+1); i++)
- {wsprintfA(str, "%dp", i);
- lstrcpy(ppd.lptzText, _T(""));
- if ( !IsDlgButtonChecked(hwndDlg, i)) continue; // skip unchecked statuses
- //ZeroMemory(&ppd, sizeof(POPUPDATAEX)); //Clear the object.
- pd = (PLUGINDATA*)mir_alloc(sizeof(PLUGINDATA));
- /* This is my #1 cause of bugs: I always forget to add this malloc!!
- Without this malloc, every popup would share the same PLUGINDATA structure,
- so the second popup to be destroyed causes a c0000005! */
-// pd->oldStatus =(WORD)(ID_STATUS_OFFLINE + ((i-1)%10));
- pd->oldStatus = (WORD)(i <= ID_STATUS_MAX ? i : ID_STATUS_OFFLINE);
-// pd->newStatus = (WORD)(i <= ID_STATUS_MAX ? (pd->oldStatus + 1) : ID_STATUS_ONLINE);
- pd->newStatus = (WORD)(i < ID_STATUS_MAX ? (i + 1) : (i == ID_STATUS_MAX ? ID_STATUS_OFFLINE : ID_STATUS_ONLINE));
- ppd.lchIcon = LoadSkinnedIcon(StatusesList[Index(pd->newStatus)].Icon);
- lstrcpyn(ppd.lptzContactName, (TCHAR*)CallService(MS_CLIST_GETCONTACTDISPLAYNAME, (WPARAM)NULL,GCMDF_TCHAR), SIZEOF(ppd.lptzContactName)-1);
- if (MyOptions.UseDullText == 1)
- lstrcpy(ppd.lptzText, StatusesList[Index(pd->newStatus)].lpzStandardText);
- else if (MyOptions.UseDullText == 2)
- lstrcpy(ppd.lptzText, StatusesList[Index(pd->newStatus)].lpzUStatusText);
- if (MyOptions.ShowPreviousStatus)
- {
- TCHAR szAux[MAX_STATUSTEXT];
- wsprintf(szAux, TranslateTS(STRING_SHOWPREVIOUSSTATUS), StatusesList[Index(pd->oldStatus)].lpzStandardText);
- lstrcat(lstrcat(ppd.lptzText, _T(" ")), szAux);
- }
- if (MyOptions.ReadAwayMsg)
- {
- if (MyOptions.UseDullText > 0)
- lstrcat(ppd.lptzText, _T("\n"));
- if (i<=ID_STATUS_MAX)
- {
- char *DefAwayMsg = (char*)CallService(MS_AWAYMSG_GETSTATUSMSG,pd->newStatus,0);
- if (DefAwayMsg != NULL)
- {
-#ifdef UNICODE
- WCHAR wsUStatMsg[MAX_SECONDLINE] = { 0 };
- MultiByteToWideChar((unsigned int)CallService(MS_LANGPACK_GETCODEPAGE,0,0),MB_PRECOMPOSED, DefAwayMsg, -1, wsUStatMsg, sizeof(wsUStatMsg)/sizeof(WCHAR));
- lstrcat(ppd.lptzText, wsUStatMsg);
-#else
- lstrcat(ppd.lptzText, DefAwayMsg);
-#endif
- mir_free(DefAwayMsg);
- }
- }
- else
- lstrcat(ppd.lptzText, TranslateT("This is \"from offline\" status message"));
-
- }
- switch (MyOptions.Colors)
- {
- case byCOLOR_WINDOWS:
- ppd.colorBack = GetSysColor(COLOR_BTNFACE);
- ppd.colorText = GetSysColor(COLOR_WINDOWTEXT);
- break;
- case byCOLOR_OWN:
- ppd.colorBack = StatusesList[Index(pd->newStatus)].colorBack;
- ppd.colorText = StatusesList[Index(pd->newStatus)].colorText;
- break;
- case byCOLOR_POPUP:
- ppd.colorBack = ppd.colorText = 0;
- break;
- }
- ppd.PluginWindowProc = (WNDPROC)PopupDlgProc;
- ppd.PluginData = pd;
- switch (MyOptions.byTimeout)
- {
- case TIMEOUT_CUSTOM:
- ppd.iSeconds = MyOptions.iTimeout; break;
- case TIMEOUT_PERMANENT:
- ppd.iSeconds = -1; break;
- case TIMEOUT_POPUP:
- default:
- ppd.iSeconds = 0; break;
- }
- PUAddPopUpT(&ppd);
- }
- break;
- }
- case IDC_CHK_USEDULLTEXT:
- if (wNotifyCode != BN_CLICKED) break;
- MyOptions.UseDullText = MyOptions.UseDullText == 1 ? 0 : 1 ;
- if (MyOptions.UseDullText == 1)
- {
- CheckDlgButton(hwndDlg, IDC_CHK_SHOWALTDESCS, BST_UNCHECKED);
- EnableWindow(GetDlgItem(hwndDlg, IDC_SHOWPREVIOUSSTATUS), TRUE);
- }
- else
- if (MyOptions.UseDullText == 0)
- {
- EnableWindow(GetDlgItem(hwndDlg, IDC_SHOWPREVIOUSSTATUS), FALSE);
- MyOptions.ShowPreviousStatus = FALSE;
- }
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_CHK_SHOWALTDESCS:
- if (wNotifyCode != BN_CLICKED) break;
- MyOptions.UseDullText = MyOptions.UseDullText == 2 ? 0 : 2 ;
- if (MyOptions.UseDullText == 2)
- {
- CheckDlgButton(hwndDlg, IDC_CHK_USEDULLTEXT, BST_UNCHECKED);
- EnableWindow(GetDlgItem(hwndDlg, IDC_SHOWPREVIOUSSTATUS), TRUE);
- }
- else
- if (MyOptions.UseDullText == 0)
- {
- EnableWindow(GetDlgItem(hwndDlg, IDC_SHOWPREVIOUSSTATUS), FALSE);
- MyOptions.ShowPreviousStatus = FALSE;
- }
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_READAWAYMSG:
- if (wNotifyCode != BN_CLICKED) break;
- MyOptions.ReadAwayMsg = !MyOptions.ReadAwayMsg;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_SHOWGROUP:
- if (wNotifyCode != BN_CLICKED) break;
- MyOptions.ShowGroup = !MyOptions.ShowGroup;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_SHOWPREVIOUSSTATUS:
- if (wNotifyCode != BN_CLICKED) break;
- MyOptions.ShowPreviousStatus = !MyOptions.ShowPreviousStatus;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_TIMEOUT_POPUP:
- if (wNotifyCode != BN_CLICKED) break;
- MyOptions.byTimeout = TIMEOUT_POPUP;
- EnableWindow(GetDlgItem(hwndDlg, IDC_TIMEOUT_VALUE), FALSE); //It has to be disabled.
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_TIMEOUT_CUSTOM:
- if (wNotifyCode != BN_CLICKED) break;
- MyOptions.byTimeout = TIMEOUT_CUSTOM;
- EnableWindow(GetDlgItem(hwndDlg, IDC_TIMEOUT_VALUE), TRUE); //It has to be enabled.
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_TIMEOUT_PERMANENT:
- if (wNotifyCode != BN_CLICKED) break;
- MyOptions.byTimeout = TIMEOUT_PERMANENT;
- EnableWindow(GetDlgItem(hwndDlg, IDC_TIMEOUT_VALUE), FALSE);
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_TIMEOUT_VALUE:
- {
- if (wNotifyCode == EN_CHANGE)
- {
- int iTemp = GetDlgItemInt(hwndDlg, IDC_TIMEOUT_VALUE, NULL, FALSE);
- if (iTemp > TIMEOUT_MAXVALUE)
- MyOptions.iTimeout = TIMEOUT_MAXVALUE;
- else if (iTemp < TIMEOUT_MINVALUE)
- MyOptions.iTimeout = TIMEOUT_MINVALUE;
- else
- MyOptions.iTimeout = iTemp;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- }
- break;
- }
- case IDC_LC_DISMISS: case IDC_LC_OPENMSG:
- case IDC_RC_DISMISS: case IDC_RC_USERMENU:
- case IDC_CHK_PONLINE: case IDC_CHK_POFFLINE: case IDC_CHK_PINVISIBLE:
- case IDC_CHK_PFREECHAT: case IDC_CHK_PAWAY: case IDC_CHK_PNA:
- case IDC_CHK_POCCUPIED: case IDC_CHK_PDND: case IDC_CHK_POUTTOLUNCH:
- case IDC_CHK_PONTHEPHONE:
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_CHK_PFROMOFFLINE:
- MyOptions.FromOfflinePopup=!MyOptions.FromOfflinePopup;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- } //End switch(WM_COMMAND)
- break;
- //End WM_COMMAND
- }
- case WM_NOTIFY: { //Here we have pressed either the OK or the APPLY button.
- switch(((LPNMHDR)lParam)->idFrom) {
- case 0:
- switch (((LPNMHDR)lParam)->code) {
- case PSN_RESET:
- //Restore the options stored in memory.
- LoadOptions();
- //We need to reload the status colours too.
- InitStatusList();
- return TRUE;
- case PSN_APPLY: {
- //Text colour
- char szSetting[8] = { 0 };
- DWORD ctlColour = 0;
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++) {
- ctlColour = SendDlgItemMessage(hwndDlg,(i+2000),CPM_GETCOLOUR,0,0);
- StatusesList[Index(i)].colorBack = ctlColour;
- wsprintfA(szSetting, "%ibg", i);
- DBWriteContactSettingDword(NULL, ModuleName, szSetting,ctlColour);
- ctlColour = SendDlgItemMessage(hwndDlg,(i+1000),CPM_GETCOLOUR,0,0);
- StatusesList[Index(i)].colorText = ctlColour;
- wsprintfA(szSetting, "%itx", i);
- DBWriteContactSettingDword(NULL, ModuleName, szSetting, ctlColour);
- }
- //Colors
- DBWriteContactSettingByte(NULL, ModuleName, "Colors", MyOptions.Colors);
- //Use Dull Text
- DBWriteContactSettingByte(NULL, ModuleName, "UseDullText", (BYTE)MyOptions.UseDullText);
- //Away messages
- DBWriteContactSettingByte(NULL, ModuleName, "ReadAwayMsg", (BYTE)MyOptions.ReadAwayMsg);
- //Show previous status
- DBWriteContactSettingByte(NULL, ModuleName, "ShowPreviousStatus", (BYTE)MyOptions.ShowPreviousStatus);
- //Show group name in title
- DBWriteContactSettingByte(NULL, ModuleName, "ShowGroup", (BYTE)MyOptions.ShowGroup);
- //Timeout.
- DBWriteContactSettingByte(NULL, ModuleName, "byTimeout", MyOptions.byTimeout);
- DBWriteContactSettingDword(NULL, ModuleName, "iTimeout", MyOptions.iTimeout);
- //Left mouse click
- DBWriteContactSettingByte(NULL, ModuleName, "LeftClickAction", (BYTE)(IsDlgButtonChecked(hwndDlg, IDC_LC_DISMISS)?ACTION_DISMISS:ACTION_OPENMSG));
- //Right mouse click
- DBWriteContactSettingByte(NULL, ModuleName, "RightClickAction", (BYTE)(IsDlgButtonChecked(hwndDlg, IDC_RC_DISMISS)?ACTION_DISMISS:ACTION_USERMENU));
- //Notified statuses
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++) {
- wsprintfA(str, "%dp", i);
- DBWriteContactSettingByte(NULL, ModuleName, str, (BYTE)(BOOL)(IsDlgButtonChecked(hwndDlg, i)));
- }
- //Always notify when changing from offline
- DBWriteContactSettingByte(NULL, ModuleName, "FromOfflinePopup", (BYTE)MyOptions.FromOfflinePopup);
- return TRUE;
- } //case PSN_APPLY
- } // switch code
- break;
- } //switch idFrom
- break; //End WM_NOTIFY
- }
- case UM_SETDLGITEMINT:
- SetDlgItemInt(hwndDlg, (int)wParam, (int)lParam, FALSE);
- break;
- } //switch message
- return FALSE;
-}
-
-static BOOL CALLBACK DlgProcAutoDisableOpts(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam) {
- int i = 0;
- char str[8] = { 0 };
-
- switch (msg) {
- case WM_INITDIALOG:
- TranslateDialogDefault(hwndDlg);
- //Statuses notified
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++) {
- wsprintfA(str, "p%d", i);
- CheckDlgButton(hwndDlg, i,
- (DBGetContactSettingByte(NULL, ModuleName, str, DEFAULT_NOTIFYWITHPOPUP))?BST_UNCHECKED:BST_CHECKED);
- }
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++) {
- wsprintfA(str, "s%d", i);
- CheckDlgButton(hwndDlg, (i+2000),
- (DBGetContactSettingByte(NULL, ModuleName, str, DEFAULT_NOTIFYWITHSOUND))?BST_UNCHECKED:BST_CHECKED);
- }
- return TRUE;
- case WM_CLOSE:
- DestroyWindow(hwndDlg);
- break;
- case WM_COMMAND:
- switch (LOWORD(wParam)) {
- case IDC_OK:
- //Notified statuses
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++) {
- wsprintfA(str, "p%d", i);
- DBWriteContactSettingByte(NULL, ModuleName, str, (BYTE)(BOOL)(!IsDlgButtonChecked(hwndDlg, i)));
- }
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++) {
- wsprintfA(str, "s%d", i);
- DBWriteContactSettingByte(NULL, ModuleName, str, (BYTE)(BOOL)(!IsDlgButtonChecked(hwndDlg, (i+2000))));
- }
- //Fall through
- case IDC_CANCEL:
- DestroyWindow(hwndDlg);
- break;
- default:
- break;
- }
- break;
- default:
- break;
- }
- return FALSE;
-}
-
-//===== General options: use sounds? Use internal speaker? When to notify? Temporarily disable?
-static BOOL CALLBACK DlgProcGeneralOpts(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam) {
- int i = 0;
- char str[8] = { 0 };
- DBVARIANT dbv = { 0 };
- WORD idCtrl = LOWORD(wParam), wNotifyCode = HIWORD(wParam);
-
- switch (msg) {
- case WM_INITDIALOG:
- TranslateDialogDefault(hwndDlg);
- //Automatically disable
- CheckDlgButton(hwndDlg, IDC_AUTODISABLE,MyOptions.AutoDisable?BST_CHECKED:BST_UNCHECKED);
- EnableWindow(GetDlgItem(hwndDlg, IDC_CONFIGUREAUTODISABLE), IsDlgButtonChecked(hwndDlg, IDC_AUTODISABLE));
- //Temporary disable
- CheckDlgButton(hwndDlg, IDC_TEMPDISABLE,MyOptions.TempDisable?BST_CHECKED:BST_UNCHECKED);
- CheckDlgButton(hwndDlg, IDC_SHOWONCONNECTION,DBGetContactSettingByte(NULL, ModuleName, "ShowOnConnection", DEFAULT_SHOWONCONNECTION)?BST_CHECKED:BST_UNCHECKED);
- //Blink icon.
- CheckDlgButton(hwndDlg, IDC_BLINKICON, MyOptions.BlinkIcon?BST_CHECKED:BST_UNCHECKED);
- CheckDlgButton(hwndDlg, IDC_BLINKICON_STATUS, MyOptions.BlinkIcon_Status?BST_CHECKED:BST_UNCHECKED);
- //Menu item
- CheckDlgButton(hwndDlg, IDC_SHOWDISABLEMENU, DBGetContactSettingByte(NULL, ModuleName, "ShowDisableMenu", DEFAULT_SHOWDISABLEMENU)?BST_CHECKED:BST_UNCHECKED);
- //HiddenContactsToo
- CheckDlgButton(hwndDlg, IDC_HIDDENCONTACTSTOO, MyOptions.HiddenContactsToo?BST_UNCHECKED:BST_CHECKED);
- //Sounds
- CheckDlgButton(hwndDlg, IDC_SPEAKER,MyOptions.UseSpeaker?BST_CHECKED:BST_UNCHECKED);
- CheckDlgButton(hwndDlg, IDC_AVOIDCLIPPING,MyOptions.AvoidClipping?BST_CHECKED:BST_UNCHECKED);
- //Individual sounds
- CheckDlgButton(hwndDlg, IDC_USEINDIVSOUNDS,MyOptions.UseIndSnd?BST_CHECKED:BST_UNCHECKED);
- //Statuses notified
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++)
- {
- wsprintfA(str, "%d", i);
- CheckDlgButton(hwndDlg, i, (DBGetContactSettingByte(NULL, ModuleName, str, 0))?BST_UNCHECKED:BST_CHECKED);
- }
- //Always notify when changing from offline?
- CheckDlgButton(hwndDlg, IDC_CHK_FROMOFFLINE, (MyOptions.FromOffline)?BST_CHECKED:BST_UNCHECKED);
- // Log options
- if (DBGetContactSettingTString(NULL, ModuleName, "Logfile", &dbv) == 0)
- {
- SetDlgItemText(hwndDlg, IDC_LOGFILE, dbv.ptszVal);
- DBFreeVariant(&dbv);
- }
- else
- SetDlgItemText(hwndDlg, IDC_LOGFILE, DEFAULT_LOGFILE);
- CheckDlgButton(hwndDlg, IDC_LOG, MyOptions.Log?BST_CHECKED:BST_UNCHECKED);
- EnableWindow(GetDlgItem(hwndDlg, IDC_LOGFILE), IsDlgButtonChecked(hwndDlg, IDC_LOG));
-
- return TRUE;
- //End WM_INITDIALOG
- case WM_COMMAND:
- //These are simple clicks: we don't save, but we tell the Options Page to enable the "Apply" button.
- switch(LOWORD(wParam)) {
- case IDC_CONFIGUREAUTODISABLE:
- CreateDialogA(hInst, MAKEINTRESOURCEA(IDD_AUTODISABLE), hwndDlg, DlgProcAutoDisableOpts);
- break;
- case IDC_SPEAKER:
- MyOptions.UseSpeaker=!MyOptions.UseSpeaker;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_USEINDIVSOUNDS:
- MyOptions.UseIndSnd=!MyOptions.UseIndSnd;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- case IDC_AVOIDCLIPPING:
- MyOptions.AvoidClipping=!MyOptions.AvoidClipping;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_AUTODISABLE:
- MyOptions.AutoDisable = !MyOptions.AutoDisable;
- EnableWindow(GetDlgItem(hwndDlg, IDC_CONFIGUREAUTODISABLE), IsDlgButtonChecked(hwndDlg, IDC_AUTODISABLE));
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_TEMPDISABLE:
- EnableDisableMenuCommand(0,0);
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_HIDDENCONTACTSTOO:
- MyOptions.HiddenContactsToo=!MyOptions.HiddenContactsToo;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_BLINKICON:
- MyOptions.BlinkIcon = !MyOptions.BlinkIcon;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_BLINKICON_STATUS:
- MyOptions.BlinkIcon_Status = !MyOptions.BlinkIcon_Status;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_SHOWDISABLEMENU:
- case IDC_SHOWONCONNECTION:
- case IDC_CHK_ONLINE: case IDC_CHK_OFFLINE: case IDC_CHK_INVISIBLE:
- case IDC_CHK_FREECHAT: case IDC_CHK_AWAY: case IDC_CHK_NA:
- case IDC_CHK_OCCUPIED: case IDC_CHK_DND: case IDC_CHK_OUTTOLUNCH:
- case IDC_CHK_ONTHEPHONE:
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_CHK_FROMOFFLINE:
- MyOptions.FromOffline=!MyOptions.FromOffline;
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0, 0);
- break;
- case IDC_LOG:
- if (idCtrl == IDC_LOG && wNotifyCode == BN_CLICKED)
- {
- EnableWindow(GetDlgItem(hwndDlg, IDC_LOGFILE), IsDlgButtonChecked(hwndDlg, IDC_LOG));
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0,0);
- break;
- }
- if (idCtrl == IDC_LOGFILE && wNotifyCode == EN_CHANGE && (HWND)lParam == GetFocus())
- {
- SendMessage(GetParent(hwndDlg), PSM_CHANGED, 0,0);
- break;
- }
- default:
- break;
- }//End switch(WM_COMMAND)
- break;
- //End WM_COMMAND
- case WM_NOTIFY: //Here we have pressed either the OK or the APPLY button.
- switch(((LPNMHDR)lParam)->idFrom) {
- case 0:
- switch (((LPNMHDR)lParam)->code) {
- case PSN_RESET:
- LoadOptions();
- return TRUE;
- case PSN_APPLY: {
- TCHAR szFile[MAX_PATH] = { 0 };
- int iResult = GetDlgItemText(hwndDlg, IDC_LOGFILE, szFile, MAX_PATH);
- DBWriteContactSettingByte(NULL, ModuleName, "AutoDisable", (BYTE)MyOptions.AutoDisable);
- //Temporarily disable NewStatusNotify
- DBWriteContactSettingByte(NULL, ModuleName, "TempDisable", (BYTE)MyOptions.TempDisable);
- DBWriteContactSettingByte(NULL, ModuleName, "ShowDisableMenu", (BYTE)IsDlgButtonChecked(hwndDlg, IDC_SHOWDISABLEMENU));
-
- if (IsDlgButtonChecked(hwndDlg, IDC_SHOWDISABLEMENU)) { //We want the menu item.
- if (!hEnableDisableMenu) { //It's not present, so make it.
- installMainMenuItem();
- }
- // else -> It is present, don't do anything.
- }
- else { //We don't want the menu item.
- if (hEnableDisableMenu) { //It is present, we remove it.
- if (ServiceExists(MS_CLIST_REMOVEMAINMENUITEM)) {
- CallService(MS_CLIST_REMOVEMAINMENUITEM, (WPARAM)hEnableDisableMenu, (LPARAM)0);
- hEnableDisableMenu = (int)(HANDLE)NULL;
- }
- //else -> the service does not exist, we leave the item there.
- }
- //else -> it is not present, we don't need to do anything.
- }
-
- DBWriteContactSettingByte(NULL, ModuleName, "ShowOnConnection", (BYTE)IsDlgButtonChecked(hwndDlg, IDC_SHOWONCONNECTION));
- //individual sounds
- DBWriteContactSettingByte(NULL, ModuleName, "UseIndSounds", (BYTE)MyOptions.UseIndSnd);
- //Speaker
- DBWriteContactSettingByte(NULL, ModuleName, "UseSpeaker", (BYTE)MyOptions.UseSpeaker);
- //Avoid clipping
- DBWriteContactSettingByte(NULL, ModuleName, "AvoidClipping", (BYTE)MyOptions.AvoidClipping);
- //HiddenContactsToo
- DBWriteContactSettingByte(NULL, ModuleName, "HiddenContactsToo", (BYTE)MyOptions.HiddenContactsToo);
- //Blink icon
- DBWriteContactSettingByte(NULL, ModuleName, "BlinkIcon", (BYTE)MyOptions.BlinkIcon);
- DBWriteContactSettingByte(NULL, ModuleName, "BlinkIcon_Status", (BYTE)MyOptions.BlinkIcon_Status);
- //Notified statuses
- for (i = ID_STATUS_MIN; i <= ID_STATUS_MAX; i++) {
- wsprintfA(str, "%d", i);
- DBWriteContactSettingByte(NULL, ModuleName, str, (BYTE)(BOOL)(!IsDlgButtonChecked(hwndDlg, i)));
- }
- //Always notify when changing from offline
- DBWriteContactSettingByte(NULL, ModuleName, "FromOffline", (BYTE)MyOptions.FromOffline);
-
- // log filename -------------------------
- if (iResult == 0)
- { //No file name has been given. Use default one.
- SetDlgItemText(hwndDlg, IDC_LOGFILE, DEFAULT_LOGFILE);
- lstrcpy(szFile, DEFAULT_LOGFILE);
- }
- MyOptions.Log = IsDlgButtonChecked(hwndDlg, IDC_LOG)?1:0;
- DBWriteContactSettingByte(NULL, ModuleName, "Log", MyOptions.Log);
- DBWriteContactSettingTString(NULL, ModuleName, "Logfile", szFile);
- //---------------------------
-
- return TRUE;
- } //case PSN_APPLY
- } // switch code
- break;
- } //switch idFrom
- break; //End WM_NOTIFY
- } //switch message
- return FALSE;
-}
-
-//===== Initializations =====
-void InitStatusList() {
- int index = 0;
- //Online
- index = Index(ID_STATUS_ONLINE);
- StatusesList[index].ID = ID_STATUS_ONLINE;
- StatusesList[index].Icon = SKINICON_STATUS_ONLINE;
- lstrcpyn(StatusesList[index].lpzMStatusText, TranslateT("(M) is back online!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzFStatusText, TranslateT("(F) is back online!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzUStatusText, TranslateT("(U) is back online!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzStandardText, TranslateT("Online"), MAX_STANDARDTEXT);
- lstrcpynA(StatusesList[index].lpzSkinSoundName, "UserOnline", MAX_SKINSOUNDNAME);
- lstrcpynA(StatusesList[index].lpzSkinSoundDesc, "User: Online", MAX_SKINSOUNDDESC);
- lstrcpynA(StatusesList[index].lpzSkinSoundFile, "global.wav", MAX_PATH);
-// StatusesList[index].dwProtoFlag = PF2_ONLINE;
- StatusesList[index].colorBack = DBGetContactSettingDword(NULL, ModuleName, "40072bg", POPUPCOLOR_BG_40072);
- StatusesList[index].colorText = DBGetContactSettingDword(NULL, ModuleName, "40072tx", POPUPCOLOR_TX_40072);
-
- //Offline
- index = Index(ID_STATUS_OFFLINE);
- StatusesList[index].ID = ID_STATUS_OFFLINE;
- StatusesList[index].Icon = SKINICON_STATUS_OFFLINE;
- lstrcpyn(StatusesList[index].lpzMStatusText, TranslateT("(M) went offline! :("), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzFStatusText, TranslateT("(F) went offline! :("), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzUStatusText, TranslateT("(U) went offline! :("), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzStandardText, TranslateT("Offline"), MAX_STANDARDTEXT);
- lstrcpynA(StatusesList[index].lpzSkinSoundName, "UserOffline", MAX_SKINSOUNDNAME);
- lstrcpynA(StatusesList[index].lpzSkinSoundDesc, "User: Offline", MAX_SKINSOUNDDESC);
- lstrcpynA(StatusesList[index].lpzSkinSoundFile, "offline.wav", MAX_PATH);
-// StatusesList[index].dwProtoFlag = 0;
- StatusesList[index].colorBack = DBGetContactSettingDword(NULL, ModuleName, "40071bg", POPUPCOLOR_BG_40071);
- StatusesList[index].colorText = DBGetContactSettingDword(NULL, ModuleName, "40071tx", POPUPCOLOR_TX_40071);
-
- //Invisible
- index = Index(ID_STATUS_INVISIBLE);
- StatusesList[index].ID = ID_STATUS_INVISIBLE;
- StatusesList[index].Icon = SKINICON_STATUS_INVISIBLE;
- lstrcpyn(StatusesList[index].lpzMStatusText, TranslateT("(M) hides in shadows..."), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzFStatusText, TranslateT("(F) hides in shadows..."), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzUStatusText, TranslateT("(U) hides in shadows..."), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzStandardText, TranslateT("Invisible"), MAX_STANDARDTEXT);
- lstrcpynA(StatusesList[index].lpzSkinSoundName, "UserInvisible", MAX_SKINSOUNDNAME);
- lstrcpynA(StatusesList[index].lpzSkinSoundDesc, "User: Invisible", MAX_SKINSOUNDDESC);
- lstrcpynA(StatusesList[index].lpzSkinSoundFile, "invisible.wav", MAX_PATH);
-// StatusesList[index].dwProtoFlag = PF2_INVISIBLE;
- StatusesList[index].colorBack = DBGetContactSettingDword(NULL, ModuleName, "40078bg", POPUPCOLOR_BG_40078);
- StatusesList[index].colorText = DBGetContactSettingDword(NULL, ModuleName, "40078tx", POPUPCOLOR_TX_40078);
-
- //Free for chat
- index = Index(ID_STATUS_FREECHAT);
- StatusesList[index].ID = ID_STATUS_FREECHAT;
- StatusesList[index].Icon = SKINICON_STATUS_FREE4CHAT;
- lstrcpyn(StatusesList[index].lpzMStatusText, TranslateT("(M) feels talkative!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzFStatusText, TranslateT("(F) feels talkative!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzUStatusText, TranslateT("(U) feels talkative!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzStandardText, TranslateT("Free for chat"), MAX_STANDARDTEXT);
- lstrcpynA(StatusesList[index].lpzSkinSoundName, "UserFreeForChat", MAX_SKINSOUNDNAME);
- lstrcpynA(StatusesList[index].lpzSkinSoundDesc, "User: Free For Chat", MAX_SKINSOUNDDESC);
- lstrcpynA(StatusesList[index].lpzSkinSoundFile, "free4chat.wav", MAX_PATH);
-// StatusesList[index].dwProtoFlag = PF2_FREECHAT;
- StatusesList[index].colorBack = DBGetContactSettingDword(NULL, ModuleName, "40077bg", POPUPCOLOR_BG_40077);
- StatusesList[index].colorText = DBGetContactSettingDword(NULL, ModuleName, "40077tx", POPUPCOLOR_TX_40077);
-
- //Away
- index = Index(ID_STATUS_AWAY);
- StatusesList[index].ID = ID_STATUS_AWAY;
- StatusesList[index].Icon = SKINICON_STATUS_AWAY;
- lstrcpyn(StatusesList[index].lpzMStatusText, TranslateT("(M) went Away"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzFStatusText, TranslateT("(F) went Away"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzUStatusText, TranslateT("(U) went Away"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzStandardText, TranslateT("Away"), MAX_STANDARDTEXT);
- lstrcpynA(StatusesList[index].lpzSkinSoundName, "UserAway", MAX_SKINSOUNDNAME);
- lstrcpynA(StatusesList[index].lpzSkinSoundDesc, "User: Away", MAX_SKINSOUNDDESC);
- lstrcpynA(StatusesList[index].lpzSkinSoundFile, "away.wav", MAX_PATH);
-// StatusesList[index].dwProtoFlag = PF2_SHORTAWAY;
- StatusesList[index].colorBack = DBGetContactSettingDword(NULL, ModuleName, "40073bg", POPUPCOLOR_BG_40073);
- StatusesList[index].colorText = DBGetContactSettingDword(NULL, ModuleName, "40073tx", POPUPCOLOR_TX_40073);
-
- //NA
- index = Index(ID_STATUS_NA);
- StatusesList[index].ID = ID_STATUS_NA;
- StatusesList[index].Icon = SKINICON_STATUS_NA;
- lstrcpyn(StatusesList[index].lpzMStatusText, TranslateT("(M) isn't there anymore!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzFStatusText, TranslateT("(F) isn't there anymore!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzUStatusText, TranslateT("(U) isn't there anymore!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzStandardText, TranslateT("NA"), MAX_STANDARDTEXT);
- lstrcpynA(StatusesList[index].lpzSkinSoundName, "UserNA", MAX_SKINSOUNDNAME);
- lstrcpynA(StatusesList[index].lpzSkinSoundDesc, "User: Not Available", MAX_SKINSOUNDDESC);
- lstrcpynA(StatusesList[index].lpzSkinSoundFile, "na.wav", MAX_PATH);
-// StatusesList[index].dwProtoFlag = PF2_LONGAWAY;
- StatusesList[index].colorBack = DBGetContactSettingDword(NULL, ModuleName, "40075bg", POPUPCOLOR_BG_40075);
- StatusesList[index].colorText = DBGetContactSettingDword(NULL, ModuleName, "40075tx", POPUPCOLOR_TX_40075);
-
- //Occupied
- index = Index(ID_STATUS_OCCUPIED);
- StatusesList[index].ID = ID_STATUS_OCCUPIED;
- StatusesList[index].Icon = SKINICON_STATUS_OCCUPIED;
- lstrcpyn(StatusesList[index].lpzMStatusText, TranslateT("(M) has something else to do."), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzFStatusText, TranslateT("(F) has something else to do."), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzUStatusText, TranslateT("(U) has something else to do."), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzStandardText, TranslateT("Occupied"), MAX_STANDARDTEXT);
- lstrcpynA(StatusesList[index].lpzSkinSoundName, "UserOccupied", MAX_SKINSOUNDNAME);
- lstrcpynA(StatusesList[index].lpzSkinSoundDesc, "User: Occupied", MAX_SKINSOUNDDESC);
- lstrcpynA(StatusesList[index].lpzSkinSoundFile, "occupied.wav", MAX_PATH);
-// StatusesList[index].dwProtoFlag = PF2_LIGHTDND;
- StatusesList[index].colorBack = DBGetContactSettingDword(NULL, ModuleName, "40076bg", POPUPCOLOR_BG_40076);
- StatusesList[index].colorText = DBGetContactSettingDword(NULL, ModuleName, "40076tx", POPUPCOLOR_TX_40076);
-
- //DND
- index = Index(ID_STATUS_DND);
- StatusesList[index].ID = ID_STATUS_DND;
- StatusesList[index].Icon = SKINICON_STATUS_DND;
- lstrcpyn(StatusesList[index].lpzMStatusText, TranslateT("(M) doesn't want to be disturbed!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzFStatusText, TranslateT("(F) doesn't want to be disturbed!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzUStatusText, TranslateT("(U) doesn't want to be disturbed!"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzStandardText, TranslateT("DND"), MAX_STANDARDTEXT);
- lstrcpynA(StatusesList[index].lpzSkinSoundName, "UserDND", MAX_SKINSOUNDNAME);
- lstrcpynA(StatusesList[index].lpzSkinSoundDesc, "User: Do Not Disturb", MAX_SKINSOUNDDESC);
- lstrcpynA(StatusesList[index].lpzSkinSoundFile, "dnd.wav", MAX_PATH);
-// StatusesList[index].dwProtoFlag = PF2_HEAVYDND;
- StatusesList[index].colorBack = DBGetContactSettingDword(NULL, ModuleName, "40074bg", POPUPCOLOR_BG_40074);
- StatusesList[index].colorText = DBGetContactSettingDword(NULL, ModuleName, "40074tx", POPUPCOLOR_TX_40074);
-
- //OutToLunch
- index = Index(ID_STATUS_OUTTOLUNCH);
- StatusesList[index].ID = ID_STATUS_OUTTOLUNCH;
- StatusesList[index].Icon = SKINICON_STATUS_OUTTOLUNCH;
- lstrcpyn(StatusesList[index].lpzMStatusText, TranslateT("(M) is eating something"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzFStatusText, TranslateT("(F) is eating something"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzUStatusText, TranslateT("(U) is eating something"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzStandardText, TranslateT("Out to lunch"), MAX_STANDARDTEXT);
- lstrcpynA(StatusesList[index].lpzSkinSoundName, "UserOutToLunch", MAX_SKINSOUNDNAME);
- lstrcpynA(StatusesList[index].lpzSkinSoundDesc, "User: Out To Lunch", MAX_SKINSOUNDDESC);
- lstrcpynA(StatusesList[index].lpzSkinSoundFile, "lunch.wav", MAX_PATH);
-// StatusesList[index].dwProtoFlag = PF2_OUTTOLUNCH;
- StatusesList[index].colorBack = DBGetContactSettingDword(NULL, ModuleName, "40080bg", POPUPCOLOR_BG_40080);
- StatusesList[index].colorText = DBGetContactSettingDword(NULL, ModuleName, "40080tx", POPUPCOLOR_TX_40080);
-
- //OnThePhone
- index = Index(ID_STATUS_ONTHEPHONE);
- StatusesList[index].ID = ID_STATUS_ONTHEPHONE;
- StatusesList[index].Icon = SKINICON_STATUS_ONTHEPHONE;
- lstrcpyn(StatusesList[index].lpzMStatusText, TranslateT("(M) had to answer the phone"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzFStatusText, TranslateT("(F) had to answer the phone"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzUStatusText, TranslateT("(U) had to answer the phone"), MAX_STATUSTEXT);
- lstrcpyn(StatusesList[index].lpzStandardText, TranslateT("On the phone"), MAX_STANDARDTEXT);
- lstrcpynA(StatusesList[index].lpzSkinSoundName, "UserOnThePhone", MAX_SKINSOUNDNAME);
- lstrcpynA(StatusesList[index].lpzSkinSoundDesc, "User: On The Phone", MAX_SKINSOUNDDESC);
- lstrcpynA(StatusesList[index].lpzSkinSoundFile, "phone.wav", MAX_PATH);
-// StatusesList[index].dwProtoFlag = PF2_ONTHEPHONE;
- StatusesList[index].colorBack = DBGetContactSettingDword(NULL, ModuleName, "40079bg", POPUPCOLOR_BG_40079);
- StatusesList[index].colorText = DBGetContactSettingDword(NULL, ModuleName, "40079tx", POPUPCOLOR_TX_40079);
-}
-
-//Function which makes the initializations
-static int ModulesLoaded(WPARAM wParam,LPARAM lParam) {
- //===== Initializations =====
- //UserInfo detail page
- hUserInfoInitialise = HookEvent(ME_USERINFO_INITIALISE, UserInfoInitialise);
-
- //Contact status change: let's try if here.
- hContactStatusChanged = HookEvent(ME_STATUSCHANGE_CONTACTSTATUSCHANGED,ContactStatusChanged);
-
- //I need this window for the "PopUps on connect" routines.
- SecretWnd = CreateWindowEx(WS_EX_TOOLWINDOW,_T("static"),_T("ConnectionTimerWindow"),0,
- CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,HWND_DESKTOP,
- NULL,hInst,NULL);
- //I need this window for the Right Click menu actions
-/* hRightClickWnd = CreateWindowEx(WS_EX_TOOLWINDOW,_T("static"),_T("NewStatusNotify_RightClickWindow"),0,
- CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,HWND_DESKTOP,
- NULL,hInst,NULL);
-*/
-// SetWindowLong(hRightClickWnd, GWL_WNDPROC, (LONG)(WNDPROC)RightClickWndProc);
-
- //PopUps on connect.
- {
- int protoCount = 0, i = 0;
- PROTOCOLDESCRIPTOR **protos = NULL;
- CallService(MS_PROTO_ENUMPROTOCOLS, (WPARAM)&protoCount, (LPARAM)&protos);
- for (i=0; i < protoCount; i++)
- {
- if (protos[i]->type == PROTOTYPE_PROTOCOL)
- DBWriteContactSettingByte(NULL, ModuleName, protos[i]->szName, PROTO_POPUPS_OFF);
- }
- }
- { //----------------updater support---------------
- Update update = {0};
- char szVersion[16];
- update.cbSize = sizeof(Update);
-
- update.szComponentName = pluginInfo.shortName;
- update.pbVersion = (BYTE *)CreateVersionStringPlugin(&pluginInfo, szVersion);
- update.cpbVersion = strlen((char *)update.pbVersion);
- // these are the three lines that matter - the archive, the page containing the version string, and the text (or data)
- // before the version that we use to locate it on the page
- // (note that if the update URL and the version URL point to standard file listing entries, the backend xml
- // data will be used to check for updates rather than the actual web page - this is not true for beta urls)
-/* update.szUpdateURL = "http://vasilich.org/mim/nsn/nsnw.zip";
- update.szVersionURL = "http://vasilich.org/blog/";
- update.pbVersionPrefix = (BYTE *)"NSNw ";
- update.cpbVersionPrefix = strlen((char *)update.pbVersionPrefix);
-*/
- update.szBetaVersionURL = "http://vasilich.org/mim/nsn/nsn.txt";
- update.pbBetaVersionPrefix = (BYTE *)"NSN ";
-#ifdef UNICODE
- update.szBetaUpdateURL = "http://vasilich.org/mim/nsn/nsnw.zip";
-#else
- update.szBetaUpdateURL = "http://vasilich.org/mim/nsn/nsn.zip";
-#endif
- update.cpbBetaVersionPrefix = strlen((char *)update.pbBetaVersionPrefix);
- // do the same for the beta versions of the above struct members if you wish to allow beta updates from another URL
- if(ServiceExists(MS_UPDATE_REGISTER)) CallService(MS_UPDATE_REGISTER, 0, (LPARAM)&update);
- }
- // popup window list
- return 0;
-}
-
-static int EnableDisableMenuCommand(WPARAM wParam,LPARAM lParam) {
- //We're here to change something, so let's read the actual value.
- //TempDisable == FALSE means that right now the popups are enabled
- //and if we're here, we want to disable them.
- //The icon works this way:
- //if the notifications are disabled, the icon hasn't the red circle;
- //if the notifications are enabled, the icon has the red circle.
-
- //This is for compatibility purposes.
- CLISTMENUITEM mi = { 0 };
-
- mi.cbSize = sizeof(mi);
-
- if (MyOptions.TempDisable == FALSE)
- {
- DBWriteContactSettingByte(NULL,ModuleName,"TempDisable",TRUE);
- mi.ptszName = _T("Enable status ¬ification");
- mi.hIcon = LoadIcon(hInst,MAKEINTRESOURCE(IDI_MAINMENU_OFF));//IDI_NOPOPUP));
- MyOptions.TempDisable = TRUE;
- }
- else
- {
- DBWriteContactSettingByte(NULL,ModuleName,"TempDisable",FALSE);
- mi.ptszName = _T("Disable status ¬ification");
- mi.hIcon = LoadIcon(hInst,MAKEINTRESOURCE(IDI_MAINMENU_ON));//IDI_POPUP));
- MyOptions.TempDisable = FALSE;
- }
- mi.flags = CMIM_ICON | CMIM_NAME | CMIF_TCHAR;
- CallService(MS_CLIST_MODIFYMENUITEM,(WPARAM)hEnableDisableMenu,(LPARAM)&mi);
- return 0;
-}
-
-static int ProtoAck(WPARAM wParam,LPARAM lParam)
-{
- ACKDATA *ack=(ACKDATA*)lParam;
-
- if(ack->type == ACKTYPE_STATUS)
- { //We get here on a status change, or a status notification (meaning: old status and new status are just like the same)
- WORD newStatus = (WORD)ack->lParam;
- WORD oldStatus = (WORD)ack->hProcess;
- char * szProtocol = (char*)ack->szModule;
- //Now we have the statuses and (a pointer to the string representing) the protocol.
- if (oldStatus == newStatus)
- return 0; //Useless message.
- if (newStatus == ID_STATUS_OFFLINE)
- {
- //The protocol switched to offline. Disable the popups for this protocol
- DBWriteContactSettingByte(NULL, ModuleName, szProtocol, PROTO_POPUPS_OFF);
- }
- else if (oldStatus < ID_STATUS_ONLINE && newStatus >= ID_STATUS_ONLINE)
- {
- //The protocol changed from a disconnected status to a connected status.
- //Enable the popups for this protocol.
- int idTimer = 0;
- idTimer = AddAtomA(szProtocol);
- if (idTimer)
- {
- UINT ConnectTimer;
- char TimerProtoName[256] = {0};
- mir_snprintf(TimerProtoName,sizeof(TimerProtoName),"ConnectionTimeout%s",szProtocol);
- ConnectTimer = DBGetContactSettingDword(0,ModuleName,TimerProtoName,DBGetContactSettingDword(0,ModuleName,"ConnectionTimeout",10000));
- SetTimer(SecretWnd, idTimer,ConnectTimer, ConnectionTimerProc);
- }
- else
- { //AddAtom failed.
- DWORD dwError = GetLastError();
- TCHAR szError[1024] = { 0 };
- wsprintf(szError, _T("AddAtom() failed.\r\n%s\r\n%d\nError: %d."), __TFILE__, __LINE__, dwError);
- Log(szError);
- }
- }
- else
- {
- //The protocol changed in a way we don't care.
- }
- return 0;
- }
- else if (ack->type == ACKTYPE_AWAYMSG) //It's an away message
- {
- if ((ack->hContact != 0) && MyOptions.ReadAwayMsg) //not our own status message and we should show status message in popup
- switch (ack->result)
- {
- case ACKRESULT_SUCCESS: //The away message got read.
- {
- ReceivedStatusMessage(ack->hContact, TRUE);
- break;
- }
- case ACKRESULT_FAILED: //The away message could not be read.
- {
- ReceivedStatusMessage(ack->hContact, FALSE);
- break;
- }
- default:
- break;
- }
- return 0;
- }
- else //It's something we don't need.
- return 0;
-}
-
-VOID CALLBACK ConnectionTimerProc(HWND hwnd,UINT uMsg,UINT idEvent,DWORD dwTime)
-{
- if (uMsg != WM_TIMER) return;
- else
- {
- char szProtocol[MAX_PATH] = { 0 };
- DWORD dwResult = 0;
- //We've received a timer message: enable the popups for a specified protocol.
- KillTimer(hwnd, idEvent);
- dwResult = (DWORD)GetAtomNameA((ATOM)idEvent, szProtocol, sizeof(szProtocol));
- if (dwResult) DBWriteContactSettingByte(NULL, ModuleName, szProtocol, PROTO_POPUPS_ON);
- }
-}
-
-static int ContactSendMessage(WPARAM wParam, LPARAM lParam)
-{
- HANDLE hContact = (HANDLE)wParam;
-
- if (ServiceExists("SRMsg/LaunchMessageWindow")) //Conversation is enabled.
- CallService("SRMsg/LaunchMessageWindow",(WPARAM)hContact,0);
- else //SplitMsgDialog or the default one are enabled.
- CallService(MS_MSG_SENDMESSAGE,(WPARAM)hContact,0);
-
- return 0;
-}
-
-#ifndef WM_AWAYMSG
-#define WM_AWAYMSG (WM_USER + 0x0054)
-#endif
-
-BOOL QueryAwayMessage(HWND hWnd, PLUGINDATA * pdp)
-{
- char *szProto;
- //HANDLE hContact = (HANDLE)CallService(MS_POPUP_GETCONTACT,(WPARAM)hWnd,0);
- HANDLE hContact = PUGetContact(hWnd);
-
-/* if (pdp->hAwayMsgHook)
- { //We're already asking for it.
-//test UnhookEvent(pdp->hAwayMsgHook);
- return FALSE;
- }
-*/
- szProto=(char*)CallService(MS_PROTO_GETCONTACTBASEPROTO,(WPARAM)hContact,0);
- if(szProto)
- {
- if(CallProtoService(szProto,PS_GETCAPS,PFLAGNUM_1,0)&PF1_MODEMSGRECV)
- {
- if(CallProtoService(szProto,PS_GETCAPS,PFLAGNUM_3,0)&/*StatusesList[Index((pdp->newStatus))].dwProtoFlag*/Proto_Status2Flag(pdp->newStatus))
- {
- //The following HookEventMessage will hook the ME_PROTO_ACK event and send a WM_AWAYMSG to hWnd when the hooks get notified.
- //pdp->hAwayMsgHook = HookEventMessage(ME_PROTO_ACK,hWnd,WM_AWAYMSG);
- //The following instruction asks Miranda to retrieve the away message and associates a hProcess (handle) to this request. This handle will appear in the ME_PROTO_ACK event.
- pdp->hAwayMsgProcess = (HANDLE)CallContactService(hContact, PSS_GETAWAYMSG, 0, 0);
- return TRUE;
- //return FALSE;
- }
- }
- }
- return FALSE;
-}
-void ReceivedStatusMessage(HANDLE hContact, BOOL AckSuccess)
-{
- TCHAR tStatMes[MAX_SECONDLINE] = {0};
- TCHAR tNewMsg[MAX_SECONDLINE] = {0};
- PUWinItem PULItem = {0};
- PUWinItem* pPULItem = {0};
- time_t now = 0;
- if (AckSuccess) //The away message got read.
- {
- DBVARIANT dbv = {0};
- if (DBGetContactSettingTString(hContact, "CList", "StatusMsg", &dbv ) == DB_READ_SUCCESS)
- { //got Status message
- lstrcpyn(tStatMes, dbv.ptszVal, MAX_SECONDLINE);
- DBFreeVariant(&dbv);
- }
- }
- else //The away message could not be read.
- {
- lstrcpyn(tStatMes, TranslateT("<error>"), MAX_SECONDLINE); // send "error reading" to popup
- }
- time(&now);
- PULItem.hContact = hContact;
- pPULItem = li.List_Find(PopupList, &PULItem);
- if (pPULItem == NULL) // item not found: -------------------------------------------
- {
- pPULItem = (PUWinItem*)mir_alloc(sizeof(PULItem));
- pPULItem->hContact = hContact;
- pPULItem->hWnd = NULL;
- time(&(pPULItem->TimeStamp));
- lstrcpyn(pPULItem->StatMsg, tStatMes, MAX_SECONDLINE);
- pPULItem->Status = 0;
- li.List_Insert(PopupList, (void*)pPULItem, 0); // - insert item to list
- }
- else
- if (pPULItem->hWnd == NULL) // item found, but without popup: ------------------------------
- {
- lstrcpyn(pPULItem->StatMsg, tStatMes, MAX_SECONDLINE); // - put new StatusMessage in this item
- time(&(pPULItem->TimeStamp));
- }
- else // item found with popup: --------------------------------------
-// if ((pPULItem->TimeStamp+1) < now) // and popup timestamp more than 1 second old
- {
- DBVARIANT dbv = { 0 };
- if ((DBGetContactSettingTString(hContact, ModuleName, LASTPOPUPTEXT, &dbv) == DB_READ_SUCCESS) )
- {
- mir_sntprintf(tNewMsg, MAX_SECONDLINE, _T("%s\n%s"), dbv.ptszVal, tStatMes);
- PUChangeTextT(pPULItem->hWnd, tNewMsg); // - send TextChange to it
- DBFreeVariant(&dbv);
- }
- }
-}
-
-void ReceivedAwayMessage(HWND hWnd, LPARAM lParam, PLUGINDATA * pdp) {
-
- //HANDLE hContact = (HANDLE)CallService(MS_POPUP_GETCONTACT, (WPARAM)hWnd, 0);
-// PLUGINDATA *pdp = NULL;
- HANDLE hPUContact = PUGetContact(hWnd);
- ACKDATA *ack=(ACKDATA*)lParam;
-
- HANDLE hContact = ack->hContact;
- if (!hWnd) return; // We haven't requested this ACK... well, or our window has gone...
- pdp = (PLUGINDATA *)PUGetPluginData(hWnd);
- if (pdp == (PLUGINDATA *)(-1)) return; // something gone wrong in popup
-
- if (ack->type != ACKTYPE_AWAYMSG) return;
- if (ack->hProcess == pdp->hAwayMsgProcess) { //It's my hProcess, so it's ok to continue.
- TCHAR szNewText[MAX_SECONDLINE] = { 0 };
- TCHAR szText [MAX_SECONDLINE] = { 0 };
- char * szProto = (char*)CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact,(LPARAM)0);
- //The first thing we go is removing the hook from the chain to avoid useless calls.
-// UnhookEvent(pdp->hAwayMsgHook);
-// pdp->hAwayMsgHook = NULL;
- //Now we proceed.
- if (ack->result == ACKRESULT_SUCCESS)
- { //We've the new text.
- DBVARIANT dbv = { 0 };
- if ((DBGetContactSettingTString(hContact, ModuleName, LASTPOPUPTEXT, &dbv)) == DB_READ_SUCCESS)
- {
- mir_sntprintf(szText, SIZEOF(szText), _T("%s\n"), dbv.ptszVal);
- DBFreeVariant(&dbv);
- }
-
-#ifdef UNICODE
- {
- //as we have no unicode in status messages, then we are trying to guess which CP has message
- unsigned int CodePage;
- //char * szProto = (char*)CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact,(LPARAM)0);
- //first check if there is setting for TabSRMM for defining userCP for that contact
- CodePage=(unsigned int)DBGetContactSettingDword(hContact, "Tab_SRMsg", "ANSIcodepage", 5);
- if ( (!strncmp(szProto, "ICQ", 3)) && (CodePage==5) ) //check for codepage setting if proto is ICQ
- {
- CodePage=DBGetContactSettingWord(hContact, szProto, "AnsiCodePage", 5); //for contact
- if (CodePage==CP_ACP)
- CodePage=(unsigned int)DBGetContactSettingDword(NULL, szProto, "AnsiCodePage", 5); //and global setting
- }
- if (CodePage==5)
- CodePage=(unsigned int)CallService(MS_LANGPACK_GETCODEPAGE,0,0); //at the end, if all previous methods failed, check LangPack CP
- MultiByteToWideChar(CodePage, MB_PRECOMPOSED,(char*)ack->lParam, -1, szNewText, MAX_SECONDLINE/sizeof(wchar_t));
- }
-#else
- lstrcpyn(szNewText, (char*)ack->lParam, MAX_SECONDLINE);
-#endif
- }
- else { //We could not get the new text.
- lstrcpyn(szNewText, TranslateT("<error>"), MAX_SECONDLINE);
- }
- //Now that we have the new text, let's procees and change the second line text.
- lstrcat(szText,szNewText);
- SendMessage(hWnd, WM_SETREDRAW, FALSE, 0);
- PUChangeTextT(hWnd, (TCHAR*)szText);
- SendMessage(hWnd, WM_SETREDRAW, TRUE, 0);
- return;
- }
- else
- return;
-}
-
-static BOOL StatusHasAwayMessage(char * szProto, int status)
-{
- if (szProto != NULL)
- {
- unsigned long iSUpportsSM = (unsigned long)CallProtoService(szProto, PS_GETCAPS, (WPARAM)PFLAGNUM_3,(LPARAM)0);
- switch (status) {
- case ID_STATUS_AWAY:
- return (iSUpportsSM & PF2_SHORTAWAY)?TRUE:FALSE;
- break;
- case ID_STATUS_NA:
- return (iSUpportsSM & PF2_LONGAWAY)?TRUE:FALSE;
- break;
- case ID_STATUS_OCCUPIED:
- return (iSUpportsSM & PF2_LIGHTDND)?TRUE:FALSE;
- break;
- case ID_STATUS_DND:
- return (iSUpportsSM & PF2_HEAVYDND)?TRUE:FALSE;
- break;
- case ID_STATUS_FREECHAT:
- return (iSUpportsSM & PF2_FREECHAT)?TRUE:FALSE;
- break;
- case ID_STATUS_ONTHEPHONE:
- return (iSUpportsSM & PF2_ONTHEPHONE)?TRUE:FALSE;
- break;
- case ID_STATUS_OUTTOLUNCH:
- return (iSUpportsSM & PF2_OUTTOLUNCH)?TRUE:FALSE;
- break;
- case ID_STATUS_ONLINE:
- return (iSUpportsSM & PF2_ONLINE)?TRUE:FALSE;
- break;
- default:
- return FALSE;
- }
- }
- else
- switch (status)
- {
- case ID_STATUS_AWAY:
- case ID_STATUS_NA:
- case ID_STATUS_OCCUPIED:
- case ID_STATUS_DND:
- case ID_STATUS_FREECHAT:
- case ID_STATUS_ONTHEPHONE:
- case ID_STATUS_OUTTOLUNCH:
- return TRUE;
- default:
- return FALSE;
- }
-}
-
-/*static LRESULT CALLBACK RightClickWndProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam) {
- static HANDLE hContact;
- switch (uMsg) {
- case UM_PROCESS:
- CallService(MS_CLIST_MENUPROCESSCOMMAND, wParam, lParam);
- return 0;
- case UM_SETCONTACT:
- hContact = (HANDLE)wParam;
- return FALSE;
- case WM_COMMAND:
- if(CallService(MS_CLIST_MENUPROCESSCOMMAND,
- MAKEWPARAM(LOWORD(wParam),MPCF_CONTACTMENU),(LPARAM)hContact))
- break;
- return FALSE;
- case WM_MEASUREITEM: //Needed by the contact's context menu
- return CallService(MS_CLIST_MENUMEASUREITEM,wParam,lParam);
- case WM_DRAWITEM: //Needed by the contact's context menu
- return CallService(MS_CLIST_MENUDRAWITEM,wParam,lParam);
- default:
- return DefWindowProc(hWnd, uMsg, wParam, lParam);//FALSE;
- }
- return DefWindowProc(hWnd, uMsg, wParam, lParam);//FALSE;
-}
-*/
-void installMainMenuItem() {
- CLISTMENUITEM mi = { 0 };
-
- hServiceMenu = (HANDLE)CreateServiceFunction("NewStatusNotify/EnableDisableMenuCommand",EnableDisableMenuCommand);
- mi.cbSize=sizeof(mi);
- //mi.position=-0x7FFFFFFF;
- mi.flags = CMIF_TCHAR;
- if (DBGetContactSettingByte(NULL,ModuleName,"TempDisable",DEFAULT_TEMPDISABLE)==TRUE) //(MyOptions.TempDisable)
- {
- mi.ptszName = _T("Enable status ¬ification");
- mi.hIcon = LoadIcon(hInst,MAKEINTRESOURCE(IDI_MAINMENU_OFF)); //IDI_NOPOPUP));
- }
- else
- {
- mi.ptszName = _T("Disable status ¬ification");
- mi.hIcon = LoadIcon(hInst,MAKEINTRESOURCE(IDI_MAINMENU_ON)); //IDI_POPUP));
- }
- mi.pszService="NewStatusNotify/EnableDisableMenuCommand";
- //mi.ptszPopupName = NULL; //Translate("PopUps");
- hEnableDisableMenu = CallService(MS_CLIST_ADDMAINMENUITEM,0,(LPARAM)&mi);
-}
-
-void PlaySpeakerBeep(void)
-{
- OSVERSIONINFO osvi = { 0 };
- osvi.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
- GetVersionEx(&osvi);
- if (osvi.dwPlatformId == VER_PLATFORM_WIN32_NT) //We're on an NT platform
- Beep(BEEP_HZ_DEFAULT,BEEP_DURATION_DEFAULT); //BEEP_HZ_DEFAULT Hz, BEEP_DURATION_DEFAULT milliseconds
- else //We aren't on a NT platform.
- MessageBeep(0xFFFFFFFF); //Standard beep through speaker
-}
-
-static int OpenUserDetails(WPARAM wParam, LPARAM lParam)
-{
- POINT pMouseCoord = {0};
- if ((GetCursorPos(&pMouseCoord)) && (WindowFromPoint (pMouseCoord)==hCListClone) )
- {//ugly hack to check if dblclick was on our CList Clone. hClistClone is assigned in appropriate Options Proc
- //Now that we've changed the "LastTab" info, we can show the dialog.
- DBWriteContactSettingTString(NULL,"UserInfo","LastTab", TranslateT(NAME_OF_UIPAGE));
- {//support of stupid settings form of UserInfoEx plugin
- TCHAR tBrackets[MAX_PATH] = _T("{");
- _tcscat(tBrackets, TranslateT(NAME_OF_UIPAGE));
- _tcscat(tBrackets, _T("}"));
- DBWriteContactSettingTString(NULL,"UserInfoEx","LastItem", tBrackets);
- }
- CallService(MS_USERINFO_SHOWDIALOG, (WPARAM)(HANDLE)wParam, 0);
- return 1; //return nonzero means we don't need to show dialog window
- }
- else
- return 0; // default handler (open dialog window)
-}
|