You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
353 lines
9.7 KiB
353 lines
9.7 KiB
/***************************************************************************
|
|
* Copyright (C) 2003-2004 Adam Geitgey <adam@rootnode.org> *
|
|
* Copyright (C) 2003 Hans Karlsson <karlsson.h@home.se> *
|
|
* *
|
|
* 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. *
|
|
***************************************************************************/
|
|
|
|
#ifdef _XOPEN_SOURCE
|
|
#undef _XOPEN_SOURCE
|
|
#endif
|
|
|
|
#include <Python.h>
|
|
#include <tqobject.h>
|
|
#include "karamba.h"
|
|
#include "karambaapp.h"
|
|
#include "meter.h"
|
|
#include "meter_python.h"
|
|
#include "lineparser.h"
|
|
|
|
bool checkKaramba(long widget)
|
|
{
|
|
/*
|
|
if (!karambaApp)
|
|
{
|
|
PyErr_SetString(PyExc_ValueError, "app pointer was 0.");
|
|
return false;
|
|
}
|
|
*/
|
|
if (!widget)
|
|
{
|
|
PyErr_SetString(PyExc_ValueError, "widget pointer was 0.");
|
|
return false;
|
|
}
|
|
if (!karambaApp->hasKaramba((karamba*)widget))
|
|
{
|
|
TQString tmp;
|
|
|
|
tmp.sprintf("no %x widget found.", (unsigned int)widget);
|
|
PyErr_SetString(PyExc_ValueError, tmp.ascii());
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
bool checkMeter(long widget, long meter, const char* type)
|
|
{
|
|
if (!meter)
|
|
{
|
|
PyErr_SetString(PyExc_ValueError, "meter pointer was 0.");
|
|
return false;
|
|
}
|
|
if (!((karamba*)widget)->hasMeter((Meter*)meter))
|
|
{
|
|
TQString tmp;
|
|
|
|
tmp.sprintf("widget does not have meter %x.", (unsigned int)meter);
|
|
PyErr_SetString(PyExc_ValueError, tmp.ascii());
|
|
return false;
|
|
}
|
|
if (!((TQObject*)meter)->isA(type))
|
|
{
|
|
TQString tmp;
|
|
|
|
tmp.sprintf("meter is not type of %s.", type);
|
|
PyErr_SetString(PyExc_TypeError, tmp.ascii());
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
bool checkKarambaAndMeter(long widget, long meter, const char* type)
|
|
{
|
|
return checkKaramba(widget) && checkMeter(widget, meter, type);
|
|
}
|
|
|
|
// This just throws awya extra bytes.
|
|
// I guess there is a better way to do this...
|
|
TQString fromUcs4(TQ_UINT32* ucs4)
|
|
{
|
|
TQString result = "";
|
|
while(*ucs4 != 0)
|
|
{
|
|
result += TQChar((TQ_UINT16)*ucs4);
|
|
++ucs4;
|
|
}
|
|
return result;
|
|
}
|
|
|
|
// Converts a Python String to a TQString with Unicode support
|
|
TQString PyString2TQString(PyObject* text)
|
|
{
|
|
TQString qtext;
|
|
if (PyBytes_CheckExact(text))
|
|
{
|
|
char* t = PyBytes_AsString(text);
|
|
qtext.setAscii(t);
|
|
}
|
|
else if (PyUnicode_CheckExact(text))
|
|
{
|
|
int uniSize = PyUnicode_KIND(text);
|
|
if (uniSize == PyUnicode_4BYTE_KIND)
|
|
qtext = fromUcs4((TQ_UINT32*)PyUnicode_4BYTE_DATA(text));
|
|
else if (uniSize == PyUnicode_2BYTE_KIND)
|
|
qtext = TQString::fromUcs2((TQ_UINT16*)PyUnicode_2BYTE_DATA(text));
|
|
else if (uniSize == PyUnicode_1BYTE_KIND)
|
|
qtext.setAscii((char*)PyUnicode_1BYTE_DATA(text));
|
|
}
|
|
else
|
|
{
|
|
// Error raise execption ...
|
|
}
|
|
return qtext;
|
|
}
|
|
|
|
// Converts a TQString to a Python String with Unicode support
|
|
PyObject* TQString2PyString(TQString string)
|
|
{
|
|
PyObject *pyString;
|
|
|
|
const unsigned short* tmp = string.ucs2();
|
|
|
|
if(tmp)
|
|
{
|
|
pyString = PyUnicode_FromKindAndData(PyUnicode_2BYTE_KIND, tmp, string.length());
|
|
}
|
|
else
|
|
pyString = PyBytes_FromString("");
|
|
|
|
return pyString;
|
|
}
|
|
|
|
|
|
long getMeter(long widget, char* name)
|
|
{
|
|
karamba* theme = (karamba*)widget;
|
|
TQObjectListIt it( *theme->meterList ); // iterate over meters
|
|
|
|
while ( it != 0 )
|
|
{
|
|
if (strcmp(((Meter*) *it)->name(), name) == 0)
|
|
return (long)*it;
|
|
++it;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
PyObject* py_getThemeMeter(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
char* name;
|
|
if (!PyArg_ParseTuple(args, (char*)"ls", &widget, &name))
|
|
return NULL;
|
|
if (!checkKaramba(widget))
|
|
return NULL;
|
|
if(!name)
|
|
return NULL;
|
|
meter = getMeter(widget, name);
|
|
if (!checkMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
return (Py_BuildValue((char*)"l", meter));
|
|
}
|
|
|
|
PyObject* py_getSize(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget;
|
|
long meter;
|
|
if (!PyArg_ParseTuple(args, (char*)"ll", &widget, &meter))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
return Py_BuildValue((char*)"(i,i)", ((Meter*)meter)->getWidth(),
|
|
((Meter*)meter)->getHeight());
|
|
}
|
|
|
|
PyObject* py_resize(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter, x, y;
|
|
if (!PyArg_ParseTuple(args, (char*)"llll", &widget, &meter, &x, &y))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
((Meter*)meter)->setSize(((Meter*)meter)->getX(), ((Meter*)meter)->getY(),
|
|
x, y);
|
|
return Py_BuildValue((char*)"l", 1);
|
|
}
|
|
|
|
PyObject* py_getPos(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
if (!PyArg_ParseTuple(args, (char*)"ll", &widget, &meter))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
return Py_BuildValue((char*)"(i,i)", ((Meter*)meter)->getX(),
|
|
((Meter*)meter)->getY());
|
|
}
|
|
|
|
PyObject* py_move(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter, x, y;
|
|
if (!PyArg_ParseTuple(args, (char*)"llll", &widget, &meter, &x, &y))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
((Meter*)meter)->setSize(x, y,
|
|
((Meter*)meter)->getWidth(),
|
|
((Meter*)meter)->getHeight());
|
|
return Py_BuildValue((char*)"l", 1);
|
|
}
|
|
|
|
PyObject* py_hide(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
if (!PyArg_ParseTuple(args, (char*)"ll", &widget, &meter))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
((Meter*)meter)->hide();
|
|
return Py_BuildValue((char*)"l", 1);
|
|
}
|
|
|
|
PyObject* py_show(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
if (!PyArg_ParseTuple(args, (char*)"ll", &widget, &meter))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
((Meter*)meter)->show();
|
|
return Py_BuildValue((char*)"l", 1);
|
|
}
|
|
|
|
PyObject* py_getValue(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
if (!PyArg_ParseTuple(args, (char*)"ll", &widget, &meter))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
return Py_BuildValue((char*)"l", ((Meter*)meter)->getValue());
|
|
}
|
|
|
|
PyObject* py_setValue(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter, l;
|
|
if (!PyArg_ParseTuple(args, (char*)"lll", &widget, &meter, &l))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
((Meter*)meter)->setValue(l);
|
|
return Py_BuildValue((char*)"l", ((long)meter));
|
|
}
|
|
|
|
PyObject* py_getStringValue(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
if (!PyArg_ParseTuple(args, (char*)"ll", &widget, &meter))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
return Py_BuildValue((char*)"O",
|
|
TQString2PyString(((Meter*)meter)->getStringValue()));
|
|
}
|
|
|
|
PyObject* py_setStringValue(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
PyObject* s;
|
|
if (!PyArg_ParseTuple(args, (char*)"llO", &widget, &meter, &s))
|
|
return NULL;
|
|
if (!s)
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
((Meter*)meter)->setValue(PyString2TQString(s));
|
|
return Py_BuildValue((char*)"l", ((long)meter));
|
|
}
|
|
|
|
PyObject* py_getMinMax(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
if (!PyArg_ParseTuple(args, (char*)"ll", &widget, &meter))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
return Py_BuildValue((char*)"(i,i)", ((Meter*)meter)->getMin(),
|
|
((Meter*)meter)->getMax());
|
|
}
|
|
|
|
PyObject* py_setMinMax(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter, x, y;
|
|
if (!PyArg_ParseTuple(args, (char*)"llll", &widget, &meter, &x, &y))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
((Meter*)meter)->setMin(x);
|
|
((Meter*)meter)->setMax(y);
|
|
return Py_BuildValue((char*)"l", 1);
|
|
}
|
|
|
|
PyObject* py_getSensor(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
TQString s;
|
|
if (!PyArg_ParseTuple(args, (char*)"ll", &widget, &meter))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
return Py_BuildValue((char*)"s",
|
|
((karamba*)widget)->getSensor((Meter*)meter).ascii());
|
|
}
|
|
|
|
PyObject* py_setSensor(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
char* s;
|
|
|
|
if (!PyArg_ParseTuple(args, (char*)"lls", &widget, &meter, &s))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
((karamba*)widget)->setSensor(LineParser(s), (Meter*)meter);
|
|
return Py_BuildValue((char*)"l", 1);
|
|
}
|
|
|
|
PyObject* py_setColor(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
long r, g, b;
|
|
if (!PyArg_ParseTuple(args, (char*)"lllll", &widget, &meter, &r, &g, &b))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
((Meter*)meter)->setColor(TQColor(r, g, b));
|
|
return Py_BuildValue((char*)"l", 1);
|
|
}
|
|
|
|
PyObject* py_getColor(PyObject *, PyObject *args, TQString type)
|
|
{
|
|
long widget, meter;
|
|
if (!PyArg_ParseTuple(args, (char*)"ll", &widget, &meter))
|
|
return NULL;
|
|
if (!checkKarambaAndMeter(widget, meter, type.ascii()))
|
|
return NULL;
|
|
TQColor color = ((Meter*)meter)->getColor();
|
|
return Py_BuildValue((char*)"(i,i,i)", color.red(), color.green(), color.blue());
|
|
}
|
|
|