#!/usr/local/bin/perl
# Stop some feature-related service

require './virtual-server-lib.pl';
&ReadParse();
&can_stop_servers() || &error($text{'stop_ecannot'});
if (&indexof($in{'feature'}, @plugins) < 0) {
	# Core feature
	$sfunc = "stop_service_".$in{'feature'};
	$err = &$sfunc();
	$name = $text{'feature_'.$in{'feature'}};
	}
else {
	# Plugin
	$err = &plugin_call($in{'feature'}, "feature_stop_service");
	$name = &plugin_call($in{'feature'}, "feature_name");
	}
&error_setup($text{'stop_err'});
&error($err) if ($err);
&refresh_startstop_status();
&webmin_log("stop", $in{'feature'});

if ($in{'show'}) {
	# Tell the user
	&ui_print_header(undef, $text{'stop_title'}, "");

	print &text('stop_done', $name),"<p>\n";

	&ui_print_footer("", $text{'index_return'});
	}
elsif ($in{'redirect'}) {
	&redirect($in{'redirect'});
	}
else {
	&redirect($ENV{'HTTP_REFERER'});
	}




syntax highlighted by Code2HTML, v. 0.9.1