|
| Author |
Message |
MikeFairbrother Senior Member

Joined: 14 Feb 2004 Posts: 179 Location: United Kingdom
   
|
Posted: Sat May 06, 2006 10:19 am Post subject: MSN Messenger 8.0 |
|
|
It's just been released publically, therefore; my bot dosent seem to connect to the Passport.net Service.
I use Andromeda Template, anyone got any latest updates for this? MSN Protocol etc...
| Code: | MSN 2.0 (11/23/2004) Rev: 81 - Checksum: 51150-NS26316-SB39240
Starting now...
Use of uninitialized value in pattern match (m//) at lib/MSN/Notificat
e 974, <DATA> line 1.
Use of uninitialized value in concatenation (.) or string at lib/MSN/N
n.pm line 975, <DATA> line 1.
Use of uninitialized value in concatenation (.) or string at lib/MSN/N
n.pm line 976, <DATA> line 1.
SERVER ERROR : Authentication Error: No response from Passport server |
Any help is appreciated.
Many regards,
Mike |
|
| Back to top |
|
 |
mat007 Almost An Agent

Joined: 12 Jan 2004 Posts: 1375
   votes: 2
|
|
| Back to top |
|
 |
MikeFairbrother Senior Member

Joined: 14 Feb 2004 Posts: 179 Location: United Kingdom
   
|
Posted: Sat May 06, 2006 2:17 pm Post subject: |
|
|
Thanks Matthew,
Do I need to put this file somewhere, or put the coding of it into somewhere else? |
|
| Back to top |
|
 |
darkmonkey The Merovingian

Joined: 18 Apr 2004 Posts: 2557 Location: London, England
     votes: 7
|
Posted: Sat May 06, 2006 2:32 pm Post subject: |
|
|
By looking at the package name:
| Code: | | package MSN::Messenger::AuthPP3; |
..you can see that it's called MSN::Messenger::AuthPP3;
This should be translated into
Folder/Folder/Filename.pm:
/MSN/Messenger/AuthPP3.pm
The "/" should start inside your local library folder (ie, /lib/), where the current MSN.pm is.
To use it in your code, you'll need to call the module by declaring a new instance. I haven't looked at it enough to give you the code - either work it out or ask Matthew Fenton nicely :p |
|
| Back to top |
|
 |
MikeFairbrother Senior Member

Joined: 14 Feb 2004 Posts: 179 Location: United Kingdom
   
|
Posted: Sat May 06, 2006 2:38 pm Post subject: |
|
|
Thank you greatly for your help...
I also don't know how to include it, so, Matthew, please could you help me
Thank you
Edit: I'm guessing its "use MSN::Messenger::AuthPP3;" however I still get errors...
Has anyone got files for Andromeda where their bot still connects to the server? |
|
| Back to top |
|
 |
Addict Not Yet a God

Joined: 21 Jan 2004 Posts: 473
   
|
Posted: Sat May 06, 2006 6:52 pm Post subject: |
|
|
I think you have to make a new object? - I donno, just looked at it breifly.
| Code: | use MSN::Messenger::AuthPP3;
my $auth = new MSN::Messenger::AuthPP3; |
I doubt this will just plug-and-play though. |
|
| Back to top |
|
 |
mat007 Almost An Agent

Joined: 12 Jan 2004 Posts: 1375
   votes: 2
|
Posted: Sat May 06, 2006 8:49 pm Post subject: |
|
|
| It shouldnt be to hard to use it with the MSN.pm if im not mistaken.. If i get some time to install perl tonight ill make changes my self to the MSN.pm and upload it here. |
|
| Back to top |
|
 |
MikeFairbrother Senior Member

Joined: 14 Feb 2004 Posts: 179 Location: United Kingdom
   
|
Posted: Sun May 14, 2006 5:10 pm Post subject: |
|
|
Thanks this really helps  |
|
| Back to top |
|
 |
Drayshak Young One

Joined: 06 Jan 2004 Posts: 93 Location: Nottinghamshire, UK
      votes: 4
|
Posted: Sun May 14, 2006 8:12 pm Post subject: |
|
|
I managed to integrate it in to the MSN 2.1 module that I made
With my edited version, you copy it to the MSN folder, and use this code in Notification.pm where authentication takes place:
| Code: | sub CMD_USR
{
my $self = shift;
my @data = @_;
if ($data[1] eq 'TWN' && $data[2] eq 'S')
{
$self->{Auth} = new MSN::AuthPP3($self, $self->{Handle}, $self->{Password}, $data[3]);
my $token = $self->{Auth}->auth($self->{Handle}, $self->{Password}, $data[3]);
if (!defined $token) {
$self->disconnect;
return $self->error("A problem occurred during authentication. Details should be shown above.");;
}
$self->send('USR', 'TWN S ' . $token);
}
elsif( $data[1] eq 'OK' )
{
my $friendly = $data[3];
$self->send( 'SYN', "0 0" );
}
else
{
return $self->serverError( 'Unsupported authentication method: "' . "@data" .'"' );
}
}
|
Just copy and paste my USR command over the one that is already there, and you should be fine. HOWEVER, if you are using revision 81, it might not work... |
|
| Back to top |
|
 |
Tinytux Newbie

Joined: 04 Jun 2006 Posts: 12
 
|
Posted: Sun Jun 04, 2006 12:36 pm Post subject: |
|
|
Says AUTH Faild. Check firewall or server is not responding.
No firewall is on on my server
Must be connection is connetion the same then for msn 8? |
|
| Back to top |
|
 |
|