Linux ns8.secondary29.go.th 2.6.32-754.28.1.el6.x86_64 #1 SMP Wed Mar 11 18:38:45 UTC 2020 x86_64
Apache/2.2.15 (CentOS)
: 122.154.134.11 | : 122.154.134.9
Cant Read [ /etc/named.conf ]
5.6.40
apache
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
libexec /
webmin /
dhcpd /
[ HOME SHELL ]
Name
Size
Permission
Action
help
[ DIR ]
drwxr-xr-x
images
[ DIR ]
drwxr-xr-x
lang
[ DIR ]
drwxr-xr-x
CHANGELOG
3.61
KB
-rw-r--r--
acl_security.pl
10.09
KB
-rwxr-xr-x
backup_config.pl
699
B
-rwxr-xr-x
cgi_args.pl
358
B
-rwxr-xr-x
config-Amazon-Linux-2-ALL
318
B
-rw-r--r--
config-CentOS-Linux-5
363
B
-rw-r--r--
config-CentOS-Linux-6.0-6.9
369
B
-rw-r--r--
config-CentOS-Linux-7.0-ALL
318
B
-rw-r--r--
config-Redhat-Enterprise-Linux...
369
B
-rw-r--r--
config-Redhat-Enterprise-Linux...
318
B
-rw-r--r--
config-Scientific-Linux-6.0-6....
369
B
-rw-r--r--
config-Scientific-Linux-7.0-AL...
342
B
-rw-r--r--
config-Ubuntu-Linux-12.04-ALL
371
B
-rw-r--r--
config-Ubuntu-Linux-8.10-10.04...
390
B
-rw-r--r--
config-cobalt-linux
223
B
-rw-r--r--
config-coherent-linux
363
B
-rw-r--r--
config-corel-linux
215
B
-rw-r--r--
config-debian-linux
318
B
-rw-r--r--
config-debian-linux-3.0
345
B
-rw-r--r--
config-debian-linux-3.1-5.9
377
B
-rw-r--r--
config-debian-linux-6.0-ALL
383
B
-rw-r--r--
config-freebsd
231
B
-rw-r--r--
config-freebsd-8-ALL
408
B
-rw-r--r--
config-generic-linux
212
B
-rw-r--r--
config-gentoo-linux
313
B
-rw-r--r--
config-hpux
227
B
-rw-r--r--
config-irix
208
B
-rw-r--r--
config-macos
208
B
-rw-r--r--
config-mandrake-linux
323
B
-rw-r--r--
config-msc-linux
223
B
-rw-r--r--
config-netbsd
215
B
-rw-r--r--
config-open-linux
212
B
-rw-r--r--
config-open-linux-3.1e
359
B
-rw-r--r--
config-openbsd
215
B
-rw-r--r--
config-openbsd-3.6-ALL
197
B
-rw-r--r--
config-openmamba-linux
212
B
-rw-r--r--
config-openserver
208
B
-rw-r--r--
config-osf1
208
B
-rw-r--r--
config-pardus-linux
311
B
-rw-r--r--
config-redhat-linux
212
B
-rw-r--r--
config-redhat-linux-13.1-19.0
364
B
-rw-r--r--
config-redhat-linux-20.0-23.0
369
B
-rw-r--r--
config-redhat-linux-24.0-ALL
372
B
-rw-r--r--
config-redhat-linux-6.0-6.2
223
B
-rw-r--r--
config-redhat-linux-7.0-13.0
363
B
-rw-r--r--
config-slackware-linux
218
B
-rw-r--r--
config-slackware-linux-4.0
224
B
-rw-r--r--
config-slackware-linux-7.1-ALL
223
B
-rw-r--r--
config-sol-linux
243
B
-rw-r--r--
config-solaris
208
B
-rw-r--r--
config-suse-linux
223
B
-rw-r--r--
config-suse-linux-7.1-7.3
221
B
-rw-r--r--
config-suse-linux-8.0
346
B
-rw-r--r--
config-suse-linux-8.2-9.1
359
B
-rw-r--r--
config-suse-linux-9.2-ALL
362
B
-rw-r--r--
config-trustix-linux
344
B
-rw-r--r--
config-turbo-linux
212
B
-rw-r--r--
config-united-linux
346
B
-rw-r--r--
config-unixware
244
B
-rw-r--r--
config.info
1.26
KB
-rw-r--r--
config.info.ca
1.44
KB
-rw-r--r--
config.info.ca.UTF-8
1.46
KB
-rw-r--r--
config.info.cz
1.13
KB
-rw-r--r--
config.info.cz.UTF-8
1.19
KB
-rw-r--r--
config.info.da
1.13
KB
-rw-r--r--
config.info.da.UTF-8
1.13
KB
-rw-r--r--
config.info.de
1.42
KB
-rw-r--r--
config.info.de.UTF-8
1.42
KB
-rw-r--r--
config.info.es
509
B
-rw-r--r--
config.info.es.UTF-8
513
B
-rw-r--r--
config.info.fa
1.73
KB
-rw-r--r--
config.info.fr
1.2
KB
-rw-r--r--
config.info.fr.UTF-8
1.2
KB
-rw-r--r--
config.info.ja_JP.UTF-8
1.29
KB
-rw-r--r--
config.info.ja_JP.euc
1019
B
-rw-r--r--
config.info.nl
1.34
KB
-rw-r--r--
config.info.nl.UTF-8
1.34
KB
-rw-r--r--
config.info.no
1.33
KB
-rw-r--r--
config.info.no.UTF-8
1.33
KB
-rw-r--r--
config.info.pl
1.33
KB
-rw-r--r--
config.info.pl.UTF-8
1.37
KB
-rw-r--r--
config.info.pt_BR
1.33
KB
-rw-r--r--
config.info.pt_BR.UTF-8
1.34
KB
-rw-r--r--
config.info.ru.UTF-8
1.06
KB
-rw-r--r--
config.info.ru_RU
721
B
-rw-r--r--
config.info.ru_RU.UTF-8
1.06
KB
-rw-r--r--
config.info.ru_SU
721
B
-rw-r--r--
config.info.sk
1.2
KB
-rw-r--r--
config.info.sk.UTF-8
1.26
KB
-rw-r--r--
config.info.sv
383
B
-rw-r--r--
config.info.sv.UTF-8
394
B
-rw-r--r--
config.info.tr
241
B
-rw-r--r--
config.info.uk_UA
753
B
-rw-r--r--
config.info.uk_UA.UTF-8
1.09
KB
-rw-r--r--
config.info.zh_CN
162
B
-rw-r--r--
config.info.zh_CN.UTF-8
197
B
-rw-r--r--
config.info.zh_TW.Big5
1.18
KB
-rw-r--r--
config.info.zh_TW.UTF-8
1.02
KB
-rw-r--r--
confirm_delete.cgi
3.03
KB
-rwxr-xr-x
defaultacl
221
B
-rw-r--r--
delete_all.cgi
2.02
KB
-rwxr-xr-x
delete_hosts.cgi
1.57
KB
-rwxr-xr-x
delete_leases.cgi
1.04
KB
-rwxr-xr-x
delete_subnets.cgi
1.58
KB
-rwxr-xr-x
dhcpd-lib.pl
25.75
KB
-rwxr-xr-x
edit_group.cgi
7.14
KB
-rwxr-xr-x
edit_host.cgi
10.03
KB
-rwxr-xr-x
edit_iface.cgi
3.42
KB
-rwxr-xr-x
edit_keys.cgi
1.61
KB
-rwxr-xr-x
edit_options.cgi
9.08
KB
-rwxr-xr-x
edit_pool.cgi
3.32
KB
-rwxr-xr-x
edit_shared.cgi
5.64
KB
-rwxr-xr-x
edit_subnet.cgi
6.48
KB
-rwxr-xr-x
edit_text.cgi
869
B
-rwxr-xr-x
edit_zones.cgi
1.8
KB
-rwxr-xr-x
index.cgi
20.24
KB
-rwxr-xr-x
install_check.pl
557
B
-rwxr-xr-x
list_leases.cgi
8.75
KB
-rwxr-xr-x
log_parser.pl
1003
B
-rwxr-xr-x
lookup_group.cgi
1.02
KB
-rwxr-xr-x
lookup_host.cgi
2.1
KB
-rwxr-xr-x
lookup_shared.cgi
915
B
-rwxr-xr-x
lookup_subnet.cgi
969
B
-rwxr-xr-x
module.info
464
B
-rw-r--r--
module.info.ca
102
B
-rw-r--r--
module.info.ca.UTF-8
114
B
-rw-r--r--
module.info.cz
20
B
-rw-r--r--
module.info.cz.UTF-8
26
B
-rw-r--r--
module.info.de
114
B
-rw-r--r--
module.info.de.UTF-8
126
B
-rw-r--r--
module.info.es
25
B
-rw-r--r--
module.info.es.UTF-8
31
B
-rw-r--r--
module.info.fr
21
B
-rw-r--r--
module.info.fr.UTF-8
27
B
-rw-r--r--
module.info.ja_JP.UTF-8
32
B
-rw-r--r--
module.info.ja_JP.euc
27
B
-rw-r--r--
module.info.ko_KR.UTF-8
30
B
-rw-r--r--
module.info.ko_KR.euc
26
B
-rw-r--r--
module.info.ms_MY
105
B
-rw-r--r--
module.info.ms_MY.UTF-8
117
B
-rw-r--r--
module.info.nl
20
B
-rw-r--r--
module.info.nl.UTF-8
26
B
-rw-r--r--
module.info.no
20
B
-rw-r--r--
module.info.no.UTF-8
26
B
-rw-r--r--
module.info.pl
105
B
-rw-r--r--
module.info.pl.UTF-8
120
B
-rw-r--r--
module.info.pt
25
B
-rw-r--r--
module.info.pt.UTF-8
31
B
-rw-r--r--
module.info.ru.UTF-8
32
B
-rw-r--r--
module.info.ru_RU
23
B
-rw-r--r--
module.info.ru_RU.UTF-8
35
B
-rw-r--r--
module.info.ru_SU
23
B
-rw-r--r--
module.info.sk
20
B
-rw-r--r--
module.info.sk.UTF-8
26
B
-rw-r--r--
module.info.sv
20
B
-rw-r--r--
module.info.sv.UTF-8
26
B
-rw-r--r--
module.info.tr
22
B
-rw-r--r--
module.info.zh_CN
22
B
-rw-r--r--
module.info.zh_TW.Big5
28
B
-rw-r--r--
params-lib.pl
5.96
KB
-rwxr-xr-x
rbac-mapping
69
B
-rw-r--r--
restart.cgi
364
B
-rwxr-xr-x
save_group.cgi
3.89
KB
-rwxr-xr-x
save_host.cgi
5.42
KB
-rwxr-xr-x
save_iface.cgi
3.44
KB
-rwxr-xr-x
save_keys.cgi
1.11
KB
-rwxr-xr-x
save_options.cgi
8.15
KB
-rwxr-xr-x
save_pool.cgi
2.51
KB
-rwxr-xr-x
save_shared.cgi
6.1
KB
-rwxr-xr-x
save_subnet.cgi
6.2
KB
-rwxr-xr-x
save_text.cgi
717
B
-rwxr-xr-x
save_zones.cgi
1.73
KB
-rwxr-xr-x
start.cgi
343
B
-rwxr-xr-x
stop.cgi
321
B
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : save_shared.cgi
#!/usr/bin/perl # save_shared.cgi # Update, create or delete a shared network require './dhcpd-lib.pl'; require './params-lib.pl'; &ReadParse(); &lock_all_files(); ($par, $sha, $indent) = &get_branch('sha', $in{'new'}); $parconf = $par->{'members'}; # check acls %access = &get_module_acl(); &error_setup($text{'eacl_aviol'}); if ($in{'delete'}) { &error("$text{'eacl_np'} $text{'eacl_pdn'}") if !&can('rw', \%access, $sha, 1); } elsif ($in{'options'}) { &error("$text{'eacl_np'} $text{'eacl_psn'}") if !&can('r', \%access, $sha); } elsif ($in{'new'}) { &error("$text{'eacl_np'} $text{'eacl_pin'}") unless &can('c', \%access, $sha) && &can('rw', \%access, $par); # restrict duplicates if($access{'uniq_sha'}) { foreach $s (&find("shared-network", &get_config())) { &error("$text{'eacl_np'} $text{'eacl_uniq'}") if lc $s->{'values'}->[0] eq lc $in{'name'}; } } } else { &error("$text{'eacl_np'} $text{'eacl_pun'}") if !&can('rw', \%access, $sha); } # save if ($in{'options'}) { # Redirect to client options &redirect("edit_options.cgi?idx=$in{'idx'}"); exit; } else { if ($in{'delete'}) { &error_setup($text{'sshared_faildel'}); } else { &error_setup($text{'sshared_failsave'}); $in{'name'} =~ /^\S+$/ || &error($text{'sshared_invalidsname'}); $sha->{'values'} = [ $in{'name'} ]; $sha->{'comment'} = $in{'desc'}; } # Move hosts, groups and subnets into or out of this shared network @wasin = &find("host", $sha->{'members'}); foreach $hn (split(/\0/, $in{'hosts'})) { if ($hn =~ /(\d+),(\d+)/) { push(@nowin, $parconf->[$2]->{'members'}->[$1]); $nowpr{$parconf->[$2]->{'members'}->[$1]} = $parconf->[$2]; } elsif ($hn =~ /(\d+),/) { push(@nowin, $parconf->[$1]); $nowpr{$parconf->[$1]} = $par; } if ($nowin[$#nowin]->{'name'} ne "host") { &error($text{'sgroup_echanged'}); } } @wasgin = &find("group", $sha->{'members'}); foreach $gn (split(/\0/, $in{'groups'})) { if ($gn =~ /(\d+),(\d+)/) { push(@nowgin, $parconf->[$2]->{'members'}->[$1]); $nowgpr{$parconf->[$2]->{'members'}->[$1]} = $parconf->[$2]; } elsif ($gn =~ /(\d+),/) { push(@nowgin, $parconf->[$1]); $nowgpr{$parconf->[$1]} = $par; } if ($nowgin[$#nowgin]->{'name'} ne "group") { &error($text{'sgroup_echanged'}); } } @wasuin = &find("subnet", $sha->{'members'}); foreach $un (split(/\0/, $in{'subnets'})) { if ($un =~ /(\d+),(\d+)/) { push(@nowuin, $parconf->[$2]->{'members'}->[$1]); $nowupr{$parconf->[$2]->{'members'}->[$1]} = $parconf->[$2]; } elsif ($un =~ /(\d+),/) { push(@nowuin, $parconf->[$1]); $nowupr{$parconf->[$1]} = $par; } if ($nowuin[$#nowuin]->{'name'} ne "subnet") { &error($text{'sgroup_echanged'}); } } &error_setup($text{'eacl_aviol'}); foreach $h (&unique(@wasin, @nowin)) { $was = &indexof($h, @wasin) != -1; $now = &indexof($h, @nowin) != -1; # per-host ACLs for new or updated hosts if ($was != $now && !&can('rw', \%access, $h)) { &error("$text{'eacl_np'} $text{'eacl_pun'}"); } if ($was && !$now) { # Move out of the shared network &save_directive($sha, [ $h ], [ ], 0); &save_directive($par, [ ], [ $h ], 0); } elsif ($now && !$was) { # Move into the shared network (maybe from another) &save_directive($nowpr{$h}, [ $h ], [ ], 0); &save_directive($sha, [ ], [ $h ], 1); } } foreach $g (&unique(@wasgin, @nowgin)) { $was = &indexof($g, @wasgin) != -1; $now = &indexof($g, @nowgin) != -1; # per-group ACLs for new or updated groups if ($was != $now && !&can('rw', \%access, $g)) { &error("$text{'eacl_np'} $text{'eacl_pun'}"); } if ($was && !$now) { # Move out of the shared network &save_directive($sha, [ $g ], [ ], 0); &save_directive($par, [ ], [ $g ], 0); } elsif ($now && !$was) { # Move into the shared network (maybe from another) &save_directive($nowgpr{$g}, [ $g ], [ ], 0); &save_directive($sha, [ ], [ $g ], 1); } } foreach $u (&unique(@wasuin, @nowuin)) { $was = &indexof($u, @wasuin) != -1; $now = &indexof($u, @nowuin) != -1; # per-subnet ACLs for new or updated subnetss if ($was != $now && !&can('rw', \%access, $u)) { &error("$text{'eacl_np'} $text{'eacl_pun'}"); } if ($was && !$now) { # Move out of the shared network &save_directive($sha, [ $u ], [ ], 0); &save_directive($par, [ ], [ $u ], 0); if ($par->{'name'} eq "shared-network") { &fix_sequence($par); } } elsif ($now && !$was) { # Move into the shared network (maybe from another) &save_directive($nowupr{$u}, [ $u ], [ ], 0); &save_directive($sha, [ ], [ $u ], 1); if ($nowupr{$u}->{'name'} eq "shared-network") { &check_subnets($nowupr{$u}); } } } &check_subnets($sha); &fix_sequence($sha); if (!$in{'delete'}) { &parse_params($sha); if ($in{'new'}) { # Add this shared net &save_directive($par, [ ], [ $sha ], 0); } else { # Update shared net &save_directive($par, [ $sha ], [ $sha ], 0); } } } &flush_file_lines(); if ($in{'delete'}) { # Delete this net if ($in{'hosts'} eq "" && $in{'groups'} eq "" && $in{'subnets'} eq "") { &save_directive($par, [ $sha ], [ ], 0); &flush_file_lines(); } else { &unlock_all_files(); &redirect("confirm_delete.cgi?idx=$in{'idx'}\&type=0"); exit; } } &unlock_all_files(); &webmin_log($in{'delete'} ? 'delete' : $in{'new'} ? 'create' : 'modify', 'shared', $sha->{'values'}->[0], \%in); &redirect(""); # check whether thist shared network contains any subnet sub check_subnets { local(@subnets); @subnets = &find("subnet", $_[0]->{'members'}); if (@subnets == 0) { &error_setup($text{'sshared_failsave'}); &error(&text('sshared_nosubnet', $_[0]->{'values'}->[0])); } } # force hosts and groups to follow subnets sub fix_sequence { local(@subnets, $max, $u, $i); @subnets = &find("subnet", $_[0]->{'members'}); $max = -1; foreach $u (@subnets) { $max = $u->{'index'} > $max ? $u->{'index'} : $max; } for ($i = 0; $i < $max; $i++) { $u = $_[0]->{'members'}->[$i]; if ($u->{'name'} eq "host" || $u->{'name'} eq "group") { # move to the end of list &save_directive($_[0], [ $u ], [ ], 0); &save_directive($_[0], [ ], [ $u ], 0); } } }
Close
