naevpedia.c

/*
 * See Licensing and Copyright notice in naev.h
 */
#include "naev.h"
 
#include "log.h"
#include "nlua.h"
#include "nlua_bkg.h"
#include "nlua_colour.h"
#include "nlua_linopt.h"
#include "nlua_music.h"
#include "nlua_tex.h"
#include "nlua_tk.h"
 
static nlua_env naevpedia_env = LUA_NOREF; 

int naevpedia_open( const char *path )
{
   char buf[STRMAX_SHORT];
   int  status;
 
   if ( naevpedia_env == LUA_NOREF ) {
      naevpedia_env = nlua_newEnv( "naevpedia" );
      nlua_loadStandard( naevpedia_env );
      nlua_loadTex( naevpedia_env );
      nlua_loadCol( naevpedia_env );
      nlua_loadBackground( naevpedia_env );
      nlua_loadMusic( naevpedia_env );
      nlua_loadTk( naevpedia_env );
      nlua_loadLinOpt( naevpedia_env );
   }
 
   snprintf( buf, sizeof( buf ), "require('naevpedia').open('%s')", path );
   status = nlua_dobufenv( naevpedia_env, buf, strlen( buf ), buf );
   if ( status ) {
      WARN( _( "Naevpedia '%s' Lua error:\n%s" ), path,
            lua_tostring( naevL, -1 ) );
      lua_pop( naevL, 1 );
   }
   return 0;
}