iframe-proxy | Sunbelt Computer Software

History

218 lines (194 loc) · 6.69 KB

Raw

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

196

197

198

199

200

201

202

203

204

205

206

207

208

209

210

211

212

213

214

215

216

217

218

/* -*- mode: c++; c-basic-offset: 4 -*- */

// Where is PIL?

// Many years ago, Matplotlib used to include code from PIL (the Python Imaging

// Library). Since then, the code has changed a lot - the organizing principle

// and methods of operation are now quite different. Because our review of

// the codebase showed that all the code that came from PIL was removed or

// rewritten, we have removed the PIL licensing information. If you want PIL,

// you can get it at https://python-pillow.org/

#define PY_SSIZE_T_CLEAN

#include <Python.h>

#ifdef _WIN32

#define WIN32_DLL

#endif

#ifdef __CYGWIN__

* Unfortunately cygwin's libdl inherits restrictions from the underlying

* Windows OS, at least currently. Therefore, a symbol may be loaded from a

* module by dlsym() only if it is really located in the given modile,

* dependencies are not included. So we have to use native WinAPI on Cygwin

* also.

#define WIN32_DLL

#endif

#ifdef WIN32_DLL

#include <windows.h>

#define PSAPI_VERSION 1

#include <psapi.h> // Must be linked with 'psapi' library

#define dlsym GetProcAddress

#else

#include <dlfcn.h>

#endif

// Include our own excerpts from the Tcl / Tk headers

#include "_tkmini.h"

#include "py_converters.h"

// Global vars for Tk functions. We load these symbols from the tkinter

// extension module or loaded Tk libraries at run-time.

static Tk_FindPhoto_t TK_FIND_PHOTO;

static Tk_PhotoPutBlock_NoComposite_t TK_PHOTO_PUT_BLOCK_NO_COMPOSITE;

static PyObject *mpl_tk_blit(PyObject *self, PyObject *args)

{

Tcl_Interp *interp;

char const *photo_name;

int height, width;

unsigned char *data_ptr;

int o0, o1, o2, o3;

int x1, x2, y1, y2;

Tk_PhotoHandle photo;

Tk_PhotoImageBlock block;

if (!PyArg_ParseTuple(args, "O&s(iiO&)(iiii)(iiii):blit",

convert_voidptr, &interp, &photo_name,

&height, &width, convert_voidptr, &data_ptr,

&o0, &o1, &o2, &o3,

&x1, &x2, &y1, &y2)) {

goto exit;

}

if (!(photo = TK_FIND_PHOTO(interp, photo_name))) {

PyErr_SetString(PyExc_ValueError, "Failed to extract Tk_PhotoHandle");

goto exit;

}

if (0 > y1 || y1 > y2 || y2 > height || 0 > x1 || x1 > x2 || x2 > width) {

PyErr_SetString(PyExc_ValueError, "Attempting to draw out of bounds");

goto exit;

}

block.pixelPtr = data_ptr + 4 * ((height - y2) * width + x1);

block.width = x2 - x1;

block.height = y2 - y1;

block.pitch = 4 * width;

block.pixelSize = 4;

block.offset[0] = o0;

block.offset[1] = o1;

block.offset[2] = o2;

block.offset[3] = o3;

TK_PHOTO_PUT_BLOCK_NO_COMPOSITE(

photo, &block, x1, height - y2, x2 - x1, y2 - y1);

exit:

if (PyErr_Occurred()) {

return NULL;

} else {

Py_RETURN_NONE;

}

static PyMethodDef functions[] = {

{ "blit", (PyCFunction)mpl_tk_blit, METH_VARARGS },

{ NULL, NULL } /* sentinel */

};

// Functions to fill global Tk function pointers by dynamic loading

template <class T>

int load_tk(T lib)

{

// Try to fill Tk global vars with function pointers. Return the number of

// functions found.

return

!!(TK_FIND_PHOTO =

(Tk_FindPhoto_t)dlsym(lib, "Tk_FindPhoto")) +

!!(TK_PHOTO_PUT_BLOCK_NO_COMPOSITE =

(Tk_PhotoPutBlock_NoComposite_t)dlsym(lib, "Tk_PhotoPutBlock_NoComposite"));

}

#ifdef WIN32_DLL

* On Windows, we can't load the tkinter module to get the Tk symbols, because

* Windows does not load symbols into the library name-space of importing

* modules. So, knowing that tkinter has already been imported by Python, we

* scan all modules in the running process for the Tk function names.

void load_tkinter_funcs(void)

{

// Load Tk functions by searching all modules in current process.

HMODULE hMods[1024];

HANDLE hProcess;

DWORD cbNeeded;

unsigned int i;

// Returns pseudo-handle that does not need to be closed

hProcess = GetCurrentProcess();

// Iterate through modules in this process looking for Tk names.

if (EnumProcessModules(hProcess, hMods, sizeof(hMods), &cbNeeded)) {

for (i = 0; i < (cbNeeded / sizeof(HMODULE)); i++) {

if (load_tk(hMods[i])) {

return;

}

#else // not Windows

* On Unix, we can get the Tk symbols from the tkinter module, because tkinter

* uses these symbols, and the symbols are therefore visible in the tkinter

* dynamic library (module).

void load_tkinter_funcs(void)

{

// Load tkinter global funcs from tkinter compiled module.

void *main_program = NULL, *tkinter_lib = NULL;

PyObject *module = NULL, *py_path = NULL, *py_path_b = NULL;

char *path;

// Try loading from the main program namespace first.

main_program = dlopen(NULL, RTLD_LAZY);

if (load_tk(main_program)) {

goto exit;

}

// Clear exception triggered when we didn't find symbols above.

PyErr_Clear();

// Handle PyPy first, as that import will correctly fail on CPython.

module = PyImport_ImportModule("_tkinter.tklib_cffi"); // PyPy

if (!module) {

PyErr_Clear();

module = PyImport_ImportModule("_tkinter"); // CPython

}

if (!(module &&

(py_path = PyObject_GetAttrString(module, "__file__")) &&

(py_path_b = PyUnicode_EncodeFSDefault(py_path)) &&

(path = PyBytes_AsString(py_path_b)))) {

goto exit;

}

tkinter_lib = dlopen(path, RTLD_LAZY);

if (!tkinter_lib) {

PyErr_SetString(PyExc_RuntimeError, dlerror());

goto exit;

}

if (load_tk(tkinter_lib)) {

goto exit;

}

exit:

// We don't need to keep a reference open as the main program & tkinter

// have been imported. Use a non-short-circuiting "or" to try closing both

// handles before handling errors.

if ((main_program && dlclose(main_program))

| (tkinter_lib && dlclose(tkinter_lib))) {

PyErr_SetString(PyExc_RuntimeError, dlerror());

}

Py_XDECREF(module);

Py_XDECREF(py_path);

Py_XDECREF(py_path_b);

}

#endif // end not Windows

static PyModuleDef _tkagg_module = {

PyModuleDef_HEAD_INIT, "_tkagg", "", -1, functions, NULL, NULL, NULL, NULL

};

#pragma GCC visibility push(default)

PyMODINIT_FUNC PyInit__tkagg(void)

{

load_tkinter_funcs();

if (PyErr_Occurred()) {

return NULL;

} else if (!TK_FIND_PHOTO) {

PyErr_SetString(PyExc_RuntimeError, "Failed to load Tk_FindPhoto");

return NULL;

} else if (!TK_PHOTO_PUT_BLOCK_NO_COMPOSITE) {

PyErr_SetString(PyExc_RuntimeError, "Failed to load Tk_PhotoPutBlock_NoComposite");

return NULL;

}

return PyModule_Create(&_tkagg_module);

}

#pragma GCC visibility pop

Sunbelt Computer Software

PL/B Language Development and Support

Navigation Menu

Sunbelt Computer Software

PL/B Language Development and Support

FilesExpand file tree

_tkagg.cpp

Latest commit

History

_tkagg.cpp

File metadata and controls