examples/glut/glut_bind.cpp

   1 extern "C"
   2 {
   3         #include "lua.h"
   4         #include "lauxlib.h"
   5         #include "lualib.h"
   6 }
   7
   8 #include <luabind/luabind.hpp>
   9 #include <luabind/class.hpp>
  10 #include <luabind/function.hpp>
  11 #include <luabind/functor.hpp>
  12
  13
  14 #include <GL/glut.h>
  15 #include <GL/gl.h>
  16 #include <GL/glu.h>
  17
  18 struct glut_constants {};
  19 struct gl_constants {};
  20
  21 namespace glut_bindings
  22 {
  23         luabind::functor<void> displayfunc;
  24
  25         void displayfunc_callback()
  26         {
  27                 displayfunc();
  28         }
  29
  30         void set_displayfunc(const luabind::functor<void>& fun)
  31         {
  32                 glutDisplayFunc(&displayfunc_callback);
  33                 displayfunc = fun;
  34         }
  35
  36         luabind::functor<void> idlefunc;
  37
  38         void idlefunc_callback()
  39         {
  40                 idlefunc();
  41         }
  42
  43         void set_idlefunc(const luabind::functor<void>& fun)
  44         {
  45                 glutIdleFunc(&idlefunc_callback);
  46                 idlefunc = fun;
  47         }
  48
  49
  50         luabind::functor<void> reshapefunc;
  51
  52         void reshapefunc_callback(int w, int h)
  53         {
  54                 reshapefunc(w,h);
  55         }
  56
  57         void set_reshapefunc(const luabind::functor<void>& fun)
  58         {
  59                 reshapefunc = fun;
  60         }
  61
  62         luabind::functor<void> keyboardfunc;
  63
  64         void keyboardfunc_callback(unsigned char key, int x, int y)
  65         {
  66                 keyboardfunc(key,x,y);
  67         }
  68
  69         void set_keyboardfunc(const luabind::functor<void>& fun)
  70         {
  71                 glutKeyboardFunc(&keyboardfunc_callback);
  72                 keyboardfunc = fun;
  73         }
  74
  75         luabind::functor<void> mousefunc;
  76
  77         void mousefunc_callback(int button, int state, int x, int y)
  78         {
  79                 mousefunc(button, state, x, y);
  80         }
  81
  82         void set_mousefunc(const luabind::functor<void>& fun)
  83         {
  84                 mousefunc = fun;
  85         }
  86 }
  87
  88 void bind_glut(lua_State* L)
  89 {
  90         using namespace luabind;
  91         using namespace glut_bindings;
  92
  93         open(L);
  94
  95         module(L)
  96         [
  97                 def("glutInitWindowSize", &glutInitWindowSize),
  98                 def("glutInitWindowPosition", &glutInitWindowPosition),
  99                 def("glutInitDisplayMode", &glutInitDisplayMode),
 100
 101                 class_<glut_constants>("glut")
 102                         .enum_("constants")
 103                         [
 104                                 value("RGB", GLUT_RGB),
 105                                 value("RGBA", GLUT_RGBA),
 106                                 value("INDEX", GLUT_INDEX),
 107                                 value("SINGLE", GLUT_SINGLE),
 108                                 value("DOUBLE", GLUT_DOUBLE),
 109                                 value("DEPTH", GLUT_DEPTH),
 110                                 value("STENCIL", GLUT_STENCIL),
 111                                 value("LEFT_BUTTON", GLUT_LEFT_BUTTON),
 112                                 value("MIDDLE_BUTTON", GLUT_MIDDLE_BUTTON),
 113                                 value("RIGHT_BUTTON", GLUT_RIGHT_BUTTON),
 114                                 value("UP", GLUT_UP),
 115                                 value("DOWN", GLUT_DOWN),
 116                                 value("ELAPSED_TIME", GLUT_ELAPSED_TIME)
 117                         ],
 118
 119                 def("glutCreateWindow", &glutCreateWindow),
 120                 def("glutDestroyWindow", &glutDestroyWindow),
 121                 def("glutFullScreen", &glutFullScreen),
 122                 def("glutDisplayFunc", &set_displayfunc),
 123                 def("glutKeyboardFunc", &set_keyboardfunc),
 124                 def("glutReshapeFunc", &set_reshapefunc),
 125                 def("glutIdleFunc", &set_idlefunc),
 126                 def("glutMainLoop", &glutMainLoop),
 127                 def("glutSwapBuffers", &glutSwapBuffers),
 128                 def("glutGet", &glutGet),
 129                 def("glutSolidSphere", &glutSolidSphere),
 130                 def("glutWireSphere", &glutWireSphere),
 131                 def("glutWireTeapot", &glutWireTeapot),
 132                 def("glutSolidTeapot", &glutSolidTeapot),
 133
 134                 // -- opengl
 135
 136                 class_<gl_constants>("gl")
 137                         .enum_("constants")
 138                         [
 139                                 value("COLOR_BUFFER_BIT", GL_COLOR_BUFFER_BIT),
 140                                         value("DEPTH_BUFFER_BIT", GL_DEPTH_BUFFER_BIT),
 141                                 value("TRIANGLES", GL_TRIANGLES),
 142                                 value("MODELVIEW", GL_MODELVIEW),
 143                                 value("PROJECTION", GL_PROJECTION)
 144                         ],
 145
 146                 def("glBegin", &glBegin),
 147                 def("glVertex3", &glVertex3f),
 148                 def("glEnd", &glEnd),
 149                 def("glClear", &glClear),
 150                 def("glPushMatrix", &glPushMatrix),
 151                 def("glPopMatrix", &glPopMatrix),
 152                 def("glRotate", &glRotatef),
 153                 def("glColor3", &glColor3f),
 154                 def("glColor4", &glColor4f),
 155                 def("glMatrixMode", &glMatrixMode),
 156                 def("glLoadIdentity", &glLoadIdentity),
 157                 def("glViewport", &glViewport),
 158                 def("glTranslate", &glTranslatef),
 159
 160                 // -- glu
 161
 162                 def("gluPerspective", &gluPerspective)
 163         ];
 164 }
 165
 166 int main()
 167 {
 168         lua_State* L = lua_open();
 169         lua_baselibopen(L);
 170         lua_mathlibopen(L);
 171         bind_glut(L);
 172
 173         int argc = 1;
 174         char* argv[1];
 175         argv[0] = "blabla";
 176
 177         glutInit (&argc, argv);
 178
 179         lua_dofile(L, "glut_bindings.lua");
 180
 181         lua_close(L);
 182         return 0;
 183 }
 184