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
config-solaris	20 B	-rw-r--r--	2026-07-17 21:17
config.info	73 B	-rw-r--r--	2026-07-17 21:17
config.info.ca	80 B	-rw-r--r--	2026-07-17 21:17
config.info.de	98 B	-rw-r--r--	2026-07-17 21:17
config.info.nl	88 B	-rw-r--r--	2026-07-17 21:17
dep_viewer.cgi	3.22 KB	-rwxr-xr-x	2026-07-17 21:22
dependency_template.xml	140 B	-rw-r--r--	2026-07-17 21:17
dependent_template.xml	138 B	-rw-r--r--	2026-07-17 21:17
exec_template.xml	143 B	-rw-r--r--	2026-07-17 21:17
index.cgi	4.91 KB	-rwxr-xr-x	2026-07-17 21:22
instance_template.xml	60 B	-rw-r--r--	2026-07-17 21:17
instance_template_end.xml	12 B	-rw-r--r--	2026-07-17 21:17
instance_viewer.cgi	1.13 KB	-rwxr-xr-x	2026-07-17 21:22
log_viewer.cgi	1.33 KB	-rwxr-xr-x	2026-07-17 21:22
manpage_template.xml	88 B	-rw-r--r--	2026-07-17 21:17
module.info	201 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	162 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	234 B	-rw-r--r--	2026-07-17 21:17
module.info.ca	146 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	0 B	-rw-r--r--	2026-07-17 21:17
module.info.cs.auto	144 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	144 B	-rw-r--r--	2026-07-17 21:17
module.info.de	0 B	-rw-r--r--	2026-07-17 21:17
module.info.de.auto	164 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	266 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	165 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	141 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	153 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	143 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	169 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	122 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	180 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	167 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	154 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	141 B	-rw-r--r--	2026-07-17 21:17
module.info.ms	0 B	-rw-r--r--	2026-07-17 21:17
module.info.ms.auto	163 B	-rw-r--r--	2026-07-17 21:17
module.info.nl	51 B	-rw-r--r--	2026-07-17 21:17
module.info.nl.auto	99 B	-rw-r--r--	2026-07-17 21:17
module.info.no	0 B	-rw-r--r--	2026-07-17 21:17
module.info.no.auto	148 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	149 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	149 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	158 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	193 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	147 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	149 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	153 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	189 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	116 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	125 B	-rw-r--r--	2026-07-17 21:17
path_chooser.cgi	3.27 KB	-rwxr-xr-x	2026-07-17 21:22
property_editor.cgi	4.42 KB	-rwxr-xr-x	2026-07-17 21:22
property_group_editor.cgi	3.74 KB	-rwxr-xr-x	2026-07-17 21:22
property_group_template.xml	74 B	-rw-r--r--	2026-07-17 21:17
property_group_template_end.xml	18 B	-rw-r--r--	2026-07-17 21:17
property_template.xml	67 B	-rw-r--r--	2026-07-17 21:17
restarter_template.xml	41 B	-rw-r--r--	2026-07-17 21:17
search_instance.cgi	1.45 KB	-rwxr-xr-x	2026-07-17 21:22
service_template.xml	225 B	-rw-r--r--	2026-07-17 21:17
service_template_end.xml	29 B	-rw-r--r--	2026-07-17 21:17
smf-lib.pl	27.22 KB	-rwxr-xr-x	2026-07-17 21:22
smfwizard_dependency.cgi	2 KB	-rwxr-xr-x	2026-07-17 21:22
smfwizard_dependent.cgi	1.97 KB	-rwxr-xr-x	2026-07-17 21:22
smfwizard_exec.cgi	1.55 KB	-rwxr-xr-x	2026-07-17 21:22
smfwizard_instance.cgi	764 B	-rwxr-xr-x	2026-07-17 21:22
smfwizard_manpage.cgi	897 B	-rwxr-xr-x	2026-07-17 21:22
smfwizard_process_submit.cgi	359 B	-rwxr-xr-x	2026-07-17 21:22
smfwizard_property.cgi	1.46 KB	-rwxr-xr-x	2026-07-17 21:22
smfwizard_property_group.cgi	1020 B	-rwxr-xr-x	2026-07-17 21:22
smfwizard_restarter.cgi	601 B	-rwxr-xr-x	2026-07-17 21:22
smfwizard_service.cgi	852 B	-rwxr-xr-x	2026-07-17 21:22
smfwizard_template.cgi	790 B	-rwxr-xr-x	2026-07-17 21:22
svc_chooser.cgi	4.41 KB	-rwxr-xr-x	2026-07-17 21:22
svc_chooser_test.cgi	759 B	-rwxr-xr-x	2026-07-17 21:22
template_template.xml	187 B	-rw-r--r--	2026-07-17 21:17
template_template_end.xml	28 B	-rw-r--r--	2026-07-17 21:17
wizard.pl	20.12 KB	-rwxr-xr-x	2026-07-17 21:22
wizardtest.cgi	767 B	-rwxr-xr-x	2026-07-17 21:22

Rename

#!/usr/bin/perl
# index.cgi
# Display a list of services, built from svcs command

$unsafe_index_cgi = 1;
require './smf-lib.pl';
&ReadParse();
&ui_print_header(undef, $text{'index_title'}, "", "help", 1, 1, 0,
	&help_search_link("smf", "man", "doc", "howto"));

# deal with application of state changes first. this way
# fmri list will show changes...
if (defined($in{'change_state'})) {
	$cmd = "$in{'change_state'}";
	# get update fmri list
	@update_fmris = split(/\0/, $in{'applyto'});
	&svc_state_cmd("$cmd", \@update_fmris);
	}

# service type
if (defined($in{'type'})) {
	$svc_type = $in{'type'};
} else {
	$svc_type = "All";
	}
if (defined($in{'include_disabled'})) {
	$include_disabled = $in{'include_disabled'};
} else {
	$include_disabled = $default_include_disabled;
	}
if ($include_disabled == 1) {
	$checked_include_disabled = "checked";
} else {
	$checked_include_disabled = "";
	}
# opts for svcs listing
$opts = "$default_svc_options";

if (defined($in{'opts'})) {
	@extraopts = split(/\0/, $in{'opts'});
	foreach $extraopt (@extraopts) {
		$opts = "$opts,$extraopt";
		}
	}
$sortopt = "$default_sortopt";
if (defined($in{'sortopt'})) {
	$sortopt = $in{'sortopt'};
	}

print "<h2>";
&text_and_whats_this("index_detail");
print "</h2>\n";
# Checkboxes for view update
print "<form method=\"POST\" action=\"index.cgi\">\n";
print "<p><table>\n";
print "<tr><td><b>$text{'index_svc_type'}</b></td>\n";
print "<td>";
@typelist = sort keys %svc_types;
&print_selection("type", "$svc_type", \@typelist);
print "</td></tr>\n";
print "<tr><td><b>$text{'index_extraopts'}</b></td>\n";
print "</b></td>\n";
print "<td>";
@additional_option_names = sort keys %svc_options;
foreach $o (@additional_option_names) {
	if ($default_svc_options =~ /$o/) {
		next;
		}
	$checked = "unchecked";
	if ($opts=~ /$o/) {
		$checked = "checked";
		$opts_str="$opts_str\&opts=$o";
		}
	print "$svc_options{$o}";
	print "<input type=checkbox name=\"opts\" value=\"$o\" $checked>&nbsp;";
	}
print "</td></tr>\n";
print "<tr><td><b>$text{'index_include_disabled'}</b></td>\n";
print "<td>";
print
"<input type=checkbox name=\"include_disabled\" value=1 $checked_include_disabled>";
print "</td></tr>\n";
print "<tr><td>&nbsp;</td><td>\n";
print "<input type=submit name=\"submit\" value=\"Update View\"/></td></tr>";
print "</table></p></form>\n";

print "<form method=\"POST\" action=\"index.cgi?include_disabled=$include_disabled&type=$svc_type&sortopt=$sortopt$opts_str\">\n";

print "<table border width=100%>\n";
print "<tr><td><table width=100%>\n";
# multiple select buttons(enable, disable, maintenance, degraded, clear, delete)
print "<tr $cb><td>\n";
print "<input type=\"button\" onClick=location.href=\"smfwizard_service.cgi?clearout=1\" value=\"$text{'index_create_new_service'}\">";
print "&nbsp;";
print "<input type=\"button\" onClick=location.href=\"search_instance.cgi\" value=\"$text{'index_search_instance'}\">\n";
print "</td></tr><tr $cb><td><b>$text{'index_apply'}</b>:&nbsp;";
&print_state_buttons();
# add delete/create new buttons in addition to statechange buttons
print "<input type=submit name=\"change_state\" onClick=\"return (confirm(\'$text{'index_deleteconfirm'}\'))\" value=\"$text{'index_delete'}\">&nbsp;\n";
print "</td></tr></table></td></tr>\n";
print "<tr><td><table width=100%>\n";
@svcs_info = &svcs_listing("$svc_types{$svc_type}", "$sortopt");
@optlist = split(/,/, $opts);
print "<tr $cb>\n";
print "<td>$text{'index_select'}</td>\n";
foreach $o (@optlist) {
	# clicking should reverse sort option if we`re already sorting by
	# this option...
	if ($sortopt =~/-S$o/) {
		$new_sortopt = "-s$o";
	} elsif ($sortopt =~/-s$o/) {
		$new_sortopt = "-S$o";
	} else {
		$new_sortopt = "-s$o";
		}
	print "<td>";
	print "$text{'index_sort_by'}:&nbsp;";
	print "<a href=\"index.cgi?include_disabled=$include_disabled&type=$svc_type&sortopt=$new_sortopt$opts_str\">";
	print "$svc_options{$o}</a></td>\n";
	}
print "</tr>\n";

for $svc_info (@svcs_info) {
	# if we are displaying enabled only, skip disabled
	if (($include_disabled != 1) && ($svc_info->{'STATE'} eq "disabled")) {
		next;
		}
	print "<tr $cb>";
	$fmri = $svc_info->{'FMRI'};
	if ("$fmri" =~ /^lrc:\//) {
		print "<td>-</td>\n";
	} else {
		print "<td><input type=checkbox name=\"applyto\" value=\"$svc_info->{'FMRI'}\"></td>\n";
		}
        foreach $opt (@optlist) {
		$field = $svc_info->{$opt};
		if ($opt eq "FMRI") {
			$field =~ /$svc_types{$svc_type}(.*)/;
			$svc = $1;
			# make sure legacy svcs are unclickable!
			if ($field =~ /svc:\//) {
				print "<td>";
				print
		"<a href=\"instance_viewer.cgi?fmri='$fmri'\">$svc</a>";
				print "</td>\n";
			} else {
				print "<td>$svc</td>\n";
				}
		} elsif ($opt eq "STATE") {
			print
			    "<td>";
			print
    "<font color=$state_colors{$svc_info->{$opt}}>$svc_info->{$opt}</font>\n";
			print "</td>\n";
		} else {
			print "<td>$field</td>"
		}
	}
	print "</tr>\n";
}
print "</table></td></tr></table></form>\n";

&print_cmds_run();

&ui_print_footer("/", $text{'index'});