1

#include "lua_console.h"

     2

#include "lua_objs.h"

     3

#include "log.h"

     4

     5

#include <stdlib.h>

     6

     7

#include <lua5.1/lauxlib.h>

     8

     9

static void lua_console_on_line (const char *line, void *arg)

    10

{

    11

    struct lua_console *lc = arg;

    12

    lua_State *L = lc->lua->st;

    13

    int ret;

    14

    15

    // ignore empty lines and EOF

    16

    if (!line || !(*line))

    17

        return;

    18

    19

    // XXX: move to nexus_lua

    20

    21

    // load the line as a lua function

    22

    if ((ret = luaL_loadstring(L, line)))

    23

        goto error;

    24

    25

    // execute it

    26

    if ((ret = lua_pcall(L, 0, 0, 0)))

    27

        goto error;

    28

    29

    // XXX: display results?

    30

    31

error:

    32

    if (ret) {

    37

    40

    43

    }

    44

}

    45

    46

static struct console_callbacks _console_callbacks = {

    47

    .on_line    = &lua_console_on_line,

    48

};

    49

    50

err_t lua_console_create (struct lua_console **lc_ptr, struct console *console, struct nexus_lua *lua, struct error_info *err)

    51

{

    52

    struct lua_console *lc;

    53

    54

    // allocate

    55

    if ((lc = calloc(1, sizeof(*lc))) == NULL)

    56

        return SET_ERROR(err, ERR_CALLOC);

    57

    58

    // store

    59

    lc->console = console;

    60

    lc->lua = lua;

    61

    62

    // set our console callbacks

    63

    console_set_callbacks(console, &_console_callbacks, lc);

    64

    65

    // ok

    66

    *lc_ptr = lc;

    67

    68

    return SUCCESS;

    69

}

    70

    71

void lua_console_destroy (struct lua_console *lc)

    72

{

    73

    // the console

    74

    console_destroy(lc->console);

    75

    76

    free(lc);

    77

}