start.cgi

Unix下基于Web的管理工具

#!/usr/local/bin/perl
# start.cgi
# Attempt to start the smbd and nmbd processes

require './samba-lib.pl';
$whatfailed = "Failed to start samba servers";

$rv = system("$config{samba_server} </dev/null");
if ($rv) { &error("$config{samba_server} failed"); }
$rv = system("$config{name_server} </dev/null");
if ($rv) { &error("$config{name_server} failed"); }
&redirect("");