268 lines
10 KiB
C++
268 lines
10 KiB
C++
// celx_gl.cpp
|
|
//
|
|
// Copyright (C) 2003-2008, the Celestia Development Team
|
|
//
|
|
// Lua script extensions for Celestia: OpenGL functions
|
|
//
|
|
// This program is free software; you can redistribute it and/or
|
|
// modify it under the terms of the GNU General Public License
|
|
// as published by the Free Software Foundation; either version 2
|
|
// of the License, or (at your option) any later version.
|
|
|
|
#include "celx.h"
|
|
#include "celx_internal.h"
|
|
#include "celx_object.h"
|
|
#include <celengine/glsupport.h>
|
|
|
|
|
|
// ==================== OpenGL ====================
|
|
|
|
static int glu_LookAt(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(9, 9, "Nine arguments expected for glu.LookAt()");
|
|
float ix = (float)celx.safeGetNumber(1, WrongType, "argument 1 to gl.Frustum must be a number", 0.0);
|
|
float iy = (float)celx.safeGetNumber(2, WrongType, "argument 2 to gl.Frustum must be a number", 0.0);
|
|
float iz = (float)celx.safeGetNumber(3, WrongType, "argument 3 to gl.Frustum must be a number", 0.0);
|
|
float cx = (float)celx.safeGetNumber(4, WrongType, "argument 4 to gl.Frustum must be a number", 0.0);
|
|
float cy = (float)celx.safeGetNumber(5, WrongType, "argument 5 to gl.Frustum must be a number", 0.0);
|
|
float cz = (float)celx.safeGetNumber(6, WrongType, "argument 6 to gl.Frustum must be a number", 0.0);
|
|
float ux = (float)celx.safeGetNumber(7, WrongType, "argument 4 to gl.Frustum must be a number", 0.0);
|
|
float uy = (float)celx.safeGetNumber(8, WrongType, "argument 5 to gl.Frustum must be a number", 0.0);
|
|
float uz = (float)celx.safeGetNumber(9, WrongType, "argument 6 to gl.Frustum must be a number", 0.0);
|
|
gluLookAt(ix,iy,iz,cx,cy,cz,ux,uy,uz);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_Frustum(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(6, 6, "Six arguments expected for gl.Frustum()");
|
|
float ll = (float)celx.safeGetNumber(1, WrongType, "argument 1 to gl.Frustum must be a number", 0.0);
|
|
float r = (float)celx.safeGetNumber(2, WrongType, "argument 2 to gl.Frustum must be a number", 0.0);
|
|
float b = (float)celx.safeGetNumber(3, WrongType, "argument 3 to gl.Frustum must be a number", 0.0);
|
|
float t = (float)celx.safeGetNumber(4, WrongType, "argument 4 to gl.Frustum must be a number", 0.0);
|
|
float n = (float)celx.safeGetNumber(5, WrongType, "argument 5 to gl.Frustum must be a number", 0.0);
|
|
float f = (float)celx.safeGetNumber(6, WrongType, "argument 6 to gl.Frustum must be a number", 0.0);
|
|
glFrustum(ll,r,b,t,n,f);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_Ortho(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(6, 6, "Six arguments expected for gl.Ortho()");
|
|
float ll = (float)celx.safeGetNumber(1, WrongType, "argument 1 to gl.Ortho must be a number", 0.0);
|
|
float r = (float)celx.safeGetNumber(2, WrongType, "argument 2 to gl.Ortho must be a number", 0.0);
|
|
float b = (float)celx.safeGetNumber(3, WrongType, "argument 3 to gl.Ortho must be a number", 0.0);
|
|
float t = (float)celx.safeGetNumber(4, WrongType, "argument 4 to gl.Ortho must be a number", 0.0);
|
|
float n = (float)celx.safeGetNumber(5, WrongType, "argument 5 to gl.Ortho must be a number", 0.0);
|
|
float f = (float)celx.safeGetNumber(6, WrongType, "argument 6 to gl.Ortho must be a number", 0.0);
|
|
glOrtho(ll,r,b,t,n,f);
|
|
return 0;
|
|
}
|
|
|
|
static int glu_Ortho2D(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(4, 4, "Six arguments expected for gl.Ortho2D()");
|
|
float ll = (float)celx.safeGetNumber(1, WrongType, "argument 1 to gl.Ortho must be a number", 0.0);
|
|
float r = (float)celx.safeGetNumber(2, WrongType, "argument 2 to gl.Ortho must be a number", 0.0);
|
|
float b = (float)celx.safeGetNumber(3, WrongType, "argument 3 to gl.Ortho must be a number", 0.0);
|
|
float t = (float)celx.safeGetNumber(4, WrongType, "argument 4 to gl.Ortho must be a number", 0.0);
|
|
gluOrtho2D(ll,r,b,t);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_TexCoord(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(2, 2, "Two arguments expected for gl.TexCoord()");
|
|
float x = (float)celx.safeGetNumber(1, WrongType, "argument 1 to gl.TexCoord must be a number", 0.0);
|
|
float y = (float)celx.safeGetNumber(2, WrongType, "argument 2 to gl.TexCoord must be a number", 0.0);
|
|
glTexCoord2f(x,y);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_TexParameter(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(3, 3, "Three arguments expected for gl.TexParameter()");
|
|
|
|
// TODO: Need to ensure that these values are integers, or better yet use
|
|
// names.
|
|
float x = (float)celx.safeGetNumber(1, WrongType, "argument 1 to gl.TexParameter must be a number", 0.0);
|
|
float y = (float)celx.safeGetNumber(2, WrongType, "argument 2 to gl.TexParameter must be a number", 0.0);
|
|
float z = (float)celx.safeGetNumber(3, WrongType, "argument 3 to gl.TexParameter must be a number", 0.0);
|
|
glTexParameteri((GLint) x, (GLenum) y, (GLenum) z);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_Vertex(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(2, 2, "Two arguments expected for gl.Vertex()");
|
|
float x = (float)celx.safeGetNumber(1, WrongType, "argument 1 to gl.Vertex must be a number", 0.0);
|
|
float y = (float)celx.safeGetNumber(2, WrongType, "argument 2 to gl.Vertex must be a number", 0.0);
|
|
glVertex2f(x,y);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_Color(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(4, 4, "Four arguments expected for gl.Color()");
|
|
float r = (float)celx.safeGetNumber(1, WrongType, "argument 1 to gl.Color must be a number", 0.0);
|
|
float g = (float)celx.safeGetNumber(2, WrongType, "argument 2 to gl.Color must be a number", 0.0);
|
|
float b = (float)celx.safeGetNumber(3, WrongType, "argument 3 to gl.Color must be a number", 0.0);
|
|
float a = (float)celx.safeGetNumber(4, WrongType, "argument 4 to gl.Color must be a number", 0.0);
|
|
glColor4f(r,g,b,a);
|
|
// glColor4f(0.8f, 0.5f, 0.5f, 1.0f);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_LineWidth(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(1, 1, "One argument expected for gl.LineWidth()");
|
|
float n = (float)celx.safeGetNumber(1, WrongType, "argument 1 to gl.LineWidth must be a number", 1.0);
|
|
glLineWidth(n);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_Translate(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(2, 2, "Two arguments expected for gl.Translate()");
|
|
float x = (float)celx.safeGetNumber(1, WrongType, "argument 1 to gl.Translate must be a number", 0.0);
|
|
float y = (float)celx.safeGetNumber(2, WrongType, "argument 2 to gl.Translate must be a number", 0.0);
|
|
glTranslatef(x,y,0.0f);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_BlendFunc(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(2, 2, "Two arguments expected for gl.BlendFunc()");
|
|
int i = (int)celx.safeGetNumber(1, WrongType, "argument 1 to gl.BlendFunc must be a number", 0.0);
|
|
int j = (int)celx.safeGetNumber(2, WrongType, "argument 2 to gl.BlendFunc must be a number", 0.0);
|
|
glBlendFunc(i,j);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_Begin(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(1, 1, "One argument expected for gl.Begin()");
|
|
int i = (int)celx.safeGetNumber(1, WrongType, "argument 1 to gl.Begin must be a number", 0.0);
|
|
glBegin(i);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_End(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(0, 0, "No arguments expected for gl.PopMatrix()");
|
|
glEnd();
|
|
return 0;
|
|
}
|
|
|
|
static int gl_Enable(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(1, 1, "One argument expected for gl.Enable()");
|
|
int i = (int)celx.safeGetNumber(1, WrongType, "argument 1 to gl.Enable must be a number", 0.0);
|
|
glEnable(i);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_Disable(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(1, 1, "One argument expected for gl.Disable()");
|
|
int i = (int)celx.safeGetNumber(1, WrongType, "argument 1 to gl.Disable must be a number", 0.0);
|
|
glDisable(i);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_MatrixMode(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(1, 1, "One argument expected for gl.MatrixMode()");
|
|
int i = (int) celx.safeGetNumber(1, WrongType, "argument 1 to gl.MatrixMode must be a number", 0.0);
|
|
glMatrixMode(i);
|
|
return 0;
|
|
}
|
|
|
|
static int gl_PopMatrix(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(0, 0, "No arguments expected for gl.PopMatrix()");
|
|
glPopMatrix();
|
|
return 0;
|
|
}
|
|
|
|
static int gl_LoadIdentity(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(0, 0, "No arguments expected for gl.LoadIdentity()");
|
|
glLoadIdentity();
|
|
return 0;
|
|
}
|
|
|
|
static int gl_PushMatrix(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
celx.checkArgs(0, 0, "No arguments expected for gl.PushMatrix()");
|
|
glPushMatrix();
|
|
return 0;
|
|
}
|
|
|
|
void LoadLuaGraphicsLibrary(lua_State* l)
|
|
{
|
|
CelxLua celx(l);
|
|
lua_newtable(l);
|
|
|
|
celx.registerMethod("Frustum", gl_Frustum);
|
|
celx.registerMethod("Ortho", gl_Ortho);
|
|
celx.registerMethod("Color", gl_Color);
|
|
celx.registerMethod("LineWidth", gl_LineWidth);
|
|
celx.registerMethod("TexCoord", gl_TexCoord);
|
|
celx.registerMethod("TexParameter", gl_TexParameter);
|
|
celx.registerMethod("Vertex", gl_Vertex);
|
|
celx.registerMethod("Translate", gl_Translate);
|
|
celx.registerMethod("BlendFunc", gl_BlendFunc);
|
|
celx.registerMethod("Begin", gl_Begin);
|
|
celx.registerMethod("End", gl_End);
|
|
celx.registerMethod("Enable", gl_Enable);
|
|
celx.registerMethod("Disable", gl_Disable);
|
|
celx.registerMethod("MatrixMode", gl_MatrixMode);
|
|
celx.registerMethod("PopMatrix", gl_PopMatrix);
|
|
celx.registerMethod("LoadIdentity", gl_LoadIdentity);
|
|
celx.registerMethod("PushMatrix", gl_PushMatrix);
|
|
|
|
celx.registerValue("QUADS", GL_QUADS);
|
|
celx.registerValue("LIGHTING", GL_LIGHTING);
|
|
celx.registerValue("POINTS", GL_POINTS);
|
|
celx.registerValue("LINES", GL_LINES);
|
|
celx.registerValue("LINE_LOOP", GL_LINE_LOOP);
|
|
celx.registerValue("LINE_SMOOTH", GL_LINE_SMOOTH);
|
|
celx.registerValue("POLYGON", GL_POLYGON);
|
|
celx.registerValue("PROJECTION", GL_PROJECTION);
|
|
celx.registerValue("MODELVIEW", GL_MODELVIEW);
|
|
celx.registerValue("BLEND", GL_BLEND);
|
|
celx.registerValue("TEXTURE_2D", GL_TEXTURE_2D);
|
|
celx.registerValue("TEXTURE_MAG_FILTER", GL_TEXTURE_MAG_FILTER);
|
|
celx.registerValue("TEXTURE_MIN_FILTER", GL_TEXTURE_MIN_FILTER);
|
|
celx.registerValue("LINEAR", GL_LINEAR);
|
|
celx.registerValue("NEAREST", GL_NEAREST);
|
|
celx.registerValue("SRC_ALPHA", GL_SRC_ALPHA);
|
|
celx.registerValue("ONE_MINUS_SRC_ALPHA", GL_ONE_MINUS_SRC_ALPHA);
|
|
lua_setglobal(l, "gl");
|
|
|
|
lua_newtable(l);
|
|
celx.registerMethod("LookAt", glu_LookAt);
|
|
celx.registerMethod("Ortho2D", glu_Ortho2D);
|
|
lua_setglobal(l, "glu");
|
|
}
|