File Manager

X7ROOT File Manager

Current Path: /usr/libexec/webmin/inetd

📁 ..
📄 CHANGELOG(173 B)
📄 backup_config.pl(754 B)
📄 cgi_args.pl(145 B)
📄 config-aix(302 B)
📄 config-cobalt-linux(331 B)
📄 config-coherent-linux(362 B)
📄 config-corel-linux(331 B)
📄 config-debian-linux(331 B)
📄 config-freebsd(252 B)
📄 config-freebsd-2.1-2.2(252 B)
📄 config-freebsd-8-ALL(262 B)
📄 config-generic-linux(277 B)
📄 config-hpux(242 B)
📄 config-irix(252 B)
📄 config-lfs-linux(331 B)
📄 config-macos(469 B)
📄 config-macos-1.5-ALL(352 B)
📄 config-mandrake-linux(353 B)
📄 config-msc-linux(357 B)
📄 config-netbsd(252 B)
📄 config-open-linux(331 B)
📄 config-open-linux-3.1e(353 B)
📄 config-openbsd(235 B)
📄 config-openmamba-linux(362 B)
📄 config-openserver(323 B)
📄 config-osf1(302 B)
📄 config-pardus-linux(332 B)
📄 config-redhat-linux(362 B)
📄 config-slackware-linux(282 B)
📄 config-sol-linux(277 B)
📄 config-solaris(353 B)
📄 config-solaris-10-ALL(335 B)
📄 config-solaris-8-9(353 B)
📄 config-suse-linux(331 B)
📄 config-suse-linux-6.3-8.0(331 B)
📄 config-turbo-linux(331 B)
📄 config-united-linux(358 B)
📄 config-unixware(323 B)
📄 config-windows(145 B)
📄 config.info(797 B)
📄 config.info.ca(879 B)
📄 config.info.cs(874 B)
📄 config.info.de(944 B)
📄 config.info.es(759 B)
📄 config.info.fr(867 B)
📄 config.info.hu(668 B)
📄 config.info.nl(818 B)
📄 config.info.no(852 B)
📄 config.info.pl(723 B)
📄 config.info.ru(767 B)
📄 config.info.sv(691 B)
📄 config.info.tr(620 B)
📄 config.info.uk(788 B)
📄 config.info.zh(545 B)
📄 config.info.zh_TW(513 B)
📄 delete_rpc.cgi(568 B)
📄 delete_serv.cgi(610 B)
📄 edit_rpc.cgi(4.19 KB)
📄 edit_serv.cgi(4.63 KB)
📁 help
📁 images
📄 index.cgi(4.03 KB)
📄 inetd-generic-lib.pl(4.43 KB)
📄 inetd-lib.pl(2.02 KB)
📄 inetd-solaris-10-lib.pl(8.45 KB)
📄 install_check.pl(336 B)
📁 lang
📄 log_parser.pl(892 B)
📄 module.info(239 B)
📄 module.info.af(0 B)
📄 module.info.af.auto(111 B)
📄 module.info.ar(0 B)
📄 module.info.ar.auto(146 B)
📄 module.info.be(0 B)
📄 module.info.be.auto(159 B)
📄 module.info.bg(0 B)
📄 module.info.bg.auto(158 B)
📄 module.info.ca(0 B)
📄 module.info.ca.auto(112 B)
📄 module.info.cs(0 B)
📄 module.info.cs.auto(111 B)
📄 module.info.da(0 B)
📄 module.info.da.auto(119 B)
📄 module.info.de(0 B)
📄 module.info.de.auto(126 B)
📄 module.info.el(0 B)
📄 module.info.el.auto(190 B)
📄 module.info.es(0 B)
📄 module.info.es.auto(116 B)
📄 module.info.eu(0 B)
📄 module.info.eu.auto(118 B)
📄 module.info.fa(0 B)
📄 module.info.fa.auto(136 B)
📄 module.info.fi(0 B)
📄 module.info.fi.auto(113 B)
📄 module.info.fr(0 B)
📄 module.info.fr.auto(122 B)
📄 module.info.he(0 B)
📄 module.info.he.auto(136 B)
📄 module.info.hr(0 B)
📄 module.info.hr.auto(111 B)
📄 module.info.hu(0 B)
📄 module.info.hu.auto(143 B)
📄 module.info.it(0 B)
📄 module.info.it.auto(114 B)
📄 module.info.ja(0 B)
📄 module.info.ja.auto(140 B)
📄 module.info.ko(0 B)
📄 module.info.ko.auto(154 B)
📄 module.info.lt(0 B)
📄 module.info.lt.auto(115 B)
📄 module.info.lv(0 B)
📄 module.info.lv.auto(122 B)
📄 module.info.ms(0 B)
📄 module.info.ms.auto(122 B)
📄 module.info.mt(0 B)
📄 module.info.mt.auto(119 B)
📄 module.info.nl(0 B)
📄 module.info.nl.auto(116 B)
📄 module.info.no(0 B)
📄 module.info.no.auto(118 B)
📄 module.info.pl(0 B)
📄 module.info.pl.auto(124 B)
📄 module.info.pt(0 B)
📄 module.info.pt.auto(113 B)
📄 module.info.pt_BR(0 B)
📄 module.info.pt_BR.auto(119 B)
📄 module.info.ro(0 B)
📄 module.info.ro.auto(123 B)
📄 module.info.ru(0 B)
📄 module.info.ru.auto(161 B)
📄 module.info.sk(0 B)
📄 module.info.sk.auto(111 B)
📄 module.info.sl(0 B)
📄 module.info.sl.auto(115 B)
📄 module.info.sv(0 B)
📄 module.info.sv.auto(119 B)
📄 module.info.th(0 B)
📄 module.info.th.auto(190 B)
📄 module.info.tr(0 B)
📄 module.info.tr.auto(119 B)
📄 module.info.uk(0 B)
📄 module.info.uk.auto(157 B)
📄 module.info.ur(0 B)
📄 module.info.ur.auto(191 B)
📄 module.info.vi(0 B)
📄 module.info.vi.auto(137 B)
📄 module.info.zh(0 B)
📄 module.info.zh.auto(110 B)
📄 module.info.zh_TW(0 B)
📄 module.info.zh_TW.auto(116 B)
📄 prefs.info(29 B)
📄 restart_inetd.cgi(296 B)
📄 save_rpc.cgi(3.82 KB)
📄 save_serv.cgi(5.31 KB)

Editing: save_rpc.cgi

#!/usr/bin/perl
# save_rpc.cgi

require './inetd-lib.pl';
&error_setup($text{'error_saverpc'});
&ReadParse();

# Delete button clicked, redirect to correct CGI
if ($in{'delete'}) {
        &redirect("delete_rpc.cgi?rpos=$in{'rpos'}&ipos=$in{'ipos'}");
        return;
        }

# Check inputs
$in{name} =~ /^[A-z][A-z0-9\_\-]+$/ ||
	&error(&text('error_invalidprgname', $in{name}));
$in{number} =~ /^[0-9]+$/ ||
	&error(&text('error_prgnum', $in{number}));
if ($in{'act'}) {
	$in{vfrom} =~ /^[0-9]+$/ ||
		&error("$in{vfrom} ");
	if ($in{vto} eq "") { $in{vto} = $in{vfrom}; }
	$in{vto} =~ /^[0-9]+$/ ||
		&error(&text('error_invalidver', $in{vto}));
	if ($in{vto} < $in{vfrom}) {
		$tmp = $in{vfrom}; $in{vfrom} = $in{vto}; $in{vto} = $tmp;
		}
	if ($in{protocols} eq "") {
		&error(&text('error_noprotocol'));
		}
	if ((!$in{internal}) | ($config{'no_internal'})) {
		$in{program} =~ /^\/.*/ ||
			&error(&text('error_invalidname', $in{program}));
		if ($in{'act'} == 2) {
			if (!$in{'qm'}) {
				-r $in{program} ||
					&error(&text('error_notexist', $in{program}));
				-x $in{program} ||
					&error(&text('error_ntexecutable',$in{program}));
				}
			}
		$in{args} =~ /^\S+/ ||
			&error(&text('error_invalidcmd', $in{args}));
		}
	$in{'user'} || &error(&text('error_nouser'));
	}

@rargs = ($in{'name'}, $in{'number'}, $in{'aliases'});
$vers = ($in{vfrom} == $in{vto} ? $in{vfrom} : "$in{vfrom}-$in{vto}");
$prots = join(',', split(/\0/, $in{protocols}));
@iargs = ($in{'act'} == 2, "$in{name}/$vers", $in{type}, "rpc/$prots");
if ($config{extended_inetd}) {
	push(@iargs, ($in{permin_def} ? $in{wait} : "$in{wait}.$in{permin}"));
	push(@iargs, ($in{group} ? "$in{user}.$in{group}" : $in{user}));
	}
else {
	push(@iargs, $in{wait});
	push(@iargs, $in{user});
	}
if ((!$config{'no_internal'}) & ($in{internal})) {
	push(@iargs, "internal", undef);
	}
elsif (($config{'no_internal'}) & ($in{internal})) {
	&error(&text('error_invalidcmd', $in{args}));
	}
else {
	push(@iargs, ($in{'qm'} ? "?" : "").$in{program});
	push(@iargs, $in{args});
	}

&lock_inetd_files();
@rpcs = &list_rpcs();
@inets = &list_inets();
foreach $r (@rpcs) {
	if ($r->[1] eq $rargs[0]) { $same_name = $r; }
	if ($r->[2] == $rargs[1]) { $same_prog = $r; }
	}

if ($in{'rpos'} =~ /\d/) {
	# Changing a program (and maybe inetd entry)
	@old_rpc = @{$rpcs[$in{'rpos'}]};
        if ($in{'ipos'} =~ /\d/) {
		@old_inet = @{$inets[$in{'ipos'}]};
		}
	if ($same_name && $old_rpc[1] ne $rargs[0]) {
		&error(&text('error_prgexist', $rargs[0]));
		}
	if ($same_prog && $old_rpc[2] ne $rargs[1]) {
		&error(&text('error_prginuse', $rargs[1]));
		}
	&modify_rpc($old_rpc[0], @rargs);
	if ($in{'act'} && @old_inet) {
		# modify inetd
		&modify_inet($old_inet[0], @iargs, $old_inet[10]);
		}
	elsif ($in{'act'} && !@old_inet) {
		# add to inetd
		&create_inet(@iargs);
		}
	elsif (!$in{'act'} && @old_inet) {
		# remove from inetd
		&delete_inet($old_inet[0], $old_inet[10]);
		}
	&unlock_inetd_files();
	&webmin_log("modify", "rpc", $rargs[0],
		    { 'name' => $rargs[0], 'number' => $rargs[1],
		      'active' => $iargs[0],
		      'user' => $iargs[5], 'wait' => $iargs[4],
		      'prog' => $in{'act'} ? join(" ", @iargs[6..@iargs-1])
					   : undef } );
	}
else {
	# Creating a new program
	if ($same_name) {
		&error(&text('error_prgexist', $rargs[0]));
		}
	if ($same_prog) {
		&error(&text('error_prginuse', $rargs[1]));
		}
	if ($in{'act'}) {
		foreach $i (@inets) {
			if ($i->[2] && $i->[3] eq $rargs[0]) {
				&error(&text('error_prgexist', $rargs[0]));
				}
			}
		}
	&create_rpc(@rargs);
	if ($in{'act'}) { &create_inet(@iargs); }
	&unlock_inetd_files();
	&webmin_log("create", "rpc", $rargs[0],
		    { 'name' => $rargs[0], 'number' => $rargs[1],
		      'active' => $iargs[0],
		      'user' => $iargs[5], 'wait' => $iargs[4],
		      'prog' => $in{'act'} ? join(" ", @iargs[6..@iargs-1])
					   : undef } );
	}
&redirect("");

X7ROOT File Manager

Editing: save_rpc.cgi

Upload File

Create Folder