void TlenGetAvatarFileName(JABBER_LIST_ITEM *item, char* pszDest, int cbLen)
{
int tPathLen;
int format;
char* szFileType;
CallService( MS_DB_GETPROFILEPATH, cbLen, (LPARAM) pszDest );
tPathLen = strlen( pszDest );
tPathLen += mir_snprintf( pszDest + tPathLen, cbLen - tPathLen, "\\%s\\", jabberModuleName );
CreateDirectoryA( pszDest, NULL );
format = item == NULL ? userAvatarFormat : item->avatarFormat;
szFileType = "bmp";
switch(format) {
case PA_FORMAT_JPEG: szFileType = "jpg"; break;
case PA_FORMAT_ICON: szFileType = "ico"; break;
case PA_FORMAT_PNG: szFileType = "png"; break;
case PA_FORMAT_GIF: szFileType = "gif"; break;
case PA_FORMAT_BMP: szFileType = "bmp"; break;
}
if ( item != NULL ) {
char* hash;
hash = JabberSha1(item->jid);
mir_snprintf( pszDest + tPathLen, MAX_PATH - tPathLen, "%s.%s", hash, szFileType );
mir_free( hash );
}
else mir_snprintf( pszDest + tPathLen, MAX_PATH - tPathLen, "%s avatar.%s", jabberProtoName, szFileType );
}
void CJabberProto::GetAvatarFileName(MCONTACT hContact, TCHAR* pszDest, size_t cbLen)
{
int tPathLen = mir_sntprintf(pszDest, cbLen, _T("%s\\%S"), VARST(_T("%miranda_avatarcache%")), m_szModuleName);
DWORD dwAttributes = GetFileAttributes(pszDest);
if (dwAttributes == 0xffffffff || (dwAttributes & FILE_ATTRIBUTE_DIRECTORY) == 0)
CreateDirectoryTreeT(pszDest);
pszDest[ tPathLen++ ] = '\\';
const TCHAR* szFileType = ProtoGetAvatarExtension( getByte(hContact, "AvatarType", PA_FORMAT_PNG));
if (hContact != NULL) {
char str[ 256 ];
DBVARIANT dbv;
if (!db_get_utf(hContact, m_szModuleName, "jid", &dbv)) {
strncpy(str, dbv.pszVal, sizeof str);
str[ sizeof(str)-1 ] = 0;
db_free(&dbv);
}
else _i64toa((LONG_PTR)hContact, str, 10);
mir_sntprintf(pszDest + tPathLen, MAX_PATH - tPathLen, _T("%S%s"), ptrA(JabberSha1(str)), szFileType);
}
else if (m_ThreadInfo != NULL) {
mir_sntprintf(pszDest + tPathLen, MAX_PATH - tPathLen, _T("%s@%S avatar%s"),
m_ThreadInfo->username, m_ThreadInfo->server, szFileType);
}
else {
ptrA res1( getStringA("LoginName")), res2( getStringA("LoginServer"));
mir_sntprintf(pszDest + tPathLen, MAX_PATH - tPathLen, _T("%S@%S avatar%s"),
(res1) ? (LPSTR)res1 : "noname", (res2) ? (LPSTR)res2 : m_szModuleName, szFileType);
}
}
void TlenGetAvatarFileName(JABBER_LIST_ITEM *item, char* pszDest, int cbLen)
{
int tPathLen;
int format = PA_FORMAT_PNG;
char* szFileType;
if (item != NULL) {
format = item->avatarFormat;
} else if (jabberThreadInfo != NULL) {
format = jabberThreadInfo->avatarFormat;
} else {
format = DBGetContactSettingDword(NULL, jabberProtoName, "AvatarFormat", PA_FORMAT_UNKNOWN);
}
CallService( MS_DB_GETPROFILEPATH, cbLen, (LPARAM) pszDest );
tPathLen = strlen( pszDest );
tPathLen += mir_snprintf( pszDest + tPathLen, cbLen - tPathLen, "\\%s\\", jabberModuleName );
CreateDirectoryA( pszDest, NULL );
szFileType = "png";
switch(format) {
case PA_FORMAT_JPEG: szFileType = "jpg"; break;
case PA_FORMAT_ICON: szFileType = "ico"; break;
case PA_FORMAT_PNG: szFileType = "png"; break;
case PA_FORMAT_GIF: szFileType = "gif"; break;
case PA_FORMAT_BMP: szFileType = "bmp"; break;
}
if ( item != NULL ) {
char* hash;
hash = JabberSha1(item->jid);
mir_snprintf( pszDest + tPathLen, MAX_PATH - tPathLen, "%s.%s", hash, szFileType );
mir_free( hash );
} else {
mir_snprintf( pszDest + tPathLen, MAX_PATH - tPathLen, "%s_avatar.%s", jabberProtoName, szFileType );
}
}
void JabberGetAvatarFileName( HANDLE hContact, char* pszDest, int cbLen )
{
JCallService( MS_DB_GETPROFILEPATH, cbLen, LPARAM( pszDest ));
int tPathLen = strlen( pszDest );
tPathLen += mir_snprintf( pszDest + tPathLen, MAX_PATH - tPathLen, "\\Jabber\\" );
CreateDirectoryA( pszDest, NULL );
char* szFileType;
switch( JGetByte( hContact, "AvatarType", PA_FORMAT_PNG )) {
case PA_FORMAT_JPEG: szFileType = "jpg"; break;
case PA_FORMAT_GIF: szFileType = "gif"; break;
case PA_FORMAT_BMP: szFileType = "bmp"; break;
case PA_FORMAT_PNG: szFileType = "png"; break;
default: szFileType = "bin";
}
if ( hContact != NULL ) {
char str[ 256 ];
DBVARIANT dbv;
if ( !JGetStringUtf( hContact, "jid", &dbv )) {
strncpy( str, dbv.pszVal, sizeof str );
str[ sizeof(str)-1 ] = 0;
JFreeVariant( &dbv );
}
else ltoa(( long )hContact, str, 10 );
char* hash = JabberSha1( str );
mir_snprintf( pszDest + tPathLen, MAX_PATH - tPathLen, "%s.%s", hash, szFileType );
mir_free( hash );
}
else if ( jabberThreadInfo != NULL ) {
mir_snprintf( pszDest + tPathLen, MAX_PATH - tPathLen, TCHAR_STR_PARAM"@%s avatar.%s", jabberThreadInfo->username, jabberThreadInfo->server, szFileType );
}
else {
DBVARIANT dbv1, dbv2;
BOOL res1 = DBGetContactSetting( NULL, jabberProtoName, "LoginName", &dbv1 );
BOOL res2 = DBGetContactSetting( NULL, jabberProtoName, "LoginServer", &dbv2 );
mir_snprintf( pszDest + tPathLen, MAX_PATH - tPathLen, "%s@%s avatar.%s",
res1 ? "noname" : dbv1.pszVal,
res2 ? jabberProtoName : dbv2.pszVal,
szFileType );
if (!res1) JFreeVariant( &dbv1 );
if (!res2) JFreeVariant( &dbv2 );
}
}
int CJabberProto::ByteReceiveParse( HANDLE hConn, JABBER_BYTE_TRANSFER *jbt, char* buffer, int datalen )
{
int bytesReceived, num = datalen;
switch ( jbt->state ) {
case JBT_INIT:
// received:
// 00-00 ver ( 0x05 )
// 01-01 selected method ( 0=no auth, 0xff=error )
// send:
// 00-00 ver ( 0x05 )
// 01-01 cmd ( 1=connect )
// 02-02 reserved ( 0 )
// 03-03 address type ( 3 )
// 04-44 dst.addr ( 41 bytes: 1-byte length, 40-byte SHA1 hash of [sid,srcJID,dstJID] )
// 45-46 dst.port ( 0 )
if ( datalen==2 && buffer[0]==5 && buffer[1]==0 ) {
BYTE data[47];
ZeroMemory( data, sizeof( data ));
*(( DWORD* )data ) = 0x03000105;
data[4] = 40;
TCHAR text[JABBER_MAX_JID_LEN*2];
TCHAR *szInitiatorJid = JabberPrepareJid(jbt->srcJID);
TCHAR *szTargetJid = JabberPrepareJid(jbt->dstJID);
mir_sntprintf( text, SIZEOF( text ), _T("%s%s%s"), jbt->sid, szInitiatorJid, szTargetJid );
mir_free(szInitiatorJid);
mir_free(szTargetJid);
char* szAuthString = mir_utf8encodeT( text );
Log( "Auth: '%s'", szAuthString );
char* szHash = JabberSha1( szAuthString );
strncpy(( char* )( data+5 ), szHash, 40 );
mir_free( szHash );
Netlib_Send( hConn, ( char* )data, 47, 0 );
jbt->state = JBT_CONNECT;
mir_free( szAuthString );
}
else jbt->state = JBT_SOCKSERR;
break;
case JBT_CONNECT:
// received:
// 00-00 ver ( 0x05 )
// 01-01 reply ( 0=success,2=not allowed )
// 02-02 reserved ( 0 )
// 03-03 address type ( 1=IPv4 address,3=host address )
// 04-mm bnd.addr server bound address ( 4-byte IP if IPv4, 1-byte length + n-byte host address string if host address )
// nn-nn+1 bnd.port server bound port
if ( datalen>=5 && buffer[0]==5 && buffer[1]==0 && ( buffer[3]==1 || buffer[3]==3 || buffer[3]==0 )) {
if ( buffer[3]==1 && datalen>=10 )
num = 10;
else if ( buffer[3]==3 && datalen>=buffer[4]+7 )
num = buffer[4] + 7;
else if ( buffer[3]==0 && datalen>=6 )
num = 6;
else {
jbt->state = JBT_SOCKSERR;
break;
}
jbt->state = JBT_RECVING;
m_ThreadInfo->send(
XmlNodeIq( _T("result"), jbt->iqId, jbt->srcJID ) << XQUERY( _T(JABBER_FEAT_BYTESTREAMS))
<< XCHILD( _T("streamhost-used")) << XATTR( _T("jid"), jbt->streamhostJID ));
}
else jbt->state = JBT_SOCKSERR;
break;
case JBT_RECVING:
bytesReceived = (this->*jbt->pfnRecv)( hConn, jbt->ft, buffer, datalen );
if ( bytesReceived < 0 )
jbt->state = JBT_ERROR;
else if ( bytesReceived == 0 )
jbt->state = JBT_DONE;
break;
}
return num;
}
int CJabberProto::ByteSendProxyParse( HANDLE hConn, JABBER_BYTE_TRANSFER *jbt, char* buffer, int datalen )
{
int num = datalen;
switch ( jbt->state ) {
case JBT_INIT:
// received:
// 00-00 ver ( 0x05 )
// 01-01 selected method ( 0=no auth, 0xff=error )
// send:
// 00-00 ver ( 0x05 )
// 01-01 cmd ( 1=connect )
// 02-02 reserved ( 0 )
// 03-03 address type ( 3 )
// 04-44 dst.addr ( 41 bytes: 1-byte length, 40-byte SHA1 hash of [sid,srcJID,dstJID] )
// 45-46 dst.port ( 0 )
if ( datalen==2 && buffer[0]==5 && buffer[1]==0 ) {
BYTE data[47];
ZeroMemory( data, sizeof( data ));
*(( DWORD* )data ) = 0x03000105;
data[4] = 40;
TCHAR text[256];
TCHAR *szInitiatorJid = JabberPrepareJid(jbt->srcJID);
TCHAR *szTargetJid = JabberPrepareJid(jbt->dstJID);
mir_sntprintf( text, SIZEOF( text ), _T("%s%s%s"), jbt->sid, szInitiatorJid, szTargetJid );
mir_free(szInitiatorJid);
mir_free(szTargetJid);
char* szAuthString = mir_utf8encodeT( text );
Log( "Auth: '%s'", szAuthString );
char* szHash = JabberSha1( szAuthString );
strncpy(( char* )( data+5 ), szHash, 40 );
mir_free( szHash );
Netlib_Send( hConn, ( char* )data, 47, 0 );
jbt->state = JBT_CONNECT;
mir_free( szAuthString );
}
else jbt->state = JBT_SOCKSERR;
break;
case JBT_CONNECT:
// received:
// 00-00 ver ( 0x05 )
// 01-01 reply ( 0=success,2=not allowed )
// 02-02 reserved ( 0 )
// 03-03 address type ( 1=IPv4 address,3=host address )
// 04-mm bnd.addr server bound address ( 4-byte IP if IPv4, 1-byte length + n-byte host address string if host address )
// nn-nn+1 bnd.port server bound port
if ( datalen>=5 && buffer[0]==5 && buffer[1]==0 && ( buffer[3]==1 || buffer[3]==3 || buffer[3]==0 )) {
if ( buffer[3]==1 && datalen>=10 )
num = 10;
else if ( buffer[3]==3 && datalen>=buffer[4]+7 )
num = buffer[4] + 7;
else if ( buffer[3]==0 && datalen>=6 )
num = 6;
else {
jbt->state = JBT_SOCKSERR;
break;
}
jbt->state = JBT_SENDING;
jbt->hProxyEvent = CreateEvent( NULL, FALSE, FALSE, NULL );
jbt->bStreamActivated = FALSE;
int iqId = SerialNext();
TCHAR listJid[256];
mir_sntprintf(listJid, SIZEOF( listJid ), _T("ftproxy_%d"), iqId);
JABBER_LIST_ITEM *item = ListAdd( LIST_FTIQID, listJid );
item->jbt = jbt;
IqAdd( iqId, IQ_PROC_NONE, &CJabberProto::IqResultStreamActivate );
m_ThreadInfo->send(
XmlNodeIq( _T("set"), iqId, jbt->streamhostJID ) << XQUERY( _T(JABBER_FEAT_BYTESTREAMS))
<< XATTR( _T("sid"), jbt->sid ) << XCHILD( _T("activate"), jbt->dstJID ));
WaitForSingleObject( jbt->hProxyEvent, INFINITE );
CloseHandle( jbt->hProxyEvent );
jbt->hProxyEvent = NULL;
ListRemove( LIST_FTIQID, listJid );
if ( jbt->bStreamActivated)
jbt->state = (this->*jbt->pfnSend)( hConn, jbt->ft ) ? JBT_DONE : JBT_ERROR;
else
jbt->state = JBT_ERROR;
}
else jbt->state = JBT_SOCKSERR;
break;
}
return num;
}
int CJabberProto::ByteSendParse( HANDLE hConn, JABBER_BYTE_TRANSFER *jbt, char* buffer, int datalen )
{
int nMethods;
BYTE data[10];
int i;
char* str;
switch ( jbt->state ) {
case JBT_INIT:
// received:
// 00-00 ver ( 0x05 )
// 01-01 nmethods
// 02-xx list of methods ( nmethods bytes )
// send:
// 00-00 ver ( 0x05 )
// 01-01 select method ( 0=no auth required )
if ( datalen>=2 && buffer[0]==5 && buffer[1]+2==datalen ) {
nMethods = buffer[1];
for ( i=0; i<nMethods && buffer[2+i]!=0; i++ );
if ( i < nMethods ) {
data[1] = 0;
jbt->state = JBT_CONNECT;
}
else {
data[1] = 0xff;
jbt->state = JBT_ERROR;
}
data[0] = 5;
Netlib_Send( hConn, ( char* )data, 2, 0 );
}
else jbt->state = JBT_ERROR;
break;
case JBT_CONNECT:
// received:
// 00-00 ver ( 0x05 )
// 01-01 cmd ( 1=connect )
// 02-02 reserved ( 0 )
// 03-03 address type ( 3 )
// 04-44 dst.addr ( 41 bytes: 1-byte length, 40-byte SHA1 hash of [sid,srcJID,dstJID] )
// 45-46 dst.port ( 0 )
// send:
// 00-00 ver ( 0x05 )
// 01-01 reply ( 0=success,2=not allowed )
// 02-02 reserved ( 0 )
// 03-03 address type ( 1=IPv4 address )
// 04-07 bnd.addr server bound address
// 08-09 bnd.port server bound port
if ( datalen == 47 && *(( DWORD* )buffer )==0x03000105 && buffer[4]==40 && *(( WORD* )( buffer+45 ))==0 ) {
TCHAR text[256];
TCHAR *szInitiatorJid = JabberPrepareJid(jbt->srcJID);
TCHAR *szTargetJid = JabberPrepareJid(jbt->dstJID);
mir_sntprintf( text, SIZEOF( text ), _T("%s%s%s"), jbt->sid, szInitiatorJid, szTargetJid );
mir_free(szInitiatorJid);
mir_free(szTargetJid);
char* szAuthString = mir_utf8encodeT( text );
Log( "Auth: '%s'", szAuthString );
if (( str = JabberSha1( szAuthString )) != NULL ) {
for ( i=0; i<40 && buffer[i+5]==str[i]; i++ );
mir_free( str );
ZeroMemory( data, 10 );
data[1] = ( i>=20 )?0:2;
data[0] = 5;
data[3] = 1;
Netlib_Send( hConn, ( char* )data, 10, 0 );
// wait stream activation
WaitForSingleObject( jbt->hSendEvent, INFINITE );
if ( jbt->state == JBT_ERROR )
break;
if ( i>=20 && (this->*jbt->pfnSend)( hConn, jbt->ft )==TRUE )
jbt->state = JBT_DONE;
else
jbt->state = JBT_ERROR;
}
mir_free( szAuthString );
}
else
jbt->state = JBT_ERROR;
break;
}
return datalen;
}