summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--CMakeLists.txt6
-rw-r--r--src/ld-lua.c195
-rw-r--r--src/ld-lua.h27
-rw-r--r--src/ld-symbol-category.h4
-rw-r--r--src/ld-symbol-library.c22
-rw-r--r--src/ld-symbol-library.h1
-rw-r--r--src/ld-symbol.c12
-rw-r--r--src/ld-symbol.h6
8 files changed, 251 insertions, 22 deletions
diff --git a/CMakeLists.txt b/CMakeLists.txt
index d602087..bfb41f2 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -90,7 +90,8 @@ set (logdiag_SOURCES
src/ld-canvas.c
src/ld-symbol.c
src/ld-symbol-category.c
- src/ld-symbol-library.c)
+ src/ld-symbol-library.c
+ src/ld-lua.c)
set (logdiag_HEADERS
${CMAKE_CURRENT_BINARY_DIR}/config.h
src/ld-marshal.h
@@ -99,7 +100,8 @@ set (logdiag_HEADERS
src/ld-canvas.h
src/ld-symbol.h
src/ld-symbol-category.h
- src/ld-symbol-library.h)
+ src/ld-symbol-library.h
+ src/ld-lua.h)
# Generate a configure file
configure_file (${CMAKE_CURRENT_SOURCE_DIR}/config.h.in
diff --git a/src/ld-lua.c b/src/ld-lua.c
new file mode 100644
index 0000000..02ff7ac
--- /dev/null
+++ b/src/ld-lua.c
@@ -0,0 +1,195 @@
+/*
+ * ld-lua.c
+ *
+ * This file is a part of logdiag.
+ * Copyright Přemysl Janouch 2010. All rights reserved.
+ *
+ * See the file LICENSE for licensing information.
+ *
+ */
+
+#include <gtk/gtk.h>
+#include <lua.h>
+#include <lualib.h>
+#include <lauxlib.h>
+
+#include "config.h"
+
+#include "ld-symbol-library.h"
+#include "ld-lua.h"
+
+
+/* TODO */
+/* A virtual superclass can be made for this. */
+
+/* Lua state belongs to the library.
+ * One Lua file should be able to register multiple symbols.
+ */
+/* How does the application call the function for rendering?
+ * logdiag.symbols -- readonly table (from lua) -- this can be probably
+ * accomplished using a custom metatable that errors out on newindex,
+ * items will be added to this table only in C.
+ * logdiag.symbols[ident].render(cr) -- here "ident" is the full path
+ * to this symbol
+ * logdiag.symbols[ident].names[lang, area, terminals] -- these
+ * subarrays need not be in this array
+ *
+ */
+
+static void *
+ld_lua_alloc (void *ud, void *ptr, size_t osize, size_t nsize);
+
+
+static int
+ld_lua_logdiag_register (lua_State *L);
+
+static luaL_Reg ld_lua_logdiag_lib[] =
+{
+ {"register", ld_lua_logdiag_register},
+ {NULL, NULL}
+};
+
+
+static int
+ld_lua_cairo_move_to (lua_State *L);
+static int
+ld_lua_cairo_line_to (lua_State *L);
+static int
+ld_lua_cairo_stroke (lua_State *L);
+static int
+ld_lua_cairo_stroke_preserve (lua_State *L);
+static int
+ld_lua_cairo_fill (lua_State *L);
+static int
+ld_lua_cairo_fill_preserve (lua_State *L);
+
+static luaL_Reg ld_lua_cairo_table[] =
+{
+ {"move_to", ld_lua_cairo_move_to},
+ {"line_to", ld_lua_cairo_line_to},
+ {"stroke", ld_lua_cairo_stroke},
+ {"stroke_preserve", ld_lua_cairo_stroke_preserve},
+ {"fill", ld_lua_cairo_fill},
+ {"fill_preserve", ld_lua_cairo_fill_preserve},
+ {NULL, NULL}
+};
+
+/* ===== Generic =========================================================== */
+
+lua_State *
+ld_lua_init (void)
+{
+ lua_State *L;
+
+ L = lua_newstate (ld_lua_alloc, NULL);
+ g_return_val_if_fail (L != NULL, NULL);
+
+ /* TODO: lua_atpanic () */
+
+ /* Load some safe libraries. */
+ lua_pushcfunction (L, luaopen_string);
+ lua_call (L, 0, 0);
+
+ lua_pushcfunction (L, luaopen_table);
+ lua_call (L, 0, 0);
+
+ lua_pushcfunction (L, luaopen_math);
+ lua_call (L, 0, 0);
+
+ /* Load the application library. */
+ luaL_register (L, "logdiag", ld_lua_logdiag_lib);
+}
+
+void
+ld_lua_destroy (lua_State *L)
+{
+ lua_close (L);
+}
+
+static void *
+ld_lua_alloc (void *ud, void *ptr, size_t osize, size_t nsize)
+{
+ if (!nsize)
+ {
+ g_free (ptr);
+ return NULL;
+ }
+ else
+ return g_try_realloc (ptr, nsize);
+}
+
+/* ===== Application library =============================================== */
+
+static int
+ld_lua_logdiag_register (lua_State *L)
+{
+ /* TODO: Create a symbol. */
+ /* XXX: Shouldn't this function be a closure with LdLibrary userdata?
+ * It is also possible to have the userdata in the "logdiag" table.
+ */
+
+#if 0
+ lua_newtable (L);
+
+ /* TODO: Push a function. */
+ lua_call (L, 1, 0);
+#endif /* 0 */
+}
+
+/* ===== Cairo ============================================================= */
+
+static void
+push_cairo_object (lua_State *L, cairo_t *cr)
+{
+ luaL_Reg *fn;
+
+ /* Create a table. */
+ lua_newtable (L);
+
+ /* Add methods. */
+ for (fn = ld_lua_cairo_table; fn->name; fn++)
+ {
+ lua_pushlightuserdata (L, cr);
+ lua_pushcclosure (L, fn->func, 1);
+ lua_setfield (L, -2, fn->name);
+ }
+}
+
+static int
+ld_lua_cairo_move_to (lua_State *L)
+{
+ return 0;
+}
+
+static int
+ld_lua_cairo_line_to (lua_State *L)
+{
+ return 0;
+}
+
+static int
+ld_lua_cairo_stroke (lua_State *L)
+{
+ return 0;
+}
+
+static int
+ld_lua_cairo_stroke_preserve (lua_State *L)
+{
+ return 0;
+}
+
+static int
+ld_lua_cairo_fill (lua_State *L)
+{
+ return 0;
+}
+
+static int
+ld_lua_cairo_fill_preserve (lua_State *L)
+{
+ return 0;
+}
+
+
+
diff --git a/src/ld-lua.h b/src/ld-lua.h
new file mode 100644
index 0000000..2c41579
--- /dev/null
+++ b/src/ld-lua.h
@@ -0,0 +1,27 @@
+/*
+ * ld-lua.h
+ *
+ * This file is a part of logdiag.
+ * Copyright Přemysl Janouch 2010. All rights reserved.
+ *
+ * See the file LICENSE for licensing information.
+ *
+ */
+
+#ifndef __LD_LUA_H__
+#define __LD_LUA_H__
+
+G_BEGIN_DECLS
+
+
+lua_State *
+ld_lua_init (void);
+
+void
+ld_lua_destroy (lua_State *L);
+
+
+G_END_DECLS
+
+#endif /* ! __LD_LUA_H__ */
+
diff --git a/src/ld-symbol-category.h b/src/ld-symbol-category.h
index f2451d7..c06f46a 100644
--- a/src/ld-symbol-category.h
+++ b/src/ld-symbol-category.h
@@ -38,6 +38,10 @@ typedef struct _LdSymbolCategoryClass LdSymbolCategoryClass;
* @image_path: Path to the image for this category.
* @children: Children of this category.
*/
+/* TODO: Make the public fields private and set them as properties
+ * + implement setters and getters. On change the category
+ * shall emit a "changed" signal in the Library.
+ */
struct _LdSymbolCategory
{
/*< private >*/
diff --git a/src/ld-symbol-library.c b/src/ld-symbol-library.c
index 2b6738a..2f5f9d3 100644
--- a/src/ld-symbol-library.c
+++ b/src/ld-symbol-library.c
@@ -9,8 +9,6 @@
*/
#include <gtk/gtk.h>
-#include <lua.h>
-/* #include <lauxlib.h> */
#include "config.h"
@@ -29,11 +27,11 @@
/*
* LdSymbolLibraryPrivate:
- * @lua_state: Lua state.
+ * @script_state: State of the scripting language.
*/
struct _LdSymbolLibraryPrivate
{
- lua_State *lua_state;
+ gpointer script_state;
};
G_DEFINE_TYPE (LdSymbolLibrary, ld_symbol_library, G_TYPE_OBJECT);
@@ -70,8 +68,8 @@ ld_symbol_library_init (LdSymbolLibrary *self)
self->priv = G_TYPE_INSTANCE_GET_PRIVATE
(self, LD_TYPE_SYMBOL_LIBRARY, LdSymbolLibraryPrivate);
- /* TODO: lua */
- self->priv->lua_state = NULL;
+ /* TODO */
+ self->priv->script_state = NULL;
self->categories = g_hash_table_new_full (g_str_hash, g_str_equal,
(GDestroyNotify) g_free, (GDestroyNotify) g_object_unref);
@@ -151,6 +149,7 @@ ld_symbol_library_load (LdSymbolLibrary *self, const char *path)
{
GDir *dir;
const gchar *item;
+ gboolean changed = FALSE;
g_return_val_if_fail (LD_IS_SYMBOL_LIBRARY (self), FALSE);
g_return_val_if_fail (path != NULL, FALSE);
@@ -169,8 +168,15 @@ ld_symbol_library_load (LdSymbolLibrary *self, const char *path)
if (cat)
g_hash_table_insert (self->categories, cat->name, cat);
g_free (categ_path);
+
+ changed = TRUE;
}
g_dir_close (dir);
+
+ if (changed)
+ g_signal_emit (self,
+ LD_SYMBOL_LIBRARY_GET_CLASS (self)->changed_signal, 0);
+
return TRUE;
}
@@ -186,6 +192,8 @@ ld_symbol_library_clear (LdSymbolLibrary *self)
g_return_if_fail (LD_IS_SYMBOL_LIBRARY (self));
g_hash_table_remove_all (self->categories);
- return;
+
+ g_signal_emit (self,
+ LD_SYMBOL_LIBRARY_GET_CLASS (self)->changed_signal, 0);
}
diff --git a/src/ld-symbol-library.h b/src/ld-symbol-library.h
index aea439c..8678201 100644
--- a/src/ld-symbol-library.h
+++ b/src/ld-symbol-library.h
@@ -51,6 +51,7 @@ struct _LdSymbolLibraryClass
{
/*< private >*/
GObjectClass parent_class;
+
guint changed_signal;
};
diff --git a/src/ld-symbol.c b/src/ld-symbol.c
index 15b9ab5..deab3f5 100644
--- a/src/ld-symbol.c
+++ b/src/ld-symbol.c
@@ -79,13 +79,11 @@ ld_symbol_finalize (GObject *gobject)
*
* Load a symbol from a file into the library.
*/
-LdSymbol *ld_symbol_new (LdSymbolLibrary *library,
- const gchar *filename)
+LdSymbol *ld_symbol_new (LdSymbolLibrary *library)
{
LdSymbol *symbol;
symbol = g_object_new (LD_TYPE_SYMBOL, NULL);
- /* TODO: Use the filename, Luke. */
symbol->priv->library = library;
g_object_ref (library);
@@ -107,17 +105,13 @@ ld_symbol_build_identifier (LdSymbol *self)
/**
* ld_symbol_draw:
* @self: A symbol object.
- * @surface: A cairo surface to be drawn on.
+ * @cr: A cairo surface to be drawn on.
* @param: Parameters for the symbol in a table.
- * @x: The X coordinate on the surface.
- * @y: The Y coordinate on the surface.
- * @zoom: Zoom ratio.
*
* Draw the symbol onto a Cairo surface.
*/
void
-ld_symbol_draw (LdSymbol *self, cairo_t *surface,
- GHashTable *param, gint x, gint y, gdouble zoom)
+ld_symbol_draw (LdSymbol *self, cairo_t *cr, GHashTable *param)
{
return;
}
diff --git a/src/ld-symbol.h b/src/ld-symbol.h
index dfb3a6e..882bde7 100644
--- a/src/ld-symbol.h
+++ b/src/ld-symbol.h
@@ -53,11 +53,9 @@ struct _LdSymbolClass
GType ld_symbol_get_type (void) G_GNUC_CONST;
-LdSymbol *ld_symbol_new (LdSymbolLibrary *library,
- const gchar *filename);
+LdSymbol *ld_symbol_new (LdSymbolLibrary *library);
gchar *ld_symbol_build_identifier (LdSymbol *self);
-void ld_symbol_draw (LdSymbol *self, cairo_t *surface,
- GHashTable *param, gint x, gint y, gdouble zoom);
+void ld_symbol_draw (LdSymbol *self, cairo_t *cr, GHashTable *param);
/* TODO: An interface for symbol terminals. */