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
|
/* Need to define an internal flag to avoid an extern */
#define LDG_INTERNAL
#include "ldg_Python.h"
#include <gem.h>
#include <ldg.h>
#include "py_aes.h"
/* --- A GEM exception --- */
static PyObject *GEMError;
/* --- Python-C API Calls --- */
static void *pycallbacks[PY_API_FCOUNT];
/* --- Python API Bookkeeping --- */
static PyMethodDef
GemMethods[] = {
/* AES Application Library */
{"appl_init", py_appl_init, METH_VARARGS, "Initialize a GEM application"},
{"appl_exit", py_appl_exit, METH_VARARGS, "Exit a GEM application"},
{"appl_write", py_appl_write, METH_VARARGS, "Send a message to a GEM application"},
/* AES Forms Library */
{"form_alert", py_form_alert, METH_VARARGS, "Display a GEM alert dialog"},
{"form_dial", py_form_dial, METH_VARARGS, "Reserves and releases screen memory"},
{"form_do", py_form_do, METH_VARARGS, "Processes a dialog"},
{"form_center", py_form_center, METH_VARARGS, "Centers an object"},
/* AES Resource Library */
{"rsrc_load", py_rsrc_load, METH_VARARGS, "Load a resource into memory"},
{"rsrc_gaddr", py_rsrc_gaddr, METH_VARARGS, "Return an encapsulated memory address of a resource component"},
/* AES Window Library */
{"wind_create", py_wind_create, METH_VARARGS, "Create a window"},
{"wind_open", py_wind_open, METH_VARARGS, "Open a window"},
{"wind_get", py_wind_get, METH_VARARGS, "Retrieve window information"},
{"wind_delete", py_wind_delete, METH_VARARGS, "Delete a window (after closing...)"},
{"wind_close", py_wind_close, METH_VARARGS, "Close a window"},
{"wind_set", py_wind_set, METH_VARARGS, "Set a window parameter"},
{"wind_update", py_wind_update, METH_VARARGS, "Lock window redraw for updates"},
{NULL,NULL,0,NULL}
};
PyMODINIT_FUNC __CDECL initgem(void)
{
PyObject *m;
//printf("Welcome to shared init.\nStandby...\n");
//LPy_InitModule("gem",GemMethods,NULL,NULL);
m = Py_InitModule("_gem",GemMethods);
GEMError = PyErr_NewException("_gem.error",NULL,NULL);
Py_INCREF(GEMError);
PyModule_AddObject(m,"error",GEMError);
return;
}
/* --- End Python API Bookkeeping --- */
/* --- LDG Bookkeeping --- */
void __CDECL assign_pycalls(void **calls)
{
int i;
for(i=0;i<PY_API_FCOUNT;i++)
pycallbacks[i] = calls[i];
}
PROC LibFunc[] = {
"assign_pycalls", "Assigns Python callbacks", assign_pycalls,
"initgem", "Internal\n", initgem,
/* AES Application Library */
"py_appl_exit", "Internal\n", py_appl_exit,
"py_appl_init", "Internal\n", py_appl_init,
"py_appl_write", "Internal\n", py_appl_write,
/* AES Forms Library */
"py_form_alert", "Internal\n", py_form_alert,
"py_form_dial", "Internal\n", py_form_dial,
"py_form_do", "Internal\n", py_form_do,
"py_form_center", "Internal\n", py_form_center,
/* AES Resource Library */
"py_rsrc_load", "Internal\n", py_rsrc_load,
"py_rsrc_gaddr", "Internal\n", py_rsrc_gaddr,
/* AES Window Library */
"py_wind_create", "Internal\n", py_wind_create,
"py_wind_open", "Internal\n", py_wind_open,
"py_wind_get", "Internal\n", py_wind_get,
"py_wind_delete", "Internal\n", py_wind_delete,
"py_wind_close", "Internal\n", py_wind_close,
"py_wind_update", "Internal\n", py_wind_update,
"py_wind_set", "Internal\n", py_wind_set
};
LDGLIB LibLdg[] = {
0x0001, 18, LibFunc, "GEM Extensions for Python", 0
};
int main( void)
{
if( ldg_init( LibLdg) == -1) {
printf("*** %s ***\n",LibLdg[0].infos);
printf("This program is a shared library.\n");
}
return 0;
}
/* --- End LDG Bookkeeping --- */
|
