mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-21 10:13:43 +03:00
0d828ac838
Removed testgrids 'bugs/vis' and '3rdparty'; tests have been redistributed across other grids. Moved testgrid 'v3d/ivtk' into dedicated 'vtk/ivtk'. Added testgrid 'vselect' dedicated to 3D viewer picking/selection functionality and filled with tests from 'v3d/vertex', 'v3d/face' and similar groups. Added testgrid 'opengl' dedicated to OpenGL driver low-level functionality (GLSL programs and similar) and filled with tests from 'v3d/glsl', 'v3d/raytrace', '3rdparty/fonts', 'bugs/vis' (portion) and similar. Added testgrid 'opengles3' dedicated to OpenGL ES 3.0 driver low-level functionality and reusing tests from 'opengl' testgrid. Subgroup 'opengles3/raytrace' is disabled on Windows, as Ray-Tracing currently requires OpenGL ES 3.2. while ANGLE library implements only OpenGL ES 3.0. Added testgrid 'opengles2' dedicated to OpenGL ES 2.0 driver low-level functionality and reusing a limited subset of passing tests from 'opengl' testgrid. Currently testgrid is activated only on Windows platform when using ANGLE library (properietary OpenGL ES drivers do not allow creation of restricted 2.0 context). Test cases have been cleaned out to put bug description into log, to properly load necessary plugins and to explicitly dump viewer.
46 lines
1.1 KiB
Plaintext
46 lines
1.1 KiB
Plaintext
puts "========"
|
|
puts "Per-vertex lighting using built-in GLSL program, one positional light source."
|
|
puts "Visual comparison with the reference snapshot should be performed for this test case."
|
|
puts "========"
|
|
|
|
pload MODELING VISUALIZATION
|
|
vclear
|
|
vclose ALL
|
|
vinit View1
|
|
|
|
# create objects
|
|
set anX 0.001
|
|
circle c 0 0 0 0.001
|
|
mkedge e c
|
|
wire w e
|
|
plane s
|
|
mkface f1 s w
|
|
mkface f2 s w
|
|
ttranslate f1 $anX -0.001 0
|
|
|
|
# display objects
|
|
vtop
|
|
vdisplay -dispMode 1 f1 f2
|
|
vsetlocation f2 $anX 0.001 0
|
|
vpoint vl $anX 0 0.001
|
|
vfit
|
|
|
|
# setup light
|
|
vcaps -ffp 0
|
|
vrenderparams -shadingModel vert
|
|
vlight clear
|
|
vlight add positional pos $anX 0 0.001 color RED1 headLight 0
|
|
|
|
set aColor1 [vreadpixel 205 180 rgb name]
|
|
set aColor2 [vreadpixel 205 210 rgb name]
|
|
if { "$aColor1" != "RED" || "$aColor2" != "RED" } {
|
|
puts "Error: expected color near the light spot is RED"
|
|
}
|
|
|
|
set aColor3 [vreadpixel 205 100 rgb name]
|
|
set aColor4 [vreadpixel 205 306 rgb name]
|
|
if { "$aColor3" != "RED4" || "$aColor4" != "RED4" } {
|
|
puts "Error: expected color far from the light spot is RED4"
|
|
}
|
|
vdump ${imagedir}/${casename}.png
|