我有一个Linux(openSUSE 10.X)盒子,上面有一个SFTP服务。
当有人放入文件时,我必须编写一个脚本来将文件移动到另一个目录。我不想写一份cron工作。是否有事件或其他事情可以查看是否已发送文件?
答案 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服务器而不是默认服务器。