generate depends relation ship file after build finished. 85/256885/6 accepted/tizen/devbase/tools/20210507.015142 submit/trunk/20210427.135930
authorbiao716.wang <biao716.wang@samsung.com>
Wed, 14 Apr 2021 07:28:28 +0000 (16:28 +0900)
committerbiao716.wang <biao716.wang@samsung.com>
Thu, 15 Apr 2021 03:17:31 +0000 (12:17 +0900)
Change-Id: I9aa7784c6fef636bba9773401a9035af124da471
Signed-off-by: biao716.wang <biao716.wang@samsung.com>
depanneur

index a289bc3..d1b156b 100755 (executable)
--- a/depanneur
+++ b/depanneur
@@ -2464,7 +2464,7 @@ sub generate_depends_xmlfile() {
     #    my $index = 1;
 
     #Generate dependence XML file.
-    info("Generating dependence XML file...");
+    debug("Generating dependence XML file...");
     my $pkgdepsxml = "$out/$dist\_$arch\_pkgdepends.xml";
     open(my $f, '>', $pkgdepsxml) or die "$pkgdepsxml - $!";
     print $f "<builddepinfo>\n";
@@ -2492,7 +2492,7 @@ sub generate_depends_xmlfile() {
         my_system("cd $out; tar -zcf $dist\_$arch\_pkgdepends.tar.gz  $dist\_$arch\_pkgdepends.xml");
         my_system("rm -rf $pkgdepsxml");
     }
-    info("The dependence XML file has been generated in $out");
+    #info("The dependence XML file has been generated in $out");
 
     #if there is no reverse dependence relation, skip!
     if (0 == scalar (keys %pkgrdeps))
@@ -2501,7 +2501,7 @@ sub generate_depends_xmlfile() {
     }
 
     #Generate reverse dependence XML file.
-    info("Generating reverse dependence XML file...");
+    debug("Generating reverse dependence XML file...");
     my $revpkgdepsxml = "$out/$dist\_$arch\_revpkgdepends.xml";
     open(my $rf, '>', $revpkgdepsxml) or die "$revpkgdepsxml - $!";
     print $rf "<builddepinfo>\n";
@@ -2530,7 +2530,7 @@ sub generate_depends_xmlfile() {
         my_system("rm -rf $revpkgdepsxml");
     }
 
-    info("The reverse dependence XML file has been generated in $out");
+    info("The dependence XML file has been generated in $out");
 
 
 }
@@ -2540,11 +2540,14 @@ sub generate_depends() {
     ($_, $gbs_version) = my_system("gbs -V");
     $gbs_version =~ s!gbs !!;
 
+    info("Starting generate depends ... ");
+    #need to clear the below variable firstly.
+    @running  = ();
+    @done  = ();
+    @skipped = ();
+
     if ($style eq 'git') {
         File::Find::find({wanted => \&git_wanted}, $package_path );
-        if (@pre_packs > 1 && $commit ne "HEAD"){
-            error("--commit option can't be specified with multiple packages");
-        }
         if (@pre_packs == 0) {
             error("No source package found at $package_path");
         }
@@ -2632,6 +2635,7 @@ sub generate_depends() {
     generate_depends_xmlfile();
 
 }
+
 #use pre-export source to analyse
 sub fill_packs_from_dir {
        my $name = shift;
@@ -3164,6 +3168,7 @@ while (! $TERM) {
 while ((threads->list() > 0)) {
     sleep(1);
 }
+
 update_repo();
 build_report();