opengl 0.9.0-x64-mingw32

data/ext/opengl/gl-1.4.c

@@ -0,0 +1,348 @@
+/*
+ * 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.
+ */
+
+#include "common.h"
+
+/* OpenGL 1.4 functions */
+
+GL_FUNC_LOAD_4(BlendFuncSeparate,GLvoid, GLenum,GLenum,GLenum,GLenum, "1.4")
+GL_FUNC_LOAD_1(FogCoordf,GLvoid, GLfloat, "1.4")
+GL_FUNC_LOAD_1(FogCoordd,GLvoid, GLdouble, "1.4")
+GL_FUNC_LOAD_2(PointParameteri,GLvoid, GLenum,GLint, "1.4")
+GL_FUNC_LOAD_2(PointParameterf,GLvoid, GLenum,GLfloat, "1.4")
+GL_FUNC_LOAD_3(SecondaryColor3b,GLvoid, GLbyte,GLbyte,GLbyte, "1.4")
+GL_FUNC_LOAD_3(SecondaryColor3d,GLvoid, GLdouble,GLdouble,GLdouble, "1.4")
+GL_FUNC_LOAD_3(SecondaryColor3f,GLvoid, GLfloat,GLfloat,GLfloat, "1.4")
+GL_FUNC_LOAD_3(SecondaryColor3i,GLvoid, GLint,GLint,GLint, "1.4")
+GL_FUNC_LOAD_3(SecondaryColor3s,GLvoid, GLshort,GLshort,GLshort, "1.4")
+GL_FUNC_LOAD_3(SecondaryColor3ub,GLvoid, GLubyte,GLubyte,GLubyte, "1.4")
+GL_FUNC_LOAD_3(SecondaryColor3ui,GLvoid, GLuint,GLuint,GLuint, "1.4")
+GL_FUNC_LOAD_3(SecondaryColor3us,GLvoid, GLushort,GLushort,GLushort, "1.4")
+GL_FUNC_LOAD_2(WindowPos2d,GLvoid, GLdouble,GLdouble, "1.4")
+GL_FUNC_LOAD_2(WindowPos2f,GLvoid, GLfloat,GLfloat, "1.4")
+GL_FUNC_LOAD_2(WindowPos2i,GLvoid, GLint,GLint, "1.4")
+GL_FUNC_LOAD_2(WindowPos2s,GLvoid, GLshort,GLshort, "1.4")
+GL_FUNC_LOAD_3(WindowPos3d,GLvoid, GLdouble,GLdouble,GLdouble, "1.4")
+GL_FUNC_LOAD_3(WindowPos3f,GLvoid, GLfloat,GLfloat,GLfloat, "1.4")
+GL_FUNC_LOAD_3(WindowPos3i,GLvoid, GLint,GLint,GLint, "1.4")
+GL_FUNC_LOAD_3(WindowPos3s,GLvoid, GLshort,GLshort,GLshort, "1.4")
+
+static void (APIENTRY * fptr_glFogCoordfv)(GLfloat *);
+static VALUE
+gl_FogCoordfv(obj,arg1)
+VALUE obj,arg1;
+{
+	GLfloat coord;
+	LOAD_GL_FUNC(glFogCoordfv, "1.4");
+	Check_Type(arg1,T_ARRAY);
+	ary2cflt(arg1,&coord,1);
+	fptr_glFogCoordfv(&coord);
+	CHECK_GLERROR_FROM("glFogCoordfv");
+	return Qnil;
+}
+
+static void (APIENTRY * fptr_glFogCoorddv)(GLdouble *);
+static VALUE
+gl_FogCoorddv(obj,arg1)
+VALUE obj,arg1;
+{
+	GLdouble coord;
+	LOAD_GL_FUNC(glFogCoorddv, "1.4");
+	Check_Type(arg1,T_ARRAY);
+	ary2cdbl(arg1,&coord,1);
+	fptr_glFogCoorddv(&coord);
+	CHECK_GLERROR_FROM("glFogCoorddv");
+	return Qnil;
+}
+
+extern VALUE g_FogCoord_ptr;
+static void (APIENTRY * fptr_glFogCoordPointer)(GLenum,GLsizei,const GLvoid *);
+static VALUE
+gl_FogCoordPointer(obj,arg1,arg2,arg3)
+VALUE obj,arg1,arg2,arg3;
+{
+	GLenum type;
+	GLsizei stride;
+	LOAD_GL_FUNC(glFogCoordPointer, "1.4");
+	type = (GLenum)NUM2INT(arg1);
+	stride = (GLsizei)NUM2UINT(arg2);
+	if (CheckBufferBinding(GL_ARRAY_BUFFER_BINDING)) {
+		g_FogCoord_ptr = arg3;
+		fptr_glFogCoordPointer(type, stride, (const GLvoid*)NUM2SIZET(arg3));
+	} else {
+		VALUE data;
+		data = pack_array_or_pass_string(GL_UNSIGNED_BYTE,arg3);
+		rb_str_freeze(data);
+		g_FogCoord_ptr = data;
+		fptr_glFogCoordPointer(type, stride, (const GLvoid*)RSTRING_PTR(data));
+	}
+	CHECK_GLERROR_FROM("glFogCoordPointer");
+	return Qnil;
+}
+
+static void (APIENTRY * fptr_glMultiDrawArrays)(GLenum,GLint*,GLsizei*,GLsizei);
+static VALUE
+gl_MultiDrawArrays(obj,arg1,arg2,arg3)
+VALUE obj,arg1,arg2,arg3;
+{
+	GLenum mode;
+	GLint *ary1;
+	GLsizei *ary2;
+	int len1,len2;
+	LOAD_GL_FUNC(glMultiDrawArrays, "1.4");
+	len1 = (int)RARRAY_LENINT(arg2);
+	len2 = (int)RARRAY_LENINT(arg3);
+	if (len1!=len2)
+			rb_raise(rb_eArgError, "Passed arrays must have same length");
+	mode = (GLenum)NUM2INT(arg1);
+	ary1 = ALLOC_N(GLint,len1);
+	ary2 = ALLOC_N(GLsizei,len2);
+	ary2cint(arg2,ary1,len1);
+	ary2cint(arg3,ary2,len2);
+	fptr_glMultiDrawArrays(mode,ary1,ary2,len1);
+	xfree(ary1);
+	xfree(ary2);
+	CHECK_GLERROR_FROM("glMultiDrawArrays");
+	return Qnil;
+}
+
+static void (APIENTRY * fptr_glMultiDrawElements)(GLenum,const GLsizei *,GLenum,GLvoid **,GLsizei);
+static VALUE
+gl_MultiDrawElements(argc,argv,obj)
+int argc;
+VALUE *argv;
+VALUE obj;
+{
+	GLenum mode;
+	GLenum type;
+	GLsizei *counts;
+	GLvoid **indices;
+	GLint size;
+	int i;
+	VALUE ary, args[4];
+	LOAD_GL_FUNC(glMultiDrawElements, "1.4");
+	switch (rb_scan_args(argc, argv, "31", &args[0], &args[1], &args[2],&args[3])) {
+		default:
+		case 3:
+			if (CheckBufferBinding(GL_ELEMENT_ARRAY_BUFFER_BINDING))
+				rb_raise(rb_eArgError, "Element array buffer bound, but offsets array missing");
+			mode = (GLenum)NUM2INT(args[0]);
+			type = (GLenum)NUM2INT(args[1]);
+			Check_Type(args[2],T_ARRAY);
+			ary = args[2];
+			size = (GLint)RARRAY_LENINT(ary);
+			counts = ALLOC_N(GLsizei,size);
+			indices = ALLOC_N(GLvoid*,size);
+			for (i=0;i<size;i++) {
+				VALUE data;
+				data = pack_array_or_pass_string(type,RARRAY_PTR(ary)[i]);
+				indices[i] = RSTRING_PTR(data);
+				counts[i] = (GLsizei)RSTRING_LENINT(data);
+			}
+			fptr_glMultiDrawElements(mode,counts,type,indices,size);
+			xfree(counts);
+			xfree(indices);
+			break;
+		case 4:
+			if (!CheckBufferBinding(GL_ELEMENT_ARRAY_BUFFER_BINDING))
+				rb_raise(rb_eArgError, "Element array buffer not bound");
+			mode = (GLenum)NUM2INT(args[0]);
+			type = (GLenum)NUM2INT(args[1]);
+			Check_Type(args[2],T_ARRAY);
+			Check_Type(args[3],T_ARRAY);
+			if (RARRAY_LEN(args[2]) != RARRAY_LEN(args[3]))
+				rb_raise(rb_eArgError, "Count and indices offset array must have same length");
+
+			size = (GLint)RARRAY_LENINT(args[2]);
+
+			counts = ALLOC_N(GLsizei,size);
+			indices = ALLOC_N(GLvoid*,size);
+			for (i=0;i<size;i++) {
+				counts[i] = (GLsizei)NUM2INT(rb_ary_entry(args[2],i));
+				indices[i] = (GLvoid *)NUM2SIZET(rb_ary_entry(args[3],i));
+			}
+			fptr_glMultiDrawElements(mode,counts,type,indices,size);
+			xfree(counts);
+			xfree(indices);
+			break;
+	}
+	CHECK_GLERROR_FROM("glMultiDrawElements");
+	return Qnil;
+}
+
+static void (APIENTRY * fptr_glPointParameterfv)(GLenum,GLfloat *);
+static VALUE
+gl_PointParameterfv(obj,arg1,arg2)
+VALUE obj,arg1,arg2;
+{
+	GLenum pname;
+	GLfloat params[3] = {(GLfloat)0.0,(GLfloat)0.0,(GLfloat)0.0};
+	GLint size;
+	LOAD_GL_FUNC(glPointParameterfv, "1.4");
+	pname = (GLenum)NUM2INT(arg1);
+	Check_Type(arg2,T_ARRAY);
+	if (pname==GL_POINT_DISTANCE_ATTENUATION)
+		size = 3;
+	else
+		size = 1;
+	ary2cflt(arg2,params,size);
+	fptr_glPointParameterfv(pname,params);
+	CHECK_GLERROR_FROM("glPointParameterfv");
+	return Qnil;
+}
+
+static void (APIENTRY * fptr_glPointParameteriv)(GLenum,GLint *);
+static VALUE
+gl_PointParameteriv(obj,arg1,arg2)
+VALUE obj,arg1,arg2;
+{
+	GLenum pname;
+	GLint params[3] = {0,0,0};
+	GLint size;
+	LOAD_GL_FUNC(glPointParameteriv, "1.4");
+	pname = (GLenum)NUM2INT(arg1);
+	Check_Type(arg2,T_ARRAY);
+	if (pname==GL_POINT_DISTANCE_ATTENUATION)
+		size = 3;
+	else
+		size = 1;
+	ary2cint(arg2,params,size);
+	fptr_glPointParameteriv(pname,params);
+	CHECK_GLERROR_FROM("glPointParameteriv");
+	return Qnil;
+}
+
+#define GLSECONDARYCOLOR_VFUNC(_name_,_type_,_conv_) \
+static void (APIENTRY * fptr_gl##_name_)(_type_ *); \
+VALUE gl_##_name_(VALUE obj,VALUE arg1) \
+{ \
+	_type_ cary[3] = {0,0,0}; \
+	LOAD_GL_FUNC(gl##_name_, "1.4"); \
+	Check_Type(arg1,T_ARRAY); \
+	_conv_(arg1,cary,3); \
+	fptr_gl##_name_(cary); \
+	CHECK_GLERROR_FROM("gl" #_name_); \
+	return Qnil; \
+}
+
+GLSECONDARYCOLOR_VFUNC(SecondaryColor3bv,GLbyte,ary2cbyte)
+GLSECONDARYCOLOR_VFUNC(SecondaryColor3dv,GLdouble,ary2cdbl)
+GLSECONDARYCOLOR_VFUNC(SecondaryColor3fv,GLfloat,ary2cflt)
+GLSECONDARYCOLOR_VFUNC(SecondaryColor3iv,GLint,ary2cint)
+GLSECONDARYCOLOR_VFUNC(SecondaryColor3sv,GLshort,ary2cshort)
+GLSECONDARYCOLOR_VFUNC(SecondaryColor3uiv,GLuint,ary2cuint)
+GLSECONDARYCOLOR_VFUNC(SecondaryColor3ubv,GLubyte,ary2cubyte)
+GLSECONDARYCOLOR_VFUNC(SecondaryColor3usv,GLushort,ary2cushort)
+#undef GLSECONDARYCOLOR_VFUNC
+
+extern VALUE g_SecondaryColor_ptr;
+static void (APIENTRY * fptr_glSecondaryColorPointer)(GLint,GLenum,GLsizei,const GLvoid *);
+static VALUE
+gl_SecondaryColorPointer(obj,arg1,arg2,arg3,arg4)
+VALUE obj,arg1,arg2,arg3,arg4;
+{
+	GLint size;
+	GLenum type;
+	GLsizei stride;
+	LOAD_GL_FUNC(glSecondaryColorPointer, "1.4");
+	size = (GLint)NUM2INT(arg1);
+	type = (GLenum)NUM2INT(arg2);
+	stride = (GLsizei)NUM2UINT(arg3);
+	if (CheckBufferBinding(GL_ARRAY_BUFFER_BINDING)) {
+		g_SecondaryColor_ptr = arg4;
+		fptr_glSecondaryColorPointer(size,type, stride, (const GLvoid*)NUM2SIZET(arg4));
+	} else {
+		VALUE data;
+		data = pack_array_or_pass_string(type,arg4);
+		rb_str_freeze(data);
+		g_SecondaryColor_ptr = data;
+		fptr_glSecondaryColorPointer(size,type, stride, (const GLvoid*)RSTRING_PTR(data));
+	}
+	CHECK_GLERROR_FROM("glSecondaryColorPointer");
+	return Qnil;
+}
+
+#define GLWINDOWPOS_VFUNC(_name_,_type_,_size_,_conv_) \
+static void (APIENTRY * fptr_gl##_name_)(_type_ *); \
+VALUE gl_##_name_(VALUE obj,VALUE arg1) \
+{ \
+	_type_ cary[3] = {0,0,0}; \
+	LOAD_GL_FUNC(gl##_name_, "1.4"); \
+	Check_Type(arg1,T_ARRAY); \
+	_conv_(arg1,cary,_size_); \
+	fptr_gl##_name_(cary); \
+	CHECK_GLERROR_FROM("gl" #_name_); \
+	return Qnil; \
+}
+
+GLWINDOWPOS_VFUNC(WindowPos2dv,GLdouble,2,ary2cdbl)
+GLWINDOWPOS_VFUNC(WindowPos2fv,GLfloat,2,ary2cflt)
+GLWINDOWPOS_VFUNC(WindowPos2iv,GLint,2,ary2cint)
+GLWINDOWPOS_VFUNC(WindowPos2sv,GLshort,2,ary2cshort)
+GLWINDOWPOS_VFUNC(WindowPos3dv,GLdouble,3,ary2cdbl)
+GLWINDOWPOS_VFUNC(WindowPos3fv,GLfloat,3,ary2cflt)
+GLWINDOWPOS_VFUNC(WindowPos3iv,GLint,3,ary2cint)
+GLWINDOWPOS_VFUNC(WindowPos3sv,GLshort,3,ary2cshort)
+#undef GLWINDOWPOS_VFUNC
+
+
+void gl_init_functions_1_4(VALUE module)
+{
+	rb_define_module_function(module, "glBlendFuncSeparate", gl_BlendFuncSeparate, 4);
+	rb_define_module_function(module, "glFogCoordf", gl_FogCoordf, 1);
+	rb_define_module_function(module, "glFogCoordfv", gl_FogCoordfv, 1);
+	rb_define_module_function(module, "glFogCoordd", gl_FogCoordd, 1);
+	rb_define_module_function(module, "glFogCoorddv", gl_FogCoorddv, 1);
+	rb_define_module_function(module, "glFogCoordPointer", gl_FogCoordPointer, 3);
+	rb_define_module_function(module, "glMultiDrawArrays", gl_MultiDrawArrays, 3);
+	rb_define_module_function(module, "glMultiDrawElements", gl_MultiDrawElements, -1);
+	rb_define_module_function(module, "glPointParameterf", gl_PointParameterf, 2);
+	rb_define_module_function(module, "glPointParameterfv", gl_PointParameterfv, 2);
+	rb_define_module_function(module, "glPointParameteri", gl_PointParameteri, 2);
+	rb_define_module_function(module, "glPointParameteriv", gl_PointParameteriv, 2);
+	rb_define_module_function(module, "glSecondaryColor3b", gl_SecondaryColor3b, 3);
+	rb_define_module_function(module, "glSecondaryColor3d", gl_SecondaryColor3d, 3);
+	rb_define_module_function(module, "glSecondaryColor3f", gl_SecondaryColor3f, 3);
+	rb_define_module_function(module, "glSecondaryColor3i", gl_SecondaryColor3i, 3);
+	rb_define_module_function(module, "glSecondaryColor3s", gl_SecondaryColor3s, 3);
+	rb_define_module_function(module, "glSecondaryColor3ub", gl_SecondaryColor3ub, 3);
+	rb_define_module_function(module, "glSecondaryColor3ui", gl_SecondaryColor3ui, 3);
+	rb_define_module_function(module, "glSecondaryColor3us", gl_SecondaryColor3us, 3);
+	rb_define_module_function(module, "glSecondaryColor3bv", gl_SecondaryColor3bv, 1);
+	rb_define_module_function(module, "glSecondaryColor3dv", gl_SecondaryColor3dv, 1);
+	rb_define_module_function(module, "glSecondaryColor3fv", gl_SecondaryColor3fv, 1);
+	rb_define_module_function(module, "glSecondaryColor3iv", gl_SecondaryColor3iv, 1);
+	rb_define_module_function(module, "glSecondaryColor3sv", gl_SecondaryColor3sv, 1);
+	rb_define_module_function(module, "glSecondaryColor3ubv", gl_SecondaryColor3ubv, 1);
+	rb_define_module_function(module, "glSecondaryColor3uiv", gl_SecondaryColor3uiv, 1);
+	rb_define_module_function(module, "glSecondaryColor3usv", gl_SecondaryColor3usv, 1);
+	rb_define_module_function(module, "glSecondaryColorPointer", gl_SecondaryColorPointer, 4);
+	rb_define_module_function(module, "glWindowPos2d", gl_WindowPos2d, 2);
+	rb_define_module_function(module, "glWindowPos2f", gl_WindowPos2f, 2);
+	rb_define_module_function(module, "glWindowPos2i", gl_WindowPos2i, 2);
+	rb_define_module_function(module, "glWindowPos2s", gl_WindowPos2s, 2);
+	rb_define_module_function(module, "glWindowPos3d", gl_WindowPos3d, 3);
+	rb_define_module_function(module, "glWindowPos3f", gl_WindowPos3f, 3);
+	rb_define_module_function(module, "glWindowPos3i", gl_WindowPos3i, 3);
+	rb_define_module_function(module, "glWindowPos3s", gl_WindowPos3s, 3);
+	rb_define_module_function(module, "glWindowPos2dv", gl_WindowPos2dv, 1);
+	rb_define_module_function(module, "glWindowPos2fv", gl_WindowPos2fv, 1);
+	rb_define_module_function(module, "glWindowPos2iv", gl_WindowPos2iv, 1);
+	rb_define_module_function(module, "glWindowPos2sv", gl_WindowPos2sv, 1);
+	rb_define_module_function(module, "glWindowPos3dv", gl_WindowPos3dv, 1);
+	rb_define_module_function(module, "glWindowPos3fv", gl_WindowPos3fv, 1);
+	rb_define_module_function(module, "glWindowPos3iv", gl_WindowPos3iv, 1);
+	rb_define_module_function(module, "glWindowPos3sv", gl_WindowPos3sv, 1);
+}

data/ext/opengl/gl-1.5.c

@@ -0,0 +1,224 @@
+/*
+ * 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.
+ */
+
+#include "common.h"
+
+/* OpenGL 1.5 functions */
+
+GL_FUNC_LOAD_1(EndQuery,GLvoid, GLenum, "1.5");
+GL_FUNC_LOAD_1(IsQuery,GLboolean, GLuint, "1.5");
+GL_FUNC_LOAD_2(BeginQuery,GLvoid, GLenum,GLuint, "1.5");
+GL_FUNC_LOAD_2(BindBuffer,GLvoid, GLenum,GLuint, "1.5");
+GL_FUNC_LOAD_1(IsBuffer,GLboolean, GLuint, "1.5");
+GL_FUNC_GENOBJECTS_LOAD(GenQueries, "1.5");
+GL_FUNC_DELETEOBJECTS_LOAD(DeleteQueries, "1.5");
+GL_FUNC_GENOBJECTS_LOAD(GenBuffers, "1.5");
+GL_FUNC_DELETEOBJECTS_LOAD(DeleteBuffers, "1.5");
+
+static void (APIENTRY * fptr_glGetQueryiv)(GLenum,GLenum,GLint *);
+static VALUE
+gl_GetQueryiv(obj,arg1,arg2)
+VALUE obj,arg1,arg2;
+{
+	GLenum target;
+	GLenum pname;
+	GLint params = 0;
+	LOAD_GL_FUNC(glGetQueryiv, "1.5");
+	target = (GLenum)NUM2INT(arg1);
+	pname = (GLenum)NUM2INT(arg2);
+	fptr_glGetQueryiv(target,pname,&params);
+	CHECK_GLERROR_FROM("glGetQueryiv");
+	return RETCONV_GLint(params);
+}
+
+static void (APIENTRY * fptr_glGetQueryObjectiv)(GLuint,GLenum,GLint *);
+static VALUE
+gl_GetQueryObjectiv(obj,arg1,arg2)
+VALUE obj,arg1,arg2;
+{
+	GLuint id;
+	GLenum pname;
+	GLint params = 0;
+	LOAD_GL_FUNC(glGetQueryObjectiv, "1.5");
+	id = (GLuint)NUM2UINT(arg1);
+	pname = (GLenum)NUM2INT(arg2);
+	fptr_glGetQueryObjectiv(id,pname,&params);
+	CHECK_GLERROR_FROM("glGetQueryObjectiv");
+	return cond_GLBOOL2RUBY(pname,params);
+}
+
+static void (APIENTRY * fptr_glGetQueryObjectuiv)(GLuint,GLenum,GLuint *);
+static VALUE
+gl_GetQueryObjectuiv(obj,arg1,arg2)
+VALUE obj,arg1,arg2;
+{
+	GLuint id;
+	GLenum pname;
+	GLuint params = 0;
+	LOAD_GL_FUNC(glGetQueryObjectuiv, "1.5");
+	id = (GLuint)NUM2UINT(arg1);
+	pname = (GLenum)NUM2INT(arg2);
+	fptr_glGetQueryObjectuiv(id,pname,&params);
+	CHECK_GLERROR_FROM("glGetQueryObjectuiv");
+	return cond_GLBOOL2RUBY_U(pname,params);
+}
+
+static void (APIENTRY * fptr_glBufferData)(GLenum,GLsizeiptr,GLvoid *,GLenum);
+static VALUE
+gl_BufferData(obj,arg1,arg2,arg3,arg4)
+VALUE obj,arg1,arg2,arg3,arg4;
+{
+	GLenum target;
+	GLsizeiptr size;
+	GLenum usage;
+	LOAD_GL_FUNC(glBufferData, "1.5");
+	target = (GLenum)NUM2INT(arg1);
+	size = (GLsizeiptr)NUM2INT(arg2);
+	usage = (GLenum)NUM2INT(arg4);
+	if (TYPE(arg3) == T_STRING) {
+		fptr_glBufferData(target,size,(GLvoid *)RSTRING_PTR(arg3),usage);
+	} else if (NIL_P(arg3)) {
+		fptr_glBufferData(target,size,NULL,usage);
+	} else {
+		Check_Type(arg3,T_STRING); /* force exception - HACK do it right */
+	}
+	CHECK_GLERROR_FROM("glBufferData");
+	return Qnil;
+}
+
+static void (APIENTRY * fptr_glBufferSubData)(GLenum,GLintptr,GLsizeiptr,GLvoid *);
+static VALUE
+gl_BufferSubData(obj,arg1,arg2,arg3,arg4)
+VALUE obj,arg1,arg2,arg3,arg4;
+{
+	GLenum target;
+	GLintptr offset;
+	GLsizeiptr size;
+	LOAD_GL_FUNC(glBufferSubData, "1.5");
+	target = (GLenum)NUM2INT(arg1);
+	offset = (GLintptr)NUM2INT(arg2);
+	size = (GLsizeiptr)NUM2INT(arg3);
+	Check_Type(arg4,T_STRING);
+	fptr_glBufferSubData(target,offset,size,(GLvoid *)RSTRING_PTR(arg4));
+	CHECK_GLERROR_FROM("glBufferSubData");
+	return Qnil;
+}
+
+static void (APIENTRY * fptr_glGetBufferSubData)(GLenum,GLintptr,GLsizeiptr,GLvoid *);
+static VALUE
+gl_GetBufferSubData(obj,arg1,arg2,arg3)
+VALUE obj,arg1,arg2,arg3;
+{
+	GLenum target;
+	GLintptr offset;
+	GLsizeiptr size;
+	VALUE data;
+	LOAD_GL_FUNC(glGetBufferSubData, "1.5");
+	target = (GLenum)NUM2INT(arg1);
+	offset = (GLintptr)NUM2INT(arg2);
+	size = (GLsizeiptr)NUM2INT(arg3);
+	data = allocate_buffer_with_string((long)size);
+	fptr_glGetBufferSubData(target,offset,size,(GLvoid *)RSTRING_PTR(data));
+	CHECK_GLERROR_FROM("glGetBufferSubData");
+	return data;
+}
+
+static void (APIENTRY * fptr_glGetBufferParameteriv)(GLenum,GLenum,GLint *);
+static VALUE
+gl_GetBufferParameteriv(obj,arg1,arg2)
+VALUE obj,arg1,arg2;
+{
+	GLenum target;
+	GLenum value;
+	GLint data = 0;
+	LOAD_GL_FUNC(glGetBufferParameteriv, "1.5");
+	target = (GLenum)NUM2INT(arg1);
+	value = (GLenum)NUM2INT(arg2);
+	fptr_glGetBufferParameteriv(target,value,&data);
+	CHECK_GLERROR_FROM("glGetBufferParameteriv");
+	return cond_GLBOOL2RUBY(value,data);
+}
+
+static GLvoid * (APIENTRY * fptr_glMapBuffer)(GLenum,GLenum);
+static VALUE
+gl_MapBuffer(VALUE self, VALUE _target, VALUE _access) {
+	GLenum target = CONV_GLenum(_target);
+	GLenum access = CONV_GLenum(_access);
+	GLint size = 0;
+	GLvoid *buffer_ptr = NULL;
+
+	LOAD_GL_FUNC(glMapBuffer, "1.5");
+	LOAD_GL_FUNC(glGetBufferParameteriv, "1.5");
+
+	fptr_glGetBufferParameteriv(target, GL_BUFFER_SIZE, &size);
+	CHECK_GLERROR_FROM("glGetBufferParameteriv");
+
+	buffer_ptr = fptr_glMapBuffer(target, access);
+	CHECK_GLERROR_FROM("glMapBuffer");
+
+	/* fail late to avoid GL_INVALID_OPERATION from glUnampBuffer */
+	if (buffer_ptr == NULL || size <= 0)
+		return Qnil;
+
+	return rb_str_new(buffer_ptr, size);
+}
+
+static GLboolean (APIENTRY * fptr_glUnmapBuffer)(GLenum);
+static VALUE
+gl_UnmapBuffer(obj,arg1)
+VALUE obj,arg1;
+{
+	GLenum target;
+	GLboolean ret;
+	LOAD_GL_FUNC(glUnmapBuffer, "1.5");
+	target = (GLenum)NUM2INT(arg1);
+	ret = fptr_glUnmapBuffer(target);
+	CHECK_GLERROR_FROM("glUnmapBuffer");
+	return GLBOOL2RUBY(ret);
+}
+
+static void (APIENTRY * fptr_glGetBufferPointerv)(GLenum,GLenum,GLvoid **);
+static VALUE
+gl_GetBufferPointerv(obj,arg1,arg2,arg3)
+VALUE obj,arg1,arg2,arg3;
+{
+	LOAD_GL_FUNC(glGetBufferPointerv, "1.5");
+	rb_raise(rb_eArgError, "glGetBufferPointerv not implemented");
+	CHECK_GLERROR_FROM("glGetBufferPointerv");
+	return Qnil;
+}
+
+void gl_init_functions_1_5(VALUE module)
+{
+	rb_define_module_function(module, "glGenQueries", gl_GenQueries, 1);
+	rb_define_module_function(module, "glDeleteQueries", gl_DeleteQueries, 1);
+	rb_define_module_function(module, "glIsQuery", gl_IsQuery, 1);
+	rb_define_module_function(module, "glBeginQuery", gl_BeginQuery, 2);
+	rb_define_module_function(module, "glEndQuery", gl_EndQuery, 1);
+	rb_define_module_function(module, "glGetQueryiv", gl_GetQueryiv, 2);
+	rb_define_module_function(module, "glGetQueryObjectiv", gl_GetQueryObjectiv, 2);
+	rb_define_module_function(module, "glGetQueryObjectuiv", gl_GetQueryObjectuiv, 2);
+	rb_define_module_function(module, "glBindBuffer", gl_BindBuffer, 2);
+	rb_define_module_function(module, "glDeleteBuffers", gl_DeleteBuffers, 1);
+	rb_define_module_function(module, "glGenBuffers", gl_GenBuffers, 1);
+	rb_define_module_function(module, "glIsBuffer", gl_IsBuffer, 1);
+	rb_define_module_function(module, "glBufferData", gl_BufferData, 4);
+	rb_define_module_function(module, "glBufferSubData", gl_BufferSubData, 4);
+	rb_define_module_function(module, "glGetBufferSubData", gl_GetBufferSubData, 3);
+	rb_define_module_function(module, "glMapBuffer", gl_MapBuffer, 2);
+	rb_define_module_function(module, "glUnmapBuffer", gl_UnmapBuffer, 1);
+	rb_define_module_function(module, "glGetBufferParameteriv", gl_GetBufferParameteriv, 2);
+	rb_define_module_function(module, "glGetBufferPointerv", gl_GetBufferPointerv, 3);
+}