medit/moo/mooutils/moopython.c

95 lines
1.7 KiB
C

/*
* mooutils/moopython.c
*
* Copyright (C) 2004-2006 by Yevgen Muntyan <muntyan@math.tamu.edu>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* See COPYING file that comes with this distribution.
*/
#include "mooutils/moopython.h"
typedef struct {
gpointer data;
GDestroyNotify destroy;
} Data;
MooPyAPI *moo_py_api = NULL;
void
moo_python_add_data (gpointer data,
GDestroyNotify destroy)
{
Data *d;
g_return_if_fail (moo_py_api != NULL);
g_return_if_fail (destroy != NULL);
d = g_new (Data, 1);
d->data = data;
d->destroy = destroy;
moo_py_api->_free_list = g_slist_prepend (moo_py_api->_free_list, d);
}
static void
data_free (Data *d)
{
if (d)
{
d->destroy (d->data);
g_free (d);
}
}
gboolean
moo_python_init (guint version,
MooPyAPI *api)
{
if (version != MOO_PY_API_VERSION)
return FALSE;
g_return_val_if_fail (!moo_py_api || !api, FALSE);
if (moo_py_api)
{
g_slist_foreach (moo_py_api->_free_list, (GFunc) data_free, NULL);
g_slist_free (moo_py_api->_free_list);
}
moo_py_api = api;
if (moo_py_api)
moo_py_api->_free_list = NULL;
return TRUE;
}
MooPyObject *
moo_Py_INCREF (MooPyObject *obj)
{
g_return_val_if_fail (moo_python_running (), obj);
if (obj)
moo_py_api->incref (obj);
return obj;
}
void
moo_Py_DECREF (MooPyObject *obj)
{
g_return_if_fail (moo_python_running ());
if (obj)
moo_py_api->decref (obj);
}