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