Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
post-lunch useless cosmetics
authorFrederic Suter <frederic.suter@cc.in2p3.fr>
Mon, 7 Mar 2016 12:40:48 +0000 (13:40 +0100)
committerFrederic Suter <frederic.suter@cc.in2p3.fr>
Mon, 7 Mar 2016 12:40:48 +0000 (13:40 +0100)
tools/doxygen/index_create.pl
tools/doxygen/xbt_log_extract_hierarchy.pl
tools/graphicator/CMakeLists.txt
tools/internal/README
tools/internal/check_dist_archive.exclude
tools/normalize-pointers.py
tools/stack-cleaner/README
tools/stack-cleaner/clean-stack-filter

index bad8593..987f2a1 100755 (executable)
@@ -56,7 +56,6 @@ This file was generated by tools/doxygen/index_create.pl. DO NOT EDIT.
  *
  * \\htmlonly Although completely useless, the complete list of structures defined can be found <a href="annotated.html">here</a> \\endhtmlonly
 
  *
  * \\htmlonly Although completely useless, the complete list of structures defined can be found <a href="annotated.html">here</a> \\endhtmlonly
 
-
 EOF
 
 foreach $type (qw(define enumeration enumvalue function typedef)) {
 EOF
 
 foreach $type (qw(define enumeration enumvalue function typedef)) {
index ba13f8a..28db032 100755 (executable)
@@ -18,9 +18,8 @@ print "        \@{\n";
 # Search for calls to macros defining new channels, and prepare the tree representation
 my %ancestor;
 my %desc;
 # Search for calls to macros defining new channels, and prepare the tree representation
 my %ancestor;
 my %desc;
-# $ancestor{"toto"} is the ancestor of the toto channel
-#    as declared by XBT_LOG_NEW_SUBCATEGORY and XBT_LOG_NEW_DEFAULT_SUBCATEGORY
-#    ie, when the channel toto is initialized (does not work under windows)
+# $ancestor{"toto"} is the ancestor of the toto channel as declared by XBT_LOG_NEW_SUBCATEGORY and 
+# XBT_LOG_NEW_DEFAULT_SUBCATEGORY ie, when the channel toto is initialized (does not work under windows)
 
 # $desc{"toto"} is its description
 my %connected;
 
 # $desc{"toto"} is its description
 my %connected;
@@ -48,12 +47,11 @@ sub cleanup_ctn {
     return @elms;
 }
 
     return @elms;
 }
 
-
 sub parse_file {
     my $filename = shift;
 sub parse_file {
     my $filename = shift;
-    
+
     my $data = "";
     my $data = "";
-    
+
     print "Parse $filename\n" if $debug;
     open IN, "$filename" || die "Cannot read $filename: $!\n";
     while (<IN>) {
     print "Parse $filename\n" if $debug;
     open IN, "$filename" || die "Cannot read $filename: $!\n";
     while (<IN>) {
@@ -70,16 +68,15 @@ sub parse_file {
     my $connect_data = $data; # save a copy for second parsing phase
     while ($data =~ s/^.*?XBT_LOG_NEW(_DEFAULT)?_(SUB)?CATEGORY\(//s) {
        $data =~ s/([^"]*"[^"]*")\)//s || die "unparsable macro: $data";
     my $connect_data = $data; # save a copy for second parsing phase
     while ($data =~ s/^.*?XBT_LOG_NEW(_DEFAULT)?_(SUB)?CATEGORY\(//s) {
        $data =~ s/([^"]*"[^"]*")\)//s || die "unparsable macro: $data";
-           
+
         my ($name,$anc,$desc) = cleanup_ctn($1);
         my ($name,$anc,$desc) = cleanup_ctn($1);
-           
+    
         # build the tree, checking for name conflict
         die "ERROR: Category name conflict: $name used several times (in $ancestor{$name} and $anc, last time in $filename)\n"
         # build the tree, checking for name conflict
         die "ERROR: Category name conflict: $name used several times (in $ancestor{$name} and $anc, last time in $filename)\n"
-          if defined ($ancestor{$name}) && $ancestor{$name} ne $anc &&
-              defined ($desc{$name}) && $desc{$name} ne $desc;
+          if defined ($ancestor{$name}) && $ancestor{$name} ne $anc && defined ($desc{$name}) && $desc{$name} ne $desc;
        $ancestor{$name}=$anc;
        $desc{$name}=$desc;
        $ancestor{$name}=$anc;
        $desc{$name}=$desc;
-   
+
        print " $name -> $anc\n" if $debug;
    }
 
        print " $name -> $anc\n" if $debug;
    }
 
@@ -101,7 +98,7 @@ close FILES;
 
 # Display the tree, looking for disconnected elems    
 my %used;
 
 # Display the tree, looking for disconnected elems    
 my %used;
-       
+
 sub display_subtree {
     my $name=shift;
     my $indent=shift;
 sub display_subtree {
     my $name=shift;
     my $indent=shift;
@@ -114,7 +111,7 @@ sub display_subtree {
        display_subtree($cat,"$indent  ");
     }
 }
        display_subtree($cat,"$indent  ");
     }
 }
-    
+
 display_subtree("XBT_LOG_ROOT_CAT","");
 
 map {
 display_subtree("XBT_LOG_ROOT_CAT","");
 
 map {
@@ -126,5 +123,4 @@ map {
     warn "Category $_ does not seem to be connected to the root (anc=$ancestor{$_})\n";
 } grep {!defined $used{$_}} sort keys %ancestor;
 
     warn "Category $_ does not seem to be connected to the root (anc=$ancestor{$_})\n";
 } grep {!defined $used{$_}} sort keys %ancestor;
 
-       
 print "@}*/\n";
 print "@}*/\n";
index cfd98f1..05d6a46 100644 (file)
@@ -4,17 +4,7 @@ set_target_properties(graphicator PROPERTIES RUNTIME_OUTPUT_DIRECTORY ${CMAKE_BI
 
 ## Clean generated files
 get_directory_property(extra_clean_files ADDITIONAL_MAKE_CLEAN_FILES)
 
 ## Clean generated files
 get_directory_property(extra_clean_files ADDITIONAL_MAKE_CLEAN_FILES)
-set_directory_properties(
-  PROPERTIES ADDITIONAL_MAKE_CLEAN_FILES
-  "${extra_clean_files};${CMAKE_CURRENT_BINARY_DIR}/simgrid.trace;")
+set_directory_properties(PROPERTIES ADDITIONAL_MAKE_CLEAN_FILES "${extra_clean_files};${CMAKE_CURRENT_BINARY_DIR}/simgrid.trace;")
 
 
-set(tesh_files
-  ${tesh_files}
-  ${CMAKE_CURRENT_SOURCE_DIR}/graphicator.tesh
-  PARENT_SCOPE
-  )
-set(tools_src
-  ${tools_src}
-  ${CMAKE_CURRENT_SOURCE_DIR}/graphicator.c
-  PARENT_SCOPE
-  )
+set(tesh_files  ${tesh_files}  ${CMAKE_CURRENT_SOURCE_DIR}/graphicator.tesh  PARENT_SCOPE)
+set(tools_src   ${tools_src}   ${CMAKE_CURRENT_SOURCE_DIR}/graphicator.c     PARENT_SCOPE)
index d0b485c..32f6225 100644 (file)
@@ -1,8 +1,6 @@
-This directory contains some tools that we use to build and maintain
-SimGrid itself. I doubt that any of them are useful out of that
-context, but you are welcome to dig and inspect everything you want.
+This directory contains some tools that we use to build and maintain SimGrid itself. I doubt that any of them are useful
+out of that context, but you are welcome to dig and inspect everything you want.
 
 
-They are not included in the archive and are thus not mandatory to use
-SimGrid.
+They are not included in the archive and are thus not mandatory to use SimGrid.
 
 These little codes are under the same licence than SimGrid itself.
 
 These little codes are under the same licence than SimGrid itself.
index 1d51086..7245c97 100644 (file)
@@ -1,4 +1,4 @@
-# Expected dfferences between git repository and tardists
+# Expected differences between git repository and tardists
 #
 # lines beginning with '#', and empty lines are ignored
 # lines beginning with '- ' are expected in archive only
 #
 # lines beginning with '#', and empty lines are ignored
 # lines beginning with '- ' are expected in archive only
 
 + contrib/.*
 
 
 + contrib/.*
 
-+ examples/msg/actions/NAS_LU_S_4/.*
-+ examples/msg/chord/chord3\.xml
-
-+ examples/smpi/MM/host
 + examples/smpi/NAS/.*
 
 + src/simix/README_attempt_without_stack
 + examples/smpi/NAS/.*
 
 + src/simix/README_attempt_without_stack
-+ src/simix/simix_network\.tla
 
 + src/smpi/BUGS
 + src/smpi/colls/alltoall-bruck\.c
 
 + src/smpi/BUGS
 + src/smpi/colls/alltoall-bruck\.c
-+ src/smpi/fixsrc\.pl
-+ src/smpi/myprintloc\.cocci
-+ src/smpi/patch_source\.sh
-+ src/smpi/replace_globals\.cocci
-+ src/smpi/replace_static\.cocci
 
 + teshsuite/smpi/mpich3-test/f77/attr/.*
 
 
 + teshsuite/smpi/mpich3-test/f77/attr/.*
 
index bb2f59a..e138111 100755 (executable)
@@ -10,7 +10,6 @@
 Tool for normalizing pointers such as two runs have the same 'addresses'
 
 first address encountered will be replaced by 0X0000001, second by 0X0000002, ...
 Tool for normalizing pointers such as two runs have the same 'addresses'
 
 first address encountered will be replaced by 0X0000001, second by 0X0000002, ...
-
 """
 
 import sys
 """
 
 import sys
index 3aff70a..e31ca86 100644 (file)
@@ -5,8 +5,7 @@ Provides stack-cleaning compilers for x86_64:
  * c++
  * fortran
 
  * c++
  * fortran
 
-Each of them modify the generated/given X86_64 assembly by prepending
-stack-cleanup code to each function:
+Each of them modify the generated/given X86_64 assembly by prepending stack-cleanup code to each function:
 
        movq $0x7ffff7ff8000, %r11
        cmpq %r11, %rsp
 
        movq $0x7ffff7ff8000, %r11
        cmpq %r11, %rsp
@@ -18,9 +17,7 @@ stack-cleanup code to each function:
         jne  .Lstack_cleaner_loop0:
 .Lstack_cleaner_done0:
 
         jne  .Lstack_cleaner_loop0:
 .Lstack_cleaner_done0:
 
-The modification of the assembly is done by the clean-stack-filter
-program.
+The modification of the assembly is done by the clean-stack-filter program.
 
 
-If the underlying compiler is clang, it might be necessary to add the
--no-integrated-as flag in order to force the usage of an external
-assembler.
+If the underlying compiler is clang, it might be necessary to add the -no-integrated-as flag in order to force the 
+usage of an external assembler.
index 64e7990..8b15cd7 100755 (executable)
@@ -15,7 +15,6 @@ our $lines = "";
 # Size of the stack for this function:
 our $size = 0;
 
 # Size of the stack for this function:
 our $size = 0;
 
-
 # Counter for assigning unique ids to labels:
 our $id=0;
 
 # Counter for assigning unique ids to labels:
 our $id=0;
 
@@ -52,14 +51,14 @@ while (<>) {
   if ($scanproc) {
       $lines = $lines . $_;
       if (m/^[ \t]*.cfi_endproc$/) {
   if ($scanproc) {
       $lines = $lines . $_;
       if (m/^[ \t]*.cfi_endproc$/) {
-         emit_code();
+        emit_code();
       } elsif (m/^[ \t]*pushq/) {
       } elsif (m/^[ \t]*pushq/) {
-         $size += 8;
+         $size += 8;
       } elsif (m/^[ \t]*subq[\t *]\$([0-9]*),[ \t]*%rsp$/) {
       } elsif (m/^[ \t]*subq[\t *]\$([0-9]*),[ \t]*%rsp$/) {
-          my $val = $1;
-          $val = oct($val) if $val =~ /^0/;
-          $size += $val;
-          emit_code();
+         my $val = $1;
+         $val = oct($val) if $val =~ /^0/;
+         $size += $val;
+         emit_code();
       }
   } elsif (m/^[ \t]*.cfi_startproc$/) {
       print $_;
       }
   } elsif (m/^[ \t]*.cfi_startproc$/) {
       print $_;