/* Jabber Protocol Plugin for Miranda IM Copyright ( C ) 2002-04 Santithorn Bunchua Copyright ( C ) 2005-12 George Hazan 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 "jabber.h" #include #include #include #include "jabber_iq.h" #include "jabber_caps.h" ///////////////////////////////////////////////////////////////////////////////////////// int CJabberProto::SendGetVcard( const TCHAR* jid ) { if (!m_bJabberOnline) return 0; int iqId = SerialNext(); JABBER_IQ_PROCID procId = !lstrcmp( jid, m_szJabberJID ) ? IQ_PROC_GETVCARD : IQ_PROC_NONE; IqAdd( iqId, procId, &CJabberProto::OnIqResultGetVcard ); m_ThreadInfo->send( XmlNodeIq( _T("get"), iqId, jid ) << XCHILDNS( _T("vCard"), _T(JABBER_FEAT_VCARD_TEMP)) << XATTR( _T("prodid"), _T("-//HandGen//NONSGML vGen v1.0//EN")) << XATTR( _T("version"), _T("2.0"))); return iqId; } ///////////////////////////////////////////////////////////////////////////////////////// static void SetDialogField( CJabberProto* ppro, HWND hwndDlg, int nDlgItem, char* key, bool bTranslate = false ) { DBVARIANT dbv; if ( !DBGetContactSettingTString( NULL, ppro->m_szModuleName, key, &dbv )) { SetDlgItemText( hwndDlg, nDlgItem, ( bTranslate ) ? TranslateTS(dbv.ptszVal) : dbv.ptszVal ); JFreeVariant( &dbv ); } else SetDlgItemTextA( hwndDlg, nDlgItem, "" ); } static INT_PTR CALLBACK PersonalDlgProc( HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam ) { const unsigned long iPageId = 0; CJabberProto* ppro = ( CJabberProto* )GetWindowLongPtr( hwndDlg, GWLP_USERDATA ); switch ( msg ) { case WM_INITDIALOG: if ( lParam ) { ppro = ( CJabberProto* )lParam; TranslateDialogDefault( hwndDlg ); SendMessage( GetDlgItem( hwndDlg, IDC_GENDER ), CB_ADDSTRING, 0, ( LPARAM )TranslateT( "Male" )); SendMessage( GetDlgItem( hwndDlg, IDC_GENDER ), CB_ADDSTRING, 0, ( LPARAM )TranslateT( "Female" )); SetWindowLongPtr( hwndDlg, GWLP_USERDATA, lParam ); SendMessage( hwndDlg, WM_JABBER_REFRESH_VCARD, 0, 0 ); ppro->WindowSubscribe(hwndDlg); } break; case WM_JABBER_REFRESH_VCARD: SetDialogField( ppro, hwndDlg, IDC_FULLNAME, "FullName" ); SetDialogField( ppro, hwndDlg, IDC_NICKNAME, "Nick" ); SetDialogField( ppro, hwndDlg, IDC_FIRSTNAME, "FirstName" ); SetDialogField( ppro, hwndDlg, IDC_MIDDLE, "MiddleName" ); SetDialogField( ppro, hwndDlg, IDC_LASTNAME, "LastName" ); SetDialogField( ppro, hwndDlg, IDC_BIRTH, "BirthDate" ); SetDialogField( ppro, hwndDlg, IDC_GENDER, "GenderString", true ); SetDialogField( ppro, hwndDlg, IDC_OCCUPATION, "Role" ); SetDialogField( ppro, hwndDlg, IDC_HOMEPAGE, "Homepage" ); break; case WM_COMMAND: if (( ( HWND )lParam==GetFocus() && HIWORD( wParam )==EN_CHANGE ) || (( HWND )lParam==GetDlgItem( hwndDlg, IDC_GENDER ) && ( HIWORD( wParam )==CBN_EDITCHANGE||HIWORD( wParam )==CBN_SELCHANGE ))) { ppro->m_vCardUpdates |= (1UL<idFrom == 0) { switch (((LPNMHDR)lParam)->code) { case PSN_PARAMCHANGED: SendMessage(hwndDlg, WM_INITDIALOG, 0, ((PSHNOTIFY*)lParam)->lParam); break; case PSN_APPLY: ppro->m_vCardUpdates &= ~(1UL<SaveVcardToDB( hwndDlg, iPageId ); if (!ppro->m_vCardUpdates) ppro->SetServerVcard( ppro->m_bPhotoChanged, ppro->m_szPhotoFileName ); break; } } break; case WM_DESTROY: ppro->WindowUnsubscribe(hwndDlg); break; } return FALSE; } static INT_PTR CALLBACK HomeDlgProc( HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam ) { const unsigned long iPageId = 1; CJabberProto* ppro = ( CJabberProto* )GetWindowLongPtr( hwndDlg, GWLP_USERDATA ); switch ( msg ) { case WM_INITDIALOG: if ( lParam ) { ppro = ( CJabberProto* )lParam; TranslateDialogDefault( hwndDlg ); for (int i = 0; i < g_cbCountries; i++) { if ( g_countries[i].id != 0xFFFF && g_countries[i].id != 0) { TCHAR *country = mir_a2t(g_countries[i].szName); SendMessage( GetDlgItem( hwndDlg, IDC_COUNTRY ), CB_ADDSTRING, 0, ( LPARAM )TranslateTS(country)); mir_free(country); } } SetWindowLongPtr( hwndDlg, GWLP_USERDATA, lParam ); SendMessage( hwndDlg, WM_JABBER_REFRESH_VCARD, 0, 0 ); ppro->WindowSubscribe(hwndDlg); } break; case WM_JABBER_REFRESH_VCARD: SetDialogField( ppro, hwndDlg, IDC_ADDRESS1, "Street" ); SetDialogField( ppro, hwndDlg, IDC_ADDRESS2, "Street2" ); SetDialogField( ppro, hwndDlg, IDC_CITY, "City" ); SetDialogField( ppro, hwndDlg, IDC_STATE, "State" ); SetDialogField( ppro, hwndDlg, IDC_ZIP, "ZIP" ); SetDialogField( ppro, hwndDlg, IDC_COUNTRY, "Country", true ); break; case WM_COMMAND: if ((( HWND )lParam==GetFocus() && HIWORD( wParam )==EN_CHANGE) || (( HWND )lParam==GetDlgItem( hwndDlg, IDC_COUNTRY ) && ( HIWORD( wParam )==CBN_EDITCHANGE||HIWORD( wParam )==CBN_SELCHANGE ))) { ppro->m_vCardUpdates |= (1UL<idFrom == 0) { switch (((LPNMHDR)lParam)->code) { case PSN_PARAMCHANGED: SendMessage(hwndDlg, WM_INITDIALOG, 0, ((PSHNOTIFY*)lParam)->lParam); break; case PSN_APPLY: ppro->m_vCardUpdates &= ~(1UL<SaveVcardToDB( hwndDlg, iPageId ); if (!ppro->m_vCardUpdates) ppro->SetServerVcard( ppro->m_bPhotoChanged, ppro->m_szPhotoFileName ); break; } } break; case WM_DESTROY: ppro->WindowUnsubscribe(hwndDlg); break; } return FALSE; } static INT_PTR CALLBACK WorkDlgProc( HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam ) { const unsigned long iPageId = 2; CJabberProto* ppro = ( CJabberProto* )GetWindowLongPtr( hwndDlg, GWLP_USERDATA ); switch ( msg ) { case WM_INITDIALOG: if ( lParam ) { // proto info is available ppro = ( CJabberProto* )lParam; TranslateDialogDefault( hwndDlg ); for (int i = 0; i < g_cbCountries; i++) { if ( g_countries[i].id != 0xFFFF && g_countries[i].id != 0 ) { TCHAR *country = mir_a2t( g_countries[i].szName ); SendMessage( GetDlgItem( hwndDlg, IDC_COUNTRY ), CB_ADDSTRING, 0, ( LPARAM )TranslateTS(country)); mir_free(country); } } SetWindowLongPtr( hwndDlg, GWLP_USERDATA, lParam ); SendMessage( hwndDlg, WM_JABBER_REFRESH_VCARD, 0, 0 ); ppro->WindowSubscribe(hwndDlg); } break; case WM_JABBER_REFRESH_VCARD: SetDialogField( ppro, hwndDlg, IDC_COMPANY, "Company" ); SetDialogField( ppro, hwndDlg, IDC_DEPARTMENT, "CompanyDepartment" ); SetDialogField( ppro, hwndDlg, IDC_TITLE, "CompanyPosition" ); SetDialogField( ppro, hwndDlg, IDC_ADDRESS1, "CompanyStreet" ); SetDialogField( ppro, hwndDlg, IDC_ADDRESS2, "CompanyStreet2" ); SetDialogField( ppro, hwndDlg, IDC_CITY, "CompanyCity" ); SetDialogField( ppro, hwndDlg, IDC_STATE, "CompanyState" ); SetDialogField( ppro, hwndDlg, IDC_ZIP, "CompanyZIP" ); SetDialogField( ppro, hwndDlg, IDC_COUNTRY, "CompanyCountry", true ); break; case WM_COMMAND: if ((( HWND )lParam==GetFocus() && HIWORD( wParam )==EN_CHANGE) || (( HWND )lParam==GetDlgItem( hwndDlg, IDC_COUNTRY ) && ( HIWORD( wParam )==CBN_EDITCHANGE||HIWORD( wParam )==CBN_SELCHANGE ))) { ppro->m_vCardUpdates |= (1UL<idFrom == 0) { switch (((LPNMHDR)lParam)->code) { case PSN_PARAMCHANGED: SendMessage(hwndDlg, WM_INITDIALOG, 0, ((PSHNOTIFY*)lParam)->lParam); break; case PSN_APPLY: ppro->m_vCardUpdates &= ~(1UL<SaveVcardToDB( hwndDlg, iPageId ); if (!ppro->m_vCardUpdates) ppro->SetServerVcard( ppro->m_bPhotoChanged, ppro->m_szPhotoFileName ); break; } } break; case WM_DESTROY: ppro->WindowUnsubscribe(hwndDlg); break; } return FALSE; } ///////////////////////////////////////////////////////////////////////////////////////// struct PhotoDlgProcData { CJabberProto* ppro; // char szPhotoFileName[MAX_PATH]; // BOOL bPhotoChanged; HBITMAP hBitmap; }; static INT_PTR CALLBACK PhotoDlgProc( HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam ) { const unsigned long iPageId = 3; TCHAR szAvatarFileName[ MAX_PATH ], szTempPath[MAX_PATH], szTempFileName[MAX_PATH]; PhotoDlgProcData* dat = ( PhotoDlgProcData* )GetWindowLongPtr( hwndDlg, GWLP_USERDATA ); switch ( msg ) { case WM_INITDIALOG: if (!lParam) break; // Launched from userinfo TranslateDialogDefault( hwndDlg ); SendDlgItemMessage( hwndDlg, IDC_LOAD, BM_SETIMAGE, IMAGE_ICON, ( LPARAM )LoadImage( hInst, MAKEINTRESOURCE( IDI_OPEN ), IMAGE_ICON, GetSystemMetrics( SM_CXSMICON ), GetSystemMetrics( SM_CYSMICON ), 0 )); SendDlgItemMessage( hwndDlg, IDC_LOAD, BUTTONSETASFLATBTN, TRUE, 0); SendDlgItemMessage( hwndDlg, IDC_DELETE, BM_SETIMAGE, IMAGE_ICON, ( LPARAM )LoadImage( hInst, MAKEINTRESOURCE( IDI_DELETE ), IMAGE_ICON, GetSystemMetrics( SM_CXSMICON ), GetSystemMetrics( SM_CYSMICON ), 0 )); SendDlgItemMessage( hwndDlg, IDC_DELETE, BUTTONSETASFLATBTN, TRUE, 0); ShowWindow( GetDlgItem( hwndDlg, IDC_SAVE ), SW_HIDE ); { dat = new PhotoDlgProcData; dat->ppro = ( CJabberProto* )lParam; dat->hBitmap = NULL; dat->ppro->m_bPhotoChanged = FALSE; SetWindowLongPtr( hwndDlg, GWLP_USERDATA, ( LONG_PTR )dat ); dat->ppro->WindowSubscribe(hwndDlg); } SendMessage( hwndDlg, WM_JABBER_REFRESH_VCARD, 0, 0 ); break; case WM_JABBER_REFRESH_VCARD: if ( dat->hBitmap ) { DeleteObject( dat->hBitmap ); dat->hBitmap = NULL; DeleteFile( dat->ppro->m_szPhotoFileName ); dat->ppro->m_szPhotoFileName[0] = '\0'; } EnableWindow( GetDlgItem( hwndDlg, IDC_DELETE ), FALSE ); dat->ppro->GetAvatarFileName( NULL, szAvatarFileName, SIZEOF( szAvatarFileName )); if ( _taccess( szAvatarFileName, 0 ) == 0 ) { if ( GetTempPath( SIZEOF( szTempPath ), szTempPath ) <= 0 ) _tcscpy( szTempPath, _T(".\\")); if ( GetTempFileName( szTempPath, _T("jab"), 0, szTempFileName ) > 0 ) { dat->ppro->Log( "Temp file = " TCHAR_STR_PARAM, szTempFileName ); if ( CopyFile( szAvatarFileName, szTempFileName, FALSE ) == TRUE ) { char* p = mir_t2a( szTempFileName ); if (( dat->hBitmap=( HBITMAP ) JCallService( MS_UTILS_LOADBITMAP, 0, ( LPARAM )p )) != NULL ) { JabberBitmapPremultiplyChannels( dat->hBitmap ); _tcscpy( dat->ppro->m_szPhotoFileName, szTempFileName ); EnableWindow( GetDlgItem( hwndDlg, IDC_DELETE ), TRUE ); } else DeleteFile( szTempFileName ); mir_free(p); } else DeleteFile( szTempFileName ); } } dat->ppro->m_bPhotoChanged = FALSE; InvalidateRect( hwndDlg, NULL, TRUE ); UpdateWindow( hwndDlg ); break; case WM_JABBER_CHANGED: dat->ppro->SetServerVcard( dat->ppro->m_bPhotoChanged, dat->ppro->m_szPhotoFileName ); break; case WM_COMMAND: switch ( LOWORD( wParam )) { case IDC_LOAD: { TCHAR szFilter[512]; TCHAR szFileName[MAX_PATH]; JCallService( MS_UTILS_GETBITMAPFILTERSTRINGST, SIZEOF( szFilter ), ( LPARAM )szFilter ); OPENFILENAME ofn = {0}; ofn.lStructSize = sizeof(ofn); ofn.hwndOwner = hwndDlg; ofn.lpstrFilter = szFilter; ofn.lpstrCustomFilter = NULL; ofn.lpstrFile = szFileName; ofn.nMaxFile = MAX_PATH; ofn.Flags = OFN_FILEMUSTEXIST | OFN_DONTADDTORECENT; szFileName[0] = '\0'; if ( GetOpenFileName( &ofn )) { struct _stat st; HBITMAP hNewBitmap; dat->ppro->Log( "File selected is " TCHAR_STR_PARAM, szFileName ); if ( _tstat( szFileName, &st )<0 || st.st_size>40*1024 ) { MessageBox( hwndDlg, TranslateT( "Only JPG, GIF, and BMP image files smaller than 40 KB are supported." ), TranslateT( "Jabber vCard" ), MB_OK|MB_SETFOREGROUND ); break; } if ( GetTempPath( SIZEOF( szTempPath ), szTempPath ) <= 0 ) _tcscpy( szTempPath, _T(".\\")); if ( GetTempFileName( szTempPath, _T("jab"), 0, szTempFileName ) > 0 ) { dat->ppro->Log( "Temp file = " TCHAR_STR_PARAM, szTempFileName ); if ( CopyFile( szFileName, szTempFileName, FALSE ) == TRUE ) { char* pszTemp = mir_t2a( szTempFileName ); if (( hNewBitmap=( HBITMAP ) JCallService( MS_UTILS_LOADBITMAP, 0, ( LPARAM )pszTemp )) != NULL ) { if ( dat->hBitmap ) { DeleteObject( dat->hBitmap ); DeleteFile( dat->ppro->m_szPhotoFileName ); } dat->hBitmap = hNewBitmap; _tcscpy( dat->ppro->m_szPhotoFileName, szTempFileName ); dat->ppro->m_bPhotoChanged = TRUE; EnableWindow( GetDlgItem( hwndDlg, IDC_DELETE ), TRUE ); InvalidateRect( hwndDlg, NULL, TRUE ); UpdateWindow( hwndDlg ); dat->ppro->m_vCardUpdates |= (1UL<hBitmap ) { DeleteObject( dat->hBitmap ); dat->hBitmap = NULL; DeleteFile( dat->ppro->m_szPhotoFileName ); dat->ppro->m_szPhotoFileName[0] = '\0'; dat->ppro->m_bPhotoChanged = TRUE; EnableWindow( GetDlgItem( hwndDlg, IDC_DELETE ), FALSE ); InvalidateRect( hwndDlg, NULL, TRUE ); UpdateWindow( hwndDlg ); dat->ppro->m_vCardUpdates |= (1UL<hBitmap ) { BITMAP bm; HDC hdcMem; HWND hwndCanvas; HDC hdcCanvas; POINT ptSize, ptOrg, pt, ptFitSize; RECT rect; hwndCanvas = GetDlgItem( hwndDlg, IDC_CANVAS ); hdcCanvas = GetDC( hwndCanvas ); hdcMem = CreateCompatibleDC( hdcCanvas ); SelectObject( hdcMem, dat->hBitmap ); SetMapMode( hdcMem, GetMapMode( hdcCanvas )); GetObject( dat->hBitmap, sizeof( BITMAP ), ( LPVOID ) &bm ); ptSize.x = bm.bmWidth; ptSize.y = bm.bmHeight; DPtoLP( hdcCanvas, &ptSize, 1 ); ptOrg.x = ptOrg.y = 0; DPtoLP( hdcMem, &ptOrg, 1 ); GetClientRect( hwndCanvas, &rect ); InvalidateRect( hwndCanvas, NULL, TRUE ); UpdateWindow( hwndCanvas ); if ( ptSize.x<=rect.right && ptSize.y<=rect.bottom ) { pt.x = ( rect.right - ptSize.x )/2; pt.y = ( rect.bottom - ptSize.y )/2; ptFitSize = ptSize; } else { if (( ( float )( ptSize.x-rect.right ))/ptSize.x > (( float )( ptSize.y-rect.bottom ))/ptSize.y ) { ptFitSize.x = rect.right; ptFitSize.y = ( ptSize.y*rect.right )/ptSize.x; pt.x = 0; pt.y = ( rect.bottom - ptFitSize.y )/2; } else { ptFitSize.x = ( ptSize.x*rect.bottom )/ptSize.y; ptFitSize.y = rect.bottom; pt.x = ( rect.right - ptFitSize.x )/2; pt.y = 0; } } RECT rc; GetClientRect(hwndCanvas, &rc); if (JabberIsThemeActive && JabberDrawThemeParentBackground && JabberIsThemeActive()) JabberDrawThemeParentBackground(hwndCanvas, hdcCanvas, &rc); else FillRect(hdcCanvas, &rc, (HBRUSH)GetSysColorBrush(COLOR_BTNFACE)); if (JabberAlphaBlend && (bm.bmBitsPixel == 32)) { BLENDFUNCTION bf = {0}; bf.AlphaFormat = AC_SRC_ALPHA; bf.BlendOp = AC_SRC_OVER; bf.SourceConstantAlpha = 255; JabberAlphaBlend( hdcCanvas, pt.x, pt.y, ptFitSize.x, ptFitSize.y, hdcMem, ptOrg.x, ptOrg.y, ptSize.x, ptSize.y, bf ); } else { SetStretchBltMode( hdcCanvas, COLORONCOLOR ); StretchBlt( hdcCanvas, pt.x, pt.y, ptFitSize.x, ptFitSize.y, hdcMem, ptOrg.x, ptOrg.y, ptSize.x, ptSize.y, SRCCOPY ); } DeleteDC( hdcMem ); } break; case WM_NOTIFY: if (((LPNMHDR)lParam)->idFrom == 0) { switch (((LPNMHDR)lParam)->code) { case PSN_PARAMCHANGED: SendMessage(hwndDlg, WM_INITDIALOG, 0, ((PSHNOTIFY*)lParam)->lParam); break; case PSN_APPLY: dat->ppro->m_vCardUpdates &= ~(1UL<ppro->SaveVcardToDB( hwndDlg, iPageId ); if (!dat->ppro->m_vCardUpdates) dat->ppro->SetServerVcard( dat->ppro->m_bPhotoChanged, dat->ppro->m_szPhotoFileName ); break; } } break; case WM_DESTROY: DestroyIcon(( HICON )SendDlgItemMessage( hwndDlg, IDC_LOAD, BM_SETIMAGE, IMAGE_ICON, 0 )); DestroyIcon(( HICON )SendDlgItemMessage( hwndDlg, IDC_DELETE, BM_SETIMAGE, IMAGE_ICON, 0 )); dat->ppro->WindowUnsubscribe(hwndDlg); if ( dat->hBitmap ) { dat->ppro->Log( "Delete bitmap" ); DeleteObject( dat->hBitmap ); DeleteFile( dat->ppro->m_szPhotoFileName ); } delete dat; break; } return FALSE; } ///////////////////////////////////////////////////////////////////////////////////////// static INT_PTR CALLBACK NoteDlgProc( HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam ) { const unsigned long iPageId = 4; CJabberProto* ppro = ( CJabberProto* )GetWindowLongPtr( hwndDlg, GWLP_USERDATA ); switch ( msg ) { case WM_INITDIALOG: if (!lParam) break; // Launched from userinfo ppro = ( CJabberProto* )lParam; TranslateDialogDefault( hwndDlg ); SetWindowLongPtr( hwndDlg, GWLP_USERDATA, lParam ); SendMessage( hwndDlg, WM_JABBER_REFRESH_VCARD, 0, 0 ); ppro->WindowSubscribe(hwndDlg); break; case WM_JABBER_REFRESH_VCARD: { SetDialogField( ppro, hwndDlg, IDC_DESC, "About" ); break; } case WM_COMMAND: if (( HWND )lParam==GetFocus() && HIWORD( wParam )==EN_CHANGE ) { ppro->m_vCardUpdates |= (1UL<idFrom == 0) { switch (((LPNMHDR)lParam)->code) { case PSN_PARAMCHANGED: SendMessage(hwndDlg, WM_INITDIALOG, 0, ((PSHNOTIFY*)lParam)->lParam); break; case PSN_APPLY: ppro->m_vCardUpdates &= ~(1UL<SaveVcardToDB( hwndDlg, iPageId ); if (!ppro->m_vCardUpdates) ppro->SetServerVcard( ppro->m_bPhotoChanged, ppro->m_szPhotoFileName ); break; } } break; case WM_DESTROY: ppro->WindowUnsubscribe(hwndDlg); break; } return FALSE; } ///////////////////////////////////////////////////////////////////////////////////////// struct EditDlgParam { int id; CJabberProto* ppro; }; static INT_PTR CALLBACK EditEmailDlgProc( HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam ) { EditDlgParam* dat = ( EditDlgParam* )GetWindowLongPtr( hwndDlg, GWLP_USERDATA ); switch ( msg ) { case WM_INITDIALOG: { EditDlgParam* dat = ( EditDlgParam* )lParam; SetWindowLongPtr( hwndDlg, GWLP_USERDATA, lParam ); TranslateDialogDefault( hwndDlg ); if ( lParam >= 0 ) { DBVARIANT dbv; char idstr[33]; WORD nFlag; SetWindowText( hwndDlg, TranslateT( "Jabber vCard: Edit Email Address" )); wsprintfA( idstr, "e-mail%d", dat->id ); if ( !DBGetContactSettingString( NULL, dat->ppro->m_szModuleName, idstr, &dbv )) { SetDlgItemTextA( hwndDlg, IDC_EMAIL, dbv.pszVal ); JFreeVariant( &dbv ); wsprintfA( idstr, "e-mailFlag%d", lParam ); nFlag = DBGetContactSettingWord( NULL, dat->ppro->m_szModuleName, idstr, 0 ); if ( nFlag & JABBER_VCEMAIL_HOME ) CheckDlgButton( hwndDlg, IDC_HOME, TRUE ); if ( nFlag & JABBER_VCEMAIL_WORK ) CheckDlgButton( hwndDlg, IDC_WORK, TRUE ); if ( nFlag & JABBER_VCEMAIL_INTERNET ) CheckDlgButton( hwndDlg, IDC_INTERNET, TRUE ); if ( nFlag & JABBER_VCEMAIL_X400 ) CheckDlgButton( hwndDlg, IDC_X400, TRUE ); } } } break; case WM_COMMAND: switch ( LOWORD( wParam )) { case IDOK: { TCHAR text[128]; char idstr[33]; DBVARIANT dbv; WORD nFlag; if ( dat->id < 0 ) { for ( dat->id=0;;dat->id++ ) { mir_snprintf( idstr, SIZEOF(idstr), "e-mail%d", dat->id ); if ( DBGetContactSettingString( NULL, dat->ppro->m_szModuleName, idstr, &dbv )) break; JFreeVariant( &dbv ); } } GetDlgItemText( hwndDlg, IDC_EMAIL, text, SIZEOF( text )); mir_snprintf( idstr, SIZEOF(idstr), "e-mail%d", dat->id ); dat->ppro->JSetStringT( NULL, idstr, text ); nFlag = 0; if ( IsDlgButtonChecked( hwndDlg, IDC_HOME )) nFlag |= JABBER_VCEMAIL_HOME; if ( IsDlgButtonChecked( hwndDlg, IDC_WORK )) nFlag |= JABBER_VCEMAIL_WORK; if ( IsDlgButtonChecked( hwndDlg, IDC_INTERNET )) nFlag |= JABBER_VCEMAIL_INTERNET; if ( IsDlgButtonChecked( hwndDlg, IDC_X400 )) nFlag |= JABBER_VCEMAIL_X400; mir_snprintf( idstr, SIZEOF(idstr), "e-mailFlag%d", dat->id ); dat->ppro->JSetWord( NULL, idstr, nFlag ); } // fall through case IDCANCEL: EndDialog( hwndDlg, wParam ); break; } } return FALSE; } static INT_PTR CALLBACK EditPhoneDlgProc( HWND hwndDlg, UINT msg, WPARAM wParam, LPARAM lParam ) { EditDlgParam* dat = ( EditDlgParam* )GetWindowLongPtr( hwndDlg, GWLP_USERDATA ); switch ( msg ) { case WM_INITDIALOG: { EditDlgParam* dat = ( EditDlgParam* )lParam; SetWindowLongPtr( hwndDlg, GWLP_USERDATA, lParam ); TranslateDialogDefault( hwndDlg ); if ( dat->id >= 0 ) { DBVARIANT dbv; char idstr[33]; WORD nFlag; SetWindowText( hwndDlg, TranslateT( "Jabber vCard: Edit Phone Number" )); wsprintfA( idstr, "Phone%d", dat->id ); if ( !DBGetContactSettingString( NULL, dat->ppro->m_szModuleName, idstr, &dbv )) { SetDlgItemTextA( hwndDlg, IDC_PHONE, dbv.pszVal ); JFreeVariant( &dbv ); wsprintfA( idstr, "PhoneFlag%d", dat->id ); nFlag = dat->ppro->JGetWord( NULL, idstr, 0 ); if ( nFlag & JABBER_VCTEL_HOME ) CheckDlgButton( hwndDlg, IDC_HOME, TRUE ); if ( nFlag & JABBER_VCTEL_WORK ) CheckDlgButton( hwndDlg, IDC_WORK, TRUE ); if ( nFlag & JABBER_VCTEL_VOICE ) CheckDlgButton( hwndDlg, IDC_VOICE, TRUE ); if ( nFlag & JABBER_VCTEL_FAX ) CheckDlgButton( hwndDlg, IDC_FAX, TRUE ); if ( nFlag & JABBER_VCTEL_PAGER ) CheckDlgButton( hwndDlg, IDC_PAGER, TRUE ); if ( nFlag & JABBER_VCTEL_MSG ) CheckDlgButton( hwndDlg, IDC_MSG, TRUE ); if ( nFlag & JABBER_VCTEL_CELL ) CheckDlgButton( hwndDlg, IDC_CELL, TRUE ); if ( nFlag & JABBER_VCTEL_VIDEO ) CheckDlgButton( hwndDlg, IDC_VIDEO, TRUE ); if ( nFlag & JABBER_VCTEL_BBS ) CheckDlgButton( hwndDlg, IDC_BBS, TRUE ); if ( nFlag & JABBER_VCTEL_MODEM ) CheckDlgButton( hwndDlg, IDC_MODEM, TRUE ); if ( nFlag & JABBER_VCTEL_ISDN ) CheckDlgButton( hwndDlg, IDC_ISDN, TRUE ); if ( nFlag & JABBER_VCTEL_PCS ) CheckDlgButton( hwndDlg, IDC_PCS, TRUE ); } } } break; case WM_COMMAND: switch ( LOWORD( wParam )) { case IDOK: { char text[128]; char idstr[33]; DBVARIANT dbv; WORD nFlag; if ( dat->id < 0 ) { for ( dat->id=0;;dat->id++ ) { wsprintfA( idstr, "Phone%d", dat->id ); if ( DBGetContactSettingString( NULL, dat->ppro->m_szModuleName, idstr, &dbv )) break; JFreeVariant( &dbv ); } } GetDlgItemTextA( hwndDlg, IDC_PHONE, text, SIZEOF( text )); wsprintfA( idstr, "Phone%d", dat->id ); dat->ppro->JSetString( NULL, idstr, text ); nFlag = 0; if ( IsDlgButtonChecked( hwndDlg, IDC_HOME )) nFlag |= JABBER_VCTEL_HOME; if ( IsDlgButtonChecked( hwndDlg, IDC_WORK )) nFlag |= JABBER_VCTEL_WORK; if ( IsDlgButtonChecked( hwndDlg, IDC_VOICE )) nFlag |= JABBER_VCTEL_VOICE; if ( IsDlgButtonChecked( hwndDlg, IDC_FAX )) nFlag |= JABBER_VCTEL_FAX; if ( IsDlgButtonChecked( hwndDlg, IDC_PAGER )) nFlag |= JABBER_VCTEL_PAGER; if ( IsDlgButtonChecked( hwndDlg, IDC_MSG )) nFlag |= JABBER_VCTEL_MSG; if ( IsDlgButtonChecked( hwndDlg, IDC_CELL )) nFlag |= JABBER_VCTEL_CELL; if ( IsDlgButtonChecked( hwndDlg, IDC_VIDEO )) nFlag |= JABBER_VCTEL_VIDEO; if ( IsDlgButtonChecked( hwndDlg, IDC_BBS )) nFlag |= JABBER_VCTEL_BBS; if ( IsDlgButtonChecked( hwndDlg, IDC_MODEM )) nFlag |= JABBER_VCTEL_MODEM; if ( IsDlgButtonChecked( hwndDlg, IDC_ISDN )) nFlag |= JABBER_VCTEL_ISDN; if ( IsDlgButtonChecked( hwndDlg, IDC_PCS )) nFlag |= JABBER_VCTEL_PCS; wsprintfA( idstr, "PhoneFlag%d", dat->id ); dat->ppro->JSetWord( NULL, idstr, nFlag ); } // fall through case IDCANCEL: EndDialog( hwndDlg, wParam ); break; } } return FALSE; } #define M_REMAKELISTS ( WM_USER+1 ) static INT_PTR CALLBACK ContactDlgProc( HWND hwndDlg, UINT msg, WPARAM, LPARAM lParam ) { const unsigned long iPageId = 5; CJabberProto* ppro = ( CJabberProto* )GetWindowLongPtr( hwndDlg, GWLP_USERDATA ); switch( msg ) { case WM_INITDIALOG: if (!lParam) break; // Launched from userinfo ppro = ( CJabberProto* )lParam; { LVCOLUMN lvc; RECT rc; SetWindowLongPtr( hwndDlg, GWLP_USERDATA, lParam ); TranslateDialogDefault( hwndDlg ); GetClientRect( GetDlgItem( hwndDlg,IDC_EMAILS ), &rc ); rc.right -= GetSystemMetrics( SM_CXVSCROLL ); lvc.mask = LVCF_WIDTH; lvc.cx = 30; ListView_InsertColumn( GetDlgItem( hwndDlg,IDC_EMAILS ), 0, &lvc ); ListView_InsertColumn( GetDlgItem( hwndDlg,IDC_PHONES ), 0, &lvc ); lvc.cx = rc.right - 30 - 40; ListView_InsertColumn( GetDlgItem( hwndDlg,IDC_EMAILS ), 1, &lvc ); ListView_InsertColumn( GetDlgItem( hwndDlg,IDC_PHONES ), 1, &lvc ); lvc.cx = 20; ListView_InsertColumn( GetDlgItem( hwndDlg,IDC_EMAILS ), 2, &lvc ); ListView_InsertColumn( GetDlgItem( hwndDlg,IDC_EMAILS ), 3, &lvc ); ListView_InsertColumn( GetDlgItem( hwndDlg,IDC_PHONES ), 2, &lvc ); ListView_InsertColumn( GetDlgItem( hwndDlg,IDC_PHONES ), 3, &lvc ); SendMessage( hwndDlg, M_REMAKELISTS, 0, 0 ); ppro->WindowSubscribe(hwndDlg); } break; case M_REMAKELISTS: { LVITEM lvi; int i; char idstr[33]; TCHAR number[20]; DBVARIANT dbv; //e-mails ListView_DeleteAllItems( GetDlgItem( hwndDlg, IDC_EMAILS )); lvi.mask = LVIF_TEXT | LVIF_PARAM; lvi.iSubItem = 0; lvi.iItem = 0; for ( i=0;;i++ ) { wsprintfA( idstr, "e-mail%d", i ); if ( DBGetContactSettingTString( NULL, ppro->m_szModuleName, idstr, &dbv )) break; wsprintf( number, _T("%d"), i+1 ); lvi.pszText = number; lvi.lParam = ( LPARAM )i; ListView_InsertItem( GetDlgItem( hwndDlg, IDC_EMAILS ), &lvi ); ListView_SetItemText( GetDlgItem( hwndDlg, IDC_EMAILS ), lvi.iItem, 1, dbv.ptszVal ); JFreeVariant( &dbv ); lvi.iItem++; } lvi.mask = LVIF_PARAM; lvi.lParam = ( LPARAM )( -1 ); ListView_InsertItem( GetDlgItem( hwndDlg, IDC_EMAILS ), &lvi ); //phones ListView_DeleteAllItems( GetDlgItem( hwndDlg, IDC_PHONES )); lvi.mask = LVIF_TEXT | LVIF_PARAM; lvi.iSubItem = 0; lvi.iItem = 0; for ( i=0;;i++ ) { wsprintfA( idstr, "Phone%d", i ); if ( DBGetContactSettingTString( NULL, ppro->m_szModuleName, idstr, &dbv )) break; wsprintf( number, _T("%d"), i+1 ); lvi.pszText = number; lvi.lParam = ( LPARAM )i; ListView_InsertItem( GetDlgItem( hwndDlg, IDC_PHONES ), &lvi ); ListView_SetItemText( GetDlgItem( hwndDlg, IDC_PHONES ), lvi.iItem, 1, dbv.ptszVal ); JFreeVariant( &dbv ); lvi.iItem++; } lvi.mask = LVIF_PARAM; lvi.lParam = ( LPARAM )( -1 ); ListView_InsertItem( GetDlgItem( hwndDlg, IDC_PHONES ), &lvi ); } break; case WM_NOTIFY: switch (( ( LPNMHDR )lParam )->idFrom ) { case 0: { switch (((LPNMHDR)lParam)->code) { case PSN_PARAMCHANGED: SendMessage(hwndDlg, WM_INITDIALOG, 0, ((PSHNOTIFY*)lParam)->lParam); break; case PSN_APPLY: ppro->m_vCardUpdates &= ~(1UL<SaveVcardToDB( hwndDlg, iPageId ); if (!ppro->m_vCardUpdates) ppro->SetServerVcard( ppro->m_bPhotoChanged, ppro->m_szPhotoFileName ); break; } } break; case IDC_EMAILS: case IDC_PHONES: switch (( ( LPNMHDR )lParam )->code ) { case NM_CUSTOMDRAW: { NMLVCUSTOMDRAW *nm = ( NMLVCUSTOMDRAW * ) lParam; switch ( nm->nmcd.dwDrawStage ) { case CDDS_PREPAINT: case CDDS_ITEMPREPAINT: SetWindowLongPtr( hwndDlg, DWLP_MSGRESULT, CDRF_NOTIFYSUBITEMDRAW ); return TRUE; case CDDS_SUBITEM|CDDS_ITEMPREPAINT: { RECT rc; HICON hIcon; ListView_GetSubItemRect( nm->nmcd.hdr.hwndFrom, nm->nmcd.dwItemSpec, nm->iSubItem, LVIR_LABEL, &rc ); if ( nm->nmcd.lItemlParam==( LPARAM )( -1 ) && nm->iSubItem==3 ) hIcon = ( HICON )LoadImage( hInst, MAKEINTRESOURCE( IDI_ADDCONTACT ), IMAGE_ICON, GetSystemMetrics( SM_CXSMICON ), GetSystemMetrics( SM_CYSMICON ), 0 ); else if ( nm->iSubItem==2 && nm->nmcd.lItemlParam!=( LPARAM )( -1 )) hIcon = ( HICON )LoadImage( hInst, MAKEINTRESOURCE( IDI_EDIT ), IMAGE_ICON, GetSystemMetrics( SM_CXSMICON ), GetSystemMetrics( SM_CYSMICON ), 0 ); else if ( nm->iSubItem==3 && nm->nmcd.lItemlParam!=( LPARAM )( -1 )) hIcon = ( HICON )LoadImage( hInst, MAKEINTRESOURCE( IDI_DELETE ), IMAGE_ICON, GetSystemMetrics( SM_CXSMICON ), GetSystemMetrics( SM_CYSMICON ), 0 ); else break; DrawIconEx( nm->nmcd.hdc, ( rc.left+rc.right-GetSystemMetrics( SM_CXSMICON ))/2, ( rc.top+rc.bottom-GetSystemMetrics( SM_CYSMICON ))/2,hIcon, GetSystemMetrics( SM_CXSMICON ), GetSystemMetrics( SM_CYSMICON ), 0, NULL, DI_NORMAL ); DestroyIcon( hIcon ); SetWindowLongPtr( hwndDlg, DWLP_MSGRESULT, CDRF_SKIPDEFAULT ); } return TRUE; } } break; case NM_CLICK: { NMLISTVIEW *nm = ( NMLISTVIEW * ) lParam; LVITEM lvi; const char* szIdTemplate = nm->hdr.idFrom==IDC_PHONES?"Phone%d":"e-mail%d"; const char* szFlagTemplate = nm->hdr.idFrom==IDC_PHONES?"PhoneFlag%d":"e-mailFlag%d"; LVHITTESTINFO hti; if ( nm->iSubItem < 2 ) break; hti.pt.x = ( short ) LOWORD( GetMessagePos()); hti.pt.y = ( short ) HIWORD( GetMessagePos()); ScreenToClient( nm->hdr.hwndFrom, &hti.pt ); if ( ListView_SubItemHitTest( nm->hdr.hwndFrom, &hti ) == -1 ) break; lvi.mask = LVIF_PARAM; lvi.iItem = hti.iItem; lvi.iSubItem = 0; ListView_GetItem( nm->hdr.hwndFrom, &lvi ); if ( lvi.lParam == ( LPARAM )( -1 )) { if ( hti.iSubItem == 3 ) { //add EditDlgParam param = { -1, ppro }; int res; if ( nm->hdr.idFrom == IDC_PHONES ) res = DialogBoxParam( hInst, MAKEINTRESOURCE( IDD_VCARD_ADDPHONE ), hwndDlg, EditPhoneDlgProc, ( LPARAM )¶m ); else res = DialogBoxParam( hInst, MAKEINTRESOURCE( IDD_VCARD_ADDEMAIL ), hwndDlg, EditEmailDlgProc, ( LPARAM )¶m ); if ( res != IDOK ) break; SendMessage( hwndDlg, M_REMAKELISTS, 0, 0 ); ppro->m_vCardUpdates |= (1UL<m_szModuleName, idstr, &dbv )) break; wsprintfA( idstr,szIdTemplate,i ); ppro->JSetString( NULL, idstr, dbv.pszVal ); wsprintfA( idstr, szFlagTemplate, i+1 ); JFreeVariant( &dbv ); nFlag = ppro->JGetWord( NULL, idstr, 0 ); wsprintfA( idstr, szFlagTemplate, i ); ppro->JSetWord( NULL, idstr, nFlag ); } wsprintfA( idstr, szIdTemplate, i ); ppro->JDeleteSetting( NULL, idstr ); wsprintfA( idstr, szFlagTemplate, i ); ppro->JDeleteSetting( NULL, idstr ); SendMessage( hwndDlg, M_REMAKELISTS, 0, 0 ); ppro->m_vCardUpdates |= (1UL<hdr.idFrom == IDC_PHONES ) res = DialogBoxParam( hInst, MAKEINTRESOURCE( IDD_VCARD_ADDPHONE ), hwndDlg, EditPhoneDlgProc, ( LPARAM )¶m ); else res = DialogBoxParam( hInst, MAKEINTRESOURCE( IDD_VCARD_ADDEMAIL ), hwndDlg, EditEmailDlgProc, ( LPARAM )¶m ); if ( res != IDOK ) break; SendMessage( hwndDlg,M_REMAKELISTS,0,0 ); ppro->m_vCardUpdates |= (1UL<WindowUnsubscribe(hwndDlg); break; } return FALSE; } void CJabberProto::SaveVcardToDB( HWND hwndPage, int iPage ) { TCHAR text[2048]; // Page 0: Personal switch (iPage) { case 0: GetDlgItemText( hwndPage, IDC_FULLNAME, text, SIZEOF( text )); JSetStringT( NULL, "FullName", text ); GetDlgItemText( hwndPage, IDC_NICKNAME, text, SIZEOF( text )); JSetStringT( NULL, "Nick", text ); GetDlgItemText( hwndPage, IDC_FIRSTNAME, text, SIZEOF( text )); JSetStringT( NULL, "FirstName", text ); GetDlgItemText( hwndPage, IDC_MIDDLE, text, SIZEOF( text )); JSetStringT( NULL, "MiddleName", text ); GetDlgItemText( hwndPage, IDC_LASTNAME, text, SIZEOF( text )); JSetStringT( NULL, "LastName", text ); GetDlgItemText( hwndPage, IDC_BIRTH, text, SIZEOF( text )); JSetStringT( NULL, "BirthDate", text ); switch( SendMessage( GetDlgItem( hwndPage, IDC_GENDER ), CB_GETCURSEL, 0, 0 )) { case 0: JSetString( NULL, "GenderString", "Male" ); break; case 1: JSetString( NULL, "GenderString", "Female" ); break; default: JSetString( NULL, "GenderString", "" ); break; } GetDlgItemText( hwndPage, IDC_OCCUPATION, text, SIZEOF( text )); JSetStringT( NULL, "Role", text ); GetDlgItemText( hwndPage, IDC_HOMEPAGE, text, SIZEOF( text )); JSetStringT( NULL, "Homepage", text ); break; // Page 1: Home case 1: GetDlgItemText( hwndPage, IDC_ADDRESS1, text, SIZEOF( text )); JSetStringT( NULL, "Street", text ); GetDlgItemText( hwndPage, IDC_ADDRESS2, text, SIZEOF( text )); JSetStringT( NULL, "Street2", text ); GetDlgItemText( hwndPage, IDC_CITY, text, SIZEOF( text )); JSetStringT( NULL, "City", text ); GetDlgItemText( hwndPage, IDC_STATE, text, SIZEOF( text )); JSetStringT( NULL, "State", text ); GetDlgItemText( hwndPage, IDC_ZIP, text, SIZEOF( text )); JSetStringT( NULL, "ZIP", text ); { int i = SendMessage( GetDlgItem( hwndPage, IDC_COUNTRY ), CB_GETCURSEL, 0, 0 ); TCHAR *country = mir_a2t((i) ? g_countries[i+2].szName : g_countries[1].szName); JSetStringT( NULL, "Country", country ); mir_free(country); } break; // Page 2: Work case 2: GetDlgItemText( hwndPage, IDC_COMPANY, text, SIZEOF( text )); JSetStringT( NULL, "Company", text ); GetDlgItemText( hwndPage, IDC_DEPARTMENT, text, SIZEOF( text )); JSetStringT( NULL, "CompanyDepartment", text ); GetDlgItemText( hwndPage, IDC_TITLE, text, SIZEOF( text )); JSetStringT( NULL, "CompanyPosition", text ); GetDlgItemText( hwndPage, IDC_ADDRESS1, text, SIZEOF( text )); JSetStringT( NULL, "CompanyStreet", text ); GetDlgItemText( hwndPage, IDC_ADDRESS2, text, SIZEOF( text )); JSetStringT( NULL, "CompanyStreet2", text ); GetDlgItemText( hwndPage, IDC_CITY, text, SIZEOF( text )); JSetStringT( NULL, "CompanyCity", text ); GetDlgItemText( hwndPage, IDC_STATE, text, SIZEOF( text )); JSetStringT( NULL, "CompanyState", text ); GetDlgItemText( hwndPage, IDC_ZIP, text, SIZEOF( text )); JSetStringT( NULL, "CompanyZIP", text ); { int i = SendMessage( GetDlgItem( hwndPage, IDC_COUNTRY ), CB_GETCURSEL, 0, 0 ); TCHAR *country = mir_a2t((i) ? g_countries[i+2].szName : g_countries[1].szName); JSetStringT( NULL, "CompanyCountry", country ); mir_free(country); } break; // Page 3: Photo // not needed to be saved into db // Page 4: Note case 4: GetDlgItemText( hwndPage, IDC_DESC, text, SIZEOF( text )); JSetStringT( NULL, "About", text ); break; // Page 5: Contacts // is always synced with db } } void CJabberProto::AppendVcardFromDB( HXML n, char* tag, char* key ) { if ( n == NULL || tag == NULL || key == NULL ) return; DBVARIANT dbv; if ( DBGetContactSettingTString( NULL, m_szModuleName, key, &dbv )) n << XCHILD( _A2T(tag)); else { n << XCHILD( _A2T(tag), dbv.ptszVal ); JFreeVariant( &dbv ); } } void CJabberProto::SetServerVcard( BOOL bPhotoChanged, TCHAR* szPhotoFileName ) { if (!m_bJabberOnline) return; DBVARIANT dbv; int iqId; TCHAR *szFileName; int i; char idstr[33]; WORD nFlag; iqId = SerialNext(); IqAdd( iqId, IQ_PROC_SETVCARD, &CJabberProto::OnIqResultSetVcard ); XmlNodeIq iq( _T("set"), iqId ); HXML v = iq << XCHILDNS( _T("vCard"), _T(JABBER_FEAT_VCARD_TEMP)); AppendVcardFromDB( v, "FN", "FullName" ); HXML n = v << XCHILD( _T("N")); AppendVcardFromDB( n, "GIVEN", "FirstName" ); AppendVcardFromDB( n, "MIDDLE", "MiddleName" ); AppendVcardFromDB( n, "FAMILY", "LastName" ); AppendVcardFromDB( v, "NICKNAME", "Nick" ); AppendVcardFromDB( v, "BDAY", "BirthDate" ); AppendVcardFromDB( v, "GENDER", "GenderString" ); for ( i=0;;i++ ) { wsprintfA( idstr, "e-mail%d", i ); if ( DBGetContactSettingTString( NULL, m_szModuleName, idstr, &dbv )) break; HXML e = v << XCHILD( _T("EMAIL"), dbv.ptszVal ); JFreeVariant( &dbv ); AppendVcardFromDB( e, "USERID", idstr ); wsprintfA( idstr, "e-mailFlag%d", i ); nFlag = DBGetContactSettingWord( NULL, m_szModuleName, idstr, 0 ); if ( nFlag & JABBER_VCEMAIL_HOME ) e << XCHILD( _T("HOME")); if ( nFlag & JABBER_VCEMAIL_WORK ) e << XCHILD( _T("WORK")); if ( nFlag & JABBER_VCEMAIL_INTERNET ) e << XCHILD( _T("INTERNET")); if ( nFlag & JABBER_VCEMAIL_X400 ) e << XCHILD( _T("X400")); } n = v << XCHILD( _T("ADR")); n << XCHILD( _T("HOME")); AppendVcardFromDB( n, "STREET", "Street" ); AppendVcardFromDB( n, "EXTADR", "Street2" ); AppendVcardFromDB( n, "EXTADD", "Street2" ); // for compatibility with client using old vcard format AppendVcardFromDB( n, "LOCALITY", "City" ); AppendVcardFromDB( n, "REGION", "State" ); AppendVcardFromDB( n, "PCODE", "ZIP" ); AppendVcardFromDB( n, "CTRY", "Country" ); AppendVcardFromDB( n, "COUNTRY", "Country" ); // for compatibility with client using old vcard format n = v << XCHILD( _T("ADR")); n << XCHILD( _T("WORK")); AppendVcardFromDB( n, "STREET", "CompanyStreet" ); AppendVcardFromDB( n, "EXTADR", "CompanyStreet2" ); AppendVcardFromDB( n, "EXTADD", "CompanyStreet2" ); // for compatibility with client using old vcard format AppendVcardFromDB( n, "LOCALITY", "CompanyCity" ); AppendVcardFromDB( n, "REGION", "CompanyState" ); AppendVcardFromDB( n, "PCODE", "CompanyZIP" ); AppendVcardFromDB( n, "CTRY", "CompanyCountry" ); AppendVcardFromDB( n, "COUNTRY", "CompanyCountry" ); // for compatibility with client using old vcard format n = v << XCHILD( _T("ORG")); AppendVcardFromDB( n, "ORGNAME", "Company" ); AppendVcardFromDB( n, "ORGUNIT", "CompanyDepartment" ); AppendVcardFromDB( v, "TITLE", "CompanyPosition" ); AppendVcardFromDB( v, "ROLE", "Role" ); AppendVcardFromDB( v, "URL", "Homepage" ); AppendVcardFromDB( v, "DESC", "About" ); for ( i=0;;i++ ) { wsprintfA( idstr, "Phone%d", i ); if ( DBGetContactSettingTString( NULL, m_szModuleName, idstr, &dbv )) break; JFreeVariant( &dbv ); n = v << XCHILD( _T("TEL")); AppendVcardFromDB( n, "NUMBER", idstr ); wsprintfA( idstr, "PhoneFlag%d", i ); nFlag = JGetWord( NULL, idstr, 0 ); if ( nFlag & JABBER_VCTEL_HOME ) n << XCHILD( _T("HOME")); if ( nFlag & JABBER_VCTEL_WORK ) n << XCHILD( _T("WORK")); if ( nFlag & JABBER_VCTEL_VOICE ) n << XCHILD( _T("VOICE")); if ( nFlag & JABBER_VCTEL_FAX ) n << XCHILD( _T("FAX")); if ( nFlag & JABBER_VCTEL_PAGER ) n << XCHILD( _T("PAGER")); if ( nFlag & JABBER_VCTEL_MSG ) n << XCHILD( _T("MSG")); if ( nFlag & JABBER_VCTEL_CELL ) n << XCHILD( _T("CELL")); if ( nFlag & JABBER_VCTEL_VIDEO ) n << XCHILD( _T("VIDEO")); if ( nFlag & JABBER_VCTEL_BBS ) n << XCHILD( _T("BBS")); if ( nFlag & JABBER_VCTEL_MODEM ) n << XCHILD( _T("MODEM")); if ( nFlag & JABBER_VCTEL_ISDN ) n << XCHILD( _T("ISDN")); if ( nFlag & JABBER_VCTEL_PCS ) n << XCHILD( _T("PCS")); } TCHAR szAvatarName[ MAX_PATH ]; GetAvatarFileName( NULL, szAvatarName, SIZEOF( szAvatarName )); if ( bPhotoChanged ) szFileName = szPhotoFileName; else szFileName = szAvatarName; // Set photo element, also update the global jabberVcardPhotoFileName to reflect the update Log( "Before update, file name = " TCHAR_STR_PARAM, szFileName ); if ( szFileName == NULL || szFileName[0] == 0 ) { v << XCHILD( _T("PHOTO")); DeleteFile( szAvatarName ); JDeleteSetting( NULL, "AvatarSaved" ); JDeleteSetting( NULL, "AvatarHash" ); } else { HANDLE hFile; struct _stat st; char* buffer, *str; DWORD nRead; Log( "Saving picture from " TCHAR_STR_PARAM, szFileName ); if ( _tstat( szFileName, &st ) >= 0 ) { // Note the FILE_SHARE_READ attribute so that the CopyFile can succeed if (( hFile=CreateFile( szFileName, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL )) != INVALID_HANDLE_VALUE ) { if (( buffer=( char* )mir_alloc( st.st_size )) != NULL ) { if ( ReadFile( hFile, buffer, st.st_size, &nRead, NULL )) { if (( str=JabberBase64Encode( buffer, nRead )) != NULL ) { n = v << XCHILD( _T("PHOTO")); TCHAR* szFileType; switch( JabberGetPictureType( buffer )) { case PA_FORMAT_PNG: szFileType = _T("image/png"); break; case PA_FORMAT_GIF: szFileType = _T("image/gif"); break; case PA_FORMAT_BMP: szFileType = _T("image/bmp"); break; default: szFileType = _T("image/jpeg"); break; } n << XCHILD( _T("TYPE"), szFileType ); n << XCHILD( _T("BINVAL"), _A2T(str)); mir_free( str ); // NEED TO UPDATE OUR AVATAR HASH: mir_sha1_byte_t digest[MIR_SHA1_HASH_SIZE]; mir_sha1_ctx sha1ctx; mir_sha1_init( &sha1ctx ); mir_sha1_append( &sha1ctx, (mir_sha1_byte_t*)buffer, nRead ); mir_sha1_finish( &sha1ctx, digest ); char buf[MIR_SHA1_HASH_SIZE*2+1]; for ( int j=0; jsend( iq ); } ///////////////////////////////////////////////////////////////////////////////////////// void CJabberProto::OnUserInfoInit_VCard( WPARAM wParam, LPARAM ) { m_vCardUpdates = 0; m_bPhotoChanged = FALSE; m_szPhotoFileName[0] = 0; OPTIONSDIALOGPAGE odp = {0}; odp.cbSize = sizeof(odp); odp.hInstance = hInst; odp.dwInitParam = (LPARAM)this; odp.flags = ODPF_TCHAR|ODPF_USERINFOTAB|ODPF_DONTTRANSLATE; odp.ptszTitle = m_tszUserName; odp.pfnDlgProc = PersonalDlgProc; odp.pszTemplate = MAKEINTRESOURCEA(IDD_VCARD_PERSONAL); odp.ptszTab = LPGENT("General"); UserInfo_AddPage(wParam, &odp); odp.pfnDlgProc = ContactDlgProc; odp.pszTemplate = MAKEINTRESOURCEA(IDD_VCARD_CONTACT); odp.ptszTab = LPGENT("Contacts"); UserInfo_AddPage(wParam, &odp); odp.pfnDlgProc = HomeDlgProc; odp.pszTemplate = MAKEINTRESOURCEA(IDD_VCARD_HOME); odp.ptszTab = LPGENT("Home"); UserInfo_AddPage(wParam, &odp); odp.pfnDlgProc = WorkDlgProc; odp.pszTemplate = MAKEINTRESOURCEA(IDD_VCARD_WORK); odp.ptszTab = LPGENT("Work"); UserInfo_AddPage(wParam, &odp); odp.pfnDlgProc = PhotoDlgProc; odp.pszTemplate = MAKEINTRESOURCEA(IDD_VCARD_PHOTO); odp.ptszTab = LPGENT("Photo"); UserInfo_AddPage(wParam, &odp); odp.pfnDlgProc = NoteDlgProc; odp.pszTemplate = MAKEINTRESOURCEA(IDD_VCARD_NOTE); odp.ptszTab = LPGENT("Note"); UserInfo_AddPage(wParam, &odp); SendGetVcard( m_szJabberJID ); }