/* Font Manager module */ #include "Python.h" #include <gl.h>#include <device.h>#include <fmclient.h>  /* Font Handle object implementation */ typedef struct {	PyObject_HEAD	fmfonthandle fh_fh;} fhobject; static PyTypeObject Fhtype; #define is_fhobject(v)		((v)->ob_type == &Fhtype) static PyObject *newfhobject(fmfonthandle fh){	fhobject *fhp;	if (fh == NULL) {		PyErr_SetString(PyExc_RuntimeError,				"error creating new font handle");		return NULL;	}	fhp = PyObject_New(fhobject, &Fhtype);	if (fhp == NULL)		return NULL;	fhp->fh_fh = fh;	return (PyObject *)fhp;} /* Font Handle methods */ static PyObject *fh_scalefont(fhobject *self, PyObject *args){	double size;	if (!PyArg_ParseTuple(args, "d", &size))		return NULL;	return newfhobject(fmscalefont(self->fh_fh, size));} /* XXX fmmakefont */ static PyObject *fh_setfont(fhobject *self){	fmsetfont(self->fh_fh);	Py_INCREF(Py_None);	return Py_None;} static PyObject *fh_getfontname(fhobject *self){	char fontname[256];	int len;	len = fmgetfontname(self->fh_fh, sizeof fontname, fontname);	if (len < 0) {		PyErr_SetString(PyExc_RuntimeError, "error in fmgetfontname");		return NULL;	}	return PyString_FromStringAndSize(fontname, len);} static PyObject *fh_getcomment(fhobject *self){	char comment[256];	int len;	len = fmgetcomment(self->fh_fh, sizeof comment, comment);	if (len < 0) {		PyErr_SetString(PyExc_RuntimeError, "error in fmgetcomment");		return NULL;	}	return PyString_FromStringAndSize(comment, len);} static PyObject *fh_getfontinfo(fhobject *self){	fmfontinfo info;	if (fmgetfontinfo(self->fh_fh, &info) < 0) {		PyErr_SetString(PyExc_RuntimeError, "error in fmgetfontinfo");		return NULL;	}	return Py_BuildValue("(llllllll)",			     info.printermatched,			     info.fixed_width,			     info.xorig,			     info.yorig,			     info.xsize,			     info.ysize,			     info.height,			     info.nglyphs);} #if 0static PyObject *fh_getwholemetrics(fhobject *self, PyObject *args){}#endif static PyObject *fh_getstrwidth(fhobject *self, PyObject *args){	char *str;	if (!PyArg_ParseTuple(args, "s", &str))		return NULL;	return PyInt_FromLong(fmgetstrwidth(self->fh_fh, str));} static PyMethodDef fh_methods[] = {	{"scalefont",	(PyCFunction)fh_scalefont,   METH_VARARGS},	{"setfont",	(PyCFunction)fh_setfont,     METH_NOARGS},	{"getfontname",	(PyCFunction)fh_getfontname, METH_NOARGS},	{"getcomment",	(PyCFunction)fh_getcomment,  METH_NOARGS},	{"getfontinfo",	(PyCFunction)fh_getfontinfo, METH_NOARGS},#if 0	{"getwholemetrics",	(PyCFunction)fh_getwholemetrics, METH_VARARGS},#endif	{"getstrwidth",	(PyCFunction)fh_getstrwidth, METH_VARARGS},	{NULL,		NULL}		/* sentinel */}; static PyObject *fh_getattr(fhobject *fhp, char *name){	return Py_FindMethod(fh_methods, (PyObject *)fhp, name);} static voidfh_dealloc(fhobject *fhp){	fmfreefont(fhp->fh_fh);	PyObject_Del(fhp);} static PyTypeObject Fhtype = {	PyObject_HEAD_INIT(&PyType_Type)	0,				/*ob_size*/	"fm.font handle",		/*tp_name*/	sizeof(fhobject),		/*tp_size*/	0,				/*tp_itemsize*/	/* methods */	(destructor)fh_dealloc,		/*tp_dealloc*/	0,				/*tp_print*/	(getattrfunc)fh_getattr,	/*tp_getattr*/	0,				/*tp_setattr*/	0,				/*tp_compare*/	0,				/*tp_repr*/};  /* Font Manager functions */ static PyObject *fm_init(PyObject *self){	fminit();	Py_INCREF(Py_None);	return Py_None;} static PyObject *fm_findfont(PyObject *self, PyObject *args){	char *str;	if (!PyArg_ParseTuple(args, "s", &str))		return NULL;	return newfhobject(fmfindfont(str));} static PyObject *fm_prstr(PyObject *self, PyObject *args){	char *str;	if (!PyArg_ParseTuple(args, "s", &str))		return NULL;	fmprstr(str);	Py_INCREF(Py_None);	return Py_None;} /* XXX This uses a global variable as temporary! Not re-entrant! */ static PyObject *fontlist; static voidclientproc(char *fontname){	int err;	PyObject *v;	if (fontlist == NULL)		return;	v = PyString_FromString(fontname);	if (v == NULL)		err = -1;	else {		err = PyList_Append(fontlist, v);		Py_DECREF(v);	}	if (err != 0) {		Py_DECREF(fontlist);		fontlist = NULL;	}} static PyObject *fm_enumerate(PyObject *self){	PyObject *res;	fontlist = PyList_New(0);	if (fontlist == NULL)		return NULL;	fmenumerate(clientproc);	res = fontlist;	fontlist = NULL;	return res;} static PyObject *fm_setpath(PyObject *self, PyObject *args){	char *str;	if (!PyArg_ParseTuple(args, "s", &str))		return NULL;	fmsetpath(str);	Py_INCREF(Py_None);	return Py_None;} static PyObject *fm_fontpath(PyObject *self){	return PyString_FromString(fmfontpath());} static PyMethodDef fm_methods[] = {	{"init",	fm_init,      METH_NOARGS},	{"findfont",	fm_findfont,  METH_VARARGS},	{"enumerate",	fm_enumerate, METH_NOARGS},	{"prstr",	fm_prstr,     METH_VARARGS},	{"setpath",	fm_setpath,   METH_VARARGS},	{"fontpath",	fm_fontpath,  METH_NOARGS},	{NULL,		NULL}		/* sentinel */};  voidinitfm(void){	Py_InitModule("fm", fm_methods);	if (m == NULL)		return;	fminit();}