uawdijnntqw1x1x1
IP : 216.73.216.181
Hostname : xhost1.intravision.ru
Kernel : Linux xhost1.intravision.ru 3.16.0-7-amd64 #1 SMP Debian 3.16.59-1 (2018-10-03) x86_64
Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,
OS : Linux
PATH:
/
var
/
lib
/
.
/
nfs
/
..
/
python-support
/
..
/
..
/
share
/
python
/
..
/
java
/
..
/
python3
/
..
/
webmin
/
fsdump
/
rmulti.pl
/
/
#!/usr/bin/perl # rmulti.pl # Called when a tape change is needed for a multi-file restore. Links the # base filename to the next one in the ordered sequence of multi-files $no_acl_check++; delete($ENV{'SCRIPT_NAME'}); # force use of $0 to determine module delete($ENV{'FOREIGN_MODULE_NAME'}); require './fsdump-lib.pl'; $ARGV[0] =~ /^(.*)\/([^\/]+)$/ || die "Missing filename"; $dir = $1; $file = $2; # Find out where we are up to $lnk = readlink($ARGV[0]); if ($lnk =~ /^\Q$file\E\.(\d+)$/ && -r "$dir/$lnk" && !$ARGV[1]) { # Going to next file $nxt = "$file.".($1 + 1); } else { # First file -r $ARGV[0] && !-l $ARGV[0] && die "$ARGV[0] is not a link to the current archive!"; $nxt = "$file.1"; } # Update the link unlink($ARGV[0]); symlink($nxt, $ARGV[0]); exit(0);
/var/lib/./nfs/../python-support/../../share/python/../java/../python3/../webmin/fsdump/rmulti.pl