diff options
Diffstat (limited to 'plugins/avs/main.cpp')
| -rw-r--r-- | plugins/avs/main.cpp | 2684 |
1 files changed, 2684 insertions, 0 deletions
diff --git a/plugins/avs/main.cpp b/plugins/avs/main.cpp new file mode 100644 index 0000000000..bb4ebc236f --- /dev/null +++ b/plugins/avs/main.cpp @@ -0,0 +1,2684 @@ +/*
+
+Miranda IM: the free IM client for Microsoft* Windows*
+
+Copyright 2000-2004 Miranda ICQ/IM project,
+all portions of this codebase are copyrighted to the people
+listed in contributors.txt.
+
+This program is free software; you can redistribute it and/or
+modify it under the terms of the GNU General Public License
+as published by the Free Software Foundation; either version 2
+of the License, or (at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+*/
+
+#include "commonheaders.h"
+#include "version.h"
+
+HINSTANCE g_hInst = 0;
+PLUGINLINK *pluginLink;
+MM_INTERFACE mmi;
+LIST_INTERFACE li;
+int hLangpack;
+
+static TCHAR g_szDataPath[MAX_PATH]; // user datae path (read at startup only)
+static BOOL g_MetaAvail = FALSE;
+BOOL g_AvatarHistoryAvail = FALSE;
+static long hwndSetMyAvatar = 0;
+
+static HANDLE hMyAvatarsFolder = 0;
+static HANDLE hGlobalAvatarFolder = 0;
+static HANDLE hLoaderEvent = 0;
+static HANDLE hLoaderThread = 0;
+
+static HANDLE hOptInit = 0;
+static HANDLE hModulesLoaded = 0;
+static HANDLE hPresutdown = 0;
+static HANDLE hOkToExit = 0;
+static HANDLE hAccChanged = 0;
+
+HANDLE hProtoAckHook = 0, hContactSettingChanged = 0, hEventChanged = 0, hEventContactAvatarChanged = 0,
+ hMyAvatarChanged = 0, hEventDeleted = 0, hUserInfoInitHook = 0;
+HICON g_hIcon = 0;
+
+BOOL (WINAPI *AvsAlphaBlend)(HDC, int, int, int, int, HDC, int, int, int, int, BLENDFUNCTION) = NULL;
+
+static struct CacheNode *g_Cache = 0;
+static CRITICAL_SECTION cachecs, alloccs;
+
+static int ComparePicture( const protoPicCacheEntry* p1, const protoPicCacheEntry* p2 )
+{
+ if ((lstrcmpA(p1->szProtoname, "Global avatar") == 0) || strstr(p1->szProtoname, "Global avatar"))
+ return -1;
+ if ((lstrcmpA(p2->szProtoname, "Global avatar") == 0) || strstr(p1->szProtoname, "Global avatar"))
+ return 1;
+ return lstrcmpA( p1->szProtoname, p2->szProtoname );
+}
+
+OBJLIST<protoPicCacheEntry>
+ g_ProtoPictures( 10, ComparePicture ),
+ g_MyAvatars( 10, ComparePicture );
+
+char* g_szMetaName = NULL;
+
+#ifndef SHVIEW_THUMBNAIL
+#define SHVIEW_THUMBNAIL 0x702D
+#endif
+
+// Stores the id of the dialog
+
+int ChangeAvatar(HANDLE hContact, BOOL fLoad, BOOL fNotifyHist = FALSE, int pa_format = 0);
+static int ShutdownProc(WPARAM wParam, LPARAM lParam);
+static int OkToExitProc(WPARAM wParam, LPARAM lParam);
+static int OnDetailsInit(WPARAM wParam, LPARAM lParam);
+static int GetFileHash(TCHAR* filename);
+static DWORD GetFileSize(TCHAR *szFilename);
+
+void ProcessAvatarInfo(HANDLE hContact, int type, PROTO_AVATAR_INFORMATIONT *pai, const char *szProto);
+int FetchAvatarFor(HANDLE hContact, char *szProto = NULL);
+static INT_PTR ReportMyAvatarChanged(WPARAM wParam, LPARAM lParam);
+
+BOOL Proto_IsAvatarsEnabled(const char *proto);
+BOOL Proto_IsAvatarFormatSupported(const char *proto, int format);
+void Proto_GetAvatarMaxSize(const char *proto, int *width, int *height);
+int Proto_AvatarImageProportion(const char *proto);
+BOOL Proto_NeedDelaysForAvatars(const char *proto);
+int Proto_GetAvatarMaxFileSize(const char *proto);
+int Proto_GetDelayAfterFail(const char *proto);
+
+FI_INTERFACE *fei = 0;
+
+PLUGININFOEX pluginInfoEx = {
+ sizeof(PLUGININFOEX),
+#if defined(_UNICODE)
+ "Avatar service (Unicode)",
+#else
+ "Avatar service",
+#endif
+ __VERSION_DWORD,
+ "Load and manage contact pictures for other plugins.",
+ "Nightwish, Pescuma",
+ "",
+ "Copyright 2000-2012 Miranda-IM project",
+ "http://www.miranda-im.org",
+ UNICODE_AWARE,
+ 0,
+#if defined(_UNICODE)
+// {E00F1643-263C-4599-B84B-053E5C511D29}
+ { 0xe00f1643, 0x263c, 0x4599, { 0xb8, 0x4b, 0x5, 0x3e, 0x5c, 0x51, 0x1d, 0x29 } }
+#else
+// {C9E01EB0-A119-42d2-B340-E8678F5FEAD8}
+ { 0xc9e01eb0, 0xa119, 0x42d2, { 0xb3, 0x40, 0xe8, 0x67, 0x8f, 0x5f, 0xea, 0xd8 } }
+#endif
+};
+
+extern INT_PTR CALLBACK DlgProcOptionsAvatars(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam);
+extern INT_PTR CALLBACK DlgProcOptionsProtos(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam);
+extern INT_PTR CALLBACK DlgProcOptionsOwn(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam);
+extern INT_PTR CALLBACK DlgProcAvatarOptions(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam);
+extern INT_PTR CALLBACK DlgProcAvatarUserInfo(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam);
+extern INT_PTR CALLBACK DlgProcAvatarProtoInfo(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam);
+
+
+static int SetProtoMyAvatar(char *protocol, HBITMAP hBmp, TCHAR *originalFilename, int format, BOOL square, BOOL grow);
+
+// See if a protocol service exists
+int ProtoServiceExists(const char *szModule,const char *szService)
+{
+ char str[MAXMODULELABELLENGTH * 2];
+ strcpy(str,szModule);
+ strcat(str,szService);
+ return ServiceExists(str);
+}
+
+
+/*
+ * output a notification message.
+ * may accept a hContact to include the contacts nickname in the notification message...
+ * the actual message is using printf() rules for formatting and passing the arguments...
+ *
+ * can display the message either as systray notification (baloon popup) or using the
+ * popup plugin.
+ */
+
+#ifdef _DEBUG
+
+int _DebugTrace(const char *fmt, ...)
+{
+ char debug[2048];
+ int ibsize = 2047;
+ va_list va;
+ va_start(va, fmt);
+
+ mir_snprintf(debug, SIZEOF(debug) - 10, " ***** AVS [%08d] [ID:%04x]: ", GetTickCount(), GetCurrentThreadId());
+ OutputDebugStringA(debug);
+ _vsnprintf(debug, ibsize, fmt, va);
+ OutputDebugStringA(debug);
+ OutputDebugStringA(" ***** \n");
+
+ return 0;
+}
+
+int _DebugTrace(HANDLE hContact, const char *fmt, ...)
+{
+ char text[1024];
+ size_t len;
+ va_list va;
+
+ char *name = NULL;
+ char *proto = NULL;
+ if (hContact != NULL)
+ {
+ name = (char*) CallService(MS_CLIST_GETCONTACTDISPLAYNAME, (WPARAM)hContact, 0);
+ proto = (char*) CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact, 0);
+ }
+
+ mir_snprintf(text, SIZEOF(text) - 10, " ***** AVS [%08d] [ID:%04x]: [%08d - %s - %s] ",
+ GetTickCount(), GetCurrentThreadId(), hContact, proto == NULL ? "" : proto, name == NULL ? "" : name);
+ len = strlen(text);
+
+ va_start(va, fmt);
+ mir_vsnprintf(&text[len], SIZEOF(text) - len, fmt, va);
+ va_end(va);
+
+ OutputDebugStringA(text);
+ OutputDebugStringA(" ***** \n");
+
+ return 0;
+}
+
+#endif
+
+/*
+ * path utilities (make avatar paths relative to *PROFILE* directory, not miranda directory.
+ * taken and modified from core services
+ */
+
+int AVS_pathIsAbsolute(const TCHAR *path)
+{
+ if (!path || !(lstrlen(path) > 2))
+ return 0;
+ if ((path[1]==':'&&path[2]=='\\')||(path[0]=='\\'&&path[1]=='\\')) return 1;
+ return 0;
+}
+
+size_t AVS_pathToRelative(const TCHAR *pSrc, TCHAR *pOut)
+{
+ if (!pSrc || !*pSrc || _tcslen(pSrc) > MAX_PATH) return 0;
+ if (!AVS_pathIsAbsolute( pSrc ))
+ lstrcpyn(pOut, pSrc, MAX_PATH);
+ else {
+ TCHAR szTmp[MAX_PATH];
+ mir_sntprintf(szTmp, SIZEOF(szTmp), _T("%s"), pSrc);
+ _tcslwr(szTmp);
+ if (_tcsstr(szTmp, g_szDataPath))
+ lstrcpyn(pOut, pSrc + _tcslen(g_szDataPath) + 1, MAX_PATH);
+ else
+ lstrcpyn(pOut, pSrc, MAX_PATH);
+ }
+ return _tcslen(pOut);
+}
+
+size_t AVS_pathToAbsolute(const TCHAR *pSrc, TCHAR *pOut)
+{
+ if (!pSrc || !lstrlen(pSrc) || lstrlen(pSrc) > MAX_PATH)
+ return 0;
+
+ if (AVS_pathIsAbsolute(pSrc) || !_istalnum(pSrc[0]))
+ lstrcpyn(pOut, pSrc, MAX_PATH);
+ else
+ mir_sntprintf(pOut, MAX_PATH, _T("%s\\%s"), g_szDataPath, pSrc, MAX_PATH);
+ return lstrlen(pOut);
+}
+
+static void NotifyMetaAware(HANDLE hContact, struct CacheNode *node = NULL, AVATARCACHEENTRY *ace = (AVATARCACHEENTRY *)-1)
+{
+ if (ace == (AVATARCACHEENTRY *)-1)
+ ace = &node->ace;
+
+ NotifyEventHooks(hEventChanged, (WPARAM)hContact, (LPARAM)ace);
+
+ if (g_MetaAvail && (node->dwFlags & MC_ISSUBCONTACT) && DBGetContactSettingByte(NULL, g_szMetaName, "Enabled", 0)) {
+ HANDLE hMasterContact = (HANDLE)DBGetContactSettingDword(hContact, g_szMetaName, "Handle", 0);
+
+ if (hMasterContact && (HANDLE)CallService(MS_MC_GETMOSTONLINECONTACT, (WPARAM)hMasterContact, 0) == hContact &&
+ !DBGetContactSettingByte(hMasterContact, "ContactPhoto", "Locked", 0))
+ NotifyEventHooks(hEventChanged, (WPARAM)hMasterContact, (LPARAM)ace);
+ }
+ if (node->dwFlags & AVH_MUSTNOTIFY) {
+ // Fire the event for avatar history
+ node->dwFlags &= ~AVH_MUSTNOTIFY;
+ if (node->ace.szFilename[0] != '\0') {
+ CONTACTAVATARCHANGEDNOTIFICATION cacn = {0};
+ cacn.cbSize = sizeof(CONTACTAVATARCHANGEDNOTIFICATION);
+ cacn.hContact = hContact;
+ cacn.format = node->pa_format;
+ _tcsncpy(cacn.filename, node->ace.szFilename, MAX_PATH);
+ cacn.filename[MAX_PATH - 1] = 0;
+
+ // Get hash
+ char *szProto = (char *)CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact, 0);
+ if (szProto != NULL) {
+ DBVARIANT dbv = {0};
+ if (!DBGetContactSetting(hContact, szProto, "AvatarHash", &dbv)) {
+ if (dbv.type == DBVT_TCHAR) {
+ _tcsncpy(cacn.hash, dbv.ptszVal, SIZEOF(cacn.hash));
+ } else if (dbv.type == DBVT_BLOB) {
+ // Lets use base64 encode
+ char *tab = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
+ int i;
+ for(i = 0; i < dbv.cpbVal / 3 && i*4+3 < sizeof(cacn.hash)-1; i++) {
+ BYTE a = dbv.pbVal[i*3];
+ BYTE b = i*3 + 1 < dbv.cpbVal ? dbv.pbVal[i*3 + 1] : 0;
+ BYTE c = i*3 + 2 < dbv.cpbVal ? dbv.pbVal[i*3 + 2] : 0;
+
+ cacn.hash[i*4] = tab[(a & 0xFC) >> 2];
+ cacn.hash[i*4+1] = tab[((a & 0x3) << 4) + ((b & 0xF0) >> 4)];
+ cacn.hash[i*4+2] = tab[((b & 0xF) << 2) + ((c & 0xC0) >> 6)];
+ cacn.hash[i*4+3] = tab[c & 0x3F];
+ }
+ if (dbv.cpbVal % 3 != 0 && i*4+3 < sizeof(cacn.hash)-1) {
+ BYTE a = dbv.pbVal[i*3];
+ BYTE b = i*3 + 1 < dbv.cpbVal ? dbv.pbVal[i*3 + 1] : 0;
+
+ cacn.hash[i*4] = tab[(a & 0xFC) >> 2];
+ cacn.hash[i*4+1] = tab[((a & 0x3) << 4) + ((b & 0xF0) >> 4)];
+ if (i + 1 < dbv.cpbVal)
+ cacn.hash[i*4+2] = tab[((b & 0xF) << 4)];
+ else
+ cacn.hash[i*4+2] = '=';
+ cacn.hash[i*4+3] = '=';
+ }
+ }
+ DBFreeVariant(&dbv);
+ }
+ }
+
+ // Default value
+ if (cacn.hash[0] == '\0')
+ mir_sntprintf(cacn.hash, SIZEOF(cacn.hash), _T("AVS-HASH-%x"), GetFileHash(cacn.filename));
+
+ NotifyEventHooks(hEventContactAvatarChanged, (WPARAM)cacn.hContact, (LPARAM)&cacn);
+ }
+ else
+ NotifyEventHooks(hEventContactAvatarChanged, (WPARAM)hContact, NULL);
+ }
+}
+
+static int g_maxBlock = 0, g_curBlock = 0;
+static struct CacheNode **g_cacheBlocks = NULL;
+
+/*
+ * allocate a cache block and add it to the list of blocks
+ * does not link the new block with the old block(s) - caller needs to do this
+ */
+
+static struct CacheNode *AllocCacheBlock()
+{
+ struct CacheNode *allocedBlock = NULL;
+
+ allocedBlock = (struct CacheNode *)malloc(CACHE_BLOCKSIZE * sizeof(struct CacheNode));
+ ZeroMemory((void *)allocedBlock, sizeof(struct CacheNode) * CACHE_BLOCKSIZE);
+
+ for(int i = 0; i < CACHE_BLOCKSIZE - 1; i++)
+ {
+ //InitializeCriticalSection(&allocedBlock[i].cs);
+ allocedBlock[i].pNextNode = &allocedBlock[i + 1]; // pre-link the alloced block
+ }
+ //InitializeCriticalSection(&allocedBlock[CACHE_BLOCKSIZE - 1].cs);
+
+ if (g_Cache == NULL) // first time only...
+ g_Cache = allocedBlock;
+
+ // add it to the list of blocks
+
+ if (g_curBlock == g_maxBlock) {
+ g_maxBlock += 10;
+ g_cacheBlocks = (struct CacheNode **)realloc(g_cacheBlocks, g_maxBlock * sizeof(struct CacheNode *));
+ }
+ g_cacheBlocks[g_curBlock++] = allocedBlock;
+
+ return(allocedBlock);
+}
+
+int SetAvatarAttribute(HANDLE hContact, DWORD attrib, int mode)
+{
+ struct CacheNode *cacheNode = g_Cache;
+
+ while(cacheNode) {
+ if (cacheNode->ace.hContact == hContact) {
+ DWORD dwFlags = cacheNode->ace.dwFlags;
+
+ cacheNode->ace.dwFlags = mode ? cacheNode->ace.dwFlags | attrib : cacheNode->ace.dwFlags & ~attrib;
+ if (cacheNode->ace.dwFlags != dwFlags)
+ NotifyMetaAware(hContact, cacheNode);
+ break;
+ }
+ cacheNode = cacheNode->pNextNode;
+ }
+ return 0;
+}
+
+/*
+ * convert the avatar image path to a relative one...
+ * given: contact handle, path to image
+ */
+void MakePathRelative(HANDLE hContact, TCHAR *path)
+{
+ TCHAR szFinalPath[MAX_PATH];
+ szFinalPath[0] = '\0';
+
+ size_t result = AVS_pathToRelative(path, szFinalPath);
+ if (result && lstrlen(szFinalPath) > 0) {
+ DBWriteContactSettingTString(hContact, "ContactPhoto", "RFile", szFinalPath);
+ if (!DBGetContactSettingByte(hContact, "ContactPhoto", "Locked", 0))
+ DBWriteContactSettingTString(hContact, "ContactPhoto", "Backup", szFinalPath);
+ }
+}
+
+/*
+ * convert the avatar image path to a relative one...
+ * given: contact handle
+ */
+
+static void MakePathRelative(HANDLE hContact)
+{
+ DBVARIANT dbv = {0};
+
+ if (!DBGetContactSetting(hContact, "ContactPhoto", "File", &dbv)) {
+ if (dbv.type == DBVT_TCHAR) {
+ MakePathRelative(hContact, dbv.ptszVal);
+ }
+ DBFreeVariant(&dbv);
+ }
+}
+
+static void ResetTranspSettings(HANDLE hContact)
+{
+ DBDeleteContactSetting(hContact, "ContactPhoto", "MakeTransparentBkg");
+ DBDeleteContactSetting(hContact, "ContactPhoto", "TranspBkgNumPoints");
+ DBDeleteContactSetting(hContact, "ContactPhoto", "TranspBkgColorDiff");
+}
+
+static TCHAR *getJGMailID(char *szProto)
+{
+ static TCHAR szJID[MAX_PATH+1];
+ DBVARIANT dbva={0}, dbvb={0};
+
+ szJID[0] = '\0';
+ if (DBGetContactSettingTString(NULL, szProto, "LoginName", &dbva))
+ return szJID;
+ if (DBGetContactSettingTString(NULL, szProto, "LoginServer", &dbvb)) {
+ DBFreeVariant(&dbva);
+ return szJID;
+ }
+
+ mir_sntprintf(szJID, SIZEOF(szJID), _T("%s@%s"), dbva.ptszVal, dbvb.ptszVal);
+ DBFreeVariant(&dbva);
+ DBFreeVariant(&dbvb);
+ return szJID;
+}
+
+// create the avatar in cache
+// returns 0 if not created (no avatar), iIndex otherwise, -2 if has to request avatar, -3 if avatar too big
+int CreateAvatarInCache(HANDLE hContact, avatarCacheEntry *ace, char *szProto)
+{
+ DBVARIANT dbv = {0};
+ char *szExt = NULL;
+ TCHAR tszFilename[MAX_PATH];
+ HANDLE hFile = INVALID_HANDLE_VALUE;
+ DWORD dwFileSizeHigh = 0, dwFileSize = 0, sizeLimit = 0;
+
+ tszFilename[0] = 0;
+
+ ace->hbmPic = 0;
+ ace->dwFlags = 0;
+ ace->bmHeight = 0;
+ ace->bmWidth = 0;
+ ace->lpDIBSection = NULL;
+ ace->szFilename[0] = 0;
+
+ if (szProto == NULL) {
+ char *proto = (char *) CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact, 0);
+ if (proto == NULL || !DBGetContactSettingByte(NULL, AVS_MODULE, proto, 1)) {
+ return -1;
+ }
+
+ if (DBGetContactSettingByte(hContact, "ContactPhoto", "Locked", 0)
+ && !DBGetContactSettingTString(hContact, "ContactPhoto", "Backup", &dbv)) {
+ AVS_pathToAbsolute(dbv.ptszVal, tszFilename);
+ DBFreeVariant(&dbv);
+ }
+ else if (!DBGetContactSettingTString(hContact, "ContactPhoto", "RFile", &dbv)) {
+ AVS_pathToAbsolute(dbv.ptszVal, tszFilename);
+ DBFreeVariant(&dbv);
+ }
+ else if (!DBGetContactSettingTString(hContact, "ContactPhoto", "File", &dbv)) {
+ AVS_pathToAbsolute(dbv.ptszVal, tszFilename);
+ DBFreeVariant(&dbv);
+ }
+ else {
+ return -2;
+ }
+ }
+ else {
+ if (hContact == 0) { // create a protocol picture in the proto picture cache
+ if (!DBGetContactSettingTString(NULL, PPICT_MODULE, szProto, &dbv)) {
+ AVS_pathToAbsolute(dbv.ptszVal, tszFilename);
+ DBFreeVariant(&dbv);
+ }
+ else {
+ if (lstrcmpA(szProto, AVS_DEFAULT)) {
+ if (!DBGetContactSettingTString(NULL, PPICT_MODULE, AVS_DEFAULT, &dbv)) {
+ AVS_pathToAbsolute(dbv.ptszVal, tszFilename);
+ DBFreeVariant(&dbv);
+ }
+
+ if (!strstr(szProto, "Global avatar for")) {
+ PROTOACCOUNT* pdescr = (PROTOACCOUNT*)CallService(MS_PROTO_GETACCOUNT, 0, (LPARAM)szProto);
+ if (pdescr == NULL)
+ return -1;
+ char key[MAX_PATH];
+ mir_snprintf(key, SIZEOF(key), "Global avatar for %s accounts", pdescr->szProtoName);
+ if (!DBGetContactSettingTString(NULL, PPICT_MODULE, key, &dbv)) {
+ AVS_pathToAbsolute(dbv.ptszVal, tszFilename);
+ DBFreeVariant(&dbv);
+ }
+ }
+ }
+ }
+ }
+ else if (hContact == (HANDLE)-1) { // create own picture - note, own avatars are not on demand, they are loaded once at
+ // startup and everytime they are changed.
+ if (szProto[0] == '\0') {
+ // Global avatar
+ if ( DBGetContactSettingTString(NULL, AVS_MODULE, "GlobalUserAvatarFile", &dbv))
+ return -10;
+
+ AVS_pathToAbsolute(dbv.ptszVal, tszFilename);
+ DBFreeVariant(&dbv);
+ }
+ else if (ProtoServiceExists(szProto, PS_GETMYAVATART)) {
+ if (CallProtoService(szProto, PS_GETMYAVATART, (WPARAM)tszFilename, (LPARAM)MAX_PATH))
+ tszFilename[0] = '\0';
+ }
+#if defined( _UNICODE )
+ else if (ProtoServiceExists(szProto, PS_GETMYAVATAR)) {
+ char szFileName[ MAX_PATH ];
+ if (CallProtoService(szProto, PS_GETMYAVATAR, (WPARAM)szFileName, (LPARAM)MAX_PATH))
+ tszFilename[0] = '\0';
+ else
+ MultiByteToWideChar( CP_ACP, 0, szFileName, -1, tszFilename, SIZEOF( tszFilename ));
+ }
+#endif
+ else if (!DBGetContactSettingTString(NULL, szProto, "AvatarFile", &dbv)) {
+ AVS_pathToAbsolute(dbv.ptszVal, tszFilename);
+ DBFreeVariant(&dbv);
+ }
+ else return -1;
+ }
+ }
+
+ if ( lstrlen(tszFilename) < 4 )
+ return -1;
+
+ TCHAR* tmpPath = Utils_ReplaceVarsT(tszFilename);
+ mir_sntprintf(tszFilename, SIZEOF(tszFilename), _T("%s"), tmpPath);
+ mir_free(tmpPath);
+
+ if ((hFile = CreateFile(tszFilename, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL)) == INVALID_HANDLE_VALUE)
+ return -2;
+
+ CloseHandle(hFile);
+ WPARAM isTransparentImage = 0;
+
+ ace->hbmPic = (HBITMAP) BmpFilterLoadBitmap32((WPARAM)&isTransparentImage, (LPARAM)tszFilename);
+ ace->dwFlags = 0;
+ ace->bmHeight = 0;
+ ace->bmWidth = 0;
+ ace->lpDIBSection = NULL;
+ _tcsncpy(ace->szFilename, tszFilename, MAX_PATH);
+ ace->szFilename[MAX_PATH - 1] = 0;
+ if (ace->hbmPic != 0) {
+ BITMAP bminfo;
+
+ GetObject(ace->hbmPic, sizeof(bminfo), &bminfo);
+
+ ace->cbSize = sizeof(avatarCacheEntry);
+ ace->dwFlags = AVS_BITMAP_VALID;
+ if (hContact != NULL && DBGetContactSettingByte(hContact, "ContactPhoto", "Hidden", 0))
+ ace->dwFlags |= AVS_HIDEONCLIST;
+ ace->hContact = hContact;
+ ace->bmHeight = bminfo.bmHeight;
+ ace->bmWidth = bminfo.bmWidth;
+
+ BOOL noTransparency = DBGetContactSettingByte(0, AVS_MODULE, "RemoveAllTransparency", 0);
+
+ // Calc image hash
+ if (hContact != 0 && hContact != (HANDLE)-1)
+ {
+ // Have to reset settings? -> do it if image changed
+ DWORD imgHash = GetImgHash(ace->hbmPic);
+
+ if (imgHash != DBGetContactSettingDword(hContact, "ContactPhoto", "ImageHash", 0))
+ {
+ ResetTranspSettings(hContact);
+ DBWriteContactSettingDword(hContact, "ContactPhoto", "ImageHash", imgHash);
+ }
+
+ // Make transparent?
+ if (!noTransparency && !isTransparentImage
+ && DBGetContactSettingByte(hContact, "ContactPhoto", "MakeTransparentBkg",
+ DBGetContactSettingByte(0, AVS_MODULE, "MakeTransparentBkg", 0)))
+ {
+ if (MakeTransparentBkg(hContact, &ace->hbmPic))
+ {
+ ace->dwFlags |= AVS_CUSTOMTRANSPBKG | AVS_HASTRANSPARENCY;
+ GetObject(ace->hbmPic, sizeof(bminfo), &bminfo);
+ isTransparentImage = TRUE;
+ }
+ }
+ }
+ else if (hContact == (HANDLE)-1) // My avatars
+ {
+ if (!noTransparency && !isTransparentImage
+ && DBGetContactSettingByte(0, AVS_MODULE, "MakeTransparentBkg", 0)
+ && DBGetContactSettingByte(0, AVS_MODULE, "MakeMyAvatarsTransparent", 0))
+ {
+ if (MakeTransparentBkg(0, &ace->hbmPic))
+ {
+ ace->dwFlags |= AVS_CUSTOMTRANSPBKG | AVS_HASTRANSPARENCY;
+ GetObject(ace->hbmPic, sizeof(bminfo), &bminfo);
+ isTransparentImage = TRUE;
+ }
+ }
+ }
+
+ if (DBGetContactSettingByte(0, AVS_MODULE, "MakeGrayscale", 0))
+ {
+ ace->hbmPic = MakeGrayscale(hContact, ace->hbmPic);
+ }
+
+ if (noTransparency)
+ {
+ fei->FI_CorrectBitmap32Alpha(ace->hbmPic, TRUE);
+ isTransparentImage = FALSE;
+ }
+
+ if (bminfo.bmBitsPixel == 32 && isTransparentImage)
+ {
+ if (fei->FI_Premultiply(ace->hbmPic))
+ {
+ ace->dwFlags |= AVS_HASTRANSPARENCY;
+ }
+ ace->dwFlags |= AVS_PREMULTIPLIED;
+ }
+
+ if (szProto)
+ {
+ protoPicCacheEntry *pAce = (protoPicCacheEntry *)ace;
+ if (hContact == 0)
+ pAce->dwFlags |= AVS_PROTOPIC;
+ else if (hContact == (HANDLE)-1)
+ pAce->dwFlags |= AVS_OWNAVATAR;
+ }
+
+ return 1;
+ }
+ return -1;
+}
+
+/*
+ * link a new cache block with the already existing chain of blocks
+ */
+
+static struct CacheNode *AddToList(struct CacheNode *node) {
+ struct CacheNode *pCurrent = g_Cache;
+
+ while(pCurrent->pNextNode != 0)
+ pCurrent = pCurrent->pNextNode;
+
+ pCurrent->pNextNode = node;
+ return pCurrent;
+}
+
+struct CacheNode *FindAvatarInCache(HANDLE hContact, BOOL add, BOOL findAny = FALSE)
+{
+ struct CacheNode *cacheNode = g_Cache, *foundNode = NULL;
+
+ char *szProto = (char *) CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact, 0);
+ if (szProto == NULL || !DBGetContactSettingByte(NULL, AVS_MODULE, szProto, 1))
+ return NULL;
+
+ EnterCriticalSection(&cachecs);
+
+ while(cacheNode)
+ {
+ if (cacheNode->ace.hContact == hContact)
+ {
+ cacheNode->ace.t_lastAccess = time(NULL);
+ foundNode = cacheNode->loaded || findAny ? cacheNode : NULL;
+ LeaveCriticalSection(&cachecs);
+ return foundNode;
+ }
+ if (foundNode == NULL && cacheNode->ace.hContact == 0)
+ foundNode = cacheNode; // found an empty and usable node
+
+ cacheNode = cacheNode->pNextNode;
+ }
+
+ // not found
+
+ if (add)
+ {
+ if (foundNode == NULL) { // no free entry found, create a new and append it to the list
+ EnterCriticalSection(&alloccs); // protect memory block allocation
+ struct CacheNode *newNode = AllocCacheBlock();
+ AddToList(newNode);
+ foundNode = newNode;
+ LeaveCriticalSection(&alloccs);
+ }
+
+ foundNode->ace.hContact = hContact;
+ if (g_MetaAvail)
+ foundNode->dwFlags |= (DBGetContactSettingByte(hContact, g_szMetaName, "IsSubcontact", 0) ? MC_ISSUBCONTACT : 0);
+ foundNode->loaded = FALSE;
+ foundNode->mustLoad = 1; // pic loader will watch this and load images
+ LeaveCriticalSection(&cachecs);
+ SetEvent(hLoaderEvent); // wake him up
+ return NULL;
+ }
+ else
+ {
+ foundNode = NULL;
+ }
+ LeaveCriticalSection(&cachecs);
+ return foundNode;
+}
+
+#define POLYNOMIAL (0x488781ED) /* This is the CRC Poly */
+#define TOPBIT (1 << (WIDTH - 1)) /* MSB */
+#define WIDTH 32
+
+static int GetFileHash(TCHAR* filename)
+{
+ HANDLE hFile = CreateFile(filename, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE, NULL, OPEN_EXISTING, 0, NULL);
+ if (hFile == INVALID_HANDLE_VALUE)
+ return 0;
+
+ int remainder = 0;
+ char data[1024];
+ DWORD dwRead;
+ do
+ {
+ // Read file chunk
+ dwRead = 0;
+ ReadFile(hFile, data, 1024, &dwRead, NULL);
+
+ /* loop through each byte of data */
+ for (int byte = 0; byte < (int) dwRead; ++byte) {
+ /* store the next byte into the remainder */
+ remainder ^= (data[byte] << (WIDTH - 8));
+ /* calculate for all 8 bits in the byte */
+ for (int bit = 8; bit > 0; --bit) {
+ /* check if MSB of remainder is a one */
+ if (remainder & TOPBIT)
+ remainder = (remainder << 1) ^ POLYNOMIAL;
+ else
+ remainder = (remainder << 1);
+ }
+ }
+ } while(dwRead == 1024);
+
+ CloseHandle(hFile);
+
+ return remainder;
+}
+
+static int ProtocolAck(WPARAM wParam, LPARAM lParam)
+{
+ ACKDATA *ack = (ACKDATA *) lParam;
+
+ if (ack != NULL && ack->type == ACKTYPE_AVATAR && ack->hContact != 0
+ // Ignore metacontacts
+ && (!g_MetaAvail || strcmp(ack->szModule, g_szMetaName)))
+ {
+ if (ack->result == ACKRESULT_SUCCESS)
+ {
+ if (ack->hProcess == NULL)
+ ProcessAvatarInfo(ack->hContact, GAIR_NOAVATAR, NULL, ack->szModule);
+ else
+ ProcessAvatarInfo(ack->hContact, GAIR_SUCCESS, (PROTO_AVATAR_INFORMATIONT *) ack->hProcess, ack->szModule);
+ }
+ else if (ack->result == ACKRESULT_FAILED)
+ {
+ ProcessAvatarInfo(ack->hContact, GAIR_FAILED, (PROTO_AVATAR_INFORMATIONT *) ack->hProcess, ack->szModule);
+ }
+ else if (ack->result == ACKRESULT_STATUS)
+ {
+ char *szProto = (char *) CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)ack->hContact, 0);
+ if (szProto == NULL || Proto_NeedDelaysForAvatars(szProto))
+ {
+ // Queue
+ DBWriteContactSettingByte(ack->hContact, "ContactPhoto", "NeedUpdate", 1);
+ QueueAdd(ack->hContact);
+ }
+ else
+ {
+ // Fetch it now
+ FetchAvatarFor(ack->hContact, szProto);
+ }
+ }
+ }
+ return 0;
+}
+
+INT_PTR ProtectAvatar(WPARAM wParam, LPARAM lParam)
+{
+ HANDLE hContact = (HANDLE)wParam;
+ BYTE was_locked = DBGetContactSettingByte(hContact, "ContactPhoto", "Locked", 0);
+
+ if (fei == NULL || was_locked == (BYTE)lParam) // no need for redundant lockings...
+ return 0;
+
+ if (hContact) {
+ if (!was_locked)
+ MakePathRelative(hContact);
+ DBWriteContactSettingByte(hContact, "ContactPhoto", "Locked", lParam ? 1 : 0);
+ if (lParam == 0)
+ MakePathRelative(hContact);
+ ChangeAvatar(hContact, TRUE);
+ }
+ return 0;
+}
+
+/*
+ * for subclassing the open file dialog...
+ */
+struct OpenFileSubclassData {
+ BYTE *locking_request;
+ BYTE setView;
+};
+
+static BOOL CALLBACK OpenFileSubclass(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
+{
+ switch(msg) {
+ case WM_INITDIALOG:
+ {
+ OPENFILENAME *ofn = (OPENFILENAME *)lParam;
+
+ OpenFileSubclassData *data = (OpenFileSubclassData *) malloc(sizeof(OpenFileSubclassData));
+ SetWindowLongPtr(hwnd, GWLP_USERDATA, (LONG_PTR)data);
+ data->locking_request = (BYTE *)ofn->lCustData;
+ data->setView = TRUE;
+
+ TranslateDialogDefault(hwnd);
+ CheckDlgButton(hwnd, IDC_PROTECTAVATAR, *(data->locking_request));
+ break;
+ }
+
+ case WM_COMMAND:
+ if (LOWORD(wParam) == IDC_PROTECTAVATAR)
+ {
+ OpenFileSubclassData *data= (OpenFileSubclassData *)GetWindowLongPtr(hwnd, GWLP_USERDATA);
+ *(data->locking_request) = IsDlgButtonChecked(hwnd, IDC_PROTECTAVATAR) ? TRUE : FALSE;
+ }
+ break;
+
+ case WM_NOTIFY:
+ {
+ OpenFileSubclassData *data= (OpenFileSubclassData *)GetWindowLongPtr(hwnd, GWLP_USERDATA);
+ if (data->setView)
+ {
+ HWND hwndParent = GetParent(hwnd);
+ HWND hwndLv = FindWindowEx(hwndParent, NULL, _T("SHELLDLL_DefView"), NULL) ;
+ if (hwndLv != NULL)
+ {
+ SendMessage(hwndLv, WM_COMMAND, SHVIEW_THUMBNAIL, 0);
+ data->setView = FALSE;
+ }
+ }
+ }
+ break;
+
+ case WM_NCDESTROY:
+ OpenFileSubclassData *data= (OpenFileSubclassData *)GetWindowLongPtr(hwnd, GWLP_USERDATA);
+ free((OpenFileSubclassData *)data);
+ SetWindowLongPtr(hwnd, GWLP_USERDATA, (LONG_PTR)0);
+ break;
+ }
+
+ return FALSE;
+}
+
+/*
+ * set an avatar (service function)
+ * if lParam == NULL, a open file dialog will be opened, otherwise, lParam is taken as a FULL
+ * image filename (will be checked for existance, though)
+ */
+
+INT_PTR avSetAvatar(HANDLE hContact, TCHAR* tszPath)
+{
+ BYTE is_locked = 0;
+ TCHAR FileName[MAX_PATH], szBackupName[MAX_PATH];
+ TCHAR *szFinalName = NULL;
+ HANDLE hFile = 0;
+ BYTE locking_request;
+
+ if (hContact == NULL || fei == NULL)
+ return 0;
+
+ is_locked = DBGetContactSettingByte(hContact, "ContactPhoto", "Locked", 0);
+
+ if ( tszPath == NULL ) {
+ OPENFILENAME ofn = {0};
+ TCHAR filter[256];
+
+ filter[0] = '\0';
+ CallService(MS_UTILS_GETBITMAPFILTERSTRINGST, SIZEOF(filter), ( LPARAM )filter);
+
+ if (IsWinVer2000Plus())
+ ofn.lStructSize = sizeof(ofn);
+ else
+ ofn.lStructSize = OPENFILENAME_SIZE_VERSION_400;
+ ofn.hwndOwner = 0;
+ ofn.lpstrFile = FileName;
+ ofn.lpstrFilter = filter;
+ ofn.nMaxFile = MAX_PATH;
+ ofn.nMaxFileTitle = MAX_PATH;
+ ofn.Flags = OFN_FILEMUSTEXIST | OFN_ENABLETEMPLATE | OFN_EXPLORER | OFN_ENABLESIZING | OFN_ENABLEHOOK;
+ ofn.lpstrInitialDir = _T(".");
+ *FileName = '\0';
+ ofn.lpstrDefExt = _T("");
+ ofn.hInstance = g_hInst;
+ ofn.lpTemplateName = MAKEINTRESOURCE(IDD_OPENSUBCLASS);
+ ofn.lpfnHook = (LPOFNHOOKPROC)OpenFileSubclass;
+ locking_request = is_locked;
+ ofn.lCustData = (LPARAM)&locking_request;
+ if (GetOpenFileName(&ofn)) {
+ szFinalName = FileName;
+ is_locked = locking_request ? 1 : is_locked;
+ }
+ else
+ return 0;
+ }
+ else
+ szFinalName = tszPath;
+
+ /*
+ * filename is now set, check it and perform all needed action
+ */
+
+ if ((hFile = CreateFile(szFinalName, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL)) == INVALID_HANDLE_VALUE)
+ return 0;
+
+ // file exists...
+
+ CloseHandle(hFile);
+
+ AVS_pathToRelative(szFinalName, szBackupName);
+ DBWriteContactSettingTString(hContact, "ContactPhoto", "Backup", szBackupName);
+
+ DBWriteContactSettingByte(hContact, "ContactPhoto", "Locked", is_locked);
+ DBWriteContactSettingTString(hContact, "ContactPhoto", "File", szFinalName);
+ MakePathRelative(hContact, szFinalName);
+ // Fix cache
+ ChangeAvatar(hContact, TRUE);
+
+ return 0;
+}
+
+INT_PTR SetAvatar(WPARAM wParam, LPARAM lParam)
+{ return avSetAvatar(( HANDLE )wParam, A2T(( const char* )lParam ));
+}
+
+#if defined( _UNICODE )
+INT_PTR SetAvatarW(WPARAM wParam, LPARAM lParam)
+{ return avSetAvatar(( HANDLE )wParam, ( TCHAR* )lParam );
+}
+#endif
+
+/*
+ * see if is possible to set the avatar for the expecified protocol
+ */
+static INT_PTR CanSetMyAvatar(WPARAM wParam, LPARAM lParam)
+{
+ char *protocol = (char *) wParam;
+ if (protocol == NULL || fei == NULL)
+ return 0;
+
+ return ProtoServiceExists(protocol, PS_SETMYAVATAR);
+}
+
+struct SetMyAvatarHookData {
+ char *protocol;
+ BOOL square;
+ BOOL grow;
+
+ BOOL thumbnail;
+};
+
+
+/*
+ * Callback to set thumbnaill view to open dialog
+ */
+static UINT_PTR CALLBACK SetMyAvatarHookProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
+{
+ switch(msg) {
+ case WM_INITDIALOG:
+ {
+ InterlockedExchange(&hwndSetMyAvatar, (LONG) hwnd);
+
+ SetWindowLongPtr(hwnd, GWLP_USERDATA, (LONG_PTR)lParam);
+ OPENFILENAME *ofn = (OPENFILENAME *)lParam;
+ SetMyAvatarHookData *data = (SetMyAvatarHookData *) ofn->lCustData;
+ data->thumbnail = TRUE;
+
+ SetWindowText(GetDlgItem(hwnd, IDC_MAKE_SQUARE), TranslateT("Make the avatar square"));
+ SetWindowText(GetDlgItem(hwnd, IDC_GROW), TranslateT("Grow avatar to fit max allowed protocol size"));
+
+ CheckDlgButton(hwnd, IDC_MAKE_SQUARE, data->square ? BST_CHECKED : BST_UNCHECKED);
+ CheckDlgButton(hwnd, IDC_GROW, data->grow ? BST_CHECKED : BST_UNCHECKED);
+
+ if (data->protocol != NULL && (Proto_AvatarImageProportion(data->protocol) & PIP_SQUARE))
+ EnableWindow(GetDlgItem(hwnd, IDC_MAKE_SQUARE), FALSE);
+ }
+ break;
+
+ case WM_NOTIFY:
+ {
+ OPENFILENAME *ofn = (OPENFILENAME *)GetWindowLongPtr(hwnd, GWLP_USERDATA);
+ SetMyAvatarHookData *data = (SetMyAvatarHookData *) ofn->lCustData;
+ if (data->thumbnail)
+ {
+ HWND hwndParent = GetParent(hwnd);
+ HWND hwndLv = FindWindowEx(hwndParent, NULL, _T("SHELLDLL_DefView"), NULL) ;
+ if (hwndLv != NULL)
+ {
+ SendMessage(hwndLv, WM_COMMAND, SHVIEW_THUMBNAIL, 0);
+ data->thumbnail = FALSE;
+ }
+ }
+ break;
+ }
+ case WM_DESTROY:
+ {
+ OPENFILENAME *ofn = (OPENFILENAME *)GetWindowLongPtr(hwnd, GWLP_USERDATA);
+ SetMyAvatarHookData *data = (SetMyAvatarHookData *) ofn->lCustData;
+ data->square = IsDlgButtonChecked(hwnd, IDC_MAKE_SQUARE);
+ data->grow = IsDlgButtonChecked(hwnd, IDC_GROW);
+
+ InterlockedExchange(&hwndSetMyAvatar, 0);
+ break;
+ }
+ }
+
+ return 0;
+}
+
+const TCHAR *GetFormatExtension(int format)
+{
+ if (format == PA_FORMAT_PNG)
+ return _T(".png");
+ if (format == PA_FORMAT_JPEG)
+ return _T(".jpg");
+ if (format == PA_FORMAT_ICON)
+ return _T(".ico");
+ if (format == PA_FORMAT_BMP)
+ return _T(".bmp");
+ if (format == PA_FORMAT_GIF)
+ return _T(".gif");
+ if (format == PA_FORMAT_SWF)
+ return _T(".swf");
+ if (format == PA_FORMAT_XML)
+ return _T(".xml");
+
+ return NULL;
+}
+
+int GetImageFormat(TCHAR *filename)
+{
+ size_t len = lstrlen(filename);
+
+ if (len < 5)
+ return PA_FORMAT_UNKNOWN;
+
+ if (_tcsicmp(_T(".png"), &filename[len-4]) == 0)
+ return PA_FORMAT_PNG;
+
+ if (_tcsicmp(_T(".jpg"), &filename[len-4]) == 0 || _tcsicmp(_T(".jpeg"), &filename[len-4]) == 0)
+ return PA_FORMAT_JPEG;
+
+ if (_tcsicmp(_T(".ico"), &filename[len-4]) == 0)
+ return PA_FORMAT_ICON;
+
+ if (_tcsicmp(_T(".bmp"), &filename[len-4]) == 0 || _tcsicmp(_T(".rle"), &filename[len-4]) == 0)
+ return PA_FORMAT_BMP;
+
+ if (_tcsicmp(_T(".gif"), &filename[len-4]) == 0)
+ return PA_FORMAT_GIF;
+
+ if (_tcsicmp(_T(".swf"), &filename[len-4]) == 0)
+ return PA_FORMAT_SWF;
+
+ if (_tcsicmp(_T(".xml"), &filename[len-4]) == 0)
+ return PA_FORMAT_XML;
+
+ return PA_FORMAT_UNKNOWN;
+}
+
+static void FilterGetStrings(TCHAR *filter, int bytesLeft, BOOL xml, BOOL swf)
+{
+ TCHAR *pfilter;
+ int wParam = bytesLeft;
+
+ lstrcpyn(filter, TranslateT("All Files"), bytesLeft); bytesLeft-=lstrlen(filter);
+ _tcsncat(filter, _T(" (*.bmp;*.jpg;*.gif;*.png"), bytesLeft);
+ if (swf) _tcscat(filter, _T(";*.swf"));
+ if (xml) _tcscat(filter, _T(";*.xml"));
+ _tcscat(filter, _T(")"));
+ pfilter=filter+lstrlen(filter)+1; bytesLeft=wParam-(pfilter-filter);
+ lstrcpyn(pfilter, _T("*.BMP;*.RLE;*.JPG;*.JPEG;*.GIF;*.PNG"), bytesLeft);
+ if (swf) _tcscat(pfilter, _T(";*.SWF"));
+ if (xml) _tcscat(pfilter, _T(";*.XML"));
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+
+ lstrcpyn(pfilter, TranslateT("Windows Bitmaps"), bytesLeft); bytesLeft-=lstrlen(pfilter);
+ _tcsncat(pfilter, _T(" (*.bmp;*.rle)"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+ lstrcpyn(pfilter, _T("*.BMP;*.RLE"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+
+ lstrcpyn(pfilter,TranslateT("JPEG Bitmaps"),bytesLeft); bytesLeft-=lstrlen(pfilter);
+ _tcsncat(pfilter, _T(" (*.jpg;*.jpeg)"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+ lstrcpyn(pfilter, _T("*.JPG;*.JPEG"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+
+ lstrcpyn(pfilter,TranslateT("GIF Bitmaps"),bytesLeft); bytesLeft-=lstrlen(pfilter);
+ _tcsncat(pfilter, _T(" (*.gif)"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+ lstrcpyn(pfilter, _T("*.GIF"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+
+ lstrcpyn(pfilter,TranslateT("PNG Bitmaps"), bytesLeft); bytesLeft-=lstrlen(pfilter);
+ _tcsncat(pfilter, _T(" (*.png)"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+ lstrcpyn(pfilter, _T("*.PNG"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+
+ if (swf)
+ {
+ lstrcpyn(pfilter,TranslateT("Flash Animations"), bytesLeft); bytesLeft-=lstrlen(pfilter);
+ _tcsncat(pfilter, _T(" (*.swf)"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+ lstrcpyn(pfilter, _T("*.SWF"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+ }
+
+ if (xml)
+ {
+ lstrcpyn(pfilter, TranslateT("XML Files"), bytesLeft); bytesLeft-=lstrlen(pfilter);
+ _tcsncat(pfilter, _T(" (*.xml)"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+ lstrcpyn(pfilter, _T("*.XML"), bytesLeft);
+ pfilter+=lstrlen(pfilter)+1; bytesLeft=wParam-(pfilter-filter);
+ }
+
+ if (bytesLeft) *pfilter='\0';
+}
+
+static void DeleteGlobalUserAvatar()
+{
+ DBVARIANT dbv = {0};
+ if (DBGetContactSettingTString(NULL, AVS_MODULE, "GlobalUserAvatarFile", &dbv))
+ return;
+
+ TCHAR szFilename[MAX_PATH];
+ AVS_pathToAbsolute(dbv.ptszVal, szFilename);
+ DBFreeVariant(&dbv);
+
+ DeleteFile(szFilename);
+ DBDeleteContactSetting(NULL, AVS_MODULE, "GlobalUserAvatarFile");
+}
+
+static void SetIgnoreNotify(char *protocol, BOOL ignore)
+{
+ for(int i = 0; i < g_MyAvatars.getCount(); i++) {
+ if (protocol == NULL || !lstrcmpA(g_MyAvatars[i].szProtoname, protocol)) {
+ if (ignore)
+ g_MyAvatars[i].dwFlags |= AVS_IGNORENOTIFY;
+ else
+ g_MyAvatars[i].dwFlags &= ~AVS_IGNORENOTIFY;
+ }
+ }
+}
+
+static int InternalRemoveMyAvatar(char *protocol)
+{
+ SetIgnoreNotify(protocol, TRUE);
+
+ // Remove avatar
+ int ret = 0;
+ if (protocol != NULL)
+ {
+ if (ProtoServiceExists(protocol, PS_SETMYAVATAR))
+ ret = SaveAvatar(protocol, NULL);
+ else
+ ret = -3;
+
+ if (ret == 0)
+ {
+ // Has global avatar?
+ DBVARIANT dbv = {0};
+ if (!DBGetContactSettingTString(NULL, AVS_MODULE, "GlobalUserAvatarFile", &dbv))
+ {
+ DBFreeVariant(&dbv);
+ DBWriteContactSettingByte(NULL, AVS_MODULE, "GlobalUserAvatarNotConsistent", 1);
+ DeleteGlobalUserAvatar();
+ }
+ }
+ }
+ else
+ {
+ PROTOACCOUNT **accs;
+ int i,count;
+
+ ProtoEnumAccounts( &count, &accs );
+ for (i = 0; i < count; i++)
+ {
+ if ( !ProtoServiceExists( accs[i]->szModuleName, PS_SETMYAVATAR))
+ continue;
+
+ if (!Proto_IsAvatarsEnabled( accs[i]->szModuleName ))
+ continue;
+
+ // Found a protocol
+ int retTmp = SaveAvatar( accs[i]->szModuleName, NULL);
+ if (retTmp != 0)
+ ret = retTmp;
+ }
+
+ DeleteGlobalUserAvatar();
+
+ if (ret)
+ DBWriteContactSettingByte(NULL, AVS_MODULE, "GlobalUserAvatarNotConsistent", 1);
+ else
+ DBWriteContactSettingByte(NULL, AVS_MODULE, "GlobalUserAvatarNotConsistent", 0);
+ }
+
+ SetIgnoreNotify(protocol, FALSE);
+
+ ReportMyAvatarChanged((WPARAM)(( protocol == NULL ) ? "" : protocol ), 0);
+ return ret;
+}
+
+static int InternalSetMyAvatar(char *protocol, TCHAR *szFinalName, SetMyAvatarHookData &data, BOOL allAcceptXML, BOOL allAcceptSWF)
+{
+ HANDLE hFile = 0;
+
+ int format = GetImageFormat(szFinalName);
+ if (format == PA_FORMAT_UNKNOWN || (hFile = CreateFile(szFinalName, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL)) == INVALID_HANDLE_VALUE)
+ return -3;
+
+ CloseHandle(hFile);
+
+ // file exists...
+
+ HBITMAP hBmp = NULL;
+
+ if (format == PA_FORMAT_SWF)
+ {
+ if (!allAcceptSWF)
+ return -4;
+ }
+ else if (format == PA_FORMAT_XML)
+ {
+ if (!allAcceptXML)
+ return -4;
+ }
+ else
+ {
+ // Try to open if is not a flash or XML
+ hBmp = (HBITMAP) CallService(MS_IMG_LOAD, (WPARAM) szFinalName, IMGL_TCHAR);
+ if (hBmp == NULL)
+ return -4;
+ }
+
+ SetIgnoreNotify(protocol, TRUE);
+
+ int ret = 0;
+ if (protocol != NULL)
+ {
+ ret = SetProtoMyAvatar(protocol, hBmp, szFinalName, format, data.square, data.grow);
+
+ if (ret == 0)
+ {
+ DeleteGlobalUserAvatar();
+ DBWriteContactSettingByte(NULL, AVS_MODULE, "GlobalUserAvatarNotConsistent", 1);
+ }
+ }
+ else
+ {
+ PROTOACCOUNT **accs;
+ int i,count;
+
+ ProtoEnumAccounts( &count, &accs );
+ for (i = 0; i < count; i++)
+ {
+ if ( !ProtoServiceExists( accs[i]->szModuleName, PS_SETMYAVATAR))
+ continue;
+
+ if ( !Proto_IsAvatarsEnabled( accs[i]->szModuleName ))
+ continue;
+
+ int retTmp = SetProtoMyAvatar( accs[i]->szModuleName, hBmp, szFinalName, format, data.square, data.grow);
+ if (retTmp != 0)
+ ret = retTmp;
+ }
+
+ DeleteGlobalUserAvatar();
+
+ if (ret)
+ {
+ DBWriteContactSettingByte(NULL, AVS_MODULE, "GlobalUserAvatarNotConsistent", 1);
+ }
+ else
+ {
+ // Copy avatar file to store as global one
+ TCHAR globalFile[1024];
+ BOOL saved = TRUE;
+ if (FoldersGetCustomPathT(hGlobalAvatarFolder, globalFile, SIZEOF(globalFile), _T("")))
+ {
+ mir_sntprintf(globalFile, SIZEOF(globalFile), _T("%s\\%s"), g_szDataPath, _T("GlobalAvatar"));
+ CreateDirectory(globalFile, NULL);
+ }
+
+ TCHAR *ext = _tcsrchr(szFinalName, _T('.')); // Can't be NULL here
+ if (format == PA_FORMAT_XML || format == PA_FORMAT_SWF)
+ {
+ mir_sntprintf(globalFile, SIZEOF(globalFile), _T("%s\\my_global_avatar%s"), globalFile, ext);
+ CopyFile(szFinalName, globalFile, FALSE);
+ }
+ else
+ {
+ // Resize (to avoid too big avatars)
+ ResizeBitmap rb = {0};
+ rb.size = sizeof(ResizeBitmap);
+ rb.hBmp = hBmp;
+ rb.max_height = 300;
+ rb.max_width = 300;
+ rb.fit = (data.grow ? 0 : RESIZEBITMAP_FLAG_DONT_GROW)
+ | (data.square ? RESIZEBITMAP_MAKE_SQUARE : RESIZEBITMAP_KEEP_PROPORTIONS);
+
+ HBITMAP hBmpTmp = (HBITMAP) BmpFilterResizeBitmap((WPARAM)&rb, 0);
+
+ // Check if need to resize
+ if (hBmpTmp == hBmp || hBmpTmp == NULL)
+ {
+ // Use original image
+ mir_sntprintf(globalFile, SIZEOF(globalFile), _T("%s\\my_global_avatar%s"), globalFile, ext);
+ CopyFile(szFinalName, globalFile, FALSE);
+ }
+ else
+ {
+ // Save as PNG
+ mir_sntprintf(globalFile, SIZEOF(globalFile), _T("%s\\my_global_avatar.png"), globalFile);
+ if (BmpFilterSaveBitmap((WPARAM) hBmpTmp, (LPARAM) globalFile))
+ saved = FALSE;
+
+ DeleteObject(hBmpTmp);
+ }
+ }
+
+ if (saved)
+ {
+ TCHAR relFile[1024];
+ if (AVS_pathToRelative(globalFile, relFile))
+ DBWriteContactSettingTString(NULL, AVS_MODULE, "GlobalUserAvatarFile", relFile);
+ else
+ DBWriteContactSettingTString(NULL, AVS_MODULE, "GlobalUserAvatarFile", globalFile);
+
+ DBWriteContactSettingByte(NULL, AVS_MODULE, "GlobalUserAvatarNotConsistent", 0);
+ }
+ else
+ {
+ DBWriteContactSettingByte(NULL, AVS_MODULE, "GlobalUserAvatarNotConsistent", 1);
+ }
+ }
+ }
+
+ DeleteObject(hBmp);
+
+ SetIgnoreNotify(protocol, FALSE);
+
+ ReportMyAvatarChanged((WPARAM)(( protocol == NULL ) ? "" : protocol ), 0);
+ return ret;
+}
+
+/*
+ * set an avatar for a protocol (service function)
+ * if lParam == NULL, a open file dialog will be opened, otherwise, lParam is taken as a FULL
+ * image filename (will be checked for existance, though)
+ */
+
+INT_PTR avSetMyAvatar( char* protocol, TCHAR* tszPath )
+{
+ TCHAR FileName[MAX_PATH];
+ TCHAR *szFinalName = NULL;
+ BOOL allAcceptXML;
+ BOOL allAcceptSWF;
+
+ // Protocol allow seting of avatar?
+ if (protocol != NULL && !CanSetMyAvatar((WPARAM) protocol, 0))
+ return -1;
+
+ if (tszPath == NULL && hwndSetMyAvatar != 0)
+ {
+ SetForegroundWindow((HWND) hwndSetMyAvatar);
+ SetFocus((HWND) hwndSetMyAvatar);
+ ShowWindow((HWND) hwndSetMyAvatar, SW_SHOW);
+ return -2;
+ }
+
+ SetMyAvatarHookData data = { 0 };
+
+ // Check for XML and SWF
+ if (protocol == NULL)
+ {
+ allAcceptXML = TRUE;
+ allAcceptSWF = TRUE;
+
+ PROTOACCOUNT **accs;
+ int i,count;
+
+ ProtoEnumAccounts( &count, &accs );
+ for (i = 0; i < count; i++)
+ {
+ if ( !ProtoServiceExists( accs[i]->szModuleName, PS_SETMYAVATAR))
+ continue;
+
+ if ( !Proto_IsAvatarsEnabled( accs[i]->szModuleName ))
+ continue;
+
+ allAcceptXML = allAcceptXML && Proto_IsAvatarFormatSupported( accs[i]->szModuleName, PA_FORMAT_XML);
+ allAcceptSWF = allAcceptSWF && Proto_IsAvatarFormatSupported( accs[i]->szModuleName, PA_FORMAT_SWF);
+ }
+
+ data.square = DBGetContactSettingByte(0, AVS_MODULE, "SetAllwaysMakeSquare", 0);
+ }
+ else
+ {
+ allAcceptXML = Proto_IsAvatarFormatSupported(protocol, PA_FORMAT_XML);
+ allAcceptSWF = Proto_IsAvatarFormatSupported(protocol, PA_FORMAT_SWF);
+
+ data.protocol = protocol;
+ data.square = (Proto_AvatarImageProportion(protocol) & PIP_SQUARE)
+ || DBGetContactSettingByte(0, AVS_MODULE, "SetAllwaysMakeSquare", 0);
+ }
+
+ if (tszPath == NULL) {
+ OPENFILENAME ofn = {0};
+ TCHAR filter[512];
+ TCHAR inipath[1024];
+
+ data.protocol = protocol;
+
+ filter[0] = '\0';
+ FilterGetStrings(filter, SIZEOF(filter), allAcceptXML, allAcceptSWF);
+
+ FoldersGetCustomPathT(hMyAvatarsFolder, inipath, SIZEOF(inipath), _T("."));
+
+ if (IsWinVer2000Plus())
+ ofn.lStructSize = sizeof(ofn);
+ else
+ ofn.lStructSize = OPENFILENAME_SIZE_VERSION_400;
+ ofn.hwndOwner = 0;
+ ofn.lpstrFile = FileName;
+ ofn.lpstrFilter = filter;
+ ofn.nMaxFile = MAX_PATH;
+ ofn.nMaxFileTitle = MAX_PATH;
+ ofn.Flags = OFN_FILEMUSTEXIST | OFN_ENABLETEMPLATE | OFN_EXPLORER | OFN_ENABLESIZING | OFN_ENABLEHOOK;
+ ofn.lpstrInitialDir = inipath;
+ ofn.lpTemplateName = MAKEINTRESOURCE(IDD_SET_OWN_SUBCLASS);
+ ofn.lpfnHook = SetMyAvatarHookProc;
+ ofn.lCustData = (LPARAM) &data;
+
+ *FileName = '\0';
+ ofn.lpstrDefExt = _T("");
+ ofn.hInstance = g_hInst;
+
+ TCHAR title[256];
+ if (protocol == NULL)
+ mir_sntprintf(title, SIZEOF(title), TranslateT("Set My Avatar"));
+ else
+ {
+ TCHAR* prototmp = mir_a2t(protocol);
+ mir_sntprintf(title, SIZEOF(title), TranslateT("Set My Avatar for %s"), prototmp);
+ mir_free(prototmp);
+ }
+ ofn.lpstrTitle = title;
+
+ if (GetOpenFileName(&ofn))
+ szFinalName = FileName;
+ else
+ return 1;
+ }
+ else
+ szFinalName = (TCHAR *)tszPath;
+
+ /*
+ * filename is now set, check it and perform all needed action
+ */
+
+ if (szFinalName[0] == '\0')
+ return InternalRemoveMyAvatar(protocol);
+
+ return InternalSetMyAvatar(protocol, szFinalName, data, allAcceptXML, allAcceptSWF);
+}
+
+static INT_PTR SetMyAvatar( WPARAM wParam, LPARAM lParam )
+{ return avSetMyAvatar(( char* )wParam, A2T(( const char* )lParam ));
+}
+
+#if defined( _UNICODE )
+static INT_PTR SetMyAvatarW( WPARAM wParam, LPARAM lParam )
+{ return avSetMyAvatar(( char* )wParam, ( TCHAR* )lParam );
+}
+#endif
+
+///////////////////////////////////////////////////////////////////////////////////////////////////////
+
+static DWORD GetFileSize(TCHAR *szFilename)
+{
+ HANDLE hFile = CreateFile(szFilename, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
+ if (hFile == INVALID_HANDLE_VALUE)
+ return 0;
+
+ DWORD low = GetFileSize(hFile, NULL);
+
+ CloseHandle(hFile);
+
+ if (low == INVALID_FILE_SIZE)
+ return 0;
+
+ return low;
+}
+
+struct SaveProtocolData {
+ DWORD max_size;
+ TCHAR image_file_name[MAX_PATH];
+ BOOL saved;
+ BOOL need_smaller_size;
+ int width;
+ int height;
+ TCHAR temp_file[MAX_PATH];
+ HBITMAP hBmpProto;
+};
+
+static void SaveImage(SaveProtocolData &d, char *protocol, int format)
+{
+ if (Proto_IsAvatarFormatSupported(protocol, format))
+ {
+ mir_sntprintf(d.image_file_name, SIZEOF(d.image_file_name), _T("%s%s"), d.temp_file, GetFormatExtension(format));
+ if (!BmpFilterSaveBitmapT(d.hBmpProto, d.image_file_name, format == PA_FORMAT_JPEG ? JPEG_QUALITYSUPERB : 0))
+ {
+ if (d.max_size != 0 && GetFileSize(d.image_file_name) > d.max_size)
+ {
+ DeleteFile(d.image_file_name);
+
+ if (format == PA_FORMAT_JPEG)
+ {
+ // Try with lower quality
+ if (!BmpFilterSaveBitmapT(d.hBmpProto, d.image_file_name, JPEG_QUALITYGOOD))
+ {
+ if (GetFileSize(d.image_file_name) > d.max_size)
+ {
+ DeleteFile(d.image_file_name);
+ d.need_smaller_size = TRUE;
+ }
+ else
+ d.saved = TRUE;
+ }
+ }
+ else
+ d.need_smaller_size = TRUE;
+ }
+ else
+ d.saved = TRUE;
+ }
+ }
+}
+
+static int SetProtoMyAvatar(char *protocol, HBITMAP hBmp, TCHAR *originalFilename, int originalFormat,
+ BOOL square, BOOL grow)
+{
+ if (!ProtoServiceExists(protocol, PS_SETMYAVATAR))
+ return -1;
+
+ // If is swf or xml, just set it
+
+ if (originalFormat == PA_FORMAT_SWF)
+ {
+ if (!Proto_IsAvatarFormatSupported(protocol, PA_FORMAT_SWF))
+ return -1;
+
+ return SaveAvatar(protocol, originalFilename);
+ }
+
+ if (originalFormat == PA_FORMAT_XML)
+ {
+ if (!Proto_IsAvatarFormatSupported(protocol, PA_FORMAT_XML))
+ return -1;
+
+ return SaveAvatar(protocol, originalFilename);
+ }
+
+ // Get protocol info
+ SaveProtocolData d = {0};
+
+ d.max_size = (DWORD) Proto_GetAvatarMaxFileSize(protocol);
+
+ Proto_GetAvatarMaxSize(protocol, &d.width, &d.height);
+ int orig_width = d.width;
+ int orig_height = d.height;
+
+ if (Proto_AvatarImageProportion(protocol) & PIP_SQUARE)
+ square = TRUE;
+
+
+ // Try to save until a valid image is found or we give up
+ int num_tries = 0;
+ do {
+ // Lets do it
+ ResizeBitmap rb;
+ rb.size = sizeof(ResizeBitmap);
+ rb.hBmp = hBmp;
+ rb.max_height = d.height;
+ rb.max_width = d.width;
+ rb.fit = (grow ? 0 : RESIZEBITMAP_FLAG_DONT_GROW)
+ | (square ? RESIZEBITMAP_MAKE_SQUARE : RESIZEBITMAP_KEEP_PROPORTIONS);
+
+ d.hBmpProto = (HBITMAP) BmpFilterResizeBitmap((WPARAM)&rb, 0);
+
+ if (d.hBmpProto == NULL)
+ {
+ if (d.temp_file[0] != '\0')
+ DeleteFile(d.temp_file);
+ return -1;
+ }
+
+ // Check if can use original image
+ if (d.hBmpProto == hBmp
+ && Proto_IsAvatarFormatSupported(protocol, originalFormat)
+ && (d.max_size == 0 || GetFileSize(originalFilename) < d.max_size))
+ {
+ if (d.temp_file[0] != '\0')
+ DeleteFile(d.temp_file);
+
+ // Use original image
+ return SaveAvatar(protocol, originalFilename);
+ }
+
+ // Create a temporary file (if was not created already)
+ if (d.temp_file[0] == '\0')
+ {
+ d.temp_file[0] = '\0';
+ if (GetTempPath(MAX_PATH, d.temp_file) == 0
+ || GetTempFileName(d.temp_file, _T("mir_av_"), 0, d.temp_file) == 0)
+ {
+ DeleteObject(d.hBmpProto);
+ return -1;
+ }
+ }
+
+ // Which format?
+
+ // First try to use original format
+ if (originalFormat != PA_FORMAT_BMP)
+ SaveImage(d, protocol, originalFormat);
+
+ if (!d.saved && originalFormat != PA_FORMAT_PNG)
+ SaveImage(d, protocol, PA_FORMAT_PNG);
+
+ if (!d.saved && originalFormat != PA_FORMAT_JPEG)
+ SaveImage(d, protocol, PA_FORMAT_JPEG);
+
+ if (!d.saved && originalFormat != PA_FORMAT_GIF)
+ SaveImage(d, protocol, PA_FORMAT_GIF);
+
+ if (!d.saved)
+ SaveImage(d, protocol, PA_FORMAT_BMP);
+
+ num_tries++;
+ if (!d.saved && d.need_smaller_size && num_tries < 4)
+ {
+ // Cleanup
+ if (d.hBmpProto != hBmp)
+ DeleteObject(d.hBmpProto);
+
+ // use a smaller size
+ d.width = orig_width * (4 - num_tries) / 4;
+ d.height = orig_height * (4 - num_tries) / 4;
+ }
+
+ } while(!d.saved && d.need_smaller_size && num_tries < 4);
+
+ int ret;
+
+ if (d.saved)
+ {
+ // Call proto service
+ ret = SaveAvatar(protocol, d.image_file_name);
+ DeleteFile(d.image_file_name);
+ }
+ else
+ {
+ ret = -1;
+ }
+
+ if (d.temp_file[0] != '\0')
+ DeleteFile(d.temp_file);
+
+ if (d.hBmpProto != hBmp)
+ DeleteObject(d.hBmpProto);
+
+ return ret;
+}
+
+static INT_PTR ContactOptions(WPARAM wParam, LPARAM lParam)
+{
+ if (wParam)
+ CreateDialogParam(g_hInst, MAKEINTRESOURCE(IDD_AVATAROPTIONS), 0, DlgProcAvatarOptions, (LPARAM)wParam);
+ return 0;
+}
+
+INT_PTR GetMyAvatar(WPARAM wParam, LPARAM lParam)
+{
+ int i;
+ char *szProto = (char *)lParam;
+
+ if (wParam || g_shutDown || fei == NULL)
+ return 0;
+
+ if (lParam == 0 || IsBadReadPtr(szProto, 4))
+ return 0;
+
+ for(i = 0; i < g_MyAvatars.getCount(); i++) {
+ if (!lstrcmpA(szProto, g_MyAvatars[i].szProtoname) && g_MyAvatars[i].hbmPic != 0)
+ return (INT_PTR)&g_MyAvatars[i];
+ }
+ return 0;
+}
+
+static protoPicCacheEntry *GetProtoDefaultAvatar(HANDLE hContact)
+{
+ char *szProto = (char *)CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact, 0);
+ if (szProto) {
+ for(int i = 0; i < g_ProtoPictures.getCount(); i++) {
+ protoPicCacheEntry& p = g_ProtoPictures[i];
+ if ( !lstrcmpA(p.szProtoname, szProto) && p.hbmPic != NULL)
+ return &g_ProtoPictures[i];
+ }
+ }
+ return NULL;
+}
+
+HANDLE GetContactThatHaveTheAvatar(HANDLE hContact, int locked = -1)
+{
+ if (g_MetaAvail && DBGetContactSettingByte(NULL, g_szMetaName, "Enabled", 0)) {
+ if (DBGetContactSettingDword(hContact, g_szMetaName, "NumContacts", 0) >= 1) {
+ if (locked == -1)
+ locked = DBGetContactSettingByte(hContact, "ContactPhoto", "Locked", 0);
+
+ if (!locked)
+ hContact = (HANDLE)CallService(MS_MC_GETMOSTONLINECONTACT, (WPARAM)hContact, 0);
+ }
+ }
+ return hContact;
+}
+
+INT_PTR GetAvatarBitmap(WPARAM wParam, LPARAM lParam)
+{
+ if (wParam == 0 || g_shutDown || fei == NULL)
+ return 0;
+
+ HANDLE hContact = (HANDLE) wParam;
+ hContact = GetContactThatHaveTheAvatar(hContact);
+
+ // Get the node
+ struct CacheNode *node = FindAvatarInCache(hContact, TRUE);
+ if (node == NULL || !node->loaded)
+ return (INT_PTR) GetProtoDefaultAvatar(hContact);
+ else
+ return (INT_PTR) &node->ace;
+}
+
+// Just delete an avatar from cache
+// An cache entry is never deleted. What is deleted is the image handle inside it
+// This is done this way to keep track of which avatars avs have to keep track
+void DeleteAvatarFromCache(HANDLE hContact, BOOL forever)
+{
+ hContact = GetContactThatHaveTheAvatar(hContact);
+
+ struct CacheNode *node = FindAvatarInCache(hContact, FALSE);
+ if (node == NULL) {
+ struct CacheNode temp_node = {0};
+ if (g_MetaAvail)
+ temp_node.dwFlags |= (DBGetContactSettingByte(hContact, g_szMetaName, "IsSubcontact", 0) ? MC_ISSUBCONTACT : 0);
+ NotifyMetaAware(hContact, &temp_node, (AVATARCACHEENTRY *)GetProtoDefaultAvatar(hContact));
+ return;
+ }
+ node->mustLoad = -1; // mark for deletion
+ if (forever)
+ node->dwFlags |= AVS_DELETENODEFOREVER;
+ SetEvent(hLoaderEvent);
+}
+
+int ChangeAvatar(HANDLE hContact, BOOL fLoad, BOOL fNotifyHist, int pa_format)
+{
+ if (g_shutDown)
+ return 0;
+
+ hContact = GetContactThatHaveTheAvatar(hContact);
+
+ // Get the node
+ struct CacheNode *node = FindAvatarInCache(hContact, g_AvatarHistoryAvail && fNotifyHist, TRUE);
+ if (node == NULL)
+ return 0;
+
+ if (fNotifyHist)
+ node->dwFlags |= AVH_MUSTNOTIFY;
+
+ node->mustLoad = fLoad ? 1 : -1;
+ node->pa_format = pa_format;
+ SetEvent(hLoaderEvent);
+ return 0;
+}
+
+/*
+ * this thread scans the cache and handles nodes which have mustLoad set to > 0 (must be loaded/reloaded) or
+ * nodes where mustLoad is < 0 (must be deleted).
+ * its waken up by the event and tries to lock the cache only when absolutely necessary.
+ */
+
+static void PicLoader(LPVOID param)
+{
+ DWORD dwDelay = DBGetContactSettingDword(NULL, AVS_MODULE, "picloader_sleeptime", 80);
+
+ if (dwDelay < 30)
+ dwDelay = 30;
+ else if (dwDelay > 100)
+ dwDelay = 100;
+
+ while(!g_shutDown) {
+ struct CacheNode *node = g_Cache;
+
+ while(!g_shutDown && node) {
+ if (node->mustLoad > 0 && node->ace.hContact) {
+ node->mustLoad = 0;
+ AVATARCACHEENTRY ace_temp;
+
+ if (DBGetContactSettingByte(node->ace.hContact, "ContactPhoto", "NeedUpdate", 0))
+ QueueAdd(node->ace.hContact);
+
+ CopyMemory(&ace_temp, &node->ace, sizeof(AVATARCACHEENTRY));
+ ace_temp.hbmPic = 0;
+
+ int result = CreateAvatarInCache(node->ace.hContact, &ace_temp, NULL);
+
+ if (result == -2)
+ {
+ char *szProto = (char *) CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)node->ace.hContact, 0);
+ if (szProto == NULL || Proto_NeedDelaysForAvatars(szProto))
+ {
+ QueueAdd(node->ace.hContact);
+ }
+ else
+ {
+ if (FetchAvatarFor(node->ace.hContact, szProto) == GAIR_SUCCESS)
+ // Try yo create again
+ result = CreateAvatarInCache(node->ace.hContact, &ace_temp, NULL);
+ }
+ }
+
+ if ((result == 1 && ace_temp.hbmPic != 0)) // Loaded
+ {
+ HBITMAP oldPic = node->ace.hbmPic;
+
+ EnterCriticalSection(&cachecs);
+ CopyMemory(&node->ace, &ace_temp, sizeof(AVATARCACHEENTRY));
+ node->loaded = TRUE;
+ LeaveCriticalSection(&cachecs);
+ if (oldPic)
+ DeleteObject(oldPic);
+ NotifyMetaAware(node->ace.hContact, node);
+ }
+ else if (result == 0 || result == -3) // Has no avatar
+ {
+ HBITMAP oldPic = node->ace.hbmPic;
+
+ EnterCriticalSection(&cachecs);
+ CopyMemory(&node->ace, &ace_temp, sizeof(AVATARCACHEENTRY));
+ node->loaded = FALSE;
+ node->mustLoad = 0;
+ LeaveCriticalSection(&cachecs);
+ if (oldPic)
+ DeleteObject(oldPic);
+ NotifyMetaAware(node->ace.hContact, node);
+ }
+
+ mir_sleep(dwDelay);
+ }
+ else if (node->mustLoad < 0 && node->ace.hContact) { // delete this picture
+ HANDLE hContact = node->ace.hContact;
+ EnterCriticalSection(&cachecs);
+ node->mustLoad = 0;
+ node->loaded = 0;
+ if (node->ace.hbmPic)
+ DeleteObject(node->ace.hbmPic);
+ ZeroMemory(&node->ace, sizeof(AVATARCACHEENTRY));
+ if (node->dwFlags & AVS_DELETENODEFOREVER) {
+ node->dwFlags &= ~AVS_DELETENODEFOREVER;
+ } else {
+ node->ace.hContact = hContact;
+ }
+ LeaveCriticalSection(&cachecs);
+ NotifyMetaAware(hContact, node, (AVATARCACHEENTRY *)GetProtoDefaultAvatar(hContact));
+ }
+ // protect this by changes from the cache block allocator as it can cause inconsistencies while working
+ // on allocating a new block.
+ EnterCriticalSection(&alloccs);
+ node = node->pNextNode;
+ LeaveCriticalSection(&alloccs);
+ }
+ WaitForSingleObject(hLoaderEvent, INFINITE);
+ //_DebugTrace(0, "pic loader awake...");
+ ResetEvent(hLoaderEvent);
+ }
+}
+
+static int MetaChanged(WPARAM wParam, LPARAM lParam)
+{
+ if (wParam == 0 || g_shutDown)
+ return 0;
+
+ AVATARCACHEENTRY *ace;
+
+ HANDLE hContact = (HANDLE) wParam;
+ HANDLE hSubContact = GetContactThatHaveTheAvatar(hContact);
+
+ // Get the node
+ struct CacheNode *node = FindAvatarInCache(hSubContact, TRUE);
+ if (node == NULL || !node->loaded) {
+ ace = (AVATARCACHEENTRY *)GetProtoDefaultAvatar(hSubContact);
+ QueueAdd(hSubContact);
+ }
+ else
+ ace = &node->ace;
+
+ NotifyEventHooks(hEventChanged, (WPARAM)hContact, (LPARAM)ace);
+ return 0;
+}
+
+static LIST<void> arServices( 10 );
+
+static int DestroyServicesAndEvents()
+{
+ UnhookEvent(hContactSettingChanged);
+ UnhookEvent(hProtoAckHook);
+ UnhookEvent(hUserInfoInitHook);
+ UnhookEvent(hOptInit);
+ UnhookEvent(hModulesLoaded);
+ UnhookEvent(hPresutdown);
+ UnhookEvent(hOkToExit);
+ UnhookEvent(hAccChanged);
+
+ for ( int i=0; i < arServices.getCount(); i++ )
+ DestroyServiceFunction( arServices[i] );
+
+ arServices.destroy();
+
+ DestroyHookableEvent(hEventChanged);
+ DestroyHookableEvent(hEventContactAvatarChanged);
+ DestroyHookableEvent(hMyAvatarChanged);
+ hEventChanged = 0;
+ hEventContactAvatarChanged = 0;
+ hMyAvatarChanged = 0;
+ UnhookEvent(hEventDeleted);
+ return 0;
+}
+
+static void LoadDefaultInfo()
+{
+ protoPicCacheEntry* pce = new protoPicCacheEntry;
+ if (CreateAvatarInCache(0, pce, AVS_DEFAULT) != 1)
+ DBDeleteContactSetting(0, PPICT_MODULE, AVS_DEFAULT);
+
+ pce->szProtoname = mir_strdup(AVS_DEFAULT);
+ pce->tszAccName = mir_tstrdup(TranslateT(AVS_DEFAULT));
+ g_ProtoPictures.insert(pce);
+}
+
+static void LoadProtoInfo( PROTOCOLDESCRIPTOR* proto )
+{
+ if ( proto->type == PROTOTYPE_PROTOCOL && proto->cbSize == sizeof( *proto ))
+ {
+ char protoName[MAX_PATH];
+ mir_snprintf(protoName, SIZEOF(protoName), "Global avatar for %s accounts", proto->szName);
+ TCHAR protoNameTmp[MAX_PATH];
+ TCHAR *tszName = mir_a2t(proto->szName);
+ mir_sntprintf(protoNameTmp, SIZEOF(protoNameTmp), TranslateT("Global avatar for %s accounts"), tszName);
+ protoPicCacheEntry* pce = new protoPicCacheEntry;
+ if (CreateAvatarInCache(0, pce, protoName) != 1)
+ DBDeleteContactSetting(0, PPICT_MODULE, protoName);
+
+ pce->szProtoname = mir_strdup(protoName);
+ pce->tszAccName = mir_tstrdup(protoNameTmp);
+ g_ProtoPictures.insert(pce);
+ mir_free(tszName);
+ }
+}
+
+static void LoadAccountInfo( PROTOACCOUNT* acc )
+{
+ protoPicCacheEntry* pce = new protoPicCacheEntry;
+ if ( CreateAvatarInCache(0, pce, acc->szModuleName ) != 1 )
+ DBDeleteContactSetting(0, PPICT_MODULE, acc->szModuleName);
+
+ pce->szProtoname = mir_strdup( acc->szModuleName );
+ pce->tszAccName = mir_tstrdup( acc->tszAccountName );
+ g_ProtoPictures.insert( pce );
+
+ pce = new protoPicCacheEntry;
+ CreateAvatarInCache((HANDLE)-1, pce, acc->szModuleName );
+ pce->szProtoname = mir_strdup( acc->szModuleName );
+ pce->tszAccName = mir_tstrdup( acc->tszAccountName );
+ g_MyAvatars.insert( pce );
+}
+
+static int OnAccChanged(WPARAM wParam, LPARAM lParam)
+{
+ PROTOACCOUNT* pa = ( PROTOACCOUNT* )lParam;
+
+ switch( wParam ) {
+ case PRAC_ADDED:
+ LoadAccountInfo( pa );
+ break;
+
+ case PRAC_REMOVED:
+ {
+ int idx;
+ protoPicCacheEntry tmp;
+ tmp.szProtoname = mir_strdup(pa->szModuleName);
+ if (( idx = g_ProtoPictures.getIndex( &tmp )) != -1 )
+ g_ProtoPictures.remove( idx );
+ if (( idx = g_MyAvatars.getIndex( &tmp )) != -1 )
+ g_MyAvatars.remove( idx );
+ }
+ break;
+ }
+
+ return 0;
+}
+
+static int ModulesLoaded(WPARAM wParam, LPARAM lParam)
+{
+ int i;
+ DBVARIANT dbv = {0};
+ TCHAR szEventName[100];
+ int result = 0;
+
+ InitPolls();
+
+ mir_sntprintf(szEventName, 100, _T("avs_loaderthread_%d"), GetCurrentThreadId());
+ hLoaderEvent = CreateEvent(NULL, TRUE, FALSE, szEventName);
+ hLoaderThread = (HANDLE) mir_forkthread(PicLoader, 0);
+ SetThreadPriority(hLoaderThread, THREAD_PRIORITY_IDLE);
+
+ // Folders plugin support
+ if (ServiceExists(MS_FOLDERS_REGISTER_PATH))
+ {
+ hMyAvatarsFolder = (HANDLE) FoldersRegisterCustomPathT("Avatars", "My Avatars",
+ MIRANDA_USERDATAT _T("\\Avatars"));
+
+ hGlobalAvatarFolder = (HANDLE) FoldersRegisterCustomPathT("Avatars", "My Global Avatar Cache",
+ MIRANDA_USERDATAT _T("\\Avatars"));
+ }
+
+ g_AvatarHistoryAvail = ServiceExists(MS_AVATARHISTORY_ENABLED);
+
+ g_MetaAvail = ServiceExists(MS_MC_GETPROTOCOLNAME) ? TRUE : FALSE;
+ if (g_MetaAvail) {
+ g_szMetaName = (char *)CallService(MS_MC_GETPROTOCOLNAME, 0, 0);
+ if (g_szMetaName == NULL)
+ g_MetaAvail = FALSE;
+ }
+
+ PROTOACCOUNT **accs = NULL;
+ int accCount;
+ ProtoEnumAccounts( &accCount, &accs );
+
+ if ( fei != NULL )
+ {
+ LoadDefaultInfo();
+ PROTOCOLDESCRIPTOR** proto;
+ int protoCount;
+ CallService(MS_PROTO_ENUMPROTOS, ( WPARAM )&protoCount, ( LPARAM )&proto);
+ for ( i=0; i < protoCount; i++ )
+ LoadProtoInfo( proto[i] );
+ for(i = 0; i < accCount; i++)
+ LoadAccountInfo( accs[i] );
+ }
+
+ // Load global avatar
+ protoPicCacheEntry* pce = new protoPicCacheEntry;
+ CreateAvatarInCache((HANDLE)-1, pce, "");
+ pce->szProtoname = mir_strdup("");
+ g_MyAvatars.insert( pce );
+
+ hAccChanged = HookEvent(ME_PROTO_ACCLISTCHANGED, OnAccChanged);
+ hPresutdown = HookEvent(ME_SYSTEM_PRESHUTDOWN, ShutdownProc);
+ hOkToExit = HookEvent(ME_SYSTEM_OKTOEXIT, OkToExitProc);
+ hUserInfoInitHook = HookEvent(ME_USERINFO_INITIALISE, OnDetailsInit);
+
+ return 0;
+}
+
+static void ReloadMyAvatar(LPVOID lpParam)
+{
+ char *szProto = (char *)lpParam;
+
+ mir_sleep(500);
+ for(int i = 0; !g_shutDown && i < g_MyAvatars.getCount(); i++) {
+ char *myAvatarProto = g_MyAvatars[i].szProtoname;
+
+ if (szProto[0] == 0) {
+ // Notify to all possibles
+ if (lstrcmpA(myAvatarProto, szProto)) {
+ if (!ProtoServiceExists( myAvatarProto, PS_SETMYAVATAR))
+ continue;
+ if (!Proto_IsAvatarsEnabled( myAvatarProto ))
+ continue;
+ }
+
+ } else if (lstrcmpA(myAvatarProto, szProto)) {
+ continue;
+ }
+
+ if (g_MyAvatars[i].hbmPic)
+ DeleteObject(g_MyAvatars[i].hbmPic);
+
+ if (CreateAvatarInCache((HANDLE)-1, &g_MyAvatars[i], myAvatarProto) != -1)
+ NotifyEventHooks(hMyAvatarChanged, (WPARAM)myAvatarProto, (LPARAM)&g_MyAvatars[i]);
+ else
+ NotifyEventHooks(hMyAvatarChanged, (WPARAM)myAvatarProto, 0);
+ }
+
+ free(lpParam);
+}
+
+static INT_PTR ReportMyAvatarChanged(WPARAM wParam, LPARAM lParam)
+{
+ if (wParam == NULL)
+ return -1;
+
+ char *proto = (char *) wParam;
+
+ for(int i = 0; i < g_MyAvatars.getCount(); i++) {
+ if (g_MyAvatars[i].dwFlags & AVS_IGNORENOTIFY)
+ continue;
+
+ if ( !lstrcmpA(g_MyAvatars[i].szProtoname, proto)) {
+ LPVOID lpParam = (void *)malloc(lstrlenA(g_MyAvatars[i].szProtoname) + 2);
+ strcpy((char *)lpParam, g_MyAvatars[i].szProtoname);
+ mir_forkthread(ReloadMyAvatar, lpParam);
+ return 0;
+ }
+ }
+
+ return -2;
+}
+
+static int ContactSettingChanged(WPARAM wParam, LPARAM lParam)
+{
+ DBCONTACTWRITESETTING *cws = (DBCONTACTWRITESETTING *) lParam;
+
+ if (cws == NULL || g_shutDown)
+ return 0;
+
+ if (wParam == 0) {
+ if (!strcmp(cws->szSetting, "AvatarFile")
+ || !strcmp(cws->szSetting, "PictObject")
+ || !strcmp(cws->szSetting, "AvatarHash")
+ || !strcmp(cws->szSetting, "AvatarSaved"))
+ {
+ ReportMyAvatarChanged((WPARAM) cws->szModule, 0);
+ }
+ return 0;
+ }
+ else if (g_MetaAvail && !strcmp(cws->szModule, g_szMetaName)) {
+ if (lstrlenA(cws->szSetting) > 6 && !strncmp(cws->szSetting, "Status", 5))
+ MetaChanged(wParam, 0);
+ }
+ return 0;
+}
+
+static int ContactDeleted(WPARAM wParam, LPARAM lParam)
+{
+ DeleteAvatarFromCache((HANDLE)wParam, TRUE);
+
+ return 0;
+}
+
+static int OptInit(WPARAM wParam, LPARAM lParam)
+{
+ OPTIONSDIALOGPAGE odp;
+
+ ZeroMemory(&odp, sizeof(odp));
+ odp.cbSize = sizeof(odp);
+ odp.position = 0;
+ odp.hInstance = g_hInst;
+ odp.flags = ODPF_BOLDGROUPS | ODPF_EXPERTONLY | ODPF_TCHAR;
+ odp.ptszGroup = LPGENT("Customize");
+ odp.ptszTitle = LPGENT("Avatars");
+
+ odp.ptszTab = LPGENT("Protocols");
+ odp.pszTemplate = MAKEINTRESOURCEA(IDD_OPTIONS_PICTS);
+ odp.pfnDlgProc = DlgProcOptionsProtos;
+ CallService(MS_OPT_ADDPAGE, wParam, (LPARAM) &odp);
+
+ odp.ptszTab = LPGENT("Contact Avatars");
+ odp.pszTemplate = MAKEINTRESOURCEA(IDD_OPTIONS_AVATARS);
+ odp.pfnDlgProc = DlgProcOptionsAvatars;
+ CallService(MS_OPT_ADDPAGE, wParam, (LPARAM) &odp);
+
+ odp.ptszTab = LPGENT("Own Avatars");
+ odp.pszTemplate = MAKEINTRESOURCEA(IDD_OPTIONS_OWN);
+ odp.pfnDlgProc = DlgProcOptionsOwn;
+ CallService(MS_OPT_ADDPAGE, wParam, (LPARAM) &odp);
+
+ return 0;
+}
+
+static int OkToExitProc(WPARAM wParam, LPARAM lParam)
+{
+ EnterCriticalSection(&cachecs);
+ g_shutDown = TRUE;
+
+ DestroyServicesAndEvents();
+
+ LeaveCriticalSection(&cachecs);
+
+ SetEvent(hLoaderEvent);
+ FreePolls();
+ return 0;
+}
+
+static int ShutdownProc(WPARAM wParam, LPARAM lParam)
+{
+ DeleteCriticalSection(&cachecs);
+ DeleteCriticalSection(&alloccs);
+ return 0;
+}
+
+void InternalDrawAvatar(AVATARDRAWREQUEST *r, HBITMAP hbm, LONG bmWidth, LONG bmHeight, DWORD dwFlags)
+{
+ float dScale = 0;
+ int newHeight, newWidth;
+ HDC hdcAvatar;
+ HBITMAP hbmMem;
+ DWORD topoffset = 0, leftoffset = 0;
+ HRGN rgn = 0, oldRgn = 0;
+ int targetWidth = r->rcDraw.right - r->rcDraw.left;
+ int targetHeight = r->rcDraw.bottom - r->rcDraw.top;
+ BLENDFUNCTION bf = {0};
+
+ hdcAvatar = CreateCompatibleDC(r->hTargetDC);
+ hbmMem = (HBITMAP)SelectObject(hdcAvatar, hbm);
+
+ if ((r->dwFlags & AVDRQ_DONTRESIZEIFSMALLER) && bmHeight <= targetHeight && bmWidth <= targetWidth) {
+ newHeight = bmHeight;
+ newWidth = bmWidth;
+ }
+ else if (bmHeight >= bmWidth) {
+ dScale = targetHeight / (float)bmHeight;
+ newHeight = targetHeight;
+ newWidth = (int) (bmWidth * dScale);
+ }
+ else {
+ dScale = targetWidth / (float)bmWidth;
+ newWidth = targetWidth;
+ newHeight = (int) (bmHeight * dScale);
+ }
+
+ topoffset = targetHeight > newHeight ? (targetHeight - newHeight) / 2 : 0;
+ leftoffset = targetWidth > newWidth ? (targetWidth - newWidth) / 2 : 0;
+
+ // create the region for the avatar border - use the same region for clipping, if needed.
+
+ oldRgn = CreateRectRgn(0,0,1,1);
+
+ if (GetClipRgn(r->hTargetDC, oldRgn) != 1)
+ {
+ DeleteObject(oldRgn);
+ oldRgn = NULL;
+ }
+
+ if (r->dwFlags & AVDRQ_ROUNDEDCORNER)
+ rgn = CreateRoundRectRgn(r->rcDraw.left + leftoffset, r->rcDraw.top + topoffset, r->rcDraw.left + leftoffset + newWidth + 1, r->rcDraw.top + topoffset + newHeight + 1, 2 * r->radius, 2 * r->radius);
+ else
+ rgn = CreateRectRgn(r->rcDraw.left + leftoffset, r->rcDraw.top + topoffset, r->rcDraw.left + leftoffset + newWidth, r->rcDraw.top + topoffset + newHeight);
+
+ ExtSelectClipRgn(r->hTargetDC, rgn, RGN_AND);
+
+ bf.SourceConstantAlpha = r->alpha > 0 ? r->alpha : 255;
+ bf.AlphaFormat = dwFlags & AVS_PREMULTIPLIED ? AC_SRC_ALPHA : 0;
+
+ if (!(r->dwFlags & AVDRQ_AERO))
+ SetStretchBltMode(r->hTargetDC, HALFTONE);
+ //else
+ // FillRect(r->hTargetDC, &r->rcDraw, (HBRUSH)GetStockObject(BLACK_BRUSH));
+
+ if (r->dwFlags & AVDRQ_FORCEFASTALPHA && !(r->dwFlags & AVDRQ_AERO) && AvsAlphaBlend) {
+ AvsAlphaBlend(
+ r->hTargetDC, r->rcDraw.left + leftoffset, r->rcDraw.top + topoffset, newWidth, newHeight,
+ hdcAvatar, 0, 0, bmWidth, bmHeight, bf);
+ } else {
+ if ((bf.SourceConstantAlpha == 255 && bf.AlphaFormat == 0 && !(r->dwFlags & AVDRQ_FORCEALPHA) && !(r->dwFlags & AVDRQ_AERO)) || !AvsAlphaBlend) {
+ StretchBlt(r->hTargetDC, r->rcDraw.left + leftoffset, r->rcDraw.top + topoffset, newWidth, newHeight, hdcAvatar, 0, 0, bmWidth, bmHeight, SRCCOPY);
+ } else {
+ /*
+ * get around SUCKY AlphaBlend() rescaling quality...
+ */
+ FIBITMAP *fb = fei->FI_CreateDIBFromHBITMAP(hbm);
+ FIBITMAP *fbResized = fei->FI_Rescale(fb, newWidth, newHeight, FILTER_BICUBIC);
+ HBITMAP hbmResized = fei->FI_CreateHBITMAPFromDIB(fbResized);
+ fei->FI_Unload(fb);
+ fei->FI_Unload(fbResized);
+
+ HBITMAP hbmTempOld;
+ HDC hdcTemp = CreateCompatibleDC(r->hTargetDC);
+ hbmTempOld = (HBITMAP)SelectObject(hdcTemp, hbmResized);
+
+ AvsAlphaBlend(
+ r->hTargetDC, r->rcDraw.left + leftoffset, r->rcDraw.top + topoffset, newWidth, newHeight,
+ hdcTemp, 0, 0, newWidth, newHeight, bf);
+
+ SelectObject(hdcTemp, hbmTempOld);
+ DeleteObject(hbmResized);
+ DeleteDC(hdcTemp);
+ }
+
+ if ((r->dwFlags & AVDRQ_DRAWBORDER) && !((r->dwFlags & AVDRQ_HIDEBORDERONTRANSPARENCY) && (dwFlags & AVS_HASTRANSPARENCY))) {
+ HBRUSH br = CreateSolidBrush(r->clrBorder);
+ HBRUSH brOld = (HBRUSH)SelectObject(r->hTargetDC, br);
+ FrameRgn(r->hTargetDC, rgn, br, 1, 1);
+ SelectObject(r->hTargetDC, brOld);
+ DeleteObject(br);
+ }
+
+ SelectClipRgn(r->hTargetDC, oldRgn);
+ DeleteObject(rgn);
+ if (oldRgn) DeleteObject(oldRgn);
+
+ SelectObject(hdcAvatar, hbmMem);
+ DeleteDC(hdcAvatar);
+ }
+}
+
+INT_PTR DrawAvatarPicture(WPARAM wParam, LPARAM lParam)
+{
+ AVATARDRAWREQUEST *r = (AVATARDRAWREQUEST *)lParam;
+ AVATARCACHEENTRY *ace = NULL;
+
+ if (fei == NULL || r == NULL || IsBadReadPtr((void *)r, sizeof(AVATARDRAWREQUEST)))
+ return 0;
+
+ if (r->cbSize != sizeof(AVATARDRAWREQUEST))
+ return 0;
+
+ if (r->dwFlags & AVDRQ_PROTOPICT) {
+ if (r->szProto == NULL)
+ return 0;
+
+ for(int i = 0; i < g_ProtoPictures.getCount(); i++) {
+ protoPicCacheEntry& p = g_ProtoPictures[i];
+ if ( !lstrcmpA(p.szProtoname, r->szProto) && lstrlenA(r->szProto) == lstrlenA(p.szProtoname) && p.hbmPic != 0) {
+ ace = (AVATARCACHEENTRY *)&g_ProtoPictures[i];
+ break;
+ }
+ }
+ }
+ else if (r->dwFlags & AVDRQ_OWNPIC) {
+ if (r->szProto == NULL)
+ return 0;
+
+ if (r->szProto[0] == '\0' && DBGetContactSettingByte(NULL, AVS_MODULE, "GlobalUserAvatarNotConsistent", 1))
+ return -1;
+
+ ace = (AVATARCACHEENTRY *)GetMyAvatar(0, (LPARAM)r->szProto);
+ }
+ else
+ ace = (AVATARCACHEENTRY *)GetAvatarBitmap((WPARAM)r->hContact, 0);
+
+ if (ace && (!(r->dwFlags & AVDRQ_RESPECTHIDDEN) || !(ace->dwFlags & AVS_HIDEONCLIST))) {
+ ace->t_lastAccess = time(NULL);
+
+ if (ace->bmHeight == 0 || ace->bmWidth == 0 || ace->hbmPic == 0)
+ return 0;
+
+ InternalDrawAvatar(r, ace->hbmPic, ace->bmWidth, ace->bmHeight, ace->dwFlags);
+ return 1;
+ }
+
+ return 0;
+}
+
+static int OnDetailsInit(WPARAM wParam, LPARAM lParam)
+{
+ HANDLE hContact = (HANDLE) lParam;
+ if (hContact == NULL)
+ {
+ // User dialog
+ OPTIONSDIALOGPAGE odp = {0};
+ odp.cbSize = sizeof(odp);
+ odp.flags = ODPF_TCHAR;
+ odp.hIcon = g_hIcon;
+ odp.hInstance = g_hInst;
+ odp.pfnDlgProc = DlgProcAvatarProtoInfo;
+ odp.pszTemplate = MAKEINTRESOURCEA(IDD_PROTO_AVATARS);
+ odp.ptszTitle = LPGENT("Avatar");
+ CallService(MS_USERINFO_ADDPAGE, wParam, (LPARAM)&odp);
+ }
+ else
+ {
+ char *szProto = (char *) CallService(MS_PROTO_GETCONTACTBASEPROTO, (WPARAM)hContact, 0);
+ if (szProto == NULL || DBGetContactSettingByte(NULL, AVS_MODULE, szProto, 1))
+ {
+ // Contact dialog
+ OPTIONSDIALOGPAGE odp = {0};
+ odp.cbSize = sizeof(odp);
+ odp.flags = ODPF_TCHAR;
+ odp.hIcon = g_hIcon;
+ odp.hInstance = g_hInst;
+ odp.pfnDlgProc = DlgProcAvatarUserInfo;
+ odp.position = -2000000000;
+ odp.pszTemplate = MAKEINTRESOURCEA(IDD_USER_AVATAR);
+ odp.ptszTitle = LPGENT("Avatar");
+ CallService(MS_USERINFO_ADDPAGE, wParam, (LPARAM)&odp);
+ }
+ }
+ return 0;
+}
+
+static int LoadAvatarModule()
+{
+ mir_getMMI ( &mmi );
+ mir_getLI ( &li );
+ mir_getLP( &pluginInfoEx );
+
+ init_mir_thread();
+
+ InitializeCriticalSection(&cachecs);
+ InitializeCriticalSection(&alloccs);
+
+ hOptInit = HookEvent(ME_OPT_INITIALISE, OptInit);
+ hModulesLoaded = HookEvent(ME_SYSTEM_MODULESLOADED, ModulesLoaded);
+ hContactSettingChanged = HookEvent(ME_DB_CONTACT_SETTINGCHANGED, ContactSettingChanged);
+ hEventDeleted = HookEvent(ME_DB_CONTACT_DELETED, ContactDeleted);
+ hProtoAckHook = HookEvent(ME_PROTO_ACK, ProtocolAck);
+
+ arServices.insert( CreateServiceFunction( MS_AV_GETAVATARBITMAP, GetAvatarBitmap ));
+ arServices.insert( CreateServiceFunction( MS_AV_PROTECTAVATAR, ProtectAvatar ));
+ arServices.insert( CreateServiceFunction( MS_AV_SETAVATAR, SetAvatar ));
+ arServices.insert( CreateServiceFunction( MS_AV_SETMYAVATAR, SetMyAvatar ));
+ arServices.insert( CreateServiceFunction( MS_AV_CANSETMYAVATAR, CanSetMyAvatar ));
+ arServices.insert( CreateServiceFunction( MS_AV_CONTACTOPTIONS, ContactOptions ));
+ arServices.insert( CreateServiceFunction( MS_AV_DRAWAVATAR, DrawAvatarPicture ));
+ arServices.insert( CreateServiceFunction( MS_AV_GETMYAVATAR, GetMyAvatar ));
+ arServices.insert( CreateServiceFunction( MS_AV_REPORTMYAVATARCHANGED, ReportMyAvatarChanged ));
+ arServices.insert( CreateServiceFunction( MS_AV_LOADBITMAP32, BmpFilterLoadBitmap32 ));
+ arServices.insert( CreateServiceFunction( MS_AV_SAVEBITMAP, BmpFilterSaveBitmap ));
+ arServices.insert( CreateServiceFunction( MS_AV_CANSAVEBITMAP, BmpFilterCanSaveBitmap ));
+ arServices.insert( CreateServiceFunction( MS_AV_RESIZEBITMAP, BmpFilterResizeBitmap ));
+
+ #if defined( _UNICODE )
+ arServices.insert( CreateServiceFunction( MS_AV_SETAVATARW, SetAvatarW ));
+ arServices.insert( CreateServiceFunction( MS_AV_SETMYAVATARW, SetMyAvatarW ));
+ #endif
+
+ hEventChanged = CreateHookableEvent(ME_AV_AVATARCHANGED);
+ hEventContactAvatarChanged = CreateHookableEvent(ME_AV_CONTACTAVATARCHANGED);
+ hMyAvatarChanged = CreateHookableEvent(ME_AV_MYAVATARCHANGED);
+
+ AllocCacheBlock();
+
+ HMODULE hDll;
+ if (hDll = GetModuleHandle(_T("gdi32")))
+ AvsAlphaBlend = (BOOL (WINAPI *)(HDC, int, int, int, int, HDC, int, int, int, int, BLENDFUNCTION)) GetProcAddress(hDll, "GdiAlphaBlend");
+ if (AvsAlphaBlend == NULL && (hDll = LoadLibrary(_T("msimg32.dll"))))
+ AvsAlphaBlend = (BOOL (WINAPI *)(HDC, int, int, int, int, HDC, int, int, int, int, BLENDFUNCTION)) GetProcAddress(hDll, "AlphaBlend");
+
+ TCHAR* tmpPath = Utils_ReplaceVarsT(_T("%miranda_userdata%"));
+ lstrcpyn(g_szDataPath, tmpPath, SIZEOF(g_szDataPath)-1);
+ mir_free(tmpPath);
+ g_szDataPath[MAX_PATH - 1] = 0;
+ _tcslwr(g_szDataPath);
+
+ return 0;
+}
+
+extern "C" BOOL WINAPI DllMain(HINSTANCE hInstDLL, DWORD dwReason, LPVOID reserved)
+{
+ g_hInst = hInstDLL;
+ return TRUE;
+}
+
+extern "C" __declspec(dllexport) PLUGININFOEX * MirandaPluginInfoEx(DWORD mirandaVersion)
+{
+ if (mirandaVersion < MIRANDA_VERSION_CORE)
+ return NULL;
+ return &pluginInfoEx;
+}
+
+static const MUUID interfaces[] = { { 0xece29554, 0x1cf0, 0x41da, { 0x85, 0x82, 0xfb, 0xe8, 0x45, 0x5c, 0x6b, 0xec } }, MIID_LAST};
+extern "C" __declspec(dllexport) const MUUID * MirandaPluginInterfaces(void)
+{
+ return interfaces;
+}
+
+extern "C" int __declspec(dllexport) Load(PLUGINLINK * link)
+{
+ INT_PTR result = CALLSERVICE_NOTFOUND;
+
+ pluginLink = link;
+ mir_getLP( &pluginInfoEx );
+
+ if (ServiceExists(MS_IMG_GETINTERFACE))
+ result = CallService(MS_IMG_GETINTERFACE, FI_IF_VERSION, (LPARAM)&fei);
+
+ if (fei == NULL || result != S_OK) {
+ MessageBox(0, TranslateT("Fatal error, image services not found. Avatar services will be disabled."), TranslateT("Avatar Service"), MB_OK);
+ return 1;
+ }
+ LoadACC();
+ return LoadAvatarModule();
+}
+
+extern "C" int __declspec(dllexport) Unload(void)
+{
+ struct CacheNode *pNode = g_Cache;
+
+ while(pNode) {
+ //DeleteCriticalSection(&pNode->cs);
+ if (pNode->ace.hbmPic != 0)
+ DeleteObject(pNode->ace.hbmPic);
+ pNode = pNode->pNextNode;
+ }
+
+ for(int i = 0; i < g_curBlock; i++)
+ free(g_cacheBlocks[i]);
+ free(g_cacheBlocks);
+
+ g_ProtoPictures.destroy();
+ g_MyAvatars.destroy();
+
+ CloseHandle(hLoaderEvent);
+ DeleteCriticalSection(&alloccs);
+ DeleteCriticalSection(&cachecs);
+ return 0;
+}
+
+///////////////////////////////////////////////////////////////////////////////////////////////////
+
+protoPicCacheEntry::~protoPicCacheEntry()
+{
+ if ( hbmPic != 0 )
+ DeleteObject( hbmPic );
+ mir_free( szProtoname );
+ mir_free( tszAccName );
+}
+
+void protoPicCacheEntry::clear()
+{
+ if (hbmPic != 0)
+ DeleteObject(hbmPic);
+
+ memset(this, 0, sizeof(avatarCacheEntry));
+}
+
+/*
+wParam=(int *)max width of avatar - will be set (-1 for no max)
+lParam=(int *)max height of avatar - will be set (-1 for no max)
+return=0 for sucess
+*/
+#define PS_GETMYAVATARMAXSIZE "/GetMyAvatarMaxSize"
+
+/*
+wParam=0
+lParam=0
+return=One of PIP_SQUARE, PIP_FREEPROPORTIONS
+*/
+#define PIP_FREEPROPORTIONS 0
+#define PIP_SQUARE 1
+#define PS_GETMYAVATARIMAGEPROPORTION "/GetMyAvatarImageProportion"
+
+/*
+wParam = 0
+lParam = PA_FORMAT_* // avatar format
+return = 1 (supported) or 0 (not supported)
+*/
+#define PS_ISAVATARFORMATSUPPORTED "/IsAvatarFormatSupported"
+
+
+
+BOOL Proto_IsAvatarsEnabled(const char *proto)
+{
+ if (ProtoServiceExists(proto, PS_GETAVATARCAPS))
+ return CallProtoService(proto, PS_GETAVATARCAPS, AF_ENABLED, 0);
+
+ return TRUE;
+}
+
+BOOL Proto_IsAvatarFormatSupported(const char *proto, int format)
+{
+ if (ProtoServiceExists(proto, PS_GETAVATARCAPS))
+ return CallProtoService(proto, PS_GETAVATARCAPS, AF_FORMATSUPPORTED, format);
+
+ if (ProtoServiceExists(proto, PS_ISAVATARFORMATSUPPORTED))
+ return CallProtoService(proto, PS_ISAVATARFORMATSUPPORTED, 0, format);
+
+ if (format >= PA_FORMAT_SWF)
+ return FALSE;
+
+ return TRUE;
+}
+
+int Proto_AvatarImageProportion(const char *proto)
+{
+ if (ProtoServiceExists(proto, PS_GETAVATARCAPS))
+ return CallProtoService(proto, PS_GETAVATARCAPS, AF_PROPORTION, 0);
+
+ if (ProtoServiceExists(proto, PS_GETMYAVATARIMAGEPROPORTION))
+ return CallProtoService(proto, PS_GETMYAVATARIMAGEPROPORTION, 0, 0);
+
+ return 0;
+}
+
+void Proto_GetAvatarMaxSize(const char *proto, int *width, int *height)
+{
+ if (ProtoServiceExists(proto, PS_GETAVATARCAPS))
+ {
+ POINT maxSize;
+ CallProtoService(proto, PS_GETAVATARCAPS, AF_MAXSIZE, (LPARAM) &maxSize);
+ *width = maxSize.y;
+ *height = maxSize.x;
+ }
+ else if (ProtoServiceExists(proto, PS_GETMYAVATARMAXSIZE))
+ {
+ CallProtoService(proto, PS_GETMYAVATARMAXSIZE, (WPARAM) width, (LPARAM) height);
+ }
+ else
+ {
+ *width = 300;
+ *height = 300;
+ }
+
+ if (*width < 0)
+ *width = 0;
+ else if (*width > 300)
+ *width = 300;
+
+ if (*height < 0)
+ *height = 0;
+ else if (*height > 300)
+ *height = 300;
+}
+
+BOOL Proto_NeedDelaysForAvatars(const char *proto)
+{
+ if (ProtoServiceExists(proto, PS_GETAVATARCAPS))
+ {
+ int ret = CallProtoService(proto, PS_GETAVATARCAPS, AF_DONTNEEDDELAYS, 0);
+ if (ret > 0)
+ return FALSE;
+ else
+ return TRUE;
+ }
+
+ return TRUE;
+}
+
+int Proto_GetAvatarMaxFileSize(const char *proto)
+{
+ if (ProtoServiceExists(proto, PS_GETAVATARCAPS))
+ return CallProtoService(proto, PS_GETAVATARCAPS, AF_MAXFILESIZE, 0);
+
+ return 0;
+}
+
+int Proto_GetDelayAfterFail(const char *proto)
+{
+ if (ProtoServiceExists(proto, PS_GETAVATARCAPS))
+ return CallProtoService(proto, PS_GETAVATARCAPS, AF_DELAYAFTERFAIL, 0);
+
+ return 0;
+}
+
+BOOL Proto_IsFetchingAlwaysAllowed(const char *proto)
+{
+ if (ProtoServiceExists(proto, PS_GETAVATARCAPS))
+ return CallProtoService(proto, PS_GETAVATARCAPS, AF_FETCHALWAYS, 0);
+
+ return FALSE;
+}
|