Gecko [ contributie.vriendennsm.nl ]

Name	Size	Permission	Date
help	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
images	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
lang	[ DIR ]	drwxr-xr-x	2026-07-25 20:55
CHANGELOG	849 B	-rw-r--r--	2026-07-17 21:17
acl_form.cgi	3.76 KB	-rwxr-xr-x	2026-07-17 21:22
acl_save.cgi	2.9 KB	-rwxr-xr-x	2026-07-17 21:22
acl_security.pl	558 B	-rwxr-xr-x	2026-07-17 21:17
add.cgi	1.24 KB	-rwxr-xr-x	2026-07-17 21:22
add_browser.cgi	1.01 KB	-rwxr-xr-x	2026-07-17 21:22
add_form.cgi	1.98 KB	-rwxr-xr-x	2026-07-17 21:22
apply.cgi	256 B	-rwxr-xr-x	2026-07-17 21:22
backup_config.pl	787 B	-rwxr-xr-x	2026-07-17 21:17
bootup.cgi	640 B	-rwxr-xr-x	2026-07-17 21:22
cgi_args.pl	349 B	-rwxr-xr-x	2026-07-17 21:17
config	132 B	-rw-r--r--	2026-07-17 21:17
config-ALL-linux	246 B	-rw-r--r--	2026-07-17 21:17
config-AlmaLinux-7.0-ALL	272 B	-rw-r--r--	2026-07-17 21:17
config-Amazon-Linux-2-ALL	272 B	-rw-r--r--	2026-07-17 21:17
config-CentOS-Linux-7.0-ALL	272 B	-rw-r--r--	2026-07-17 21:17
config-CentOS-Stream-Linux-8.0-ALL	272 B	-rw-r--r--	2026-07-17 21:17
config-CloudLinux-8.0-ALL	272 B	-rw-r--r--	2026-07-17 21:17
config-Oracle-Linux-8.0-ALL	272 B	-rw-r--r--	2026-07-17 21:17
config-Redhat-Enterprise-Linux-6.0-6.9	278 B	-rw-r--r--	2026-07-17 21:17
config-Redhat-Enterprise-Linux-7.0-ALL	272 B	-rw-r--r--	2026-07-17 21:17
config-Rocky-Linux-7.0-ALL	272 B	-rw-r--r--	2026-07-17 21:17
config-Scientific-Linux-6.0-6.9	274 B	-rw-r--r--	2026-07-17 21:17
config-Scientific-Linux-7.0-ALL	272 B	-rw-r--r--	2026-07-17 21:17
config-Ubuntu-Linux-8.10-ALL	251 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux-6.0-ALL	247 B	-rw-r--r--	2026-07-17 21:17
config-debian-linux-ALL-5.9	250 B	-rw-r--r--	2026-07-17 21:17
config-freebsd	305 B	-rw-r--r--	2026-07-17 21:17
config-freebsd-8-ALL	334 B	-rw-r--r--	2026-07-17 21:17
config-mandrake-linux	266 B	-rw-r--r--	2026-07-17 21:17
config-openSUSE-Linux-15.0-ALL	263 B	-rw-r--r--	2026-07-17 21:17
config-pardus-linux	186 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux	277 B	-rw-r--r--	2026-07-17 21:17
config-redhat-linux-24.0-ALL	296 B	-rw-r--r--	2026-07-17 21:17
config-solaris	230 B	-rw-r--r--	2026-07-17 21:17
config-suse-linux	269 B	-rw-r--r--	2026-07-17 21:17
config-syno-linux	246 B	-rw-r--r--	2026-07-17 21:17
config-turbo-linux	266 B	-rw-r--r--	2026-07-17 21:17
config.info	1.07 KB	-rw-r--r--	2026-07-17 21:17
config.info.ca	1.09 KB	-rw-r--r--	2026-07-17 21:17
config.info.de	1.14 KB	-rw-r--r--	2026-07-17 21:17
config.info.fr	0 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	1.02 KB	-rw-r--r--	2026-07-17 21:17
config.info.no	1.03 KB	-rw-r--r--	2026-07-17 21:17
config.info.pt_BR	1.08 KB	-rw-r--r--	2026-07-17 21:17
create.cgi	2.68 KB	-rwxr-xr-x	2026-07-17 21:22
defaultacl	65 B	-rw-r--r--	2026-07-17 21:17
delete_acls.cgi	964 B	-rwxr-xr-x	2026-07-17 21:22
delete_browser.cgi	1.01 KB	-rwxr-xr-x	2026-07-17 21:22
down_acl.cgi	1.26 KB	-rwxr-xr-x	2026-07-17 21:22
down_schema.cgi	649 B	-rwxr-xr-x	2026-07-17 21:22
edit_acl.cgi	1.75 KB	-rwxr-xr-x	2026-07-17 21:22
edit_browser.cgi	7.61 KB	-rwxr-xr-x	2026-07-17 21:22
edit_create.cgi	1.05 KB	-rwxr-xr-x	2026-07-17 21:22
edit_ldif.cgi	3.34 KB	-rwxr-xr-x	2026-07-17 21:22
edit_schema.cgi	2.31 KB	-rwxr-xr-x	2026-07-17 21:22
edit_sfile.cgi	932 B	-rwxr-xr-x	2026-07-17 21:22
edit_slapd.cgi	3.9 KB	-rwxr-xr-x	2026-07-17 21:22
gencert.cgi	1.23 KB	-rwxr-xr-x	2026-07-17 21:22
gencert_form.cgi	1.25 KB	-rwxr-xr-x	2026-07-17 21:22
gencert_ldif.cgi	1.24 KB	-rwxr-xr-x	2026-07-17 21:22
import_sfile.cgi	1.67 KB	-rwxr-xr-x	2026-07-17 21:22
index.cgi	3.51 KB	-rwxr-xr-x	2026-07-17 21:22
install_check.pl	469 B	-rwxr-xr-x	2026-07-17 21:17
ldap-server-lib.pl	24.67 KB	-rwxr-xr-x	2026-07-17 21:17
log_parser.pl	1.71 KB	-rwxr-xr-x	2026-07-17 21:17
module.info	160 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	158 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	173 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	105 B	-rw-r--r--	2026-07-17 21:17
module.info.ca.auto	25 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	0 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	108 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	113 B	-rw-r--r--	2026-07-17 21:17
module.info.de	95 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	23 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	191 B	-rw-r--r--	2026-07-17 21:17
module.info.es	0 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	126 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	125 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	152 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	126 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	0 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	123 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	138 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	0 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	129 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	114 B	-rw-r--r--	2026-07-17 21:17
module.info.ja	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ja.auto	146 B	-rw-r--r--	2026-07-17 21:17
module.info.ko	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ko.auto	114 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	96 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	24 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	20 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	88 B	-rw-r--r--	2026-07-17 21:17
module.info.no	20 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	90 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	0 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	116 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	121 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR	25 B	-rw-r--r--	2026-07-17 21:17
module.info.pt_BR.auto	105 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	26 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	142 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	111 B	-rw-r--r--	2026-07-17 21:17
module.info.sv	0 B	-rw-r--r--	2026-07-17 21:17
module.info.sv.auto	105 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	118 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	169 B	-rw-r--r--	2026-07-17 21:17
module.info.zh	0 B	-rw-r--r--	2026-07-17 21:17
module.info.zh.auto	110 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW	0 B	-rw-r--r--	2026-07-17 21:17
module.info.zh_TW.auto	119 B	-rw-r--r--	2026-07-17 21:17
perms.cgi	432 B	-rwxr-xr-x	2026-07-17 21:22
prefs.info	33 B	-rw-r--r--	2026-07-17 21:17
rename_browser.cgi	1.04 KB	-rwxr-xr-x	2026-07-17 21:22
save_browser.cgi	1.04 KB	-rwxr-xr-x	2026-07-17 21:22
save_ldif.cgi	2.4 KB	-rwxr-xr-x	2026-07-17 21:22
save_schema.cgi	727 B	-rwxr-xr-x	2026-07-17 21:22
save_sfile.cgi	607 B	-rwxr-xr-x	2026-07-17 21:22
save_slapd.cgi	2.74 KB	-rwxr-xr-x	2026-07-17 21:22
sdelete_browser.cgi	936 B	-rwxr-xr-x	2026-07-17 21:22
start.cgi	251 B	-rwxr-xr-x	2026-07-17 21:22
stop.cgi	246 B	-rwxr-xr-x	2026-07-17 21:22
up_acl.cgi	1.26 KB	-rwxr-xr-x	2026-07-17 21:22
up_schema.cgi	649 B	-rwxr-xr-x	2026-07-17 21:22
view_sfile.cgi	374 B	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# Show the details of one access control rule

require './ldap-server-lib.pl';
&local_ldap_server() == 1 || &error($text{'slapd_elocal'});
$access{'acl'} || &error($text{'acl_ecannot'});
&ReadParse();

# Get ACLs
if (&get_config_type() == 1) {
	$conf = &get_config();
	@access = &find("access", $conf);
	$hasorder = 0;
	}
else {
	$defdb = &get_default_db();
	$conf = &get_ldif_config();
	@access = &find_ldif("olcAccess", $conf, $defdb);
	$hasorder = 1;
	}

# Page header
if ($in{'new'}) {
	&ui_print_header(undef, $text{'eacl_title1'}, "", "eacl");
	$p = { 'what' => '*',
	       'by' => [ ] };
	}
else {
	&ui_print_header(undef, $text{'eacl_title2'}, "", "eacl");
	$acl = $access[$in{'idx'}];
	$p = &parse_ldap_access($acl);
	}

# Form header
print &ui_form_start("acl_save.cgi", "post");
print &ui_hidden("new", $in{'new'});
print &ui_hidden("idx", $in{'idx'});
print &ui_table_start($text{'eacl_header'}, undef, 2);

# Rule ordering
if ($hasorder && !$in{'new'}) {
	print &ui_table_row($text{'eacl_order'},
		$p->{'order'} eq '' ? $text{'eacl_noorder'} : $p->{'order'});
	}

# Granting to what object
$what = $p->{'what'} eq '*' || $p->{'what'} eq '' ? 1 : 0;
if ($p->{'what'} =~ /^dn(\.([^=]+))?="(.*)"$/i ||
    $p->{'what'} =~ /^dn(\.([^=]+))?=(.*)$/i) {
	$dn = $3;
	$style = $2;
	if ($dn eq "") {
		$what = 2;
		}
	}
print &ui_table_row($text{'eacl_what'},
	&ui_radio_table("what", $what,
		[ [ 1, $text{'eacl_what1'} ],
		  [ 2, $text{'eacl_what2'} ],
		  [ 0, $text{'eacl_what0'},
		    &ui_textbox("what_dn", $dn, 30)." ".
		    $text{'eacl_mtype'}." ".
		    &ui_select("what_style", $style,
			       [ [ '', $text{'default'} ],
			 	 map { [ $_, $text{'eacl_'.$_} ] }
				     @acl_dn_styles ]) ] ])."\n".
	&ui_checkbox("filter_on", 1, $text{'eacl_filter'}, $p->{'filter'})." ".
	&ui_textbox("filter", $p->{'filter'}, 40)."<br>\n".
	&ui_checkbox("attrs_on", 1, $text{'eacl_attrs'}, $p->{'attrs'})." ".
	&ui_textbox("attrs", $p->{'attrs'}, 40) );

# Access rights table
@tds = ( "width=40% nowrap", "width=30%", "width=30%" );
$wtable = &ui_columns_start([ $text{'eacl_who'},
			      $text{'eacl_access'},
			      $text{'eacl_control'} ], 100, 0, \@tds);
$i = 0;
foreach $b (@{$p->{'by'}}, { }, { }, { }) {
	$kwho = $b->{'who'} eq 'self' || $b->{'who'} eq 'users' ||
		$b->{'who'} eq 'anonymous' || $b->{'who'} eq '*' ||
		$b->{'who'} eq '';
	$kacc = !$b->{'access'} ? 'read' :
		&indexof($b->{'access'}, @acl_access_levels) >= 0 ?
			$b->{'access'} : undef;
	$wtable .= &ui_columns_row([
		# Who are we granting?
		&ui_select("wmode_$i",
			   $kwho ? $b->{'who'} : 'other',
			   [ [ '', "&nbsp;" ],
			     [ '*', $text{'eacl_every'} ],
			     [ 'self', $text{'eacl_self'} ],
			     [ 'users', $text{'eacl_users'} ],
			     [ 'anonymous', $text{'eacl_anonymous'} ],
			     [ 'other', $text{'eacl_other'} ] ],
			   1, 0, 0, 0,
			   "style='width:45%' onChange='form.who_$i.disabled = (form.wmode_$i.value != \"other\")'").
		&ui_textbox("who_$i", $kwho ? "" : $b->{'who'}, 50,
			    $kwho, undef, "style='width:45%'"),

# What access level? Show textbox if complex
		$kacc ? &ui_select("access_$i", $kacc,
				   [ map { [ $_, $text{'access_l'.$_} ] }
					 @acl_access_levels ], 1, 0, 0, 0,
				   "style='width:90%'")
		      : &ui_textbox("access_$i", $b->{'access'}, 20,
				    0, undef, "style='width:90%'"),

# Additional attrs
		&ui_textbox("control_$i", join(" ", @{$b->{'control'}}), 30,
			    0, undef, "style='width:90%'"),
		], \@tds);
	$i++;
	}
$wtable .= &ui_columns_end();
print &ui_table_row(undef, $wtable, 2);

# Form and page end
print &ui_table_end();
if ($in{'new'}) {
	print &ui_form_end([ [ undef, $text{'create'} ] ]);
	}
else {
	print &ui_form_end([ [ undef, $text{'save'} ],
			     [ 'delete', $text{'delete'} ] ]);
	}
&ui_print_footer("edit_acl.cgi", $text{'acl_return'});