nlua_gui.c

Go to the documentation of this file.

/*
 * See Licensing and Copyright notice in naev.h
 */
#include <lauxlib.h>
 
#include "naev.h"
 
#include "nlua_gui.h"
 
#include "gui.h"
#include "gui_omsg.h"
#include "gui_osd.h"
#include "map_overlay.h"
#include "nlua_tex.h"
 
/* GUI methods. */
static int guiL_viewport( lua_State *L );
static int guiL_fpsPos( lua_State *L );
static int guiL_osdInit( lua_State *L );
static int guiL_mesgInit( lua_State *L );
static int guiL_omsgInit( lua_State *L );
static int guiL_radarInit( lua_State *L );
static int guiL_radarRender( lua_State *L );
static int guiL_targetSpobGFX( lua_State *L );
static int guiL_targetPilotGFX( lua_State *L );
static int guiL_mouseClickEnable( lua_State *L );
static int guiL_mouseMoveEnable( lua_State *L );
static int guiL_setMapOverlayBounds( lua_State *L );
 
static const luaL_Reg guiL_methods[] = {
   { "viewport", guiL_viewport },
   { "fpsPos", guiL_fpsPos },
   { "osdInit", guiL_osdInit },
   { "mesgInit", guiL_mesgInit },
   { "omsgInit", guiL_omsgInit },
   { "radarInit", guiL_radarInit },
   { "radarRender", guiL_radarRender },
   { "targetSpobGFX", guiL_targetSpobGFX },
   { "targetPilotGFX", guiL_targetPilotGFX },
   { "mouseClickEnable", guiL_mouseClickEnable },
   { "mouseMoveEnable", guiL_mouseMoveEnable },
   { "setMapOverlayBounds", guiL_setMapOverlayBounds },
   { 0, 0 } }; 

int nlua_loadGUI( nlua_env env )
{
   /* Register the values */
   nlua_register( env, "gui", guiL_methods, 0 );
   return 0;
}


static int guiL_viewport( lua_State *L )
{
   /* Parameters. */
   double x = luaL_checknumber( L, 1 );
   double y = luaL_checknumber( L, 2 );
   double w = luaL_checknumber( L, 3 );
   double h = luaL_checknumber( L, 4 );
 
   /* Set the viewport. */
   gui_setViewport( x, y, w, h );
   return 0;
}

static int guiL_fpsPos( lua_State *L )
{
   double x = luaL_checknumber( L, 1 );
   double y = luaL_checknumber( L, 2 );
   fps_setPos( x, y );
   return 0;
}

static int guiL_osdInit( lua_State *L )
{
   /* Parameters. */
   int x = luaL_checkinteger( L, 1 );
   int y = luaL_checkinteger( L, 2 );
   int w = luaL_checkinteger( L, 3 );
   int h = luaL_checkinteger( L, 4 );
 
   /* Set up. */
   osd_setup( x, y, w, h );
   return 0;
}

static int guiL_mesgInit( lua_State *L )
{
   /* Parse parameters. */
   int w = luaL_checkinteger( L, 1 );
   int x = luaL_checkinteger( L, 2 );
   int y = luaL_checkinteger( L, 3 );
 
   /* Initialize. */
   gui_messageInit( w, x, y );
   return 0;
}

static int guiL_omsgInit( lua_State *L )
{
   /* Parse parameters. */
   double w = luaL_checkinteger( L, 1 );
   double x = luaL_checkinteger( L, 2 );
   double y = luaL_checkinteger( L, 3 );
 
   /* Initialize. */
   omsg_position( x, y, w );
   return 0;
}

static int guiL_radarInit( lua_State *L )
{
   int id, circle, width, height;
 
   /* Parse parameters. */
   circle = lua_toboolean( L, 1 );
   width  = luaL_checkinteger( L, 2 );
   if ( !circle )
      height = luaL_checkinteger( L, 3 );
   else
      height = width;
 
   /* Create the radar. */
   id = gui_radarInit( circle, width, height );
   lua_pushnumber( L, id );
   return 1;
}

static int guiL_radarRender( lua_State *L )
{
   /* Parse parameters. */
   double x = luaL_checknumber( L, 1 );
   double y = luaL_checknumber( L, 2 );
 
   /* Render the radar. */
   gui_radarRender( x, y );
   return 0;
}

static int guiL_targetSpobGFX( lua_State *L )
{
   gui_targetSpobGFX( luaL_checktex( L, 1 ) );
   return 0;
}

static int guiL_targetPilotGFX( lua_State *L )
{
   gui_targetPilotGFX( luaL_checktex( L, 1 ) );
   return 0;
}

static int guiL_mouseClickEnable( lua_State *L )
{
   int b;
   if ( lua_gettop( L ) > 0 )
      b = lua_toboolean( L, 1 );
   else
      b = 1;
   gui_mouseClickEnable( b );
   return 0;
}

static int guiL_mouseMoveEnable( lua_State *L )
{
   int b;
   if ( lua_gettop( L ) > 0 )
      b = lua_toboolean( L, 1 );
   else
      b = 1;
   gui_mouseMoveEnable( b );
   return 0;
}

static int guiL_setMapOverlayBounds( lua_State *L )
{
   int top    = luaL_checkinteger( L, 1 );
   int right  = luaL_checkinteger( L, 2 );
   int bottom = luaL_checkinteger( L, 3 );
   int left   = luaL_checkinteger( L, 4 );
 
   ovr_boundsSet( top, right, bottom, left );
   return 0;
}