From 53368f7db43a4814bfee2f106c6950a7fba520ff Mon Sep 17 00:00:00 2001 From: Jan Michel Date: Thu, 11 Jul 2013 10:55:57 +0200 Subject: [PATCH] added execution of xml2ini to startup --- tools/startup.pl | 16 ++++++++++++++-- 1 file changed, 14 insertions(+), 2 deletions(-) diff --git a/tools/startup.pl b/tools/startup.pl index fa956d3..398d658 100755 --- a/tools/startup.pl +++ b/tools/startup.pl @@ -12,6 +12,7 @@ $Data::Dumper::Useqq = 0; my ($help, $man, $verbose, $setup, $dryrun); my $defaultIniPath = "/tmp/inifiles"; +my $defaultXmlPath = "../"; ############################### @@ -36,7 +37,11 @@ unless (defined $ENV{'JTAGCONFIGPATH'}) { $ENV{'JTAGCONFIGPATH'} = $defaultIniPath; mkdir($defaultIniPath) unless (-e $defaultIniPath); } - + +unless (defined $ENV{'XMLPATH'}) { + printf "XMLPATH not set in environment. Points to XML file directory. Using default.\n" if $verbose; + $ENV{'XMLPATH'} = $defaultXmlPath; + } ############################### ## Read setup xml file @@ -82,6 +87,7 @@ foreach my $curctrl ($db->getDocumentElement->findnodes('controller')) { push(@commands,"./ui.pl -b $ctrlname -c $chainname -o ".$cfg->textContent()); } $chainsini->{$ctrlid} .= proto_chainsini($chainname,$chainid,$ctrladdr,\@sname,\@sfile,\@senable); + sensorini(\@sfile); } foreach my $cfg ($curctrl->findnodes('config')) { print STDERR " Found config\n" if $verbose; @@ -128,6 +134,12 @@ sub execute { } +sub sensorini { + my ($sfile) = @_; + for (my $s=0;$s[$s] -o $defaultIniPath/$sfile->[$s].ini); + } + } ############################### ## Fill information to template ini files @@ -184,7 +196,7 @@ DEBUGram1crun=0xa%.($id*2+1).qq%4b ;BEGIN GENERATE_CHAINORDER $name %; for (my $s=0;$s[$s] =~ s\.xml\.ini\; + $sfile->[$s] .= ".ini"; $r .=";" unless($senable->[$s]); $r .= "JNR".$s."_".$sname->[$s]."=".$sfile->[$s]."\n"; } -- 2.43.0