1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
|
#
# Copyright (C) 2007 Jan Dvorak <jan.dvorak@kraxnet.cz>
#
# This program is distributed under the terms of the MIT license.
# See the included MIT-LICENSE file for the terms of this license.
#
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
# OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
# IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
# CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
# TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
# SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
#
if __FILE__ == $0
# If we are being called from the command line, e.g., ruby foo.rb, then
# fixup the load path so we can find the OpenGL extension libs
$: << File.join(File.dirname(__FILE__), '..', 'lib')
end
require 'test/unit'
require 'gl'
require 'glut'
require 'matrix'
include Gl
include Glut
Gl.enable_error_checking
$window_size = 512
def glut_init()
display_func = lambda do
raise
end
glutInit
glutInitDisplayMode(GLUT_DEPTH | GLUT_DOUBLE | GLUT_RGBA | GLUT_STENCIL | GLUT_ACCUM | GLUT_ALPHA)
glutInitWindowPosition(1, 1)
glutInitWindowSize($window_size, $window_size)
glutCreateWindow("test")
# hack the need to call glutMainLoop on some implementations
glutDisplayFunc(display_func)
begin
glutMainLoop()
rescue
# continue
end
end
def approx_equal(a,b,epsilon=0.01)
(0...a.size).each do |i|
if ((a[i] - b[i]).abs > epsilon)
return false
end
end
true
end
def common_setup
if $glut_initialized == nil
glut_init()
$glut_initialized = true
end
glPushAttrib(GL_ALL_ATTRIB_BITS)
glPushClientAttrib(GL_CLIENT_ALL_ATTRIB_BITS)
glMatrixMode(GL_MODELVIEW)
glLoadIdentity()
glMatrixMode(GL_PROJECTION)
glLoadIdentity()
glClearColor(0,0,0,0)
glClear(GL_COLOR_BUFFER_BIT)
end
def common_teardown
glPopAttrib()
glPopClientAttrib()
glRenderMode(GL_RENDER)
# in case there is an GL error that escaped error checking routines ...
error = glGetError()
p gluErrorString(error) if (error!=0)
assert_equal(error,0)
end
def supported?(funcs)
Array(funcs).each do |name| # convert to array if it isn't already
if !Gl.is_available?(name)
puts ""
print "#{name} not supported, test skipped"
return false
end
end
return true
end
|
