X-Git-Url: https://git.ralfj.de/schsh.git/blobdiff_plain/5271c7e79fc1c1250a9c9d20f461638b8cb1f44a..dfca8b2c20279ae3eb6af235b3732b2f0e1d6353:/schsh-rrsync?ds=inline diff --git a/schsh-rrsync b/schsh-rrsync old mode 100755 new mode 100644 index bb51629..9542636 --- a/schsh-rrsync +++ b/schsh-rrsync @@ -3,16 +3,40 @@ # Purpose: Restricts rsync to subdirectory declared in .ssh/authorized_keys # Author: Joe Smith 30-Sep-2004 # Modified by: Wayne Davison + +# Modified by: Ralf Jung +# This file is taken from the Debian rsync package, where it resides in +# . According to the Debian package +# copyright information, it is available under GPL-3. Quoting from that information: +# > COPYRIGHT +# > --------- +# > +# > Copyright (C) 1996-2011 by Andrew Tridgell, Wayne Davison, and others. +# > +# > Rsync was originally written by Andrew Tridgell and is currently +# > maintained by Wayne Davison. It has been improved by many developers +# > from around the world. +# > +# > Rsync may be used, modified and redistributed only under the terms of +# > the GNU General Public License, found in the file: +# > +# > /usr/share/common-licenses/GPL-3 +# > +# > on Debian systems, or at +# > +# > http://www.fsf.org/licensing/licenses/gpl.html +# You can also find the license text of GPL-3 in the LICENSE-GPL3 file that +# comes with schsh. + use strict; -use Socket; +# use Socket; use Cwd 'abs_path'; use File::Glob ':glob'; # You may configure these values to your liking. See also the section # of options if you want to disable any options that rsync accepts. use constant RSYNC => '/usr/bin/rsync'; -use constant LOGFILE => 'rrsync.log'; my $Usage = < 1; $short_with_num = "[$short_with_num]" if length($short_with_num) > 1; -my $write_log = -f LOGFILE && open(LOG, '>>', LOGFILE); - -chdir($subdir) or die "$0: Unable to chdir to restricted dir: $!\n"; - my(@opts, @args); my $in_options = 1; my $last_opt = ''; @@ -191,16 +206,6 @@ die "$0: invalid rsync-command syntax or options\n" if $in_options; @args = ( '.' ) if !@args; -if ($write_log) { - my ($mm,$hh) = (localtime)[1,2]; - my $host = $ENV{SSH_CONNECTION} || 'unknown'; - $host =~ s/ .*//; # Keep only the client's IP addr - $host =~ s/^::ffff://; - $host = gethostbyaddr(inet_aton($host),AF_INET) || $host; - printf LOG "%02d:%02d %-13s [%s]\n", $hh, $mm, $host, "@opts @args"; - close LOG; -} - # Note: This assumes that the rsync protocol will not be maliciously hijacked. exec(RSYNC, @opts, @args) or die "exec(rsync @opts @args) failed: $? $!";