server/src/bind_sqlite.c

/* vi: set ts=2:
+-------------------+
|                   |  Enno Rehling <enno@eressea.de>
| Eressea PBEM host |  Christian Schlittchen <corwin@amber.kn-bremen.de>
| (c) 1998 - 2008   |  Katja Zedel <katze@felidae.kn-bremen.de>
|                   |  Henning Peters <faroul@beyond.kn-bremen.de>
+-------------------+

This program may not be used, modified or distributed
without prior permission by the authors of Eressea.
*/

#include <platform.h>

#include "bind_unit.h"
#include "bindings.h"

#include <kernel/config.h>
#include <sqlite3.h>
#include <tolua.h>

#define LTYPE_DB TOLUA_CAST "db"

extern int db_update_factions(sqlite3 * db, bool force, int game);
static int tolua_db_update_factions(lua_State * L)
{
  sqlite3 *db = (sqlite3 *) tolua_tousertype(L, 1, 0);
  db_update_factions(db, tolua_toboolean(L, 2, 0), global.game_id);
  return 0;
}

extern int db_update_scores(sqlite3 * db, bool force);
static int tolua_db_update_scores(lua_State * L)
{
  sqlite3 *db = (sqlite3 *) tolua_tousertype(L, 1, 0);
  db_update_scores(db, tolua_toboolean(L, 2, 0));
  return 0;
}

static int tolua_db_execute(lua_State * L)
{
  sqlite3 *db = (sqlite3 *) tolua_tousertype(L, 1, 0);
  const char *sql = tolua_tostring(L, 2, 0);

  int res = sqlite3_exec(db, sql, 0, 0, 0);

  tolua_pushnumber(L, (LUA_NUMBER) res);
  return 1;
}

static int tolua_db_close(lua_State * L)
{
  sqlite3 *db = (sqlite3 *) tolua_tousertype(L, 1, 0);
  sqlite3_close(db);
  return 0;
}

static int tolua_db_create(lua_State * L)
{
  sqlite3 *db;
  const char *dbname = tolua_tostring(L, 1, 0);
  int result = sqlite3_open_v2(dbname, &db, SQLITE_OPEN_READWRITE, 0);
  if (result == SQLITE_OK) {
    tolua_pushusertype(L, (void *)db, LTYPE_DB);
    return 1;
  }
  return 0;
}

int tolua_sqlite_open(lua_State * L)
{
  /* register user types */

  tolua_usertype(L, LTYPE_DB);

  tolua_module(L, NULL, 0);
  tolua_beginmodule(L, NULL);
  {
    tolua_cclass(L, LTYPE_DB, LTYPE_DB, TOLUA_CAST "", NULL);
    tolua_beginmodule(L, LTYPE_DB);
    {
      tolua_function(L, TOLUA_CAST "open", &tolua_db_create);
      tolua_function(L, TOLUA_CAST "close", &tolua_db_close);

      tolua_function(L, TOLUA_CAST "update_factions",
        &tolua_db_update_factions);
      tolua_function(L, TOLUA_CAST "update_scores", &tolua_db_update_scores);
      tolua_function(L, TOLUA_CAST "execute", &tolua_db_execute);
    }
    tolua_endmodule(L);

  }
  tolua_endmodule(L);
  return 0;
}