Gecko [ 122.154.134.11 ]

Name	Size	Permission
help	[ DIR ]	drwxr-xr-x
images	[ DIR ]	drwxr-xr-x
lang	[ DIR ]	drwxr-xr-x
config-solaris	20 B	-rw-r--r--
config.info	73 B	-rw-r--r--
config.info.ca	78 B	-rw-r--r--
config.info.ca.UTF-8	80 B	-rw-r--r--
config.info.de	98 B	-rw-r--r--
config.info.de.UTF-8	98 B	-rw-r--r--
config.info.nl	88 B	-rw-r--r--
config.info.nl.UTF-8	88 B	-rw-r--r--
dep_viewer.cgi	3.22 KB	-rwxr-xr-x
dependency_template.xml	140 B	-rw-r--r--
dependent_template.xml	138 B	-rw-r--r--
exec_template.xml	143 B	-rw-r--r--
index.cgi	4.91 KB	-rwxr-xr-x
instance_template.xml	60 B	-rw-r--r--
instance_template_end.xml	12 B	-rw-r--r--
instance_viewer.cgi	1.13 KB	-rwxr-xr-x
log_viewer.cgi	1.27 KB	-rwxr-xr-x
manpage_template.xml	88 B	-rw-r--r--
module.info	201 B	-rw-r--r--
module.info.ca	143 B	-rw-r--r--
module.info.ca.UTF-8	158 B	-rw-r--r--
module.info.nl	51 B	-rw-r--r--
module.info.nl.UTF-8	57 B	-rw-r--r--
path_chooser.cgi	3.27 KB	-rwxr-xr-x
property_editor.cgi	4.42 KB	-rwxr-xr-x
property_group_editor.cgi	3.74 KB	-rwxr-xr-x
property_group_template.xml	74 B	-rw-r--r--
property_group_template_end.xm...	18 B	-rw-r--r--
property_template.xml	67 B	-rw-r--r--
restarter_template.xml	41 B	-rw-r--r--
search_instance.cgi	1.45 KB	-rwxr-xr-x
service_template.xml	225 B	-rw-r--r--
service_template_end.xml	29 B	-rw-r--r--
smf-lib.pl	27.21 KB	-rwxr-xr-x
smfwizard_dependency.cgi	2 KB	-rwxr-xr-x
smfwizard_dependent.cgi	1.97 KB	-rwxr-xr-x
smfwizard_exec.cgi	1.55 KB	-rwxr-xr-x
smfwizard_instance.cgi	764 B	-rwxr-xr-x
smfwizard_manpage.cgi	897 B	-rwxr-xr-x
smfwizard_process_submit.cgi	359 B	-rwxr-xr-x
smfwizard_property.cgi	1.46 KB	-rwxr-xr-x
smfwizard_property_group.cgi	1020 B	-rwxr-xr-x
smfwizard_restarter.cgi	601 B	-rwxr-xr-x
smfwizard_service.cgi	852 B	-rwxr-xr-x
smfwizard_template.cgi	790 B	-rwxr-xr-x
svc_chooser.cgi	4.41 KB	-rwxr-xr-x
svc_chooser_test.cgi	759 B	-rwxr-xr-x
template_template.xml	187 B	-rw-r--r--
template_template_end.xml	28 B	-rw-r--r--
wizard.pl	20.11 KB	-rwxr-xr-x
wizardtest.cgi	767 B	-rwxr-xr-x

Code Editor : dep_viewer.cgi

#!/usr/bin/perl
# dependency/dependent tree viewer
# Display a form for displaying/editing SMF service states in dependency
# and dependent trees.

require './smf-lib.pl';
&ReadParse();

# get instance fmri
if (defined($in{'fmri'})) {
	$fmri = $in{'fmri'};
	# remove quotes...
	$fmri =~ /\'([^\']*)\'/;
	$fmri = $1;
} else {
	&error("No fmri supplied to dep viewer!");
	}

# deal with application of state changes first. this way
# dep lists will show new states...
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);
	}

@depy_expand_list = ();
# which dependency fmris do we expand?
if (defined($in{'dependency_expandlist'})) {
	# get required expansions. each is fmri
	@depy_expand_list = split(/\0/, $in{'dependency_expandlist'});
	}
# Expand list - list of fmris to expand. By default, expand top fmri.
push(@depy_expand_list, $fmri);

@dept_expand_list = ();
# which dependent fmris do we expand?
if (defined($in{'dependent_expandlist'})) {
	# get required expansions. each is fmri
	@dept_expand_list = split(/\0/, $in{'dependent_expandlist'});
	}
# Expand list - list of fmris to expand. By default, expand top fmri.
push(@dept_expand_list, $fmri);

# get new expansion/contractions submitted...
@inkeys = keys(%in);
foreach $inkey (@inkeys) {
	if ($inkey =~ /dependency_expand_(.*)$/) {
		$expand_fmri = $1;
		push(@depy_expand_list, $expand_fmri);
		}
	if ($inkey =~ /dependency_contract_(.*)$/) {
		$contract_fmri = $1;
		foreach $e (@depy_expand_list) {
			$old = shift(@depy_expand_list);
			if ($old eq $contract_fmri) {
				next;
				}
			push(@depy_expand_list, $old);
			}
		}
	if ($inkey =~ /dependent_expand_(.*)$/) {
		$expand_fmri = $1;
		push(@dept_expand_list, $expand_fmri);
		}
	if ($inkey =~ /dependent_contract_(.*)$/) {
		$contract_fmri = $1;
		foreach $e (@dept_expand_list) {
			$old = shift(@dept_expand_list);
			if ($old eq $contract_fmri) {
				next;
				}
			push(@dept_expand_list, $old);
			}
		}
	}

# Gather service description, and state info
$description = &run_smf_cmds("/usr/bin/svcs -H -oDESC $fmri", 0);

%depy_tree = ();
%dept_tree = ();
$depy_treeref = \%depy_tree;
$dept_treeref= \%dept_tree;
$instance_state = &svc_get_state_cmd($fmri);
&build_dep_tree("dependent", $dept_treeref, $fmri, 0, \@dept_expand_list,
	$instance_state);
&build_dep_tree("dependency", $depy_treeref, $fmri, 0, \@depy_expand_list,
	$instance_state);

&ui_print_header(undef, $text{'dep_viewer_title'}, "", undef);

print "<form method=\"POST\" action=\"dep_viewer.cgi?fmri='$fmri'\">\n";

print "<h2>$description</h2>\n";
print "<h2>";
&text_and_whats_this("dep_viewer_detail");
print "</h2>";

print "<h2>$text{'dep_viewer_depy_info'}</h2>\n";
print "<p>$text{'dep_viewer_apply'}:&nbsp\n";
&print_state_buttons();
print "</p>\n";
&print_dep_tree("dependency", $depy_treeref, $fmri, 0, \@depy_expand_list);

print "<h2>$text{'dep_viewer_dept_info'}</h2>\n";
print "<p>$text{'dep_viewer_apply'}:&nbsp\n";
&print_state_buttons();
print "</p>\n";
&print_dep_tree("dependent", $dept_treeref, $fmri, 0, \@dept_expand_list);

print "</form>\n";

&print_cmds_run();

&ui_print_footer("instance_viewer.cgi?fmri='$fmri'",
        $text{'dep_viewer_back'});

${this.title}

Code Editor : dep_viewer.cgi