Changeset 306 for tbroadcast

Timestamp:

Nov 10, 2006, 11:23:41 AM (18 years ago)

Author:

garonne

Message:

add the recursive make option

Location:

tbroadcast/HEAD

Files:

• python/tbroadcast.py (modified) (1 diff)
• scripts/tbroadcast (modified) (4 diffs)

tbroadcast/HEAD/python/tbroadcast.py

@@ -492 +492 @@
       #sys.exit(-1)
 
+    
+    def generate_make (self, file, command):
+        print 'generate_make'
+        makefile = open (file, 'w+')
+        self.recursive_make (self.current_package, command, makefile, len(self.packages))
+        makefile.close ()
+        
+    def recursive_make (self, package, command, makefile, indice,actions=list()):
+        lines = self.generate_action_make (package, command, indice)
+        makefile.write (lines)
+        print lines                
+        for pkg in self.packages[package] ['uses']:
+            if pkg not in actions:
+                actions.append(pkg)
+                indice = indice - 1
+                self.recursive_make(pkg, command,makefile, indice, actions)        
+        
+    def generate_action_make (self, package, command, indice):
+        lines = package + ' :: '        
+        # add dependencies
+        for pkg in self.packages[package] ['uses']:
+            lines = lines + ' ' + pkg            
+
+        # add the action itself
+        newcommand = string.replace (command, '<package>', package)
+        lines = lines + '\n'
+        lines = lines +  '\t@echo "#--------------------------------------------------------------"\n'
+        lines = lines +  '\t@echo "# ('+str(indice)+'/'+str(len(self.packages))+') Now trying ['+newcommand+'] in '+ self.packages[package]['path']+'"\n'
+        lines = lines +  '\t@echo "#--------------------------------------------------------------"\n'
+        lines = lines + '\t@cd ' + self.packages[package]['path']            
+        lines = lines + ' ; ' + newcommand                
+        lines = lines + '\n\n'
+        return lines
+        
 #--------- EoF --------#

tbroadcast/HEAD/scripts/tbroadcast

@@ -24 +24 @@
     print '#   -global               : Reach packages in all CMTPATH/CMTPROJECTPATH items'    
     print '#   -ignore_cycles        : Suppress automatically the cycles'
+    print '#   -make=<file>          : Generate a recursive Make, see: http://www.tip.net.au/~millerp/rmch/recu-make-cons-harm.html'
     print '#   -nb=<num_worker>      : Change the total number of threads[default is 20]'
     print '#   -output=<location>    : Output directory to store output files with the form <package>_output.log'
@@ -48 +49 @@
     error         = None
     file          = None
+    make          = None
+    makefile      = 'Makefile'
     
     if len(sys.argv) == 1:
@@ -84 +87 @@
                  elif option == '-print':
                          print_graph = True   
+                 elif option == '-make':        
+                     make     = True
+                     makefile = string.split(arg,'=')[1]
              else:
                   command = arg
@@ -94 +100 @@
     elif print_graph:
         master.print_dependencies ()
+    elif make:
+        master.generate_make (makefile, command)    
     else:
         master.execute_all (command)