//---------------------------------------------------------------------------
TCHAR* GetFileNameW(TCHAR* pszPath) {
TCHAR* slash=_tcsrchr(pszPath,_T('\\'));
if(!slash) slash=_tcsrchr(pszPath,_T('/'));
if(slash)
return mir_t2u(slash+1);
else
return mir_t2u(pszPath);
}
INT_PTR __cdecl CJabberProto::GetMyAwayMsg(WPARAM wParam, LPARAM lParam)
{
TCHAR *szStatus = NULL;
mir_cslock lck(m_csModeMsgMutex);
switch (wParam ? (int)wParam : m_iStatus) {
case ID_STATUS_ONLINE:
szStatus = m_modeMsgs.szOnline;
break;
case ID_STATUS_AWAY:
case ID_STATUS_ONTHEPHONE:
case ID_STATUS_OUTTOLUNCH:
szStatus = m_modeMsgs.szAway;
break;
case ID_STATUS_NA:
szStatus = m_modeMsgs.szNa;
break;
case ID_STATUS_DND:
case ID_STATUS_OCCUPIED:
szStatus = m_modeMsgs.szDnd;
break;
case ID_STATUS_FREECHAT:
szStatus = m_modeMsgs.szFreechat;
break;
default: // Should not reach here
break;
}
if (szStatus)
return (lParam & SGMA_UNICODE) ? (INT_PTR)mir_t2u(szStatus) : (INT_PTR)mir_t2a(szStatus);
return 0;
}
TCHAR* GetFileExtW(const TCHAR* pszPath)
{
const TCHAR* slash = _tcsrchr(pszPath, _T('.'));
if (slash)
return mir_t2u(slash);
return NULL;
}
INT_PTR FacebookProto::GetMyAwayMsg(WPARAM, LPARAM lParam)
{
ptrT statusMsg(getTStringA("StatusMsg"));
if (statusMsg == NULL || statusMsg[0] == '\0')
return 0;
return (lParam & SGMA_UNICODE) ? (INT_PTR)mir_t2u(statusMsg) : (INT_PTR)mir_t2a(statusMsg);
}
INT_PTR GGPROTO::getmyawaymsg(WPARAM wParam, LPARAM lParam)
{
INT_PTR res = 0;
gg_EnterCriticalSection(&modemsg_mutex, "refreshstatus", 72, "modemsg_mutex", 1);
TCHAR *szMsg = getstatusmsg(wParam ? gg_normalizestatus(wParam) : m_iStatus);
if (isonline() && szMsg)
res = (lParam & SGMA_UNICODE) ? (INT_PTR)mir_t2u(szMsg) : (INT_PTR)mir_t2a(szMsg);
gg_LeaveCriticalSection(&modemsg_mutex, "refreshstatus", 72, 1, "modemsg_mutex", 1);
return res;
}
int FacebookProto::GetMyAwayMsg( WPARAM wParam, LPARAM lParam )
{
DBVARIANT dbv = { DBVT_TCHAR };
if ( !getTString( "StatusMsg", &dbv ) && lstrlen( dbv.ptszVal ) != 0 )
{
int res = (lParam & SGMA_UNICODE) ? (INT_PTR)mir_t2u(dbv.ptszVal) : (INT_PTR)mir_t2a(dbv.ptszVal);
DBFreeVariant( &dbv );
return res;
} else {
return 0;
}
}
void SaveGIF(HBITMAP hBmp, TCHAR* szFilename) {
Gdiplus::GdiplusStartupInput gdiplusStartupInput;
ULONG_PTR gdiplusToken;
Gdiplus::GdiplusStartup(&gdiplusToken, &gdiplusStartupInput, NULL);
Gdiplus::Bitmap *pBitmap = Gdiplus::Bitmap::FromHBITMAP(hBmp, (HPALETTE)GetStockObject(DEFAULT_PALETTE) );
if( pBitmap ) {
// Get the CLSID of the GIF encoder.
CLSID clsidEncoder;
if( GetEncoderClsid(L"image/gif", clsidEncoder)) {
LPWSTR pswFile = mir_t2u(szFilename);
pBitmap->Save((const WCHAR*)pswFile, &clsidEncoder, NULL);
mir_free(pswFile);
}
delete pBitmap;
}
Gdiplus::GdiplusShutdown(gdiplusToken);
}
void SaveTIF(HBITMAP hBmp, TCHAR* szFilename)
{
//http://www.codeproject.com/Messages/1406708/How-to-reduce-the-size-of-an-Image-using-GDIplus.aspx
ULONG_PTR gdiplusToken;
Gdiplus::GdiplusStartupInput gdiplusStartupInput;
Gdiplus::Status stat;
Gdiplus::GdiplusStartup(&gdiplusToken, &gdiplusStartupInput, NULL);
Gdiplus::Bitmap *pBitmap = Gdiplus::Bitmap::FromHBITMAP(hBmp, (HPALETTE)GetStockObject(DEFAULT_PALETTE));
if (pBitmap) {
// Get the CLSID of the GIF encoder.
CLSID EncCLSID;
if (GetEncoderClsid(L"image/tiff", EncCLSID)) {
//--- Create a 2-parameter array, for Compression and for Color Bit depth
Gdiplus::EncoderParameters* EncParams = (Gdiplus::EncoderParameters*) malloc(sizeof(Gdiplus::EncoderParameters) + 1 * sizeof(Gdiplus::EncoderParameter));
// Gdiplus::EncoderParameters pEncoderParameters;
//--- Use LZW Compression instead of Group 4, since it works for color and G4 doesn't
ULONG ulCompression = Gdiplus::EncoderValueCompressionLZW;
ULONG ulColorDepth = 24L;
EncParams->Count = 2;
EncParams->Parameter[0].Guid = Gdiplus::EncoderCompression;
EncParams->Parameter[0].Type = Gdiplus::EncoderParameterValueTypeLong;
EncParams->Parameter[0].NumberOfValues = 1;
EncParams->Parameter[0].Value = &ulCompression;
EncParams->Parameter[1].Guid = Gdiplus::EncoderColorDepth;
EncParams->Parameter[1].Type = Gdiplus::EncoderParameterValueTypeLong;
EncParams->Parameter[1].NumberOfValues = 1;
EncParams->Parameter[1].Value = &ulColorDepth;
LPWSTR pswFile = mir_t2u(szFilename);
stat = pBitmap->Save((const WCHAR*)pswFile, &EncCLSID, EncParams);
mir_free(pswFile);
free(EncParams);
}
delete pBitmap;
}
Gdiplus::GdiplusShutdown(gdiplusToken);
}
static LRESULT CALLBACK OptionsFilterSubclassProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
if (message != WM_PAINT && message != WM_PRINT)
return mir_callNextSubclass(hWnd, OptionsFilterSubclassProc, message, wParam, lParam);
if (GetFocus() == hWnd || GetWindowTextLength(hWnd))
return mir_callNextSubclass(hWnd, OptionsFilterSubclassProc, message, wParam, lParam);
RECT rc;
GetClientRect(hWnd, &rc);
HDC hdc;
PAINTSTRUCT paint;
if (message == WM_PAINT)
hdc = BeginPaint(hWnd, &paint);
else
hdc = (HDC)wParam;
TCHAR buf[255];
if (bSearchState == 1 && FilterLoadProgress < 100 && FilterLoadProgress > 0)
mir_sntprintf(buf, SIZEOF(buf), TranslateT("Loading... %d%%"), FilterLoadProgress);
else
mir_sntprintf(buf, SIZEOF(buf), TranslateT("Search"));
BOOL bDrawnByTheme = FALSE;
int oldMode = SetBkMode(hdc, TRANSPARENT);
HTHEME hTheme = OpenThemeData(hWnd, L"EDIT");
if (hTheme) {
if (IsThemeBackgroundPartiallyTransparent(hTheme, EP_EDITTEXT, ETS_NORMAL))
DrawThemeParentBackground(hWnd, hdc, &rc);
RECT rc2;
GetThemeBackgroundContentRect(hTheme, hdc, EP_EDITTEXT, ETS_NORMAL, &rc, &rc2);
rc2.top = 2 * rc.top - rc2.top;
rc2.left = 2 * rc.left - rc2.left;
rc2.bottom = 2 * rc.bottom - rc2.bottom;
rc2.right = 2 * rc.right - rc2.right;
DrawThemeBackground(hTheme, hdc, EP_EDITTEXT, ETS_NORMAL, &rc2, &rc);
HFONT hFont = (HFONT)SendMessage(hWnd, WM_GETFONT, 0, 0);
HFONT oldFont = (HFONT)SelectObject(hdc, hFont);
wchar_t *bufW = mir_t2u(buf);
DrawThemeText(hTheme, hdc, EP_EDITTEXT, ETS_DISABLED, bufW, -1, 0, 0, &rc);
mir_free(bufW);
SelectObject(hdc, oldFont);
CloseThemeData(hTheme);
bDrawnByTheme = TRUE;
}
SetBkMode(hdc, oldMode);
if (!bDrawnByTheme) {
HFONT hFont = (HFONT)SendMessage(hWnd, WM_GETFONT, 0, 0);
HFONT oldFont = (HFONT)SelectObject(hdc, hFont);
SetTextColor(hdc, GetSysColor(COLOR_GRAYTEXT));
FillRect(hdc, &rc, GetSysColorBrush(COLOR_WINDOW));
int oldMode = SetBkMode(hdc, TRANSPARENT);
DrawText(hdc, buf, -1, &rc, 0);
SetBkMode(hdc, oldMode);
SelectObject(hdc, oldFont);
}
if (message == WM_PAINT)
EndPaint(hWnd, &paint);
return 0;
}
static bool IsIcfEnabled(void)
{
HRESULT hr;
VARIANT_BOOL fwEnabled = VARIANT_FALSE;
INetFwProfile* fwProfile = NULL;
INetFwMgr* fwMgr = NULL;
INetFwPolicy* fwPolicy = NULL;
INetFwAuthorizedApplication* fwApp = NULL;
INetFwAuthorizedApplications* fwApps = NULL;
BSTR fwBstrProcessImageFileName = NULL;
wchar_t *wszFileName = NULL;
hr = CoInitialize(NULL);
if (FAILED(hr)) return false;
// Create an instance of the firewall settings manager.
hr = CoCreateInstance(CLSID_NetFwMgr, NULL, CLSCTX_INPROC_SERVER,
IID_INetFwMgr, (void**)&fwMgr );
if (FAILED(hr)) goto error;
// Retrieve the local firewall policy.
hr = fwMgr->get_LocalPolicy(&fwPolicy);
if (FAILED(hr)) goto error;
// Retrieve the firewall profile currently in effect.
hr = fwPolicy->get_CurrentProfile(&fwProfile);
if (FAILED(hr)) goto error;
// Get the current state of the firewall.
hr = fwProfile->get_FirewallEnabled(&fwEnabled);
if (FAILED(hr)) goto error;
if (fwEnabled == VARIANT_FALSE) goto error;
// Retrieve the authorized application collection.
hr = fwProfile->get_AuthorizedApplications(&fwApps);
if (FAILED(hr)) goto error;
TCHAR szFileName[MAX_PATH];
GetModuleFileName(NULL, szFileName, SIZEOF(szFileName));
wszFileName = mir_t2u(szFileName);
// Allocate a BSTR for the process image file name.
fwBstrProcessImageFileName = SysAllocString(wszFileName);
if (FAILED(hr)) goto error;
// Attempt to retrieve the authorized application.
hr = fwApps->Item(fwBstrProcessImageFileName, &fwApp);
if (SUCCEEDED(hr))
{
// Find out if the authorized application is enabled.
fwApp->get_Enabled(&fwEnabled);
fwEnabled = ~fwEnabled;
}
error:
// Free the BSTR.
SysFreeString(fwBstrProcessImageFileName);
mir_free(wszFileName);
// Release the authorized application instance.
if (fwApp != NULL) fwApp->Release();
// Release the authorized application collection.
if (fwApps != NULL) fwApps->Release();
// Release the firewall profile.
if (fwProfile != NULL) fwProfile->Release();
// Release the local firewall policy.
if (fwPolicy != NULL) fwPolicy->Release();
// Release the firewall settings manager.
if (fwMgr != NULL) fwMgr->Release();
CoUninitialize();
return fwEnabled != VARIANT_FALSE;
}
static LRESULT CALLBACK MButtonWndProc(HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam)
{
MButtonCtrl* bct = (MButtonCtrl *)GetWindowLongPtr(hwndDlg, 0);
switch(msg) {
case WM_NCCREATE:
SetWindowLongPtr(hwndDlg, GWL_STYLE, GetWindowLongPtr(hwndDlg, GWL_STYLE) | BS_OWNERDRAW);
bct = ( MButtonCtrl* )mir_calloc(sizeof(MButtonCtrl));
if (bct==NULL) return FALSE;
bct->hwnd = hwndDlg;
bct->stateId = PBS_NORMAL;
bct->hFont = ( HFONT )GetStockObject(DEFAULT_GUI_FONT);
LoadTheme(bct);
if (SUCCEEDED(CoCreateInstance(CLSID_AccPropServices, NULL, CLSCTX_SERVER,
IID_IAccPropServices, (void**)&bct->pAccPropServices)))
{
// Annotating the Role of this object to be PushButton
SetHwndPropInt(bct, OBJID_CLIENT, CHILDID_SELF, PROPID_ACC_ROLE, ROLE_SYSTEM_PUSHBUTTON);
}
else
bct->pAccPropServices = NULL;
SetWindowLongPtr(hwndDlg, 0, (LONG_PTR)bct);
if (((CREATESTRUCT *)lParam)->lpszName) SetWindowText(hwndDlg, ((CREATESTRUCT *)lParam)->lpszName);
return TRUE;
case WM_DESTROY:
if (bct) {
if (bct->pAccPropServices) {
bct->pAccPropServices->Release();
bct->pAccPropServices = NULL;
}
if (bct->hwndToolTips) {
TOOLINFO ti = {0};
ti.cbSize = sizeof(ti);
ti.uFlags = TTF_IDISHWND;
ti.hwnd = bct->hwnd;
ti.uId = (UINT_PTR)bct->hwnd;
if (SendMessage(bct->hwndToolTips, TTM_GETTOOLINFO, 0, (LPARAM)&ti)) {
SendMessage(bct->hwndToolTips, TTM_DELTOOL, 0, (LPARAM)&ti);
}
if ( SendMessage(bct->hwndToolTips, TTM_GETTOOLCOUNT, 0, (LPARAM)&ti) == 0 ) {
int idx;
TTooltips tt;
tt.ThreadId = GetCurrentThreadId();
EnterCriticalSection(&csTips);
if ( List_GetIndex( &lToolTips, &tt, &idx ) ) {
mir_free( lToolTips.items[idx] );
List_Remove( &lToolTips, idx );
DestroyWindow( bct->hwndToolTips );
}
LeaveCriticalSection(&csTips);
bct->hwndToolTips = NULL;
}
}
if (bct->arrow) IconLib_ReleaseIcon(bct->arrow, 0);
DestroyTheme(bct);
}
break; // DONT! fall thru
case WM_NCDESTROY:
mir_free(bct);
break;
case WM_SETTEXT:
bct->cHot = 0;
if ( lParam != 0 ) {
TCHAR *tmp = ( TCHAR* )lParam;
while (*tmp) {
if (*tmp=='&' && *(tmp+1)) {
bct->cHot = _tolower(*(tmp+1));
break;
}
tmp++;
}
InvalidateRect(bct->hwnd, NULL, TRUE);
}
break;
case WM_KEYUP:
if (bct->stateId!=PBS_DISABLED && wParam == VK_SPACE) {
if (bct->pushBtn) {
if (bct->pbState) {
bct->pbState = 0;
bct->stateId = PBS_NORMAL;
}
else {
bct->pbState = 1;
bct->stateId = PBS_PRESSED;
}
InvalidateRect(bct->hwnd, NULL, TRUE);
}
SendMessage(GetParent(hwndDlg), WM_COMMAND, MAKELONG(GetDlgCtrlID(hwndDlg), BN_CLICKED), (LPARAM)hwndDlg);
return 0;
}
break;
case WM_SYSKEYUP:
if (bct->stateId!=PBS_DISABLED && bct->cHot && bct->cHot == tolower((int)wParam)) {
if (bct->pushBtn) {
if (bct->pbState) {
bct->pbState = 0;
bct->stateId = PBS_NORMAL;
}
else {
bct->pbState = 1;
bct->stateId = PBS_PRESSED;
}
InvalidateRect(bct->hwnd, NULL, TRUE);
}
SendMessage(GetParent(hwndDlg), WM_COMMAND, MAKELONG(GetDlgCtrlID(hwndDlg), BN_CLICKED), (LPARAM)hwndDlg);
return 0;
}
break;
case WM_THEMECHANGED:
// themed changed, reload theme object
LoadTheme(bct);
InvalidateRect(bct->hwnd, NULL, TRUE); // repaint it
break;
case WM_SETFONT: // remember the font so we can use it later
bct->hFont = (HFONT)wParam; // maybe we should redraw?
break;
case WM_NCPAINT:
case WM_PAINT:
{
PAINTSTRUCT ps;
HDC hdcPaint;
hdcPaint = BeginPaint(hwndDlg, &ps);
if (hdcPaint) {
PaintWorker(bct, hdcPaint);
EndPaint(hwndDlg, &ps);
}
break;
}
case BM_SETIMAGE:
{
HGDIOBJ hnd = NULL;
if (bct->hIcon) hnd = bct->hIcon;
else if (bct->hBitmap) hnd = bct->hBitmap;
if (wParam == IMAGE_ICON) {
bct->hIcon = (HICON)lParam;
bct->hBitmap = NULL;
InvalidateRect(bct->hwnd, NULL, TRUE);
}
else if (wParam == IMAGE_BITMAP) {
bct->hBitmap = (HBITMAP)lParam;
bct->hIcon = NULL;
InvalidateRect(bct->hwnd, NULL, TRUE);
}
return (LRESULT)hnd;
}
case BM_GETIMAGE:
if (bct->hIcon) return (LRESULT)bct->hIcon;
else if (bct->hBitmap) return (LRESULT)bct->hBitmap;
else return 0;
case BM_SETCHECK:
if (!bct->pushBtn) break;
if (wParam == BST_CHECKED) {
bct->pbState = 1;
bct->stateId = PBS_PRESSED;
}
else if (wParam == BST_UNCHECKED) {
bct->pbState = 0;
bct->stateId = PBS_NORMAL;
}
InvalidateRect(bct->hwnd, NULL, TRUE);
break;
case BM_GETCHECK:
if (bct->pushBtn) {
return bct->pbState?BST_CHECKED:BST_UNCHECKED;
}
return 0;
case BUTTONSETARROW: // turn arrow on/off
if (wParam) {
if (!bct->arrow) {
bct->arrow = LoadSkinIcon(SKINICON_OTHER_DOWNARROW);
SetHwndPropInt(bct, OBJID_CLIENT, CHILDID_SELF, PROPID_ACC_ROLE, ROLE_SYSTEM_BUTTONDROPDOWN);
}
}
else {
if (bct->arrow) {
IconLib_ReleaseIcon(bct->arrow, 0);
bct->arrow = NULL;
SetHwndPropInt(bct, OBJID_CLIENT, CHILDID_SELF, PROPID_ACC_ROLE, ROLE_SYSTEM_PUSHBUTTON);
}
}
InvalidateRect(bct->hwnd, NULL, TRUE);
break;
case BUTTONSETDEFAULT:
bct->defbutton = wParam?1:0;
InvalidateRect(bct->hwnd, NULL, TRUE);
break;
case BUTTONSETASPUSHBTN:
bct->pushBtn = 1;
InvalidateRect(bct->hwnd, NULL, TRUE);
break;
case BUTTONSETASFLATBTN:
bct->flatBtn = 1;
InvalidateRect(bct->hwnd, NULL, TRUE);
break;
case BUTTONADDTOOLTIP:
if ( wParam ) {
TOOLINFO ti = {0};
if ( !bct->hwndToolTips ) {
int idx;
TTooltips tt;
tt.ThreadId = GetCurrentThreadId();
EnterCriticalSection(&csTips);
if ( List_GetIndex( &lToolTips, &tt, &idx )) {
bct->hwndToolTips = ((TTooltips*)lToolTips.items[idx])->hwnd;
} else {
TTooltips *ptt = ( TTooltips* )mir_alloc( sizeof(TTooltips) );
ptt->ThreadId = tt.ThreadId;
ptt->hwnd = CreateWindowEx(WS_EX_TOPMOST, TOOLTIPS_CLASS, _T(""), TTS_ALWAYSTIP, 0, 0, 0, 0, NULL, NULL, hMirandaInst, NULL);
List_Insert( &lToolTips, ptt, idx );
bct->hwndToolTips = ptt->hwnd;
}
LeaveCriticalSection(&csTips);
}
ti.cbSize = sizeof(ti);
ti.uFlags = TTF_IDISHWND;
ti.hwnd = bct->hwnd;
ti.uId = (UINT_PTR)bct->hwnd;
if (SendMessage(bct->hwndToolTips, TTM_GETTOOLINFO, 0, (LPARAM)&ti))
SendMessage(bct->hwndToolTips, TTM_DELTOOL, 0, (LPARAM)&ti);
ti.uFlags = TTF_IDISHWND|TTF_SUBCLASS;
ti.uId = (UINT_PTR)bct->hwnd;
#if defined( _UNICODE )
if ( lParam & BATF_UNICODE )
ti.lpszText = mir_wstrdup( TranslateW(( WCHAR* )wParam ));
else
ti.lpszText = LangPackPcharToTchar(( char* )wParam );
#else
ti.lpszText = Translate(( char* )wParam );
#endif
if (bct->pAccPropServices) {
wchar_t *tmpstr = mir_t2u(ti.lpszText);
bct->pAccPropServices->SetHwndPropStr(bct->hwnd, OBJID_CLIENT,
CHILDID_SELF, PROPID_ACC_DESCRIPTION, tmpstr);
mir_free(tmpstr);
}
SendMessage( bct->hwndToolTips, TTM_ADDTOOL, 0, (LPARAM)&ti);
#if defined( _UNICODE )
mir_free( ti.lpszText );
#endif
}
break;
case WM_SETFOCUS: // set keybord focus and redraw
bct->focus = 1;
InvalidateRect(bct->hwnd, NULL, TRUE);
break;
case WM_KILLFOCUS: // kill focus and redraw
bct->focus = 0;
InvalidateRect(bct->hwnd, NULL, TRUE);
break;
case WM_WINDOWPOSCHANGED:
InvalidateRect(bct->hwnd, NULL, TRUE);
break;
case WM_ENABLE: // windows tells us to enable/disable
bct->stateId = wParam?PBS_NORMAL:PBS_DISABLED;
InvalidateRect(bct->hwnd, NULL, TRUE);
break;
case WM_MOUSELEAVE: // faked by the WM_TIMER
if (bct->stateId!=PBS_DISABLED) { // don't change states if disabled
bct->stateId = PBS_NORMAL;
InvalidateRect(bct->hwnd, NULL, TRUE);
}
break;
case WM_LBUTTONDOWN:
if (bct->stateId!=PBS_DISABLED) { // don't change states if disabled
bct->stateId = PBS_PRESSED;
InvalidateRect(bct->hwnd, NULL, TRUE);
}
break;
case WM_LBUTTONUP:
{
int showClick = 0;
if (bct->pushBtn) {
if (bct->pbState) bct->pbState = 0;
else bct->pbState = 1;
}
if (bct->stateId!=PBS_DISABLED) { // don't change states if disabled
if (bct->stateId==PBS_PRESSED)
showClick = 1;
if (msg==WM_LBUTTONUP) bct->stateId = PBS_HOT;
else bct->stateId = PBS_NORMAL;
InvalidateRect(bct->hwnd, NULL, TRUE);
}
if (showClick) // Tell your daddy you got clicked.
SendMessage(GetParent(hwndDlg), WM_COMMAND, MAKELONG(GetDlgCtrlID(hwndDlg), BN_CLICKED), (LPARAM)hwndDlg);
break;
}
case WM_MOUSEMOVE:
if (bct->stateId == PBS_NORMAL) {
bct->stateId = PBS_HOT;
InvalidateRect(bct->hwnd, NULL, TRUE);
}
// Call timer, used to start cheesy TrackMouseEvent faker
SetTimer(hwndDlg,BUTTON_POLLID,BUTTON_POLLDELAY,NULL);
break;
case WM_TIMER: // use a timer to check if they have did a mouseout
if (wParam == BUTTON_POLLID) {
RECT rc;
POINT pt;
GetWindowRect(hwndDlg,&rc);
GetCursorPos(&pt);
if(!PtInRect(&rc,pt)) { // mouse must be gone, trigger mouse leave
PostMessage(hwndDlg,WM_MOUSELEAVE,0,0L);
KillTimer(hwndDlg,BUTTON_POLLID);
} }
break;
case WM_ERASEBKGND:
return 1;
}
return DefWindowProc(hwndDlg, msg, wParam, lParam);
}
/**
* This is the service procedure to retrieve contact information
*
* @param wParam - not used
* @param lParam - pointer to a CONTACTINFO structure which tells what information is desired
*
* @retval 0 - if contact information was found and read correctly
* @retval 1 - if any error occured or setting was not found
**/
INT_PTR GetContactInfo(WPARAM wParam, LPARAM lParam)
{
CONTACTINFO *ci = (CONTACTINFO*) lParam;
INT_PTR result;
if (ci && ci->cbSize == sizeof(CONTACTINFO) && (ci->szProto != NULL || (ci->szProto = DB::Contact::Proto(ci->hContact)) != NULL))
{
switch (ci->dwFlag & 0x7F) {
//
// contact name
//
case CNF_FIRSTNAME: {
result = GCIVarEx(ci, SET_CONTACT_FIRSTNAME);
} break;
case CNF_LASTNAME: {
result = GCIVarEx(ci, SET_CONTACT_LASTNAME);
} break;
case CNF_FIRSTLAST: {
result = GCIVarEx(ci, SET_CONTACT_FIRSTLASTNAME); //first try to read "FullName"
if(result) result = GCIFirstLast(ci); //fallback to "FirstName" + "LastName"
} break;
case CNF_NICK: {
result = GCIVarEx(ci, SET_CONTACT_NICK);
} break;
case CNF_CUSTOMNICK: {
LPSTR s = ci->szProto;
ci->szProto = MOD_CLIST;
result = GCIVar(ci, SET_CONTACT_MYHANDLE);
ci->szProto = s;
} break;
case CNF_LANGUAGE1: {
result = GCILangEx(ci, SET_CONTACT_LANG1);
} break;
case CNF_LANGUAGE2: {
result = GCILangEx(ci, SET_CONTACT_LANG2);
} break;
case CNF_LANGUAGE3: {
result = GCILangEx(ci, SET_CONTACT_LANG3);
} break;
//
// private contact
//
case CNF_STREET: {
result = GCIVarEx(ci, SET_CONTACT_STREET);
} break;
case CNF_ZIP: {
result = GCIVarEx(ci, SET_CONTACT_ZIP);
} break;
case CNF_CITY: {
result = GCIVarEx(ci, SET_CONTACT_CITY);
} break;
case CNF_STATE: {
result = GCIVarEx(ci, SET_CONTACT_STATE);
} break;
case CNF_COUNTRY: {
result = GCICountry(ci, SET_CONTACT_COUNTRY);
} break;
case CNF_PHONE: {
result = GCIVarEx(ci, SET_CONTACT_PHONE);
} break;
case CNF_FAX: {
result = GCIVarEx(ci, SET_CONTACT_FAX);
} break;
case CNF_CELLULAR: {
result = GCIVarEx(ci, SET_CONTACT_CELLULAR);
} break;
case CNF_EMAIL: {
result = GCIVarEx(ci, SET_CONTACT_EMAIL);
} break;
case CNF_HOMEPAGE: {
result = GCIVarEx(ci, SET_CONTACT_HOMEPAGE);
} break;
//
// company information
//
case CNF_CONAME: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY);
} break;
case CNF_CODEPT: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY_DEPARTMENT);
} break;
case CNF_COPOSITION: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY_POSITION);
} break;
case CNF_COSTREET: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY_STREET);
} break;
case CNF_COZIP: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY_ZIP);
} break;
case CNF_COCITY: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY_CITY);
} break;
case CNF_COSTATE: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY_STATE);
} break;
case CNF_COCOUNTRY: {
result = GCICountry(ci, SET_CONTACT_COMPANY_COUNTRY);
} break;
case CNF_COPHONE: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY_PHONE);
} break;
case CNF_COFAX: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY_FAX);
} break;
case CNF_COCELLULAR: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY_CELLULAR);
} break;
case CNF_COEMAIL: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY_EMAIL);
} break;
case CNF_COHOMEPAGE: {
result = GCIVarEx(ci, SET_CONTACT_COMPANY_HOMEPAGE);
} break;
//
// personal information
//
case CNF_ABOUT: {
result = GCIVarEx(ci, SET_CONTACT_ABOUT);
} break;
case CNF_MYNOTES: {
result = GCIVarEx(ci, SET_CONTACT_MYNOTES);
} break;
case CNF_AGE: {
result = GCIVarEx(ci, SET_CONTACT_AGE);
} break; // returns age (byte, 0==unspecified) ??
case CNF_GENDER: {
ci->bVal = GenderOf(ci->hContact, ci->szProto);
ci->type = (ci->bVal != 0) ? CNFT_BYTE : 0;
result = ci->type == 0;
} break;
case CNF_BIRTHDAY: {
MAnnivDate mda;
result = mda.DBGetBirthDate(ci->hContact, ci->szProto);
if (result == 0) {
ci->bVal = (BYTE) mda.Day();
ci->type = CNFT_BYTE;
}
} break;
case CNF_BIRTHMONTH: {
MAnnivDate mda;
result = mda.DBGetBirthDate(ci->hContact, ci->szProto);
if (result == 0) {
ci->bVal = (BYTE) mda.Month();
ci->type = CNFT_BYTE;
}
} break;
case CNF_BIRTHYEAR: {
MAnnivDate mda;
result = mda.DBGetBirthDate(ci->hContact, ci->szProto);
if (result == 0) {
ci->wVal = (WORD) mda.Year();
ci->type = CNFT_WORD;
}
} break;
case CNF_BIRTHDATE: {
MAnnivDate mda;
result = mda.DBGetBirthDate(ci->hContact, ci->szProto);
if (result == 0) {
SYSTEMTIME st = mda.SystemTime();
ci->pszVal = NULL;
if (ci->dwFlag & CNF_UNICODE) {
WCHAR wszDate[80];
if (GetDateFormatW(LOCALE_USER_DEFAULT, wParam == 1 ? DATE_LONGDATE : DATE_SHORTDATE, &st, NULL, wszDate, SIZEOF(wszDate))) {
ci->pszVal = (LPTSTR)mir_wcsdup(wszDate);
}
}
else {
CHAR szDate[80];
if (GetDateFormatA(LOCALE_USER_DEFAULT, wParam == 1 ? DATE_LONGDATE : DATE_SHORTDATE, &st, NULL, szDate, SIZEOF(szDate))) {
ci->pszVal = (LPTSTR)mir_strdup(szDate);
}
}
ci->type = (ci->pszVal != NULL) ? CNFT_ASCIIZ : 0;
result = ci->type == 0;
}
} break;
case CNF_TIMEZONE: {
//use new core tz interface
if(tmi.prepareList) {
HANDLE hTz = tmi.createByContact(ci->hContact, TZF_KNOWNONLY);
if (hTz) {
LPTIME_ZONE_INFORMATION tzi = tmi.getTzi(hTz);
int offset = tzi->Bias + tzi->StandardBias;
char str[80];
mir_snprintf(str, SIZEOF(str), offset ? "UTC%+d:%02d" : "UTC", offset / -60, abs(offset % 60));
ci->pszVal = ci->dwFlag & CNF_UNICODE
? (TCHAR*)mir_a2u(str)
: (TCHAR*)mir_strdup(str);
ci->type = CNFT_ASCIIZ;
return 0;
}
else {
ci->pszVal = NULL;
}
}
//fallback use old UIEX method
else {
CTimeZone* ptz = GetContactTimeZone(ci->hContact, ci->szProto);
if (ptz) {
if (ci->dwFlag & CNF_UNICODE) {
ci->pszVal = (LPTSTR) mir_t2u(ptz->ptszDisplay);
}
else {
ci->pszVal = (LPTSTR) mir_t2a(ptz->ptszDisplay);
}
}
else {
/* If a timezone does not exist in CTzMgr, it is a invalid timezone,
because Windows and CTzMgr know all existing timezones and it
would not be shown anywhere anyway as UserInfoEx displays only
known windows timezones in the details dialog!
*/
ci->pszVal = NULL;
}
}
ci->type = (ci->pszVal != NULL) ? CNFT_ASCIIZ : 0;
result = ci->type == 0;
} break;
//
// information about IM specific stuff
//
case CNF_UNIQUEID: {
// protocol must define a PFLAG_UNIQUEIDSETTING
result = CallProtoService(ci->szProto, PS_GETCAPS, PFLAG_UNIQUEIDSETTING, 0);
if (result != CALLSERVICE_NOTFOUND && result != NULL) {
result = GCIVar(ci, (LPCSTR) result);
}
} break;
case CNF_DISPLAYUID: {
if (!GCIVar(ci, "display_uid"))
result=0;
else {
result = CallProtoService(ci->szProto,PS_GETCAPS,PFLAG_UNIQUEIDSETTING,0);
if (result != CALLSERVICE_NOTFOUND && result != NULL) {
result = GCIVar(ci, (LPCSTR) result);
}
}
} break;
case CNF_DISPLAYNC:
case CNF_DISPLAY: {
INT i;
for (i = 0; i < NAMEORDERCOUNT; i++) {
switch (gNameOrder[i]) {
case 0: // custom name
{
// make sure we aren't in CNF_DISPLAYNC mode
// don't get custom name for NULL contact
if (ci->hContact != NULL && (ci->dwFlag & 0x7F) == CNF_DISPLAY) {
BYTE dwFlag = ci->dwFlag;
ci->dwFlag = (ci->dwFlag & CNF_UNICODE) | CNF_CUSTOMNICK;
if (!GetContactInfo(NULL, (LPARAM)ci)) {
ci->dwFlag = dwFlag;
return 0;
}
ci->dwFlag = dwFlag;
}
} break;
case 1: // nick
{
if (!GCIVarEx(ci, SET_CONTACT_NICK))
return 0;
} break;
case 2: // First Name
{
if (!GCIVarEx(ci, SET_CONTACT_FIRSTNAME))
return 0;
} break;
case 3: // E-mail
{
if (!GCIVarEx(ci, SET_CONTACT_EMAIL))
return 0;
} break;
case 4: // Last Name
{
if (!GCIVarEx(ci, SET_CONTACT_LASTNAME))
return 0;
} break;
case 5: // Unique id
{
// protocol must define a PFLAG_UNIQUEIDSETTING
result = CallProtoService(ci->szProto, PS_GETCAPS, PFLAG_UNIQUEIDSETTING, 0);
if (result != CALLSERVICE_NOTFOUND && result != NULL) {
if (!GCIStr(ci, (LPCSTR) result))
return 0;
}
} break;
case 6: // first + last name
{
if (!GCIFirstLast(ci))
return 0;
} break;
default: // unknown contact
{
if (ci->dwFlag & CNF_UNICODE) {
ci->pszVal = (LPTSTR) mir_wcsdup(TranslateW(L"'(Unknown Contact)'"));
}
else {
ci->pszVal = (LPTSTR) mir_strdup(Translate("'(Unknown Contact)'"));
}
ci->type = (ci->pszVal != NULL) ? CNFT_ASCIIZ : 0;
return ci->type == 0;
}
}
}
}
default: {
result = 1;
}
}
}
else
{
result = 1;
}
return result;
}
static LRESULT MHeaderbar_OnPaint(HWND hwndDlg, MHeaderbarCtrl *mit, UINT msg, WPARAM wParam, LPARAM lParam)
{
int iTopSpace = IsAeroMode() ? 0 : 3;
PAINTSTRUCT ps;
HBITMAP hBmp, hOldBmp;
int titleLength = GetWindowTextLength(hwndDlg) + 1;
TCHAR *szTitle = (TCHAR *)mir_alloc(sizeof(TCHAR) * titleLength);
GetWindowText(hwndDlg, szTitle, titleLength);
TCHAR *szSubTitle = _tcschr(szTitle, _T('\n'));
if (szSubTitle) *szSubTitle++=0;
HDC hdc = BeginPaint(hwndDlg, &ps);
HDC tempDC = CreateCompatibleDC(hdc);
BITMAPINFO bmi;
bmi.bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
bmi.bmiHeader.biWidth = mit->width;
bmi.bmiHeader.biHeight = -mit->height; // we need this for DrawThemeTextEx
bmi.bmiHeader.biPlanes = 1;
bmi.bmiHeader.biBitCount = 32;
bmi.bmiHeader.biCompression = BI_RGB;
hBmp = CreateDIBSection(tempDC, &bmi, DIB_RGB_COLORS, NULL, NULL, 0);
hOldBmp = (HBITMAP)SelectObject(tempDC, hBmp);
if (IsAeroMode()) {
RECT temprc;
temprc.left = 0;
temprc.right = mit->width;
temprc.top = 0;
temprc.bottom = mit->width;
FillRect(tempDC, &temprc, (HBRUSH)GetStockObject(BLACK_BRUSH));
MARGINS margins = {0, 0, mit->height, 0};
dwmExtendFrameIntoClientArea(GetParent(hwndDlg), &margins);
WTA_OPTIONS opts;
opts.dwFlags = opts.dwMask = WTNCA_NODRAWCAPTION | WTNCA_NODRAWICON;
setWindowThemeAttribute(GetParent(hwndDlg), WTA_NONCLIENT, &opts, sizeof(opts));
}
else {
if (IsVSMode())
MHeaderbar_FillRect(tempDC, 0, 0, mit->width, mit->height, GetSysColor(COLOR_WINDOW));
else
MHeaderbar_DrawGradient(tempDC, 0, 0, mit->width, mit->height, &mit->rgbBkgTop, &mit->rgbBkgBottom);
MHeaderbar_FillRect(tempDC, 0, mit->height-2, mit->width, 1, GetSysColor(COLOR_BTNSHADOW));
MHeaderbar_FillRect(tempDC, 0, mit->height-1, mit->width, 1, GetSysColor(COLOR_BTNHIGHLIGHT));
}
HFONT hFont = mit->hFont;
SetBkMode(tempDC, TRANSPARENT);
SetTextColor(tempDC, mit->clText);
LOGFONT lf;
GetObject(hFont, sizeof(lf), &lf);
lf.lfWeight = FW_BOLD;
HFONT hFntBold = CreateFontIndirect(&lf), hOldFont;
if (mit->hIcon)
DrawIcon(tempDC, 10, iTopSpace, mit->hIcon);
else {
HICON hIcon = (HICON)SendMessage(GetParent(hwndDlg), WM_GETICON, ICON_BIG, 0);
if (hIcon == NULL)
hIcon = (HICON)SendMessage(GetParent(hwndDlg), WM_GETICON, ICON_SMALL, 0);
DrawIcon(tempDC, 10, iTopSpace, hIcon);
}
RECT textRect;
textRect.left = 50;
textRect.right = mit->width;
textRect.top = 2 + iTopSpace;
textRect.bottom = GetSystemMetrics(SM_CYICON)-2 + iTopSpace;
if (IsAeroMode()) {
DTTOPTS dto = {0};
dto.dwSize = sizeof(dto);
dto.dwFlags = DTT_COMPOSITED|DTT_GLOWSIZE;
dto.iGlowSize = 10;
HANDLE hTheme = OpenThemeData(hwndDlg, L"Window");
textRect.left = 50;
hOldFont = (HFONT)SelectObject(tempDC, hFntBold);
wchar_t *szTitleW = mir_t2u(szTitle);
drawThemeTextEx(hTheme, tempDC, WP_CAPTION, CS_ACTIVE, szTitleW, -1, DT_TOP|DT_LEFT|DT_SINGLELINE|DT_NOPREFIX|DT_NOCLIP|DT_END_ELLIPSIS, &textRect, &dto);
mir_free(szTitleW);
if (szSubTitle) {
textRect.left = 66;
SelectObject(tempDC, hFont);
wchar_t *szSubTitleW = mir_t2u(szSubTitle);
drawThemeTextEx(hTheme, tempDC, WP_CAPTION, CS_ACTIVE, szSubTitleW, -1, DT_BOTTOM|DT_LEFT|DT_SINGLELINE|DT_NOPREFIX|DT_NOCLIP|DT_END_ELLIPSIS, &textRect, &dto);
mir_free(szSubTitleW);
}
CloseThemeData(hTheme);
}
else {
textRect.left = 50;
hOldFont = (HFONT)SelectObject(tempDC, hFntBold);
DrawText(tempDC, szTitle, -1, &textRect, DT_TOP|DT_LEFT|DT_SINGLELINE|DT_NOPREFIX|DT_NOCLIP|DT_END_ELLIPSIS);
if (szSubTitle) {
textRect.left = 66;
SelectObject(tempDC, hFont);
DrawText(tempDC, szSubTitle, -1, &textRect, DT_BOTTOM|DT_LEFT|DT_SINGLELINE|DT_NOPREFIX|DT_NOCLIP|DT_END_ELLIPSIS);
}
}
DeleteObject(hFntBold);
mir_free(szTitle);
//Copy to output
if (mit->nControlsToRedraw)
{
RECT temprc;
temprc.left = 0;
temprc.right = mit->width;
temprc.top = 0;
temprc.bottom = mit->width;
HRGN hRgn = CreateRectRgnIndirect(&temprc);
for (int i=0; i < mit->nControlsToRedraw; i++)
{
GetWindowRect(mit->controlsToRedraw[i], &temprc);
MapWindowPoints(NULL, hwndDlg, (LPPOINT)&temprc, 2);
HRGN hRgnTmp = CreateRectRgnIndirect(&temprc);
CombineRgn(hRgn, hRgn, hRgnTmp, RGN_DIFF);
DeleteObject(hRgnTmp);
}
SelectClipRgn(hdc, hRgn);
DeleteObject(hRgn);
}
BitBlt(hdc, mit->rc.left, mit->rc.top, mit->width, mit->height, tempDC, 0, 0, SRCCOPY);
SelectClipRgn(hdc, NULL);
SelectObject(tempDC, hOldBmp);
DeleteObject(hBmp);
SelectObject(tempDC,hOldFont);
DeleteDC(tempDC);
EndPaint(hwndDlg, &ps);
return TRUE;
}
