From 17cf21bcf8a2e29d2cbcf0a313474d2a4ee44f5d Mon Sep 17 00:00:00 2001
From: Tadao Tanikawa <tanikawa.tadao@jp.panasonic.com>
Date: Fri, 20 Nov 2020 23:36:23 +0900
Subject: Re-organized sub-directory by category

Since all the sub-directories were placed in the
first level, created sub-directories, "hal", "module",
and "service" for classification and relocated each component.

Signed-off-by: Tadao Tanikawa <tanikawa.tadao@jp.panasonic.com>
Change-Id: Ifdf743ac0d1893bd8e445455cf0d2c199a011d5c
---
 .../last2order/tool/mklast2ordertbl.pl             | 107 ---------------------
 1 file changed, 107 deletions(-)
 delete mode 100755 systemservice/config/library/system_manager_config/last2order/tool/mklast2ordertbl.pl

(limited to 'systemservice/config/library/system_manager_config/last2order/tool')

diff --git a/systemservice/config/library/system_manager_config/last2order/tool/mklast2ordertbl.pl b/systemservice/config/library/system_manager_config/last2order/tool/mklast2ordertbl.pl
deleted file mode 100755
index 9b7dcab..0000000
--- a/systemservice/config/library/system_manager_config/last2order/tool/mklast2ordertbl.pl
+++ /dev/null
@@ -1,107 +0,0 @@
-#!/usr/bin/perl 
-use strict;
-
-use XML::XPath;
-
-my $LOCAL_XML = "./last2order.xml.tmp";
-my $LOCAL_DTD = "./last2order.dtd";
-
-my $DTD = <<'EODTD';
-<!ELEMENT last2order_tbl (last2order*) >
-
-<!ELEMENT  last2order EMPTY>
-<!ATTLIST last2order
-  front_video     CDATA "EMPTY"
-  front_sub_video CDATA "EMPTY"
-  front_audio     CDATA "EMPTY"
-  rear_video      CDATA "EMPTY"
-  rear_audio      CDATA "EMPTY"
-  ordername       CDATA #REQUIRED
->
-EODTD
-
-sub usage(){
-  print STDERR "USAGE:$0 *.xml *.cfo\n";
-}
-
-#==== MAIN ====
-my $ret=system("which xmllint > /dev/null");
-if($ret != 0){
-  die("xmllint is not installed \n");
-}
-
-if(2 != @ARGV){
-  usage();
-  exit 1;
-}
-
-my $inXmlFile= $ARGV[0];
-my $outCfgXmlFile= $ARGV[1];
-
-
-#ARG CHECK
-if(! -e $inXmlFile){
-  die("$inXmlFile not found");
-} 
-
-
-system("cp $inXmlFile $LOCAL_XML");
-
-open FOUT,'>',$LOCAL_DTD or die("can't open $LOCAL_DTD");
-print FOUT $DTD;
-close FOUT;
-
-$ret=system("xmllint --noout --valid $LOCAL_XML ");
-if($ret != 0){
-  die("$inXmlFile is NOT VAILD");
-}
-
-my $xml = XML::XPath->new(filename=>$LOCAL_XML);
-
-my $last2order_tbl = $xml->find('/last2order_tbl/last2order');
-
-my @nodelist = $last2order_tbl->get_nodelist;
-my $numOfElement = @nodelist;
-
-printf("num of element :$numOfElement\n");
-
-my $writeValue;
-open FOUT,'+>',$outCfgXmlFile or die("can't open $outCfgXmlFile");
-binmode(FOUT);
-
-$writeValue = pack("A4","CTOO"); print FOUT $writeValue; 
-$writeValue = pack("L",$numOfElement); print FOUT $writeValue; 
-
-foreach my $last2order( @nodelist ) {
-  $writeValue = $last2order->findvalue('@front_video');
-  printf("FV:$writeValue  ");
-  $writeValue = pack("a128",$writeValue); print FOUT $writeValue; 
-
-  $writeValue = $last2order->findvalue('@front_sub_video');
-  printf("FSV:$writeValue  ");
-  $writeValue = pack("a128",$writeValue); print FOUT $writeValue; 
-
-  $writeValue = $last2order->findvalue('@front_audio');
-  printf("FA:$writeValue  ");
-  $writeValue = pack("a128",$writeValue); print FOUT $writeValue; 
-
-  $writeValue = $last2order->findvalue('@rear_video');
-  printf("RV:$writeValue  ");
-  $writeValue = pack("a128",$writeValue); print FOUT $writeValue; 
-
-  $writeValue = $last2order->findvalue('@rear_audio');
-  printf("RA:$writeValue  ");
-  $writeValue = pack("a128",$writeValue); print FOUT $writeValue; 
-
-  $writeValue = $last2order->findvalue('@ordername');
-  printf("ON:$writeValue  ");
-  $writeValue = pack("a64",$writeValue); print FOUT $writeValue; 
-
-  printf("\n");
-}
-
-close(FOUT);
-
-system("rm $LOCAL_XML $LOCAL_DTD");
-
-
-- 
cgit 1.2.3-korg