Gecko [ contributie.vriendennsm.nl ]

Name	Size	Permission	Date
images	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
lang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
CHANGELOG	308 B	-rw-r--r--	2026-07-17 21:17
aix-lib.pl	9.83 KB	-rwxr-xr-x	2026-07-17 21:17
backup_config.pl	817 B	-rwxr-xr-x	2026-07-17 21:17
build.cgi	162 B	-rwxr-xr-x	2026-07-17 21:22
coherent-linux-lib.pl	10.42 KB	-rwxr-xr-x	2026-07-17 21:17
config-aix	181 B	-rw-r--r--	2026-07-17 21:17
config-coherent-linux	116 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux	120 B	-rw-r--r--	2026-07-17 21:17
config-generic-linux	116 B	-rw-r--r--	2026-07-17 21:17
config-mandrake-linux	116 B	-rw-r--r--	2026-07-17 21:17
config-msc-linux	116 B	-rw-r--r--	2026-07-17 21:17
config-open-linux	117 B	-rw-r--r--	2026-07-17 21:17
config-openSUSE-Linux-15.0-ALL	116 B	-rw-r--r--	2026-07-17 21:17
config-openmamba-linux	116 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux	116 B	-rw-r--r--	2026-07-17 21:17
config-slackware-linux	116 B	-rw-r--r--	2026-07-17 21:17
config-solaris	167 B	-rw-r--r--	2026-07-17 21:17
config-solaris-8-ALL	199 B	-rw-r--r--	2026-07-17 21:17
config-suse-linux	116 B	-rw-r--r--	2026-07-17 21:17
config-trustix-linux	116 B	-rw-r--r--	2026-07-17 21:17
config-united-linux	116 B	-rw-r--r--	2026-07-17 21:17
config.info	282 B	-rw-r--r--	2026-07-17 21:17
config.info.ca	320 B	-rw-r--r--	2026-07-17 21:17
config.info.cs	321 B	-rw-r--r--	2026-07-17 21:17
config.info.de	321 B	-rw-r--r--	2026-07-17 21:17
config.info.es	277 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	350 B	-rw-r--r--	2026-07-17 21:17
config.info.hu	0 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	290 B	-rw-r--r--	2026-07-17 21:17
config.info.no	297 B	-rw-r--r--	2026-07-17 21:17
config.info.pl	309 B	-rw-r--r--	2026-07-17 21:17
config.info.ru	491 B	-rw-r--r--	2026-07-17 21:17
config.info.sv	132 B	-rw-r--r--	2026-07-17 21:17
config.info.uk	500 B	-rw-r--r--	2026-07-17 21:17
debian-linux-lib.pl	10.21 KB	-rwxr-xr-x	2026-07-17 21:17
edit_aliases.cgi	1.2 KB	-rwxr-xr-x	2026-07-17 21:22
edit_client.cgi	1.41 KB	-rwxr-xr-x	2026-07-17 21:22
edit_ethers.cgi	1.14 KB	-rwxr-xr-x	2026-07-17 21:22
edit_group.cgi	1.81 KB	-rwxr-xr-x	2026-07-17 21:22
edit_group_shadow.cgi	1.83 KB	-rwxr-xr-x	2026-07-17 21:22
edit_hosts.cgi	1.31 KB	-rwxr-xr-x	2026-07-17 21:22
edit_netgroup.cgi	2.01 KB	-rwxr-xr-x	2026-07-17 21:22
edit_netmasks.cgi	1.16 KB	-rwxr-xr-x	2026-07-17 21:22
edit_networks.cgi	1.35 KB	-rwxr-xr-x	2026-07-17 21:22
edit_passwd.cgi	4.8 KB	-rwxr-xr-x	2026-07-17 21:22
edit_passwd_shadow.cgi	4.8 KB	-rwxr-xr-x	2026-07-17 21:22
edit_passwd_shadow_full.cgi	4.8 KB	-rwxr-xr-x	2026-07-17 21:22
edit_protocols.cgi	1.35 KB	-rwxr-xr-x	2026-07-17 21:22
edit_rpc.cgi	1.3 KB	-rwxr-xr-x	2026-07-17 21:22
edit_security.cgi	1.92 KB	-rwxr-xr-x	2026-07-17 21:22
edit_server.cgi	607 B	-rwxr-xr-x	2026-07-17 21:22
edit_services.cgi	1.52 KB	-rwxr-xr-x	2026-07-17 21:22
edit_services2.cgi	1.53 KB	-rwxr-xr-x	2026-07-17 21:22
edit_switch.cgi	1.74 KB	-rwxr-xr-x	2026-07-17 21:22
edit_tables.cgi	6.24 KB	-rwxr-xr-x	2026-07-17 21:22
feedback_files.pl	157 B	-rwxr-xr-x	2026-07-17 21:17
index.cgi	776 B	-rwxr-xr-x	2026-07-17 21:22
linux-lib.pl	5.27 KB	-rwxr-xr-x	2026-07-17 21:17
list_switches.cgi	772 B	-rwxr-xr-x	2026-07-17 21:22
mandrake-linux-lib.pl	10.39 KB	-rwxr-xr-x	2026-07-17 21:17
md5-lib.pl	7.73 KB	-rwxr-xr-x	2026-07-17 21:17
module.info	346 B	-rw-r--r--	2026-07-17 21:17
module.info.ar	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ar.auto	195 B	-rw-r--r--	2026-07-17 21:17
module.info.bg	0 B	-rw-r--r--	2026-07-17 21:17
module.info.bg.auto	250 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	163 B	-rw-r--r--	2026-07-17 21:17
module.info.ca.auto	12 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	28 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	145 B	-rw-r--r--	2026-07-17 21:17
module.info.da	0 B	-rw-r--r--	2026-07-17 21:17
module.info.da.auto	154 B	-rw-r--r--	2026-07-17 21:17
module.info.de	136 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	12 B	-rw-r--r--	2026-07-17 21:17
module.info.el	0 B	-rw-r--r--	2026-07-17 21:17
module.info.el.auto	235 B	-rw-r--r--	2026-07-17 21:17
module.info.es	31 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	138 B	-rw-r--r--	2026-07-17 21:17
module.info.eu	0 B	-rw-r--r--	2026-07-17 21:17
module.info.eu.auto	164 B	-rw-r--r--	2026-07-17 21:17
module.info.fa	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fa.auto	248 B	-rw-r--r--	2026-07-17 21:17
module.info.fi	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fi.auto	158 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	30 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	141 B	-rw-r--r--	2026-07-17 21:17
module.info.hr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.hr.auto	171 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	34 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	147 B	-rw-r--r--	2026-07-17 21:17
module.info.it	0 B	-rw-r--r--	2026-07-17 21:17
module.info.it.auto	152 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	49 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	226 B	-rw-r--r--	2026-07-17 21:17
module.info.ko	39 B	-rw-r--r--	2026-07-17 21:17
module.info.ko.auto	154 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	149 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	12 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	30 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	130 B	-rw-r--r--	2026-07-17 21:17
module.info.no	29 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	117 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	107 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	12 B	-rw-r--r--	2026-07-17 21:17
module.info.pt	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pt.auto	164 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR.auto	173 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	41 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	246 B	-rw-r--r--	2026-07-17 21:17
module.info.sk	0 B	-rw-r--r--	2026-07-17 21:17
module.info.sk.auto	165 B	-rw-r--r--	2026-07-17 21:17
module.info.sv	31 B	-rw-r--r--	2026-07-17 21:17
module.info.sv.auto	123 B	-rw-r--r--	2026-07-17 21:17
module.info.tr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.tr.auto	169 B	-rw-r--r--	2026-07-17 21:17
module.info.uk	0 B	-rw-r--r--	2026-07-17 21:17
module.info.uk.auto	247 B	-rw-r--r--	2026-07-17 21:17
module.info.zh	34 B	-rw-r--r--	2026-07-17 21:17
module.info.zh.auto	120 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	37 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	126 B	-rw-r--r--	2026-07-17 21:17
msc-linux-lib.pl	10.39 KB	-rwxr-xr-x	2026-07-17 21:17
nis-lib.pl	6.02 KB	-rwxr-xr-x	2026-07-17 21:17
nisupdate.conf	1.94 KB	-rw-r--r--	2026-07-17 21:17
old_edit_passwd_shadow.cgi	4.62 KB	-rwxr-xr-x	2026-07-17 21:22
old_edit_switch.cgi	1.76 KB	-rwxr-xr-x	2026-07-17 21:22
old_save_switch.cgi	533 B	-rwxr-xr-x	2026-07-17 21:22
open-linux-lib.pl	8.03 KB	-rwxr-xr-x	2026-07-17 21:17
openmamba-linux-lib.pl	10.4 KB	-rwxr-xr-x	2026-07-17 21:17
redhat-linux-lib.pl	10.39 KB	-rwxr-xr-x	2026-07-17 21:17
save_aliases.cgi	749 B	-rwxr-xr-x	2026-07-17 21:22
save_client.cgi	661 B	-rwxr-xr-x	2026-07-17 21:22
save_ethers.cgi	793 B	-rwxr-xr-x	2026-07-17 21:22
save_file.cgi	588 B	-rwxr-xr-x	2026-07-17 21:22
save_group.cgi	945 B	-rwxr-xr-x	2026-07-17 21:22
save_group_shadow.cgi	1.04 KB	-rwxr-xr-x	2026-07-17 21:22
save_hosts.cgi	758 B	-rwxr-xr-x	2026-07-17 21:22
save_netgroup.cgi	1.04 KB	-rwxr-xr-x	2026-07-17 21:22
save_netmasks.cgi	753 B	-rwxr-xr-x	2026-07-17 21:22
save_networks.cgi	791 B	-rwxr-xr-x	2026-07-17 21:22
save_passwd_shadow.cgi	2.36 KB	-rwxr-xr-x	2026-07-17 21:22
save_protocols.cgi	806 B	-rwxr-xr-x	2026-07-17 21:22
save_rpc.cgi	746 B	-rwxr-xr-x	2026-07-17 21:22
save_security.cgi	996 B	-rwxr-xr-x	2026-07-17 21:22
save_server.cgi	184 B	-rwxr-xr-x	2026-07-17 21:22
save_services.cgi	775 B	-rwxr-xr-x	2026-07-17 21:22
save_services2.cgi	776 B	-rwxr-xr-x	2026-07-17 21:22
save_switch.cgi	932 B	-rwxr-xr-x	2026-07-17 21:22
slackware-linux-lib.pl	9.93 KB	-rwxr-xr-x	2026-07-17 21:17
solaris-lib.pl	10.47 KB	-rwxr-xr-x	2026-07-17 21:17
suse-linux-8.2-lib.pl	11.07 KB	-rwxr-xr-x	2026-07-17 21:17
suse-linux-9.0-lib.pl	11.07 KB	-rwxr-xr-x	2026-07-17 21:17
suse-linux-lib.pl	11.89 KB	-rwxr-xr-x	2026-07-17 21:17
switch-lib.pl	3.08 KB	-rwxr-xr-x	2026-07-17 21:17
trustix-linux-lib.pl	10.39 KB	-rwxr-xr-x	2026-07-17 21:17
united-linux-lib.pl	11.07 KB	-rwxr-xr-x	2026-07-17 21:17

Rename

#!/usr/bin/perl
# edit_passwd_shadow.cgi
# Edit a NIS password/shadow files entry

require './nis-lib.pl';
use Time::Local;
&ReadParse();
&ui_print_header(undef, $text{'passwd_title'}, "");
$mode = ($0 =~ /passwd_shadow_full.cgi$/ ? 2 :
	 $0 =~ /passwd_shadow.cgi$/ ? 1 : 0);

# Build list of available shells
@shlist = ("/bin/sh", "/bin/csh", "/bin/false");
open(SHELLS, "</etc/shells");
while(<SHELLS>) {
	s/\r|\n//g;
	s/^\s*#.*$//;
	push(@shlist, $_) if (/\S/);
	}
close(SHELLS);

($t, $lnums, $passwd, $shadow) =
	&table_edit_setup($in{'table'}, $in{'line'}, ':');
print "<form action=save_passwd_shadow.cgi method=post>\n";
print "<input type=hidden name=table value='$in{'table'}'>\n";
print "<input type=hidden name=line value='$in{'line'}'>\n";
print "<input type=hidden name=mode value='$mode'>\n";

print "<table border width=100%>\n";
print "<tr $tb> <td><b>$text{'passwd_header1'}</b></td> </tr>\n";
print "<tr $cb> <td><table width=100%>\n";

print "<tr> <td><b>$text{'passwd_name'}</b></td>\n";
print "<td><input name=name size=10 value=\"$passwd->[0]\"></td>\n";

print "<td><b>$text{'passwd_uid'}</b></td>\n";
print "<td><input name=uid size=10 value=\"$passwd->[2]\"></td> </tr>\n";

print "<tr> <td><b>$text{'passwd_real'}</b></td>\n";
print "<td><input name=real size=20 value=\"$passwd->[4]\"></td>\n";

print "<td><b>$text{'passwd_home'}</b></td>\n";
print "<td><input name=home size=25 value=\"$passwd->[5]\"> ",
      &file_chooser_button("home", 1),"</td> </tr>\n";

print "<tr> <td valign=top><b>$text{'passwd_shell'}</b></td>\n";
print "<td valign=top><select name=shell>\n";
foreach $s (&unique(@shlist)) {
	printf "<option %s>%s</option>\n",
		$passwd->[6] eq $s ? 'selected' : '', $s;
	$found++ if ($passwd->[6] eq $s);
	}
printf "<option value='' %s>%s</option>\n",
	$found ? '' : 'selected', $text{'passwd_other'};
print "</select><br>\n";
printf "<input name=other size=20 value='%s'> %s</td>\n",
	$found ? '' : $passwd->[6], &file_chooser_button("other");

$pass = $mode ? $shadow->[1] : $passwd->[1];
%uconfig = &foreign_config("useradmin");
print "<td valign=top rowspan=2><b>$text{'passwd_pass'}</b></td> <td rowspan=2>\n";
printf"<input type=radio name=passmode value=0 %s> %s<br>\n",
	$pass eq "" ? "checked" : "",
	$uconfig{'empty_mode'} ? $text{'passwd_none1'} : $text{'passwd_none2'};
printf"<input type=radio name=passmode value=1 %s> $text{'passwd_nologin'}<br>\n",
	$pass eq $uconfig{'lock_string'} ? "checked" : "";
print "<input type=radio name=passmode value=3> $text{'passwd_clear'}\n";
printf "<input %s name=pass size=15><br>\n",
	$uconfig{'passwd_stars'} ? "type=password" : "";
printf "<input type=radio name=passmode value=2 %s> $text{'passwd_encrypted'}\n",
	$pass && $pass ne $uconfig{'lock_string'} ? "checked" :"";
printf "<input name=encpass size=13 value=\"%s\">\n",
	$pass && $pass ne $uconfig{'lock_string'} ? $pass : "";
print "</td> </tr>\n";

print "<tr> <td><b>$text{'passwd_gid'}</b></td>\n";
print "<td><input name=gid size=10 value='$passwd->[3]'></td> </tr>\n";

if ($mode == 2) {
	print "</table></td></tr></table><br>\n";
	print "<table border width=100%>\n";
	print "<tr $tb> <td><b>$text{'passwd_header2'}</b></td> </tr>\n";
	print "<tr $cb> <td><table width=100%>\n";

print "<tr> <td><b>$text{'passwd_change'}</b></td>\n";
	if ($shadow->[2] && $shadow->[2] >= 0) {
		@tm = localtime(timelocal(gmtime($shadow->[2] * 60*60*24)));
		printf "<td>%s/%s/%s</td>\n",
			$tm[3], $text{"smonth_".($tm[4]+1)}, $tm[5]+1900;
		}
	elsif ($in{'line'} eq "") { print "<td>$text{'passwd_never'}</td>\n"; }
	else { print "<td>$text{'passwd_unknown'}</td>\n"; }

print "<td><b>$text{'passwd_expire'}</b></td>\n";
	if ($shadow->[7] && $shadow->[7] >= 0) {
		@tm = localtime($shadow->[7] * 60*60*24);
		$eday = $tm[3];
		$emon = $tm[4]+1;
		$eyear = $tm[5]+1900;
		}
	print "<td>";
	&date_input($eday, $emon, $eyear, 'expire');
	print "</td>\n";

print "<tr> <td><b>$text{'passwd_min'}</b></td>\n";
	printf "<td><input size=5 name=min value=\"%s\"></td>\n",
		$shadow->[3] < 0 ? "" : $shadow->[3];

print "<td><b>$text{'passwd_max'}</b></td>\n";
	printf "<td><input size=5 name=max value=\"%s\"></td></tr>\n",
		$shadow->[4] < 0 ? "" : $shadow->[4];

print "<tr> <td><b>$text{'passwd_warn'}</b></td>\n";
	printf "<td><input size=5 name=warn value=\"%s\"></td>\n",
		$shadow->[5] < 0 ? "" : $shadow->[5];

print "<td><b>$text{'passwd_inactive'}</b></td>\n";
	printf "<td><input size=5 name=inactive value=\"%s\"></td></tr>\n",
		$shadow->[6] < 0 ? "" : $shadow->[6];
	}
print "</table></td></tr></table>\n";

if (defined($in{'line'})) {
	print "<input type=submit value='$text{'save'}'>\n";
	print "<input type=submit name=delete value='$text{'delete'}'>\n";
	}
else {
	print "<input type=submit value='$text{'create'}'>\n";
	}
print "</form>\n";
&ui_print_footer("edit_tables.cgi?table=$in{'table'}", $text{'tables_return'},
	"", $text{'index_return'});