0023439: Integration of test grid "xigs" into the new testing system

Loop back tests for iges and step files with possibility of generation of reference data.
Clean up of test scripts (removal of obsolete code, adding comments, corrected formatting)
two fixes were done (same like bug 23722 and bug 23736)
Cancelling checking for number of warnings
rewrite some test scripts in cause of this and fix 23794
Tolerance checking was weakened.
Fix to check instability on Linux (bug 23822) was added.
TODO messages was added to tests which have different results on Windows and Mandriva2010
Ability to update this TODO in regeneration mode was added.
Add fix to bug 23852
Test groups were recomposed.
'dataexch' was renamed to 'de'.
CPU limit was decreased from 2000 sec. to 1500 sec.

src/DrawResources/TestCommands.tcl

@@ -49,7 +49,7 @@ proc test {group grid casename {echo 0}} {
     if { "$echo" == "-echo" } { set echo t }
 
     # run test
-    uplevel _run_test $dir $group $gridname $casefile $echo
+    uplevel _run_test $dir $group $gridname $casefile $echo 
 
     # check log
     if { ! $echo } {
@@ -776,7 +776,7 @@ proc locate_data_file {filename} {
     }
 
     # raise error
-    error [join [list "Error: file $filename could not be found" \
+    error [join [list "File $filename could not be found" \
 		      "(should be in paths indicated by CSF_TestDataPath environment variable, " \
                       "or in subfolder data in the script directory)"] "\n"]
 }
@@ -885,15 +885,12 @@ proc _run_test {scriptsdir group gridname casefile echo} {
 		set optarg [lindex $args end-1]
 		if { $optarg == "stdout" || $optarg == "stderr" || $optarg == "-newline" } {
 		    dlog add [lindex $args end]
+		} else {
+		    eval puts-saved $args
 		}
 	    } else {
 		dlog add [lindex $args end]
 	    }
-
-	    # reproduce original puts
-	    if { $_tests_verbose } {
-		eval puts-saved $args
-	    }
 	}
     }
 
@@ -903,6 +900,7 @@ proc _run_test {scriptsdir group gridname casefile echo} {
 	uplevel set casename [file tail $casefile]
 	uplevel set groupname $group
 	uplevel set gridname $gridname
+	uplevel set dirname  $scriptsdir
 
 	# set variables for saving of images if not yet set
 	if { ! [uplevel info exists imagedir] } {