funcs.cpp

   1 /*
   2 Copyright (c)2006-2007 - Brett Lajzer
   3
   4 See LICENSE for license information.
   5 */
   6
   7 #include <GL/gl.h>
   8 #include <GL/glu.h>
   9 #include <SDL/SDL.h>
  10 #include <lua.hpp>
  11 #include <iostream>
  12 #include "funcs.h"
  13
  14 using namespace std;
  15
  16 //prints usage info
  17 void print_usage(string progname){
  18     cerr << "USAGE: " << progname << " [dir] | [-h|--help]\n";
  19     cerr << "    dir - directory where game data is\n";
  20     cerr << "    -h --help - displays this usage info\n\n";
  21 }
  22
  23 //configuration loader
  24 //loads config into lua, retrieves values and leaves them there
  25 SDL_Surface *load_config(lua_State *L, string pname){
  26     if(luaL_loadfile(L, "scripts/config.lua") || lua_pcall(L,0,0,0)){
  27       cerr << "Cannot load configuration script!\n" << "Error: " <<lua_tostring(L, -1) << "\n";
  28       print_usage(pname);
  29       return 0;
  30     }
  31
  32     //put the config values on the stack
  33     lua_getglobal(L, "s_fullscreen");
  34     lua_getglobal(L, "s_width");
  35     lua_getglobal(L, "s_height");
  36     lua_getglobal(L, "s_depth");
  37     lua_getglobal(L, "s_gamename");
  38
  39     //check values for proper type
  40     if(!lua_isnumber(L,-5)){
  41       cerr << "Config Error: "<< "'s_fullscreen' should be a number\n";
  42       return 0;
  43     }
  44     if(!lua_isnumber(L,-4)){
  45       cerr << "Config Error: "<< "'s_width' should be a number\n";
  46       return 0;
  47     }
  48     if(!lua_isnumber(L,-3)){
  49       cerr << "Config Error: "<< "'s_height' should be a number\n";
  50       return 0;
  51     }
  52     if(!lua_isnumber(L,-2)){
  53       cerr << "Config Error: "<< "'s_depth' should be a number\n";
  54       return 0;
  55     }
  56     if(!lua_isstring(L,-1)){
  57       cerr << "Config Error: "<< "'s_gamename' should be a string\n";
  58       return 0;
  59     }
  60
  61     //set caption and return the surface
  62     SDL_WM_SetCaption(lua_tostring(L,-1), lua_tostring(L, -1));
  63
  64     SDL_GL_SetAttribute(SDL_GL_DOUBLEBUFFER, 1);
  65
  66     SDL_Surface *temp = SDL_SetVideoMode(lua_tointeger(L, -4), lua_tointeger(L, -3), lua_tointeger(L, -2), SDL_OPENGL | (lua_tointeger(L,-5)? SDL_FULLSCREEN : 0));
  67
  68     //initialize OpenGL
  69     glShadeModel(GL_FLAT);
  70     glClearColor(0.0f, 0.0f, 0.0f, 0.0f);
  71     glEnable(GL_TEXTURE_RECTANGLE_ARB);
  72     glEnable(GL_BLEND);
  73         glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
  74
  75
  76         //setup projection
  77         glViewport(0, 0, (GLsizei)lua_tointeger(L, -4), (GLsizei)lua_tointeger(L, -3));
  78
  79     glMatrixMode(GL_PROJECTION);
  80     glLoadIdentity();
  81
  82         glOrtho(0.0f, (GLfloat)lua_tointeger(L, -4), (GLfloat)lua_tointeger(L, -3), 0.0f, -1.0f, 1.0f);
  83
  84     glMatrixMode(GL_MODELVIEW);
  85     glLoadIdentity();
  86
  87         glClear(GL_COLOR_BUFFER_BIT);
  88
  89         //cleanup
  90         for(int i=0; i < 5; i++){lua_pop(L,-1);}
  91
  92     return temp;
  93 }
  94
  95 //function for clearing out the image store
  96 void clear_images(){
  97     map<string, GLSurface *>::iterator im = image_store.begin();
  98
  99     for(; im != image_store.end(); im++){
 100         glDeleteTextures(1, &(im->second->texture));
 101         delete im->second;
 102     }
 103
 104     image_store.clear();
 105 }