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