From 3f1628f127d35aa14da97e50c2a94cfd61ad52dd Mon Sep 17 00:00:00 2001 From: George Hazan Date: Fri, 11 May 2018 21:22:17 +0200 Subject: merge from master to fixes #1349 (Miranda crashes on coming back from auto away) --- plugins/SmileyAdd/src/smileys.cpp | 1928 +++++++++++++++++++------------------ 1 file changed, 1017 insertions(+), 911 deletions(-) (limited to 'plugins/SmileyAdd/src/smileys.cpp') diff --git a/plugins/SmileyAdd/src/smileys.cpp b/plugins/SmileyAdd/src/smileys.cpp index 73a303a393..6c19d195f0 100644 --- a/plugins/SmileyAdd/src/smileys.cpp +++ b/plugins/SmileyAdd/src/smileys.cpp @@ -1,911 +1,1017 @@ -/* -Miranda NG SmileyAdd Plugin -Copyright (C) 2012-18 Miranda NG team (https://miranda-ng.org) -Copyright (C) 2005-11 Boris Krasnovskiy All Rights Reserved -Copyright (C) 2003-04 Rein-Peter de Boer - -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 version 2 -of the License. - -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, see . -*/ - -#include "stdafx.h" - -SmileyPackListType g_SmileyPacks; -SmileyCategoryListType g_SmileyCategories; - -static HWND hwndHidden = nullptr; - -static void CALLBACK timerProc(HWND, UINT, UINT_PTR param, DWORD) -{ - SmileyType *pType = (SmileyType*)param; - pType->MoveToNextFrame(); -} - -// these two functions must be called from the main thread -static void CALLBACK sttStartTimer(PVOID obj) -{ - if (hwndHidden == nullptr) - hwndHidden = CreateWindowEx(0, L"STATIC", nullptr, 0, 0, 0, 0, 0, nullptr, nullptr, nullptr, nullptr); - - SmileyType *pType = (SmileyType*)obj; - pType->SetFrameDelay(); -} - -static void CALLBACK sttStopTimer(PVOID obj) -{ - KillTimer(hwndHidden, (DWORD_PTR)obj); -} - -// -// SmileyType -// - -SmileyType::SmileyType(void) : - m_arSmileys(10, PtrKeySortT) -{ - m_SmileyIcon = nullptr; - m_xepimg = nullptr; - m_flags = 0; - m_index = 0; - m_size.cx = 0; - m_size.cy = 0; -} - -SmileyType::~SmileyType() -{ - if (m_xepimg) { - m_xepimg->Release(); - m_xepimg = nullptr; - } - - if (m_SmileyIcon != nullptr) { - DestroyIcon(m_SmileyIcon); - m_SmileyIcon = nullptr; - } -} - -void SmileyType::AddObject(ISmileyBase *pObject) -{ - if (m_arSmileys.getCount() == 0) { - if (m_xepimg == nullptr) - m_xepimg = AddCacheImage(m_filepath, m_index); - CallFunctionAsync(sttStartTimer, this); - } - - m_arSmileys.insert(pObject); -} - -void SmileyType::RemoveObject(ISmileyBase *pObject) -{ - int idx = m_arSmileys.getIndex(pObject); - if (idx == -1) - return; - - m_arSmileys.remove(idx); - if (m_arSmileys.getCount() == 0) - CallFunctionAsync(sttStopTimer, this); -} - -void SmileyType::SetFrameDelay() -{ - int iFrameDelay = (m_xepimg == nullptr) ? 0 : m_xepimg->GetFrameDelay(); - if (iFrameDelay <= 0) - KillTimer(hwndHidden, (DWORD_PTR)this); - else - SetTimer(hwndHidden, (DWORD_PTR)this, iFrameDelay*10, timerProc); -} - -void SmileyType::MoveToNextFrame() -{ - m_index = m_xepimg->SelectNextFrame(m_index); - - for (auto &it : m_arSmileys) - it->Draw(); - - SetFrameDelay(); // reset timer -} - -HICON SmileyType::GetIcon(void) -{ - if (m_SmileyIcon == nullptr) { - ImageBase *img = CreateCachedImage(); - if (!img) - return nullptr; - - img->SelectFrame(m_index); - m_SmileyIcon = img->GetIcon(); - img->Release(); - } - return m_SmileyIcon; -} - -HICON SmileyType::GetIconDup(void) -{ - ImageBase *img = CreateCachedImage(); - img->SelectFrame(m_index); - HICON hIcon = img->GetIcon(); - img->Release(); - return hIcon; -} - -bool SmileyType::LoadFromImage(IStream *pStream) -{ - if (m_xepimg) - m_xepimg->Release(); - - CMStringW name; - m_xepimg = new ImageType(0, name, pStream); - return true; -} - -bool SmileyType::LoadFromResource(const CMStringW &file, const int index) -{ - m_index = index; - m_filepath = file; - return true; -} - -void SmileyType::GetSize(SIZE &size) -{ - if (m_size.cy == 0) { - ImageBase *img = CreateCachedImage(); - if (img) { - img->GetSize(m_size); - img->Release(); - } - } - size = m_size; -} - -ImageBase* SmileyType::CreateCachedImage(void) -{ - if (m_xepimg) { - m_xepimg->AddRef(); - return m_xepimg; - } - return AddCacheImage(m_filepath, m_index); -} - -void SmileyType::SetImList(HIMAGELIST hImLst, long i) -{ - if (m_xepimg) m_xepimg->Release(); - m_xepimg = new ImageListItemType(0, hImLst, i); -} - -HBITMAP SmileyType::GetBitmap(COLORREF bkgClr, int sizeX, int sizeY) -{ - ImageBase *img = CreateCachedImage(); - if (!img) return nullptr; - img->SelectFrame(m_index); - HBITMAP hBmp = img->GetBitmap(bkgClr, sizeX, sizeY); - img->Release(); - - return hBmp; -} - -// -// SmileyPackType -// - -SmileyPackType::SmileyPackType() -{ - m_hSmList = nullptr; - errorFound = false; -} - -SmileyType* SmileyPackType::GetSmiley(unsigned index) -{ - return (index < (unsigned)m_SmileyList.getCount()) ? &m_SmileyList[index] : nullptr; -} - -static DWORD_PTR ConvertServiceParam(MCONTACT hContact, const wchar_t *param) -{ - if (param == nullptr) - return 0; - if (mir_wstrcmpi(L"hContact", param) == 0) - return hContact; - if (iswdigit(*param)) - return _wtoi(param); - - return (DWORD_PTR)param; -} - -void SmileyType::CallSmileyService(MCONTACT hContact) -{ - MRegexp16 srvsplit(L"(.*)\\|(.*)\\|(.*)"); - srvsplit.match(m_TriggerText); - - CMStringW name = srvsplit.getGroup(1); - CMStringW par1 = srvsplit.getGroup(2); - CMStringW par2 = srvsplit.getGroup(3); - - const char *proto = ""; - if (name[0] == '/') { - proto = (const char*)GetContactProto(hContact); - if (proto == nullptr) - return; - } - - char str[MAXMODULELABELLENGTH]; - mir_snprintf(str, "%s%s", proto, _T2A(name.c_str())); - CallService(str, - ConvertServiceParam(hContact, par1.c_str()), - ConvertServiceParam(hContact, par2.c_str())); -} - -SmileyPackType::~SmileyPackType() -{ - if (m_hSmList != nullptr) ImageList_Destroy(m_hSmList); -} - -static const wchar_t urlRegEx[] = L"(?:ftp|https|http|file|aim|webcal|irc|msnim|xmpp|gopher|mailto|news|nntp|telnet|wais|prospero)://?[\\w.?%:/$+;]*"; -static const wchar_t pathRegEx[] = L"[\\s\"][a-zA-Z]:[\\\\/][\\w.\\-\\\\/]*"; -static const wchar_t timeRegEx[] = L"\\d{1,2}:\\d{2}:\\d{2}|\\d{1,2}:\\d{2}"; - -void SmileyPackType::AddTriggersToSmileyLookup(void) -{ - CMStringW emptystr; - m_SmileyLookup.insert(new SmileyLookup(urlRegEx, true, -1, emptystr)); - m_SmileyLookup.insert(new SmileyLookup(pathRegEx, true, -1, emptystr)); - m_SmileyLookup.insert(new SmileyLookup(timeRegEx, true, -1, emptystr)); - - for (int dist = 0; dist < m_SmileyList.getCount(); dist++) { - auto &p = m_SmileyList[dist]; - if (p.IsRegEx()) { - SmileyLookup *dats = new SmileyLookup(p.GetTriggerText(), true, dist, GetFilename()); - if (dats->IsValid()) - m_SmileyLookup.insert(dats); - else - errorFound = true; - if (p.m_InsertText.IsEmpty()) - p.m_InsertText = p.m_ToolText; - } - else if (!p.IsService()) { - bool first = true; - const CMStringW &text = p.GetTriggerText(); - int iStart = 0; - while (true) { - CMStringW wszWord = text.Tokenize(L" \t", iStart); - if (iStart == -1) - break; - - ReplaceAllSpecials(wszWord, wszWord); - SmileyLookup *dats = new SmileyLookup(wszWord, false, dist, GetFilename()); - if (dats->IsValid()) { - m_SmileyLookup.insert(dats); - if (first) { - p.m_InsertText = wszWord; - first = false; - } - } - else delete dats; - } - } - } -} - -///////////////////////////////////////////////////////////////////////////////////////// - -static MRegexp16 isCode(L"\\&\\#(\\d*)\\;"); - -static void replaceCodes(CMStringW &str) -{ - if (isCode.match(str) < 0) - return; - - str.Delete(isCode.getPos(), isCode.getLength()); - - uint32_t iCode = _wtoi(isCode.getGroup(1)); - wchar_t tmp[3] = { 0, 0, 0 }; - if (iCode < 0x10000) - tmp[0] = LOWORD(iCode), tmp[1] = HIWORD(iCode); - else { - iCode -= 0x10000; - tmp[0] = 0xD800 + (iCode >> 10); - tmp[1] = 0xDC00 + (iCode & 0x3FF); - } - str.Insert(isCode.getPos(), tmp); -} - -void SmileyPackType::ReplaceAllSpecials(const CMStringW &Input, CMStringW &Output) -{ - Output = Input; - Output.Replace(L"%%_%%", L" "); - Output.Replace(L"%%__%%", L" "); - Output.Replace(L"%%''%%", L"\""); - replaceCodes(Output); -} - -void SmileyPackType::Clear(void) -{ - m_SmileyList.destroy(); - m_SmileyLookup.destroy(); - if (m_hSmList != nullptr) { ImageList_Destroy(m_hSmList); m_hSmList = nullptr; } - m_Filename.Empty(); - m_Name.Empty(); - m_Date.Empty(); - m_Version.Empty(); - m_Author.Empty(); - m_VisibleCount = 0; - m_ButtonSmiley.Empty(); - errorFound = false; -} - -bool SmileyPackType::LoadSmileyFile(const CMStringW &filename, const CMStringW &packname, bool onlyInfo, bool noerr) -{ - Clear(); - - if (filename.IsEmpty()) { - m_Name = L"Nothing loaded"; - return false; - } - - CMStringW modpath; - pathToAbsolute(filename, modpath); - - // Load file - int fh = _wopen(modpath.c_str(), _O_BINARY | _O_RDONLY); - if (fh == -1) { - if (!noerr) { - static const wchar_t errmsg[] = LPGENW("Smiley pack %s for category \"%s\" not found.\nSelect correct smiley pack in the Options -> Customize -> Smileys."); - wchar_t msgtxt[1024]; - mir_snwprintf(msgtxt, TranslateW(errmsg), modpath.c_str(), packname.c_str()); - ReportError(msgtxt); - } - - m_Name = L"Nothing loaded"; - return false; - } - - m_Filename = filename; - - // Find file size - const long flen = _filelength(fh); - - // Allocate file buffer - char *buf = new char[flen + sizeof(wchar_t)]; - - // Read file in - int len = _read(fh, buf, flen); - *(wchar_t*)(buf + len) = 0; - - // Close file - _close(fh); - - CMStringW tbuf; - - if (len > 2 && *(wchar_t*)buf == 0xfeff) - tbuf = ((wchar_t*)buf + 1); - else if (len > 3 && buf[0] == '\xef' && buf[1] == '\xbb' && buf[2] == '\xbf') - tbuf = _A2T(buf + 3, CP_UTF8); - else - tbuf = _A2T(buf); - - delete[] buf; - - CMStringW pathstr, packstr; - { - MRegexp16 pathsplit(L"(.*\\\\)(.*)\\.|$"); - pathsplit.match(modpath); - - pathstr = pathsplit.getGroup(1); - packstr = pathsplit.getGroup(2); - } - - if (!onlyInfo) - selec.x = selec.y = win.x = win.y = 0; - - int iStart = 0; - MRegexp16 otherf(L"^\\s*(Name|Author|Date|Version|ButtonSmiley)\\s*=\\s*\"(.*)\""); - MRegexp16 size(L"^\\s*(Selection|Window)Size\\s*=\\s*(\\d+)\\s*,\\s*(\\d+)"); - MRegexp16 smiley( - L"^\\s*Smiley(\\*)?\\s*=" // Is Hidden - L"(?:\\s*\"(.*)\")" // Smiley file name - L"(?:[\\s,]+(\\-?\\d+))" // Icon resource id - L"(?:[\\s,]+(R|S)?\"(.*?)\")" // Trigger text - L"(?:[\\s,]+\"(.*?)\")?" // Tooltip or insert text - L"(?:[\\s,]+\"(.*?)\")?"); // Tooltip text - - SmileyVectorType hiddenSmileys; - unsigned smnum = 0; - - while (true) { - CMStringW line = tbuf.Tokenize(L"\r\n", iStart); - if (iStart == -1) - break; - - if (line.IsEmpty() || line[0] == ';') - continue; - - if (otherf.match(line) >= 0) { - CMStringW key(otherf.getGroup(1)), value(otherf.getGroup(2)); - if (key == L"Name") - m_Name = value; - else if (key == L"Author") - m_Author = value; - else if (key == L"Date") - m_Date = value; - else if (key == L"Version") - m_Version = value; - else if (key == L"ButtonSmiley") - m_ButtonSmiley = value; - continue; - } - - if (onlyInfo) - continue; - - if (size.match(line) >= 0) { - POINT tpt; - tpt.x = _wtol(size.getGroup(2)); - tpt.y = _wtol(size.getGroup(3)); - - if (size.getGroup(1) == L"Selection") - selec = tpt; - else if (size.getGroup(1) == L"Window") - win = tpt; - continue; - } - - if (smiley.match(line)) { - CMStringW resname = smiley.getGroup(2); - if (resname.Find(L"http://") != -1) { - if (GetSmileyFile(resname, packstr)) - continue; - } - else if (!resname.IsEmpty()) - resname.Insert(0, pathstr); - - SmileyType *dat = new SmileyType; - - const int iconIndex = _wtol(smiley.getGroup(3)); - - dat->SetHidden(!smiley.getGroup(1).IsEmpty()); - - CMStringW wszGrp4(smiley.getGroup(4)); - if (!wszGrp4.IsEmpty()) { - dat->SetRegEx(wszGrp4 == L"R"); - dat->SetService(wszGrp4 == L"S"); - } - - dat->m_TriggerText = smiley.getGroup(5); - - CMStringW wszGrp6(smiley.getGroup(6)), wszGrp7(smiley.getGroup(7)); - if (dat->IsRegEx()) { - if (!wszGrp6.IsEmpty()) - ReplaceAllSpecials(wszGrp6, dat->m_InsertText); - - if (!wszGrp7.IsEmpty()) - ReplaceAllSpecials(wszGrp7, dat->m_ToolText); - else - dat->m_ToolText = dat->m_InsertText; - } - else { - if (!wszGrp6.IsEmpty()) - ReplaceAllSpecials(wszGrp6, dat->m_ToolText); - else - ReplaceAllSpecials(dat->m_TriggerText, dat->m_ToolText); - } - - if (resname.IsEmpty()) { - dat->SetHidden(true); - dat->SetText(true); - noerr = true; - } - else noerr = dat->LoadFromResource(resname, iconIndex); - - if (dat->IsHidden()) - hiddenSmileys.insert(dat); - else - m_SmileyList.insert(dat); - - if (!noerr) { - static const wchar_t errmsg[] = LPGENW("Smiley #%u in file %s for smiley pack %s not found."); - wchar_t msgtxt[1024]; - mir_snwprintf(msgtxt, TranslateW(errmsg), smnum, resname.c_str(), modpath.c_str()); - Netlib_LogW(hNetlibUser, msgtxt); - errorFound = true; - } - smnum++; - } - } - - m_VisibleCount = m_SmileyList.getCount(); - m_SmileyList.splice(hiddenSmileys); - AddTriggersToSmileyLookup(); - - if (errorFound) - ReportError(TranslateT("There were problems loading smiley pack (it should be corrected).\nSee network log for details.")); - - return true; -} - -///////////////////////////////////////////////////////////////////////////////////////// -// SmileyPackListType - -bool SmileyPackListType::AddSmileyPack(CMStringW &filename, CMStringW &packname) -{ - bool res = true; - if (GetSmileyPack(filename) == nullptr) { //not exist yet, so add - SmileyPackType *smileyPack = new SmileyPackType; - - res = smileyPack->LoadSmileyFile(filename, packname, FALSE); - if (res) - m_SmileyPacks.insert(smileyPack); - else - delete smileyPack; - } - return res; -} - -SmileyPackType* SmileyPackListType::GetSmileyPack(CMStringW &filename) -{ - CMStringW modpath; - pathToAbsolute(filename, modpath); - - for (auto &it : m_SmileyPacks) { - CMStringW modpath1; - pathToAbsolute(it->GetFilename(), modpath1); - if (mir_wstrcmpi(modpath.c_str(), modpath1.c_str()) == 0) - return it; - } - return nullptr; -} - -void SmileyPackListType::ClearAndFreeAll() -{ - m_SmileyPacks.destroy(); -} - -///////////////////////////////////////////////////////////////////////////////////////// -// SmileyCategoryType - -SmileyCategoryType::SmileyCategoryType(SmileyPackListType *pSPS, const CMStringW &name, - const CMStringW &displayName, const CMStringW &defaultFilename, SmcType typ) -{ - m_pSmileyPackStore = pSPS; - type = typ; - m_Name = name; - m_DisplayName = displayName; - visible = true; - - opt.ReadPackFileName(m_Filename, m_Name, defaultFilename); -} - - -void SmileyCategoryType::Load(void) -{ - bool bVisibleCat = opt.UsePhysProto ? !IsAcc() : !IsPhysProto(); - bool bVisible = opt.UseOneForAll ? !IsProto() : bVisibleCat; - if (bVisible && !m_Filename.IsEmpty()) { - bool loaded = m_pSmileyPackStore->AddSmileyPack(m_Filename, m_DisplayName); - if (!loaded) { - ClearFilename(); - SaveSettings(); - } - } -} - -SmileyPackType* SmileyCategoryType::GetSmileyPack(void) -{ - return m_pSmileyPackStore->GetSmileyPack(m_Filename); -} - -void SmileyCategoryType::SaveSettings(void) -{ - opt.WritePackFileName(m_Filename, m_Name); -} - -///////////////////////////////////////////////////////////////////////////////////////// -// SmileyCategoryListType - -void SmileyCategoryListType::ClearAndLoadAll(void) -{ - m_pSmileyPackStore->ClearAndFreeAll(); - - for (auto &it : m_SmileyCategories) - it->Load(); -} - -SmileyCategoryType* SmileyCategoryListType::GetSmileyCategory(const CMStringW &name) -{ - for (auto &it : m_SmileyCategories) - if (name.CompareNoCase(it->GetName()) == 0) - return it; - - return nullptr; -} - -SmileyCategoryType* SmileyCategoryListType::GetSmileyCategory(unsigned index) -{ - return index < (unsigned)m_SmileyCategories.getCount() ? &m_SmileyCategories[index] : nullptr; -} - -SmileyPackType* SmileyCategoryListType::GetSmileyPack(CMStringW &categoryname) -{ - SmileyCategoryType *smc = GetSmileyCategory(categoryname); - return smc != nullptr ? smc->GetSmileyPack() : nullptr; -} - -void SmileyCategoryListType::SaveSettings(void) -{ - CMStringW catstr; - for (auto &it : m_SmileyCategories) { - it->SaveSettings(); - if (it->IsCustom()) { - if (!catstr.IsEmpty()) - catstr += '#'; - catstr += it->GetName(); - } - } - opt.WriteCustomCategories(catstr); -} - -void SmileyCategoryListType::AddAndLoad(const CMStringW &name, const CMStringW &displayName) -{ - if (GetSmileyCategory(name) != nullptr) - return; - - AddCategory(name, displayName, smcExt); - // Load only if other smileys have been loaded already - if (m_SmileyCategories.getCount() > 1) - m_SmileyCategories[m_SmileyCategories.getCount() - 1].Load(); -} - -void SmileyCategoryListType::AddCategory(const CMStringW &name, const CMStringW &displayName, SmcType typ, const CMStringW &defaultFilename) -{ - if (GetSmileyCategory(name) == nullptr) - m_SmileyCategories.insert(new SmileyCategoryType(m_pSmileyPackStore, name, displayName, defaultFilename, typ)); -} - -bool SmileyCategoryListType::DeleteCustomCategory(int index) -{ - if (index < m_SmileyCategories.getCount()) { - if (m_SmileyCategories[index].IsCustom()) { - m_SmileyCategories.remove(index); - return true; - } - } - return false; -} - -void SmileyCategoryListType::AddAccountAsCategory(PROTOACCOUNT *acc, const CMStringW &defaultFile) -{ - if (acc->IsEnabled() && acc->szProtoName && IsSmileyProto(acc->szModuleName)) { - CMStringW displayName(acc->tszAccountName ? acc->tszAccountName : _A2T(acc->szModuleName)); - CMStringW PhysProtoName, paths; - DBVARIANT dbv; - - if (db_get_ws(NULL, acc->szModuleName, "AM_BaseProto", &dbv) == 0) { - PhysProtoName = L"AllProto"; - PhysProtoName += dbv.ptszVal; - db_free(&dbv); - } - - if (!PhysProtoName.IsEmpty()) - paths = g_SmileyCategories.GetSmileyCategory(PhysProtoName) ? g_SmileyCategories.GetSmileyCategory(PhysProtoName)->GetFilename() : L""; - - if (paths.IsEmpty()) { - const char *packnam = acc->szProtoName; - if (mir_strcmp(packnam, "JABBER") == 0) - packnam = "JGMail"; - else if (strstr(packnam, "SIP") != nullptr) - packnam = "MSN"; - - char path[MAX_PATH]; - mir_snprintf(path, "Smileys\\nova\\%s.msl", packnam); - - paths = _A2T(path); - CMStringW patha; - pathToAbsolute(paths, patha); - - if (_waccess(patha.c_str(), 0) != 0) - paths = defaultFile; - } - - CMStringW tname(_A2T(acc->szModuleName)); - AddCategory(tname, displayName, acc->bIsVirtual ? smcVirtualProto : smcProto, paths); - } -} - -void SmileyCategoryListType::AddProtoAsCategory(char *acc, const CMStringW &defaultFile) -{ - if (acc == nullptr) - return; - - const char *packnam = acc; - if (mir_strcmp(packnam, "JABBER") == 0) - packnam = "JGMail"; - else if (strstr(packnam, "SIP") != nullptr) - packnam = "MSN"; - - char path[MAX_PATH]; - mir_snprintf(path, "Smileys\\nova\\%s.msl", packnam); - - CMStringW paths = _A2T(path), patha; - pathToAbsolute(paths, patha); - - if (_waccess(patha.c_str(), 0) != 0) - paths = defaultFile; - CMStringW dName(acc), displayName; - displayName.AppendFormat(TranslateT("%s global smiley pack"), dName.GetBuffer()); - CMStringW tname("AllProto"); - tname += _A2T(acc); - AddCategory(tname, displayName, smcPhysProto, paths); -} - -void SmileyCategoryListType::DeleteAccountAsCategory(PROTOACCOUNT *acc) -{ - CMStringW tname(_A2T(acc->szModuleName)); - - for (auto &hContact : Contacts()) { - char *proto = GetContactProto(hContact); - if (proto == nullptr) - continue; - - DBVARIANT dbv; - if (!db_get_ws(hContact, proto, "Transport", &dbv)) { - bool found = (tname.CompareNoCase(dbv.ptszVal) == 0); - db_free(&dbv); - if (found) - return; - } - } - - for (auto &it : m_SmileyCategories) { - if (tname.CompareNoCase(it->GetName()) == 0) { - m_SmileyCategories.removeItem(&it); - break; - } - } -} - -void SmileyCategoryListType::AddContactTransportAsCategory(MCONTACT hContact, const CMStringW &defaultFile) -{ - char *proto = GetContactProto(hContact); - if (proto == nullptr) - return; - - DBVARIANT dbv; - if (!db_get_ws(hContact, proto, "Transport", &dbv)) { - if (dbv.ptszVal[0] == '\0') { - db_free(&dbv); - return; - } - char *trsp = mir_strdup(_T2A(dbv.ptszVal)); - _strlwr(trsp); - - const char *packname = nullptr; - if (strstr(trsp, "msn") != nullptr) - packname = "msn"; - else if (strstr(trsp, "icq") != nullptr) - packname = "icq"; - else if (strstr(trsp, "yahoo") != nullptr) - packname = "yahoo"; - else if (strstr(trsp, "aim") != nullptr) - packname = "aim"; - else if (strstr(trsp, "lcs") != nullptr) - packname = "msn"; - - mir_free(trsp); - - CMStringW displayName = dbv.ptszVal; - if (packname != nullptr) { - char path[MAX_PATH]; - mir_snprintf(path, "Smileys\\nova\\%s.msl", packname); - - CMStringW paths = _A2T(path), patha; - pathToAbsolute(paths, patha); - - if (_waccess(patha.c_str(), 0) != 0) - paths = defaultFile; - - AddCategory(displayName, displayName, smcTransportProto, paths); - } - else AddCategory(displayName, displayName, smcTransportProto, defaultFile); - - db_free(&dbv); - } -} - -void SmileyCategoryListType::AddAllProtocolsAsCategory(void) -{ - CMStringW displayName = TranslateT("Standard"); - CMStringW tname = L"Standard"; - AddCategory(tname, displayName, smcStd); - - const CMStringW &defaultFile = GetSmileyCategory(tname)->GetFilename(); - - PROTOCOLDESCRIPTOR **proto; - int protoCount = 0; - Proto_EnumProtocols(&protoCount, &proto); - - for (int i = 0; i < protoCount; i++) { - PROTOCOLDESCRIPTOR *pd = proto[i]; - if (pd->type == PROTOTYPE_PROTOWITHACCS) - AddProtoAsCategory(pd->szName, defaultFile); - } - - for (auto &pa : Accounts()) - AddAccountAsCategory(pa, defaultFile); - - for (auto &hContact : Contacts()) - AddContactTransportAsCategory(hContact, defaultFile); - - CMStringW cats; - opt.ReadCustomCategories(cats); - - int cppv = 0; - for (;;) { - int cp = cats.Find('#', cppv); - if (cp == -1) - break; - - displayName = cats.Mid(cppv, cp - cppv); - AddCategory(displayName, displayName, smcCustom, defaultFile); - cppv = cp + 1; - } - - if (cppv != cats.GetLength()) { - displayName = cats.Mid(cppv); - AddCategory(displayName, displayName, smcCustom, defaultFile); - } -} - -static const CMStringW testString(L"Test String"); - -SmileyLookup::SmileyLookup(const CMStringW &str, const bool regexs, const int ind, const CMStringW &smpt) -{ - m_ind = ind; - if (regexs) { - m_pattern.compile(str); - m_valid = m_pattern.isValid(); - if (!m_valid) { - wchar_t msgtxt[1024]; - mir_snwprintf(msgtxt, TranslateT("Regular expression \"%s\" in smiley pack \"%s\" malformed."), str.c_str(), smpt.c_str()); - Netlib_LogW(hNetlibUser, msgtxt); - } - } - else { - m_text = str; - replaceCodes(m_text); - m_valid = !str.IsEmpty(); - } -} - -SmileyLookup::~SmileyLookup() -{ -} - -void SmileyLookup::Find(const CMStringW &str, SmileyLocVecType &smlcur, bool firstOnly) -{ - if (!m_valid) return; - - if (m_text.IsEmpty()) { - while (m_pattern.nextMatch(str) >= 0) { - CMStringW wszMatch(m_pattern.getMatch()); - smlcur.insert(new SmileyLocType(m_pattern.getPos(), wszMatch.GetLength())); - if (firstOnly && m_ind != -1) - return; - } - } - else { - const wchar_t *pos = str.c_str(); - while ((pos = wcsstr(pos, m_text.c_str())) != nullptr) { - smlcur.insert(new SmileyLocType(pos - str.c_str(), m_text.GetLength())); - pos += m_text.GetLength(); - if (firstOnly && m_ind != -1) - return; - } - } -} +/* +Miranda NG SmileyAdd Plugin +Copyright (C) 2012-18 Miranda NG team (https://miranda-ng.org) +Copyright (C) 2005-11 Boris Krasnovskiy All Rights Reserved +Copyright (C) 2003-04 Rein-Peter de Boer + +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 version 2 +of the License. + +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, see . +*/ + +#include "stdafx.h" + +SmileyPackListType g_SmileyPacks; +SmileyCategoryListType g_SmileyCategories; + +static HWND hwndHidden = nullptr; + +static void CALLBACK timerProc(HWND, UINT, UINT_PTR param, DWORD) +{ + SmileyType *pType = (SmileyType*)param; + pType->MoveToNextFrame(); +} + +// these two functions must be called from the main thread +static void CALLBACK sttStartTimer(PVOID obj) +{ + if (hwndHidden == nullptr) + hwndHidden = CreateWindowEx(0, L"STATIC", nullptr, 0, 0, 0, 0, 0, nullptr, nullptr, nullptr, nullptr); + + SmileyType *pType = (SmileyType*)obj; + pType->SetFrameDelay(); +} + +static void CALLBACK sttStopTimer(PVOID obj) +{ + KillTimer(hwndHidden, (DWORD_PTR)obj); +} + +// +// SmileyType +// + +SmileyType::SmileyType(void) : + m_arSmileys(10, PtrKeySortT) +{ + m_SmileyIcon = nullptr; + m_xepimg = nullptr; + m_flags = 0; + m_index = 0; + m_size.cx = 0; + m_size.cy = 0; +} + +SmileyType::~SmileyType() +{ + if (m_xepimg) { + m_xepimg->Release(); + m_xepimg = nullptr; + } + + if (m_SmileyIcon != nullptr) { + DestroyIcon(m_SmileyIcon); + m_SmileyIcon = nullptr; + } +} + +void SmileyType::AddObject(ISmileyBase *pObject) +{ + if (m_arSmileys.getCount() == 0) { + if (m_xepimg == nullptr) + m_xepimg = AddCacheImage(m_filepath, m_index); + CallFunctionAsync(sttStartTimer, this); + } + + m_arSmileys.insert(pObject); +} + +void SmileyType::RemoveObject(ISmileyBase *pObject) +{ + int idx = m_arSmileys.getIndex(pObject); + if (idx == -1) + return; + + m_arSmileys.remove(idx); + if (m_arSmileys.getCount() == 0) + CallFunctionAsync(sttStopTimer, this); +} + +void SmileyType::SetFrameDelay() +{ + int iFrameDelay = (m_xepimg == nullptr) ? 0 : m_xepimg->GetFrameDelay(); + if (iFrameDelay <= 0) + KillTimer(hwndHidden, (DWORD_PTR)this); + else + SetTimer(hwndHidden, (DWORD_PTR)this, iFrameDelay*10, timerProc); +} + +void SmileyType::MoveToNextFrame() +{ + m_index = m_xepimg->SelectNextFrame(m_index); + + for (auto &it : m_arSmileys) + it->Draw(); + + SetFrameDelay(); // reset timer +} + +HICON SmileyType::GetIcon(void) +{ + if (m_SmileyIcon == nullptr) { + ImageBase *img = CreateCachedImage(); + if (!img) + return nullptr; + + img->SelectFrame(m_index); + m_SmileyIcon = img->GetIcon(); + img->Release(); + } + return m_SmileyIcon; +} + +HICON SmileyType::GetIconDup(void) +{ + ImageBase *img = CreateCachedImage(); + img->SelectFrame(m_index); + HICON hIcon = img->GetIcon(); + img->Release(); + return hIcon; +} + +bool SmileyType::LoadFromImage(IStream *pStream) +{ + if (m_xepimg) + m_xepimg->Release(); + + CMStringW name; + m_xepimg = new ImageType(0, name, pStream); + return true; +} + +bool SmileyType::LoadFromResource(const CMStringW &file, const int index) +{ + m_index = index; + m_filepath = file; + return true; +} + +void SmileyType::GetSize(SIZE &size) +{ + if (m_size.cy == 0) { + ImageBase *img = CreateCachedImage(); + if (img) { + img->GetSize(m_size); + img->Release(); + } + } + size = m_size; +} + +ImageBase* SmileyType::CreateCachedImage(void) +{ + if (m_xepimg) { + m_xepimg->AddRef(); + return m_xepimg; + } + return AddCacheImage(m_filepath, m_index); +} + +void SmileyType::SetImList(HIMAGELIST hImLst, long i) +{ + if (m_xepimg) m_xepimg->Release(); + m_xepimg = new ImageListItemType(0, hImLst, i); +} + +HBITMAP SmileyType::GetBitmap(COLORREF bkgClr, int sizeX, int sizeY) +{ + ImageBase *img = CreateCachedImage(); + if (!img) return nullptr; + img->SelectFrame(m_index); + HBITMAP hBmp = img->GetBitmap(bkgClr, sizeX, sizeY); + img->Release(); + + return hBmp; +} + +// +// SmileyPackType +// + +SmileyPackType::SmileyPackType() +{ + m_hSmList = nullptr; + errorFound = false; +} + +SmileyType* SmileyPackType::GetSmiley(unsigned index) +{ + return (index < (unsigned)m_SmileyList.getCount()) ? &m_SmileyList[index] : nullptr; +} + +static DWORD_PTR ConvertServiceParam(MCONTACT hContact, const wchar_t *param) +{ + if (param == nullptr) + return 0; + if (mir_wstrcmpi(L"hContact", param) == 0) + return hContact; + if (iswdigit(*param)) + return _wtoi(param); + + return (DWORD_PTR)param; +} + +void SmileyType::CallSmileyService(MCONTACT hContact) +{ + MRegexp16 srvsplit(L"(.*)\\|(.*)\\|(.*)"); + srvsplit.match(m_TriggerText); + + CMStringW name = srvsplit.getGroup(1); + CMStringW par1 = srvsplit.getGroup(2); + CMStringW par2 = srvsplit.getGroup(3); + + const char *proto = ""; + if (name[0] == '/') { + proto = (const char*)GetContactProto(hContact); + if (proto == nullptr) + return; + } + + char str[MAXMODULELABELLENGTH]; + mir_snprintf(str, "%s%s", proto, _T2A(name.c_str())); + CallService(str, + ConvertServiceParam(hContact, par1.c_str()), + ConvertServiceParam(hContact, par2.c_str())); +} + +SmileyPackType::~SmileyPackType() +{ + if (m_hSmList != nullptr) ImageList_Destroy(m_hSmList); +} + +static const wchar_t urlRegEx[] = L"(?:ftp|https|http|file|aim|webcal|irc|msnim|xmpp|gopher|mailto|news|nntp|telnet|wais|prospero)://?[\\w.?%:/$+;]*"; +static const wchar_t pathRegEx[] = L"[\\s\"][a-zA-Z]:[\\\\/][\\w.\\-\\\\/]*"; +static const wchar_t timeRegEx[] = L"\\d{1,2}:\\d{2}:\\d{2}|\\d{1,2}:\\d{2}"; + +void SmileyPackType::AddTriggersToSmileyLookup(void) +{ + CMStringW emptystr; + m_SmileyLookup.insert(new SmileyLookup(urlRegEx, true, -1, emptystr)); + m_SmileyLookup.insert(new SmileyLookup(pathRegEx, true, -1, emptystr)); + m_SmileyLookup.insert(new SmileyLookup(timeRegEx, true, -1, emptystr)); + + for (int dist = 0; dist < m_SmileyList.getCount(); dist++) { + auto &p = m_SmileyList[dist]; + if (p.IsRegEx()) { + SmileyLookup *dats = new SmileyLookup(p.GetTriggerText(), true, dist, GetFilename()); + if (dats->IsValid()) + m_SmileyLookup.insert(dats); + else + errorFound = true; + if (p.m_InsertText.IsEmpty()) + p.m_InsertText = p.m_ToolText; + } + else if (!p.IsService()) { + bool first = true; + const CMStringW &text = p.GetTriggerText(); + int iStart = 0; + while (true) { + CMStringW wszWord = text.Tokenize(L" \t", iStart); + if (iStart == -1) + break; + + ReplaceAllSpecials(wszWord, wszWord); + SmileyLookup *dats = new SmileyLookup(wszWord, false, dist, GetFilename()); + if (dats->IsValid()) { + m_SmileyLookup.insert(dats); + if (first) { + p.m_InsertText = wszWord; + first = false; + } + } + else delete dats; + } + } + } +} + +///////////////////////////////////////////////////////////////////////////////////////// + +static MRegexp16 isCode(L"\\&\\#(\\d*)\\;"); + +static void replaceCodes(CMStringW &str) +{ + if (isCode.match(str) < 0) + return; + + str.Delete(isCode.getPos(), isCode.getLength()); + + uint32_t iCode = _wtoi(isCode.getGroup(1)); + wchar_t tmp[3] = { 0, 0, 0 }; + if (iCode < 0x10000) + tmp[0] = LOWORD(iCode), tmp[1] = HIWORD(iCode); + else { + iCode -= 0x10000; + tmp[0] = 0xD800 + (iCode >> 10); + tmp[1] = 0xDC00 + (iCode & 0x3FF); + } + str.Insert(isCode.getPos(), tmp); +} + +void SmileyPackType::ReplaceAllSpecials(const CMStringW &Input, CMStringW &Output) +{ + Output = Input; + Output.Replace(L"%%_%%", L" "); + Output.Replace(L"%%__%%", L" "); + Output.Replace(L"%%''%%", L"\""); + replaceCodes(Output); +} + +void SmileyPackType::Clear(void) +{ + m_SmileyList.destroy(); + m_SmileyLookup.destroy(); + if (m_hSmList != nullptr) { ImageList_Destroy(m_hSmList); m_hSmList = nullptr; } + m_Filename.Empty(); + m_Name.Empty(); + m_Date.Empty(); + m_Version.Empty(); + m_Author.Empty(); + m_VisibleCount = 0; + m_ButtonSmiley.Empty(); + errorFound = false; +} + +bool SmileyPackType::LoadSmileyFile(const CMStringW &filename, const CMStringW &packname, bool onlyInfo, bool noerr) +{ + Clear(); + + if (filename.IsEmpty()) { + m_Name = L"Nothing loaded"; + return false; + } + + CMStringW modpath; + pathToAbsolute(filename, modpath); + + // Load file + int fh = _wopen(modpath.c_str(), _O_BINARY | _O_RDONLY); + if (fh == -1) { + if (!noerr) { + static const wchar_t errmsg[] = LPGENW("Smiley pack %s for category \"%s\" not found.\nSelect correct smiley pack in the Options -> Customize -> Smileys."); + wchar_t msgtxt[1024]; + mir_snwprintf(msgtxt, TranslateW(errmsg), modpath.c_str(), packname.c_str()); + ReportError(msgtxt); + } + + m_Name = L"Nothing loaded"; + return false; + } + + m_Filename = filename; + + // Find file size + const long flen = _filelength(fh); + + // Allocate file buffer + char *buf = new char[flen + sizeof(wchar_t)]; + + // Read file in + int len = _read(fh, buf, flen); + *(wchar_t*)(buf + len) = 0; + + // Close file + _close(fh); + + CMStringW tbuf; + if (len > 2 && *(wchar_t*)buf == 0xfeff) + tbuf = ((wchar_t*)buf + 1); + else if (len > 3 && buf[0] == '\xef' && buf[1] == '\xbb' && buf[2] == '\xbf') + tbuf = _A2T(buf + 3, CP_UTF8); + else + tbuf = _A2T(buf); + + delete[] buf; + + bool res; + if (filename.Find(L".xep") == -1) + res = LoadSmileyFileMSL(tbuf, onlyInfo, modpath); + else + res = LoadSmileyFileXEP(tbuf, onlyInfo); + + if (errorFound) + ReportError(TranslateT("There were problems loading smiley pack (it should be corrected).\nSee network log for details.")); + + return res; +} + +static IStream* DecodeBase64Data(const wchar_t *pString) +{ + size_t dataLen; + ptrA data((char*)mir_base64_decode(_T2A(pString), &dataLen)); + if (data == nullptr) + return nullptr; + + // Read image list + HGLOBAL hBuffer = GlobalAlloc(GMEM_MOVEABLE, dataLen); + if (!hBuffer) + return nullptr; + + void *dst = GlobalLock(hBuffer); + memcpy(dst, data, dataLen); + GlobalUnlock(hBuffer); + + IStream *pStream = nullptr; + CreateStreamOnHGlobal(hBuffer, TRUE, &pStream); + return pStream; +} + +static CMStringW FilterQuotes(const wchar_t *pStr) +{ + CMStringW res(pStr); + int iStart = res.Find('\"', 0); + if (iStart != -1) { + int iEnd = res.Find('\"', ++iStart); + if (iEnd != -1) + res = res.Mid(iStart, iEnd - iStart); + } + + return res; +} + +bool SmileyPackType::LoadSmileyFileXEP(CMStringW &tbuf, bool onlyInfo) +{ + HXML node, xmlRoot = xmlParseString(tbuf, nullptr, nullptr); + if (!xmlRoot) + return false; + + if (node = xmlGetChildByPath(xmlRoot, L"settings/DataBaseName", 0)) + m_Name = xmlGetText(node); + if (node = xmlGetChildByPath(xmlRoot, L"settings/PackageAuthor", 0)) + m_Author = xmlGetText(node); + + if (!onlyInfo) { + const wchar_t *pStr = xmlGetClear(xmlGetChildByPath(xmlRoot, L"lists/images", 0), 0, 0, 0); + if (pStr) { + IStream *pStream = DecodeBase64Data(pStr); + if (pStream) { + if (m_hSmList != nullptr) + ImageList_Destroy(m_hSmList); + m_hSmList = ImageList_Read(pStream); + pStream->Release(); + } + } + + HXML nRec, dataRoot = xmlGetChildByPath(xmlRoot, L"dataroot", 0); + for (int i = 0; (nRec = xmlGetNthChild(dataRoot, L"record", i)) != 0; i++) { + pStr = xmlGetAttrValue(nRec, L"ImageIndex"); + if (pStr == nullptr) + continue; + + SmileyType *dat = new SmileyType; + dat->SetRegEx(true); + dat->SetImList(m_hSmList, _wtoi(pStr)); + dat->m_ToolText = xmlGetText(nRec); + + if (node = xmlGetChildByPath(nRec, L"Expression", 0)) + dat->m_TriggerText = FilterQuotes(xmlGetText(node)); + if (node = xmlGetChildByPath(nRec, L"PasteText", 0)) + dat->m_InsertText = FilterQuotes(xmlGetText(node)); + + dat->SetHidden(dat->m_InsertText.IsEmpty()); + + if (node = xmlGetChildByPath(nRec, L"Image", 0)) { + IStream *pStream = DecodeBase64Data(xmlGetText(node)); + if (pStream) { + dat->LoadFromImage(pStream); + pStream->Release(); + } + } + + m_SmileyList.insert(dat); + } + } + + xmlDestroyNode(xmlRoot); + + m_VisibleCount = m_SmileyList.getCount(); + AddTriggersToSmileyLookup(); + + selec.x = selec.y = win.x = win.y = 0; + return true; +} + +bool SmileyPackType::LoadSmileyFileMSL(CMStringW &tbuf, bool onlyInfo, CMStringW &modpath) +{ + CMStringW pathstr, packstr; + { + MRegexp16 pathsplit(L"(.*\\\\)(.*)\\.|$"); + pathsplit.match(modpath); + + pathstr = pathsplit.getGroup(1); + packstr = pathsplit.getGroup(2); + } + + if (!onlyInfo) + selec.x = selec.y = win.x = win.y = 0; + + int iStart = 0; + MRegexp16 otherf(L"^\\s*(Name|Author|Date|Version|ButtonSmiley)\\s*=\\s*\"(.*)\""); + MRegexp16 size(L"^\\s*(Selection|Window)Size\\s*=\\s*(\\d+)\\s*,\\s*(\\d+)"); + MRegexp16 smiley( + L"^\\s*Smiley(\\*)?\\s*=" // Is Hidden + L"(?:\\s*\"(.*)\")" // Smiley file name + L"(?:[\\s,]+(\\-?\\d+))" // Icon resource id + L"(?:[\\s,]+(R|S)?\"(.*?)\")" // Trigger text + L"(?:[\\s,]+\"(.*?)\")?" // Tooltip or insert text + L"(?:[\\s,]+\"(.*?)\")?"); // Tooltip text + + SmileyVectorType hiddenSmileys; + unsigned smnum = 0; + + while (true) { + CMStringW line = tbuf.Tokenize(L"\r\n", iStart); + if (iStart == -1) + break; + + if (line.IsEmpty() || line[0] == ';') + continue; + + if (otherf.match(line) >= 0) { + CMStringW key(otherf.getGroup(1)), value(otherf.getGroup(2)); + if (key == L"Name") + m_Name = value; + else if (key == L"Author") + m_Author = value; + else if (key == L"Date") + m_Date = value; + else if (key == L"Version") + m_Version = value; + else if (key == L"ButtonSmiley") + m_ButtonSmiley = value; + continue; + } + + if (onlyInfo) + continue; + + if (size.match(line) >= 0) { + POINT tpt; + tpt.x = _wtol(size.getGroup(2)); + tpt.y = _wtol(size.getGroup(3)); + + if (size.getGroup(1) == L"Selection") + selec = tpt; + else if (size.getGroup(1) == L"Window") + win = tpt; + continue; + } + + if (smiley.match(line)) { + CMStringW resname = smiley.getGroup(2); + if (resname.Find(L"http://") != -1) { + if (GetSmileyFile(resname, packstr)) + continue; + } + else if (!resname.IsEmpty()) + resname.Insert(0, pathstr); + + SmileyType *dat = new SmileyType; + + const int iconIndex = _wtol(smiley.getGroup(3)); + + dat->SetHidden(!smiley.getGroup(1).IsEmpty()); + + CMStringW wszGrp4(smiley.getGroup(4)); + if (!wszGrp4.IsEmpty()) { + dat->SetRegEx(wszGrp4 == L"R"); + dat->SetService(wszGrp4 == L"S"); + } + + dat->m_TriggerText = smiley.getGroup(5); + + CMStringW wszGrp6(smiley.getGroup(6)), wszGrp7(smiley.getGroup(7)); + if (dat->IsRegEx()) { + if (!wszGrp6.IsEmpty()) + ReplaceAllSpecials(wszGrp6, dat->m_InsertText); + + if (!wszGrp7.IsEmpty()) + ReplaceAllSpecials(wszGrp7, dat->m_ToolText); + else + dat->m_ToolText = dat->m_InsertText; + } + else { + if (!wszGrp6.IsEmpty()) + ReplaceAllSpecials(wszGrp6, dat->m_ToolText); + else + ReplaceAllSpecials(dat->m_TriggerText, dat->m_ToolText); + } + + bool noerr; + if (resname.IsEmpty()) { + dat->SetHidden(true); + dat->SetText(true); + noerr = true; + } + else noerr = dat->LoadFromResource(resname, iconIndex); + + if (dat->IsHidden()) + hiddenSmileys.insert(dat); + else + m_SmileyList.insert(dat); + + if (!noerr) { + static const wchar_t errmsg[] = LPGENW("Smiley #%u in file %s for smiley pack %s not found."); + wchar_t msgtxt[1024]; + mir_snwprintf(msgtxt, TranslateW(errmsg), smnum, resname.c_str(), modpath.c_str()); + Netlib_LogW(hNetlibUser, msgtxt); + errorFound = true; + } + smnum++; + } + } + + m_VisibleCount = m_SmileyList.getCount(); + m_SmileyList.splice(hiddenSmileys); + AddTriggersToSmileyLookup(); + return true; +} + +///////////////////////////////////////////////////////////////////////////////////////// +// SmileyPackListType + +bool SmileyPackListType::AddSmileyPack(CMStringW &filename, CMStringW &packname) +{ + bool res = true; + if (GetSmileyPack(filename) == nullptr) { //not exist yet, so add + SmileyPackType *smileyPack = new SmileyPackType; + + res = smileyPack->LoadSmileyFile(filename, packname, FALSE); + if (res) + m_SmileyPacks.insert(smileyPack); + else + delete smileyPack; + } + return res; +} + +SmileyPackType* SmileyPackListType::GetSmileyPack(CMStringW &filename) +{ + CMStringW modpath; + pathToAbsolute(filename, modpath); + + for (auto &it : m_SmileyPacks) { + CMStringW modpath1; + pathToAbsolute(it->GetFilename(), modpath1); + if (mir_wstrcmpi(modpath.c_str(), modpath1.c_str()) == 0) + return it; + } + return nullptr; +} + +void SmileyPackListType::ClearAndFreeAll() +{ + m_SmileyPacks.destroy(); +} + +///////////////////////////////////////////////////////////////////////////////////////// +// SmileyCategoryType + +SmileyCategoryType::SmileyCategoryType(SmileyPackListType *pSPS, const CMStringW &name, + const CMStringW &displayName, const CMStringW &defaultFilename, SmcType typ) +{ + m_pSmileyPackStore = pSPS; + type = typ; + m_Name = name; + m_DisplayName = displayName; + visible = true; + + opt.ReadPackFileName(m_Filename, m_Name, defaultFilename); +} + + +void SmileyCategoryType::Load(void) +{ + bool bVisibleCat = opt.UsePhysProto ? !IsAcc() : !IsPhysProto(); + bool bVisible = opt.UseOneForAll ? !IsProto() : bVisibleCat; + if (bVisible && !m_Filename.IsEmpty()) { + bool loaded = m_pSmileyPackStore->AddSmileyPack(m_Filename, m_DisplayName); + if (!loaded) { + ClearFilename(); + SaveSettings(); + } + } +} + +SmileyPackType* SmileyCategoryType::GetSmileyPack(void) +{ + return m_pSmileyPackStore->GetSmileyPack(m_Filename); +} + +void SmileyCategoryType::SaveSettings(void) +{ + opt.WritePackFileName(m_Filename, m_Name); +} + +///////////////////////////////////////////////////////////////////////////////////////// +// SmileyCategoryListType + +void SmileyCategoryListType::ClearAndLoadAll(void) +{ + m_pSmileyPackStore->ClearAndFreeAll(); + + for (auto &it : m_SmileyCategories) + it->Load(); +} + +SmileyCategoryType* SmileyCategoryListType::GetSmileyCategory(const CMStringW &name) +{ + for (auto &it : m_SmileyCategories) + if (name.CompareNoCase(it->GetName()) == 0) + return it; + + return nullptr; +} + +SmileyCategoryType* SmileyCategoryListType::GetSmileyCategory(unsigned index) +{ + return index < (unsigned)m_SmileyCategories.getCount() ? &m_SmileyCategories[index] : nullptr; +} + +SmileyPackType* SmileyCategoryListType::GetSmileyPack(CMStringW &categoryname) +{ + SmileyCategoryType *smc = GetSmileyCategory(categoryname); + return smc != nullptr ? smc->GetSmileyPack() : nullptr; +} + +void SmileyCategoryListType::SaveSettings(void) +{ + CMStringW catstr; + for (auto &it : m_SmileyCategories) { + it->SaveSettings(); + if (it->IsCustom()) { + if (!catstr.IsEmpty()) + catstr += '#'; + catstr += it->GetName(); + } + } + opt.WriteCustomCategories(catstr); +} + +void SmileyCategoryListType::AddAndLoad(const CMStringW &name, const CMStringW &displayName) +{ + if (GetSmileyCategory(name) != nullptr) + return; + + AddCategory(name, displayName, smcExt); + // Load only if other smileys have been loaded already + if (m_SmileyCategories.getCount() > 1) + m_SmileyCategories[m_SmileyCategories.getCount() - 1].Load(); +} + +void SmileyCategoryListType::AddCategory(const CMStringW &name, const CMStringW &displayName, SmcType typ, const CMStringW &defaultFilename) +{ + if (GetSmileyCategory(name) == nullptr) + m_SmileyCategories.insert(new SmileyCategoryType(m_pSmileyPackStore, name, displayName, defaultFilename, typ)); +} + +bool SmileyCategoryListType::DeleteCustomCategory(int index) +{ + if (index < m_SmileyCategories.getCount()) { + if (m_SmileyCategories[index].IsCustom()) { + m_SmileyCategories.remove(index); + return true; + } + } + return false; +} + +void SmileyCategoryListType::AddAccountAsCategory(PROTOACCOUNT *acc, const CMStringW &defaultFile) +{ + if (acc->IsEnabled() && acc->szProtoName && IsSmileyProto(acc->szModuleName)) { + CMStringW displayName(acc->tszAccountName ? acc->tszAccountName : _A2T(acc->szModuleName)); + CMStringW PhysProtoName, paths; + DBVARIANT dbv; + + if (db_get_ws(NULL, acc->szModuleName, "AM_BaseProto", &dbv) == 0) { + PhysProtoName = L"AllProto"; + PhysProtoName += dbv.ptszVal; + db_free(&dbv); + } + + if (!PhysProtoName.IsEmpty()) + paths = g_SmileyCategories.GetSmileyCategory(PhysProtoName) ? g_SmileyCategories.GetSmileyCategory(PhysProtoName)->GetFilename() : L""; + + if (paths.IsEmpty()) { + const char *packnam = acc->szProtoName; + if (mir_strcmp(packnam, "JABBER") == 0) + packnam = "JGMail"; + else if (strstr(packnam, "SIP") != nullptr) + packnam = "MSN"; + + char path[MAX_PATH]; + mir_snprintf(path, "Smileys\\nova\\%s.msl", packnam); + + paths = _A2T(path); + CMStringW patha; + pathToAbsolute(paths, patha); + + if (_waccess(patha.c_str(), 0) != 0) + paths = defaultFile; + } + + CMStringW tname(_A2T(acc->szModuleName)); + AddCategory(tname, displayName, acc->bIsVirtual ? smcVirtualProto : smcProto, paths); + } +} + +void SmileyCategoryListType::AddProtoAsCategory(char *acc, const CMStringW &defaultFile) +{ + if (acc == nullptr) + return; + + const char *packnam = acc; + if (mir_strcmp(packnam, "JABBER") == 0) + packnam = "JGMail"; + else if (strstr(packnam, "SIP") != nullptr) + packnam = "MSN"; + + char path[MAX_PATH]; + mir_snprintf(path, "Smileys\\nova\\%s.msl", packnam); + + CMStringW paths = _A2T(path), patha; + pathToAbsolute(paths, patha); + + if (_waccess(patha.c_str(), 0) != 0) + paths = defaultFile; + CMStringW dName(acc), displayName; + displayName.AppendFormat(TranslateT("%s global smiley pack"), dName.GetBuffer()); + CMStringW tname("AllProto"); + tname += _A2T(acc); + AddCategory(tname, displayName, smcPhysProto, paths); +} + +void SmileyCategoryListType::DeleteAccountAsCategory(PROTOACCOUNT *acc) +{ + CMStringW tname(_A2T(acc->szModuleName)); + + for (auto &hContact : Contacts()) { + char *proto = GetContactProto(hContact); + if (proto == nullptr) + continue; + + DBVARIANT dbv; + if (!db_get_ws(hContact, proto, "Transport", &dbv)) { + bool found = (tname.CompareNoCase(dbv.ptszVal) == 0); + db_free(&dbv); + if (found) + return; + } + } + + for (auto &it : m_SmileyCategories) { + if (tname.CompareNoCase(it->GetName()) == 0) { + m_SmileyCategories.removeItem(&it); + break; + } + } +} + +void SmileyCategoryListType::AddContactTransportAsCategory(MCONTACT hContact, const CMStringW &defaultFile) +{ + char *proto = GetContactProto(hContact); + if (proto == nullptr) + return; + + DBVARIANT dbv; + if (!db_get_ws(hContact, proto, "Transport", &dbv)) { + if (dbv.ptszVal[0] == '\0') { + db_free(&dbv); + return; + } + char *trsp = mir_strdup(_T2A(dbv.ptszVal)); + _strlwr(trsp); + + const char *packname = nullptr; + if (strstr(trsp, "msn") != nullptr) + packname = "msn"; + else if (strstr(trsp, "icq") != nullptr) + packname = "icq"; + else if (strstr(trsp, "yahoo") != nullptr) + packname = "yahoo"; + else if (strstr(trsp, "aim") != nullptr) + packname = "aim"; + else if (strstr(trsp, "lcs") != nullptr) + packname = "msn"; + + mir_free(trsp); + + CMStringW displayName = dbv.ptszVal; + if (packname != nullptr) { + char path[MAX_PATH]; + mir_snprintf(path, "Smileys\\nova\\%s.msl", packname); + + CMStringW paths = _A2T(path), patha; + pathToAbsolute(paths, patha); + + if (_waccess(patha.c_str(), 0) != 0) + paths = defaultFile; + + AddCategory(displayName, displayName, smcTransportProto, paths); + } + else AddCategory(displayName, displayName, smcTransportProto, defaultFile); + + db_free(&dbv); + } +} + +void SmileyCategoryListType::AddAllProtocolsAsCategory(void) +{ + CMStringW displayName = TranslateT("Standard"); + CMStringW tname = L"Standard"; + AddCategory(tname, displayName, smcStd); + + const CMStringW &defaultFile = GetSmileyCategory(tname)->GetFilename(); + + PROTOCOLDESCRIPTOR **proto; + int protoCount = 0; + Proto_EnumProtocols(&protoCount, &proto); + + for (int i = 0; i < protoCount; i++) { + PROTOCOLDESCRIPTOR *pd = proto[i]; + if (pd->type == PROTOTYPE_PROTOWITHACCS) + AddProtoAsCategory(pd->szName, defaultFile); + } + + for (auto &pa : Accounts()) + AddAccountAsCategory(pa, defaultFile); + + for (auto &hContact : Contacts()) + AddContactTransportAsCategory(hContact, defaultFile); + + CMStringW cats; + opt.ReadCustomCategories(cats); + + int cppv = 0; + for (;;) { + int cp = cats.Find('#', cppv); + if (cp == -1) + break; + + displayName = cats.Mid(cppv, cp - cppv); + AddCategory(displayName, displayName, smcCustom, defaultFile); + cppv = cp + 1; + } + + if (cppv != cats.GetLength()) { + displayName = cats.Mid(cppv); + AddCategory(displayName, displayName, smcCustom, defaultFile); + } +} + +static const CMStringW testString(L"Test String"); + +SmileyLookup::SmileyLookup(const CMStringW &str, const bool regexs, const int ind, const CMStringW &smpt) +{ + m_ind = ind; + if (regexs) { + m_pattern.compile(str); + m_valid = m_pattern.isValid(); + if (!m_valid) { + wchar_t msgtxt[1024]; + mir_snwprintf(msgtxt, TranslateT("Regular expression \"%s\" in smiley pack \"%s\" malformed."), str.c_str(), smpt.c_str()); + Netlib_LogW(hNetlibUser, msgtxt); + } + } + else { + m_text = str; + replaceCodes(m_text); + m_valid = !str.IsEmpty(); + } +} + +SmileyLookup::~SmileyLookup() +{ +} + +void SmileyLookup::Find(const CMStringW &str, SmileyLocVecType &smlcur, bool firstOnly) +{ + if (!m_valid) return; + + if (m_text.IsEmpty()) { + while (m_pattern.nextMatch(str) >= 0) { + CMStringW wszMatch(m_pattern.getMatch()); + smlcur.insert(new SmileyLocType(m_pattern.getPos(), wszMatch.GetLength())); + if (firstOnly && m_ind != -1) + return; + } + } + else { + const wchar_t *pos = str.c_str(); + while ((pos = wcsstr(pos, m_text.c_str())) != nullptr) { + smlcur.insert(new SmileyLocType(pos - str.c_str(), m_text.GetLength())); + pos += m_text.GetLength(); + if (firstOnly && m_ind != -1) + return; + } + } +} -- cgit v1.2.3