mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
a453f9d128
Problem: From the point of view of the STEP format (and others), it is allowed to describe a face on a surface with natural boundaries (torus, sphere) without specifying these boundaries. Thus, a face on a closed surface and containing an inner wire (or several) is correctly defined and describes a face with a cutout defined by this wire. At the same time, there is a function (ShapeFix_Face::FixOrientation) in the ShapeHealing procedure that corrects the orientation of the wires, and it starts before the function of adding natural boundaries (ShapeFix_Face::FixAddNaturalBound). There are many shapes that have incorrectly oriented wires and this procedure successfully heals them, but on a correctly specified face with single inner wire on closed surface, we do not get the entire surface with a cutout, but a part of the surface defined by the wire. This fix is intended to resolve this ambiguity. Change: 1. Added function isNeedAddNaturalBound that returns TRUE if face needs to add natural bounds. 2. Corrected condition in FixOrientation to ignoring faces that needs to add natural bounds. 3. For tests in which one wire was incorrectly oriented on a closed surface, flag AddNaturalBound was disabled. 5. Test with cutout from torus was created: bugs step bug28414. Result: By default, it is correct to add natural boundaries, because this case is correct from the point of view of the STEP format and others.
60 lines
1.5 KiB
Plaintext
60 lines
1.5 KiB
Plaintext
pload DCAF
|
|
pload TOPTEST
|
|
pload XDE
|
|
|
|
cpulimit 1000
|
|
|
|
# Create a new document and set UndoLimit
|
|
NewDocument D BinXCAF
|
|
UndoLimit D 100
|
|
|
|
# Local length unit value
|
|
set lengthunit_start ""
|
|
|
|
# Open a transaction
|
|
NewCommand D
|
|
|
|
# Reads resource file, returns options from file as key-value dict
|
|
proc parse_resource_file {theFileName} {
|
|
# Creating empty dictionary
|
|
set aDict [dict create];
|
|
# Check for resource file
|
|
if { [info exists theFileName] == 0 } {
|
|
puts "Error: resource file \"${theFileName}\" isn't found"
|
|
return $aDict
|
|
}
|
|
# Open a resource file
|
|
set aFD [open "${theFileName}" "rb"]
|
|
set aLineNo 0
|
|
# Read line by line
|
|
while {[gets $aFD aLine] !=-1 } {
|
|
incr aLineNo
|
|
# Clear the line from comment
|
|
if {[regexp {(^[^!]+)} $aLine match aClearLine]} {
|
|
# remove spaces
|
|
set aClearLine [string trim $aClearLine]
|
|
if {[string length $aClearLine] != 0} {
|
|
if {[regexp {(\S+)\s*:\s*(\S*)} $aClearLine match aKey aValue]} {
|
|
dict set aDict $aKey $aValue
|
|
} else {
|
|
puts "Error: syntax error in resource file at line: ${aLineNo}"
|
|
}
|
|
}
|
|
}
|
|
}
|
|
close $aFD
|
|
return $aDict
|
|
}
|
|
|
|
# Creates new resource file with options as key-value dict
|
|
proc create_resource_file {theFileName theOptions} {
|
|
# Open a resource file
|
|
set aFD [open "${theFileName}" "wb"]
|
|
set aLineNo 0
|
|
# Write line by line
|
|
dict for {aKey aValue} $theOptions {
|
|
puts $aFD "${aKey} : ${aValue}"
|
|
}
|
|
close $aFD
|
|
}
|