diff --git a/mxstartup2mxvipcfg b/mxstartup2mxvipcfg index 7b05a98..0cb7244 100755 --- a/mxstartup2mxvipcfg +++ b/mxstartup2mxvipcfg @@ -55,6 +55,8 @@ LINE: foreach(@lines) { next LINE unless(defined $match); + save_config_mxservice($name, $user, $script); + my @ips = split /\s*[,; ]\s*/,$ip; my $pip = parse_ips(@ips); print_ips_cfg($pip); @@ -150,6 +152,26 @@ sub parse_ips { ############################################################################## +sub save_config_mxservice { + my ($service, $user, $script) = @_; + + my $config = "$rundir/mxservice.$name.cfg"; + + if( -e $config) { + printf "skipping creation of $config: File already exists\n"; + return; + } + + printf "mxservice::$name creating service-config: $config\n"; + + open SCRIPT, ">", "$config" or die "can't open $config: $!"; + print SCRIPT qq(MX_SRV_USER="$user"\n); + print SCRIPT qq(MX_SRV_SCRIPT="$script"\n); + close SCRIPT or die "can't close $script: $!"; +} + +############################################################################## + sub print_ips_cfg { my $H = shift;