Added the trunk/branches/tags directories at repository root, and moved previous root into trunk/
git-svn-id: https://sfml.svn.sourceforge.net/svnroot/sfml/trunk@1002 4e206d99-4929-0410-ac5d-dfc041789085
This commit is contained in:
laurentgom
commit
2f524481c1
974 changed files with 295448 additions and 0 deletions
362
ruby/RubyOpenGL/gl/gl-1.5.c
Normal file
362
ruby/RubyOpenGL/gl/gl-1.5.c
Normal file
|
|
@ -0,0 +1,362 @@
|
|||
/*
|
||||
* 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.
|
||||
*/
|
||||
|
||||
#ifdef __APPLE__
|
||||
#include <OpenGL/gl.h>
|
||||
#elif defined WIN32
|
||||
#include <windows.h>
|
||||
#include <GL/gl.h>
|
||||
#else
|
||||
#include <GL/gl.h>
|
||||
#endif
|
||||
#include "../common/common.h"
|
||||
|
||||
/* OpenGL 1.5 functions */
|
||||
|
||||
static void (APIENTRY * fptr_glGenQueries)(GLsizei,GLuint *);
|
||||
static VALUE
|
||||
gl_GenQueries(obj,arg1)
|
||||
VALUE obj,arg1;
|
||||
{
|
||||
GLsizei n;
|
||||
GLuint *queries;
|
||||
RArray *ret;
|
||||
int i;
|
||||
LOAD_GL_FUNC(glGenQueries)
|
||||
n = (GLsizei)NUM2UINT(arg1);
|
||||
queries = ALLOC_N(GLuint, n);
|
||||
fptr_glGenQueries(n, queries);
|
||||
ret = RARRAY(rb_ary_new2(n));
|
||||
for (i = 0; i < n; i++)
|
||||
rb_ary_push((VALUE)ret, INT2NUM(queries[i]));
|
||||
xfree(queries);
|
||||
return (VALUE)ret;
|
||||
}
|
||||
|
||||
static void (APIENTRY * fptr_glDeleteQueries)(GLsizei,GLuint *);
|
||||
static VALUE
|
||||
gl_DeleteQueries(obj,arg1)
|
||||
VALUE obj,arg1;
|
||||
{
|
||||
GLsizei n;
|
||||
GLuint *queries;
|
||||
LOAD_GL_FUNC(glDeleteQueries)
|
||||
Check_Type(arg1,T_ARRAY);
|
||||
n = RARRAY(arg1)->len;
|
||||
queries = ALLOC_N(GLuint,n);
|
||||
ary2cuint(arg1,queries,n);
|
||||
fptr_glDeleteQueries( n, queries);
|
||||
xfree(queries);
|
||||
return Qnil;
|
||||
}
|
||||
|
||||
static GLboolean (APIENTRY * fptr_glIsQuery)(GLuint);
|
||||
static VALUE
|
||||
gl_IsQuery(obj,arg1)
|
||||
VALUE obj,arg1;
|
||||
{
|
||||
GLuint query;
|
||||
GLboolean ret;
|
||||
LOAD_GL_FUNC(glIsQuery)
|
||||
query = (GLuint)NUM2UINT(arg1);
|
||||
ret = fptr_glIsQuery(query);
|
||||
return INT2NUM(ret);
|
||||
}
|
||||
|
||||
static void (APIENTRY * fptr_glBeginQuery)(GLenum,GLuint);
|
||||
static VALUE
|
||||
gl_BeginQuery(obj,arg1,arg2)
|
||||
VALUE obj,arg1,arg2;
|
||||
{
|
||||
GLenum target;
|
||||
GLuint id;
|
||||
LOAD_GL_FUNC(glBeginQuery)
|
||||
target = (GLenum)NUM2INT(arg1);
|
||||
id = (GLuint)NUM2UINT(arg2);
|
||||
fptr_glBeginQuery(target,id);
|
||||
return Qnil;
|
||||
}
|
||||
|
||||
static void (APIENTRY * fptr_glEndQuery)(GLenum);
|
||||
static VALUE
|
||||
gl_EndQuery(obj,arg1)
|
||||
VALUE obj,arg1;
|
||||
{
|
||||
GLenum target;
|
||||
LOAD_GL_FUNC(glEndQuery)
|
||||
target = (GLenum)NUM2INT(arg1);
|
||||
fptr_glEndQuery(target);
|
||||
return Qnil;
|
||||
}
|
||||
|
||||
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;
|
||||
VALUE retary;
|
||||
LOAD_GL_FUNC(glGetQueryiv)
|
||||
target = (GLenum)NUM2INT(arg1);
|
||||
pname = (GLenum)NUM2INT(arg2);
|
||||
fptr_glGetQueryiv(target,pname,¶ms);
|
||||
retary = rb_ary_new2(1);
|
||||
rb_ary_push(retary, INT2NUM(params));
|
||||
return retary;
|
||||
}
|
||||
|
||||
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;
|
||||
VALUE retary;
|
||||
LOAD_GL_FUNC(glGetQueryObjectiv)
|
||||
id = (GLuint)NUM2UINT(arg1);
|
||||
pname = (GLenum)NUM2INT(arg2);
|
||||
fptr_glGetQueryObjectiv(id,pname,¶ms);
|
||||
retary = rb_ary_new2(1);
|
||||
rb_ary_push(retary,INT2NUM(params));
|
||||
return retary;
|
||||
}
|
||||
|
||||
static void (APIENTRY * fptr_glGetQueryObjectuiv)(GLuint,GLenum,GLuint *);
|
||||
static VALUE
|
||||
gl_GetQueryObjectuiv(obj,arg1,arg2,arg3)
|
||||
VALUE obj,arg1,arg2,arg3;
|
||||
{
|
||||
GLuint id;
|
||||
GLenum pname;
|
||||
GLuint params = 0;
|
||||
VALUE retary;
|
||||
LOAD_GL_FUNC(glGetQueryObjectuiv)
|
||||
id = (GLuint)NUM2UINT(arg1);
|
||||
pname = (GLenum)NUM2INT(arg2);
|
||||
fptr_glGetQueryObjectuiv(id,pname,¶ms);
|
||||
retary = rb_ary_new2(1);
|
||||
rb_ary_push(retary,INT2NUM(params));
|
||||
return retary;
|
||||
}
|
||||
|
||||
static void (APIENTRY * fptr_glBindBuffer)(GLenum,GLuint);
|
||||
static VALUE
|
||||
gl_BindBuffer(obj,arg1,arg2)
|
||||
VALUE obj,arg1,arg2;
|
||||
{
|
||||
GLenum target;
|
||||
GLuint buffer;
|
||||
LOAD_GL_FUNC(glBindBuffer)
|
||||
target = (GLenum)NUM2INT(arg1);
|
||||
buffer = (GLenum)NUM2INT(arg2);
|
||||
fptr_glBindBuffer(target,buffer);
|
||||
return Qnil;
|
||||
}
|
||||
|
||||
static void (APIENTRY * fptr_glDeleteBuffers)(GLsizei,GLuint *);
|
||||
static VALUE
|
||||
gl_DeleteBuffers(obj,arg1)
|
||||
VALUE obj,arg1;
|
||||
{
|
||||
GLsizei n;
|
||||
GLuint *buffers;
|
||||
LOAD_GL_FUNC(glDeleteBuffers)
|
||||
Check_Type(arg1,T_ARRAY);
|
||||
n = RARRAY(arg1)->len;
|
||||
buffers = ALLOC_N(GLuint,n);
|
||||
ary2cuint(arg1,buffers,n);
|
||||
fptr_glDeleteBuffers(n, buffers);
|
||||
xfree(buffers);
|
||||
return Qnil;
|
||||
}
|
||||
|
||||
static void (APIENTRY * fptr_glGenBuffers)(GLsizei,GLuint *);
|
||||
static VALUE
|
||||
gl_GenBuffers(obj,arg1)
|
||||
VALUE obj,arg1;
|
||||
{
|
||||
GLsizei n;
|
||||
GLuint *buffers;
|
||||
RArray *ret;
|
||||
int i;
|
||||
LOAD_GL_FUNC(glGenBuffers)
|
||||
n = (GLsizei)NUM2UINT(arg1);
|
||||
buffers = ALLOC_N(GLuint, n);
|
||||
fptr_glGenBuffers(n, buffers);
|
||||
ret = RARRAY(rb_ary_new2(n));
|
||||
for (i = 0; i < n; i++)
|
||||
rb_ary_push((VALUE)ret, INT2NUM(buffers[i]));
|
||||
xfree(buffers);
|
||||
return (VALUE)ret;
|
||||
}
|
||||
|
||||
static GLboolean (APIENTRY * fptr_glIsBuffer)(GLuint);
|
||||
static VALUE
|
||||
gl_IsBuffer(obj,arg1)
|
||||
VALUE obj,arg1;
|
||||
{
|
||||
GLuint buffer;
|
||||
GLboolean ret;
|
||||
LOAD_GL_FUNC(glIsBuffer)
|
||||
buffer = (GLuint)NUM2UINT(arg1);
|
||||
ret = fptr_glIsBuffer(buffer);
|
||||
return INT2NUM(ret);
|
||||
}
|
||||
|
||||
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)
|
||||
target = (GLenum)NUM2INT(arg1);
|
||||
size = (GLsizeiptr)NUM2INT(arg2);
|
||||
usage = (GLenum)NUM2INT(arg4);
|
||||
if (TYPE(arg3) == T_STRING) {
|
||||
fptr_glBufferData(target,size,(GLvoid *)RSTRING(arg3)->ptr,usage);
|
||||
} else if (NIL_P(arg3)) {
|
||||
fptr_glBufferData(target,size,NULL,usage);
|
||||
} else {
|
||||
Check_Type(arg3,T_STRING); /* force exception */
|
||||
}
|
||||
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)
|
||||
target = (GLenum)NUM2INT(arg1);
|
||||
offset = (GLintptr)NUM2INT(arg2);
|
||||
size = (GLsizeiptr)NUM2INT(arg3);
|
||||
Check_Type(arg4,T_STRING);
|
||||
fptr_glBufferSubData(target,offset,size,(GLvoid *)RSTRING(arg4)->ptr);
|
||||
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)
|
||||
target = (GLenum)NUM2INT(arg1);
|
||||
offset = (GLintptr)NUM2INT(arg2);
|
||||
size = (GLsizeiptr)NUM2INT(arg3);
|
||||
data = allocate_buffer_with_string(size);
|
||||
fptr_glGetBufferSubData(target,offset,size,(GLvoid *)RSTRING(data)->ptr);
|
||||
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;
|
||||
VALUE retary;
|
||||
LOAD_GL_FUNC(glGetBufferParameteriv)
|
||||
target = (GLenum)NUM2INT(arg1);
|
||||
value = (GLenum)NUM2INT(arg2);
|
||||
fptr_glGetBufferParameteriv(target,value,&data);
|
||||
retary = rb_ary_new2(1);
|
||||
rb_ary_push(retary,INT2NUM(data));
|
||||
return retary;
|
||||
}
|
||||
|
||||
static GLvoid * (APIENTRY * fptr_glMapBuffer)(GLenum,GLenum);
|
||||
static VALUE
|
||||
gl_MapBuffer(obj,arg1,arg2)
|
||||
VALUE obj,arg1,arg2;
|
||||
{
|
||||
GLenum target;
|
||||
GLenum access;
|
||||
GLint size = 0;
|
||||
VALUE data;
|
||||
GLvoid *buffer_ptr;
|
||||
LOAD_GL_FUNC(glMapBuffer)
|
||||
LOAD_GL_FUNC(glGetBufferParameteriv)
|
||||
target = (GLenum)NUM2INT(arg1);
|
||||
access = (GLenum)NUM2INT(arg2);
|
||||
fptr_glGetBufferParameteriv(target,GL_BUFFER_SIZE,&size);
|
||||
buffer_ptr = fptr_glMapBuffer(target,access);
|
||||
data = allocate_buffer_with_string(size);
|
||||
memcpy(RSTRING(data)->ptr, buffer_ptr, size);
|
||||
return data;
|
||||
}
|
||||
|
||||
static GLboolean (APIENTRY * fptr_glUnmapBuffer)(GLenum);
|
||||
static VALUE
|
||||
gl_UnmapBuffer(obj,arg1)
|
||||
VALUE obj,arg1;
|
||||
{
|
||||
GLenum target;
|
||||
GLboolean ret;
|
||||
LOAD_GL_FUNC(glUnmapBuffer)
|
||||
target = (GLenum)NUM2INT(arg1);
|
||||
ret = fptr_glUnmapBuffer(target);
|
||||
return INT2NUM(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)
|
||||
/* not implemented */
|
||||
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);
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue