#!/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