This is an automated email from the git hooks/post-receive script. x2go pushed a change to branch master in repository telekinesis. from cb8e62d fix typo new 748f7ed finalize tekidata-sftpserver The 1 revisions listed above as "new" are entirely new to this repository and will be described in separate emails. The revisions listed as "adds" were already present in the repository and have only been added to this reference. Summary of changes: .../lib/telekinesis/server/bin/tekidata-sftpserver | 36 ++------------------ 1 file changed, 3 insertions(+), 33 deletions(-) -- Alioth's /srv/git/_hooks_/post-receive-email on /srv/git/code.x2go.org/telekinesis.git
This is an automated email from the git hooks/post-receive script. x2go pushed a commit to branch master in repository telekinesis. commit 748f7ed13497960ebcaa16885d5985973fc8adf4 Author: Mike Gabriel <mike.gabriel@das-netzwerkteam.de> Date: Wed Oct 1 15:26:49 2014 +0200 finalize tekidata-sftpserver --- .../lib/telekinesis/server/bin/tekidata-sftpserver | 36 ++------------------ 1 file changed, 3 insertions(+), 33 deletions(-) diff --git a/server/lib/telekinesis/server/bin/tekidata-sftpserver b/server/lib/telekinesis/server/bin/tekidata-sftpserver index 679c106..9fbd036 100755 --- a/server/lib/telekinesis/server/bin/tekidata-sftpserver +++ b/server/lib/telekinesis/server/bin/tekidata-sftpserver @@ -5,21 +5,7 @@ use warnings; use Net::SFTP::SftpServer ( { log => 'local5' }, qw ( :LOG :ACTIONS ) ); use BSD::Resource; # for setrlimit -use constant DEBUG_USER => { - SFTPTEST => 1, -} - -# Security - make sure we have started this as sftp not ssh -#unless ( scalar @ARGV == 3 and -# $ARGV[1] eq '-c' and -# ($ARGV[2] eq '/usr/lib/telekinesis/server/bin/tekidata-sftpserver') ){ -# -# logError "SFTP connection attempted for application $ARGV[1], $ARGV[2] - exiting"; -# print "\n\rYou do not have permission to login interactively to this host.\n\r\n\rPlease contact the system administrator if you believe this to be a configuration error.\n\r"; -# exit 1; -#} - -my $session_name = shift; +my $session_name = shift or die "Need session name/id is first argument."; my $my_home = $ENV{HOME}; my $MEMLIMIT = 100 * 1024 * 1024; # 100 Mb @@ -28,18 +14,14 @@ my $MEMLIMIT = 100 * 1024 * 1024; # 100 Mb setrlimit( RLIMIT_RSS, $MEMLIMIT, $MEMLIMIT ); setrlimit( RLIMIT_VMEM, $MEMLIMIT, $MEMLIMIT ); -my $debug = (defined DEBUG_USER->{uc(getpwuid($>))} and DEBUG_USER->{uc(getpwuid($>))}) ? 1 : 0; - my $sftp = Net::SFTP::SftpServer->new( - debug => $debug, + debug => 0, home => "$my_home/.x2go/C-$session_name/telekinesis/remote", file_perms => 0600, -# on_file_sent => \&ActionOnSent, -# on_file_received => \&ActionOnReceived, valid_filename_char => [ 'a' .. 'z', 'A' .. 'Z', '0' .. '9', '_', '.', '-' ], - follow_symlinks => 1, deny => ALL, allow => [ ( + NET_SFTP_SYMLINKS, SSH2_FXP_OPEN, SSH2_FXP_CLOSE, SSH2_FXP_READ, @@ -48,9 +30,7 @@ my $sftp = Net::SFTP::SftpServer->new( SSH2_FXP_FSTAT, SSH2_FXP_OPENDIR, SSH2_FXP_READDIR, - SSH2_FXP_REMOVE, SSH2_FXP_STAT, - SSH2_FXP_RENAME, SSH2_FXP_READLINK, )], fake_ok => [ ( @@ -60,13 +40,3 @@ my $sftp = Net::SFTP::SftpServer->new( ); $sftp->run(); - -sub ActionOnSent { - my $fileObject = shift; - ## Do Stuff -} - -sub ActionOnReceived { - my $fileObject = shift; - ## Do Stuff -} -- Alioth's /srv/git/_hooks_/post-receive-email on /srv/git/code.x2go.org/telekinesis.git