通过SFTP传输文件

时间:2011-12-14 01:26:55

标签: linux scheduling sftp

我有一个Linux(openSUSE 10.X)盒子,上面有一个SFTP服务。

当有人放入文件时,我必须编写一个脚本来将文件移动到另一个目录。我不想写一份cron工作。是否有事件或其他事情可以查看是否已发送文件?

2 个答案:

答案 0 :(得分:2)

您可以编写一个c应用程序并挂钩inotify个事件。

答案 1 :(得分:1)

同时检查Net::SFTP::Server,一个用Perl编写的SFTP服务器,可以扩展为执行您需要的服务。

一些代码:

#!/usr/bin/perl

use strict;
use warnings;
use File::Basename ();

my $server = Server->new(timeout => 15);
$server->run;
exit(0);

package Server;

use Net::SFTP::Server::Constants qw(SSH_FXF_WRITE);

use parent 'Net::SFTP::Server::FS';

sub handle_command_open_v3 {
    my ($self, $id, $path, $flags, $attrs) = @_;
    my $writable = $flags & SSH_FXF_WRITE;
    my $pflags = $self->sftp_open_flags_to_sysopen($flags);
    my $perms = $attrs->{mode};
    my $old_umask;
    if (defined $perms) {
    $old_umask = umask $perms;
    }
    else {
    $perms = 0666;
    }
    my $fh;
    unless (sysopen $fh, $path, $pflags, $perms) {
    $self->push_status_errno_response($id);
    umask $old_umask if defined $old_umask;
    return;
    }
    umask $old_umask if defined $old_umask;
    if ($writable) {
    Net::SFTP::Server::FS::_set_attrs($path, $attrs)
        or $self->send_status_errno_response($id);
    }
    my $hid = $self->save_file_handler($fh, $flags, $perms, $path);
    $self->push_handle_response($id, $hid);
}

sub handle_command_close_v3 {
    my $self = shift;
    my ($id, $hid) = @_;
    my ($type, $fh, $flags, $perms, $path) = $self->get_handler($hid);

    $self->SUPER::handle_command_close_v3(@_);

    if ($type eq 'file' and $flags & SSH_FXF_WRITE) {
        my $name = File::Basename::basename($path);
        rename $path, "/tmp/$name";
    }
}

将脚本保存到服务器中的某个位置chmod 755 $it,并配置OpenSSH以将其用作SFTP服务器而不是默认服务器。