2 files changed, 224 insertions, 0 deletions
diff --git a/python/Mk.old b/python/Mk.old
new file mode 100644
index 0000000..e996722
--- /dev/null
+++ b/python/Mk.old
@@ -0,0 +1,21 @@
+# compiling on RISC OS using Norcroft
+CC = cc
+CFLAGS = -fn -ecz -wap -IOSLib: -DNDEBUG
+LD = link
+LDFLAGS = -aof
+LIBS = OSLib:o.oslib32
+MKDLK = makedlk
+SOURCE += strfuncs.c
+OBJS = $(SOURCE:.c=.o)
+EXEEXT =
+
+all: librufl.a rufl/pyd rufl_test rufl_chars
+
+librufl.a: $(OBJS)
+	$(LD) $(LDFLAGS) -o $@ $(OBJS)
+o.ruflmodule: ruflmodule.o librufl.a
+	$(LD) $(LDFLAGS) -o $@ $^ $(LIBS)
+ruflmodule.o: ruflmodule.c
+	$(CC) -fn -wp -IPyInc:Include,PyInc:RISCOS,TCPIPLibs:,OSLib: -c $@ $<
+rufl/pyd: o.ruflmodule
+	$(MKDLK) -s <Python$$Dir>.RISCOS.s.linktab -o $< -d $@ -e initrufl
diff --git a/python/ruflmodule.c b/python/ruflmodule.c
new file mode 100644
index 0000000..b62a883
--- /dev/null
+++ b/python/ruflmodule.c
@@ -0,0 +1,203 @@
+/*
+ * This file is part of RUfl
+ * Licensed under the MIT License,
+ *                http://www.opensource.org/licenses/mit-license
+ * Copyright 2006 James Bursa <james@semichrome.net>
+ */
+
+/* Python module for RUfl. */
+
+#include "Python.h"
+#include "rufl.h"
+
+
+static char pyrufl_paint__doc__[] =
+"paint(font_family, font_style, font_size, string, x, y, flags)\n\n"
+"Render Unicode text."
+;
+
+static PyObject *
+pyrufl_paint(PyObject *self /* Not used */, PyObject *args)
+{
+	const char *font_family;
+	rufl_style font_style;
+	unsigned int font_size;
+	const char *string;
+	int length;
+	int x;
+	int y;
+	unsigned int flags;
+
+	if (!PyArg_ParseTuple(args, "siIs#iiI",
+			&font_family, &font_style, &font_size,
+			&string, &length, &x, &y, &flags))
+		return NULL;
+
+	rufl_paint(font_family, font_style, font_size, string, length,
+			x, y, flags);
+
+	Py_INCREF(Py_None);
+	return Py_None;
+}
+
+
+static char pyrufl_width__doc__[] =
+"width(font_family, font_style, font_size, string)\n\n"
+"Return the width of Unicode text."
+;
+
+static PyObject *
+pyrufl_width(PyObject *self /* Not used */, PyObject *args)
+{
+	const char *font_family;
+	rufl_style font_style;
+	unsigned int font_size;
+	const char *string;
+	int length;
+	int width = 0;
+
+	if (!PyArg_ParseTuple(args, "siIs#",
+			&font_family, &font_style, &font_size,
+			&string, &length))
+		return NULL;
+
+	rufl_width(font_family, font_style, font_size, string, length,
+			&width);
+
+	return PyInt_FromLong(width);
+}
+
+
+static char pyrufl_x_to_offset__doc__[] =
+"x_to_offset(font_family, font_style, font_size, string, click_x)\n\n"
+"Return a pair of the character offset in string that click_x falls,\n"
+"and the actual x coordinate for that character offset."
+;
+
+static PyObject *
+pyrufl_x_to_offset(PyObject *self /* Not used */, PyObject *args)
+{
+	const char *font_family;
+	rufl_style font_style;
+	unsigned int font_size;
+	const char *string;
+	int length;
+	int click_x;
+	size_t char_offset = 0;
+	int actual_x = 0;
+
+	if (!PyArg_ParseTuple(args, "siIs#i",
+			&font_family, &font_style, &font_size,
+			&string, &length, &click_x))
+		return NULL;
+
+	rufl_x_to_offset(font_family, font_style, font_size, string, length,
+			click_x,
+			&char_offset, &actual_x);
+
+	return Py_BuildValue("ii", (int) char_offset, actual_x);
+}
+
+
+static char pyrufl_split__doc__[] =
+"split(font_family, font_style, font_size, string, width)\n\n"
+"Return a pair of the character offset in string that fits in width,\n"
+"and the actual x coordinate for that character offset."
+;
+
+static PyObject *
+pyrufl_split(PyObject *self /* Not used */, PyObject *args)
+{
+	const char *font_family;
+	rufl_style font_style;
+	unsigned int font_size;
+	const char *string;
+	int length;
+	int width;
+	size_t char_offset = 0;
+	int actual_x = 0;
+
+	if (!PyArg_ParseTuple(args, "siIs#i",
+			&font_family, &font_style, &font_size,
+			&string, &length, &width))
+		return NULL;
+
+	rufl_split(font_family, font_style, font_size, string, length,
+			width,
+			&char_offset, &actual_x);
+
+	return Py_BuildValue("ii", (int) char_offset, actual_x);
+}
+
+
+static char pyrufl_invalidate_cache__doc__[] =
+"invalidate_cache()\n\n"
+"Clear the internal font handle cache.\n"
+"Call this function on mode changes or output redirection changes."
+;
+
+static PyObject *
+pyrufl_invalidate_cache(PyObject *self /* Not used */, PyObject *args)
+{
+	if (!PyArg_ParseTuple(args, ""))
+		return NULL;
+
+	rufl_invalidate_cache();
+
+	Py_INCREF(Py_None);
+	return Py_None;
+}
+
+
+/* List of methods defined in the module */
+
+static struct PyMethodDef pyrufl_methods[] = {
+	{"paint", (PyCFunction)pyrufl_paint, METH_VARARGS, pyrufl_paint__doc__},
+	{"width", (PyCFunction)pyrufl_width, METH_VARARGS, pyrufl_width__doc__},
+	{"x_to_offset", (PyCFunction)pyrufl_x_to_offset, METH_VARARGS,
+			pyrufl_x_to_offset__doc__},
+	{"split", (PyCFunction)pyrufl_split, METH_VARARGS, pyrufl_split__doc__},
+	{"invalidate_cache", (PyCFunction)pyrufl_invalidate_cache, METH_VARARGS,
+			pyrufl_invalidate_cache__doc__},
+
+	{NULL, (PyCFunction)NULL, 0, NULL}		/* sentinel */
+};
+
+
+/* Initialization function for the module (*must* be called initrufl) */
+
+static char pyrufl_module_documentation[] =
+"This module provides access to the RISC OS Unicode font library\n"
+"All string parameters must be in UTF-8."
+;
+
+void
+initrufl(void)
+{
+	PyObject *module;
+	rufl_code code;
+
+	code = rufl_init();
+	if (code != rufl_OK)
+		Py_FatalError("rufl_init() failed");
+
+	Py_AtExit(rufl_quit);
+
+	/* Create the module and add the functions */
+	module = Py_InitModule4("rufl", pyrufl_methods,
+			pyrufl_module_documentation,
+			(PyObject *) NULL, PYTHON_API_VERSION);
+
+	/* Add some symbolic constants to the module */
+	PyModule_AddIntConstant(module, "regular", rufl_REGULAR);
+	PyModule_AddIntConstant(module, "slanted", rufl_SLANTED);
+	PyModule_AddIntConstant(module, "bold", rufl_BOLD);
+	PyModule_AddIntConstant(module, "bold_slanted", rufl_BOLD_SLANTED);
+
+	PyModule_AddIntConstant(module, "blend", rufl_BLEND_FONT);
+
+	/* Check for errors */
+	if (PyErr_Occurred())
+		Py_FatalError("can't initialize module rufl");
+}
+