ruby-opengl 0.33.0

data/examples/README

@@ -0,0 +1,36 @@
+Examples
+========
+
+Just some quick notes on which examples work and which don't.
+
+
+Running legacy ruby-opengl code
+-------------------------------
+
+Note that the filenames ending with `_prev.rb` contain code that is compatible
+with the previous version of ruby-opengl (i.e. Yoshi's version). If you have
+code that runs with the previous version, to make it run with this current
+version, either see the tutorial about the simple changes you can make to the
+code, or else just use
+
+    require "gl_prev"
+    require "glu_prev"
+    require "glut_prev"
+
+at the top of your files instead of 
+
+    require 'opengl'
+    require 'glut'
+
+(Of course, if you haven't yet installed ruby-opengl on your system, you'll
+need to include paths in those require statments above: as in,
+`require "../lib/gl_prev"`.)
+
+
+Status of examples
+------------------
+
+* plane.rb -- works
+* smooth.rb, smooth_prev.rb -- works
+* aaindex.rb  -- does not seem to work
+* test.rb  -- does not seem to work

data/examples/aaindex.rb

@@ -0,0 +1,97 @@
+require "../ext/gl/GL"
+require "../ext/glut/GLUT"
+require "rational"
+
+require "../lib/gl_prev"
+require "../lib/glut_prev"
+
+RAMPSIZE=16
+RAMP1START=32
+RAMP2START=48
+
+STDOUT.sync = TRUE
+$rotAngle = 0
+
+# Initialize antialiasing for color index mode,
+# including loading a green color ramp starting
+# at RAMP1START, and a blue color ramp starting
+# at RAMP2START. The ramps must be a multiple of 16.
+def myinit
+   for i in (0..RAMPSIZE)
+      shade = i.to_f/RAMPSIZE.to_f;
+      GLUT.SetColor(RAMP1START+i, 0, shade, 0.0);
+      GLUT.SetColor(RAMP2START+i, 0, 0, shade);
+   end
+
+   GL.Enable(GL::LINE_SMOOTH);
+   GL.Hint(GL::LINE_SMOOTH_HINT, GL::DONT_CARE);
+   GL.LineWidth(1.5);
+
+   GL.ClearIndex(RAMP1START);
+end
+
+display = Proc.new {
+   GL.Clear(GL::COLOR_BUFFER_BIT);
+
+   GL.Indexi(RAMP1START);
+   GL.PushMatrix();
+   GL.Rotate(-$rotAngle, 0.0, 0.0, 0.1);
+   GL.Begin(GL::LINES);
+      GL.Vertex(-0.5, 0.5);
+      GL.Vertex(0.5, -0.5);
+   GL.End
+   GL.PopMatrix();
+
+   GL.Indexi(RAMP2START);
+   GL.PushMatrix();
+   GL.Rotate($rotAngle, 0.0, 0.0, 0.1);
+   GL.Begin(GL::LINES);
+      GL.Vertex(0.5, 0.5);
+      GL.Vertex(-0.5, -0.5);
+   GL.End
+   GL.PopMatrix();
+
+   GL.Flush();
+}
+
+reshape = Proc.new {|w, h|
+   GL.Viewport(0, 0,  w,  h);
+   GL.MatrixMode(GL::PROJECTION);
+   GL.LoadIdentity();
+   if (w <= h)
+      GLU.Ortho2D(-1.0, 1.0, -h.to_f/w.to_f, h.to_f/w.to_f);
+   else
+      GLU.Ortho2D(w.to_f/h.to_f, w.to_f/h.to_f, -1.0, 1.0);
+   end
+   GL.MatrixMode(GL::MODELVIEW);
+   GL.LoadIdentity();
+}
+
+keyboard = Proc.new {|key, x, y|
+   case (key)
+      when 'r'[0]
+         $rotAngle += 20
+         $rotAngle = 0 if ($rotAngle >= 360)
+         GLUT.PostRedisplay();
+      when 'R'[0]
+         $rotAngle -= 20
+         $rotAngle = 360 if ($rotAngle <= 0)
+         GLUT.PostRedisplay();
+      when 27
+         exit(0);
+   end
+}
+
+#  Main Loop
+#  Open window with initial window size, title bar,
+#  color index display mode, and handle input events.
+#
+   GLUT.Init
+   GLUT.InitDisplayMode(GLUT::SINGLE | GLUT::INDEX);
+   GLUT.InitWindowSize(200, 200);
+   GLUT.CreateWindow($0);
+   myinit
+   GLUT.ReshapeFunc(reshape);
+   GLUT.KeyboardFunc(keyboard);
+   GLUT.DisplayFunc(display);
+   GLUT.MainLoop

data/examples/all_tests.rb

@@ -0,0 +1,24 @@
+#!/usr/bin/ruby -w
+#--
+# Copyright (C) 2006 Peter McLain <peter.mclain@gmail.com>
+#
+# 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.
+#++
+
+# Run all of *.rb files in the current directory
+this_file_name = File.basename( __FILE__ )
+Dir['*.rb'].each do |f|
+    f.strip!
+    next if f == this_file_name
+    puts "\n=== running #{f}"
+    system "ruby #{f}"
+end

data/examples/plane.rb

@@ -0,0 +1,161 @@
+#
+#/* Copyright (c) Mark J. Kilgard, 1994. */
+#
+#/*
+# * (c) Copyright 1993, Silicon Graphics, Inc.
+# * ALL RIGHTS RESERVED 
+# * Permission to use, copy, modify, and distribute this software for 
+# * any purpose and without fee is hereby granted, provided that the above
+# * copyright notice appear in all copies and that both the copyright notice
+# * and this permission notice appear in supporting documentation, and that 
+# * the name of Silicon Graphics, Inc. not be used in advertising
+# * or publicity pertaining to distribution of the software without specific,
+# * written prior permission. 
+# *
+# * THE MATERIAL EMBODIED ON THIS SOFTWARE IS PROVIDED TO YOU "AS-IS"
+# * AND WITHOUT WARRANTY OF ANY KIND, EXPRESS, IMPLIED OR OTHERWISE,
+# * INCLUDING WITHOUT LIMITATION, ANY WARRANTY OF MERCHANTABILITY OR
+# * FITNESS FOR A PARTICULAR PURPOSE.  IN NO EVENT SHALL SILICON
+# * GRAPHICS, INC.  BE LIABLE TO YOU OR ANYONE ELSE FOR ANY DIRECT,
+# * SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY
+# * KIND, OR ANY DAMAGES WHATSOEVER, INCLUDING WITHOUT LIMITATION,
+# * LOSS OF PROFIT, LOSS OF USE, SAVINGS OR REVENUE, OR THE CLAIMS OF
+# * THIRD PARTIES, WHETHER OR NOT SILICON GRAPHICS, INC.  HAS BEEN
+# * ADVISED OF THE POSSIBILITY OF SUCH LOSS, HOWEVER CAUSED AND ON
+# * ANY THEORY OF LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE
+# * POSSESSION, USE OR PERFORMANCE OF THIS SOFTWARE.
+# * 
+# * US Government Users Restricted Rights 
+# * Use, duplication, or disclosure by the Government is subject to
+# * restrictions set forth in FAR 52.227.19(c)(2) or subparagraph
+# * (c)(1)(ii) of the Rights in Technical Data and Computer Software
+# * clause at DFARS 252.227-7013 and/or in similar or successor
+# * clauses in the FAR or the DOD or NASA FAR Supplement.
+# * Unpublished-- rights reserved under the copyright laws of the
+# * United States.  Contractor/manufacturer is Silicon Graphics,
+# * Inc., 2011 N.  Shoreline Blvd., Mountain View, CA 94039-7311.
+# *
+# * OpenGL(TM) is a trademark of Silicon Graphics, Inc.
+# */
+#/*
+# *  plane.c
+# *  This program demonstrates the use of local versus 
+# *  infinite lighting on a flat plane.
+# */
+
+require "gl"
+require "glut"
+require "mathn"
+
+# /*  Initialize material property, light source, and lighting model.
+# */
+def myinit
+    mat_ambient = [ 0.0, 0.0, 0.0, 1.0 ];
+#/*   mat_specular and mat_shininess are NOT default values	*/
+    mat_diffuse = [ 0.4, 0.4, 0.4, 1.0 ];
+    mat_specular = [ 1.0, 1.0, 1.0, 1.0 ];
+    mat_shininess = [ 15.0 ];
+
+    light_ambient = [ 0.0, 0.0, 0.0, 1.0 ];
+    light_diffuse = [ 1.0, 1.0, 1.0, 1.0 ];
+    light_specular = [ 1.0, 1.0, 1.0, 1.0 ];
+    lmodel_ambient = [ 0.2, 0.2, 0.2, 1.0 ];
+
+    Gl.glMaterial(Gl::GL_FRONT, Gl::GL_AMBIENT, mat_ambient);
+    Gl.glMaterial(Gl::GL_FRONT, Gl::GL_DIFFUSE, mat_diffuse);
+    Gl.glMaterial(Gl::GL_FRONT, Gl::GL_SPECULAR, mat_specular);
+    Gl.glMaterial(Gl::GL_FRONT, Gl::GL_SHININESS, *mat_shininess);
+    Gl.glLight(Gl::GL_LIGHT0, Gl::GL_AMBIENT, light_ambient);
+    Gl.glLight(Gl::GL_LIGHT0, Gl::GL_DIFFUSE, light_diffuse);
+    Gl.glLight(Gl::GL_LIGHT0, Gl::GL_SPECULAR, light_specular);
+    Gl.glLightModel(Gl::GL_LIGHT_MODEL_AMBIENT, lmodel_ambient);
+
+    Gl.glEnable(Gl::GL_LIGHTING);
+    Gl.glEnable(Gl::GL_LIGHT0);
+    Gl.glDepthFunc(Gl::GL_LESS);
+    Gl.glEnable(Gl::GL_DEPTH_TEST);
+end
+
+def drawPlane
+    Gl.glBegin(Gl::GL_QUADS);
+    Gl.glNormal(0.0, 0.0, 1.0);
+    Gl.glVertex(-1.0, -1.0, 0.0);
+    Gl.glVertex(0.0, -1.0, 0.0);
+    Gl.glVertex(0.0, 0.0, 0.0);
+    Gl.glVertex(-1.0, 0.0, 0.0);
+
+    Gl.glNormal(0.0, 0.0, 1.0);
+    Gl.glVertex(0.0, -1.0, 0.0);
+    Gl.glVertex(1.0, -1.0, 0.0);
+    Gl.glVertex(1.0, 0.0, 0.0);
+    Gl.glVertex(0.0, 0.0, 0.0);
+
+    Gl.glNormal(0.0, 0.0, 1.0);
+    Gl.glVertex(0.0, 0.0, 0.0);
+    Gl.glVertex(1.0, 0.0, 0.0);
+    Gl.glVertex(1.0, 1.0, 0.0);
+    Gl.glVertex(0.0, 1.0, 0.0);
+
+    Gl.glNormal(0.0, 0.0, 1.0);
+    Gl.glVertex(0.0, 0.0, 0.0);
+    Gl.glVertex(0.0, 1.0, 0.0);
+    Gl.glVertex(-1.0, 1.0, 0.0);
+    Gl.glVertex(-1.0, 0.0, 0.0);
+    Gl.glEnd();
+end
+
+display = Proc.new {
+    infinite_light = [ 1.0, 1.0, 1.0, 0.0 ];
+    local_light = [ 1.0, 1.0, 1.0, 1.0 ];
+
+    Gl.glClear(Gl::GL_COLOR_BUFFER_BIT | Gl::GL_DEPTH_BUFFER_BIT);
+
+    Gl.glPushMatrix();
+    Gl.glTranslate(-1.5, 0.0, 0.0);
+    Gl.glLight(Gl::GL_LIGHT0, Gl::GL_POSITION, infinite_light);
+    drawPlane();
+    Gl.glPopMatrix();
+
+    Gl.glPushMatrix();
+    Gl.glTranslate(1.5, 0.0, 0.0);
+    Gl.glLight(Gl::GL_LIGHT0, Gl::GL_POSITION, local_light);
+    drawPlane();
+    Gl.glPopMatrix();
+    Gl.glFlush();
+}
+
+myReshape = Proc.new {|w, h|
+    Gl.glViewport(0, 0, w, h);
+    Gl.glMatrixMode(Gl::GL_PROJECTION);
+    Gl.glLoadIdentity();
+    if (w <= h) 
+	Gl.glOrtho(-1.5, 1.5, -1.5*h/w, 1.5*h/w, -10.0, 10.0);
+    else 
+	Gl.glOrtho(-1.5*w/h, 1.5*w/h, -1.5, 1.5, -10.0, 10.0);
+    end
+    Gl.glMatrixMode(Gl::GL_MODELVIEW);
+}
+
+# Keyboard handler to exit when ESC is typed
+keyboard = lambda do |key, x, y|
+  case(key)
+  when 27
+    exit(0)
+  end
+end
+
+#/*  Main Loop
+# *  Open window with initial window size, title bar, 
+# *  RGBA display mode, and handle input events.
+# */
+#int main(int argc, char** argv)
+#{
+    Glut.glutInit
+    Glut.glutInitDisplayMode(Glut::GLUT_SINGLE | Glut::GLUT_RGB | Glut::GLUT_DEPTH);
+    Glut.glutInitWindowSize(500, 200);
+    Glut.glutCreateWindow($0);
+    myinit();
+    Glut.glutReshapeFunc(myReshape);
+    Glut.glutDisplayFunc(display);
+    Glut.glutKeyboardFunc(keyboard);
+    Glut.glutMainLoop();

data/examples/smooth.rb

@@ -0,0 +1,40 @@
+require "../lib/gl"
+require "../lib/glut"
+
+STDOUT.sync=TRUE
+disp = Proc.new {
+  Gl.glClear(Gl::GL_COLOR_BUFFER_BIT)
+  Gl.glBegin(Gl::GL_TRIANGLES)
+    Gl.glColor(0.0, 0.0, 1.0)
+    Gl.glVertex(0, 0)
+    Gl.glColor(0.0, 1.0, 0.0)
+    Gl.glVertex(200, 200)
+    Gl.glColor(1.0, 0.0, 0.0)
+    Gl.glVertex(20, 200)
+  Gl.glEnd
+  Gl.glFlush
+}
+
+reshape = Proc.new {|w, h|
+  Gl.glViewport(0, 0, w, h)
+  Gl.glMatrixMode(Gl::GL_PROJECTION)
+  Gl.glLoadIdentity
+  Gl.glOrtho(0, w, 0, h, -1, 1)
+  Gl.glScale(1, -1, 1)
+  Gl.glTranslate(0, -h, 0)
+}
+
+# Keyboard handler to exit when ESC is typed
+keyboard = lambda do |key, x, y|
+    case(key)
+    when 27
+        exit(0)
+    end
+end
+
+Glut.glutInit
+a =  Glut.glutCreateWindow("single triangle");
+Glut.glutDisplayFunc(disp);
+Glut.glutReshapeFunc(reshape);
+Glut.glutKeyboardFunc( keyboard )
+Glut.glutMainLoop;

data/examples/smooth_prev.rb

@@ -0,0 +1,40 @@
+require "../lib/gl_prev"
+require "../lib/glut_prev"
+
+STDOUT.sync=TRUE
+disp = Proc.new {
+  GL.Clear(GL::COLOR_BUFFER_BIT)
+  GL.Begin(GL::TRIANGLES)
+    GL.Color(0.0, 0.0, 1.0)
+    GL.Vertex(0, 0)
+    GL.Color(0.0, 1.0, 0.0)
+    GL.Vertex(200, 200)
+    GL.Color(1.0, 0.0, 0.0)
+    GL.Vertex(20, 200)
+  GL.End
+  GL.Flush
+}
+
+reshape = Proc.new {|w, h|
+  GL.Viewport(0, 0, w, h)
+  GL.MatrixMode(GL::PROJECTION)
+  GL.LoadIdentity
+  GL.Ortho(0, w, 0, h, -1, 1)
+  GL.Scale(1, -1, 1)
+  GL.Translate(0, -h, 0)
+}
+
+# Keyboard handler to exit when ESC is typed
+keyboard = lambda do |key, x, y|
+    case(key)
+    when 27
+        exit(0)
+    end
+end
+
+GLUT.Init
+a =  GLUT.CreateWindow("single triangle");
+GLUT.DisplayFunc(disp);
+GLUT.ReshapeFunc(reshape);
+GLUT.KeyboardFunc( keyboard )
+GLUT.MainLoop;

data/examples/test.rb

@@ -0,0 +1,64 @@
+# Copyright (C) 2006 Peter McLain <peter.mclain@gmail.com>
+#
+# 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.
+
+require '../lib/glut'
+require '../lib/gl'
+
+class GlutTest
+
+  def initialize
+    puts "=== GlutTest.initialize ==="
+    # Setup the GLUT display loop callback
+    @display = lambda do
+      puts "=== In display routine"
+      Gl.glClear( Gl::GL_COLOR_BUFFER_BIT | Gl::GL_DEPTH_BUFFER_BIT )
+      Gl.glColor3f( 1.0, 1.0, 1.0 )
+
+      Gl.glBegin( Gl::GL_POLYGON )
+
+      Gl.glVertex2f( -0.5, -0.5 )
+      Gl.glVertex2f( -0.5,  0.5 )
+      Gl.glVertex2f(  0.5,  0.5 )
+      Gl.glVertex2f(  0.5, -0.5 )
+
+      Gl.glEnd
+
+      Gl.glFlush
+    end
+
+    # Keyboard handler to exit when ESC is typed
+    @keyboard = lambda do |key, x, y|
+      case(key)
+      when 27
+        exit(0)
+      end
+    end
+  end
+
+  def show
+    puts "=== GlutTest.show ==="
+    Glut.glutInit
+    Glut.glutInitDisplayMode( Glut::GLUT_DOUBLE | Glut::GLUT_RGB | Glut::GLUT_DEPTH )
+    Glut.glutCreateWindow( 'pbm' )
+    Glut.glutDisplayFunc( @display )
+    #Glut.glutReshapeFunc( @reshape )
+    Glut.glutKeyboardFunc( @keyboard ) if @keyboard
+    Glut.glutMainLoop
+  end
+end
+
+if __FILE__ == $0
+  gt = GlutTest.new
+  gt.show
+end
+

data/ext/common/Rakefile

@@ -0,0 +1,39 @@
+# -*- ruby -*-
+
+# Copyright (C) 2006 John M. Gabriele <jmg3000@gmail.com>
+#
+# This program is distributed under the terms of the MIT license.
+# See the included COPYRIGHT 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.
+
+# Simple Rakefile for building rbogl.c.
+
+require 'rake/clean'
+require 'rbconfig'
+
+INCLUDES = "-I#{Config::CONFIG['archdir']}"
+CFLAGS   = "#{Config::CONFIG['CFLAGS']}"
+
+case RUBY_PLATFORM
+when /darwin/
+    INCLUDES << ' -F/System/Library/Frameworks'
+end
+
+CLEAN.include( '*.o' )
+
+SRC = FileList[ '*.c' ]
+OBJ = SRC.ext( 'o' )
+
+task :default => OBJ
+file 'rbogl.c' => [ 'rbogl.h' ]
+
+rule '.o' => '.c' do |t|
+    sh "cc -c #{CFLAGS} #{INCLUDES} -o #{t.name} #{t.source}"
+end