/* $Id: plugin_python.c,v 1.4 2005/05/08 04:32:45 reinelt Exp $ * * Python plugin * * Copyright 2005 Dan Fritz * Copyright 2005 The LCD4Linux Team * * This file is part of LCD4Linux. * * LCD4Linux 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, or (at your option) * any later version. * * LCD4Linux is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. * * * $Log: plugin_python.c,v $ * Revision 1.4 2005/05/08 04:32:45 reinelt * CodingStyle added and applied * * Revision 1.3 2005/05/04 05:22:12 reinelt * * replaced fprintf(stderr,... with error() * * corrected a "dangling reference" memory problem * * removed some PyErr_Print() spam * * fixed a segmentation fault that occured when python module was not * found * * improved error messages * * Revision 1.2 2005/05/03 11:13:24 reinelt * rearranged autoconf a bit, * libX11 will be linked only if really needed (i.e. when the X11 driver has been selected) * plugin_python filled with life * * Revision 1.1 2005/05/02 10:29:20 reinelt * preparations for python bindings and python plugin * */ /* * exported functions: * * int plugin_init_python (void) * adds a python interpreter * */ #include #include "debug.h" #include "plugin.h" /* * Executes a python function specified by function name and module. * * This method is more or less a copy of an example found in the python * documentation. Kudos goes to Guido van Rossum and Fred L. Drake. * * Fixme: this function should be able to accept and receive any types * of arguments supported by the evaluator. Right now only strings are accepted. */ static void pyt_exec_str(RESULT * result, const char *module, const char *function, int argc, const char *argv[]) { PyObject *pName, *pModule, *pDict, *pFunc; PyObject *pArgs, *pValue; const char *rv = NULL; int i; pName = PyString_FromString(module); /* Error checking of pName left out */ pModule = PyImport_Import(pName); Py_DECREF(pName); if (pModule != NULL) { pDict = PyModule_GetDict(pModule); /* pDict is a borrowed reference */ pFunc = PyDict_GetItemString(pDict, function); /* pFun: Borrowed reference */ if (pFunc && PyCallable_Check(pFunc)) { pArgs = PyTuple_New(argc); for (i = 0; i < argc; ++i) { pValue = PyString_FromString(argv[i]); if (!pValue) { Py_DECREF(pArgs); Py_DECREF(pModule); error("Cannot convert argument \"%s\" to python format", argv[i]); SetResult(&result, R_STRING, ""); return; } /* pValue reference stolen here: */ PyTuple_SetItem(pArgs, i, pValue); } pValue = PyObject_CallObject(pFunc, pArgs); Py_DECREF(pArgs); if (pValue != NULL) { rv = PyString_AsString(pValue); SetResult(&result, R_STRING, rv); Py_DECREF(pValue); /* rv is now a 'dangling reference' */ return; } else { Py_DECREF(pModule); error("Python call failed (\"%s.%s\")", module, function); SetResult(&result, R_STRING, ""); return; } /* pDict and pFunc are borrowed and must not be Py_DECREF-ed */ } else { error("Can not find python function \"%s.%s\"", module, function); } Py_DECREF(pModule); } else { error("Failed to load python module \"%s\"", module); } SetResult(&result, R_STRING, ""); return; } static int python_cleanup_responsibility = 0; static void my_exec(RESULT * result, RESULT * module, RESULT * function, RESULT * arg) { /* Fixme: a plugin should be able to accept any number of arguments, don't know how to code that (yet) */ const char *args[] = { R2S(arg) }; pyt_exec_str(result, R2S(module), R2S(function), 1, args); } int plugin_init_python(void) { if (!Py_IsInitialized()) { Py_Initialize(); python_cleanup_responsibility = 1; } AddFunction("python::exec", 3, my_exec); return 0; } void plugin_exit_python(void) { /* Make sure NOT to call Py_Finalize() When (and if) the entire lcd4linux process * is started from inside python */ if (python_cleanup_responsibility) { python_cleanup_responsibility = 0; Py_Finalize(); } } id='n71' href='#n71'>71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 
/* $Id$
 * $URL$
 *
 * thread handling (mutex, shmem, ...)
 *
 * Copyright (C) 2004 Michael Reinelt <reinelt@eunet.at>
 * Copyright (C) 2004 The LCD4Linux Team <lcd4linux-devel@users.sourceforge.net>
 *
 * parts of this code are based on the old XWindow driver which is
 * Copyright (C) 2000 Herbert Rosmanith <herp@wildsau.idv.uni-linz.ac.at>
 *
 * This file is part of LCD4Linux.
 *
 * LCD4Linux 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, or (at your option)
 * any later version.
 *
 * LCD4Linux is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 */

/* 
 * exported functions:
 * 
 * int  mutex_create  (void);
 *   creates a mutex and treturns its ID
 * 
 * void mutex_lock    (int semid);
 *   try to lock a mutex
 *
 * void mutex_unlock  (int semid);
 *   unlock a mutex
 *
 * void mutex_destroy (int semid);
 *   release a mutex
 *
 *
 * int shm_create    (void **buffer, int size);
 *   create shared memory segment
 *
 * void shm_destroy   (int shmid, void *buffer) ;
 *   release shared memory segment
 *
 * int thread_create (char *name, void (*thread)(void *data), void *data);
 *   create a new thread
 *
 */


#include "config.h"

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <unistd.h>
#include <errno.h>
#include <signal.h>
#include <sys/types.h>
#include <sys/ipc.h>
#include <sys/sem.h>
#include <sys/shm.h>

#include "debug.h"
#include "thread.h"


#ifdef WITH_DMALLOC
#include <dmalloc.h>
#endif


int thread_argc;
char **thread_argv;


/* glibc 2.1 requires defining semun ourselves */
#ifdef _SEM_SEMUN_UNDEFINED
union semun {
    int val;
    struct semid_ds *buf;
    unsigned short int *array;
    struct seminfo *__buf;
};
#endif


int mutex_create(void)
{
    int semid;
    union semun semun;

    semid = semget(IPC_PRIVATE, 1, 0);
    if (semid == -1) {
	error("fatal error: semget() failed: %s", strerror(errno));
	return -1;
    }
    semun.val = 1;
    semctl(semid, 0, SETVAL, semun);

    return semid;
}


void mutex_lock(const int semid)
{
    struct sembuf sembuf;
    sembuf.sem_num = 0;
    sembuf.sem_op = -1;
    sembuf.sem_flg = 0;
    semop(semid, &sembuf, 1);
}


void mutex_unlock(const int semid)
{
    struct sembuf sembuf;
    sembuf.sem_num = 0;
    sembuf.sem_op = 1;
    sembuf.sem_flg = 0;
    semop(semid, &sembuf, 1);
}


void mutex_destroy(const int semid)
{
    union semun arg;
    semctl(semid, 0, IPC_RMID, arg);
}


int shm_create(void **buffer, const int size)
{
    int shmid;

    shmid = shmget(IPC_PRIVATE, size, SHM_R | SHM_W);
    if (shmid == -1) {
	error("fatal error: shmget() failed: %s", strerror(errno));
	return -1;
    }

    *buffer = shmat(shmid, NULL, 0);
    if (*buffer == NULL) {
	error("fatal error: shmat() failed: %s", strerror(errno));
	return -1;
    }

    return shmid;
}


void shm_destroy(const int shmid, const void *buffer)
{
    shmdt(buffer);
    shmctl(shmid, IPC_RMID, NULL);
}


int thread_create(const char *name, void (*thread) (void *data), void *data)
{
    pid_t pid, ppid;

    ppid = getpid();

    switch (pid = fork()) {
    case -1:
	error("fatal error: fork(%s) failed: %s", name, strerror(errno));
	return -1;
    case 0:
	info("thread %s starting...", name);
	if (thread_argc > 0) {
	    strncpy(thread_argv[0], name, strlen(thread_argv[0]));
	}
	thread(data);
	info("thread %s ended.", name);
	exit(0);
    default:
	info("forked process %d for thread %s", pid, name);
    }

    return pid;
}


int thread_destroy(const int pid)
{
    return kill(pid, SIGKILL);
}