diff options
Diffstat (limited to 'plugins/AutoShutdown/utils.cpp')
| -rw-r--r-- | plugins/AutoShutdown/utils.cpp | 458 |
1 files changed, 458 insertions, 0 deletions
diff --git a/plugins/AutoShutdown/utils.cpp b/plugins/AutoShutdown/utils.cpp new file mode 100644 index 0000000000..b9bbddbc01 --- /dev/null +++ b/plugins/AutoShutdown/utils.cpp @@ -0,0 +1,458 @@ +/*
+
+'AutoShutdown'-Plugin for Miranda IM
+
+Copyright 2004-2007 H. Herkenrath
+
+This program is free software; you can redistribute it and/or
+modify it under the terms of the GNU General Public License
+as published by the Free Software Foundation; either version 2
+of the License, or (at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program (Shutdown-License.txt); if not, write to the Free Software
+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+*/
+
+#include "common.h"
+
+/************************* String *********************************/
+
+// mir_free() the return value
+#if !defined(_UNICODE)
+WCHAR* a2u(const char *pszAnsi)
+{
+ int codepage,cch;
+ WCHAR *psz;
+
+ if(pszAnsi==NULL) return NULL;
+ codepage=CallService(MS_LANGPACK_GETCODEPAGE,0,0);
+ cch=MultiByteToWideChar(codepage,0,pszAnsi,-1,NULL,0);
+ if(!cch) return NULL;
+
+ psz=(WCHAR*)mir_alloc(cch*sizeof(WCHAR));
+ if(psz!=NULL && !MultiByteToWideChar(codepage,0,pszAnsi,-1,psz,cch)) {
+ mir_free(psz);
+ return NULL;
+ }
+ return psz;
+}
+#endif
+
+// mir_free() the return value
+#if defined(_UNICODE)
+char* u2a(const WCHAR *pszUnicode)
+{
+ int codepage,cch;
+ char *psz;
+ DWORD flags;
+
+ if(pszUnicode==NULL) return NULL;
+ codepage=CallService(MS_LANGPACK_GETCODEPAGE,0,0);
+ /* without WC_COMPOSITECHECK some characters might get out strange (see MS blog) */
+ cch=WideCharToMultiByte(codepage,flags=WC_COMPOSITECHECK,pszUnicode,-1,NULL,0,NULL,NULL);
+ if(!cch) cch=WideCharToMultiByte(codepage,flags=0,pszUnicode,-1,NULL,0,NULL,NULL);
+ if(!cch) return NULL;
+
+ psz=(char*)mir_alloc(cch);
+ if(psz!=NULL && !WideCharToMultiByte(codepage,flags,pszUnicode,-1,psz,cch,NULL,NULL)){
+ mir_free(psz);
+ return NULL;
+ }
+ return psz;
+}
+#endif
+
+void TrimString(TCHAR *pszStr)
+{
+ int i;
+ TCHAR *psz,szChars[]=_T(" \r\n\t");
+ for(i=0;i<SIZEOF(szChars);++i) {
+ /* trim end */
+ psz=&pszStr[lstrlen(pszStr)-1];
+ while(pszStr[0] && *psz==szChars[i]) {
+ *psz=0;
+ psz=CharPrev(pszStr,psz);
+ }
+ /* trim beginning */
+ for(psz=pszStr;(*psz && *psz==szChars[i]);psz=CharNext(psz));
+ MoveMemory(pszStr,psz,(lstrlen(psz)+1)*sizeof(TCHAR));
+ }
+}
+
+/************************* Error Output ***************************/
+
+static void MessageBoxIndirectFree(MSGBOXPARAMSA *mbp)
+{
+ MessageBoxIndirectA(mbp);
+ mir_free((char*)mbp->lpszCaption); /* does NULL check */
+ mir_free((char*)mbp->lpszText); /* does NULL check */
+ mir_free(mbp);
+}
+
+void ShowInfoMessage(BYTE flags,const char *pszTitle,const char *pszTextFmt,...)
+{
+ char szText[256]; /* max for systray */
+ MSGBOXPARAMSA *mbp;
+
+ va_list va;
+ va_start(va,pszTextFmt);
+ mir_vsnprintf(szText,SIZEOF(szText),pszTextFmt,va);
+ va_end(va);
+
+ if(ServiceExists(MS_CLIST_SYSTRAY_NOTIFY)) {
+ MIRANDASYSTRAYNOTIFY msn;
+ msn.cbSize=sizeof(msn);
+ msn.szProto=NULL;
+ msn.szInfoTitle=(char*)pszTitle;
+ msn.szInfo=(char*)szText;
+ msn.uTimeout=30000; /* max timeout */
+ msn.dwInfoFlags=flags;
+ if(!CallServiceSync(MS_CLIST_SYSTRAY_NOTIFY,0,(LPARAM)&msn))
+ return; /* success */
+ }
+
+ mbp=(MSGBOXPARAMSA*)mir_calloc(sizeof(*mbp));
+ if(mbp==NULL) return;
+ mbp->cbSize=sizeof(*mbp);
+ mbp->lpszCaption=mir_strdup(pszTitle);
+ mbp->lpszText=mir_strdup(szText);
+ mbp->dwStyle=MB_OK|MB_SETFOREGROUND|MB_TASKMODAL;
+ mbp->dwLanguageId=LANGIDFROMLCID((LCID)CallService(MS_LANGPACK_GETLOCALE,0,0));
+ switch(flags&NIIF_ICON_MASK) {
+ case NIIF_INFO: mbp->dwStyle|=MB_ICONINFORMATION; break;
+ case NIIF_WARNING: mbp->dwStyle|=MB_ICONWARNING; break;
+ case NIIF_ERROR: mbp->dwStyle|=MB_ICONERROR;
+ }
+ mir_forkthread(MessageBoxIndirectFree,mbp);
+}
+
+// LocalFree() the return value
+char* GetWinErrorDescription(DWORD dwLastError)
+{
+ char *buf=NULL;
+ DWORD flags=FORMAT_MESSAGE_ALLOCATE_BUFFER|FORMAT_MESSAGE_FROM_SYSTEM;
+ if(!FormatMessageA(flags,NULL,dwLastError,LANGIDFROMLCID((LCID)CallService(MS_LANGPACK_GETLOCALE,0,0)),(char*)&buf,0,NULL))
+ if(GetLastError()==ERROR_RESOURCE_LANG_NOT_FOUND)
+ FormatMessageA(flags,NULL,dwLastError,0,(char*)&buf,0,NULL);
+ return buf;
+}
+
+/************************* Time ***********************************/
+
+BOOL SystemTimeToTimeStamp(SYSTEMTIME *st,time_t *timestamp)
+{
+ struct tm ts;
+ ts.tm_isdst=-1; /* daylight saving time (-1=compute) */
+ ts.tm_sec=st->wSecond; /* 0-59 */
+ ts.tm_min=st->wMinute; /* 0-59 */
+ ts.tm_hour=st->wHour; /* 0-23 */
+ ts.tm_mday=st->wDay; /* 1-31 */
+ ts.tm_wday=st->wDayOfWeek; /* 0-6 (Sun-Sat) */
+ ts.tm_mon=st->wMonth-1; /* 0-11 (Jan-Dec) */
+ ts.tm_year=st->wYear-1900; /* current year minus 1900 */
+ ts.tm_yday=0; /* 0-365 (Jan1=0) */
+ *timestamp=mktime(&ts);
+ return (*timestamp!=-1);
+}
+
+BOOL TimeStampToSystemTime(time_t timestamp,SYSTEMTIME *st)
+{
+ struct tm *ts;
+ ts=localtime(×tamp); /* statically alloced, local time correction */
+ if(ts==NULL) return FALSE;
+ st->wMilliseconds=0; /* 0-999 (not given in tm) */
+ st->wSecond=(WORD)ts->tm_sec; /* 0-59 */
+ st->wMinute=(WORD)ts->tm_min; /* 0-59 */
+ st->wHour=(WORD)ts->tm_hour; /* 0-23 */
+ st->wDay=(WORD)ts->tm_mday; /* 1-31 */
+ st->wDayOfWeek=(WORD)ts->tm_wday; /* 0-6 (Sun-Sat) */
+ st->wMonth=(WORD)(ts->tm_mon+1); /* 1-12 (Jan-Dec) */
+ st->wYear=(WORD)(ts->tm_year+1900); /* 1601-30827 */
+ return TRUE;
+}
+
+BOOL GetFormatedCountdown(TCHAR *pszOut,int nSize,time_t countdown)
+{
+ static BOOL fInited=FALSE;
+ static int (WINAPI *pfnStrFromTimeInterval)(TCHAR*,UINT,DWORD,int);
+ #if defined(_UNICODE)
+ static int (WINAPI *pfnGetDurationFormat)(LCID,DWORD,const SYSTEMTIME*,double,WCHAR*,WCHAR*,int);
+ #endif
+ /* Init */
+ if(!fInited) {
+ #if defined(_UNICODE)
+ *(PROC*)&pfnGetDurationFormat=GetProcAddress(GetModuleHandleA("KERNEL32"),"GetDurationFormat");
+ if(pfnGetDurationFormat==NULL) {
+ #endif
+ HMODULE hShlwDLL=LoadLibraryA("SHLWAPI"); /* all ascii */
+ #if defined(_UNICODE)
+ *(PROC*)&pfnStrFromTimeInterval=GetProcAddress(hShlwDLL,"StrFromTimeIntervalW");
+ #else
+ *(PROC*)&pfnStrFromTimeInterval=GetProcAddress(hShlwDLL,"StrFromTimeIntervalA");
+ #endif
+ #if defined(_UNICODE)
+ }
+ #endif
+ fInited=TRUE;
+ }
+ /* WinVista */
+ #if defined(_UNICODE)
+ if(pfnGetDurationFormat!=NULL) {
+ SYSTEMTIME st;
+ LCID locale;
+ locale=(LCID)CallService(MS_LANGPACK_GETLOCALE,0,0);
+ if(TimeStampToSystemTime(countdown,&st))
+ if(pfnGetDurationFormat(locale,0,&st,0,NULL,pszOut,nSize))
+ return TRUE;
+ return FALSE;
+ }
+ #endif
+ /* Win9x/NT/XP */
+ if(pfnStrFromTimeInterval!=NULL)
+ return pfnStrFromTimeInterval(pszOut,nSize,(countdown>(MAXDWORD/1000))?MAXDWORD:(countdown*1000),10)!=0;
+ return FALSE;
+}
+
+BOOL GetFormatedDateTime(TCHAR *pszOut,int nSize,time_t timestamp,BOOL fShowDateEvenToday)
+{
+ SYSTEMTIME st,stNow;
+ LCID locale;
+ locale=(LCID)CallService(MS_LANGPACK_GETLOCALE,0,0);
+ GetLocalTime(&stNow);
+ TimeStampToSystemTime(timestamp,&st);
+ /* today: no need to show the date */
+ if(!fShowDateEvenToday && st.wDay==stNow.wDay && st.wMonth==stNow.wMonth && st.wYear==stNow.wYear)
+ return GetTimeFormat(locale,((st.wSecond==0)?TIME_NOSECONDS:0)|TIME_FORCE24HOURFORMAT,&st,NULL,pszOut,nSize)!=0;
+ /* show both date and time */
+ { TCHAR szDate[128],szTime[128];
+ if(!GetTimeFormat(locale,((st.wSecond==0)?TIME_NOSECONDS:0)|TIME_FORCE24HOURFORMAT,&st,NULL,szTime,SIZEOF(szTime)))
+ return FALSE;
+ if(!GetDateFormat(locale,DATE_SHORTDATE,&st,NULL,szDate,SIZEOF(szDate)))
+ return FALSE;
+ mir_sntprintf(pszOut,nSize,_T("%s %s"),szTime,szDate);
+ return TRUE;
+ }
+}
+
+/************************* Fonts & Colors *************************/
+
+int FontService_RegisterFont(const char *pszDbModule,const char *pszDbName,const TCHAR *pszSection,const TCHAR *pszDescription,int position,BOOL bAllowEffects,LOGFONT *plfDefault,COLORREF clrDefault)
+{
+ FontIDT fid;
+ ZeroMemory(&fid,sizeof(fid));
+ fid.cbSize=sizeof(fid);
+ lstrcpynA(fid.dbSettingsGroup,pszDbModule,sizeof(fid.dbSettingsGroup)); /* buffer safe */
+ lstrcpynA(fid.prefix,pszDbName,sizeof(fid.prefix)); /* buffer safe */
+ lstrcpyn(fid.group,pszSection,SIZEOF(fid.group)); /* buffer safe */
+ lstrcpyn(fid.name,pszDescription,SIZEOF(fid.name)); /* buffer safe */
+ fid.flags=FIDF_ALLOWREREGISTER;
+ if(bAllowEffects) fid.flags|=FIDF_ALLOWEFFECTS;
+ fid.order=position;
+ if(plfDefault!=NULL) {
+ fid.flags|=FIDF_DEFAULTVALID;
+ fid.deffontsettings.colour=clrDefault;
+ fid.deffontsettings.size=(char)plfDefault->lfHeight;
+ if(plfDefault->lfItalic) fid.deffontsettings.style|=DBFONTF_ITALIC;
+ if(plfDefault->lfWeight!=FW_NORMAL) fid.deffontsettings.style|=DBFONTF_BOLD;
+ if(plfDefault->lfUnderline) fid.deffontsettings.style|=DBFONTF_UNDERLINE;
+ if(plfDefault->lfStrikeOut) fid.deffontsettings.style|=DBFONTF_STRIKEOUT;
+ fid.deffontsettings.charset=plfDefault->lfCharSet;
+ lstrcpyn(fid.deffontsettings.szFace,plfDefault->lfFaceName,SIZEOF(fid.deffontsettings.szFace)); /* buffer safe */
+ }
+ return CallService(MS_FONT_REGISTERT,(WPARAM)&fid,(LPARAM)&fid);
+}
+
+int FontService_GetFont(const TCHAR *pszSection,const TCHAR *pszDescription,COLORREF *pclr,LOGFONT *plf)
+{
+ FontIDT fid;
+ fid.cbSize=sizeof(fid);
+ lstrcpyn(fid.group,pszSection,SIZEOF(fid.group)); /* buffer sfae */
+ lstrcpyn(fid.name,pszDescription,SIZEOF(fid.name)); /* buffer safe */
+ *pclr=(COLORREF)CallService(MS_FONT_GETT,(WPARAM)&fid,(LPARAM)plf); /* uses fallback font on error */
+ return (int)*pclr==-1;
+}
+
+int FontService_RegisterColor(const char *pszDbModule,const char *pszDbName,const TCHAR *pszSection,const TCHAR *pszDescription,COLORREF clrDefault)
+{
+ ColourIDT cid;
+ ZeroMemory(&cid,sizeof(cid));
+ cid.cbSize=sizeof(cid);
+ cid.defcolour=clrDefault;
+ lstrcpynA(cid.dbSettingsGroup,pszDbModule,sizeof(cid.dbSettingsGroup)); /* buffer safe */
+ lstrcpynA(cid.setting,pszDbName,sizeof(cid.setting)); /* buffer safe */
+ lstrcpyn(cid.group,pszSection,SIZEOF(cid.group)); /* buffer safe */
+ lstrcpyn(cid.name,pszDescription,SIZEOF(cid.name)); /* buffer safe */
+ return CallService(MS_COLOUR_REGISTERT,(WPARAM)&cid,0);
+}
+
+int FontService_GetColor(const TCHAR *pszSection,const TCHAR *pszDescription,COLORREF *pclr)
+{
+ ColourIDT cid;
+ ZeroMemory(&cid,sizeof(cid));
+ cid.cbSize=sizeof(cid);
+ lstrcpyn(cid.group,pszSection,sizeof(cid.group)); /* buffer safe */
+ lstrcpyn(cid.name,pszDescription,sizeof(cid.name)); /* buffer safe */
+ *pclr=(COLORREF)CallService(MS_COLOUR_GETT,(WPARAM)&cid,0);
+ return (int)*pclr==-1;
+}
+
+/************************* Skin ***********************************/
+
+HANDLE IcoLib_AddIconRes(const char *pszDbName,const TCHAR *pszSection,const TCHAR *pszDesc,HINSTANCE hInst,WORD idRes,BOOL fLarge)
+{
+ SKINICONDESC sid;
+ TCHAR szFileName[MAX_PATH];
+ sid.cbSize=sizeof(SKINICONDESC);
+ sid.pszName=(char*)pszDbName;
+ sid.ptszSection=(TCHAR*)pszSection;
+ sid.ptszDescription=(TCHAR*)pszDesc;
+ sid.ptszDefaultFile=szFileName;
+ sid.iDefaultIndex=-idRes;
+ sid.cx=GetSystemMetrics(fLarge?SM_CXICON:SM_CXSMICON);
+ sid.cy=GetSystemMetrics(fLarge?SM_CYICON:SM_CYSMICON);
+ sid.hDefaultIcon=NULL;
+ sid.flags=SIDF_SORTED|SIDF_ALL_TCHAR;
+ if(!GetModuleFileName(hInst,szFileName,SIZEOF(szFileName)))
+ return NULL;
+ return (HANDLE)CallService(MS_SKIN2_ADDICON,0,(LPARAM)&sid);
+}
+
+HICON IcoLib_GetIcon(const char *pszDbName)
+{
+ return (HICON)CallService(MS_SKIN2_GETICON,0,(LPARAM)pszDbName);
+}
+
+int IcoLib_ReleaseIcon(HICON hIcon)
+{
+ return CallService(MS_SKIN2_RELEASEICON,(WPARAM)hIcon,0);
+}
+
+int SkinAddNewSoundBundled(const char *pszDbName,const char *pszSection,const char *pszDesc,const char *pszSubDir,const char *pszDefaultFile)
+{
+ SKINSOUNDDESCEX ssd;
+ char szFile[MAX_PATH],*p;
+ HANDLE hFile;
+
+ ssd.cbSize=sizeof(ssd);
+ ssd.pszName=pszDbName;
+ ssd.pszSection=pszSection;
+ ssd.pszDescription=pszDesc;
+ ssd.pszDefaultFile=NULL;
+ if(GetModuleFileNameA(NULL,szFile,SIZEOF(szFile)-lstrlenA(pszSubDir)-lstrlenA(pszDefaultFile))) {
+ p=strrchr(szFile,'\\');
+ if(p!=NULL) *(++p)=0;
+ lstrcatA(lstrcatA(szFile,pszSubDir),pszDefaultFile); /* buffer safe */
+ /* check if sound file exist */
+ hFile=CreateFileA(szFile,0,FILE_SHARE_READ,NULL,OPEN_EXISTING,0,NULL);
+ if(hFile!=INVALID_HANDLE_VALUE) {
+ ssd.pszDefaultFile=szFile; /* MS_UTILS_PATHTORELATIVET called automatically */
+ CloseHandle(hFile);
+ }
+ }
+ return CallService(MS_SKIN_ADDNEWSOUND,0,(LPARAM)&ssd);
+}
+
+/* workaround for 'Hotkey Service' plugin because it has needs an event catcher */
+static char szHotkeyService[MAXMODULELABELLENGTH];
+static int moduleId,itemId;
+static int HotkeysServiceHotkeyPressed(WPARAM wParam,LPARAM lParam)
+{
+ UNREFERENCED_PARAMETER(lParam);
+ if(((THKSEvent*)wParam)->moduleId==moduleId && ((THKSEvent*)wParam)->itemId==LOWORD(itemId))
+ CallService(szHotkeyService,0,0);
+ return 0;
+}
+
+/* defines for 'Hotkey Manager' */
+#define HK_ACT_OVERWRITE 0
+#define HKF_GLOBAL 0x00000001
+#define HKF_WPARNUM 0x00000008
+#define HKF_HEX 0x00000200
+#define HKF_LCURRENT 0x00001000
+#define HKT_SERVICE 2
+typedef struct {
+ void *reserved1;
+ void *reserved2;
+ int hotkey;
+ WCHAR* descr;
+ DWORD flags;
+ ATOM reserved3;
+ DWORD _type;
+ char* service;
+ WPARAM wparam;
+ LPARAM lparam;
+} HOTKEYREC;
+#define MS_HK_ADDHOTKEY "HotKey/AddHotkey"
+
+int SkinAddNewHotkey(const char *pszDbName,const char *pszSection,const char *pszDescription,UINT vk,UINT hotkeyfModifiers,const char *pszServiceName)
+{
+ if(ServiceExists(MS_SKIN_ADDHOTKEY)) { /* clist_mw, clist_modern */
+ SKINHOTKEYDESCEX shd;
+ ZeroMemory(&shd,sizeof(shd));
+ shd.cbSize=sizeof(shd);
+ shd.pszName=(char*)pszDbName;
+ shd.pszDescription=(char*)pszDescription;
+ shd.pszSection=(char*)pszSection;
+ shd.pszService=(char*)pszServiceName;
+ shd.DefHotKey=MAKEWORD(vk,hotkeyfModifiers);
+ CallService(MS_SKIN_ADDHOTKEY,0,(LPARAM)&shd);
+ /* no return */
+ }
+ if(ServiceExists(MS_HOTKEYSPLUS_ADDKEY)) /* 'Hotkeys Plus' */
+ return CallService(MS_HOTKEYSPLUS_ADDKEY,(WPARAM)pszServiceName,(LPARAM)pszDescription);
+ if(ServiceExists(HKS_REGISTERFUNCTION)) { /* mHotKey */
+ KEYHASH kh;
+ kh.isShift=(hotkeyfModifiers&HOTKEYF_SHIFT)!=0;
+ kh.isCtrl=(hotkeyfModifiers&HOTKEYF_CONTROL)!=0;
+ kh.isAlt=(hotkeyfModifiers&HOTKEYF_ALT)!=0;
+ kh.vkCode=vk;
+ return !CallService(HKS_REGISTERFUNCTION,(WPARAM)&kh,(LPARAM)pszServiceName);
+ }
+ if(ServiceExists(MS_HK_ADDHOTKEY)) { /* 'Hotkey Manager' */
+ HOTKEYREC hkr;
+ ZeroMemory(&hkr,sizeof(hkr));
+ hkr.hotkey=(int)MAKEWORD(vk,hotkeyfModifiers);
+ #if defined(_UNICODE)
+ hkr.descr=(WCHAR*)pszDescription;
+ #else
+ hkr.descr=(WCHAR*)a2u(pszDescription);
+ #endif
+ hkr.flags=HKF_GLOBAL|HKF_WPARNUM|HKF_LCURRENT|HKF_HEX;
+ hkr._type=HKT_SERVICE;
+ hkr.service=(char*)pszServiceName;
+ CallService(MS_HK_ADDHOTKEY,(WPARAM)&hkr,HK_ACT_OVERWRITE);
+ #if !defined(_UNICODE)
+ mir_free(hkr.descr);
+ #endif
+ return 0;
+ }
+ if(ServiceExists(MS_HKS_REGISTER_ITEM)) { /* 'Hotkeys Service' */
+ THKSItem item;
+ ZeroMemory(&item,sizeof(item));
+ item.name=(char*)pszSection;
+ item.itemType=HKS_ITEM_MODULE;
+ item.owner=LOWORD(CallService(MS_HKS_REGISTER_ITEM,(WPARAM)&item,0));
+ item.name=(char*)pszDescription;
+ item.itemType=HKS_ITEM_ACTION;
+ item.hotkey.key=(WORD)vk;
+ item.hotkey.modifiers=MOD_GLOBAL;
+ if(hotkeyfModifiers&HOTKEYF_ALT) item.hotkey.modifiers|=MOD_ALT;
+ if(hotkeyfModifiers&HOTKEYF_CONTROL) item.hotkey.modifiers|=MOD_CONTROL;
+ if(hotkeyfModifiers&HOTKEYF_SHIFT) item.hotkey.modifiers|=MOD_SHIFT;
+ if(hotkeyfModifiers&HOTKEYF_EXT) item.hotkey.modifiers|=MOD_WIN;
+ /* no possibility to specify a service to call,
+ * all processing needs to be done in the plugins */
+ moduleId=item.owner;
+ mir_snprintf(szHotkeyService,sizeof(szHotkeyService),"%s",pszServiceName); // only allows for one hotkey as a whole
+ HookEvent(ME_HKS_KEY_PRESSED,HotkeysServiceHotkeyPressed);
+ itemId=CallService(MS_HKS_REGISTER_ITEM,(WPARAM)&item,0);
+ return HIWORD(itemId);
+ }
+ return 1;
+}
|