Signed-off-by: Slávek Banko <slavek.banko@axis.cz>
(cherry picked from commit 036b0229db)
pull/38/head
parent
f59b2e28c7
commit
70e337eaa8
@ -1,254 +0,0 @@
|
|||||||
/*
|
|
||||||
Kopete Oscar Protocol
|
|
||||||
aimlogintask.h - Handles logging into to the AIM service
|
|
||||||
|
|
||||||
Copyright (c) 2004 Matt Rogers <mattr@kde.org>
|
|
||||||
|
|
||||||
Kopete (c) 2002-2004 by the Kopete developers <kopete-devel@kde.org>
|
|
||||||
|
|
||||||
*************************************************************************
|
|
||||||
* *
|
|
||||||
* This library is free software; you can redistribute it and/or *
|
|
||||||
* modify it under the terms of the GNU Lesser General Public *
|
|
||||||
* License as published by the Free Software Foundation; either *
|
|
||||||
* version 2 of the License, or (at your option) any later version. *
|
|
||||||
* *
|
|
||||||
*************************************************************************
|
|
||||||
*/
|
|
||||||
#include "aimlogintask.h"
|
|
||||||
|
|
||||||
#include <stdlib.h>
|
|
||||||
#include <kdebug.h>
|
|
||||||
#include <tdelocale.h>
|
|
||||||
#include "connection.h"
|
|
||||||
#include "oscartypes.h"
|
|
||||||
#include "oscarutils.h"
|
|
||||||
#include "transfer.h"
|
|
||||||
|
|
||||||
#include "md5.h"
|
|
||||||
|
|
||||||
using namespace Oscar;
|
|
||||||
|
|
||||||
AimLoginTask::AimLoginTask( Task* parent )
|
|
||||||
: Task ( parent )
|
|
||||||
{
|
|
||||||
}
|
|
||||||
|
|
||||||
AimLoginTask::~AimLoginTask()
|
|
||||||
{
|
|
||||||
}
|
|
||||||
|
|
||||||
void AimLoginTask::onGo()
|
|
||||||
{
|
|
||||||
//send Snac 17,06
|
|
||||||
sendAuthStringRequest();
|
|
||||||
//when we have the authKey, login
|
|
||||||
connect( this, TQT_SIGNAL( haveAuthKey() ), this, TQT_SLOT( sendLoginRequest() ) );
|
|
||||||
}
|
|
||||||
|
|
||||||
bool AimLoginTask::forMe( Transfer* transfer ) const
|
|
||||||
{
|
|
||||||
SnacTransfer* st = dynamic_cast<SnacTransfer*>( transfer );
|
|
||||||
|
|
||||||
if (!st)
|
|
||||||
return false;
|
|
||||||
|
|
||||||
if ( st && st->snacService() == 0x17 )
|
|
||||||
{
|
|
||||||
WORD subtype = st->snacSubtype();
|
|
||||||
switch ( subtype )
|
|
||||||
{
|
|
||||||
case 0x0002:
|
|
||||||
case 0x0003:
|
|
||||||
case 0x0006:
|
|
||||||
case 0x0007:
|
|
||||||
return true;
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
return false;
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
|
|
||||||
const TQByteArray& AimLoginTask::cookie() const
|
|
||||||
{
|
|
||||||
return m_cookie;
|
|
||||||
}
|
|
||||||
|
|
||||||
const TQString& AimLoginTask::bosHost() const
|
|
||||||
{
|
|
||||||
return m_bosHost;
|
|
||||||
}
|
|
||||||
|
|
||||||
const TQString& AimLoginTask::bosPort() const
|
|
||||||
{
|
|
||||||
return m_bosPort;
|
|
||||||
}
|
|
||||||
|
|
||||||
bool AimLoginTask::take( Transfer* transfer )
|
|
||||||
{
|
|
||||||
if ( forMe( transfer ) )
|
|
||||||
{
|
|
||||||
SnacTransfer* st = dynamic_cast<SnacTransfer*>( transfer );
|
|
||||||
if (!st)
|
|
||||||
return false;
|
|
||||||
|
|
||||||
WORD subtype = st->snacSubtype();
|
|
||||||
switch ( subtype )
|
|
||||||
{
|
|
||||||
case 0x0003:
|
|
||||||
setTransfer( transfer );
|
|
||||||
handleLoginResponse();
|
|
||||||
setTransfer( 0 );
|
|
||||||
return true;
|
|
||||||
break;
|
|
||||||
case 0x0007:
|
|
||||||
setTransfer( transfer );
|
|
||||||
processAuthStringReply();
|
|
||||||
setTransfer( 0 );
|
|
||||||
return true;
|
|
||||||
break;
|
|
||||||
default:
|
|
||||||
return false;
|
|
||||||
break;
|
|
||||||
}
|
|
||||||
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
return false;
|
|
||||||
}
|
|
||||||
|
|
||||||
void AimLoginTask::sendAuthStringRequest()
|
|
||||||
{
|
|
||||||
kdDebug(OSCAR_RAW_DEBUG) << k_funcinfo
|
|
||||||
<< "SEND CLI_AUTH_REQUEST, sending login request" << endl;
|
|
||||||
|
|
||||||
FLAP f = { 0x02, 0, 0 };
|
|
||||||
SNAC s = { 0x0017, 0x0006, 0x0000, client()->snacSequence() };
|
|
||||||
|
|
||||||
Buffer* outbuf = new Buffer;
|
|
||||||
outbuf->addTLV(0x0001, client()->userId().length(), client()->userId().latin1() );
|
|
||||||
outbuf->addDWord(0x004B0000); // empty TLV 0x004B
|
|
||||||
outbuf->addDWord(0x005A0000); // empty TLV 0x005A
|
|
||||||
|
|
||||||
Transfer* st = createTransfer( f, s, outbuf );
|
|
||||||
send( st );
|
|
||||||
}
|
|
||||||
|
|
||||||
void AimLoginTask::processAuthStringReply()
|
|
||||||
{
|
|
||||||
kdDebug(OSCAR_RAW_DEBUG) << k_funcinfo << "Got the authorization key" << endl;
|
|
||||||
Buffer *inbuf = transfer()->buffer();
|
|
||||||
WORD keylen = inbuf->getWord();
|
|
||||||
kdDebug(OSCAR_RAW_DEBUG) << k_funcinfo << "Key length is " << keylen << endl;
|
|
||||||
m_authKey.duplicate( inbuf->getBlock(keylen) );
|
|
||||||
emit haveAuthKey();
|
|
||||||
}
|
|
||||||
|
|
||||||
void AimLoginTask::sendLoginRequest()
|
|
||||||
{
|
|
||||||
kdDebug(OSCAR_RAW_DEBUG) << k_funcinfo << "SEND (CLI_MD5_LOGIN) sending AIM login" << endl;
|
|
||||||
|
|
||||||
FLAP f = { 0x02, 0, 0 };
|
|
||||||
SNAC s = { 0x0017, 0x0002, 0x0000, client()->snacSequence() };
|
|
||||||
Buffer *outbuf = new Buffer;
|
|
||||||
const Oscar::ClientVersion* version = client()->version();
|
|
||||||
|
|
||||||
outbuf->addTLV(0x0001, client()->userId().length(), client()->userId().latin1());
|
|
||||||
|
|
||||||
TQByteArray digest( 17 ); //apparently MD5 digests are 16 bytes long
|
|
||||||
encodePassword( digest );
|
|
||||||
digest[16] = '\0'; //do this so that addTLV sees a NULL-terminator
|
|
||||||
|
|
||||||
outbuf->addTLV(0x0025, 16, digest);
|
|
||||||
outbuf->addTLV(0x0003, version->clientString.length(), version->clientString.latin1() );
|
|
||||||
outbuf->addTLV16(0x0016, version->clientId );
|
|
||||||
outbuf->addTLV16(0x0017, version->major );
|
|
||||||
outbuf->addTLV16(0x0018, version->minor );
|
|
||||||
outbuf->addTLV16(0x0019, version->point );
|
|
||||||
outbuf->addTLV16(0x001a, version->build );
|
|
||||||
outbuf->addDWord(0x00140004); //TLV type 0x0014, length 0x0004
|
|
||||||
outbuf->addDWord( version->other ); //TLV data for type 0x0014
|
|
||||||
outbuf->addTLV(0x000f, version->lang.length(), version->lang.latin1() );
|
|
||||||
outbuf->addTLV(0x000e, version->country.length(), version->country.latin1() );
|
|
||||||
|
|
||||||
//if set, old-style buddy lists will not work... you will need to use SSI
|
|
||||||
outbuf->addTLV8(0x004a,0x01);
|
|
||||||
|
|
||||||
Transfer *st = createTransfer( f, s, outbuf );
|
|
||||||
send( st );
|
|
||||||
}
|
|
||||||
|
|
||||||
void AimLoginTask::handleLoginResponse()
|
|
||||||
{
|
|
||||||
kdDebug(OSCAR_RAW_DEBUG) << k_funcinfo << "RECV SNAC 0x17, 0x07 - AIM Login Response" << endl;
|
|
||||||
|
|
||||||
SnacTransfer* st = dynamic_cast<SnacTransfer*> ( transfer() );
|
|
||||||
|
|
||||||
if ( !st )
|
|
||||||
{
|
|
||||||
setError( -1 , TQString() );
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
|
|
||||||
TQValueList<TLV> tlvList = st->buffer()->getTLVList();
|
|
||||||
|
|
||||||
TLV uin = findTLV( tlvList, 0x0001 );
|
|
||||||
if ( uin )
|
|
||||||
{
|
|
||||||
kdDebug(OSCAR_RAW_DEBUG) << k_funcinfo << "found TLV(1) [SN], SN=" << TQString( uin.data ) << endl;
|
|
||||||
}
|
|
||||||
|
|
||||||
TLV err = findTLV( tlvList, 0x0008 );
|
|
||||||
|
|
||||||
if ( err )
|
|
||||||
{
|
|
||||||
WORD errorNum = ( ( err.data[0] << 8 ) | err.data[1] );
|
|
||||||
|
|
||||||
kdDebug(OSCAR_RAW_DEBUG) << k_funcinfo << k_funcinfo << "found TLV(8) [ERROR] error= " <<
|
|
||||||
errorNum << endl;
|
|
||||||
Oscar::SNAC s = { 0, 0, 0, 0 };
|
|
||||||
client()->fatalTaskError( s, errorNum );
|
|
||||||
setError( errorNum, TQString() );
|
|
||||||
return; //if there's an error, we'll need to disconnect anyways
|
|
||||||
}
|
|
||||||
|
|
||||||
TLV server = findTLV( tlvList, 0x0005 );
|
|
||||||
if ( server )
|
|
||||||
{
|
|
||||||
TQString ip = TQString( server.data );
|
|
||||||
kdDebug(OSCAR_RAW_DEBUG) << k_funcinfo << "found TLV(5) [SERVER] " << ip << endl;
|
|
||||||
int index = ip.find( ':' );
|
|
||||||
m_bosHost = ip.left( index );
|
|
||||||
ip.remove( 0 , index+1 ); //get rid of the colon and everything before it
|
|
||||||
m_bosPort = ip.left(4); //we only need 4 bytes
|
|
||||||
kdDebug(OSCAR_RAW_DEBUG) << k_funcinfo << "We should reconnect to server '" << m_bosHost <<
|
|
||||||
"' on port " << m_bosPort << endl;
|
|
||||||
}
|
|
||||||
|
|
||||||
TLV cookie = findTLV( tlvList, 0x0006 );
|
|
||||||
if ( cookie )
|
|
||||||
{
|
|
||||||
kdDebug(OSCAR_RAW_DEBUG) << k_funcinfo << "found TLV(6) [COOKIE]" << endl;
|
|
||||||
m_cookie.duplicate( cookie.data );
|
|
||||||
setSuccess( 0, TQString() );
|
|
||||||
}
|
|
||||||
tlvList.clear();
|
|
||||||
}
|
|
||||||
|
|
||||||
void AimLoginTask::encodePassword( TQByteArray& digest ) const
|
|
||||||
{
|
|
||||||
kdDebug(OSCAR_RAW_DEBUG) << k_funcinfo << endl;
|
|
||||||
md5_state_t state;
|
|
||||||
md5_init( &state );
|
|
||||||
md5_append( &state, ( const md5_byte_t* ) m_authKey.data(), m_authKey.size() );
|
|
||||||
md5_append( &state, ( const md5_byte_t* ) client()->password().latin1(), client()->password().length() );
|
|
||||||
md5_append( &state, ( const md5_byte_t* ) AIM_MD5_STRING, strlen( AIM_MD5_STRING ) );
|
|
||||||
md5_finish( &state, ( md5_byte_t* ) digest.data() );
|
|
||||||
}
|
|
||||||
|
|
||||||
//kate: indent-mode csands; tab-width 4;
|
|
||||||
|
|
||||||
#include "aimlogintask.moc"
|
|
||||||
@ -1,83 +0,0 @@
|
|||||||
/*
|
|
||||||
Kopete Oscar Protocol
|
|
||||||
aimlogintask.h - Handles logging into to the AIM service
|
|
||||||
|
|
||||||
Copyright (c) 2004 Matt Rogers <mattr@kde.org>
|
|
||||||
|
|
||||||
Kopete (c) 2002-2004 by the Kopete developers <kopete-devel@kde.org>
|
|
||||||
|
|
||||||
*************************************************************************
|
|
||||||
* *
|
|
||||||
* This library is free software; you can redistribute it and/or *
|
|
||||||
* modify it under the terms of the GNU Lesser General Public *
|
|
||||||
* License as published by the Free Software Foundation; either *
|
|
||||||
* version 2 of the License, or (at your option) any later version. *
|
|
||||||
* *
|
|
||||||
*************************************************************************
|
|
||||||
*/
|
|
||||||
|
|
||||||
#ifndef _OSCAR_AIMLOGINTASK_H_
|
|
||||||
#define _OSCAR_AIMLOGINTASK_H_
|
|
||||||
|
|
||||||
#include "task.h"
|
|
||||||
|
|
||||||
using namespace Oscar;
|
|
||||||
|
|
||||||
class AimLoginTask : public Task
|
|
||||||
{
|
|
||||||
Q_OBJECT
|
|
||||||
|
|
||||||
public:
|
|
||||||
AimLoginTask( Task* parent );
|
|
||||||
~AimLoginTask();
|
|
||||||
bool take( Transfer* transfer );
|
|
||||||
virtual void onGo();
|
|
||||||
|
|
||||||
//Protocol specific stuff
|
|
||||||
const TQByteArray& cookie() const;
|
|
||||||
const TQString& bosHost() const;
|
|
||||||
const TQString& bosPort() const;
|
|
||||||
|
|
||||||
protected:
|
|
||||||
bool forMe( Transfer* transfer ) const;
|
|
||||||
|
|
||||||
signals:
|
|
||||||
void haveAuthKey();
|
|
||||||
|
|
||||||
private:
|
|
||||||
//! Encodes a password using MD5
|
|
||||||
void encodePassword( TQByteArray& digest ) const;
|
|
||||||
|
|
||||||
//! Send SNAC 0x17, 0x06
|
|
||||||
void sendAuthStringRequest();
|
|
||||||
|
|
||||||
//! Handle SNAC 0x17, 0x07
|
|
||||||
void processAuthStringReply();
|
|
||||||
|
|
||||||
//! Handle SNAC 0x17, 0x03
|
|
||||||
void handleLoginResponse();
|
|
||||||
|
|
||||||
//! Parse the error codes to generate a reason why sign-on failed
|
|
||||||
//Massive code duplication with CloseConnectionTask
|
|
||||||
bool parseDisconnectCode( int error, TQString& reason );
|
|
||||||
|
|
||||||
private slots:
|
|
||||||
//! Send SNAC 0x17, 0x02
|
|
||||||
void sendLoginRequest();
|
|
||||||
|
|
||||||
private:
|
|
||||||
//! The authorization key to use when encoding the password
|
|
||||||
TQByteArray m_authKey;
|
|
||||||
|
|
||||||
//! The all important connection cookie
|
|
||||||
TQByteArray m_cookie;
|
|
||||||
|
|
||||||
//! The new BOS Host
|
|
||||||
TQString m_bosHost;
|
|
||||||
|
|
||||||
//! The new BOS Port
|
|
||||||
TQString m_bosPort;
|
|
||||||
|
|
||||||
};
|
|
||||||
|
|
||||||
#endif
|
|
||||||
Loading…
Reference in new issue