Linux server.thearyasamaj.org 4.18.0-553.56.1.el8_10.x86_64 #1 SMP Tue Jun 10 05:00:59 EDT 2025 x86_64
Apache
: 103.90.241.146 | : 216.73.216.158
Cant Read [ /etc/named.conf ]
5.6.40
ftpuser@mantra.thearyasamaj.org
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 /
virtualmin-registrar /
[ HOME SHELL ]
Name
Size
Permission
Action
help
[ DIR ]
drwxr-xr-x
images
[ DIR ]
drwxr-xr-x
lang
[ DIR ]
drwxr-xr-x
newfeatures
[ DIR ]
drwxr-xr-x
CHANGELOG
990
B
-rw-r--r--
LICENSE
34.32
KB
-rw-r--r--
auto.pl
3.16
KB
-rwxr-xr-x
cgi_args.pl
857
B
-rwxr-xr-x
config
46
B
-rw-r--r--
config.info
271
B
-rw-r--r--
config.info.de
135
B
-rw-r--r--
config.info.nl
214
B
-rw-r--r--
countries.txt
9.3
KB
-rw-r--r--
create.cgi
1.16
KB
-rwxr-xr-x
create_form.cgi
936
B
-rwxr-xr-x
defaultacl
12
B
-rw-r--r--
delete.cgi
1.97
KB
-rwxr-xr-x
dereg.cgi
1.28
KB
-rwxr-xr-x
distribute-type-lib.pl
16.68
KB
-rwxr-xr-x
edit.cgi
3.27
KB
-rwxr-xr-x
edit_auto.cgi
1.91
KB
-rwxr-xr-x
edit_contact.cgi
4.18
KB
-rwxr-xr-x
edit_dereg.cgi
1.04
KB
-rwxr-xr-x
edit_import.cgi
1.38
KB
-rwxr-xr-x
edit_ns.cgi
2.04
KB
-rwxr-xr-x
edit_onecontact.cgi
2.93
KB
-rwxr-xr-x
edit_renew.cgi
1.67
KB
-rwxr-xr-x
edit_transfer.cgi
1.48
KB
-rwxr-xr-x
gandi-type-lib.pl
14.21
KB
-rwxr-xr-x
import.cgi
2.01
KB
-rwxr-xr-x
index.cgi
2.58
KB
-rwxr-xr-x
install-type
4
B
-rw-r--r--
list.cgi
1.73
KB
-rwxr-xr-x
list_contacts.cgi
1.59
KB
-rwxr-xr-x
module.info
125
B
-rw-r--r--
module.info.af.auto
42
B
-rw-r--r--
module.info.ar.auto
43
B
-rw-r--r--
module.info.be.auto
55
B
-rw-r--r--
module.info.bg.auto
70
B
-rw-r--r--
module.info.ca.auto
39
B
-rw-r--r--
module.info.cs.auto
38
B
-rw-r--r--
module.info.da.auto
39
B
-rw-r--r--
module.info.de
39
B
-rw-r--r--
module.info.el.auto
45
B
-rw-r--r--
module.info.es.auto
42
B
-rw-r--r--
module.info.eu.auto
41
B
-rw-r--r--
module.info.fa.auto
37
B
-rw-r--r--
module.info.fi.auto
50
B
-rw-r--r--
module.info.fr.auto
45
B
-rw-r--r--
module.info.he.auto
39
B
-rw-r--r--
module.info.hr.auto
39
B
-rw-r--r--
module.info.hu.auto
41
B
-rw-r--r--
module.info.it.auto
40
B
-rw-r--r--
module.info.ja.auto
37
B
-rw-r--r--
module.info.ko.auto
32
B
-rw-r--r--
module.info.lt.auto
46
B
-rw-r--r--
module.info.lv.auto
42
B
-rw-r--r--
module.info.ms.auto
38
B
-rw-r--r--
module.info.mt.auto
47
B
-rw-r--r--
module.info.nl
38
B
-rw-r--r--
module.info.no.auto
38
B
-rw-r--r--
module.info.pl.auto
38
B
-rw-r--r--
module.info.pt.auto
40
B
-rw-r--r--
module.info.pt_BR.auto
43
B
-rw-r--r--
module.info.ro.auto
41
B
-rw-r--r--
module.info.ru.auto
57
B
-rw-r--r--
module.info.sk.auto
40
B
-rw-r--r--
module.info.sl.auto
38
B
-rw-r--r--
module.info.sv.auto
42
B
-rw-r--r--
module.info.th.auto
71
B
-rw-r--r--
module.info.tr.auto
36
B
-rw-r--r--
module.info.uk.auto
53
B
-rw-r--r--
module.info.ur.auto
49
B
-rw-r--r--
module.info.vi.auto
42
B
-rw-r--r--
module.info.zh.auto
28
B
-rw-r--r--
module.info.zh_TW.auto
31
B
-rw-r--r--
namecheap-type-lib.pl
15.86
KB
-rw-r--r--
newgandi-type-lib.pl
22.86
KB
-rwxr-xr-x
rcom-type-lib.pl
21.94
KB
-rwxr-xr-x
renew.cgi
1.18
KB
-rwxr-xr-x
save.cgi
3.17
KB
-rwxr-xr-x
save_auto.cgi
1.96
KB
-rwxr-xr-x
save_contact.cgi
2.06
KB
-rwxr-xr-x
save_ns.cgi
1.79
KB
-rwxr-xr-x
save_onecontact.cgi
2.27
KB
-rwxr-xr-x
transfer.cgi
1.43
KB
-rwxr-xr-x
update_contacts.cgi
1.31
KB
-rw-r--r--
view_contact.cgi
1.42
KB
-rwxr-xr-x
virtual_feature.pl
12.34
KB
-rwxr-xr-x
virtualmin-registrar-lib.pl
7.98
KB
-rwxr-xr-x
Delete
Unzip
Zip
${this.title}
Close
Code Editor : edit_onecontact.cgi
#!/usr/bin/perl # Show a form to edit a single contact associated with a registrar use strict; no strict 'refs'; use warnings; our (%text, %in); our $module_name; require './virtualmin-registrar-lib.pl'; &ReadParse(); &error_setup($text{'onecontact_err'}); # Get the Virtualmin domain &can_domain($in{'dom'}) || &error($text{'contact_ecannot'}); my $d = &virtual_server::get_domain_by("dom", $in{'dom'}); # Get the account my @accounts = &list_registrar_accounts(); my ($account) = grep { $_->{'id'} eq $in{'id'} } @accounts; $account || &error($text{'contacts_eaccount'}); &ui_print_header($account->{'desc'}, $in{'new'} ? $text{'onecontact_create'} : $text{'onecontact_edit'}, ""); my $cfunc = "type_".$account->{'registrar'}."_get_contact_classes"; my @classes = &$cfunc($account); my $cls; my $con; if (!$in{'new'}) { # Get the contact $cfunc = "type_".$account->{'registrar'}."_list_contacts"; my ($ok, $contacts) = &$cfunc($account); $ok || &error(&text('contacts_elist', $contacts)); ($con) = grep { $_->{'id'} eq $in{'cid'} } @$contacts; ($cls) = grep { $con->{$_->{'field'}} eq $_->{'id'} } @classes; $in{'cls'} = $cls->{'id'} if ($cls); } else { # Set type from class ($cls) = grep { $_->{'id'} eq $in{'cls'} } @classes; if ($cls && $cls->{'field'}) { $con = { $cls->{'field'} => $cls->{'id'} }; } } &ui_print_header(undef, $text{'onecontact_title'}, ""); print &ui_form_start("save_onecontact.cgi", "post"); print &ui_hidden("id", $in{'id'}); print &ui_hidden("cid", $in{'cid'}); print &ui_hidden("new", $in{'new'}); print &ui_hidden("cls", $in{'cls'}); print &ui_table_start(&text('onecontact_header', $cls->{'desc'}), "width=100%", 2); my @schema = &get_contact_schema($account, undef, undef, $in{'new'}, $in{'cls'}); foreach my $s (@schema) { my $n = $s->{'name'}; my $field; if ($s->{'readonly'}) { # Just show value $field = $con->{$s->{'name'}}; next if ($in{'new'} && !$field); if ($s->{'choices'}) { my ($c) = grep { $_->[0] eq $field } @{$s->{'choices'}}; $field = $c->[1] if ($c); } } elsif ($s->{'choices'}) { # Select from menu my @choices = @{$s->{'choices'}}; if ($s->{'opt'}) { unshift(@choices, [ undef, $text{'contact_default'} ]); } $field = &ui_select($n, $con->{$s->{'name'}}, \@choices, 1, 0, !$in{'new'}); } elsif ($s->{'opt'} == 1) { # Optional value $field = &ui_opt_textbox($n, $con->{$s->{'name'}}, $s->{'size'}, $text{'contact_default'}); } else { # Required value $field = &ui_textbox($n, $con->{$s->{'name'}}, $s->{'size'}); } print &ui_table_row($text{'contact_'.$s->{'name'}}, $field); } print &ui_table_end(); if ($in{'new'}) { print &ui_form_end([ [ undef, $text{'create'} ] ]); } else { my $dfunc = "type_".$account->{'registrar'}."_delete_one_contact"; print &ui_form_end([ [ undef, $text{'save'} ], defined(&$dfunc) ? [ 'delete', $text{'delete'} ] : undef ]); } &ui_print_footer(&virtual_server::domain_footer_link($d));
Close
