diff options
Diffstat (limited to 'protocols/Tlen/src/tlen_avatar.cpp')
| -rw-r--r-- | protocols/Tlen/src/tlen_avatar.cpp | 434 |
1 files changed, 0 insertions, 434 deletions
diff --git a/protocols/Tlen/src/tlen_avatar.cpp b/protocols/Tlen/src/tlen_avatar.cpp deleted file mode 100644 index 998265a326..0000000000 --- a/protocols/Tlen/src/tlen_avatar.cpp +++ /dev/null @@ -1,434 +0,0 @@ -/* - -Tlen Protocol Plugin for Miranda NG -Copyright (C) 2004-2007 Piotr Piastucki - -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 "stdafx.h" -#include "tlen_list.h" -#include "tlen_avatar.h" -#include <stdio.h> -#include <io.h> -#include <fcntl.h> -#include <sys/types.h> -#include <sys/stat.h> - -/* TlenGetAvatarFileName() - gets a file name for the avatar image */ - -void TlenGetAvatarFileName(TlenProtocol *proto, TLEN_LIST_ITEM *item, wchar_t* ptszDest, int cbLen) -{ - int tPathLen = mir_snwprintf(ptszDest, cbLen, TEXT("%s\\%S"), VARSW(TEXT("%miranda_avatarcache%")), proto->m_szModuleName); - if (_waccess(ptszDest, 0)) { - int ret = CreateDirectoryTreeW(ptszDest); - if (ret == 0) - proto->debugLogW(L"getAvatarFilename(): Created new directory for avatar cache: %s.", ptszDest); - else { - proto->debugLogW(L"getAvatarFilename(): Can not create directory for avatar cache: %s. errno=%d: %s", ptszDest, errno, strerror(errno)); - wchar_t buffer[512]; - mir_snwprintf(buffer, TranslateT("Cannot create avatars cache directory. ERROR: %d: %s\n%s"), errno, _wcserror(errno), ptszDest); - PUShowMessageT(buffer, SM_WARNING); - } - } - - int format = PA_FORMAT_PNG; - - ptszDest[tPathLen++] = '\\'; - if (item != nullptr) - format = item->avatarFormat; - else if (proto->threadData != nullptr) - format = proto->threadData->avatarFormat; - else - format = db_get_dw(NULL, proto->m_szModuleName, "AvatarFormat", PA_FORMAT_UNKNOWN); - - const wchar_t *tszFileType = ProtoGetAvatarExtension(format); - if (item != nullptr) - mir_snwprintf(ptszDest + tPathLen, MAX_PATH - tPathLen, TEXT("%S%s"), ptrA(TlenSha1(item->jid)), tszFileType); - else - mir_snwprintf(ptszDest + tPathLen, MAX_PATH - tPathLen, TEXT("%S_avatar%s"), proto->m_szModuleName, tszFileType); -} - -static void RemoveAvatar(TlenProtocol *proto, MCONTACT hContact) -{ - wchar_t tFileName[MAX_PATH]; - if (hContact == NULL) - proto->threadData->avatarHash[0] = '\0'; - - TlenGetAvatarFileName(proto, nullptr, tFileName, _countof(tFileName) - 1); - DeleteFile(tFileName); - db_unset(hContact, "ContactPhoto", "File"); - db_unset(hContact, proto->m_szModuleName, "AvatarHash"); - db_unset(hContact, proto->m_szModuleName, "AvatarFormat"); - ProtoBroadcastAck(proto->m_szModuleName, NULL, ACKTYPE_AVATAR, ACKRESULT_STATUS, nullptr, 0); -} - -static void SetAvatar(TlenProtocol *proto, MCONTACT hContact, TLEN_LIST_ITEM *item, char *data, int len, DWORD format) -{ - wchar_t filename[MAX_PATH]; - char md5[33]; - mir_md5_state_t ctx; - DWORD digest[4]; - - if (format == PA_FORMAT_UNKNOWN && len > 4) - format = ProtoGetBufferFormat(data); - - mir_md5_init(&ctx); - mir_md5_append(&ctx, (BYTE*)data, len); - mir_md5_finish(&ctx, (BYTE*)digest); - - sprintf(md5, "%08x%08x%08x%08x", (int)htonl(digest[0]), (int)htonl(digest[1]), (int)htonl(digest[2]), (int)htonl(digest[3])); //!!!!!!!!!!!!!! - if (item != nullptr) { - char *hash = item->avatarHash; - item->avatarFormat = format; - item->avatarHash = mir_strdup(md5); - mir_free(hash); - } - else { - proto->threadData->avatarFormat = format; - mir_strcpy(proto->threadData->avatarHash, md5); - } - TlenGetAvatarFileName(proto, item, filename, _countof(filename) - 1); - DeleteFile(filename); - FILE *out = _wfopen(filename, TEXT("wb")); - if (out != nullptr) { - fwrite(data, len, 1, out); - fclose(out); - db_set_ws(hContact, "ContactPhoto", "File", filename); - db_set_s(hContact, proto->m_szModuleName, "AvatarHash", md5); - db_set_dw(hContact, proto->m_szModuleName, "AvatarFormat", format); - } - else { - wchar_t buffer[128]; - mir_snwprintf(buffer, TranslateT("Cannot save new avatar file \"%s\" Error:\n\t%s (Error: %d)"), filename, _wcserror(errno), errno); - PUShowMessageT(buffer, SM_WARNING); - proto->debugLogW(buffer); - return; - } - ProtoBroadcastAck(proto->m_szModuleName, hContact, ACKTYPE_AVATAR, ACKRESULT_STATUS, nullptr, 0); -} - -int TlenProcessAvatarNode(TlenProtocol *proto, XmlNode *avatarNode, TLEN_LIST_ITEM *item) -{ - XmlNode *aNode; - char *oldHash = nullptr; - char *md5 = nullptr, *type = nullptr; - MCONTACT hContact = NULL; - if (item != nullptr) - if ((hContact = TlenHContactFromJID(proto, item->jid)) == NULL) - return 0; - - if (item == nullptr) - oldHash = proto->threadData->avatarHash; - else - oldHash = item->avatarHash; - - if (avatarNode != nullptr) { - aNode = TlenXmlGetChild(avatarNode, "a"); - if (aNode != nullptr) { - type = TlenXmlGetAttrValue(aNode, "type"); - md5 = TlenXmlGetAttrValue(aNode, "md5"); - } - } - - if (md5 != nullptr) { - /* check contact's avatar hash - md5 */ - if (oldHash == nullptr || mir_strcmp(oldHash, md5)) { - if (item != nullptr) { - item->newAvatarDownloading = TRUE; - } - TlenGetAvatar(proto, hContact); - return 1; - } - } - else { - /* remove avatar */ - if (oldHash != nullptr) { - if (item != nullptr) { - item->avatarHash = nullptr; - mir_free(oldHash); - item->newAvatarDownloading = FALSE; - } - RemoveAvatar(proto, hContact); - return 1; - } - } - return 0; -} - -void TlenProcessPresenceAvatar(TlenProtocol *proto, XmlNode *node, TLEN_LIST_ITEM *item) -{ - MCONTACT hContact=TlenHContactFromJID(proto, item->jid); - if (hContact != NULL) - TlenProcessAvatarNode(proto, TlenXmlGetChild(node, "avatar"), item); -} - -static char *replaceTokens(const char *base, const char *uri, const char *login, const char* token, int type, int access) -{ - char *result; - int i, l, size; - l = (int)mir_strlen(uri); - size = (int)mir_strlen(base); - for (i = 0; i < l; ) { - if (!strncmp(uri + i, "^login^", 7)) { - size += (int)mir_strlen(login); - i += 7; - } else if (!strncmp(uri + i, "^type^", 6)) { - size++; - i += 6; - } else if (!strncmp(uri + i, "^token^", 7)) { - size += (int)mir_strlen(token); - i += 7; - } else if (!strncmp(uri + i, "^access^", 8)) { - size++; - i += 8; - } else { - size++; - i++; - } - } - result = (char *)mir_alloc(size +1); - mir_strcpy(result, base); - size = (int)mir_strlen(base); - for (i = 0; i < l; ) { - if (!strncmp(uri + i, "^login^", 7)) { - mir_strcpy(result + size, login); - size += (int)mir_strlen(login); - i += 7; - } else if (!strncmp(uri + i, "^type^", 6)) { - result[size++] = '0' + type; - i += 6; - } else if (!strncmp(uri + i, "^token^", 7)) { - mir_strcpy(result + size, token); - size += (int)mir_strlen(token); - i += 7; - } else if (!strncmp(uri + i, "^access^", 8)) { - result[size++] = '0' + access; - i += 8; - } else { - result[size++] = uri[i++]; - } - } - result[size] = '\0'; - return result; -} - -static int getAvatarMutex = 0; - -struct TLENGETAVATARTHREADDATA -{ - TlenProtocol *proto; - MCONTACT hContact; -}; - -static void TlenGetAvatarThread(void *ptr) -{ - TLEN_LIST_ITEM *item = nullptr; - TLENGETAVATARTHREADDATA *data = (TLENGETAVATARTHREADDATA *)ptr; - MCONTACT hContact = data->hContact; - char *login = nullptr; - if (hContact != NULL) { - char *jid = TlenJIDFromHContact(data->proto, hContact); - login = TlenNickFromJID(jid); - item = TlenListGetItemPtr(data->proto, LIST_ROSTER, jid); - mir_free(jid); - } - else { - if (data->proto->threadData != nullptr) - login = mir_strdup(data->proto->threadData->username); - } - - if ((data->proto->threadData != nullptr && hContact == NULL) || item != nullptr) { - DWORD format = PA_FORMAT_UNKNOWN; - if (item != nullptr) - item->newAvatarDownloading = TRUE; - - char *request = replaceTokens(data->proto->threadData->tlenConfig.mailBase, data->proto->threadData->tlenConfig.avatarGet, login, data->proto->threadData->avatarToken, 0, 0); - NETLIBHTTPREQUEST req; - memset(&req, 0, sizeof(req)); - req.cbSize = sizeof(req); - req.requestType = data->proto->threadData->tlenConfig.avatarGetMthd; - req.flags = 0; - req.headersCount = 0; - req.headers = nullptr; - req.dataLength = 0; - req.szUrl = request; - NETLIBHTTPREQUEST *resp = Netlib_HttpTransaction(data->proto->m_hNetlibUser, &req); - if (item != nullptr) - item->newAvatarDownloading = FALSE; - - if (resp != nullptr) { - if (resp->resultCode/100 == 2) { - if (resp->dataLength > 0) { - for (int i=0; i<resp->headersCount; i++ ) { - if (!strcmpi(resp->headers[i].szName, "Content-Type")) { - format = ProtoGetAvatarFormatByMimeType(_A2T(resp->headers[i].szValue)); - break; - } - } - SetAvatar(data->proto, hContact, item, resp->pData, resp->dataLength, format); - } - else RemoveAvatar(data->proto, hContact); - } - Netlib_FreeHttpRequest(resp); - } - mir_free(request); - mir_free(login); - } - - if (hContact == NULL) - getAvatarMutex = 0; - - mir_free(login); - mir_free(data); -} - -void TlenGetAvatar(TlenProtocol *proto, MCONTACT hContact) -{ - if (hContact == NULL) { - if (getAvatarMutex != 0) - return; - - getAvatarMutex = 1; - } - - TLENGETAVATARTHREADDATA *data = (TLENGETAVATARTHREADDATA *)mir_alloc(sizeof(TLENGETAVATARTHREADDATA)); - data->proto = proto; - data->hContact = hContact; - mir_forkthread(TlenGetAvatarThread, data); -} - -struct TLENREMOVEAVATARTHREADDATA -{ - TlenProtocol *proto; - NETLIBHTTPREQUEST *req; -}; - -static void TlenRemoveAvatarRequestThread(void *ptr) { - TLENREMOVEAVATARTHREADDATA *data = (TLENREMOVEAVATARTHREADDATA*)ptr; - NETLIBHTTPREQUEST *req = (NETLIBHTTPREQUEST *)data->req; - NETLIBHTTPREQUEST *resp = Netlib_HttpTransaction(data->proto->m_hNetlibUser, req); - mir_free(req->szUrl); - mir_free(req->headers); - mir_free(req->pData); - mir_free(req); - if (resp != nullptr) { - Netlib_FreeHttpRequest(resp); - RemoveAvatar(data->proto, NULL); - } - mir_free(data); - -} - -struct TLENUPLOADAVATARTHREADDATA -{ - TlenProtocol *proto; - NETLIBHTTPREQUEST *req; - char *data; - int length; -}; - -boolean checkUploadAvatarResponse(TlenProtocol *proto, NETLIBHTTPREQUEST *resp) -{ - if (resp == nullptr) { - proto->debugLogA("Error while setting avatar on Tlen account (no response)"); - PUShowMessageT(TranslateT("Error while setting avatar on Tlen account (no response)"), SM_WARNING); - return false; - } - if (resp->resultCode != 200 || !resp->dataLength || !resp->pData) { - proto->debugLogA("Error while setting avatar on Tlen account (invalid response) resultCode=%d, dataLength=%d", resp->resultCode, resp->dataLength); - PUShowMessageT(TranslateT("Error while setting avatar on Tlen account (invalid response)"), SM_WARNING); - return false; - } - if (strncmp(resp->pData, "<ok", 3)) { - proto->debugLogA("Error while setting avatar on Tlen account: %s", resp->pData); - PUShowMessageT(TranslateT("Error while setting avatar on Tlen account"), SM_WARNING); - return false; - } - return true; -} - -static void TlenUploadAvatarRequestThread(void *ptr) -{ - TLENUPLOADAVATARTHREADDATA *data = (TLENUPLOADAVATARTHREADDATA *) ptr; - NETLIBHTTPREQUEST *req = data->req; - NETLIBHTTPREQUEST *resp = Netlib_HttpTransaction(data->proto->m_hNetlibUser, req); - if (checkUploadAvatarResponse(data->proto, resp)) { - Netlib_FreeHttpRequest(resp); - SetAvatar(data->proto, NULL, nullptr, data->data, data->length, PA_FORMAT_PNG); - } - mir_free(req->szUrl); - mir_free(req->headers); - mir_free(req->pData); - mir_free(req); - mir_free(data->data); - mir_free(data); -} - -void TlenRemoveAvatar(TlenProtocol *proto) -{ - if (proto->threadData != nullptr) { - TLENREMOVEAVATARTHREADDATA *data = (TLENREMOVEAVATARTHREADDATA *)mir_alloc(sizeof(TLENREMOVEAVATARTHREADDATA)); - NETLIBHTTPREQUEST *req = (NETLIBHTTPREQUEST *)mir_alloc(sizeof(NETLIBHTTPREQUEST)); - data->proto = proto; - data->req = req; - char *request = replaceTokens(proto->threadData->tlenConfig.mailBase, proto->threadData->tlenConfig.avatarRemove, "", proto->threadData->avatarToken, 0, 0); - memset(req, 0, sizeof(NETLIBHTTPREQUEST)); - req->cbSize = sizeof(NETLIBHTTPREQUEST); - req->requestType = proto->threadData->tlenConfig.avatarGetMthd; - req->szUrl = request; - mir_forkthread(TlenRemoveAvatarRequestThread, data); - } -} - -void TlenUploadAvatar(TlenProtocol *proto, unsigned char *data, int dataLen, int access) -{ - NETLIBHTTPHEADER *headers; - unsigned char *buffer; - if (proto->threadData != nullptr && dataLen > 0 && data != nullptr) { - char *mpartHead = "--AaB03x\r\nContent-Disposition: form-data; name=\"filename\"; filename=\"plik.png\"\r\nContent-Type: image/png\r\n\r\n"; - char *mpartTail = "\r\n--AaB03x--\r\n"; - int size, sizeHead = (int)mir_strlen(mpartHead), sizeTail = (int)mir_strlen(mpartTail); - char *request = replaceTokens(proto->threadData->tlenConfig.mailBase, proto->threadData->tlenConfig.avatarUpload, "", proto->threadData->avatarToken, 0, access); - TLENUPLOADAVATARTHREADDATA *threadData = (TLENUPLOADAVATARTHREADDATA *)mir_alloc(sizeof(TLENUPLOADAVATARTHREADDATA)); - threadData->proto = proto; - NETLIBHTTPREQUEST *req = (NETLIBHTTPREQUEST *)mir_alloc(sizeof(NETLIBHTTPREQUEST)); - headers = (NETLIBHTTPHEADER *)mir_alloc(sizeof(NETLIBHTTPHEADER)); - memset(req, 0, sizeof(NETLIBHTTPREQUEST)); - req->cbSize = sizeof(NETLIBHTTPREQUEST); - req->requestType = proto->threadData->tlenConfig.avatarUploadMthd; - req->szUrl = request; - req->flags = 0; - headers[0].szName = "Content-Type"; - headers[0].szValue = "multipart/form-data; boundary=AaB03x"; - req->headersCount = 1; - req->headers = headers; - size = dataLen + sizeHead + sizeTail; - buffer = (unsigned char *)mir_alloc(size); - memcpy(buffer, mpartHead, sizeHead); - memcpy(buffer + sizeHead, data, dataLen); - memcpy(buffer + sizeHead + dataLen, mpartTail, sizeTail); - req->dataLength = size; - req->pData = (char*)buffer; - threadData->req = req; - threadData->data = (char*)mir_alloc(dataLen); - memcpy(threadData->data, data, dataLen); - threadData->length = dataLen; - mir_forkthread(TlenUploadAvatarRequestThread, threadData); - } -} - |