Mercurial > vim
annotate src/if_python.c @ 4063:8b3e88bab702 v7.3.786
updated for version 7.3.786
Problem: Python threads don't run in the background (issue 103).
Solution: Move the statements to manipulate thread state.
| author | Bram Moolenaar <bram@vim.org> |
|---|---|
| date | Wed, 30 Jan 2013 11:44:39 +0100 |
| parents | b5b892472ecb |
| children | 3b2a771abb39 |
| rev | line source |
|---|---|
| 3618 | 1 /* vi:set ts=8 sts=4 sw=4 noet: |
| 7 | 2 * |
| 3 * VIM - Vi IMproved by Bram Moolenaar | |
| 4 * | |
| 5 * Do ":help uganda" in Vim to read copying and usage conditions. | |
| 6 * Do ":help credits" in Vim to see a list of people who contributed. | |
| 7 * See README.txt for an overview of the Vim source code. | |
| 8 */ | |
| 9 /* | |
| 10 * Python extensions by Paul Moore. | |
| 11 * Changes for Unix by David Leonard. | |
| 12 * | |
| 13 * This consists of four parts: | |
| 14 * 1. Python interpreter main program | |
| 15 * 2. Python output stream: writes output via [e]msg(). | |
| 16 * 3. Implementation of the Vim module for Python | |
| 17 * 4. Utility functions for handling the interface between Vim and Python. | |
| 18 */ | |
| 19 | |
| 20 #include "vim.h" | |
| 21 | |
| 22 #include <limits.h> | |
| 23 | |
| 24 /* Python.h defines _POSIX_THREADS itself (if needed) */ | |
| 25 #ifdef _POSIX_THREADS | |
| 26 # undef _POSIX_THREADS | |
| 27 #endif | |
| 28 | |
|
2250
1bac28a53fae
Add the conceal patch from Vince Negri.
Bram Moolenaar <bram@vim.org>
parents:
2100
diff
changeset
|
29 #if defined(_WIN32) && defined(HAVE_FCNTL_H) |
| 7 | 30 # undef HAVE_FCNTL_H |
| 31 #endif | |
| 32 | |
| 33 #ifdef _DEBUG | |
| 34 # undef _DEBUG | |
| 35 #endif | |
| 36 | |
| 37 #ifdef HAVE_STDARG_H | |
| 38 # undef HAVE_STDARG_H /* Python's config.h defines it as well. */ | |
| 39 #endif | |
| 1991 | 40 #ifdef _POSIX_C_SOURCE |
| 41 # undef _POSIX_C_SOURCE /* pyconfig.h defines it as well. */ | |
| 42 #endif | |
| 43 #ifdef _XOPEN_SOURCE | |
| 44 # undef _XOPEN_SOURCE /* pyconfig.h defines it as well. */ | |
| 45 #endif | |
| 7 | 46 |
| 47 #include <Python.h> | |
| 48 #if defined(MACOS) && !defined(MACOS_X_UNIX) | |
| 49 # include "macglue.h" | |
| 50 # include <CodeFragments.h> | |
| 51 #endif | |
| 52 #undef main /* Defined in python.h - aargh */ | |
| 53 #undef HAVE_FCNTL_H /* Clash with os_win32.h */ | |
| 54 | |
| 3806 | 55 #if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02050000 |
| 56 # define PY_SSIZE_T_CLEAN | |
| 57 #endif | |
| 58 | |
|
2399
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
59 static void init_structs(void); |
|
76f0c4918f5c
Move some common code from if_python.c and if_python3.c to if_py_both.h.
Bram Moolenaar <bram@vim.org>
parents:
2384
diff
changeset
|
60 |
| 3618 | 61 #define PyBytes_FromString PyString_FromString |
| 62 | |
| 2894 | 63 /* No-op conversion functions, use with care! */ |
| 64 #define PyString_AsBytes(obj) (obj) | |
| 65 #define PyString_FreeBytes(obj) | |
| 66 | |
| 7 | 67 #if !defined(FEAT_PYTHON) && defined(PROTO) |
| 68 /* Use this to be able to generate prototypes without python being used. */ | |
| 1607 | 69 # define PyObject Py_ssize_t |
| 70 # define PyThreadState Py_ssize_t | |
| 71 # define PyTypeObject Py_ssize_t | |
| 72 struct PyMethodDef { Py_ssize_t a; }; | |
| 73 # define PySequenceMethods Py_ssize_t | |
| 7 | 74 #endif |
| 75 | |
| 3638 | 76 #if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02070000 |
| 77 # define PY_USE_CAPSULE | |
| 78 #endif | |
| 79 | |
| 1594 | 80 #if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02050000 |
| 81 # define PyInt Py_ssize_t | |
| 82 # define PyInquiry lenfunc | |
| 83 # define PyIntArgFunc ssizeargfunc | |
| 84 # define PyIntIntArgFunc ssizessizeargfunc | |
| 85 # define PyIntObjArgProc ssizeobjargproc | |
| 86 # define PyIntIntObjArgProc ssizessizeobjargproc | |
| 1607 | 87 # define Py_ssize_t_fmt "n" |
| 1594 | 88 #else |
| 89 # define PyInt int | |
| 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 | |
| 150 # define PyErr_Clear dll_PyErr_Clear | |
| 151 # define PyErr_NoMemory dll_PyErr_NoMemory | |
| 152 # define PyErr_Occurred dll_PyErr_Occurred | |
| 153 # define PyErr_SetNone dll_PyErr_SetNone | |
| 154 # define PyErr_SetString dll_PyErr_SetString | |
| 155 # define PyEval_InitThreads dll_PyEval_InitThreads | |
| 156 # define PyEval_RestoreThread dll_PyEval_RestoreThread | |
| 157 # define PyEval_SaveThread dll_PyEval_SaveThread | |
| 158 # ifdef PY_CAN_RECURSE | |
| 159 # define PyGILState_Ensure dll_PyGILState_Ensure | |
| 160 # define PyGILState_Release dll_PyGILState_Release | |
| 161 # endif | |
| 162 # define PyInt_AsLong dll_PyInt_AsLong | |
| 163 # define PyInt_FromLong dll_PyInt_FromLong | |
| 3618 | 164 # define PyLong_AsLong dll_PyLong_AsLong |
| 165 # define PyLong_FromLong dll_PyLong_FromLong | |
| 3828 | 166 # define PyBool_Type (*dll_PyBool_Type) |
| 7 | 167 # define PyInt_Type (*dll_PyInt_Type) |
| 3618 | 168 # define PyLong_Type (*dll_PyLong_Type) |
| 7 | 169 # define PyList_GetItem dll_PyList_GetItem |
| 637 | 170 # define PyList_Append dll_PyList_Append |
| 7 | 171 # define PyList_New dll_PyList_New |
| 172 # define PyList_SetItem dll_PyList_SetItem | |
| 173 # define PyList_Size dll_PyList_Size | |
| 174 # define PyList_Type (*dll_PyList_Type) | |
| 3618 | 175 # define PySequence_Check dll_PySequence_Check |
| 176 # define PySequence_Size dll_PySequence_Size | |
| 177 # define PySequence_GetItem dll_PySequence_GetItem | |
| 178 # define PyTuple_Size dll_PyTuple_Size | |
| 179 # define PyTuple_GetItem dll_PyTuple_GetItem | |
| 180 # define PyTuple_Type (*dll_PyTuple_Type) | |
| 7 | 181 # define PyImport_ImportModule dll_PyImport_ImportModule |
| 637 | 182 # define PyDict_New dll_PyDict_New |
| 7 | 183 # define PyDict_GetItemString dll_PyDict_GetItemString |
| 3618 | 184 # define PyDict_Next dll_PyDict_Next |
| 185 # ifdef PyMapping_Items | |
| 186 # define PY_NO_MAPPING_ITEMS | |
| 187 # else | |
| 188 # define PyMapping_Items dll_PyMapping_Items | |
| 189 # endif | |
| 190 # define PyObject_CallMethod dll_PyObject_CallMethod | |
| 191 # define PyMapping_Check dll_PyMapping_Check | |
| 192 # define PyIter_Next dll_PyIter_Next | |
| 7 | 193 # define PyModule_GetDict dll_PyModule_GetDict |
| 194 # define PyRun_SimpleString dll_PyRun_SimpleString | |
| 3618 | 195 # define PyRun_String dll_PyRun_String |
| 7 | 196 # define PyString_AsString dll_PyString_AsString |
| 3798 | 197 # define PyString_AsStringAndSize dll_PyString_AsStringAndSize |
| 7 | 198 # define PyString_FromString dll_PyString_FromString |
| 199 # define PyString_FromStringAndSize dll_PyString_FromStringAndSize | |
| 200 # define PyString_Size dll_PyString_Size | |
| 201 # define PyString_Type (*dll_PyString_Type) | |
| 3618 | 202 # define PyUnicode_Type (*dll_PyUnicode_Type) |
| 3642 | 203 # undef PyUnicode_AsEncodedString |
| 204 # define PyUnicode_AsEncodedString py_PyUnicode_AsEncodedString | |
| 3618 | 205 # define PyFloat_AsDouble dll_PyFloat_AsDouble |
| 206 # define PyFloat_FromDouble dll_PyFloat_FromDouble | |
| 207 # define PyFloat_Type (*dll_PyFloat_Type) | |
| 208 # define PyImport_AddModule (*dll_PyImport_AddModule) | |
| 7 | 209 # define PySys_SetObject dll_PySys_SetObject |
| 210 # define PySys_SetArgv dll_PySys_SetArgv | |
| 211 # define PyType_Type (*dll_PyType_Type) | |
| 2737 | 212 # define PyType_Ready (*dll_PyType_Ready) |
| 7 | 213 # define Py_BuildValue dll_Py_BuildValue |
| 214 # define Py_FindMethod dll_Py_FindMethod | |
| 215 # define Py_InitModule4 dll_Py_InitModule4 | |
| 2641 | 216 # define Py_SetPythonHome dll_Py_SetPythonHome |
| 7 | 217 # define Py_Initialize dll_Py_Initialize |
| 242 | 218 # define Py_Finalize dll_Py_Finalize |
| 219 # define Py_IsInitialized dll_Py_IsInitialized | |
| 7 | 220 # define _PyObject_New dll__PyObject_New |
| 3646 | 221 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02070000 |
| 222 # define _PyObject_NextNotImplemented (*dll__PyObject_NextNotImplemented) | |
| 223 # endif | |
| 7 | 224 # define _Py_NoneStruct (*dll__Py_NoneStruct) |
| 3828 | 225 # define _Py_ZeroStruct (*dll__Py_ZeroStruct) |
| 226 # define _Py_TrueStruct (*dll__Py_TrueStruct) | |
| 7 | 227 # define PyObject_Init dll__PyObject_Init |
| 3618 | 228 # define PyObject_GetIter dll_PyObject_GetIter |
| 7 | 229 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02020000 |
| 230 # define PyType_IsSubtype dll_PyType_IsSubtype | |
| 231 # endif | |
| 232 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02030000 | |
| 233 # define PyObject_Malloc dll_PyObject_Malloc | |
| 234 # define PyObject_Free dll_PyObject_Free | |
| 235 # endif | |
| 3638 | 236 # ifdef PY_USE_CAPSULE |
| 237 # define PyCapsule_New dll_PyCapsule_New | |
| 238 # define PyCapsule_GetPointer dll_PyCapsule_GetPointer | |
| 239 # else | |
| 240 # define PyCObject_FromVoidPtr dll_PyCObject_FromVoidPtr | |
| 241 # define PyCObject_AsVoidPtr dll_PyCObject_AsVoidPtr | |
| 242 # endif | |
| 7 | 243 |
| 244 /* | |
| 245 * Pointers for dynamic link | |
| 246 */ | |
| 247 static int(*dll_PyArg_Parse)(PyObject *, char *, ...); | |
| 248 static int(*dll_PyArg_ParseTuple)(PyObject *, char *, ...); | |
| 2894 | 249 static int(*dll_PyMem_Free)(void *); |
| 3618 | 250 static void* (*dll_PyMem_Malloc)(size_t); |
| 7 | 251 static int(*dll_PyDict_SetItemString)(PyObject *dp, char *key, PyObject *item); |
| 252 static int(*dll_PyErr_BadArgument)(void); | |
| 253 static void(*dll_PyErr_Clear)(void); | |
| 254 static PyObject*(*dll_PyErr_NoMemory)(void); | |
| 255 static PyObject*(*dll_PyErr_Occurred)(void); | |
| 256 static void(*dll_PyErr_SetNone)(PyObject *); | |
| 257 static void(*dll_PyErr_SetString)(PyObject *, const char *); | |
| 258 static void(*dll_PyEval_InitThreads)(void); | |
| 259 static void(*dll_PyEval_RestoreThread)(PyThreadState *); | |
| 260 static PyThreadState*(*dll_PyEval_SaveThread)(void); | |
| 261 # ifdef PY_CAN_RECURSE | |
| 262 static PyGILState_STATE (*dll_PyGILState_Ensure)(void); | |
| 263 static void (*dll_PyGILState_Release)(PyGILState_STATE); | |
| 3618 | 264 # endif |
| 7 | 265 static long(*dll_PyInt_AsLong)(PyObject *); |
| 266 static PyObject*(*dll_PyInt_FromLong)(long); | |
| 3618 | 267 static long(*dll_PyLong_AsLong)(PyObject *); |
| 268 static PyObject*(*dll_PyLong_FromLong)(long); | |
| 3828 | 269 static PyTypeObject* dll_PyBool_Type; |
| 7 | 270 static PyTypeObject* dll_PyInt_Type; |
| 3618 | 271 static PyTypeObject* dll_PyLong_Type; |
| 1594 | 272 static PyObject*(*dll_PyList_GetItem)(PyObject *, PyInt); |
| 637 | 273 static PyObject*(*dll_PyList_Append)(PyObject *, PyObject *); |
| 1594 | 274 static PyObject*(*dll_PyList_New)(PyInt size); |
| 275 static int(*dll_PyList_SetItem)(PyObject *, PyInt, PyObject *); | |
| 276 static PyInt(*dll_PyList_Size)(PyObject *); | |
| 7 | 277 static PyTypeObject* dll_PyList_Type; |
| 3618 | 278 static int (*dll_PySequence_Check)(PyObject *); |
| 279 static PyInt(*dll_PySequence_Size)(PyObject *); | |
| 280 static PyObject*(*dll_PySequence_GetItem)(PyObject *, PyInt); | |
| 281 static PyInt(*dll_PyTuple_Size)(PyObject *); | |
| 282 static PyObject*(*dll_PyTuple_GetItem)(PyObject *, PyInt); | |
| 283 static PyTypeObject* dll_PyTuple_Type; | |
| 7 | 284 static PyObject*(*dll_PyImport_ImportModule)(const char *); |
| 637 | 285 static PyObject*(*dll_PyDict_New)(void); |
| 7 | 286 static PyObject*(*dll_PyDict_GetItemString)(PyObject *, const char *); |
| 3618 | 287 static int (*dll_PyDict_Next)(PyObject *, Py_ssize_t *, PyObject **, PyObject **); |
| 288 # ifndef PY_NO_MAPPING_ITEMS | |
| 289 static PyObject* (*dll_PyMapping_Items)(PyObject *); | |
| 290 # endif | |
| 291 static PyObject* (*dll_PyObject_CallMethod)(PyObject *, char *, PyObject *); | |
| 292 static int (*dll_PyMapping_Check)(PyObject *); | |
| 293 static PyObject* (*dll_PyIter_Next)(PyObject *); | |
| 7 | 294 static PyObject*(*dll_PyModule_GetDict)(PyObject *); |
| 295 static int(*dll_PyRun_SimpleString)(char *); | |
| 3618 | 296 static PyObject *(*dll_PyRun_String)(char *, int, PyObject *, PyObject *); |
| 7 | 297 static char*(*dll_PyString_AsString)(PyObject *); |
| 3798 | 298 static int(*dll_PyString_AsStringAndSize)(PyObject *, char **, int *); |
| 7 | 299 static PyObject*(*dll_PyString_FromString)(const char *); |
| 1594 | 300 static PyObject*(*dll_PyString_FromStringAndSize)(const char *, PyInt); |
| 301 static PyInt(*dll_PyString_Size)(PyObject *); | |
| 7 | 302 static PyTypeObject* dll_PyString_Type; |
| 3618 | 303 static PyTypeObject* dll_PyUnicode_Type; |
| 3642 | 304 static PyObject *(*py_PyUnicode_AsEncodedString)(PyObject *, char *, char *); |
| 3618 | 305 static double(*dll_PyFloat_AsDouble)(PyObject *); |
| 306 static PyObject*(*dll_PyFloat_FromDouble)(double); | |
| 307 static PyTypeObject* dll_PyFloat_Type; | |
| 7 | 308 static int(*dll_PySys_SetObject)(char *, PyObject *); |
| 309 static int(*dll_PySys_SetArgv)(int, char **); | |
| 310 static PyTypeObject* dll_PyType_Type; | |
| 2737 | 311 static int (*dll_PyType_Ready)(PyTypeObject *type); |
| 7 | 312 static PyObject*(*dll_Py_BuildValue)(char *, ...); |
| 313 static PyObject*(*dll_Py_FindMethod)(struct PyMethodDef[], PyObject *, char *); | |
| 314 static PyObject*(*dll_Py_InitModule4)(char *, struct PyMethodDef *, char *, PyObject *, int); | |
| 3618 | 315 static PyObject*(*dll_PyImport_AddModule)(char *); |
| 2641 | 316 static void(*dll_Py_SetPythonHome)(char *home); |
| 7 | 317 static void(*dll_Py_Initialize)(void); |
| 242 | 318 static void(*dll_Py_Finalize)(void); |
| 319 static int(*dll_Py_IsInitialized)(void); | |
| 7 | 320 static PyObject*(*dll__PyObject_New)(PyTypeObject *, PyObject *); |
| 321 static PyObject*(*dll__PyObject_Init)(PyObject *, PyTypeObject *); | |
| 3618 | 322 static PyObject* (*dll_PyObject_GetIter)(PyObject *); |
| 3646 | 323 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02070000 |
| 3618 | 324 static iternextfunc dll__PyObject_NextNotImplemented; |
| 3646 | 325 # endif |
| 7 | 326 static PyObject* dll__Py_NoneStruct; |
| 3828 | 327 static PyObject* _Py_ZeroStruct; |
| 328 static PyObject* dll__Py_TrueStruct; | |
| 7 | 329 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02020000 |
| 330 static int (*dll_PyType_IsSubtype)(PyTypeObject *, PyTypeObject *); | |
| 331 # endif | |
| 332 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02030000 | |
| 333 static void* (*dll_PyObject_Malloc)(size_t); | |
| 334 static void (*dll_PyObject_Free)(void*); | |
| 335 # endif | |
| 3638 | 336 # ifdef PY_USE_CAPSULE |
| 3618 | 337 static PyObject* (*dll_PyCapsule_New)(void *, char *, PyCapsule_Destructor); |
| 338 static void* (*dll_PyCapsule_GetPointer)(PyObject *, char *); | |
| 3638 | 339 # else |
| 3648 | 340 static PyObject* (*dll_PyCObject_FromVoidPtr)(void *cobj, void (*destr)(void *)); |
| 341 static void* (*dll_PyCObject_AsVoidPtr)(PyObject *); | |
| 3638 | 342 # endif |
| 7 | 343 |
| 344 static HINSTANCE hinstPython = 0; /* Instance of python.dll */ | |
| 345 | |
| 346 /* Imported exception objects */ | |
| 347 static PyObject *imp_PyExc_AttributeError; | |
| 348 static PyObject *imp_PyExc_IndexError; | |
| 349 static PyObject *imp_PyExc_KeyboardInterrupt; | |
| 350 static PyObject *imp_PyExc_TypeError; | |
| 351 static PyObject *imp_PyExc_ValueError; | |
| 352 | |
| 353 # define PyExc_AttributeError imp_PyExc_AttributeError | |
| 354 # define PyExc_IndexError imp_PyExc_IndexError | |
| 355 # define PyExc_KeyboardInterrupt imp_PyExc_KeyboardInterrupt | |
| 356 # define PyExc_TypeError imp_PyExc_TypeError | |
| 357 # define PyExc_ValueError imp_PyExc_ValueError | |
| 358 | |
| 359 /* | |
| 360 * Table of name to function pointer of python. | |
| 361 */ | |
| 362 # define PYTHON_PROC FARPROC | |
| 363 static struct | |
| 364 { | |
| 365 char *name; | |
| 366 PYTHON_PROC *ptr; | |
| 367 } python_funcname_table[] = | |
| 368 { | |
| 3806 | 369 #ifndef PY_SSIZE_T_CLEAN |
| 7 | 370 {"PyArg_Parse", (PYTHON_PROC*)&dll_PyArg_Parse}, |
| 371 {"PyArg_ParseTuple", (PYTHON_PROC*)&dll_PyArg_ParseTuple}, | |
| 3806 | 372 {"Py_BuildValue", (PYTHON_PROC*)&dll_Py_BuildValue}, |
| 373 #else | |
| 374 {"_PyArg_Parse_SizeT", (PYTHON_PROC*)&dll_PyArg_Parse}, | |
| 375 {"_PyArg_ParseTuple_SizeT", (PYTHON_PROC*)&dll_PyArg_ParseTuple}, | |
| 376 {"_Py_BuildValue_SizeT", (PYTHON_PROC*)&dll_Py_BuildValue}, | |
| 377 #endif | |
| 2894 | 378 {"PyMem_Free", (PYTHON_PROC*)&dll_PyMem_Free}, |
| 3618 | 379 {"PyMem_Malloc", (PYTHON_PROC*)&dll_PyMem_Malloc}, |
| 7 | 380 {"PyDict_SetItemString", (PYTHON_PROC*)&dll_PyDict_SetItemString}, |
| 381 {"PyErr_BadArgument", (PYTHON_PROC*)&dll_PyErr_BadArgument}, | |
| 382 {"PyErr_Clear", (PYTHON_PROC*)&dll_PyErr_Clear}, | |
| 383 {"PyErr_NoMemory", (PYTHON_PROC*)&dll_PyErr_NoMemory}, | |
| 384 {"PyErr_Occurred", (PYTHON_PROC*)&dll_PyErr_Occurred}, | |
| 385 {"PyErr_SetNone", (PYTHON_PROC*)&dll_PyErr_SetNone}, | |
| 386 {"PyErr_SetString", (PYTHON_PROC*)&dll_PyErr_SetString}, | |
| 387 {"PyEval_InitThreads", (PYTHON_PROC*)&dll_PyEval_InitThreads}, | |
| 388 {"PyEval_RestoreThread", (PYTHON_PROC*)&dll_PyEval_RestoreThread}, | |
| 389 {"PyEval_SaveThread", (PYTHON_PROC*)&dll_PyEval_SaveThread}, | |
| 390 # ifdef PY_CAN_RECURSE | |
| 391 {"PyGILState_Ensure", (PYTHON_PROC*)&dll_PyGILState_Ensure}, | |
| 392 {"PyGILState_Release", (PYTHON_PROC*)&dll_PyGILState_Release}, | |
| 393 # endif | |
| 394 {"PyInt_AsLong", (PYTHON_PROC*)&dll_PyInt_AsLong}, | |
| 395 {"PyInt_FromLong", (PYTHON_PROC*)&dll_PyInt_FromLong}, | |
| 3618 | 396 {"PyLong_AsLong", (PYTHON_PROC*)&dll_PyLong_AsLong}, |
| 397 {"PyLong_FromLong", (PYTHON_PROC*)&dll_PyLong_FromLong}, | |
| 3828 | 398 {"PyBool_Type", (PYTHON_PROC*)&dll_PyBool_Type}, |
| 7 | 399 {"PyInt_Type", (PYTHON_PROC*)&dll_PyInt_Type}, |
| 3618 | 400 {"PyLong_Type", (PYTHON_PROC*)&dll_PyLong_Type}, |
| 7 | 401 {"PyList_GetItem", (PYTHON_PROC*)&dll_PyList_GetItem}, |
| 637 | 402 {"PyList_Append", (PYTHON_PROC*)&dll_PyList_Append}, |
| 7 | 403 {"PyList_New", (PYTHON_PROC*)&dll_PyList_New}, |
| 404 {"PyList_SetItem", (PYTHON_PROC*)&dll_PyList_SetItem}, | |
| 405 {"PyList_Size", (PYTHON_PROC*)&dll_PyList_Size}, | |
| 406 {"PyList_Type", (PYTHON_PROC*)&dll_PyList_Type}, | |
| 3618 | 407 {"PySequence_GetItem", (PYTHON_PROC*)&dll_PySequence_GetItem}, |
| 408 {"PySequence_Size", (PYTHON_PROC*)&dll_PySequence_Size}, | |
| 409 {"PySequence_Check", (PYTHON_PROC*)&dll_PySequence_Check}, | |
| 410 {"PyTuple_GetItem", (PYTHON_PROC*)&dll_PyTuple_GetItem}, | |
| 411 {"PyTuple_Size", (PYTHON_PROC*)&dll_PyTuple_Size}, | |
| 412 {"PyTuple_Type", (PYTHON_PROC*)&dll_PyTuple_Type}, | |
| 7 | 413 {"PyImport_ImportModule", (PYTHON_PROC*)&dll_PyImport_ImportModule}, |
| 414 {"PyDict_GetItemString", (PYTHON_PROC*)&dll_PyDict_GetItemString}, | |
| 3618 | 415 {"PyDict_Next", (PYTHON_PROC*)&dll_PyDict_Next}, |
| 637 | 416 {"PyDict_New", (PYTHON_PROC*)&dll_PyDict_New}, |
| 3618 | 417 # ifndef PY_NO_MAPPING_ITEMS |
| 418 {"PyMapping_Items", (PYTHON_PROC*)&dll_PyMapping_Items}, | |
| 419 # endif | |
| 420 {"PyObject_CallMethod", (PYTHON_PROC*)&dll_PyObject_CallMethod}, | |
| 421 {"PyMapping_Check", (PYTHON_PROC*)&dll_PyMapping_Check}, | |
| 422 {"PyIter_Next", (PYTHON_PROC*)&dll_PyIter_Next}, | |
| 7 | 423 {"PyModule_GetDict", (PYTHON_PROC*)&dll_PyModule_GetDict}, |
| 424 {"PyRun_SimpleString", (PYTHON_PROC*)&dll_PyRun_SimpleString}, | |
| 3618 | 425 {"PyRun_String", (PYTHON_PROC*)&dll_PyRun_String}, |
| 7 | 426 {"PyString_AsString", (PYTHON_PROC*)&dll_PyString_AsString}, |
| 3798 | 427 {"PyString_AsStringAndSize", (PYTHON_PROC*)&dll_PyString_AsStringAndSize}, |
| 7 | 428 {"PyString_FromString", (PYTHON_PROC*)&dll_PyString_FromString}, |
| 429 {"PyString_FromStringAndSize", (PYTHON_PROC*)&dll_PyString_FromStringAndSize}, | |
| 430 {"PyString_Size", (PYTHON_PROC*)&dll_PyString_Size}, | |
| 431 {"PyString_Type", (PYTHON_PROC*)&dll_PyString_Type}, | |
| 3618 | 432 {"PyUnicode_Type", (PYTHON_PROC*)&dll_PyUnicode_Type}, |
| 433 {"PyFloat_Type", (PYTHON_PROC*)&dll_PyFloat_Type}, | |
| 434 {"PyFloat_AsDouble", (PYTHON_PROC*)&dll_PyFloat_AsDouble}, | |
| 435 {"PyFloat_FromDouble", (PYTHON_PROC*)&dll_PyFloat_FromDouble}, | |
| 436 {"PyImport_AddModule", (PYTHON_PROC*)&dll_PyImport_AddModule}, | |
| 7 | 437 {"PySys_SetObject", (PYTHON_PROC*)&dll_PySys_SetObject}, |
| 438 {"PySys_SetArgv", (PYTHON_PROC*)&dll_PySys_SetArgv}, | |
| 439 {"PyType_Type", (PYTHON_PROC*)&dll_PyType_Type}, | |
| 2737 | 440 {"PyType_Ready", (PYTHON_PROC*)&dll_PyType_Ready}, |
| 7 | 441 {"Py_FindMethod", (PYTHON_PROC*)&dll_Py_FindMethod}, |
| 3638 | 442 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02050000 \ |
| 443 && SIZEOF_SIZE_T != SIZEOF_INT | |
| 1607 | 444 {"Py_InitModule4_64", (PYTHON_PROC*)&dll_Py_InitModule4}, |
| 445 # else | |
| 7 | 446 {"Py_InitModule4", (PYTHON_PROC*)&dll_Py_InitModule4}, |
| 1607 | 447 # endif |
| 2641 | 448 {"Py_SetPythonHome", (PYTHON_PROC*)&dll_Py_SetPythonHome}, |
| 7 | 449 {"Py_Initialize", (PYTHON_PROC*)&dll_Py_Initialize}, |
| 242 | 450 {"Py_Finalize", (PYTHON_PROC*)&dll_Py_Finalize}, |
| 451 {"Py_IsInitialized", (PYTHON_PROC*)&dll_Py_IsInitialized}, | |
| 7 | 452 {"_PyObject_New", (PYTHON_PROC*)&dll__PyObject_New}, |
| 453 {"PyObject_Init", (PYTHON_PROC*)&dll__PyObject_Init}, | |
| 3618 | 454 {"PyObject_GetIter", (PYTHON_PROC*)&dll_PyObject_GetIter}, |
| 3646 | 455 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02070000 |
| 3618 | 456 {"_PyObject_NextNotImplemented", (PYTHON_PROC*)&dll__PyObject_NextNotImplemented}, |
| 3646 | 457 # endif |
| 7 | 458 {"_Py_NoneStruct", (PYTHON_PROC*)&dll__Py_NoneStruct}, |
| 3828 | 459 {"_Py_ZeroStruct", (PYTHON_PROC*)&dll__Py_ZeroStruct}, |
| 460 {"_Py_TrueStruct", (PYTHON_PROC*)&dll__Py_TrueStruct}, | |
| 7 | 461 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02020000 |
| 462 {"PyType_IsSubtype", (PYTHON_PROC*)&dll_PyType_IsSubtype}, | |
| 463 # endif | |
| 464 # if defined(PY_VERSION_HEX) && PY_VERSION_HEX >= 0x02030000 | |
| 465 {"PyObject_Malloc", (PYTHON_PROC*)&dll_PyObject_Malloc}, | |
| 466 {"PyObject_Free", (PYTHON_PROC*)&dll_PyObject_Free}, | |
| 467 # endif | |
| 3638 | 468 # ifdef PY_USE_CAPSULE |
| 3618 | 469 {"PyCapsule_New", (PYTHON_PROC*)&dll_PyCapsule_New}, |
| 470 {"PyCapsule_GetPointer", (PYTHON_PROC*)&dll_PyCapsule_GetPointer}, | |
| 3638 | 471 # else |
| 472 {"PyCObject_FromVoidPtr", (PYTHON_PROC*)&dll_PyCObject_FromVoidPtr}, | |
| 473 {"PyCObject_AsVoidPtr", (PYTHON_PROC*)&dll_PyCObject_AsVoidPtr}, | |
| 474 # endif | |
| 7 | 475 {"", NULL}, |
| 476 }; | |
| 477 | |
| 478 /* | |
| 479 * Free python.dll | |
| 480 */ | |
| 481 static void | |
| 482 end_dynamic_python(void) | |
| 483 { | |
| 484 if (hinstPython) | |
| 485 { | |
|
2329
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
486 close_dll(hinstPython); |
| 7 | 487 hinstPython = 0; |
| 488 } | |
| 489 } | |
| 490 | |
| 491 /* | |
| 492 * Load library and get all pointers. | |
| 493 * Parameter 'libname' provides name of DLL. | |
| 494 * Return OK or FAIL. | |
| 495 */ | |
| 496 static int | |
| 497 python_runtime_link_init(char *libname, int verbose) | |
| 498 { | |
| 499 int i; | |
| 3642 | 500 void *ucs_as_encoded_string; |
| 7 | 501 |
| 2641 | 502 #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
|
503 /* 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
|
504 * 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
|
505 * 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
|
506 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
|
507 { |
| 3032 | 508 if (verbose) |
| 509 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
|
510 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
|
511 } |
|
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
512 #endif |
|
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
513 |
| 7 | 514 if (hinstPython) |
| 515 return OK; | |
|
2329
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
516 hinstPython = load_dll(libname); |
| 7 | 517 if (!hinstPython) |
| 518 { | |
| 519 if (verbose) | |
| 520 EMSG2(_(e_loadlib), libname); | |
| 521 return FAIL; | |
| 522 } | |
| 523 | |
| 524 for (i = 0; python_funcname_table[i].ptr; ++i) | |
| 525 { | |
|
2329
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
526 if ((*python_funcname_table[i].ptr = symbol_from_dll(hinstPython, |
| 7 | 527 python_funcname_table[i].name)) == NULL) |
| 528 { | |
|
2329
ad2889f48843
Added support for Python 3. (Roland Puntaier)
Bram Moolenaar <bram@vim.org>
parents:
2311
diff
changeset
|
529 close_dll(hinstPython); |
| 7 | 530 hinstPython = 0; |
| 531 if (verbose) | |
| 532 EMSG2(_(e_loadfunc), python_funcname_table[i].name); | |
| 533 return FAIL; | |
| 534 } | |
| 535 } | |
| 3642 | 536 |
| 537 /* Load unicode functions separately as only the ucs2 or the ucs4 functions | |
| 538 * will be present in the library. */ | |
| 539 ucs_as_encoded_string = symbol_from_dll(hinstPython, | |
| 540 "PyUnicodeUCS2_AsEncodedString"); | |
| 541 if (ucs_as_encoded_string == NULL) | |
| 542 ucs_as_encoded_string = symbol_from_dll(hinstPython, | |
| 543 "PyUnicodeUCS4_AsEncodedString"); | |
| 544 if (ucs_as_encoded_string != NULL) | |
| 545 py_PyUnicode_AsEncodedString = ucs_as_encoded_string; | |
| 546 else | |
| 547 { | |
| 548 close_dll(hinstPython); | |
| 549 hinstPython = 0; | |
| 550 if (verbose) | |
| 551 EMSG2(_(e_loadfunc), "PyUnicode_UCSX_*"); | |
| 552 return FAIL; | |
| 553 } | |
| 554 | |
| 7 | 555 return OK; |
| 556 } | |
| 557 | |
| 558 /* | |
| 559 * If python is enabled (there is installed python on Windows system) return | |
| 560 * TRUE, else FALSE. | |
| 561 */ | |
| 562 int | |
| 1607 | 563 python_enabled(int verbose) |
| 7 | 564 { |
| 565 return python_runtime_link_init(DYNAMIC_PYTHON_DLL, verbose) == OK; | |
| 566 } | |
| 567 | |
|
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
568 /* |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
569 * Load the standard Python exceptions - don't import the symbols from the |
| 7 | 570 * DLL, as this can cause errors (importing data symbols is not reliable). |
| 571 */ | |
| 572 static void | |
|
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
573 get_exceptions(void) |
| 7 | 574 { |
| 575 PyObject *exmod = PyImport_ImportModule("exceptions"); | |
| 576 PyObject *exdict = PyModule_GetDict(exmod); | |
| 577 imp_PyExc_AttributeError = PyDict_GetItemString(exdict, "AttributeError"); | |
| 578 imp_PyExc_IndexError = PyDict_GetItemString(exdict, "IndexError"); | |
| 579 imp_PyExc_KeyboardInterrupt = PyDict_GetItemString(exdict, "KeyboardInterrupt"); | |
| 580 imp_PyExc_TypeError = PyDict_GetItemString(exdict, "TypeError"); | |
| 581 imp_PyExc_ValueError = PyDict_GetItemString(exdict, "ValueError"); | |
| 582 Py_XINCREF(imp_PyExc_AttributeError); | |
| 583 Py_XINCREF(imp_PyExc_IndexError); | |
| 584 Py_XINCREF(imp_PyExc_KeyboardInterrupt); | |
| 585 Py_XINCREF(imp_PyExc_TypeError); | |
| 586 Py_XINCREF(imp_PyExc_ValueError); | |
| 587 Py_XDECREF(exmod); | |
| 588 } | |
| 589 #endif /* DYNAMIC_PYTHON */ | |
| 590 | |
|
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
591 static PyObject *BufferNew (buf_T *); |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
592 static PyObject *WindowNew(win_T *); |
| 3618 | 593 static PyObject *DictionaryNew(dict_T *); |
|
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
594 static PyObject *LineToString(const char *); |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
595 |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
596 static PyTypeObject RangeType; |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
597 |
| 3618 | 598 static int initialised = 0; |
| 599 #define PYINITIALISED initialised | |
| 600 | |
| 601 #define DICTKEY_GET(err) \ | |
| 602 if (!PyString_Check(keyObject)) \ | |
| 603 { \ | |
| 604 PyErr_SetString(PyExc_TypeError, _("only string keys are allowed")); \ | |
| 605 return err; \ | |
| 606 } \ | |
| 3798 | 607 if (PyString_AsStringAndSize(keyObject, (char **) &key, NULL) == -1) \ |
| 608 return err; | |
| 609 | |
| 3618 | 610 #define DICTKEY_UNREF |
| 611 #define DICTKEY_DECL | |
| 612 | |
|
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
|
613 /* |
|
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
|
614 * 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
|
615 */ |
|
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
|
616 #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
|
617 |
|
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
|
618 |
| 7 | 619 /****************************************************** |
| 620 * Internal function prototypes. | |
| 621 */ | |
| 622 | |
| 1607 | 623 static PyInt RangeStart; |
| 624 static PyInt RangeEnd; | |
| 7 | 625 |
| 3618 | 626 static PyObject *globals; |
| 627 | |
| 7 | 628 static void PythonIO_Flush(void); |
| 629 static int PythonIO_Init(void); | |
| 630 static int PythonMod_Init(void); | |
| 631 | |
| 632 /* Utility functions for the vim/python interface | |
| 633 * ---------------------------------------------- | |
| 634 */ | |
| 635 | |
| 1607 | 636 static int SetBufferLineList(buf_T *, PyInt, PyInt, PyObject *, PyInt *); |
| 7 | 637 |
| 638 | |
| 639 /****************************************************** | |
| 640 * 1. Python interpreter main program. | |
| 641 */ | |
| 642 | |
| 643 #if PYTHON_API_VERSION < 1007 /* Python 1.4 */ | |
| 644 typedef PyObject PyThreadState; | |
| 323 | 645 #endif |
| 646 | |
| 647 #ifdef PY_CAN_RECURSE | |
| 648 static PyGILState_STATE pygilstate = PyGILState_UNLOCKED; | |
| 649 #else | |
| 36 | 650 static PyThreadState *saved_python_thread = NULL; |
| 323 | 651 #endif |
| 7 | 652 |
| 653 /* | |
| 654 * Suspend a thread of the Python interpreter, other threads are allowed to | |
| 655 * run. | |
| 656 */ | |
| 36 | 657 static void |
| 658 Python_SaveThread(void) | |
| 7 | 659 { |
| 323 | 660 #ifdef PY_CAN_RECURSE |
| 661 PyGILState_Release(pygilstate); | |
| 662 #else | |
| 7 | 663 saved_python_thread = PyEval_SaveThread(); |
| 323 | 664 #endif |
| 7 | 665 } |
| 666 | |
| 667 /* | |
| 668 * Restore a thread of the Python interpreter, waits for other threads to | |
| 669 * block. | |
| 670 */ | |
| 36 | 671 static void |
| 672 Python_RestoreThread(void) | |
| 7 | 673 { |
| 323 | 674 #ifdef PY_CAN_RECURSE |
| 675 pygilstate = PyGILState_Ensure(); | |
| 676 #else | |
| 7 | 677 PyEval_RestoreThread(saved_python_thread); |
| 678 saved_python_thread = NULL; | |
| 323 | 679 #endif |
| 7 | 680 } |
| 681 | |
| 682 void | |
| 683 python_end() | |
| 684 { | |
| 557 | 685 static int recurse = 0; |
| 686 | |
| 687 /* If a crash occurs while doing this, don't try again. */ | |
| 688 if (recurse != 0) | |
| 689 return; | |
| 690 | |
| 691 ++recurse; | |
| 692 | |
| 7 | 693 #ifdef DYNAMIC_PYTHON |
| 242 | 694 if (hinstPython && Py_IsInitialized()) |
| 323 | 695 { |
| 856 | 696 Python_RestoreThread(); /* enter python */ |
| 697 Py_Finalize(); | |
| 323 | 698 } |
| 7 | 699 end_dynamic_python(); |
| 242 | 700 #else |
| 701 if (Py_IsInitialized()) | |
| 323 | 702 { |
| 856 | 703 Python_RestoreThread(); /* enter python */ |
| 704 Py_Finalize(); | |
| 323 | 705 } |
| 7 | 706 #endif |
| 557 | 707 |
| 708 --recurse; | |
| 7 | 709 } |
| 710 | |
|
2384
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
711 #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
|
712 int |
|
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
713 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
|
714 { |
|
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
715 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
|
716 } |
|
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
717 #endif |
|
aeea25941392
Temporary solution for crashing when using both :py and :py3: disallow both in
Bram Moolenaar <bram@vim.org>
parents:
2374
diff
changeset
|
718 |
| 7 | 719 static int |
| 720 Python_Init(void) | |
| 721 { | |
| 722 if (!initialised) | |
| 723 { | |
| 724 #ifdef DYNAMIC_PYTHON | |
| 725 if (!python_enabled(TRUE)) | |
| 726 { | |
| 727 EMSG(_("E263: Sorry, this command is disabled, the Python library could not be loaded.")); | |
| 728 goto fail; | |
| 729 } | |
| 730 #endif | |
| 731 | |
| 2641 | 732 #ifdef PYTHON_HOME |
| 733 Py_SetPythonHome(PYTHON_HOME); | |
| 734 #endif | |
| 735 | |
|
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
|
736 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
|
737 |
| 7 | 738 #if !defined(MACOS) || defined(MACOS_X_UNIX) |
| 739 Py_Initialize(); | |
| 740 #else | |
| 741 PyMac_Initialize(); | |
| 742 #endif | |
| 4063 | 743 /* Initialise threads, and below save the state using |
| 744 * PyGILState_Ensure. Without the call to PyGILState_Ensure, thread | |
| 745 * specific state (such as the system trace hook), will be lost | |
| 746 * between invocations of Python code. */ | |
| 7 | 747 PyEval_InitThreads(); |
| 748 #ifdef DYNAMIC_PYTHON | |
| 749 get_exceptions(); | |
| 750 #endif | |
| 751 | |
| 752 if (PythonIO_Init()) | |
| 753 goto fail; | |
| 754 | |
| 755 if (PythonMod_Init()) | |
| 756 goto fail; | |
| 757 | |
| 4063 | 758 /* The first python thread is vim's, release the lock. */ |
| 759 Python_SaveThread(); | |
| 760 pygilstate = PyGILState_Ensure(); | |
| 761 | |
| 3618 | 762 globals = PyModule_GetDict(PyImport_AddModule("__main__")); |
| 763 | |
| 1748 | 764 /* Remove the element from sys.path that was added because of our |
| 765 * argv[0] value in PythonMod_Init(). Previously we used an empty | |
| 766 * string, but dependinding on the OS we then get an empty entry or | |
| 767 * the current directory in sys.path. */ | |
| 768 PyRun_SimpleString("import sys; sys.path = filter(lambda x: x != '/must>not&exist', sys.path)"); | |
| 769 | |
| 4063 | 770 PyGILState_Release(pygilstate); |
| 7 | 771 |
| 772 initialised = 1; | |
| 773 } | |
| 774 | |
| 775 return 0; | |
| 776 | |
| 777 fail: | |
| 778 /* We call PythonIO_Flush() here to print any Python errors. | |
| 779 * This is OK, as it is possible to call this function even | |
| 780 * if PythonIO_Init() has not completed successfully (it will | |
| 781 * not do anything in this case). | |
| 782 */ | |
| 783 PythonIO_Flush(); | |
| 784 return -1; | |
| 785 } | |
| 786 | |
| 787 /* | |
| 788 * External interface | |
| 789 */ | |
| 790 static void | |
| 3618 | 791 DoPythonCommand(exarg_T *eap, const char *cmd, typval_T *rettv) |
| 7 | 792 { |
| 323 | 793 #ifndef PY_CAN_RECURSE |
| 7 | 794 static int recursive = 0; |
| 795 #endif | |
| 796 #if defined(MACOS) && !defined(MACOS_X_UNIX) | |
| 797 GrafPtr oldPort; | |
| 798 #endif | |
| 799 #if defined(HAVE_LOCALE_H) || defined(X_LOCALE) | |
| 800 char *saved_locale; | |
| 801 #endif | |
| 802 | |
| 803 #ifndef PY_CAN_RECURSE | |
| 804 if (recursive) | |
| 805 { | |
| 806 EMSG(_("E659: Cannot invoke Python recursively")); | |
| 807 return; | |
| 808 } | |
| 809 ++recursive; | |
| 810 #endif | |
| 811 | |
| 812 #if defined(MACOS) && !defined(MACOS_X_UNIX) | |
| 813 GetPort(&oldPort); | |
| 814 /* Check if the Python library is available */ | |
| 815 if ((Ptr)PyMac_Initialize == (Ptr)kUnresolvedCFragSymbolAddress) | |
| 816 goto theend; | |
| 817 #endif | |
| 818 if (Python_Init()) | |
| 819 goto theend; | |
| 820 | |
| 3618 | 821 if (rettv == NULL) |
| 822 { | |
| 823 RangeStart = eap->line1; | |
| 824 RangeEnd = eap->line2; | |
| 825 } | |
| 826 else | |
| 827 { | |
| 828 RangeStart = (PyInt) curwin->w_cursor.lnum; | |
| 829 RangeEnd = RangeStart; | |
| 830 } | |
| 7 | 831 Python_Release_Vim(); /* leave vim */ |
| 832 | |
| 833 #if defined(HAVE_LOCALE_H) || defined(X_LOCALE) | |
| 834 /* Python only works properly when the LC_NUMERIC locale is "C". */ | |
| 835 saved_locale = setlocale(LC_NUMERIC, NULL); | |
| 836 if (saved_locale == NULL || STRCMP(saved_locale, "C") == 0) | |
| 837 saved_locale = NULL; | |
| 838 else | |
| 839 { | |
| 840 /* Need to make a copy, value may change when setting new locale. */ | |
| 841 saved_locale = (char *)vim_strsave((char_u *)saved_locale); | |
| 842 (void)setlocale(LC_NUMERIC, "C"); | |
| 843 } | |
| 844 #endif | |
| 845 | |
| 846 Python_RestoreThread(); /* enter python */ | |
| 847 | |
| 3618 | 848 if (rettv == NULL) |
| 849 PyRun_SimpleString((char *)(cmd)); | |
| 850 else | |
| 851 { | |
| 852 PyObject *r; | |
| 853 | |
| 854 r = PyRun_String((char *)(cmd), Py_eval_input, globals, globals); | |
| 855 if (r == NULL) | |
| 856 EMSG(_("E858: Eval did not return a valid python object")); | |
| 857 else | |
| 858 { | |
| 859 if (ConvertFromPyObject(r, rettv) == -1) | |
| 860 EMSG(_("E859: Failed to convert returned python object to vim value")); | |
| 861 Py_DECREF(r); | |
| 862 } | |
| 863 PyErr_Clear(); | |
| 864 } | |
| 7 | 865 |
| 866 Python_SaveThread(); /* leave python */ | |
| 867 | |
| 868 #if defined(HAVE_LOCALE_H) || defined(X_LOCALE) | |
| 869 if (saved_locale != NULL) | |
| 870 { | |
| 871 (void)setlocale(LC_NUMERIC, saved_locale); | |
| 872 vim_free(saved_locale); | |
| 873 } | |
| 874 #endif | |
| 875 | |
| 876 Python_Lock_Vim(); /* enter vim */ | |
| 877 PythonIO_Flush(); | |
| 878 #if defined(MACOS) && !defined(MACOS_X_UNIX) | |
| 879 SetPort(oldPort); | |
| 880 #endif | |
| 881 | |
| 882 theend: | |
| 883 #ifndef PY_CAN_RECURSE | |
| 884 --recursive; | |
| 885 #endif | |
| 3618 | 886 return; |
| 7 | 887 } |
| 888 | |
| 889 /* | |
| 890 * ":python" | |
| 891 */ | |
| 892 void | |
| 893 ex_python(exarg_T *eap) | |
| 894 { | |
| 895 char_u *script; | |
| 896 | |
| 897 script = script_get(eap, eap->arg); | |
| 898 if (!eap->skip) | |
| 899 { | |
| 900 if (script == NULL) | |
| 3618 | 901 DoPythonCommand(eap, (char *)eap->arg, NULL); |
| 7 | 902 else |
| 3618 | 903 DoPythonCommand(eap, (char *)script, NULL); |
| 7 | 904 } |
| 905 vim_free(script); | |
| 906 } | |
| 907 | |
| 908 #define BUFFER_SIZE 1024 | |
| 909 | |
| 910 /* | |
| 911 * ":pyfile" | |
| 912 */ | |
| 913 void | |
| 914 ex_pyfile(exarg_T *eap) | |
| 915 { | |
| 916 static char buffer[BUFFER_SIZE]; | |
| 917 const char *file = (char *)eap->arg; | |
| 918 char *p; | |
| 919 | |
| 920 /* Have to do it like this. PyRun_SimpleFile requires you to pass a | |
| 921 * stdio file pointer, but Vim and the Python DLL are compiled with | |
| 922 * different options under Windows, meaning that stdio pointers aren't | |
| 923 * compatible between the two. Yuk. | |
| 924 * | |
| 925 * Put the string "execfile('file')" into buffer. But, we need to | |
| 926 * escape any backslashes or single quotes in the file name, so that | |
| 927 * Python won't mangle the file name. | |
| 928 */ | |
| 929 strcpy(buffer, "execfile('"); | |
| 930 p = buffer + 10; /* size of "execfile('" */ | |
| 931 | |
| 932 while (*file && p < buffer + (BUFFER_SIZE - 3)) | |
| 933 { | |
| 934 if (*file == '\\' || *file == '\'') | |
| 935 *p++ = '\\'; | |
| 936 *p++ = *file++; | |
| 937 } | |
| 938 | |
| 939 /* If we didn't finish the file name, we hit a buffer overflow */ | |
| 940 if (*file != '\0') | |
| 941 return; | |
| 942 | |
| 943 /* Put in the terminating "')" and a null */ | |
| 944 *p++ = '\''; | |
| 945 *p++ = ')'; | |
| 946 *p++ = '\0'; | |
| 947 | |
| 948 /* Execute the file */ | |
| 3618 | 949 DoPythonCommand(eap, buffer, NULL); |
| 7 | 950 } |
| 951 | |
| 952 /****************************************************** | |
| 953 * 2. Python output stream: writes output via [e]msg(). | |
| 954 */ | |
| 955 | |
| 956 /* Implementation functions | |
| 957 */ | |
| 958 | |
| 959 static PyObject * | |
| 960 OutputGetattr(PyObject *self, char *name) | |
| 961 { | |
| 962 if (strcmp(name, "softspace") == 0) | |
| 963 return PyInt_FromLong(((OutputObject *)(self))->softspace); | |
| 964 | |
| 965 return Py_FindMethod(OutputMethods, self, name); | |
| 966 } | |
| 967 | |
| 968 /***************/ | |
| 969 | |
| 970 static int | |
| 971 PythonIO_Init(void) | |
| 972 { | |
| 973 /* Fixups... */ | |
| 2735 | 974 PyType_Ready(&OutputType); |
| 7 | 975 |
|
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
|
976 return PythonIO_Init_io(); |
| 7 | 977 } |
| 978 | |
| 979 /****************************************************** | |
| 980 * 3. Implementation of the Vim module for Python | |
| 981 */ | |
| 982 | |
| 3618 | 983 static PyObject *ConvertToPyObject(typval_T *); |
| 984 static int ConvertFromPyObject(PyObject *, typval_T *); | |
| 985 | |
| 7 | 986 /* Window type - Implementation functions |
| 987 * -------------------------------------- | |
| 988 */ | |
| 989 | |
| 990 #define WindowType_Check(obj) ((obj)->ob_type == &WindowType) | |
| 991 | |
| 992 static void WindowDestructor(PyObject *); | |
| 993 static PyObject *WindowGetattr(PyObject *, char *); | |
| 994 | |
| 995 /* Buffer type - Implementation functions | |
| 996 * -------------------------------------- | |
| 997 */ | |
| 998 | |
| 999 #define BufferType_Check(obj) ((obj)->ob_type == &BufferType) | |
| 1000 | |
| 1001 static void BufferDestructor(PyObject *); | |
| 1002 static PyObject *BufferGetattr(PyObject *, char *); | |
| 1003 static PyObject *BufferRepr(PyObject *); | |
| 1004 | |
| 1594 | 1005 static PyInt BufferLength(PyObject *); |
| 1006 static PyObject *BufferItem(PyObject *, PyInt); | |
| 1007 static PyObject *BufferSlice(PyObject *, PyInt, PyInt); | |
| 1008 static PyInt BufferAssItem(PyObject *, PyInt, PyObject *); | |
| 1009 static PyInt BufferAssSlice(PyObject *, PyInt, PyInt, PyObject *); | |
| 7 | 1010 |
| 1011 /* Line range type - Implementation functions | |
| 1012 * -------------------------------------- | |
| 1013 */ | |
| 1014 | |
| 1015 #define RangeType_Check(obj) ((obj)->ob_type == &RangeType) | |
| 1016 | |
| 1594 | 1017 static PyInt RangeAssItem(PyObject *, PyInt, PyObject *); |
| 1018 static PyInt RangeAssSlice(PyObject *, PyInt, PyInt, PyObject *); | |
| 7 | 1019 |
| 1020 /* Current objects type - Implementation functions | |
| 1021 * ----------------------------------------------- | |
| 1022 */ | |
| 1023 | |
| 1024 static PyObject *CurrentGetattr(PyObject *, char *); | |
| 1025 static int CurrentSetattr(PyObject *, char *, PyObject *); | |
| 1026 | |
| 1027 static PySequenceMethods BufferAsSeq = { | |
| 1594 | 1028 (PyInquiry) BufferLength, /* sq_length, len(x) */ |
| 3796 | 1029 (binaryfunc) 0, /* BufferConcat, sq_concat, x+y */ |
| 1030 (PyIntArgFunc) 0, /* BufferRepeat, sq_repeat, x*n */ | |
| 1594 | 1031 (PyIntArgFunc) BufferItem, /* sq_item, x[i] */ |
| 1032 (PyIntIntArgFunc) BufferSlice, /* sq_slice, x[i:j] */ | |
| 1033 (PyIntObjArgProc) BufferAssItem, /* sq_ass_item, x[i]=v */ | |
| 1034 (PyIntIntObjArgProc) BufferAssSlice, /* sq_ass_slice, x[i:j]=v */ | |
| 7 | 1035 }; |
| 1036 | |
| 1037 static PyTypeObject BufferType = { | |
| 1038 PyObject_HEAD_INIT(0) | |
| 1039 0, | |
| 1040 "buffer", | |
| 1041 sizeof(BufferObject), | |
| 1042 0, | |
| 1043 | |
| 1044 (destructor) BufferDestructor, /* tp_dealloc, refcount==0 */ | |
| 1045 (printfunc) 0, /* tp_print, print x */ | |
| 1046 (getattrfunc) BufferGetattr, /* tp_getattr, x.attr */ | |
| 1047 (setattrfunc) 0, /* tp_setattr, x.attr=v */ | |
| 1048 (cmpfunc) 0, /* tp_compare, x>y */ | |
| 1049 (reprfunc) BufferRepr, /* tp_repr, `x`, print x */ | |
| 1050 | |
| 1051 0, /* as number */ | |
| 1052 &BufferAsSeq, /* as sequence */ | |
| 1053 0, /* as mapping */ | |
| 1054 | |
| 1055 (hashfunc) 0, /* tp_hash, dict(x) */ | |
| 1056 (ternaryfunc) 0, /* tp_call, x() */ | |
| 1057 (reprfunc) 0, /* tp_str, str(x) */ | |
| 1058 }; | |
| 1059 | |
| 1060 /* Buffer object - Implementation | |
| 1061 */ | |
| 1062 | |
| 1063 static PyObject * | |
| 1064 BufferNew(buf_T *buf) | |
| 1065 { | |
| 1066 /* We need to handle deletion of buffers underneath us. | |
| 502 | 1067 * If we add a "b_python_ref" field to the buf_T structure, |
| 7 | 1068 * then we can get at it in buf_freeall() in vim. We then |
| 1069 * need to create only ONE Python object per buffer - if | |
| 1070 * we try to create a second, just INCREF the existing one | |
| 1071 * and return it. The (single) Python object referring to | |
| 502 | 1072 * the buffer is stored in "b_python_ref". |
| 7 | 1073 * Question: what to do on a buf_freeall(). We'll probably |
| 1074 * have to either delete the Python object (DECREF it to | |
| 1075 * zero - a bad idea, as it leaves dangling refs!) or | |
| 1076 * set the buf_T * value to an invalid value (-1?), which | |
| 1077 * means we need checks in all access functions... Bah. | |
| 1078 */ | |
| 1079 | |
| 1080 BufferObject *self; | |
| 1081 | |
| 502 | 1082 if (buf->b_python_ref != NULL) |
| 7 | 1083 { |
| 502 | 1084 self = buf->b_python_ref; |
| 7 | 1085 Py_INCREF(self); |
| 1086 } | |
| 1087 else | |
| 1088 { | |
| 1089 self = PyObject_NEW(BufferObject, &BufferType); | |
| 1090 if (self == NULL) | |
| 1091 return NULL; | |
| 1092 self->buf = buf; | |
| 502 | 1093 buf->b_python_ref = self; |
| 7 | 1094 } |
| 1095 | |
| 1096 return (PyObject *)(self); | |
| 1097 } | |
| 1098 | |
| 1099 static void | |
| 1100 BufferDestructor(PyObject *self) | |
| 1101 { | |
| 1102 BufferObject *this = (BufferObject *)(self); | |
| 1103 | |
| 1104 if (this->buf && this->buf != INVALID_BUFFER_VALUE) | |
| 502 | 1105 this->buf->b_python_ref = NULL; |
| 7 | 1106 |
| 986 | 1107 Py_DECREF(self); |
| 7 | 1108 } |
| 1109 | |
| 1110 static PyObject * | |
| 1111 BufferGetattr(PyObject *self, char *name) | |
| 1112 { | |
| 1113 BufferObject *this = (BufferObject *)(self); | |
| 1114 | |
| 1115 if (CheckBuffer(this)) | |
| 1116 return NULL; | |
| 1117 | |
| 1118 if (strcmp(name, "name") == 0) | |
| 1607 | 1119 return Py_BuildValue("s", this->buf->b_ffname); |
| 7 | 1120 else if (strcmp(name, "number") == 0) |
| 1607 | 1121 return Py_BuildValue(Py_ssize_t_fmt, this->buf->b_fnum); |
| 7 | 1122 else if (strcmp(name,"__members__") == 0) |
| 1123 return Py_BuildValue("[ss]", "name", "number"); | |
| 1124 else | |
| 1125 return Py_FindMethod(BufferMethods, self, name); | |
| 1126 } | |
| 1127 | |
| 1128 static PyObject * | |
| 1129 BufferRepr(PyObject *self) | |
| 1130 { | |
| 274 | 1131 static char repr[100]; |
| 7 | 1132 BufferObject *this = (BufferObject *)(self); |
| 1133 | |
| 1134 if (this->buf == INVALID_BUFFER_VALUE) | |
| 1135 { | |
| 1607 | 1136 vim_snprintf(repr, 100, _("<buffer object (deleted) at %p>"), (self)); |
| 7 | 1137 return PyString_FromString(repr); |
| 1138 } | |
| 1139 else | |
| 1140 { | |
| 1141 char *name = (char *)this->buf->b_fname; | |
| 1607 | 1142 PyInt len; |
| 7 | 1143 |
| 1144 if (name == NULL) | |
| 1145 name = ""; | |
| 1146 len = strlen(name); | |
| 1147 | |
| 1148 if (len > 35) | |
| 1149 name = name + (35 - len); | |
| 1150 | |
| 274 | 1151 vim_snprintf(repr, 100, "<buffer %s%s>", len > 35 ? "..." : "", name); |
| 7 | 1152 |
| 1153 return PyString_FromString(repr); | |
| 1154 } | |
| 1155 } | |
| 1156 | |
| 1157 /******************/ | |
| 1158 | |
| 1594 | 1159 static PyInt |
| 7 | 1160 BufferLength(PyObject *self) |
| 1161 { | |
| 1162 /* HOW DO WE SIGNAL AN ERROR FROM THIS FUNCTION? */ | |
| 1163 if (CheckBuffer((BufferObject *)(self))) | |
| 1164 return -1; /* ??? */ | |
| 1165 | |
| 1166 return (((BufferObject *)(self))->buf->b_ml.ml_line_count); | |
| 1167 } | |
| 1168 | |
| 1169 static PyObject * | |
| 1594 | 1170 BufferItem(PyObject *self, PyInt n) |
| 7 | 1171 { |
| 1172 return RBItem((BufferObject *)(self), n, 1, | |
| 1173 (int)((BufferObject *)(self))->buf->b_ml.ml_line_count); | |
| 1174 } | |
| 1175 | |
| 1176 static PyObject * | |
| 1594 | 1177 BufferSlice(PyObject *self, PyInt lo, PyInt hi) |
| 7 | 1178 { |
| 1179 return RBSlice((BufferObject *)(self), lo, hi, 1, | |
| 1180 (int)((BufferObject *)(self))->buf->b_ml.ml_line_count); | |
| 1181 } | |
| 1182 | |
| 1594 | 1183 static PyInt |
| 1184 BufferAssItem(PyObject *self, PyInt n, PyObject *val) | |
| 7 | 1185 { |
|
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1186 return RBAsItem((BufferObject *)(self), n, val, 1, |
| 1607 | 1187 (PyInt)((BufferObject *)(self))->buf->b_ml.ml_line_count, |
| 7 | 1188 NULL); |
| 1189 } | |
| 1190 | |
| 1594 | 1191 static PyInt |
| 1192 BufferAssSlice(PyObject *self, PyInt lo, PyInt hi, PyObject *val) | |
| 7 | 1193 { |
| 2894 | 1194 return RBAsSlice((BufferObject *)(self), lo, hi, val, 1, |
| 1607 | 1195 (PyInt)((BufferObject *)(self))->buf->b_ml.ml_line_count, |
| 7 | 1196 NULL); |
| 1197 } | |
| 1198 | |
| 1199 static PySequenceMethods RangeAsSeq = { | |
| 1594 | 1200 (PyInquiry) RangeLength, /* sq_length, len(x) */ |
| 7 | 1201 (binaryfunc) 0, /* RangeConcat, */ /* sq_concat, x+y */ |
| 1594 | 1202 (PyIntArgFunc) 0, /* RangeRepeat, */ /* sq_repeat, x*n */ |
| 1203 (PyIntArgFunc) RangeItem, /* sq_item, x[i] */ | |
| 1204 (PyIntIntArgFunc) RangeSlice, /* sq_slice, x[i:j] */ | |
| 1205 (PyIntObjArgProc) RangeAssItem, /* sq_ass_item, x[i]=v */ | |
| 1206 (PyIntIntObjArgProc) RangeAssSlice, /* sq_ass_slice, x[i:j]=v */ | |
| 7 | 1207 }; |
| 1208 | |
| 1209 /* Line range object - Implementation | |
| 1210 */ | |
| 1211 | |
| 1212 static void | |
| 1213 RangeDestructor(PyObject *self) | |
| 1214 { | |
| 1215 Py_DECREF(((RangeObject *)(self))->buf); | |
| 986 | 1216 Py_DECREF(self); |
| 7 | 1217 } |
| 1218 | |
| 1219 static PyObject * | |
| 1220 RangeGetattr(PyObject *self, char *name) | |
| 1221 { | |
| 1222 if (strcmp(name, "start") == 0) | |
| 1607 | 1223 return Py_BuildValue(Py_ssize_t_fmt, ((RangeObject *)(self))->start - 1); |
| 7 | 1224 else if (strcmp(name, "end") == 0) |
| 1607 | 1225 return Py_BuildValue(Py_ssize_t_fmt, ((RangeObject *)(self))->end - 1); |
| 7 | 1226 else |
| 1227 return Py_FindMethod(RangeMethods, self, name); | |
| 1228 } | |
| 1229 | |
| 1230 /****************/ | |
| 1231 | |
| 1594 | 1232 static PyInt |
| 1233 RangeAssItem(PyObject *self, PyInt n, PyObject *val) | |
| 7 | 1234 { |
|
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1235 return RBAsItem(((RangeObject *)(self))->buf, n, val, |
| 7 | 1236 ((RangeObject *)(self))->start, |
| 1237 ((RangeObject *)(self))->end, | |
| 1238 &((RangeObject *)(self))->end); | |
| 1239 } | |
| 1240 | |
| 1594 | 1241 static PyInt |
| 1242 RangeAssSlice(PyObject *self, PyInt lo, PyInt hi, PyObject *val) | |
| 7 | 1243 { |
| 2894 | 1244 return RBAsSlice(((RangeObject *)(self))->buf, lo, hi, val, |
| 7 | 1245 ((RangeObject *)(self))->start, |
| 1246 ((RangeObject *)(self))->end, | |
| 1247 &((RangeObject *)(self))->end); | |
| 1248 } | |
| 1249 | |
| 1250 /* Buffer list object - Definitions | |
| 1251 */ | |
| 1252 | |
| 1253 typedef struct | |
| 1254 { | |
| 1255 PyObject_HEAD | |
|
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1256 } BufListObject; |
| 7 | 1257 |
| 1258 static PySequenceMethods BufListAsSeq = { | |
| 1594 | 1259 (PyInquiry) BufListLength, /* sq_length, len(x) */ |
| 7 | 1260 (binaryfunc) 0, /* sq_concat, x+y */ |
| 1594 | 1261 (PyIntArgFunc) 0, /* sq_repeat, x*n */ |
| 1262 (PyIntArgFunc) BufListItem, /* sq_item, x[i] */ | |
| 1263 (PyIntIntArgFunc) 0, /* sq_slice, x[i:j] */ | |
| 1264 (PyIntObjArgProc) 0, /* sq_ass_item, x[i]=v */ | |
| 1265 (PyIntIntObjArgProc) 0, /* sq_ass_slice, x[i:j]=v */ | |
| 7 | 1266 }; |
| 1267 | |
| 1268 static PyTypeObject BufListType = { | |
| 1269 PyObject_HEAD_INIT(0) | |
| 1270 0, | |
| 1271 "buffer list", | |
| 1272 sizeof(BufListObject), | |
| 1273 0, | |
| 1274 | |
| 1275 (destructor) 0, /* tp_dealloc, refcount==0 */ | |
| 1276 (printfunc) 0, /* tp_print, print x */ | |
| 1277 (getattrfunc) 0, /* tp_getattr, x.attr */ | |
| 1278 (setattrfunc) 0, /* tp_setattr, x.attr=v */ | |
| 1279 (cmpfunc) 0, /* tp_compare, x>y */ | |
| 1280 (reprfunc) 0, /* tp_repr, `x`, print x */ | |
| 1281 | |
| 1282 0, /* as number */ | |
| 1283 &BufListAsSeq, /* as sequence */ | |
| 1284 0, /* as mapping */ | |
| 1285 | |
| 1286 (hashfunc) 0, /* tp_hash, dict(x) */ | |
| 1287 (ternaryfunc) 0, /* tp_call, x() */ | |
| 1288 (reprfunc) 0, /* tp_str, str(x) */ | |
| 1289 }; | |
| 1290 | |
| 1291 /* Window object - Definitions | |
| 1292 */ | |
| 1293 | |
| 1294 static struct PyMethodDef WindowMethods[] = { | |
| 1295 /* name, function, calling, documentation */ | |
| 1296 { NULL, NULL, 0, NULL } | |
| 1297 }; | |
| 1298 | |
| 1299 static PyTypeObject WindowType = { | |
| 1300 PyObject_HEAD_INIT(0) | |
| 1301 0, | |
| 1302 "window", | |
| 1303 sizeof(WindowObject), | |
| 1304 0, | |
| 1305 | |
| 1306 (destructor) WindowDestructor, /* tp_dealloc, refcount==0 */ | |
| 1307 (printfunc) 0, /* tp_print, print x */ | |
| 1308 (getattrfunc) WindowGetattr, /* tp_getattr, x.attr */ | |
| 1309 (setattrfunc) WindowSetattr, /* tp_setattr, x.attr=v */ | |
| 1310 (cmpfunc) 0, /* tp_compare, x>y */ | |
| 1311 (reprfunc) WindowRepr, /* tp_repr, `x`, print x */ | |
| 1312 | |
| 1313 0, /* as number */ | |
| 1314 0, /* as sequence */ | |
| 1315 0, /* as mapping */ | |
| 1316 | |
| 1317 (hashfunc) 0, /* tp_hash, dict(x) */ | |
| 1318 (ternaryfunc) 0, /* tp_call, x() */ | |
| 1319 (reprfunc) 0, /* tp_str, str(x) */ | |
| 1320 }; | |
| 1321 | |
| 1322 /* Window object - Implementation | |
| 1323 */ | |
| 1324 | |
| 1325 static PyObject * | |
| 1326 WindowNew(win_T *win) | |
| 1327 { | |
| 1328 /* We need to handle deletion of windows underneath us. | |
| 502 | 1329 * If we add a "w_python_ref" field to the win_T structure, |
| 7 | 1330 * then we can get at it in win_free() in vim. We then |
| 1331 * need to create only ONE Python object per window - if | |
| 1332 * we try to create a second, just INCREF the existing one | |
| 1333 * and return it. The (single) Python object referring to | |
| 502 | 1334 * the window is stored in "w_python_ref". |
| 7 | 1335 * On a win_free() we set the Python object's win_T* field |
| 1336 * to an invalid value. We trap all uses of a window | |
| 1337 * object, and reject them if the win_T* field is invalid. | |
| 1338 */ | |
| 1339 | |
| 1340 WindowObject *self; | |
| 1341 | |
| 502 | 1342 if (win->w_python_ref) |
| 7 | 1343 { |
| 502 | 1344 self = win->w_python_ref; |
| 7 | 1345 Py_INCREF(self); |
| 1346 } | |
| 1347 else | |
| 1348 { | |
| 1349 self = PyObject_NEW(WindowObject, &WindowType); | |
| 1350 if (self == NULL) | |
| 1351 return NULL; | |
| 1352 self->win = win; | |
| 502 | 1353 win->w_python_ref = self; |
| 7 | 1354 } |
| 1355 | |
| 1356 return (PyObject *)(self); | |
| 1357 } | |
| 1358 | |
| 1359 static void | |
| 1360 WindowDestructor(PyObject *self) | |
| 1361 { | |
| 1362 WindowObject *this = (WindowObject *)(self); | |
| 1363 | |
| 1364 if (this->win && this->win != INVALID_WINDOW_VALUE) | |
| 502 | 1365 this->win->w_python_ref = NULL; |
| 7 | 1366 |
| 986 | 1367 Py_DECREF(self); |
| 7 | 1368 } |
| 1369 | |
| 1370 static PyObject * | |
| 1371 WindowGetattr(PyObject *self, char *name) | |
| 1372 { | |
| 1373 WindowObject *this = (WindowObject *)(self); | |
| 1374 | |
| 1375 if (CheckWindow(this)) | |
| 1376 return NULL; | |
| 1377 | |
| 1378 if (strcmp(name, "buffer") == 0) | |
| 1379 return (PyObject *)BufferNew(this->win->w_buffer); | |
| 1380 else if (strcmp(name, "cursor") == 0) | |
| 1381 { | |
| 1382 pos_T *pos = &this->win->w_cursor; | |
| 1383 | |
| 1384 return Py_BuildValue("(ll)", (long)(pos->lnum), (long)(pos->col)); | |
| 1385 } | |
| 1386 else if (strcmp(name, "height") == 0) | |
| 1387 return Py_BuildValue("l", (long)(this->win->w_height)); | |
| 1388 #ifdef FEAT_VERTSPLIT | |
| 1389 else if (strcmp(name, "width") == 0) | |
| 1390 return Py_BuildValue("l", (long)(W_WIDTH(this->win))); | |
| 1391 #endif | |
| 1392 else if (strcmp(name,"__members__") == 0) | |
| 1393 return Py_BuildValue("[sss]", "buffer", "cursor", "height"); | |
| 1394 else | |
| 1395 return Py_FindMethod(WindowMethods, self, name); | |
| 1396 } | |
| 1397 | |
| 1398 /* Window list object - Definitions | |
| 1399 */ | |
| 1400 | |
| 1401 typedef struct | |
| 1402 { | |
| 1403 PyObject_HEAD | |
| 1404 } | |
| 1405 WinListObject; | |
| 1406 | |
| 1407 static PySequenceMethods WinListAsSeq = { | |
| 1594 | 1408 (PyInquiry) WinListLength, /* sq_length, len(x) */ |
| 7 | 1409 (binaryfunc) 0, /* sq_concat, x+y */ |
| 1594 | 1410 (PyIntArgFunc) 0, /* sq_repeat, x*n */ |
| 1411 (PyIntArgFunc) WinListItem, /* sq_item, x[i] */ | |
| 1412 (PyIntIntArgFunc) 0, /* sq_slice, x[i:j] */ | |
| 1413 (PyIntObjArgProc) 0, /* sq_ass_item, x[i]=v */ | |
| 1414 (PyIntIntObjArgProc) 0, /* sq_ass_slice, x[i:j]=v */ | |
| 7 | 1415 }; |
| 1416 | |
| 1417 static PyTypeObject WinListType = { | |
| 1418 PyObject_HEAD_INIT(0) | |
| 1419 0, | |
| 1420 "window list", | |
| 1421 sizeof(WinListObject), | |
| 1422 0, | |
| 1423 | |
| 1424 (destructor) 0, /* tp_dealloc, refcount==0 */ | |
| 1425 (printfunc) 0, /* tp_print, print x */ | |
| 1426 (getattrfunc) 0, /* tp_getattr, x.attr */ | |
| 1427 (setattrfunc) 0, /* tp_setattr, x.attr=v */ | |
| 1428 (cmpfunc) 0, /* tp_compare, x>y */ | |
| 1429 (reprfunc) 0, /* tp_repr, `x`, print x */ | |
| 1430 | |
| 1431 0, /* as number */ | |
| 1432 &WinListAsSeq, /* as sequence */ | |
| 1433 0, /* as mapping */ | |
| 1434 | |
| 1435 (hashfunc) 0, /* tp_hash, dict(x) */ | |
| 1436 (ternaryfunc) 0, /* tp_call, x() */ | |
| 1437 (reprfunc) 0, /* tp_str, str(x) */ | |
| 1438 }; | |
| 1439 | |
| 1440 /* Current items object - Definitions | |
| 1441 */ | |
| 1442 | |
| 1443 typedef struct | |
| 1444 { | |
| 1445 PyObject_HEAD | |
|
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1446 } CurrentObject; |
| 7 | 1447 |
| 1448 static PyTypeObject CurrentType = { | |
| 1449 PyObject_HEAD_INIT(0) | |
| 1450 0, | |
| 1451 "current data", | |
| 1452 sizeof(CurrentObject), | |
| 1453 0, | |
| 1454 | |
| 1455 (destructor) 0, /* tp_dealloc, refcount==0 */ | |
| 1456 (printfunc) 0, /* tp_print, print x */ | |
| 1457 (getattrfunc) CurrentGetattr, /* tp_getattr, x.attr */ | |
| 1458 (setattrfunc) CurrentSetattr, /* tp_setattr, x.attr=v */ | |
| 1459 (cmpfunc) 0, /* tp_compare, x>y */ | |
| 1460 (reprfunc) 0, /* tp_repr, `x`, print x */ | |
| 1461 | |
| 1462 0, /* as number */ | |
| 1463 0, /* as sequence */ | |
| 1464 0, /* as mapping */ | |
| 1465 | |
| 1466 (hashfunc) 0, /* tp_hash, dict(x) */ | |
| 1467 (ternaryfunc) 0, /* tp_call, x() */ | |
| 1468 (reprfunc) 0, /* tp_str, str(x) */ | |
| 1469 }; | |
| 1470 | |
| 1471 /* Current items object - Implementation | |
| 1472 */ | |
| 1473 static PyObject * | |
| 1887 | 1474 CurrentGetattr(PyObject *self UNUSED, char *name) |
| 7 | 1475 { |
| 1476 if (strcmp(name, "buffer") == 0) | |
| 1477 return (PyObject *)BufferNew(curbuf); | |
| 1478 else if (strcmp(name, "window") == 0) | |
| 1479 return (PyObject *)WindowNew(curwin); | |
| 1480 else if (strcmp(name, "line") == 0) | |
| 1607 | 1481 return GetBufferLine(curbuf, (PyInt)curwin->w_cursor.lnum); |
| 7 | 1482 else if (strcmp(name, "range") == 0) |
| 1483 return RangeNew(curbuf, RangeStart, RangeEnd); | |
| 1484 else if (strcmp(name,"__members__") == 0) | |
| 1485 return Py_BuildValue("[ssss]", "buffer", "window", "line", "range"); | |
| 1486 else | |
| 1487 { | |
| 1488 PyErr_SetString(PyExc_AttributeError, name); | |
| 1489 return NULL; | |
| 1490 } | |
| 1491 } | |
| 1492 | |
| 1493 static int | |
| 1887 | 1494 CurrentSetattr(PyObject *self UNUSED, char *name, PyObject *value) |
| 7 | 1495 { |
| 1496 if (strcmp(name, "line") == 0) | |
| 1497 { | |
| 1607 | 1498 if (SetBufferLine(curbuf, (PyInt)curwin->w_cursor.lnum, value, NULL) == FAIL) |
| 7 | 1499 return -1; |
| 1500 | |
| 1501 return 0; | |
| 1502 } | |
| 1503 else | |
| 1504 { | |
| 1505 PyErr_SetString(PyExc_AttributeError, name); | |
| 1506 return -1; | |
| 1507 } | |
| 1508 } | |
| 1509 | |
| 1510 /* External interface | |
| 1511 */ | |
| 1512 | |
| 1513 void | |
| 1514 python_buffer_free(buf_T *buf) | |
| 1515 { | |
| 502 | 1516 if (buf->b_python_ref != NULL) |
| 7 | 1517 { |
| 502 | 1518 BufferObject *bp = buf->b_python_ref; |
| 7 | 1519 bp->buf = INVALID_BUFFER_VALUE; |
| 502 | 1520 buf->b_python_ref = NULL; |
| 7 | 1521 } |
| 1522 } | |
| 1523 | |
| 1524 #if defined(FEAT_WINDOWS) || defined(PROTO) | |
| 1525 void | |
| 1526 python_window_free(win_T *win) | |
| 1527 { | |
| 502 | 1528 if (win->w_python_ref != NULL) |
| 7 | 1529 { |
| 502 | 1530 WindowObject *wp = win->w_python_ref; |
| 7 | 1531 wp->win = INVALID_WINDOW_VALUE; |
| 502 | 1532 win->w_python_ref = NULL; |
| 7 | 1533 } |
| 1534 } | |
| 1535 #endif | |
| 1536 | |
| 1537 static BufListObject TheBufferList = | |
| 1538 { | |
| 1539 PyObject_HEAD_INIT(&BufListType) | |
| 1540 }; | |
| 1541 | |
| 1542 static WinListObject TheWindowList = | |
| 1543 { | |
| 1544 PyObject_HEAD_INIT(&WinListType) | |
| 1545 }; | |
| 1546 | |
| 1547 static CurrentObject TheCurrent = | |
| 1548 { | |
| 1549 PyObject_HEAD_INIT(&CurrentType) | |
| 1550 }; | |
| 1551 | |
| 1552 static int | |
| 1553 PythonMod_Init(void) | |
| 1554 { | |
| 1555 PyObject *mod; | |
| 1556 PyObject *dict; | |
| 1748 | 1557 /* The special value is removed from sys.path in Python_Init(). */ |
| 1558 static char *(argv[2]) = {"/must>not&exist/foo", NULL}; | |
| 7 | 1559 |
| 1560 /* Fixups... */ | |
| 2735 | 1561 PyType_Ready(&BufferType); |
| 1562 PyType_Ready(&RangeType); | |
| 1563 PyType_Ready(&WindowType); | |
| 1564 PyType_Ready(&BufListType); | |
| 1565 PyType_Ready(&WinListType); | |
| 1566 PyType_Ready(&CurrentType); | |
| 7 | 1567 |
| 1568 /* Set sys.argv[] to avoid a crash in warn(). */ | |
| 1569 PySys_SetArgv(1, argv); | |
| 1570 | |
| 1607 | 1571 mod = Py_InitModule4("vim", VimMethods, (char *)NULL, (PyObject *)NULL, PYTHON_API_VERSION); |
| 7 | 1572 dict = PyModule_GetDict(mod); |
| 1573 | |
| 1574 VimError = Py_BuildValue("s", "vim.error"); | |
| 1575 | |
| 1576 PyDict_SetItemString(dict, "error", VimError); | |
| 135 | 1577 PyDict_SetItemString(dict, "buffers", (PyObject *)(void *)&TheBufferList); |
| 1578 PyDict_SetItemString(dict, "current", (PyObject *)(void *)&TheCurrent); | |
| 1579 PyDict_SetItemString(dict, "windows", (PyObject *)(void *)&TheWindowList); | |
| 3828 | 1580 PyDict_SetItemString(dict, "VAR_LOCKED", PyInt_FromLong(VAR_LOCKED)); |
| 1581 PyDict_SetItemString(dict, "VAR_FIXED", PyInt_FromLong(VAR_FIXED)); | |
| 1582 PyDict_SetItemString(dict, "VAR_SCOPE", PyInt_FromLong(VAR_SCOPE)); | |
| 1583 PyDict_SetItemString(dict, "VAR_DEF_SCOPE", PyInt_FromLong(VAR_DEF_SCOPE)); | |
| 7 | 1584 |
| 1585 if (PyErr_Occurred()) | |
| 1586 return -1; | |
| 1587 | |
| 1588 return 0; | |
| 1589 } | |
| 1590 | |
| 1591 /************************************************************************* | |
| 1592 * 4. Utility functions for handling the interface between Vim and Python. | |
| 1593 */ | |
| 1594 | |
| 1595 /* Convert a Vim line into a Python string. | |
| 1596 * All internal newlines are replaced by null characters. | |
| 1597 * | |
| 1598 * On errors, the Python exception data is set, and NULL is returned. | |
| 1599 */ | |
| 1600 static PyObject * | |
| 1601 LineToString(const char *str) | |
| 1602 { | |
| 1603 PyObject *result; | |
| 1594 | 1604 PyInt len = strlen(str); |
| 7 | 1605 char *p; |
| 1606 | |
| 1607 /* Allocate an Python string object, with uninitialised contents. We | |
| 1608 * must do it this way, so that we can modify the string in place | |
| 1609 * later. See the Python source, Objects/stringobject.c for details. | |
| 1610 */ | |
| 1611 result = PyString_FromStringAndSize(NULL, len); | |
| 1612 if (result == NULL) | |
| 1613 return NULL; | |
| 1614 | |
| 1615 p = PyString_AsString(result); | |
| 1616 | |
| 1617 while (*str) | |
| 1618 { | |
| 1619 if (*str == '\n') | |
| 1620 *p = '\0'; | |
| 1621 else | |
| 1622 *p = *str; | |
| 1623 | |
| 1624 ++p; | |
| 1625 ++str; | |
| 1626 } | |
| 1627 | |
| 1628 return result; | |
| 1629 } | |
| 1630 | |
| 3618 | 1631 static void DictionaryDestructor(PyObject *); |
| 1632 static PyObject *DictionaryGetattr(PyObject *, char*); | |
| 1633 | |
| 1634 static PyMappingMethods DictionaryAsMapping = { | |
| 1635 (PyInquiry) DictionaryLength, | |
| 1636 (binaryfunc) DictionaryItem, | |
| 1637 (objobjargproc) DictionaryAssItem, | |
| 1638 }; | |
| 1639 | |
| 1640 static PyTypeObject DictionaryType = { | |
| 1641 PyObject_HEAD_INIT(0) | |
| 1642 0, | |
| 1643 "vimdictionary", | |
| 1644 sizeof(DictionaryObject), | |
| 1645 0, | |
| 1646 | |
| 1647 (destructor) DictionaryDestructor, | |
| 1648 (printfunc) 0, | |
| 1649 (getattrfunc) DictionaryGetattr, | |
| 3828 | 1650 (setattrfunc) DictionarySetattr, |
| 3618 | 1651 (cmpfunc) 0, |
| 1652 (reprfunc) 0, | |
| 1653 | |
| 1654 0, /* as number */ | |
| 1655 0, /* as sequence */ | |
| 1656 &DictionaryAsMapping, /* as mapping */ | |
| 1657 | |
| 1658 (hashfunc) 0, | |
| 1659 (ternaryfunc) 0, | |
| 1660 (reprfunc) 0, | |
| 1661 }; | |
| 1662 | |
| 1663 static void | |
| 1664 DictionaryDestructor(PyObject *self) | |
| 1665 { | |
| 1666 DictionaryObject *this = ((DictionaryObject *) (self)); | |
| 1667 | |
| 1668 pyll_remove(&this->ref, &lastdict); | |
| 1669 dict_unref(this->dict); | |
| 1670 | |
| 1671 Py_DECREF(self); | |
| 1672 } | |
| 1673 | |
| 1674 static PyObject * | |
| 1675 DictionaryGetattr(PyObject *self, char *name) | |
| 1676 { | |
| 3828 | 1677 DictionaryObject *this = ((DictionaryObject *) (self)); |
| 1678 | |
| 1679 if (strcmp(name, "locked") == 0) | |
| 1680 return PyInt_FromLong(this->dict->dv_lock); | |
| 1681 else if (strcmp(name, "scope") == 0) | |
| 1682 return PyInt_FromLong(this->dict->dv_scope); | |
| 1683 | |
| 3618 | 1684 return Py_FindMethod(DictionaryMethods, self, name); |
| 1685 } | |
| 1686 | |
| 1687 static void ListDestructor(PyObject *); | |
| 1688 static PyObject *ListGetattr(PyObject *, char *); | |
| 1689 | |
| 1690 static PySequenceMethods ListAsSeq = { | |
| 1691 (PyInquiry) ListLength, | |
| 1692 (binaryfunc) 0, | |
| 1693 (PyIntArgFunc) 0, | |
| 1694 (PyIntArgFunc) ListItem, | |
| 1695 (PyIntIntArgFunc) ListSlice, | |
| 1696 (PyIntObjArgProc) ListAssItem, | |
| 1697 (PyIntIntObjArgProc) ListAssSlice, | |
| 1698 (objobjproc) 0, | |
| 1699 #if PY_MAJOR_VERSION >= 2 | |
| 1700 (binaryfunc) ListConcatInPlace, | |
| 1701 0, | |
| 1702 #endif | |
| 1703 }; | |
| 1704 | |
| 1705 static PyTypeObject ListType = { | |
| 1706 PyObject_HEAD_INIT(0) | |
| 1707 0, | |
| 1708 "vimlist", | |
| 1709 sizeof(ListObject), | |
| 1710 0, | |
| 1711 | |
| 1712 (destructor) ListDestructor, | |
| 1713 (printfunc) 0, | |
| 1714 (getattrfunc) ListGetattr, | |
| 3828 | 1715 (setattrfunc) ListSetattr, |
| 3618 | 1716 (cmpfunc) 0, |
| 1717 (reprfunc) 0, | |
| 1718 | |
| 1719 0, /* as number */ | |
| 1720 &ListAsSeq, /* as sequence */ | |
| 1721 0, /* as mapping */ | |
| 1722 | |
| 1723 (hashfunc) 0, | |
| 1724 (ternaryfunc) 0, | |
| 1725 (reprfunc) 0, | |
| 1726 }; | |
| 1727 | |
| 1728 static void | |
| 1729 ListDestructor(PyObject *self) | |
| 1730 { | |
| 1731 ListObject *this = ((ListObject *) (self)); | |
| 1732 | |
| 1733 pyll_remove(&this->ref, &lastlist); | |
| 1734 list_unref(this->list); | |
| 1735 | |
| 1736 Py_DECREF(self); | |
| 1737 } | |
| 1738 | |
| 1739 static PyObject * | |
| 1740 ListGetattr(PyObject *self, char *name) | |
| 1741 { | |
| 3828 | 1742 if (strcmp(name, "locked") == 0) |
| 1743 return PyInt_FromLong(((ListObject *)(self))->list->lv_lock); | |
| 1744 | |
| 3618 | 1745 return Py_FindMethod(ListMethods, self, name); |
| 1746 } | |
| 1747 | |
| 1748 static void FunctionDestructor(PyObject *); | |
| 1749 static PyObject *FunctionGetattr(PyObject *, char *); | |
| 1750 | |
| 1751 static PyTypeObject FunctionType = { | |
| 1752 PyObject_HEAD_INIT(0) | |
| 1753 0, | |
| 1754 "vimfunction", | |
| 1755 sizeof(FunctionObject), | |
| 1756 0, | |
| 1757 | |
| 1758 (destructor) FunctionDestructor, | |
| 1759 (printfunc) 0, | |
| 1760 (getattrfunc) FunctionGetattr, | |
| 1761 (setattrfunc) 0, | |
| 1762 (cmpfunc) 0, | |
| 1763 (reprfunc) 0, | |
| 1764 | |
| 1765 0, /* as number */ | |
| 1766 0, /* as sequence */ | |
| 1767 0, /* as mapping */ | |
| 1768 | |
| 1769 (hashfunc) 0, | |
| 1770 (ternaryfunc) FunctionCall, | |
| 1771 (reprfunc) 0, | |
| 1772 }; | |
| 1773 | |
| 1774 static void | |
| 1775 FunctionDestructor(PyObject *self) | |
| 1776 { | |
| 1777 FunctionObject *this = (FunctionObject *) (self); | |
| 1778 | |
| 1779 func_unref(this->name); | |
| 1780 PyMem_Del(this->name); | |
| 1781 | |
| 1782 Py_DECREF(self); | |
| 1783 } | |
| 1784 | |
| 1785 static PyObject * | |
| 1786 FunctionGetattr(PyObject *self, char *name) | |
| 1787 { | |
| 1788 FunctionObject *this = (FunctionObject *)(self); | |
| 1789 | |
| 1790 if (strcmp(name, "name") == 0) | |
| 1791 return PyString_FromString((char *)(this->name)); | |
| 1792 else | |
| 1793 return Py_FindMethod(FunctionMethods, self, name); | |
| 1794 } | |
| 1795 | |
| 1796 void | |
| 1797 do_pyeval (char_u *str, typval_T *rettv) | |
| 1798 { | |
| 1799 DoPythonCommand(NULL, (char *) str, rettv); | |
| 1800 switch(rettv->v_type) | |
| 1801 { | |
| 1802 case VAR_DICT: ++rettv->vval.v_dict->dv_refcount; break; | |
| 1803 case VAR_LIST: ++rettv->vval.v_list->lv_refcount; break; | |
| 1804 case VAR_FUNC: func_ref(rettv->vval.v_string); break; | |
| 3796 | 1805 case VAR_UNKNOWN: |
| 1806 rettv->v_type = VAR_NUMBER; | |
| 1807 rettv->vval.v_number = 0; | |
| 1808 break; | |
| 3618 | 1809 } |
| 1810 } | |
| 7 | 1811 |
| 1812 /* Don't generate a prototype for the next function, it generates an error on | |
| 1813 * newer Python versions. */ | |
| 1814 #if PYTHON_API_VERSION < 1007 /* Python 1.4 */ && !defined(PROTO) | |
| 1815 | |
| 1816 char * | |
| 1817 Py_GetProgramName(void) | |
| 1818 { | |
| 1819 return "vim"; | |
| 1820 } | |
| 1821 #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
|
1822 |
| 3618 | 1823 void |
| 1824 set_ref_in_python (int copyID) | |
| 1825 { | |
| 1826 set_ref_in_py(copyID); | |
| 1827 } | |
| 1828 | |
|
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
|
1829 static 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
|
1830 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
|
1831 { |
|
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
|
1832 vim_memset(&OutputType, 0, sizeof(OutputType)); |
|
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
|
1833 OutputType.tp_name = "message"; |
|
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
|
1834 OutputType.tp_basicsize = sizeof(OutputObject); |
|
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
|
1835 OutputType.tp_getattr = OutputGetattr; |
|
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
|
1836 OutputType.tp_setattr = OutputSetattr; |
|
2447
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1837 |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1838 vim_memset(&RangeType, 0, sizeof(RangeType)); |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1839 RangeType.tp_name = "range"; |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1840 RangeType.tp_basicsize = sizeof(RangeObject); |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1841 RangeType.tp_dealloc = RangeDestructor; |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1842 RangeType.tp_getattr = RangeGetattr; |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1843 RangeType.tp_repr = RangeRepr; |
|
84d353762845
Move many more common Python items to if_py_both.c.
Bram Moolenaar <bram@vim.org>
parents:
2399
diff
changeset
|
1844 RangeType.tp_as_sequence = &RangeAsSeq; |
|
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
|
1845 } |