[Ssh-sftp-perl-users] FW: Problem in NET::SSH::Perl Invalid arguments divll More detail.

[Michael C. <mic...@mc...>]

Thanks for the 2 responses.

 

1.	I tried just protocol 2 and that is the same issue. In fact protocol
SSH-1 gets past this point but problems after that.
2.	I verified that I am using 5.8.0 and all the 64-bit modules.

 

Now, I have debugged DEEP down and the problem is in the Crypt:DH module. 

It seems like a bug. 

 

Here is my output again.

iptsd001.cmie.dev.ops.us.uu.net: Reading configuration data
/var/home/mcoons/.ssh/config

iptsd001.cmie.dev.ops.us.uu.net: Reading configuration data
/etc/ssh/sshd_config

iptsd001.cmie.dev.ops.us.uu.net: Connecting to iptsd020-new.mcilink.com,
port 22.

iptsd001.cmie.dev.ops.us.uu.net: Remote protocol version 1.99, remote
software version OpenSSH_3.4p1

iptsd001.cmie.dev.ops.us.uu.net: Net::SSH::Perl Version 1.23, protocol
version 2.0.

iptsd001.cmie.dev.ops.us.uu.net: No compat match: OpenSSH_3.4p1.

iptsd001.cmie.dev.ops.us.uu.net: Connection established.

iptsd001.cmie.dev.ops.us.uu.net: Sent key-exchange init (KEXINIT), wait
response.

iptsd001.cmie.dev.ops.us.uu.net: Algorithms, c->s: 3des-cbc hmac-sha1 none

iptsd001.cmie.dev.ops.us.uu.net: Algorithms, s->c: 3des-cbc hmac-sha1 none

PARI:   ***   Invalid arguments to divll. at
/usr/local/lib/perl5/site_perl/5.8.0/Crypt/DH.pm line 29, <GEN0> line 1.

 

 

 

What is happing is that in the DH1.pm module is passes a HARD coded string
to compute a large number to use as a key.

This number grows too big and eventually overflows divll and always crashes.

This to me sounds like a bug.

 

So, I am wondering WHY I am in DH via Kex Via SSH-2 in the first place.

I am trying to get this to work via RSA which I had installed under Crypt.

 

Based on tons of research, my new calls looks like this:

 

my $ssh = Net::SSH::Perl->new($host, 

                              user => "mcoons",

                              debug => true,

                              protocol => "2",

                              sys_config => "/etc/ssh/sshd_config", 

                              identity_files =>
"/var/home/mcoons/.ssh/id_rsa /var/home/mcoons/.ssh/id_rsa.pub"

,

                              options => ["RhostsRSAAuthentication yes",

                                          "HostbasedAuthentication yes",

                                          "PreferredAuthentications
publickey,hostbased,password,keyboard-inter

active",

                                          "EnableSSHKeysign yes"]);

                         

$ssh->login("mcoons");

 

<ERROR in LOGIN>

 

Any ideas why I am not routing to RSA in the login and to DH? 

 

Thanks

 

Michael Coons

Dedicated Tech. Lead

Work 303-305-5124

  _____  

From: Michael Coons [mailto:mic...@mc...] 
Sent: Monday, August 15, 2005 3:56 PM
To: 'ssh...@li...'
Subject: Problem in NET::SSH::Perl Invalid arguments divll 

 

Ok, I am trying to get this module to work. I think that I have installed
what was needed. 

 

Running on Solaris 2.8 with Perl 5.8.0 compiled 64-bit. I am using RSA keys.
I point to the pub key in the identity files param.

 

My test program is (Obviously private info <> out )

 

#!/usr/local/bin/perl

 

my $host = "<hostname>";

my %args;

$args{user} = "<user>";

$args{protocol} = "2,1";

#$args{identity_files} = "$ENV{HOME}/.ssh/authorized_keys";

$args{identity_files} = "$ENV{HOME}/.ssh/id_rsa.pub";

$args{sys_config} = "/etc/ssh/sshd_config";

$args{user_config} = "/etc/ssh/ssh_config";

$args{debug} = "true";

 

use Net::SSH::Perl;

my $ssh = Net::SSH::Perl->new($host, %args);

$ssh->login("<user>");

 

my $cmd ="ls -1 <directory>";

 

my($stdout, $stderr, $exit) = $ssh->cmd($cmd);

 

I get back

 

<src machine>: Reading configuration data /etc/ssh/ssh_config

<src machine>:: Reading configuration data /etc/ssh/sshd_config

<src machine>:: Connecting to <remote machine>, port 22.

<src machine>:: Remote protocol version 1.99, remote software version
OpenSSH_3.4p1

<src machine>:: Net::SSH::Perl Version 1.23, protocol version 2.0.

<src machine>:: No compat match: OpenSSH_3.4p1.

<src machine>:: Connection established.

<src machine>:: Sent key-exchange init (KEXINIT), wait response.

<src machine>:: Algorithms, c->s: 3des-cbc hmac-sha1 none

<src machine>:: Algorithms, s->c: 3des-cbc hmac-sha1 none

PARI:   ***   Invalid arguments to divll. at
/usr/local/lib/perl5/site_perl/5.8.0/Crypt/DH.pm line 29, <GEN0> line 1.

 

 

Any ideas?

 

Michael Coons

Dedicated Tech. Lead

Work 303-305-5124