D7net
Home
Console
Upload
information
Create File
Create Folder
About
Tools
:
/
proc
/
thread-self
/
root
/
usr
/
local
/
maldetect.bk3614913
/
internals
/
Filename :
hexfifo.pl
back
Copy
#!/usr/bin/perl # ## # Linux Malware Detect v1.6.5 # (C) 2002-2023, R-fx Networks <proj@r-fx.org> # (C) 2023, Ryan MacDonald <ryan@r-fx.org> # This program may be freely redistributed under the terms of the GNU GPL v2 ## # if ($#ARGV != "0") { print "usage: hexfile\n"; exit; } $hexfile = $ARGV[0]; $named_pipe_name = "/usr/local/maldetect/internals/hexfifo"; $timeout = "1"; if (-p $named_pipe_name) { eval { local $SIG{ALRM} = sub { die "alarm\n" }; # NB: \n required alarm $timeout; if (sysopen(FIFO, $named_pipe_name, O_RDONLY)) { while(my $this_line = <FIFO>) { chomp($this_line); $return .= $this_line; } close(FIFO); } else { $errormsg = "ERROR: Failed to open named pipe $named_pipe_name for reading: $!"; } alarm 0; }; if ($@) { if ($@ eq "alarm\n") { # timed out $errormsg = "Timed out reading from named pipe $named_pipe_name"; } else { $errormsg = "Error reading from named pipe: $!"; } } else { # didn't time out $instr = $return; } } $dat_hexstring=$hexfile; open(DAT, $dat_hexstring) || die("Could not open $dat_hexstring"); @raw_data=<DAT>; close(DAT); foreach $hexptr (@raw_data) { chomp($hexptr); ($ptr,$name)=split(/:/,$hexptr); if ( grep(/$ptr/, $instr) ) { print "$ptr $name \n"; exit; } }
Name
Size
Last Modified
Owner
Permissions
Actions
VERSION.hash
0.063
KB
February 22 2025 10:04:29
root
0644
compat.conf
3.831
KB
September 07 2018 1:37:50
root
0644
functions
85.057
KB
April 08 2023 10:05:08
root
0644
hexfifo.pl
1.381
KB
March 27 2023 7:28:51
root
0644
hexstring.pl
0.629
KB
March 27 2023 7:28:41
root
0644
importconf
14.811
KB
March 27 2023 7:44:18
root
0644
internals.conf
4.29
KB
March 28 2023 2:41:42
root
0644
panel_alert.etpl
2.121
KB
March 27 2023 7:17:37
root
0644
scan.etpl
2.291
KB
September 26 2018 4:51:39
root
0644
tlog
2.438
KB
September 27 2015 7:38:49
root
0750
2017 © D7net | D704T team