Gecko [ contributie.vriendennsm.nl ]

Linux mail.vriendennsm.nl 6.1.0-51-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.177-1 (2026-07-16) x86_64
Apache/2.4.68 (Debian)
Server IP : 217.154.75.17 & Your IP : 216.73.216.195
Domains : Cant Read [ /etc/named.conf ]
User : www-data

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	273 B	-rw-r--r--	2026-07-17 21:17
add.cgi	2.09 KB	-rwxr-xr-x	2026-07-17 21:22
cluster-useradmin-lib.pl	5.51 KB	-rwxr-xr-x	2026-07-17 21:17
config	150 B	-rw-r--r--	2026-07-17 21:17
config.info	566 B	-rw-r--r--	2026-07-17 21:17
config.info.ca	655 B	-rw-r--r--	2026-07-17 21:17
config.info.cs	79 B	-rw-r--r--	2026-07-17 21:17
config.info.de	657 B	-rw-r--r--	2026-07-17 21:17
config.info.es	78 B	-rw-r--r--	2026-07-17 21:17
config.info.fr	758 B	-rw-r--r--	2026-07-17 21:17
config.info.hr	0 B	-rw-r--r--	2026-07-17 21:17
config.info.hu	0 B	-rw-r--r--	2026-07-17 21:17
config.info.ms	131 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	129 B	-rw-r--r--	2026-07-17 21:17
config.info.no	137 B	-rw-r--r--	2026-07-17 21:17
config.info.pl	121 B	-rw-r--r--	2026-07-17 21:17
create_group.cgi	3.32 KB	-rwxr-xr-x	2026-07-17 21:22
create_user.cgi	9.72 KB	-rwxr-xr-x	2026-07-17 21:22
delete_group.cgi	3.61 KB	-rwxr-xr-x	2026-07-17 21:22
delete_host.cgi	257 B	-rwxr-xr-x	2026-07-17 21:22
delete_user.cgi	5.22 KB	-rwxr-xr-x	2026-07-17 21:22
edit_group.cgi	5.39 KB	-rwxr-xr-x	2026-07-17 21:22
edit_host.cgi	1.96 KB	-rwxr-xr-x	2026-07-17 21:22
edit_user.cgi	17.68 KB	-rwxr-xr-x	2026-07-17 21:22
group_form.cgi	2.29 KB	-rwxr-xr-x	2026-07-17 21:22
index.cgi	4.98 KB	-rwxr-xr-x	2026-07-17 21:22
log_parser.pl	542 B	-rwxr-xr-x	2026-07-17 21:17
module.info	387 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	392 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	487 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	265 B	-rw-r--r--	2026-07-17 21:17
module.info.ca.auto	29 B	-rw-r--r--	2026-07-17 21:17
module.info.cs	40 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	247 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	249 B	-rw-r--r--	2026-07-17 21:17
module.info.de	147 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	24 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	521 B	-rw-r--r--	2026-07-17 21:17
module.info.es	36 B	-rw-r--r--	2026-07-17 21:17
module.info.es.auto	228 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	275 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	406 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	291 B	-rw-r--r--	2026-07-17 21:17
module.info.fr	44 B	-rw-r--r--	2026-07-17 21:17
module.info.fr.auto	260 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	261 B	-rw-r--r--	2026-07-17 21:17
module.info.hu	31 B	-rw-r--r--	2026-07-17 21:17
module.info.hu.auto	285 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	253 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	361 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	310 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	247 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	25 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	40 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	242 B	-rw-r--r--	2026-07-17 21:17
module.info.no	36 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	225 B	-rw-r--r--	2026-07-17 21:17
module.info.pl	240 B	-rw-r--r--	2026-07-17 21:17
module.info.pl.auto	29 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	282 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	291 B	-rw-r--r--	2026-07-17 21:17
module.info.ru	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ru.auto	477 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	305 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	265 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	291 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	456 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	244 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	253 B	-rw-r--r--	2026-07-17 21:17
prefs.info	28 B	-rw-r--r--	2026-07-17 21:17
refresh.cgi	2.31 KB	-rwxr-xr-x	2026-07-17 21:22
save_group.cgi	4.65 KB	-rwxr-xr-x	2026-07-17 21:22
save_user.cgi	12.76 KB	-rwxr-xr-x	2026-07-17 21:22
search_group.cgi	1.54 KB	-rwxr-xr-x	2026-07-17 21:22
search_user.cgi	1.56 KB	-rwxr-xr-x	2026-07-17 21:22
sync.cgi	4.92 KB	-rwxr-xr-x	2026-07-17 21:22
sync_form.cgi	1.75 KB	-rwxr-xr-x	2026-07-17 21:22
user_form.cgi	5.66 KB	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# search_group.cgi
# Search the list of groups across all servers, and display the results

require './cluster-useradmin-lib.pl';
&ReadParse();
$m = $in{'match'};
$w = $in{'what'};
@hosts = &list_useradmin_hosts();
@servers = &list_servers();
foreach $h (@hosts) {
	($s) = grep { $_->{'id'} == $h->{'id'} } @servers;
	foreach $g (@{$h->{'groups'}}) {
		$f = $g->{$in{'field'}};
		if ($m == 0 && $f eq $w ||
		    $m == 1 && eval { $f =~ /$w/i } ||
		    $m == 4 && index($f, $w) >= 0 ||
		    $m == 2 && $f ne $w ||
		    $m == 3 && eval { $f !~ /$w/i } ||
		    $m == 5 && index($f, $w) < 0) {
			push(@{$hosts{$g->{'group'}}},
			     $s->{'desc'} ? $s->{'desc'} : $s->{'host'});
			push(@match, $g) if (!$found{$g->{'group'}}++);
			}
		}
	}
if (@match == 1) {
	&redirect("edit_group.cgi?group=".$match[0]->{'group'});
	}
else {
	&ui_print_header(undef, $text{'search_title'}, "");
	if (@match == 0) {
		print "<p><b>$text{'search_gnotfound'}</b><p>\n";
		}
	else {
		print &ui_columns_start([ $text{'gedit_group'},
					  $text{'gedit_gid'},
					  $text{'gedit_members'},
					  $text{'search_hosts'} ], 100);
		foreach $m (@match) {
			local $members = join(" ", split(/,/, $m->{'members'}));
			@h = @{$hosts{$m->{'group'}}};
			@h = @h[0 .. 10], ".." if (@h > 10);
			print &ui_columns_row([
				&ui_link("edit_group.cgi?group=".
					 &urlize($m->{'group'}),
					 &html_escape($m->{'group'})),
				$m->{'gid'},
				&html_escape($members),
				join(", ", @h),
				]);
			}
		print &ui_columns_end();
		}
	&ui_print_footer("", $text{'index_return'});
	}