Re^6: sftp->do_write howto?

Here's the latest with your debug code:

#!/usr/bin/perl
use Net::SFTP;
use Net::SFTP::Constants qw/:flags/;
use strict;
use warnings;

my (
        $filename,
        $payload,
        $host,
        $sftp,
        %args,
        $path,
        $handle,
        $err_code, $err_mesg
        );

$filename = "testfile.dat";
$payload = "qwertyuiop";

%args = (user => "yyyyyyyyyy",
                  password => "xxxxxx");
$host = "a.b.c.d";
$path = "/network/www/ticketattach/".$filename;

print "connecting\n";
eval { $sftp = Net::SFTP->new($host, %args) };
($err_code, $err_mesg) = $sftp->status;
if($err_code)
{
    print "Err_code:$err_code | err_mesg:$err_mesg\n";
    exit $err_code
};

print "open\n";
$handle = $sftp->do_open($path, SSH2_FXF_WRITE | SSH2_FXF_CREAT);
#$handle = $sftp->do_open($path, 0x02| 0x08);
($err_code, $err_mesg) = $sftp->status;
if($err_code)
{
    print "Err_code:$err_code | err_mesg:$err_mesg\n";
    exit $err_code
};
print "write\n";
$sftp->do_write($handle, 0, $payload);
($err_code, $err_mesg) = $sftp->status;
if($err_code)
{
    print "Err_code:$err_code | err_mesg:$err_mesg\n";
    exit $err_code
};

print "close\n";
$sftp->do_close($handle);
($err_code, $err_mesg) = $sftp->status;
if($err_code)
{
    print "Err_code:$err_code | err_mesg:$err_mesg\n";
    exit $err_code
};
[download]

and the response was...

connecting
Can't call method "status" on an undefined value at ./sftp.pl line 28.
[download]

and as mentioned before I can ssh/sftp fine from the cmd line, but running this script from the same env manually does the above .. grrr... ie won't connect, forget about uploading.
Cheers
Chris

Comment on Re^6: sftp->do_write howto? Select or Download Code

Replies are listed 'Best First'.
Re^7: sftp->do_write howto? by insaniac (Friar) on Sep 28, 2005 at 11:32 UTC
Hm... further investigations make me think there's a bug in Net::SSH::Perl or Net::SFTP. try adding this to your code: `my %args = ( user => 'user', password => 'password', ssh_args => [ debug => 1, options => [ "PreferredAuthentications 'keyboard-interactive,password,h +ostbased,publickey'", ] ], );` [download] and then: `eval { $sftp = Net::SFTP->new($host, %args) }; die "Connection failed: $!\n" if $!; die "No SFTP object\n" unless $sftp;` [download] my output goes like: wolf: Reading configuration data /home/insaniac/.ssh/config wolf: Reading configuration data /etc/ssh_config wolf: Connecting to bear, port 22. wolf: Remote protocol version 2.0, remote software version OpenSSH_4.2 +p1 Debian-4 wolf: Net::SSH::Perl Version 1.28, protocol version 2.0. wolf: No compat match: OpenSSH_4.2p1 Debian-4. wolf: Connection established. wolf: Sent key-exchange init (KEXINIT), wait response. wolf: Algorithms, c->s: 3des-cbc hmac-sha1 none wolf: Algorithms, s->c: 3des-cbc hmac-sha1 none wolf: Entering Diffie-Hellman Group 1 key exchange. wolf: Sent DH public key, waiting for reply. wolf: Received host key, type 'ssh-dss'. wolf: Host 'bear' is known and matches the host key. wolf: Computing shared secret key. wolf: Verifying server signature. wolf: Waiting for NEWKEYS message. wolf: Enabling incoming encryption/MAC/compression. wolf: Send NEWKEYS, enable outgoing encryption/MAC/compression. wolf: Sending request for user-authentication service. wolf: Service accepted: ssh-userauth. wolf: Trying empty user-authentication request. wolf: Authentication methods that can continue: publickey,keyboard-int +eractive. wolf: Next method to try is publickey. wolf: Trying pubkey authentication with key file '/home/insaniac/.ssh/ +id_dsa' wolf: Authentication methods that can continue: publickey,keyboard-int +eractive. wolf: Next method to try is publickey. Connection failed: No such file or directory [download] So when I try authenticating with an ssh-key, all works out perfectly. When I try to supply a username and a password, they seem to be ignored.. maybe we need to supply a specific value to ssh_args ? Per default, Net::SFTP uses the username that's executing the script as SSH username... I'll keep you informed if I find a solution... Cheers, Johnny to ask a question is a moment of shame to remain ignorant is a lifelong shame	[reply] [d/l] [select]
Re^7: sftp->do_write howto? by insaniac (Friar) on Sep 28, 2005 at 11:58 UTC
Of course! How foolish of me... all we needed was debugging enabled ;-) You're remote SSH server is probably not accepting cleartext password tunneling. In other words, its /etc/ssh/sshd_config is saying something like: `PasswordAuthentication no` [download] And that's what's causing (my) error when trying to use a username and password for authentication. When I changed it to yes, and restarted the remote SSH server, the scripts works, because debugging now said: wolf: Sending request for user-authentication service. wolf: Service accepted: ssh-userauth. wolf: Trying empty user-authentication request. wolf: Authentication methods that can continue: publickey,password,keyboard-interactive. Where it used to be (with `PasswordAuthentication no`): wolf: Sending request for user-authentication service. wolf: Service accepted: ssh-userauth. wolf: Trying empty user-authentication request. wolf: Authentication methods that can continue: publickey,keyboard-interactive. So the above debugging says that the remote SSH server only accepts ssh keys or a keyboard interactive password.. My advise is: create an ssh-key for the user that runs your script, and add the public key of that user to the `authorized_keys` file of your remote user. This is more secure than enabling clear text password tunneling ;-) HTH to ask a question is a moment of shame to remain ignorant is a lifelong shame	[reply] [d/l] [select]
Re^8: sftp->do_write howto? by chrism01 (Friar) on Sep 30, 2005 at 02:08 UTC
Wolf, That's extremely enlightening and probably correct. The line in the config file is commented out, but I suspect it defaults to no (it's a BSD box). I certainly get the response you mentioned for 'no' when I added the debugging. It's been decided however that due to the low value of the info and multi-layer security (it's entirely an internal system) that we really don't need to take this any further. I'll certainly try and remember it for future ref though(!) I didn't realise there was a diff between interactive passwd and via a script. I assumed it'd use the same encryption/checking... wrong.. :-( Thx again Chris PS: how's your Net::SNMP? See my node 495954.	[reply]
Re^9: sftp->do_write howto? by insaniac (Friar) on Sep 30, 2005 at 09:04 UTC
wolf is just the name of my laptop ;-) I've replied your Net::SNMP node, hope it helps... Cheers mate.. to ask a question is a moment of shame to remain ignorant is a lifelong shame	[reply]