mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
e05c25c123
Implementation of capturing of output to standard streams in DRAW (see command dlog) is revised to avoid problems with command "test" executing long test scripts: 1. Method OSD_File::Capture() is removed: on Windows it was allocating a C file descriptor for a file opened using WinAPI, and never released that descriptor (once allocated, it cannot be released separately from WinAPI file handle). Direct calls to dup/dup2 are used instead. 2. In Draw_Window.cxx the standard Tcl channels are initialized manually using corrected version of Tcl internal function. This works around a problem with Tcl channels on Windows being bound to OS device handle owned by the system which can get invalidated as result of calls to dup2() (used to capture output to standard streams). 3. Temporary file for capturing is opened once and used to store whole log, thus the need to collect log in the string stream in memory is avoided 4. Possible errors of dup() and dup2() are checked and reported Test demo draw dlog is added Off-topic changes: - Test demo draw getsource is corrected for VS2017 which generates file name in lowercase - Field myFaceBounds is initialized in constructor of the class BRepAlgo_NormalProjection to avoid undefined behavior - Test bugs modalg_5 bug24012 is corrected to use command nproject instead of custom one, and to check propertes of the resulting shape
41 lines
989 B
Plaintext
41 lines
989 B
Plaintext
puts "============"
|
|
puts "OCC24012"
|
|
puts "============"
|
|
puts ""
|
|
############################################
|
|
# problem with BRepAlgo_NormalProjection
|
|
############################################
|
|
|
|
pload XDE
|
|
pload QAcommands
|
|
|
|
igesread [locate_data_file bug24012_face.igs] face *
|
|
igesread [locate_data_file bug24012_line.igs] edge *
|
|
|
|
nproject r edge face
|
|
checknbshapes r -edge 1
|
|
checkprops r -l 5.96
|
|
|
|
vinit
|
|
vsetdispmode 0
|
|
vdisplay face
|
|
vdisplay edge
|
|
vdisplay r
|
|
vsetcolor r yellow
|
|
vfit
|
|
|
|
set scale 71.101493567712652
|
|
set proj_X -0.14605970947882216
|
|
set proj_Y -0.18639384905183365
|
|
set proj_Z 0.97155745805516014
|
|
set up_X -0.587582742029223
|
|
set up_Y 0.80643668322534767
|
|
set up_Z 0.066380699137021923
|
|
set at_X 6.30475074082204
|
|
set at_Y 6.748073489527
|
|
set at_Z 8.5106037329062
|
|
|
|
vviewparams -scale ${scale} -proj ${proj_X} ${proj_Y} ${proj_Z} -up ${up_X} ${up_Y} ${up_Z} -at ${at_X} ${at_Y} ${at_Z}
|
|
|
|
checkview -screenshot -3d -path ${imagedir}/${test_image}.png
|