Mercurial > vim
annotate src/if_python.c @ 4320:4c7931bbf78a
Added tag v7-3-909 for changeset b79f3c3a584c
author | Bram Moolenaar <bram@vim.org> |
---|---|
date | Wed, 24 Apr 2013 13:39:15 +0200 |
parents | b79f3c3a584c |
children | d8d9c591c50f |
rev | line source |
---|---|
3618 | 1 /* vi:set ts=8 sts=4 sw=4 noet: |
7 | 2 * |
3 * VIM - Vi IMproved by Bram Moolenaar | |
4 * | |
5 * Do ":help uganda" in Vim to read copying and usage conditions. | |
6 * Do ":help credits" in Vim to see a list of people who contributed. | |
7 * See README.txt for an overview of the Vim source code. | |
8 */ | |
9 /* | |
10 * Python extensions by Paul Moore. | |
11 * Changes for Unix by David Leonard. | |
12 * | |
13 * This consists of four parts: | |
14 * 1. Python interpreter main program | |
15 * 2. Python output stream: writes output via [e]msg(). | |
16 * 3. Implementation of the Vim module for Python | |
17 * 4. Utility functions for handling the interface between Vim and Python. | |
18 */ | |
19 | |
20 #include "vim.h" | |
21 | |
22 #include <limits.h> | |
23 | |
24 /* Python.h defines _POSIX_THREADS itself (if needed) */ | |
25 #ifdef _POSIX_THREADS | |
26 # undef _POSIX_THREADS | |
27 #endif | |
28 | |
2250
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2100
diff
changeset
|
29 #if defined(_WIN32) && defined(HAVE_FCNTL_H) |
7 | 30 # undef HAVE_FCNTL_H |
31 #endif | |
32 | |
33 #ifdef _DEBUG | |
34 # undef _DEBUG | |
35 #endif | |
36 | |
37 #ifdef HAVE_STDARG_H | |
38 # undef HAVE_STDARG_H /* Python's config.h defines it as well. */ | |
39 #endif | |
1991 | 40 #ifdef _POSIX_C_SOURCE |
41 # undef _POSIX_C_SOURCE /* pyconfig.h defines it as well. */ | |
42 #endif | |
43 #ifdef _XOPEN_SOURCE | |
44 # undef _XOPEN_SOURCE /* pyconfig.h defines it as well. */ | |
45 #endif | |
7 | 46 |
47 #include <Python.h> | |
48 #if defined(MACOS) && !defined(MACOS_X_UNIX) | |
49 # include "macglue.h" | |
50 # include <CodeFragments.h> | |
51 #endif | |
52 #undef main /* Defined in python.h - aargh */ | |
53 #undef HAVE_FCNTL_H /* Clash with os_win32.h */ | |
54 | |
3806 | 55 #if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02050000 |
56 # define PY_SSIZE_T_CLEAN | |
57 #endif | |
58 | |
2399
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
59 static void init_structs(void); |
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
60 |
3618 | 61 #define PyBytes_FromString PyString_FromString |
62 | |
2894 | 63 /* No-op conversion functions, use with care! */ |
64 #define PyString_AsBytes(obj) (obj) | |
65 #define PyString_FreeBytes(obj) | |
66 | |
7 | 67 #if !defined(FEAT_PYTHON) && defined(PROTO) |
68 /* Use this to be able to generate prototypes without python being used. */ | |
1607 | 69 # define PyObject Py_ssize_t |
70 # define PyThreadState Py_ssize_t | |
71 # define PyTypeObject Py_ssize_t | |
72 struct PyMethodDef { Py_ssize_t a; }; | |
73 # define PySequenceMethods Py_ssize_t | |
7 | 74 #endif |
75 | |
3638 | 76 #if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02070000 |
77 # define PY_USE_CAPSULE | |
78 #endif | |
79 | |
1594 | 80 #if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02050000 |
81 # define PyInt Py_ssize_t | |
82 # define PyInquiry lenfunc | |
83 # define PyIntArgFunc ssizeargfunc | |
84 # define PyIntIntArgFunc ssizessizeargfunc | |
85 # define PyIntObjArgProc ssizeobjargproc | |
86 # define PyIntIntObjArgProc ssizessizeobjargproc | |
1607 | 87 # define Py_ssize_t_fmt "n" |
1594 | 88 #else |
89 # define PyInt int | |
4319 | 90 # define lenfunc inquiry |
1594 | 91 # define PyInquiry inquiry |
92 # define PyIntArgFunc intargfunc | |
93 # define PyIntIntArgFunc intintargfunc | |
94 # define PyIntObjArgProc intobjargproc | |
95 # define PyIntIntObjArgProc intintobjargproc | |
1607 | 96 # define Py_ssize_t_fmt "i" |
1594 | 97 #endif |
98 | |
7 | 99 /* Parser flags */ |
100 #define single_input 256 | |
101 #define file_input 257 | |
102 #define eval_input 258 | |
103 | |
104 #if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x020300F0 | |
105 /* Python 2.3: can invoke ":python" recursively. */ | |
106 # define PY_CAN_RECURSE | |
107 #endif | |
108 | |
2528
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
109 # if defined(DYNAMIC_PYTHON) || defined(PROTO) |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
110 # ifndef DYNAMIC_PYTHON |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
111 # define HINSTANCE long_u /* for generating prototypes */ |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
112 # endif |
7 | 113 |
2528
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
114 # ifndef WIN3264 |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
115 # include <dlfcn.h> |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
116 # define FARPROC void* |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
117 # define HINSTANCE void* |
2641 | 118 # if defined(PY_NO_RTLD_GLOBAL) && defined(PY3_NO_RTLD_GLOBAL) |
2528
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
119 # define load_dll(n) dlopen((n), RTLD_LAZY) |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
120 # else |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
121 # define load_dll(n) dlopen((n), RTLD_LAZY|RTLD_GLOBAL) |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
122 # endif |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
123 # define close_dll dlclose |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
124 # define symbol_from_dll dlsym |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
125 # else |
2612 | 126 # define load_dll vimLoadLib |
2528
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
127 # define close_dll FreeLibrary |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
128 # define symbol_from_dll GetProcAddress |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
129 # endif |
2329
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
130 |
1607 | 131 /* This makes if_python.c compile without warnings against Python 2.5 |
132 * on Win32 and Win64. */ | |
2528
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
133 # undef PyRun_SimpleString |
3618 | 134 # undef PyRun_String |
2528
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
135 # undef PyArg_Parse |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
136 # undef PyArg_ParseTuple |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
137 # undef Py_BuildValue |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
138 # undef Py_InitModule4 |
8bc2e8390c11
When building with both Python 2 and Python 3 don't use RTLD_GLOBAL, so that
Bram Moolenaar <bram@vim.org>
parents:
2447
diff
changeset
|
139 # undef Py_InitModule4_64 |
3618 | 140 # undef PyObject_CallMethod |
1607 | 141 |
7 | 142 /* |
143 * Wrapper defines | |
144 */ | |
145 # define PyArg_Parse dll_PyArg_Parse | |
146 # define PyArg_ParseTuple dll_PyArg_ParseTuple | |
2894 | 147 # define PyMem_Free dll_PyMem_Free |
3618 | 148 # define PyMem_Malloc dll_PyMem_Malloc |
7 | 149 # define PyDict_SetItemString dll_PyDict_SetItemString |
150 # define PyErr_BadArgument dll_PyErr_BadArgument | |
151 # define PyErr_Clear dll_PyErr_Clear | |
4145 | 152 # define PyErr_PrintEx dll_PyErr_PrintEx |
7 | 153 # define PyErr_NoMemory dll_PyErr_NoMemory |
154 # define PyErr_Occurred dll_PyErr_Occurred | |
155 # define PyErr_SetNone dll_PyErr_SetNone | |
156 # define PyErr_SetString dll_PyErr_SetString | |
157 # define PyEval_InitThreads dll_PyEval_InitThreads | |
158 # define PyEval_RestoreThread dll_PyEval_RestoreThread | |
159 # define PyEval_SaveThread dll_PyEval_SaveThread | |
160 # ifdef PY_CAN_RECURSE | |
161 # define PyGILState_Ensure dll_PyGILState_Ensure | |
162 # define PyGILState_Release dll_PyGILState_Release | |
163 # endif | |
164 # define PyInt_AsLong dll_PyInt_AsLong | |
165 # define PyInt_FromLong dll_PyInt_FromLong | |
3618 | 166 # define PyLong_AsLong dll_PyLong_AsLong |
167 # define PyLong_FromLong dll_PyLong_FromLong | |
3828 | 168 # define PyBool_Type (*dll_PyBool_Type) |
7 | 169 # define PyInt_Type (*dll_PyInt_Type) |
3618 | 170 # define PyLong_Type (*dll_PyLong_Type) |
7 | 171 # define PyList_GetItem dll_PyList_GetItem |
637 | 172 # define PyList_Append dll_PyList_Append |
7 | 173 # define PyList_New dll_PyList_New |
174 # define PyList_SetItem dll_PyList_SetItem | |
175 # define PyList_Size dll_PyList_Size | |
176 # define PyList_Type (*dll_PyList_Type) | |
3618 | 177 # define PySequence_Check dll_PySequence_Check |
178 # define PySequence_Size dll_PySequence_Size | |
179 # define PySequence_GetItem dll_PySequence_GetItem | |
180 # define PyTuple_Size dll_PyTuple_Size | |
181 # define PyTuple_GetItem dll_PyTuple_GetItem | |
182 # define PyTuple_Type (*dll_PyTuple_Type) | |
7 | 183 # define PyImport_ImportModule dll_PyImport_ImportModule |
637 | 184 # define PyDict_New dll_PyDict_New |
7 | 185 # define PyDict_GetItemString dll_PyDict_GetItemString |
3618 | 186 # define PyDict_Next dll_PyDict_Next |
187 # ifdef PyMapping_Items | |
188 # define PY_NO_MAPPING_ITEMS | |
189 # else | |
190 # define PyMapping_Items dll_PyMapping_Items | |
191 # endif | |
192 # define PyObject_CallMethod dll_PyObject_CallMethod | |
193 # define PyMapping_Check dll_PyMapping_Check | |
194 # define PyIter_Next dll_PyIter_Next | |
7 | 195 # define PyModule_GetDict dll_PyModule_GetDict |
196 # define PyRun_SimpleString dll_PyRun_SimpleString | |
3618 | 197 # define PyRun_String dll_PyRun_String |
7 | 198 # define PyString_AsString dll_PyString_AsString |
3798 | 199 # define PyString_AsStringAndSize dll_PyString_AsStringAndSize |
7 | 200 # define PyString_FromString dll_PyString_FromString |
201 # define PyString_FromStringAndSize dll_PyString_FromStringAndSize | |
202 # define PyString_Size dll_PyString_Size | |
203 # define PyString_Type (*dll_PyString_Type) | |
3618 | 204 # define PyUnicode_Type (*dll_PyUnicode_Type) |
3642 | 205 # undef PyUnicode_AsEncodedString |
206 # define PyUnicode_AsEncodedString py_PyUnicode_AsEncodedString | |
3618 | 207 # define PyFloat_AsDouble dll_PyFloat_AsDouble |
208 # define PyFloat_FromDouble dll_PyFloat_FromDouble | |
209 # define PyFloat_Type (*dll_PyFloat_Type) | |
210 # define PyImport_AddModule (*dll_PyImport_AddModule) | |
7 | 211 # define PySys_SetObject dll_PySys_SetObject |
212 # define PySys_SetArgv dll_PySys_SetArgv | |
213 # define PyType_Type (*dll_PyType_Type) | |
2737 | 214 # define PyType_Ready (*dll_PyType_Ready) |
7 | 215 # define Py_BuildValue dll_Py_BuildValue |
216 # define Py_FindMethod dll_Py_FindMethod | |
217 # define Py_InitModule4 dll_Py_InitModule4 | |
2641 | 218 # define Py_SetPythonHome dll_Py_SetPythonHome |
7 | 219 # define Py_Initialize dll_Py_Initialize |
242 | 220 # define Py_Finalize dll_Py_Finalize |
221 # define Py_IsInitialized dll_Py_IsInitialized | |
7 | 222 # define _PyObject_New dll__PyObject_New |
3646 | 223 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02070000 |
224 # define _PyObject_NextNotImplemented (*dll__PyObject_NextNotImplemented) | |
225 # endif | |
7 | 226 # define _Py_NoneStruct (*dll__Py_NoneStruct) |
3828 | 227 # define _Py_ZeroStruct (*dll__Py_ZeroStruct) |
228 # define _Py_TrueStruct (*dll__Py_TrueStruct) | |
7 | 229 # define PyObject_Init dll__PyObject_Init |
3618 | 230 # define PyObject_GetIter dll_PyObject_GetIter |
7 | 231 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02020000 |
232 # define PyType_IsSubtype dll_PyType_IsSubtype | |
233 # endif | |
234 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02030000 | |
235 # define PyObject_Malloc dll_PyObject_Malloc | |
236 # define PyObject_Free dll_PyObject_Free | |
237 # endif | |
3638 | 238 # ifdef PY_USE_CAPSULE |
239 # define PyCapsule_New dll_PyCapsule_New | |
240 # define PyCapsule_GetPointer dll_PyCapsule_GetPointer | |
241 # else | |
242 # define PyCObject_FromVoidPtr dll_PyCObject_FromVoidPtr | |
243 # define PyCObject_AsVoidPtr dll_PyCObject_AsVoidPtr | |
244 # endif | |
7 | 245 |
246 /* | |
247 * Pointers for dynamic link | |
248 */ | |
249 static int(*dll_PyArg_Parse)(PyObject *, char *, ...); | |
250 static int(*dll_PyArg_ParseTuple)(PyObject *, char *, ...); | |
2894 | 251 static int(*dll_PyMem_Free)(void *); |
3618 | 252 static void* (*dll_PyMem_Malloc)(size_t); |
7 | 253 static int(*dll_PyDict_SetItemString)(PyObject *dp, char *key, PyObject *item); |
254 static int(*dll_PyErr_BadArgument)(void); | |
255 static void(*dll_PyErr_Clear)(void); | |
4145 | 256 static void(*dll_PyErr_PrintEx)(int); |
7 | 257 static PyObject*(*dll_PyErr_NoMemory)(void); |
258 static PyObject*(*dll_PyErr_Occurred)(void); | |
259 static void(*dll_PyErr_SetNone)(PyObject *); | |
260 static void(*dll_PyErr_SetString)(PyObject *, const char *); | |
261 static void(*dll_PyEval_InitThreads)(void); | |
262 static void(*dll_PyEval_RestoreThread)(PyThreadState *); | |
263 static PyThreadState*(*dll_PyEval_SaveThread)(void); | |
264 # ifdef PY_CAN_RECURSE | |
265 static PyGILState_STATE (*dll_PyGILState_Ensure)(void); | |
266 static void (*dll_PyGILState_Release)(PyGILState_STATE); | |
3618 | 267 # endif |
7 | 268 static long(*dll_PyInt_AsLong)(PyObject *); |
269 static PyObject*(*dll_PyInt_FromLong)(long); | |
3618 | 270 static long(*dll_PyLong_AsLong)(PyObject *); |
271 static PyObject*(*dll_PyLong_FromLong)(long); | |
3828 | 272 static PyTypeObject* dll_PyBool_Type; |
7 | 273 static PyTypeObject* dll_PyInt_Type; |
3618 | 274 static PyTypeObject* dll_PyLong_Type; |
1594 | 275 static PyObject*(*dll_PyList_GetItem)(PyObject *, PyInt); |
637 | 276 static PyObject*(*dll_PyList_Append)(PyObject *, PyObject *); |
1594 | 277 static PyObject*(*dll_PyList_New)(PyInt size); |
278 static int(*dll_PyList_SetItem)(PyObject *, PyInt, PyObject *); | |
279 static PyInt(*dll_PyList_Size)(PyObject *); | |
7 | 280 static PyTypeObject* dll_PyList_Type; |
3618 | 281 static int (*dll_PySequence_Check)(PyObject *); |
282 static PyInt(*dll_PySequence_Size)(PyObject *); | |
283 static PyObject*(*dll_PySequence_GetItem)(PyObject *, PyInt); | |
284 static PyInt(*dll_PyTuple_Size)(PyObject *); | |
285 static PyObject*(*dll_PyTuple_GetItem)(PyObject *, PyInt); | |
286 static PyTypeObject* dll_PyTuple_Type; | |
7 | 287 static PyObject*(*dll_PyImport_ImportModule)(const char *); |
637 | 288 static PyObject*(*dll_PyDict_New)(void); |
7 | 289 static PyObject*(*dll_PyDict_GetItemString)(PyObject *, const char *); |
3618 | 290 static int (*dll_PyDict_Next)(PyObject *, Py_ssize_t *, PyObject **, PyObject **); |
291 # ifndef PY_NO_MAPPING_ITEMS | |
292 static PyObject* (*dll_PyMapping_Items)(PyObject *); | |
293 # endif | |
294 static PyObject* (*dll_PyObject_CallMethod)(PyObject *, char *, PyObject *); | |
295 static int (*dll_PyMapping_Check)(PyObject *); | |
296 static PyObject* (*dll_PyIter_Next)(PyObject *); | |
7 | 297 static PyObject*(*dll_PyModule_GetDict)(PyObject *); |
298 static int(*dll_PyRun_SimpleString)(char *); | |
3618 | 299 static PyObject *(*dll_PyRun_String)(char *, int, PyObject *, PyObject *); |
7 | 300 static char*(*dll_PyString_AsString)(PyObject *); |
3798 | 301 static int(*dll_PyString_AsStringAndSize)(PyObject *, char **, int *); |
7 | 302 static PyObject*(*dll_PyString_FromString)(const char *); |
1594 | 303 static PyObject*(*dll_PyString_FromStringAndSize)(const char *, PyInt); |
304 static PyInt(*dll_PyString_Size)(PyObject *); | |
7 | 305 static PyTypeObject* dll_PyString_Type; |
3618 | 306 static PyTypeObject* dll_PyUnicode_Type; |
3642 | 307 static PyObject *(*py_PyUnicode_AsEncodedString)(PyObject *, char *, char *); |
3618 | 308 static double(*dll_PyFloat_AsDouble)(PyObject *); |
309 static PyObject*(*dll_PyFloat_FromDouble)(double); | |
310 static PyTypeObject* dll_PyFloat_Type; | |
7 | 311 static int(*dll_PySys_SetObject)(char *, PyObject *); |
312 static int(*dll_PySys_SetArgv)(int, char **); | |
313 static PyTypeObject* dll_PyType_Type; | |
2737 | 314 static int (*dll_PyType_Ready)(PyTypeObject *type); |
7 | 315 static PyObject*(*dll_Py_BuildValue)(char *, ...); |
316 static PyObject*(*dll_Py_FindMethod)(struct PyMethodDef[], PyObject *, char *); | |
317 static PyObject*(*dll_Py_InitModule4)(char *, struct PyMethodDef *, char *, PyObject *, int); | |
3618 | 318 static PyObject*(*dll_PyImport_AddModule)(char *); |
2641 | 319 static void(*dll_Py_SetPythonHome)(char *home); |
7 | 320 static void(*dll_Py_Initialize)(void); |
242 | 321 static void(*dll_Py_Finalize)(void); |
322 static int(*dll_Py_IsInitialized)(void); | |
7 | 323 static PyObject*(*dll__PyObject_New)(PyTypeObject *, PyObject *); |
324 static PyObject*(*dll__PyObject_Init)(PyObject *, PyTypeObject *); | |
3618 | 325 static PyObject* (*dll_PyObject_GetIter)(PyObject *); |
3646 | 326 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02070000 |
3618 | 327 static iternextfunc dll__PyObject_NextNotImplemented; |
3646 | 328 # endif |
7 | 329 static PyObject* dll__Py_NoneStruct; |
3828 | 330 static PyObject* _Py_ZeroStruct; |
331 static PyObject* dll__Py_TrueStruct; | |
7 | 332 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02020000 |
333 static int (*dll_PyType_IsSubtype)(PyTypeObject *, PyTypeObject *); | |
334 # endif | |
335 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02030000 | |
336 static void* (*dll_PyObject_Malloc)(size_t); | |
337 static void (*dll_PyObject_Free)(void*); | |
338 # endif | |
3638 | 339 # ifdef PY_USE_CAPSULE |
3618 | 340 static PyObject* (*dll_PyCapsule_New)(void *, char *, PyCapsule_Destructor); |
341 static void* (*dll_PyCapsule_GetPointer)(PyObject *, char *); | |
3638 | 342 # else |
3648 | 343 static PyObject* (*dll_PyCObject_FromVoidPtr)(void *cobj, void (*destr)(void *)); |
344 static void* (*dll_PyCObject_AsVoidPtr)(PyObject *); | |
3638 | 345 # endif |
7 | 346 |
347 static HINSTANCE hinstPython = 0; /* Instance of python.dll */ | |
348 | |
349 /* Imported exception objects */ | |
350 static PyObject *imp_PyExc_AttributeError; | |
351 static PyObject *imp_PyExc_IndexError; | |
4315 | 352 static PyObject *imp_PyExc_KeyError; |
7 | 353 static PyObject *imp_PyExc_KeyboardInterrupt; |
354 static PyObject *imp_PyExc_TypeError; | |
355 static PyObject *imp_PyExc_ValueError; | |
356 | |
357 # define PyExc_AttributeError imp_PyExc_AttributeError | |
358 # define PyExc_IndexError imp_PyExc_IndexError | |
4315 | 359 # define PyExc_KeyError imp_PyExc_KeyError |
7 | 360 # define PyExc_KeyboardInterrupt imp_PyExc_KeyboardInterrupt |
361 # define PyExc_TypeError imp_PyExc_TypeError | |
362 # define PyExc_ValueError imp_PyExc_ValueError | |
363 | |
364 /* | |
365 * Table of name to function pointer of python. | |
366 */ | |
367 # define PYTHON_PROC FARPROC | |
368 static struct | |
369 { | |
370 char *name; | |
371 PYTHON_PROC *ptr; | |
372 } python_funcname_table[] = | |
373 { | |
3806 | 374 #ifndef PY_SSIZE_T_CLEAN |
7 | 375 {"PyArg_Parse", (PYTHON_PROC*)&dll_PyArg_Parse}, |
376 {"PyArg_ParseTuple", (PYTHON_PROC*)&dll_PyArg_ParseTuple}, | |
3806 | 377 {"Py_BuildValue", (PYTHON_PROC*)&dll_Py_BuildValue}, |
378 #else | |
379 {"_PyArg_Parse_SizeT", (PYTHON_PROC*)&dll_PyArg_Parse}, | |
380 {"_PyArg_ParseTuple_SizeT", (PYTHON_PROC*)&dll_PyArg_ParseTuple}, | |
381 {"_Py_BuildValue_SizeT", (PYTHON_PROC*)&dll_Py_BuildValue}, | |
382 #endif | |
2894 | 383 {"PyMem_Free", (PYTHON_PROC*)&dll_PyMem_Free}, |
3618 | 384 {"PyMem_Malloc", (PYTHON_PROC*)&dll_PyMem_Malloc}, |
7 | 385 {"PyDict_SetItemString", (PYTHON_PROC*)&dll_PyDict_SetItemString}, |
386 {"PyErr_BadArgument", (PYTHON_PROC*)&dll_PyErr_BadArgument}, | |
387 {"PyErr_Clear", (PYTHON_PROC*)&dll_PyErr_Clear}, | |
4145 | 388 {"PyErr_PrintEx", (PYTHON_PROC*)&dll_PyErr_PrintEx}, |
7 | 389 {"PyErr_NoMemory", (PYTHON_PROC*)&dll_PyErr_NoMemory}, |
390 {"PyErr_Occurred", (PYTHON_PROC*)&dll_PyErr_Occurred}, | |
391 {"PyErr_SetNone", (PYTHON_PROC*)&dll_PyErr_SetNone}, | |
392 {"PyErr_SetString", (PYTHON_PROC*)&dll_PyErr_SetString}, | |
393 {"PyEval_InitThreads", (PYTHON_PROC*)&dll_PyEval_InitThreads}, | |
394 {"PyEval_RestoreThread", (PYTHON_PROC*)&dll_PyEval_RestoreThread}, | |
395 {"PyEval_SaveThread", (PYTHON_PROC*)&dll_PyEval_SaveThread}, | |
396 # ifdef PY_CAN_RECURSE | |
397 {"PyGILState_Ensure", (PYTHON_PROC*)&dll_PyGILState_Ensure}, | |
398 {"PyGILState_Release", (PYTHON_PROC*)&dll_PyGILState_Release}, | |
399 # endif | |
400 {"PyInt_AsLong", (PYTHON_PROC*)&dll_PyInt_AsLong}, | |
401 {"PyInt_FromLong", (PYTHON_PROC*)&dll_PyInt_FromLong}, | |
3618 | 402 {"PyLong_AsLong", (PYTHON_PROC*)&dll_PyLong_AsLong}, |
403 {"PyLong_FromLong", (PYTHON_PROC*)&dll_PyLong_FromLong}, | |
3828 | 404 {"PyBool_Type", (PYTHON_PROC*)&dll_PyBool_Type}, |
7 | 405 {"PyInt_Type", (PYTHON_PROC*)&dll_PyInt_Type}, |
3618 | 406 {"PyLong_Type", (PYTHON_PROC*)&dll_PyLong_Type}, |
7 | 407 {"PyList_GetItem", (PYTHON_PROC*)&dll_PyList_GetItem}, |
637 | 408 {"PyList_Append", (PYTHON_PROC*)&dll_PyList_Append}, |
7 | 409 {"PyList_New", (PYTHON_PROC*)&dll_PyList_New}, |
410 {"PyList_SetItem", (PYTHON_PROC*)&dll_PyList_SetItem}, | |
411 {"PyList_Size", (PYTHON_PROC*)&dll_PyList_Size}, | |
412 {"PyList_Type", (PYTHON_PROC*)&dll_PyList_Type}, | |
3618 | 413 {"PySequence_GetItem", (PYTHON_PROC*)&dll_PySequence_GetItem}, |
414 {"PySequence_Size", (PYTHON_PROC*)&dll_PySequence_Size}, | |
415 {"PySequence_Check", (PYTHON_PROC*)&dll_PySequence_Check}, | |
416 {"PyTuple_GetItem", (PYTHON_PROC*)&dll_PyTuple_GetItem}, | |
417 {"PyTuple_Size", (PYTHON_PROC*)&dll_PyTuple_Size}, | |
418 {"PyTuple_Type", (PYTHON_PROC*)&dll_PyTuple_Type}, | |
7 | 419 {"PyImport_ImportModule", (PYTHON_PROC*)&dll_PyImport_ImportModule}, |
420 {"PyDict_GetItemString", (PYTHON_PROC*)&dll_PyDict_GetItemString}, | |
3618 | 421 {"PyDict_Next", (PYTHON_PROC*)&dll_PyDict_Next}, |
637 | 422 {"PyDict_New", (PYTHON_PROC*)&dll_PyDict_New}, |
3618 | 423 # ifndef PY_NO_MAPPING_ITEMS |
424 {"PyMapping_Items", (PYTHON_PROC*)&dll_PyMapping_Items}, | |
425 # endif | |
426 {"PyObject_CallMethod", (PYTHON_PROC*)&dll_PyObject_CallMethod}, | |
427 {"PyMapping_Check", (PYTHON_PROC*)&dll_PyMapping_Check}, | |
428 {"PyIter_Next", (PYTHON_PROC*)&dll_PyIter_Next}, | |
7 | 429 {"PyModule_GetDict", (PYTHON_PROC*)&dll_PyModule_GetDict}, |
430 {"PyRun_SimpleString", (PYTHON_PROC*)&dll_PyRun_SimpleString}, | |
3618 | 431 {"PyRun_String", (PYTHON_PROC*)&dll_PyRun_String}, |
7 | 432 {"PyString_AsString", (PYTHON_PROC*)&dll_PyString_AsString}, |
3798 | 433 {"PyString_AsStringAndSize", (PYTHON_PROC*)&dll_PyString_AsStringAndSize}, |
7 | 434 {"PyString_FromString", (PYTHON_PROC*)&dll_PyString_FromString}, |
435 {"PyString_FromStringAndSize", (PYTHON_PROC*)&dll_PyString_FromStringAndSize}, | |
436 {"PyString_Size", (PYTHON_PROC*)&dll_PyString_Size}, | |
437 {"PyString_Type", (PYTHON_PROC*)&dll_PyString_Type}, | |
3618 | 438 {"PyUnicode_Type", (PYTHON_PROC*)&dll_PyUnicode_Type}, |
439 {"PyFloat_Type", (PYTHON_PROC*)&dll_PyFloat_Type}, | |
440 {"PyFloat_AsDouble", (PYTHON_PROC*)&dll_PyFloat_AsDouble}, | |
441 {"PyFloat_FromDouble", (PYTHON_PROC*)&dll_PyFloat_FromDouble}, | |
442 {"PyImport_AddModule", (PYTHON_PROC*)&dll_PyImport_AddModule}, | |
7 | 443 {"PySys_SetObject", (PYTHON_PROC*)&dll_PySys_SetObject}, |
444 {"PySys_SetArgv", (PYTHON_PROC*)&dll_PySys_SetArgv}, | |
445 {"PyType_Type", (PYTHON_PROC*)&dll_PyType_Type}, | |
2737 | 446 {"PyType_Ready", (PYTHON_PROC*)&dll_PyType_Ready}, |
7 | 447 {"Py_FindMethod", (PYTHON_PROC*)&dll_Py_FindMethod}, |
3638 | 448 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02050000 \ |
449 && SIZEOF_SIZE_T != SIZEOF_INT | |
1607 | 450 {"Py_InitModule4_64", (PYTHON_PROC*)&dll_Py_InitModule4}, |
451 # else | |
7 | 452 {"Py_InitModule4", (PYTHON_PROC*)&dll_Py_InitModule4}, |
1607 | 453 # endif |
2641 | 454 {"Py_SetPythonHome", (PYTHON_PROC*)&dll_Py_SetPythonHome}, |
7 | 455 {"Py_Initialize", (PYTHON_PROC*)&dll_Py_Initialize}, |
242 | 456 {"Py_Finalize", (PYTHON_PROC*)&dll_Py_Finalize}, |
457 {"Py_IsInitialized", (PYTHON_PROC*)&dll_Py_IsInitialized}, | |
7 | 458 {"_PyObject_New", (PYTHON_PROC*)&dll__PyObject_New}, |
459 {"PyObject_Init", (PYTHON_PROC*)&dll__PyObject_Init}, | |
3618 | 460 {"PyObject_GetIter", (PYTHON_PROC*)&dll_PyObject_GetIter}, |
3646 | 461 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02070000 |
3618 | 462 {"_PyObject_NextNotImplemented", (PYTHON_PROC*)&dll__PyObject_NextNotImplemented}, |
3646 | 463 # endif |
7 | 464 {"_Py_NoneStruct", (PYTHON_PROC*)&dll__Py_NoneStruct}, |
3828 | 465 {"_Py_ZeroStruct", (PYTHON_PROC*)&dll__Py_ZeroStruct}, |
466 {"_Py_TrueStruct", (PYTHON_PROC*)&dll__Py_TrueStruct}, | |
7 | 467 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02020000 |
468 {"PyType_IsSubtype", (PYTHON_PROC*)&dll_PyType_IsSubtype}, | |
469 # endif | |
470 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02030000 | |
471 {"PyObject_Malloc", (PYTHON_PROC*)&dll_PyObject_Malloc}, | |
472 {"PyObject_Free", (PYTHON_PROC*)&dll_PyObject_Free}, | |
473 # endif | |
3638 | 474 # ifdef PY_USE_CAPSULE |
3618 | 475 {"PyCapsule_New", (PYTHON_PROC*)&dll_PyCapsule_New}, |
476 {"PyCapsule_GetPointer", (PYTHON_PROC*)&dll_PyCapsule_GetPointer}, | |
3638 | 477 # else |
478 {"PyCObject_FromVoidPtr", (PYTHON_PROC*)&dll_PyCObject_FromVoidPtr}, | |
479 {"PyCObject_AsVoidPtr", (PYTHON_PROC*)&dll_PyCObject_AsVoidPtr}, | |
480 # endif | |
7 | 481 {"", NULL}, |
482 }; | |
483 | |
484 /* | |
485 * Free python.dll | |
486 */ | |
487 static void | |
488 end_dynamic_python(void) | |
489 { | |
490 if (hinstPython) | |
491 { | |
2329
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
492 close_dll(hinstPython); |
7 | 493 hinstPython = 0; |
494 } | |
495 } | |
496 | |
497 /* | |
498 * Load library and get all pointers. | |
499 * Parameter 'libname' provides name of DLL. | |
500 * Return OK or FAIL. | |
501 */ | |
502 static int | |
503 python_runtime_link_init(char *libname, int verbose) | |
504 { | |
505 int i; | |
3642 | 506 void *ucs_as_encoded_string; |
7 | 507 |
2641 | 508 #if !(defined(PY_NO_RTLD_GLOBAL) && defined(PY3_NO_RTLD_GLOBAL)) && defined(UNIX) && defined(FEAT_PYTHON3) |
2554
7abef60aca22
Add a configure check for RTLD_GLOBAL. (James Vega, Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2528
diff
changeset
|
509 /* Can't have Python and Python3 loaded at the same time. |
7abef60aca22
Add a configure check for RTLD_GLOBAL. (James Vega, Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2528
diff
changeset
|
510 * It cause a crash, because RTLD_GLOBAL is needed for |
7abef60aca22
Add a configure check for RTLD_GLOBAL. (James Vega, Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2528
diff
changeset
|
511 * standard C extension libraries of one or both python versions. */ |
2384
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
512 if (python3_loaded()) |
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
513 { |
3032 | 514 if (verbose) |
515 EMSG(_("E836: This Vim cannot execute :python after using :py3")); | |
2384
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
516 return FAIL; |
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
517 } |
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
518 #endif |
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
519 |
7 | 520 if (hinstPython) |
521 return OK; | |
2329
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
522 hinstPython = load_dll(libname); |
7 | 523 if (!hinstPython) |
524 { | |
525 if (verbose) | |
526 EMSG2(_(e_loadlib), libname); | |
527 return FAIL; | |
528 } | |
529 | |
530 for (i = 0; python_funcname_table[i].ptr; ++i) | |
531 { | |
2329
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
532 if ((*python_funcname_table[i].ptr = symbol_from_dll(hinstPython, |
7 | 533 python_funcname_table[i].name)) == NULL) |
534 { | |
2329
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
535 close_dll(hinstPython); |
7 | 536 hinstPython = 0; |
537 if (verbose) | |
538 EMSG2(_(e_loadfunc), python_funcname_table[i].name); | |
539 return FAIL; | |
540 } | |
541 } | |
3642 | 542 |
543 /* Load unicode functions separately as only the ucs2 or the ucs4 functions | |
544 * will be present in the library. */ | |
545 ucs_as_encoded_string = symbol_from_dll(hinstPython, | |
546 "PyUnicodeUCS2_AsEncodedString"); | |
547 if (ucs_as_encoded_string == NULL) | |
548 ucs_as_encoded_string = symbol_from_dll(hinstPython, | |
549 "PyUnicodeUCS4_AsEncodedString"); | |
550 if (ucs_as_encoded_string != NULL) | |
551 py_PyUnicode_AsEncodedString = ucs_as_encoded_string; | |
552 else | |
553 { | |
554 close_dll(hinstPython); | |
555 hinstPython = 0; | |
556 if (verbose) | |
557 EMSG2(_(e_loadfunc), "PyUnicode_UCSX_*"); | |
558 return FAIL; | |
559 } | |
560 | |
7 | 561 return OK; |
562 } | |
563 | |
564 /* | |
565 * If python is enabled (there is installed python on Windows system) return | |
566 * TRUE, else FALSE. | |
567 */ | |
568 int | |
1607 | 569 python_enabled(int verbose) |
7 | 570 { |
571 return python_runtime_link_init(DYNAMIC_PYTHON_DLL, verbose) == OK; | |
572 } | |
573 | |
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
574 /* |
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
575 * Load the standard Python exceptions - don't import the symbols from the |
7 | 576 * DLL, as this can cause errors (importing data symbols is not reliable). |
577 */ | |
578 static void | |
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
579 get_exceptions(void) |
7 | 580 { |
581 PyObject *exmod = PyImport_ImportModule("exceptions"); | |
582 PyObject *exdict = PyModule_GetDict(exmod); | |
583 imp_PyExc_AttributeError = PyDict_GetItemString(exdict, "AttributeError"); | |
584 imp_PyExc_IndexError = PyDict_GetItemString(exdict, "IndexError"); | |
4315 | 585 imp_PyExc_KeyError = PyDict_GetItemString(exdict, "KeyError"); |
7 | 586 imp_PyExc_KeyboardInterrupt = PyDict_GetItemString(exdict, "KeyboardInterrupt"); |
587 imp_PyExc_TypeError = PyDict_GetItemString(exdict, "TypeError"); | |
588 imp_PyExc_ValueError = PyDict_GetItemString(exdict, "ValueError"); | |
589 Py_XINCREF(imp_PyExc_AttributeError); | |
590 Py_XINCREF(imp_PyExc_IndexError); | |
4315 | 591 Py_XINCREF(imp_PyExc_KeyError); |
7 | 592 Py_XINCREF(imp_PyExc_KeyboardInterrupt); |
593 Py_XINCREF(imp_PyExc_TypeError); | |
594 Py_XINCREF(imp_PyExc_ValueError); | |
595 Py_XDECREF(exmod); | |
596 } | |
597 #endif /* DYNAMIC_PYTHON */ | |
598 | |
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
599 static PyObject *BufferNew (buf_T *); |
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
600 static PyObject *WindowNew(win_T *); |
3618 | 601 static PyObject *DictionaryNew(dict_T *); |
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
602 static PyObject *LineToString(const char *); |
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
603 |
3618 | 604 static int initialised = 0; |
605 #define PYINITIALISED initialised | |
606 | |
607 #define DICTKEY_GET(err) \ | |
608 if (!PyString_Check(keyObject)) \ | |
609 { \ | |
610 PyErr_SetString(PyExc_TypeError, _("only string keys are allowed")); \ | |
611 return err; \ | |
612 } \ | |
3798 | 613 if (PyString_AsStringAndSize(keyObject, (char **) &key, NULL) == -1) \ |
614 return err; | |
615 | |
3618 | 616 #define DICTKEY_UNREF |
617 #define DICTKEY_DECL | |
618 | |
4319 | 619 #define DESTRUCTOR_FINISH(self) Py_DECREF(self); |
620 | |
621 static PyObject *OutputGetattr(PyObject *, char *); | |
622 static PyObject *BufferGetattr(PyObject *, char *); | |
623 static PyObject *WindowGetattr(PyObject *, char *); | |
624 static PyObject *RangeGetattr(PyObject *, char *); | |
625 static PyObject *DictionaryGetattr(PyObject *, char*); | |
626 static PyObject *ListGetattr(PyObject *, char *); | |
627 static PyObject *FunctionGetattr(PyObject *, char *); | |
628 | |
2399
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
629 /* |
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
630 * Include the code shared with if_python3.c |
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
631 */ |
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
632 #include "if_py_both.h" |
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
633 |
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
634 |
7 | 635 /****************************************************** |
636 * Internal function prototypes. | |
637 */ | |
638 | |
3618 | 639 static PyObject *globals; |
640 | |
7 | 641 static void PythonIO_Flush(void); |
642 static int PythonIO_Init(void); | |
643 static int PythonMod_Init(void); | |
644 | |
645 /* Utility functions for the vim/python interface | |
646 * ---------------------------------------------- | |
647 */ | |
648 | |
1607 | 649 static int SetBufferLineList(buf_T *, PyInt, PyInt, PyObject *, PyInt *); |
7 | 650 |
651 | |
652 /****************************************************** | |
653 * 1. Python interpreter main program. | |
654 */ | |
655 | |
656 #if PYTHON_API_VERSION < 1007 /* Python 1.4 */ | |
657 typedef PyObject PyThreadState; | |
323 | 658 #endif |
659 | |
660 #ifdef PY_CAN_RECURSE | |
661 static PyGILState_STATE pygilstate = PyGILState_UNLOCKED; | |
662 #else | |
36 | 663 static PyThreadState *saved_python_thread = NULL; |
323 | 664 #endif |
7 | 665 |
666 /* | |
667 * Suspend a thread of the Python interpreter, other threads are allowed to | |
668 * run. | |
669 */ | |
36 | 670 static void |
671 Python_SaveThread(void) | |
7 | 672 { |
323 | 673 #ifdef PY_CAN_RECURSE |
674 PyGILState_Release(pygilstate); | |
675 #else | |
7 | 676 saved_python_thread = PyEval_SaveThread(); |
323 | 677 #endif |
7 | 678 } |
679 | |
680 /* | |
681 * Restore a thread of the Python interpreter, waits for other threads to | |
682 * block. | |
683 */ | |
36 | 684 static void |
685 Python_RestoreThread(void) | |
7 | 686 { |
323 | 687 #ifdef PY_CAN_RECURSE |
688 pygilstate = PyGILState_Ensure(); | |
689 #else | |
7 | 690 PyEval_RestoreThread(saved_python_thread); |
691 saved_python_thread = NULL; | |
323 | 692 #endif |
7 | 693 } |
694 | |
695 void | |
696 python_end() | |
697 { | |
557 | 698 static int recurse = 0; |
699 | |
700 /* If a crash occurs while doing this, don't try again. */ | |
701 if (recurse != 0) | |
702 return; | |
703 | |
704 ++recurse; | |
705 | |
7 | 706 #ifdef DYNAMIC_PYTHON |
242 | 707 if (hinstPython && Py_IsInitialized()) |
323 | 708 { |
856 | 709 Python_RestoreThread(); /* enter python */ |
710 Py_Finalize(); | |
323 | 711 } |
7 | 712 end_dynamic_python(); |
242 | 713 #else |
714 if (Py_IsInitialized()) | |
323 | 715 { |
856 | 716 Python_RestoreThread(); /* enter python */ |
717 Py_Finalize(); | |
323 | 718 } |
7 | 719 #endif |
557 | 720 |
721 --recurse; | |
7 | 722 } |
723 | |
2384
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
724 #if (defined(DYNAMIC_PYTHON) && defined(FEAT_PYTHON3)) || defined(PROTO) |
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
725 int |
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
726 python_loaded() |
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
727 { |
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
728 return (hinstPython != 0); |
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
729 } |
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
730 #endif |
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
731 |
7 | 732 static int |
733 Python_Init(void) | |
734 { | |
735 if (!initialised) | |
736 { | |
737 #ifdef DYNAMIC_PYTHON | |
738 if (!python_enabled(TRUE)) | |
739 { | |
740 EMSG(_("E263: Sorry, this command is disabled, the Python library could not be loaded.")); | |
741 goto fail; | |
742 } | |
743 #endif | |
744 | |
2641 | 745 #ifdef PYTHON_HOME |
746 Py_SetPythonHome(PYTHON_HOME); | |
747 #endif | |
748 | |
2399
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
749 init_structs(); |
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
750 |
7 | 751 #if !defined(MACOS) || defined(MACOS_X_UNIX) |
752 Py_Initialize(); | |
753 #else | |
754 PyMac_Initialize(); | |
755 #endif | |
4063 | 756 /* Initialise threads, and below save the state using |
4109 | 757 * PyEval_SaveThread. Without the call to PyEval_SaveThread, thread |
4063 | 758 * specific state (such as the system trace hook), will be lost |
759 * between invocations of Python code. */ | |
7 | 760 PyEval_InitThreads(); |
761 #ifdef DYNAMIC_PYTHON | |
762 get_exceptions(); | |
763 #endif | |
764 | |
765 if (PythonIO_Init()) | |
766 goto fail; | |
767 | |
768 if (PythonMod_Init()) | |
769 goto fail; | |
770 | |
3618 | 771 globals = PyModule_GetDict(PyImport_AddModule("__main__")); |
772 | |
1748 | 773 /* Remove the element from sys.path that was added because of our |
774 * argv[0] value in PythonMod_Init(). Previously we used an empty | |
775 * string, but dependinding on the OS we then get an empty entry or | |
776 * the current directory in sys.path. */ | |
777 PyRun_SimpleString("import sys; sys.path = filter(lambda x: x != '/must>not&exist', sys.path)"); | |
778 | |
4109 | 779 /* lock is created and acquired in PyEval_InitThreads() and thread |
780 * state is created in Py_Initialize() | |
781 * there _PyGILState_NoteThreadState() also sets gilcounter to 1 | |
782 * (python must have threads enabled!) | |
783 * so the following does both: unlock GIL and save thread state in TLS | |
784 * without deleting thread state | |
785 */ | |
786 PyEval_SaveThread(); | |
7 | 787 |
788 initialised = 1; | |
789 } | |
790 | |
791 return 0; | |
792 | |
793 fail: | |
794 /* We call PythonIO_Flush() here to print any Python errors. | |
795 * This is OK, as it is possible to call this function even | |
796 * if PythonIO_Init() has not completed successfully (it will | |
797 * not do anything in this case). | |
798 */ | |
799 PythonIO_Flush(); | |
800 return -1; | |
801 } | |
802 | |
803 /* | |
804 * External interface | |
805 */ | |
806 static void | |
3618 | 807 DoPythonCommand(exarg_T *eap, const char *cmd, typval_T *rettv) |
7 | 808 { |
323 | 809 #ifndef PY_CAN_RECURSE |
7 | 810 static int recursive = 0; |
811 #endif | |
812 #if defined(MACOS) && !defined(MACOS_X_UNIX) | |
813 GrafPtr oldPort; | |
814 #endif | |
815 #if defined(HAVE_LOCALE_H) || defined(X_LOCALE) | |
816 char *saved_locale; | |
817 #endif | |
818 | |
819 #ifndef PY_CAN_RECURSE | |
820 if (recursive) | |
821 { | |
822 EMSG(_("E659: Cannot invoke Python recursively")); | |
823 return; | |
824 } | |
825 ++recursive; | |
826 #endif | |
827 | |
828 #if defined(MACOS) && !defined(MACOS_X_UNIX) | |
829 GetPort(&oldPort); | |
830 /* Check if the Python library is available */ | |
831 if ((Ptr)PyMac_Initialize == (Ptr)kUnresolvedCFragSymbolAddress) | |
832 goto theend; | |
833 #endif | |
834 if (Python_Init()) | |
835 goto theend; | |
836 | |
3618 | 837 if (rettv == NULL) |
838 { | |
839 RangeStart = eap->line1; | |
840 RangeEnd = eap->line2; | |
841 } | |
842 else | |
843 { | |
844 RangeStart = (PyInt) curwin->w_cursor.lnum; | |
845 RangeEnd = RangeStart; | |
846 } | |
7 | 847 Python_Release_Vim(); /* leave vim */ |
848 | |
849 #if defined(HAVE_LOCALE_H) || defined(X_LOCALE) | |
850 /* Python only works properly when the LC_NUMERIC locale is "C". */ | |
851 saved_locale = setlocale(LC_NUMERIC, NULL); | |
852 if (saved_locale == NULL || STRCMP(saved_locale, "C") == 0) | |
853 saved_locale = NULL; | |
854 else | |
855 { | |
856 /* Need to make a copy, value may change when setting new locale. */ | |
857 saved_locale = (char *)vim_strsave((char_u *)saved_locale); | |
858 (void)setlocale(LC_NUMERIC, "C"); | |
859 } | |
860 #endif | |
861 | |
862 Python_RestoreThread(); /* enter python */ | |
863 | |
3618 | 864 if (rettv == NULL) |
865 PyRun_SimpleString((char *)(cmd)); | |
866 else | |
867 { | |
868 PyObject *r; | |
869 | |
870 r = PyRun_String((char *)(cmd), Py_eval_input, globals, globals); | |
871 if (r == NULL) | |
4145 | 872 { |
873 if (PyErr_Occurred() && !msg_silent) | |
874 PyErr_PrintEx(0); | |
3618 | 875 EMSG(_("E858: Eval did not return a valid python object")); |
4145 | 876 } |
3618 | 877 else |
878 { | |
879 if (ConvertFromPyObject(r, rettv) == -1) | |
880 EMSG(_("E859: Failed to convert returned python object to vim value")); | |
881 Py_DECREF(r); | |
882 } | |
883 PyErr_Clear(); | |
884 } | |
7 | 885 |
886 Python_SaveThread(); /* leave python */ | |
887 | |
888 #if defined(HAVE_LOCALE_H) || defined(X_LOCALE) | |
889 if (saved_locale != NULL) | |
890 { | |
891 (void)setlocale(LC_NUMERIC, saved_locale); | |
892 vim_free(saved_locale); | |
893 } | |
894 #endif | |
895 | |
896 Python_Lock_Vim(); /* enter vim */ | |
897 PythonIO_Flush(); | |
898 #if defined(MACOS) && !defined(MACOS_X_UNIX) | |
899 SetPort(oldPort); | |
900 #endif | |
901 | |
902 theend: | |
903 #ifndef PY_CAN_RECURSE | |
904 --recursive; | |
905 #endif | |
3618 | 906 return; |
7 | 907 } |
908 | |
909 /* | |
910 * ":python" | |
911 */ | |
912 void | |
913 ex_python(exarg_T *eap) | |
914 { | |
915 char_u *script; | |
916 | |
917 script = script_get(eap, eap->arg); | |
918 if (!eap->skip) | |
919 { | |
920 if (script == NULL) | |
3618 | 921 DoPythonCommand(eap, (char *)eap->arg, NULL); |
7 | 922 else |
3618 | 923 DoPythonCommand(eap, (char *)script, NULL); |
7 | 924 } |
925 vim_free(script); | |
926 } | |
927 | |
928 #define BUFFER_SIZE 1024 | |
929 | |
930 /* | |
931 * ":pyfile" | |
932 */ | |
933 void | |
934 ex_pyfile(exarg_T *eap) | |
935 { | |
936 static char buffer[BUFFER_SIZE]; | |
937 const char *file = (char *)eap->arg; | |
938 char *p; | |
939 | |
940 /* Have to do it like this. PyRun_SimpleFile requires you to pass a | |
941 * stdio file pointer, but Vim and the Python DLL are compiled with | |
942 * different options under Windows, meaning that stdio pointers aren't | |
943 * compatible between the two. Yuk. | |
944 * | |
945 * Put the string "execfile('file')" into buffer. But, we need to | |
946 * escape any backslashes or single quotes in the file name, so that | |
947 * Python won't mangle the file name. | |
948 */ | |
949 strcpy(buffer, "execfile('"); | |
950 p = buffer + 10; /* size of "execfile('" */ | |
951 | |
952 while (*file && p < buffer + (BUFFER_SIZE - 3)) | |
953 { | |
954 if (*file == '\\' || *file == '\'') | |
955 *p++ = '\\'; | |
956 *p++ = *file++; | |
957 } | |
958 | |
959 /* If we didn't finish the file name, we hit a buffer overflow */ | |
960 if (*file != '\0') | |
961 return; | |
962 | |
963 /* Put in the terminating "')" and a null */ | |
964 *p++ = '\''; | |
965 *p++ = ')'; | |
966 *p++ = '\0'; | |
967 | |
968 /* Execute the file */ | |
3618 | 969 DoPythonCommand(eap, buffer, NULL); |
7 | 970 } |
971 | |
972 /****************************************************** | |
973 * 2. Python output stream: writes output via [e]msg(). | |
974 */ | |
975 | |
976 /* Implementation functions | |
977 */ | |
978 | |
979 static PyObject * | |
980 OutputGetattr(PyObject *self, char *name) | |
981 { | |
982 if (strcmp(name, "softspace") == 0) | |
983 return PyInt_FromLong(((OutputObject *)(self))->softspace); | |
984 | |
985 return Py_FindMethod(OutputMethods, self, name); | |
986 } | |
987 | |
988 /***************/ | |
989 | |
990 static int | |
991 PythonIO_Init(void) | |
992 { | |
993 /* Fixups... */ | |
2735 | 994 PyType_Ready(&OutputType); |
7 | 995 |
2399
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
996 return PythonIO_Init_io(); |
7 | 997 } |
998 | |
999 /****************************************************** | |
1000 * 3. Implementation of the Vim module for Python | |
1001 */ | |
1002 | |
3618 | 1003 static PyObject *ConvertToPyObject(typval_T *); |
1004 static int ConvertFromPyObject(PyObject *, typval_T *); | |
1005 | |
7 | 1006 /* Window type - Implementation functions |
1007 * -------------------------------------- | |
1008 */ | |
1009 | |
1010 #define WindowType_Check(obj) ((obj)->ob_type == &WindowType) | |
1011 | |
1012 /* Buffer type - Implementation functions | |
1013 * -------------------------------------- | |
1014 */ | |
1015 | |
1016 #define BufferType_Check(obj) ((obj)->ob_type == &BufferType) | |
1017 | |
1594 | 1018 static PyInt BufferLength(PyObject *); |
1019 static PyObject *BufferItem(PyObject *, PyInt); | |
1020 static PyObject *BufferSlice(PyObject *, PyInt, PyInt); | |
1021 static PyInt BufferAssItem(PyObject *, PyInt, PyObject *); | |
1022 static PyInt BufferAssSlice(PyObject *, PyInt, PyInt, PyObject *); | |
7 | 1023 |
1024 /* Line range type - Implementation functions | |
1025 * -------------------------------------- | |
1026 */ | |
1027 | |
1028 #define RangeType_Check(obj) ((obj)->ob_type == &RangeType) | |
1029 | |
1594 | 1030 static PyInt RangeAssItem(PyObject *, PyInt, PyObject *); |
1031 static PyInt RangeAssSlice(PyObject *, PyInt, PyInt, PyObject *); | |
7 | 1032 |
1033 /* Current objects type - Implementation functions | |
1034 * ----------------------------------------------- | |
1035 */ | |
1036 | |
1037 static PySequenceMethods BufferAsSeq = { | |
1594 | 1038 (PyInquiry) BufferLength, /* sq_length, len(x) */ |
3796 | 1039 (binaryfunc) 0, /* BufferConcat, sq_concat, x+y */ |
1040 (PyIntArgFunc) 0, /* BufferRepeat, sq_repeat, x*n */ | |
1594 | 1041 (PyIntArgFunc) BufferItem, /* sq_item, x[i] */ |
1042 (PyIntIntArgFunc) BufferSlice, /* sq_slice, x[i:j] */ | |
1043 (PyIntObjArgProc) BufferAssItem, /* sq_ass_item, x[i]=v */ | |
4319 | 1044 (PyIntIntObjArgProc) BufferAssSlice, /* sq_ass_slice, x[i:j]=v */ |
1045 (objobjproc) 0, | |
1046 #if PY_MAJOR_VERSION >= 2 | |
1047 (binaryfunc) 0, | |
7 | 1048 0, |
4319 | 1049 #endif |
7 | 1050 }; |
1051 | |
1052 /* Buffer object - Implementation | |
1053 */ | |
1054 | |
1055 static PyObject * | |
1056 BufferNew(buf_T *buf) | |
1057 { | |
1058 /* We need to handle deletion of buffers underneath us. | |
502 | 1059 * If we add a "b_python_ref" field to the buf_T structure, |
7 | 1060 * then we can get at it in buf_freeall() in vim. We then |
1061 * need to create only ONE Python object per buffer - if | |
1062 * we try to create a second, just INCREF the existing one | |
1063 * and return it. The (single) Python object referring to | |
502 | 1064 * the buffer is stored in "b_python_ref". |
7 | 1065 * Question: what to do on a buf_freeall(). We'll probably |
1066 * have to either delete the Python object (DECREF it to | |
1067 * zero - a bad idea, as it leaves dangling refs!) or | |
1068 * set the buf_T * value to an invalid value (-1?), which | |
1069 * means we need checks in all access functions... Bah. | |
1070 */ | |
1071 | |
1072 BufferObject *self; | |
1073 | |
502 | 1074 if (buf->b_python_ref != NULL) |
7 | 1075 { |
502 | 1076 self = buf->b_python_ref; |
7 | 1077 Py_INCREF(self); |
1078 } | |
1079 else | |
1080 { | |
1081 self = PyObject_NEW(BufferObject, &BufferType); | |
1082 if (self == NULL) | |
1083 return NULL; | |
1084 self->buf = buf; | |
502 | 1085 buf->b_python_ref = self; |
7 | 1086 } |
1087 | |
1088 return (PyObject *)(self); | |
1089 } | |
1090 | |
1091 static PyObject * | |
1092 BufferGetattr(PyObject *self, char *name) | |
1093 { | |
4319 | 1094 PyObject *r; |
7 | 1095 |
4319 | 1096 if (CheckBuffer((BufferObject *)(self))) |
7 | 1097 return NULL; |
1098 | |
4319 | 1099 r = BufferAttr((BufferObject *)(self), name); |
1100 if (r || PyErr_Occurred()) | |
1101 return r; | |
7 | 1102 else |
1103 return Py_FindMethod(BufferMethods, self, name); | |
1104 } | |
1105 | |
1106 /******************/ | |
1107 | |
1594 | 1108 static PyInt |
7 | 1109 BufferLength(PyObject *self) |
1110 { | |
1111 /* HOW DO WE SIGNAL AN ERROR FROM THIS FUNCTION? */ | |
1112 if (CheckBuffer((BufferObject *)(self))) | |
1113 return -1; /* ??? */ | |
1114 | |
1115 return (((BufferObject *)(self))->buf->b_ml.ml_line_count); | |
1116 } | |
1117 | |
1118 static PyObject * | |
1594 | 1119 BufferItem(PyObject *self, PyInt n) |
7 | 1120 { |
1121 return RBItem((BufferObject *)(self), n, 1, | |
1122 (int)((BufferObject *)(self))->buf->b_ml.ml_line_count); | |
1123 } | |
1124 | |
1125 static PyObject * | |
1594 | 1126 BufferSlice(PyObject *self, PyInt lo, PyInt hi) |
7 | 1127 { |
1128 return RBSlice((BufferObject *)(self), lo, hi, 1, | |
1129 (int)((BufferObject *)(self))->buf->b_ml.ml_line_count); | |
1130 } | |
1131 | |
1594 | 1132 static PyInt |
1133 BufferAssItem(PyObject *self, PyInt n, PyObject *val) | |
7 | 1134 { |
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1135 return RBAsItem((BufferObject *)(self), n, val, 1, |
1607 | 1136 (PyInt)((BufferObject *)(self))->buf->b_ml.ml_line_count, |
7 | 1137 NULL); |
1138 } | |
1139 | |
1594 | 1140 static PyInt |
1141 BufferAssSlice(PyObject *self, PyInt lo, PyInt hi, PyObject *val) | |
7 | 1142 { |
2894 | 1143 return RBAsSlice((BufferObject *)(self), lo, hi, val, 1, |
1607 | 1144 (PyInt)((BufferObject *)(self))->buf->b_ml.ml_line_count, |
7 | 1145 NULL); |
1146 } | |
1147 | |
1148 static PySequenceMethods RangeAsSeq = { | |
4319 | 1149 (PyInquiry) RangeLength, /* sq_length, len(x) */ |
1150 (binaryfunc) 0, /* RangeConcat, */ /* sq_concat, x+y */ | |
1151 (PyIntArgFunc) 0, /* RangeRepeat, */ /* sq_repeat, x*n */ | |
1152 (PyIntArgFunc) RangeItem, /* sq_item, x[i] */ | |
1153 (PyIntIntArgFunc) RangeSlice, /* sq_slice, x[i:j] */ | |
1154 (PyIntObjArgProc) RangeAssItem, /* sq_ass_item, x[i]=v */ | |
1155 (PyIntIntObjArgProc) RangeAssSlice, /* sq_ass_slice, x[i:j]=v */ | |
1156 (objobjproc) 0, | |
1157 #if PY_MAJOR_VERSION >= 2 | |
1158 (binaryfunc) 0, | |
1159 0, | |
1160 #endif | |
7 | 1161 }; |
1162 | |
1163 /* Line range object - Implementation | |
1164 */ | |
1165 | |
1166 static PyObject * | |
1167 RangeGetattr(PyObject *self, char *name) | |
1168 { | |
1169 if (strcmp(name, "start") == 0) | |
1607 | 1170 return Py_BuildValue(Py_ssize_t_fmt, ((RangeObject *)(self))->start - 1); |
7 | 1171 else if (strcmp(name, "end") == 0) |
1607 | 1172 return Py_BuildValue(Py_ssize_t_fmt, ((RangeObject *)(self))->end - 1); |
7 | 1173 else |
1174 return Py_FindMethod(RangeMethods, self, name); | |
1175 } | |
1176 | |
1177 /****************/ | |
1178 | |
1594 | 1179 static PyInt |
1180 RangeAssItem(PyObject *self, PyInt n, PyObject *val) | |
7 | 1181 { |
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1182 return RBAsItem(((RangeObject *)(self))->buf, n, val, |
7 | 1183 ((RangeObject *)(self))->start, |
1184 ((RangeObject *)(self))->end, | |
1185 &((RangeObject *)(self))->end); | |
1186 } | |
1187 | |
1594 | 1188 static PyInt |
1189 RangeAssSlice(PyObject *self, PyInt lo, PyInt hi, PyObject *val) | |
7 | 1190 { |
2894 | 1191 return RBAsSlice(((RangeObject *)(self))->buf, lo, hi, val, |
7 | 1192 ((RangeObject *)(self))->start, |
1193 ((RangeObject *)(self))->end, | |
1194 &((RangeObject *)(self))->end); | |
1195 } | |
1196 | |
1197 /* Buffer list object - Definitions | |
1198 */ | |
1199 | |
1200 static PySequenceMethods BufListAsSeq = { | |
1594 | 1201 (PyInquiry) BufListLength, /* sq_length, len(x) */ |
7 | 1202 (binaryfunc) 0, /* sq_concat, x+y */ |
1594 | 1203 (PyIntArgFunc) 0, /* sq_repeat, x*n */ |
1204 (PyIntArgFunc) BufListItem, /* sq_item, x[i] */ | |
1205 (PyIntIntArgFunc) 0, /* sq_slice, x[i:j] */ | |
1206 (PyIntObjArgProc) 0, /* sq_ass_item, x[i]=v */ | |
4319 | 1207 (PyIntIntObjArgProc) 0, /* sq_ass_slice, x[i:j]=v */ |
1208 (objobjproc) 0, | |
1209 #if PY_MAJOR_VERSION >= 2 | |
1210 (binaryfunc) 0, | |
7 | 1211 0, |
4319 | 1212 #endif |
7 | 1213 }; |
1214 | |
1215 /* Window object - Implementation | |
1216 */ | |
1217 | |
1218 static PyObject * | |
1219 WindowNew(win_T *win) | |
1220 { | |
1221 /* We need to handle deletion of windows underneath us. | |
502 | 1222 * If we add a "w_python_ref" field to the win_T structure, |
7 | 1223 * then we can get at it in win_free() in vim. We then |
1224 * need to create only ONE Python object per window - if | |
1225 * we try to create a second, just INCREF the existing one | |
1226 * and return it. The (single) Python object referring to | |
502 | 1227 * the window is stored in "w_python_ref". |
7 | 1228 * On a win_free() we set the Python object's win_T* field |
1229 * to an invalid value. We trap all uses of a window | |
1230 * object, and reject them if the win_T* field is invalid. | |
1231 */ | |
1232 | |
1233 WindowObject *self; | |
1234 | |
502 | 1235 if (win->w_python_ref) |
7 | 1236 { |
502 | 1237 self = win->w_python_ref; |
7 | 1238 Py_INCREF(self); |
1239 } | |
1240 else | |
1241 { | |
1242 self = PyObject_NEW(WindowObject, &WindowType); | |
1243 if (self == NULL) | |
1244 return NULL; | |
1245 self->win = win; | |
502 | 1246 win->w_python_ref = self; |
7 | 1247 } |
1248 | |
1249 return (PyObject *)(self); | |
1250 } | |
1251 | |
1252 static PyObject * | |
1253 WindowGetattr(PyObject *self, char *name) | |
1254 { | |
4319 | 1255 PyObject *r; |
7 | 1256 |
4319 | 1257 if (CheckWindow((WindowObject *)(self))) |
7 | 1258 return NULL; |
1259 | |
4319 | 1260 r = WindowAttr((WindowObject *)(self), name); |
1261 if (r || PyErr_Occurred()) | |
1262 return r; | |
7 | 1263 else |
1264 return Py_FindMethod(WindowMethods, self, name); | |
1265 } | |
1266 | |
1267 /* Window list object - Definitions | |
1268 */ | |
1269 | |
1270 static PySequenceMethods WinListAsSeq = { | |
1594 | 1271 (PyInquiry) WinListLength, /* sq_length, len(x) */ |
7 | 1272 (binaryfunc) 0, /* sq_concat, x+y */ |
1594 | 1273 (PyIntArgFunc) 0, /* sq_repeat, x*n */ |
1274 (PyIntArgFunc) WinListItem, /* sq_item, x[i] */ | |
1275 (PyIntIntArgFunc) 0, /* sq_slice, x[i:j] */ | |
1276 (PyIntObjArgProc) 0, /* sq_ass_item, x[i]=v */ | |
4319 | 1277 (PyIntIntObjArgProc) 0, /* sq_ass_slice, x[i:j]=v */ |
1278 (objobjproc) 0, | |
1279 #if PY_MAJOR_VERSION >= 2 | |
1280 (binaryfunc) 0, | |
7 | 1281 0, |
4319 | 1282 #endif |
7 | 1283 }; |
1284 | |
1285 /* External interface | |
1286 */ | |
1287 | |
1288 void | |
1289 python_buffer_free(buf_T *buf) | |
1290 { | |
502 | 1291 if (buf->b_python_ref != NULL) |
7 | 1292 { |
502 | 1293 BufferObject *bp = buf->b_python_ref; |
7 | 1294 bp->buf = INVALID_BUFFER_VALUE; |
502 | 1295 buf->b_python_ref = NULL; |
7 | 1296 } |
1297 } | |
1298 | |
1299 #if defined(FEAT_WINDOWS) || defined(PROTO) | |
1300 void | |
1301 python_window_free(win_T *win) | |
1302 { | |
502 | 1303 if (win->w_python_ref != NULL) |
7 | 1304 { |
502 | 1305 WindowObject *wp = win->w_python_ref; |
7 | 1306 wp->win = INVALID_WINDOW_VALUE; |
502 | 1307 win->w_python_ref = NULL; |
7 | 1308 } |
1309 } | |
1310 #endif | |
1311 | |
1312 static BufListObject TheBufferList = | |
1313 { | |
1314 PyObject_HEAD_INIT(&BufListType) | |
1315 }; | |
1316 | |
1317 static WinListObject TheWindowList = | |
1318 { | |
1319 PyObject_HEAD_INIT(&WinListType) | |
1320 }; | |
1321 | |
1322 static CurrentObject TheCurrent = | |
1323 { | |
1324 PyObject_HEAD_INIT(&CurrentType) | |
1325 }; | |
1326 | |
1327 static int | |
1328 PythonMod_Init(void) | |
1329 { | |
1330 PyObject *mod; | |
1331 PyObject *dict; | |
1748 | 1332 /* The special value is removed from sys.path in Python_Init(). */ |
1333 static char *(argv[2]) = {"/must>not&exist/foo", NULL}; | |
7 | 1334 |
1335 /* Fixups... */ | |
2735 | 1336 PyType_Ready(&BufferType); |
1337 PyType_Ready(&RangeType); | |
1338 PyType_Ready(&WindowType); | |
1339 PyType_Ready(&BufListType); | |
1340 PyType_Ready(&WinListType); | |
1341 PyType_Ready(&CurrentType); | |
7 | 1342 |
1343 /* Set sys.argv[] to avoid a crash in warn(). */ | |
1344 PySys_SetArgv(1, argv); | |
1345 | |
1607 | 1346 mod = Py_InitModule4("vim", VimMethods, (char *)NULL, (PyObject *)NULL, PYTHON_API_VERSION); |
7 | 1347 dict = PyModule_GetDict(mod); |
1348 | |
1349 VimError = Py_BuildValue("s", "vim.error"); | |
1350 | |
1351 PyDict_SetItemString(dict, "error", VimError); | |
135 | 1352 PyDict_SetItemString(dict, "buffers", (PyObject *)(void *)&TheBufferList); |
1353 PyDict_SetItemString(dict, "current", (PyObject *)(void *)&TheCurrent); | |
1354 PyDict_SetItemString(dict, "windows", (PyObject *)(void *)&TheWindowList); | |
3828 | 1355 PyDict_SetItemString(dict, "VAR_LOCKED", PyInt_FromLong(VAR_LOCKED)); |
1356 PyDict_SetItemString(dict, "VAR_FIXED", PyInt_FromLong(VAR_FIXED)); | |
1357 PyDict_SetItemString(dict, "VAR_SCOPE", PyInt_FromLong(VAR_SCOPE)); | |
1358 PyDict_SetItemString(dict, "VAR_DEF_SCOPE", PyInt_FromLong(VAR_DEF_SCOPE)); | |
7 | 1359 |
1360 if (PyErr_Occurred()) | |
1361 return -1; | |
1362 | |
1363 return 0; | |
1364 } | |
1365 | |
1366 /************************************************************************* | |
1367 * 4. Utility functions for handling the interface between Vim and Python. | |
1368 */ | |
1369 | |
1370 /* Convert a Vim line into a Python string. | |
1371 * All internal newlines are replaced by null characters. | |
1372 * | |
1373 * On errors, the Python exception data is set, and NULL is returned. | |
1374 */ | |
1375 static PyObject * | |
1376 LineToString(const char *str) | |
1377 { | |
1378 PyObject *result; | |
1594 | 1379 PyInt len = strlen(str); |
7 | 1380 char *p; |
1381 | |
1382 /* Allocate an Python string object, with uninitialised contents. We | |
1383 * must do it this way, so that we can modify the string in place | |
1384 * later. See the Python source, Objects/stringobject.c for details. | |
1385 */ | |
1386 result = PyString_FromStringAndSize(NULL, len); | |
1387 if (result == NULL) | |
1388 return NULL; | |
1389 | |
1390 p = PyString_AsString(result); | |
1391 | |
1392 while (*str) | |
1393 { | |
1394 if (*str == '\n') | |
1395 *p = '\0'; | |
1396 else | |
1397 *p = *str; | |
1398 | |
1399 ++p; | |
1400 ++str; | |
1401 } | |
1402 | |
1403 return result; | |
1404 } | |
1405 | |
3618 | 1406 static PyObject * |
1407 DictionaryGetattr(PyObject *self, char *name) | |
1408 { | |
3828 | 1409 DictionaryObject *this = ((DictionaryObject *) (self)); |
1410 | |
1411 if (strcmp(name, "locked") == 0) | |
1412 return PyInt_FromLong(this->dict->dv_lock); | |
1413 else if (strcmp(name, "scope") == 0) | |
1414 return PyInt_FromLong(this->dict->dv_scope); | |
1415 | |
3618 | 1416 return Py_FindMethod(DictionaryMethods, self, name); |
1417 } | |
1418 | |
1419 static PySequenceMethods ListAsSeq = { | |
1420 (PyInquiry) ListLength, | |
1421 (binaryfunc) 0, | |
1422 (PyIntArgFunc) 0, | |
1423 (PyIntArgFunc) ListItem, | |
1424 (PyIntIntArgFunc) ListSlice, | |
1425 (PyIntObjArgProc) ListAssItem, | |
1426 (PyIntIntObjArgProc) ListAssSlice, | |
1427 (objobjproc) 0, | |
1428 #if PY_MAJOR_VERSION >= 2 | |
1429 (binaryfunc) ListConcatInPlace, | |
1430 0, | |
1431 #endif | |
1432 }; | |
1433 | |
1434 static PyObject * | |
1435 ListGetattr(PyObject *self, char *name) | |
1436 { | |
3828 | 1437 if (strcmp(name, "locked") == 0) |
1438 return PyInt_FromLong(((ListObject *)(self))->list->lv_lock); | |
1439 | |
3618 | 1440 return Py_FindMethod(ListMethods, self, name); |
1441 } | |
1442 | |
1443 static PyObject * | |
1444 FunctionGetattr(PyObject *self, char *name) | |
1445 { | |
1446 FunctionObject *this = (FunctionObject *)(self); | |
1447 | |
1448 if (strcmp(name, "name") == 0) | |
1449 return PyString_FromString((char *)(this->name)); | |
1450 else | |
1451 return Py_FindMethod(FunctionMethods, self, name); | |
1452 } | |
1453 | |
1454 void | |
1455 do_pyeval (char_u *str, typval_T *rettv) | |
1456 { | |
1457 DoPythonCommand(NULL, (char *) str, rettv); | |
1458 switch(rettv->v_type) | |
1459 { | |
1460 case VAR_DICT: ++rettv->vval.v_dict->dv_refcount; break; | |
1461 case VAR_LIST: ++rettv->vval.v_list->lv_refcount; break; | |
1462 case VAR_FUNC: func_ref(rettv->vval.v_string); break; | |
3796 | 1463 case VAR_UNKNOWN: |
1464 rettv->v_type = VAR_NUMBER; | |
1465 rettv->vval.v_number = 0; | |
1466 break; | |
3618 | 1467 } |
1468 } | |
7 | 1469 |
1470 /* Don't generate a prototype for the next function, it generates an error on | |
1471 * newer Python versions. */ | |
1472 #if PYTHON_API_VERSION < 1007 /* Python 1.4 */ && !defined(PROTO) | |
1473 | |
1474 char * | |
1475 Py_GetProgramName(void) | |
1476 { | |
1477 return "vim"; | |
1478 } | |
1479 #endif /* Python 1.4 */ | |
2399
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
1480 |
3618 | 1481 void |
1482 set_ref_in_python (int copyID) | |
1483 { | |
1484 set_ref_in_py(copyID); | |
1485 } |