Add support for GL_APPLE_vertex_array_object. Several test programs

and demos are also added.

Adding basic support to drivers should be as easy as just enabling the
extension, though thorough test would also be required.

5 files changed, 708 insertions, 0 deletions

diff --git a/progs/demos/Makefile b/progs/demos/Makefile
index c7a4cc7b82..87b5b84b3d 100644
--- a/progs/demos/Makefile
+++ b/progs/demos/Makefile
@@ -60,6 +60,7 @@ PROGS = \
 	trispd \
 	tunnel \
 	tunnel2 \
+	vao_demo \
 	winpos
 
 
diff --git a/progs/demos/vao_demo.c b/progs/demos/vao_demo.c
new file mode 100644
index 0000000000..e6a89f645b
--- /dev/null
+++ b/progs/demos/vao_demo.c
@@ -0,0 +1,323 @@
+/*
+ * (C) Copyright IBM Corporation 2006
+ * All Rights Reserved.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the "Software"),
+ * to deal in the Software without restriction, including without limitation
+ * on the rights to use, copy, modify, merge, publish, distribute, sub
+ * license, and/or sell copies of the Software, and to permit persons to whom
+ * the Software is furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice (including the next
+ * paragraph) shall be included in all copies or substantial portions of the
+ * Software.
+ *
+ * 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 NON-INFRINGEMENT.  IN NO EVENT SHALL
+ * IBM AND/OR THEIR SUPPLIERS 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.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <math.h>
+
+#ifdef __darwin__
+#include <GLUT/glut.h>
+
+typedef void (* PFNGLBINDVERTEXARRAYAPPLEPROC) (GLuint array);
+typedef void (* PFNGLDELETEVERTEXARRAYSAPPLEPROC) (GLsizei n, const GLuint *arrays);
+typedef void (* PFNGLGENVERTEXARRAYSAPPLEPROC) (GLsizei n, const GLuint *arrays);
+typedef GLboolean (* PFNGLISVERTEXARRAYAPPLEPROC) (GLuint array);
+
+#else
+#include <GL/glut.h>
+#endif
+
+static PFNGLBINDVERTEXARRAYAPPLEPROC bind_vertex_array = NULL;
+static PFNGLGENVERTEXARRAYSAPPLEPROC gen_vertex_arrays = NULL;
+static PFNGLDELETEVERTEXARRAYSAPPLEPROC delete_vertex_arrays = NULL;
+static PFNGLISVERTEXARRAYAPPLEPROC is_vertex_array = NULL;
+
+static int Width = 400;
+static int Height = 200;
+static const GLfloat Near = 5.0, Far = 25.0;
+static GLfloat angle = 0.0;
+
+static GLuint cube_array_obj = 0;
+static GLuint oct_array_obj = 0;
+
+static const GLfloat cube_vert[] = {
+    -0.5, -0.5, -0.5,  1.0,
+     0.5, -0.5, -0.5,  1.0,
+     0.5,  0.5, -0.5,  1.0,
+    -0.5,  0.5, -0.5,  1.0,
+
+    -0.5, -0.5,  0.5,  1.0,
+     0.5, -0.5,  0.5,  1.0,
+     0.5,  0.5,  0.5,  1.0,
+    -0.5,  0.5,  0.5,  1.0,
+
+    -0.5,  0.5, -0.5,  1.0,
+     0.5,  0.5, -0.5,  1.0,
+     0.5,  0.5,  0.5,  1.0,
+    -0.5,  0.5,  0.5,  1.0,
+
+    -0.5, -0.5, -0.5,  1.0,
+     0.5, -0.5, -0.5,  1.0,
+     0.5, -0.5,  0.5,  1.0,
+    -0.5, -0.5,  0.5,  1.0,
+
+     0.5, -0.5, -0.5,  1.0,
+     0.5, -0.5,  0.5,  1.0,
+     0.5,  0.5,  0.5,  1.0,
+     0.5,  0.5, -0.5,  1.0,
+
+    -0.5, -0.5, -0.5,  1.0,
+    -0.5, -0.5,  0.5,  1.0,
+    -0.5,  0.5,  0.5,  1.0,
+    -0.5,  0.5, -0.5,  1.0,
+
+};
+
+static const GLfloat cube_color[] = {
+     1.0, 0.0, 0.0, 1.0,
+     1.0, 0.0, 0.0, 1.0,
+     1.0, 0.0, 0.0, 1.0,
+     1.0, 0.0, 0.0, 1.0,
+
+     0.0, 1.0, 0.0, 1.0,
+     0.0, 1.0, 0.0, 1.0,
+     0.0, 1.0, 0.0, 1.0,
+     0.0, 1.0, 0.0, 1.0,
+
+     0.0, 0.0, 1.0, 1.0,
+     0.0, 0.0, 1.0, 1.0,
+     0.0, 0.0, 1.0, 1.0,
+     0.0, 0.0, 1.0, 1.0,
+
+     1.0, 0.0, 1.0, 1.0,
+     1.0, 0.0, 1.0, 1.0,
+     1.0, 0.0, 1.0, 1.0,
+     1.0, 0.0, 1.0, 1.0,
+
+     1.0, 1.0, 1.0, 1.0,
+     1.0, 1.0, 1.0, 1.0,
+     1.0, 1.0, 1.0, 1.0,
+     1.0, 1.0, 1.0, 1.0,
+
+     0.5, 0.5, 0.5, 1.0,
+     0.5, 0.5, 0.5, 1.0,
+     0.5, 0.5, 0.5, 1.0,
+     0.5, 0.5, 0.5, 1.0,
+};
+
+static const GLfloat oct_vert[] = {
+    0.0,  0.0,  0.7071, 1.0,
+    0.5,  0.5,  0.0,  1.0,
+   -0.5,  0.5,  0.0,  1.0,
+
+    0.0,  0.0,  0.7071, 1.0,
+    0.5, -0.5,  0.0,  1.0,
+   -0.5, -0.5,  0.0,  1.0,
+
+    0.0,  0.0,  0.7071, 1.0,
+   -0.5, -0.5,  0.0,  1.0,
+   -0.5,  0.5,  0.0,  1.0,
+
+    0.0,  0.0,  0.7071, 1.0,
+    0.5,  0.5,  0.0,  1.0,
+    0.5, -0.5,  0.0,  1.0,
+
+
+    0.0,  0.0, -0.7071, 1.0,
+    0.5,  0.5,  0.0,  1.0,
+   -0.5,  0.5,  0.0,  1.0,
+
+    0.0,  0.0, -0.7071, 1.0,
+    0.5, -0.5,  0.0,  1.0,
+   -0.5, -0.5,  0.0,  1.0,
+
+    0.0,  0.0, -0.7071, 1.0,
+   -0.5, -0.5,  0.0,  1.0,
+   -0.5,  0.5,  0.0,  1.0,
+
+    0.0,  0.0, -0.7071, 1.0,
+    0.5,  0.5,  0.0,  1.0,
+    0.5, -0.5,  0.0,  1.0,
+};
+
+static const GLfloat oct_color[] = {
+     1.0, 0.64, 0.0, 1.0,
+     1.0, 0.64, 0.0, 1.0,
+     1.0, 0.64, 0.0, 1.0,
+
+     0.8, 0.51, 0.0, 1.0,
+     0.8, 0.51, 0.0, 1.0,
+     0.8, 0.51, 0.0, 1.0,
+
+     0.5, 0.32, 0.0, 1.0,
+     0.5, 0.32, 0.0, 1.0,
+     0.5, 0.32, 0.0, 1.0,
+
+     0.2, 0.13, 0.0, 1.0,
+     0.2, 0.13, 0.0, 1.0,
+     0.2, 0.13, 0.0, 1.0,
+
+     0.2, 0.13, 0.0, 1.0,
+     0.2, 0.13, 0.0, 1.0,
+     0.2, 0.13, 0.0, 1.0,
+
+     0.5, 0.32, 0.0, 1.0,
+     0.5, 0.32, 0.0, 1.0,
+     0.5, 0.32, 0.0, 1.0,
+
+     0.8, 0.51, 0.0, 1.0,
+     0.8, 0.51, 0.0, 1.0,
+     0.8, 0.51, 0.0, 1.0,
+
+     1.0, 0.64, 0.0, 1.0,
+     1.0, 0.64, 0.0, 1.0,
+     1.0, 0.64, 0.0, 1.0,
+};
+
+static void Display( void )
+{
+   glClearColor(0.1, 0.1, 0.4, 0);
+   glClear( GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT );
+
+   glMatrixMode( GL_MODELVIEW );
+   glLoadIdentity();
+   glTranslatef( 0.0, 0.0, -15.0 );
+   glRotatef( angle, 0.0 * angle , 0.0 * angle, 1.0 );
+
+
+   (*bind_vertex_array)( cube_array_obj );
+   glPushMatrix();
+   glTranslatef(-1.5, 0, 0);
+   glRotatef( angle, 0.3 * angle , 0.8 * angle, 1.0 );
+   glDrawArrays( GL_QUADS, 0, 4 * 6 );
+   glPopMatrix();
+
+
+   (*bind_vertex_array)( oct_array_obj );
+   glPushMatrix();
+   glTranslatef(1.5, 0, 0);
+   glRotatef( angle, 0.3 * angle , 0.8 * angle, 1.0 );
+   glDrawArrays( GL_TRIANGLES, 0, 3 * 8 );
+   glPopMatrix();
+
+   glutSwapBuffers();
+}
+
+
+static void Idle( void )
+{
+   static double t0 = -1.;
+   double dt, t = glutGet(GLUT_ELAPSED_TIME) / 1000.0;
+   if (t0 < 0.0)
+      t0 = t;
+   dt = t - t0;
+   t0 = t;
+
+   angle += 70.0 * dt;  /* 70 degrees per second */
+   angle = fmod(angle, 360.0); /* prevents eventual overflow */
+
+   glutPostRedisplay();
+}
+
+
+static void Visible( int vis )
+{
+   if ( vis == GLUT_VISIBLE ) {
+      glutIdleFunc( Idle );
+   }
+   else {
+      glutIdleFunc( NULL );
+   }
+}
+static void Reshape( int width, int height )
+{
+   GLfloat ar = (float) width / (float) height;
+   Width = width;
+   Height = height;
+   glViewport( 0, 0, width, height );
+   glMatrixMode( GL_PROJECTION );
+   glLoadIdentity();
+   glFrustum( -ar, ar, -1.0, 1.0, Near, Far );
+}
+
+
+static void Key( unsigned char key, int x, int y )
+{
+   (void) x;
+   (void) y;
+   switch (key) {
+      case 27:
+         exit(0);
+         break;
+   }
+   glutPostRedisplay();
+}
+
+
+static void Init( void )
+{
+   const char * const ver_string = (const char * const)
+       glGetString( GL_VERSION );
+
+   printf("GL_RENDERER = %s\n", (char *) glGetString(GL_RENDERER));
+   printf("GL_VERSION = %s\n", ver_string);
+
+   if ( !glutExtensionSupported("GL_APPLE_vertex_array_object") ) {
+      printf("Sorry, this program requires GL_APPLE_vertex_array_object\n");
+      exit(1);
+   }
+
+   bind_vertex_array = glutGetProcAddress( "glBindVertexArrayAPPLE" );
+   gen_vertex_arrays = glutGetProcAddress( "glGenVertexArraysAPPLE" );
+   delete_vertex_arrays = glutGetProcAddress( "glDeleteVertexArraysAPPLE" );
+   is_vertex_array = glutGetProcAddress( "glIsVertexArrayAPPLE" );
+
+
+   glEnable( GL_DEPTH_TEST );
+   
+   (*gen_vertex_arrays)( 1, & cube_array_obj );
+   (*bind_vertex_array)( cube_array_obj );
+   glVertexPointer( 4, GL_FLOAT, sizeof(GLfloat) * 4, cube_vert);
+   glColorPointer( 4, GL_FLOAT, sizeof(GLfloat) * 4, cube_color);
+   glEnableClientState( GL_VERTEX_ARRAY );
+   glEnableClientState( GL_COLOR_ARRAY );
+
+   (*gen_vertex_arrays)( 1, & oct_array_obj );
+   (*bind_vertex_array)( oct_array_obj );
+   glVertexPointer( 4, GL_FLOAT, sizeof(GLfloat) * 4, oct_vert);
+   glColorPointer( 4, GL_FLOAT, sizeof(GLfloat) * 4, oct_color);
+   glEnableClientState( GL_VERTEX_ARRAY );
+   glEnableClientState( GL_COLOR_ARRAY );
+
+   (*bind_vertex_array)( 0 );
+   glVertexPointer( 4, GL_FLOAT, sizeof(GLfloat) * 4, (void *) 0xDEADBEEF );
+   glColorPointer( 4, GL_FLOAT, sizeof(GLfloat) * 4, (void *) 0xBADDC0DE );
+}
+
+
+int main( int argc, char *argv[] )
+{
+   glutInit( &argc, argv );
+   glutInitWindowPosition( 0, 0 );
+   glutInitWindowSize( Width, Height );
+   glutInitDisplayMode( GLUT_RGB | GLUT_DOUBLE | GLUT_DEPTH );
+   glutCreateWindow( "GL_APPLE_vertex_array_object demo" );
+   glutReshapeFunc( Reshape );
+   glutKeyboardFunc( Key );
+   glutDisplayFunc( Display );
+   glutVisibilityFunc( Visible );
+   Init();
+   glutMainLoop();
+   return 0;
+}
diff --git a/progs/tests/Makefile b/progs/tests/Makefile
index 7f6655dd54..5f5453b86a 100644
--- a/progs/tests/Makefile
+++ b/progs/tests/Makefile
@@ -64,6 +64,8 @@ SOURCES = \
 	texobjshare.c \
 	texrect.c \
 	texwrap.c \
+	vao-01.c \
+	vao-02.c \
 	vparray.c \
 	vptest1.c \
 	vptest2.c \
diff --git a/progs/tests/vao-01.c b/progs/tests/vao-01.c
new file mode 100644
index 0000000000..c1849a0965
--- /dev/null
+++ b/progs/tests/vao-01.c
@@ -0,0 +1,177 @@
+/*
+ * (C) Copyright IBM Corporation 2006
+ * All Rights Reserved.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the "Software"),
+ * to deal in the Software without restriction, including without limitation
+ * on the rights to use, copy, modify, merge, publish, distribute, sub
+ * license, and/or sell copies of the Software, and to permit persons to whom
+ * the Software is furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice (including the next
+ * paragraph) shall be included in all copies or substantial portions of the
+ * Software.
+ *
+ * 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 NON-INFRINGEMENT.  IN NO EVENT SHALL
+ * IBM AND/OR THEIR SUPPLIERS 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.
+ */
+
+/**
+ * \file vao-01.c
+ *
+ * Simple test of APPLE_vertex_array_object functionality.  This test creates
+ * a VAO, pushed it (via \c glPushClientAttrib), modifies the VAO, then pops
+ * it (via \c glPopClientAttrib).  After popping, the state of the VAO is
+ * examined.
+ * 
+ * According the the APPLE_vertex_array_object spec, the contents of the VAO
+ * should be restored to the values that they had when pushed.
+ * 
+ * \author Ian Romanick <idr@us.ibm.com>
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <math.h>
+
+#ifdef __darwin__
+#include <GLUT/glut.h>
+
+typedef void (* PFNGLBINDVERTEXARRAYAPPLEPROC) (GLuint array);
+typedef void (* PFNGLDELETEVERTEXARRAYSAPPLEPROC) (GLsizei n, const GLuint *arrays);
+typedef void (* PFNGLGENVERTEXARRAYSAPPLEPROC) (GLsizei n, const GLuint *arrays);
+typedef GLboolean (* PFNGLISVERTEXARRAYAPPLEPROC) (GLuint array);
+
+#else
+#include <GL/glut.h>
+#endif
+
+static PFNGLBINDVERTEXARRAYAPPLEPROC bind_vertex_array = NULL;
+static PFNGLGENVERTEXARRAYSAPPLEPROC gen_vertex_arrays = NULL;
+static PFNGLDELETEVERTEXARRAYSAPPLEPROC delete_vertex_arrays = NULL;
+static PFNGLISVERTEXARRAYAPPLEPROC is_vertex_array = NULL;
+
+static int Width = 400;
+static int Height = 200;
+static const GLfloat Near = 5.0, Far = 25.0;
+
+
+static void Display( void )
+{
+}
+
+
+static void Idle( void )
+{
+}
+
+
+static void Visible( int vis )
+{
+   if ( vis == GLUT_VISIBLE ) {
+      glutIdleFunc( Idle );
+   }
+   else {
+      glutIdleFunc( NULL );
+   }
+}
+static void Reshape( int width, int height )
+{
+   GLfloat ar = (float) width / (float) height;
+   Width = width;
+   Height = height;
+   glViewport( 0, 0, width, height );
+   glMatrixMode( GL_PROJECTION );
+   glLoadIdentity();
+   glFrustum( -ar, ar, -1.0, 1.0, Near, Far );
+}
+
+
+static void Key( unsigned char key, int x, int y )
+{
+   (void) x;
+   (void) y;
+   switch (key) {
+      case 27:
+         exit(0);
+         break;
+   }
+   glutPostRedisplay();
+}
+
+
+static void Init( void )
+{
+   const char * const ver_string = (const char * const)
+       glGetString( GL_VERSION );
+   GLuint obj;
+   int pass = 1;
+   void * ptr;
+
+
+   printf("GL_RENDERER = %s\n", (char *) glGetString(GL_RENDERER));
+   printf("GL_VERSION = %s\n\n", ver_string);
+
+   if ( !glutExtensionSupported("GL_APPLE_vertex_array_object") ) {
+      printf("Sorry, this program requires GL_APPLE_vertex_array_object\n");
+      exit(2);
+   }
+
+   bind_vertex_array = glutGetProcAddress( "glBindVertexArrayAPPLE" );
+   gen_vertex_arrays = glutGetProcAddress( "glGenVertexArraysAPPLE" );
+   delete_vertex_arrays = glutGetProcAddress( "glDeleteVertexArraysAPPLE" );
+   is_vertex_array = glutGetProcAddress( "glIsVertexArrayAPPLE" );
+
+
+   (*gen_vertex_arrays)( 1, & obj );
+   (*bind_vertex_array)( obj );
+   glVertexPointer( 4, GL_FLOAT, sizeof(GLfloat) * 4, (void *) 0xDEADBEEF);
+   glEnableClientState( GL_VERTEX_ARRAY );
+
+   glPushClientAttrib( GL_CLIENT_VERTEX_ARRAY_BIT );
+
+   glVertexPointer( 4, GL_FLOAT, sizeof(GLfloat) * 4, (void *) 0xBADDC0DE);
+   glDisableClientState( GL_VERTEX_ARRAY );
+
+   glPopClientAttrib();
+
+   if ( ! glIsEnabled( GL_VERTEX_ARRAY ) ) {
+      printf( "Array state is incorrectly disabled.\n" );
+      pass = 0;
+   }
+
+   glGetPointerv( GL_VERTEX_ARRAY_POINTER, & ptr );
+   if ( ptr != (void *) 0xDEADBEEF ) {
+      printf( "Array pointer is incorrectly set to 0x%p.\n", ptr );
+      pass = 0;
+   }
+
+   if ( ! pass ) {
+      printf( "FAIL!\n" );
+      exit(1);
+   }
+}
+
+
+int main( int argc, char *argv[] )
+{
+   glutInit( &argc, argv );
+   glutInitWindowPosition( 0, 0 );
+   glutInitWindowSize( Width, Height );
+   glutInitDisplayMode( GLUT_RGB );
+   glutCreateWindow( "GL_APPLE_vertex_array_object demo" );
+   glutReshapeFunc( Reshape );
+   glutKeyboardFunc( Key );
+   glutDisplayFunc( Display );
+   glutVisibilityFunc( Visible );
+
+   Init();
+
+   return 0;
+}
diff --git a/progs/tests/vao-02.c b/progs/tests/vao-02.c
new file mode 100644
index 0000000000..87d45313a6
--- /dev/null
+++ b/progs/tests/vao-02.c
@@ -0,0 +1,205 @@
+/*
+ * (C) Copyright IBM Corporation 2006
+ * All Rights Reserved.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the "Software"),
+ * to deal in the Software without restriction, including without limitation
+ * on the rights to use, copy, modify, merge, publish, distribute, sub
+ * license, and/or sell copies of the Software, and to permit persons to whom
+ * the Software is furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice (including the next
+ * paragraph) shall be included in all copies or substantial portions of the
+ * Software.
+ *
+ * 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 NON-INFRINGEMENT.  IN NO EVENT SHALL
+ * IBM AND/OR THEIR SUPPLIERS 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.
+ */
+
+/**
+ * \file vao-02.c
+ *
+ * Simple test of APPLE_vertex_array_object functionality.  This test creates
+ * a VAO, pushed it (via \c glPushClientAttrib), deletes the VAO, then pops
+ * it (via \c glPopClientAttrib).  After popping, the state of the VAO is
+ * examined.
+ * 
+ * According the the APPLE_vertex_array_object spec, the contents of the VAO
+ * should be restored to the values that they had when pushed.
+ * 
+ * \author Ian Romanick <idr@us.ibm.com>
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <math.h>
+
+#ifdef __darwin__
+#include <GLUT/glut.h>
+
+typedef void (* PFNGLBINDVERTEXARRAYAPPLEPROC) (GLuint array);
+typedef void (* PFNGLDELETEVERTEXARRAYSAPPLEPROC) (GLsizei n, const GLuint *arrays);
+typedef void (* PFNGLGENVERTEXARRAYSAPPLEPROC) (GLsizei n, const GLuint *arrays);
+typedef GLboolean (* PFNGLISVERTEXARRAYAPPLEPROC) (GLuint array);
+
+#else
+#include <GL/glut.h>
+#endif
+
+static PFNGLBINDVERTEXARRAYAPPLEPROC bind_vertex_array = NULL;
+static PFNGLGENVERTEXARRAYSAPPLEPROC gen_vertex_arrays = NULL;
+static PFNGLDELETEVERTEXARRAYSAPPLEPROC delete_vertex_arrays = NULL;
+static PFNGLISVERTEXARRAYAPPLEPROC is_vertex_array = NULL;
+
+static int Width = 400;
+static int Height = 200;
+static const GLfloat Near = 5.0, Far = 25.0;
+
+
+static void Display( void )
+{
+}
+
+
+static void Idle( void )
+{
+}
+
+
+static void Visible( int vis )
+{
+   if ( vis == GLUT_VISIBLE ) {
+      glutIdleFunc( Idle );
+   }
+   else {
+      glutIdleFunc( NULL );
+   }
+}
+static void Reshape( int width, int height )
+{
+   GLfloat ar = (float) width / (float) height;
+   Width = width;
+   Height = height;
+   glViewport( 0, 0, width, height );
+   glMatrixMode( GL_PROJECTION );
+   glLoadIdentity();
+   glFrustum( -ar, ar, -1.0, 1.0, Near, Far );
+}
+
+
+static void Key( unsigned char key, int x, int y )
+{
+   (void) x;
+   (void) y;
+   switch (key) {
+      case 27:
+         exit(0);
+         break;
+   }
+   glutPostRedisplay();
+}
+
+
+static void Init( void )
+{
+   const char * const ver_string = (const char * const)
+       glGetString( GL_VERSION );
+   GLuint obj;
+   int pass = 1;
+   void * ptr;
+   GLenum err;
+
+
+   printf("GL_RENDERER = %s\n", (char *) glGetString(GL_RENDERER));
+   printf("GL_VERSION = %s\n\n", ver_string);
+
+   if ( !glutExtensionSupported("GL_APPLE_vertex_array_object") ) {
+      printf("Sorry, this program requires GL_APPLE_vertex_array_object\n");
+      exit(2);
+   }
+
+   bind_vertex_array = glutGetProcAddress( "glBindVertexArrayAPPLE" );
+   gen_vertex_arrays = glutGetProcAddress( "glGenVertexArraysAPPLE" );
+   delete_vertex_arrays = glutGetProcAddress( "glDeleteVertexArraysAPPLE" );
+   is_vertex_array = glutGetProcAddress( "glIsVertexArrayAPPLE" );
+
+
+   (*gen_vertex_arrays)( 1, & obj );
+   (*bind_vertex_array)( obj );
+   glVertexPointer( 4, GL_FLOAT, sizeof(GLfloat) * 4, (void *) 0xDEADBEEF);
+   glEnableClientState( GL_VERTEX_ARRAY );
+
+   glPushClientAttrib( GL_CLIENT_VERTEX_ARRAY_BIT );
+
+   (*delete_vertex_arrays)( 1, & obj );
+   
+   err = glGetError();
+   if (err) {
+      printf( "glGetError incorrectly returned 0x%04x.\n", err );
+      pass = 0;
+   }
+
+   if ( (*is_vertex_array)( obj ) ) {
+      printf( "Array object is incorrectly still valid.\n" );
+      pass = 0;
+   }
+
+   err = glGetError();
+   if (err) {
+      printf( "glGetError incorrectly returned 0x%04x.\n", err );
+      pass = 0;
+   }
+
+   glPopClientAttrib();
+
+   err = glGetError();
+   if (err) {
+      printf( "glGetError incorrectly returned 0x%04x.\n", err );
+      pass = 0;
+   }
+
+   if ( ! (*is_vertex_array)( obj ) ) {
+      printf( "Array object is incorrectly invalid.\n" );
+      pass = 0;
+   }
+
+   if ( ! glIsEnabled( GL_VERTEX_ARRAY ) ) {
+      printf( "Array state is incorrectly disabled.\n" );
+      pass = 0;
+   }
+
+   glGetPointerv( GL_VERTEX_ARRAY_POINTER, & ptr );
+   if ( ptr != (void *) 0xDEADBEEF ) {
+      printf( "Array pointer is incorrectly set to 0x%p.\n", ptr );
+      pass = 0;
+   }
+
+   if ( ! pass ) {
+      printf( "FAIL!\n" );
+      exit(1);
+   }
+}
+
+
+int main( int argc, char *argv[] )
+{
+   glutInit( &argc, argv );
+   glutInitWindowPosition( 0, 0 );
+   glutInitWindowSize( Width, Height );
+   glutInitDisplayMode( GLUT_RGB );
+   glutCreateWindow( "GL_APPLE_vertex_array_object demo" );
+   glutReshapeFunc( Reshape );
+   glutKeyboardFunc( Key );
+   glutDisplayFunc( Display );
+   glutVisibilityFunc( Visible );
+
+   Init();
+
+   return 0;
+}