in reply to Checking for unlinked process executables
my $pid; for $pid (0..65536) { #test -f $pid/cmdline && (cat $pid/cmdline; echo $pid); next unless -f "/proc/$pid/exe"; my $target = readlink "/proc/$pid/exe"; next if -f $target; open F, "< /proc/$pid/cmdline"; my @data = <F>; print "ALERT: '@data' is running (pid $pid)\n"; close F; local $/ = "\x00"; open F, "< /proc/$pid/environ"; @data = <F>; print "ALERT: 'environment: @data'\n"; close F; };
Liz
|
|---|