/[cvs]/nfo/perl/scripts/umltools/uml_setup.pl
ViewVC logotype

Diff of /nfo/perl/scripts/umltools/uml_setup.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by joko, Sun Nov 3 01:20:19 2002 UTC revision 1.4 by joko, Mon Sep 20 22:08:17 2004 UTC
# Line 195  if (\$action eq \"start\") { Line 195  if (\$action eq \"start\") {
195    system(\"$sudo -u $owner $uml_boot --start --vhost=$vhost_name\");    system(\"$sudo -u $owner $uml_boot --start --vhost=$vhost_name\");
196  }  }
197  if (\$action eq \"stop\") {  if (\$action eq \"stop\") {
198    system(\"$uml_boot --stop --vhost=$vhost_name\");    system(\"$uml_boot --kill --vhost=$vhost_name\");
199  }  }
200  ";  ";
201    
# Line 205  if (\$action eq \"stop\") { Line 205  if (\$action eq \"stop\") {
205    
206    # runlevel init scripts    # runlevel init scripts
207    $filename = "$runlevel_base/S30$daemon";    $filename = "$runlevel_base/S30$daemon";
208    $cmd = "rm $filename; ln $initscript_path -s $filename";    $cmd = "test -e $filename && rm $filename; ln $initscript_path -s $filename";
209    askCmd("do it?", $cmd, "create $filename");    askCmd("do it?", $cmd, "create $filename");
210    chmod S_IRWXU|S_IRGRP|S_IXGRP|S_IROTH|S_IXOTH, $filename;    chmod S_IRWXU|S_IRGRP|S_IXGRP|S_IROTH|S_IXOTH, $filename;
211    
212    $filename = "$runlevel_base/K01$daemon";    $filename = "$runlevel_base/K01$daemon";
213    $cmd = "rm $filename; ln $initscript_path -s $filename";    $cmd = "test -e $filename && rm $filename; ln $initscript_path -s $filename";
214    askCmd("do it?", $cmd, "create $filename");    askCmd("do it?", $cmd, "create $filename");
215    chmod S_IRWXU|S_IRGRP|S_IXGRP|S_IROTH|S_IXOTH, $filename;    chmod S_IRWXU|S_IRGRP|S_IXGRP|S_IROTH|S_IXOTH, $filename;
216    
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.4
MailToCvsAdmin">MailToCvsAdmin
 ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed