Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
convert svn logs into ChangeLog (up to r7858 for now)
[simgrid.git] / tools / simgrid_update_xml.pl
index 24ff690..2ca57b9 100755 (executable)
@@ -1,7 +1,7 @@
 #! /usr/bin/perl
 
 # This script updates the simgrid XML file passed as argument (modification in place)
-# It is built to do the conversion incrementally (even if for now, only 2 versions are defined)
+# It is built to do the conversion incrementally.
 
 # Copyright (C) 2006-2010. The SimGrid team. All rights reserved.
 #
@@ -71,11 +71,13 @@ while (defined($line = <INPUT>)) {
        $line =~ s/\broute_element\b/link:ctn/g;
     }
     
-    if($line =~ /^(.*)<\/platform>(.*)$/) {
-       $output_string .=  " <\/AS>\n<\/platform>";
-    } else {
-       $output_string .=  "$line\n";
+    if ($fromversion < 3)  {
+       $line =~ s/\blink:ctn\b/link_ctn/g;
+       $line =~ s/\btrace:connect\b/trace_connect/g;
+       $line =~ s/^(.*)<\/platform>(.*)$/ <\/AS>\n<\/platform>/;
     }
+
+    $output_string .= "$line\n";
 }
 
 close INPUT;