aboutsummaryrefslogtreecommitdiffstats
path: root/plugin_python.c
blob: 73fa159e0999bd2f011a54b982f20c8b30f59e8f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
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
/* $Id$
 * $URL$
 *
 * Python plugin
 *
 * Copyright 2005 Dan Fritz  
 * Copyright 2005 The LCD4Linux Team <lcd4linux-devel@users.sourceforge.net>
 *
 * 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 plugin_init_python (void)
 *  adds a python interpreter
 * 
 */

#include <Python.h>
#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();
    }
}
"p">) l = DCOLS - col; mvwprintw(w, row + 1, col + 1, "%.*s", l, data); wmove(w, DROWS + 1, 0); wrefresh(w); } } static void drv_Curs_defchar(const __attribute__ ((unused)) int ascii, const __attribute__ ((unused)) unsigned char *buffer) { /* empty */ } /* ncures scroll SIGSEGVs on my system, so this is a workaroud */ int curses_error(char *buffer) { static int lines = 0; static char *lb[100]; int start, i; char *p; if (e == NULL) return 0; /* replace \r, \n with underscores */ while ((p = strpbrk(buffer, "\r\n")) != NULL) { *p = '_'; } if (lines >= EROWS) { free(lb[0]); for (i = 1; i <= EROWS; i++) { lb[i - 1] = lb[i]; } start = 0; } else { start = lines; } lb[lines] = strdup(buffer); for (i = start; i <= lines; i++) { mvwprintw(e, i + 1, 1, "%s", lb[i]); wclrtoeol(e); } box(e, 0, 0); mvwprintw(e, 0, 3, "Stderr:"); wrefresh(e); if (lines < EROWS) lines++; return 1; } static int drv_Curs_start(const char *section, const int quiet) { char *s; if (!running_foreground) { error("%s: You want me to display on /dev/null? Sorry, I can't ...", Name); error("%s: Maybe you want me to run in foreground? Try '-F'", Name); return -1; } s = cfg_get(section, "Size", "20x4"); if (s == NULL || *s == '\0') { error("%s: no '%s.Size' entry from %s", Name, section, cfg_source()); free(s); return -1; } if (sscanf(s, "%dx%d", &DCOLS, &DROWS) != 2 || DROWS < 1 || DCOLS < 1) { error("%s: bad %s.Size '%s' from %s", Name, section, s, cfg_source()); free(s); return -1; } free(s); initscr(); noecho(); debug("%s: curses thinks that COLS=%d LINES=%d", Name, COLS, LINES); w = newwin(DROWS + 2, DCOLS + 2, 0, 0); keypad(w, TRUE); nodelay(w, TRUE); EROWS = LINES - DROWS - 3; if (EROWS > 99) EROWS = 99; debug("EROWS=%d", EROWS); if (EROWS >= 4) { e = newwin(EROWS, COLS, DROWS + 3, 0); EROWS -= 3; box(e, 0, 0); mvwprintw(e, 0, 3, "Stderr:"); wmove(e, 1, 0); wrefresh(e); } drv_Curs_clear(); if (!quiet) { char buffer[40]; qprintf(buffer, sizeof(buffer), "%s %dx%d", Name, DCOLS, DROWS); if (drv_generic_text_greet(buffer, NULL)) { sleep(3); drv_Curs_clear(); } } return 0; } static void drv_Curs_timer(void __attribute__ ((unused)) * notused) { int c; while (1) { c = wgetch(w); if (c <= 0) break; drv_generic_keypad_press(c); } } static int drv_Curs_keypad(const int num) { int val = 0; switch (num) { case KEY_UP: debug("Key Up"); val += WIDGET_KEY_PRESSED; val += WIDGET_KEY_UP; break; case KEY_DOWN: debug("Key Down"); val += WIDGET_KEY_PRESSED; val += WIDGET_KEY_DOWN; break; case KEY_LEFT: debug("Key Left"); val += WIDGET_KEY_PRESSED; val += WIDGET_KEY_LEFT; break; case KEY_RIGHT: debug("Key Right"); val += WIDGET_KEY_PRESSED; val += WIDGET_KEY_RIGHT; break; default: debug("Unbound Key '%d'", num); break; } return val; } /****************************************/ /*** plugins ***/ /****************************************/ /* none at the moment... */ /****************************************/ /*** widget callbacks ***/ /****************************************/ /* using drv_generic_text_draw(W) */ /* using drv_generic_text_bar_draw(W) */ /* using drv_generic_keypad_draw(W) */ /****************************************/ /*** exported functions ***/ /****************************************/ /* list models */ int drv_Curs_list(void) { printf("pure ncurses based text driver"); return 0; } /* initialize driver & display */ int drv_Curs_init(const char *section, const int quiet) { WIDGET_CLASS wc; int ret; info("%s: %s", Name, "$Rev$"); /* display preferences */ XRES = 1; /* pixel width of one char */ YRES = 1; /* pixel height of one char */ CHARS = 0; /* number of user-defineable characters */ CHAR0 = 0; /* ASCII of first user-defineable char */ GOTO_COST = 0; /* number of bytes a goto command requires */ /* real worker functions */ drv_generic_text_real_write = drv_Curs_write; drv_generic_text_real_defchar = drv_Curs_defchar; drv_generic_keypad_real_press = drv_Curs_keypad; /* regularly process display answers */ timer_add(drv_Curs_timer, NULL, 100, 0); /* start display */ if ((ret = drv_Curs_start(section, quiet)) != 0) { return ret; } /* initialize generic text driver */ if ((ret = drv_generic_text_init(section, Name)) != 0) return ret; /* initialize generic bar driver */ if ((ret = drv_generic_text_bar_init(1)) != 0) return ret; /* initialize generic key pad driver */ if ((ret = drv_generic_keypad_init(section, Name)) != 0) return ret; /* add fixed chars to the bar driver */ drv_generic_text_bar_add_segment(0, 0, 255, 32); /* ASCII 32 = blank */ drv_generic_text_bar_add_segment(255, 255, 255, '*'); /* asterisk */ /* register text widget */ wc = Widget_Text; wc.draw = drv_generic_text_draw; widget_register(&wc); /* register bar widget */ wc = Widget_Bar; wc.draw = drv_generic_text_bar_draw; widget_register(&wc); /* register plugins */ /* none at the moment... */ return 0; } /* close driver & display */ int drv_Curs_quit(const int quiet) { info("%s: shutting down.", Name); drv_generic_text_quit(); drv_generic_keypad_quit(); /* clear display */ drv_Curs_clear(); /* say goodbye... */ if (!quiet) { drv_generic_text_greet("goodbye!", NULL); } endwin(); return (0); } DRIVER drv_Curses = { .name = Name, .list = drv_Curs_list, .init = drv_Curs_init, .quit = drv_Curs_quit, };