Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.47
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
local /
bin /
zabbix /
[ HOME SHELL ]
Name
Size
Permission
Action
ceph-osd-stats.py
1.38
KB
-rwxr-xr-x
ceph-status.py
15.58
KB
-rwxr-xr-x
ceph-status.sh
5.69
KB
-rwxr-xr-x
ceph_health_report.py
388
B
-rwxr-xr-x
corosync.pl
774
B
-rwxr-xr-x
corosync_standby.sh
190
B
-rwxr-xr-x
discover_lsi_raid.pl
12.27
KB
-rwxr-xr-x
discover_temp_sensor.pl
1.42
KB
-rwxr-xr-x
haproxy_discovery.sh
1.93
KB
-rwxr-xr-x
haproxy_stats.sh
6.38
KB
-rwxr-xr-x
ip_discovery.sh
429
B
-rwxr-xr-x
kafka_underreplicated.sh
120
B
-rwxr-xr-x
php-fpm.discover_pools.pl
460
B
-rwxr-xr-x
smartctl-disks-discovery.pl
11.78
KB
-rwxr-xr-x
time_discovery.sh
235
B
-rwxr-xr-x
zbx_docker_inspect.sh
232
B
-rwxr-xr-x
zbx_vxfld.py
255
B
-rwxr-xr-x
zbxproxyfind.py
491
B
-rwxr-xr-x
zext_ssl_expiry.sh
546
B
-rwxr-xr-x
zookeeper_check.sh
163
B
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : discover_temp_sensor.pl
#!/usr/bin/perl # TODO add getops - pass sensor name to get temp ? # TODO see about replacing this by having zabbix connect to IPMI directly. use strict; use warnings; use Getopt::Long; my $query; GetOptions( "s|sensor=s" => \$query, ); sub exit_empty { print '{ "data": [] }'; exit; } my $ipmi = "/usr/bin/ipmitool"; # Check whether this machine has ipmi or not. (-e "/dev/ipmi0") || exit_empty(); (-e $ipmi) || exit_empty(); my %sensors; my $command = $ipmi . " sdr elist full 2>/dev/null | grep degrees"; my $output = qx($command); # Gather all the data my @lines = split /\n/, $output; # Splits output on new lines for my $line (@lines) { $line =~ s/\h+/ /g; # Removes extra white spaces # Expected line format example: # Outlet_TEMP | 42h | ok | 66.2 | 52 degrees C my @line_fields = split / \Q| /, $line; # Fields are separated by ' | ' my $sensor_name = $line_fields[0]; my $temperature = $line_fields[4]; $temperature =~ s/\s+.*$//; # strip off ' degrees C' $sensors{$sensor_name} = $temperature; } # If a sensor name was passed in, return its temperature and quit. if ($query) { print $sensors{$query}; exit; } # json-ify the sensor names for zabbix discovery my $json = qq({ "data": [\n); for my $sensor (keys %sensors) { $json .= qq( { "{#TEMPSENSOR}":"$sensor"},\n); } # trim the last ',' off, json doesn't like trailing commas $json =~ s/,\n$/\n/; # close up shop $json .= qq(]}\n); print $json; exit;
Close