xref: /vim-8.2.3635/src/if_python3.c (revision dfb18411) 
1 /* vi:set ts=8 sts=4 sw=4:
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 /*
21  * Roland Puntaier 2009/sept/16:
22  * Adaptations to support both python3.x and python2.x
23  */
24 
25 /* uncomment this if used with the debug version of python */
26 /* #define Py_DEBUG */
27 /* Note: most of time you can add -DPy_DEBUG to CFLAGS in place of uncommenting
28  */
29 /* uncomment this if used with the debug version of python, but without its
30  * allocator */
31 /* #define Py_DEBUG_NO_PYMALLOC */
32 
33 #include "vim.h"
34 
35 #include <limits.h>
36 
37 /* Python.h defines _POSIX_THREADS itself (if needed) */
38 #ifdef _POSIX_THREADS
39 # undef _POSIX_THREADS
40 #endif
41 
42 #if defined(_WIN32) && defined(HAVE_FCNTL_H)
43 # undef HAVE_FCNTL_H
44 #endif
45 
46 #ifdef _DEBUG
47 # undef _DEBUG
48 #endif
49 
50 #ifdef F_BLANK
51 # undef F_BLANK
52 #endif
53 
54 #ifdef HAVE_STDARG_H
55 # undef HAVE_STDARG_H   /* Python's config.h defines it as well. */
56 #endif
57 #ifdef _POSIX_C_SOURCE  /* defined in feature.h */
58 # undef _POSIX_C_SOURCE
59 #endif
60 #ifdef _XOPEN_SOURCE
61 # undef _XOPEN_SOURCE	/* pyconfig.h defines it as well. */
62 #endif
63 
64 #define PY_SSIZE_T_CLEAN
65 
66 #include <Python.h>
67 
68 #if defined(MACOS) && !defined(MACOS_X_UNIX)
69 # include "macglue.h"
70 # include <CodeFragments.h>
71 #endif
72 #undef main /* Defined in python.h - aargh */
73 #undef HAVE_FCNTL_H /* Clash with os_win32.h */
74 
75 /* The "surrogateescape" error handler is new in Python 3.1 */
76 #if PY_VERSION_HEX >= 0x030100f0
77 # define CODEC_ERROR_HANDLER "surrogateescape"
78 #else
79 # define CODEC_ERROR_HANDLER NULL
80 #endif
81 
82 /* Python 3 does not support CObjects, always use Capsules */
83 #define PY_USE_CAPSULE
84 
85 #define PyInt Py_ssize_t
86 #ifndef PyString_Check
87 # define PyString_Check(obj) PyUnicode_Check(obj)
88 #endif
89 #define PyString_FromString(repr) \
90     PyUnicode_Decode(repr, STRLEN(repr), ENC_OPT, NULL)
91 #define PyString_FromFormat PyUnicode_FromFormat
92 #ifndef PyInt_Check
93 # define PyInt_Check(obj) PyLong_Check(obj)
94 #endif
95 #define PyInt_FromLong(i) PyLong_FromLong(i)
96 #define PyInt_AsLong(obj) PyLong_AsLong(obj)
97 #define Py_ssize_t_fmt "n"
98 #define Py_bytes_fmt "y"
99 
100 #if defined(DYNAMIC_PYTHON3) || defined(PROTO)
101 
102 # ifndef WIN3264
103 #  include <dlfcn.h>
104 #  define FARPROC void*
105 #  define HINSTANCE void*
106 #  if defined(PY_NO_RTLD_GLOBAL) && defined(PY3_NO_RTLD_GLOBAL)
107 #   define load_dll(n) dlopen((n), RTLD_LAZY)
108 #  else
109 #   define load_dll(n) dlopen((n), RTLD_LAZY|RTLD_GLOBAL)
110 #  endif
111 #  define close_dll dlclose
112 #  define symbol_from_dll dlsym
113 # else
114 #  define load_dll vimLoadLib
115 #  define close_dll FreeLibrary
116 #  define symbol_from_dll GetProcAddress
117 # endif
118 /*
119  * Wrapper defines
120  */
121 # undef PyArg_Parse
122 # define PyArg_Parse py3_PyArg_Parse
123 # undef PyArg_ParseTuple
124 # define PyArg_ParseTuple py3_PyArg_ParseTuple
125 # define PyMem_Free py3_PyMem_Free
126 # define PyMem_Malloc py3_PyMem_Malloc
127 # define PyDict_SetItemString py3_PyDict_SetItemString
128 # define PyErr_BadArgument py3_PyErr_BadArgument
129 # define PyErr_Clear py3_PyErr_Clear
130 # define PyErr_Format py3_PyErr_Format
131 # define PyErr_PrintEx py3_PyErr_PrintEx
132 # define PyErr_NoMemory py3_PyErr_NoMemory
133 # define PyErr_Occurred py3_PyErr_Occurred
134 # define PyErr_SetNone py3_PyErr_SetNone
135 # define PyErr_SetString py3_PyErr_SetString
136 # define PyErr_SetObject py3_PyErr_SetObject
137 # define PyErr_ExceptionMatches py3_PyErr_ExceptionMatches
138 # define PyEval_InitThreads py3_PyEval_InitThreads
139 # define PyEval_RestoreThread py3_PyEval_RestoreThread
140 # define PyEval_SaveThread py3_PyEval_SaveThread
141 # define PyGILState_Ensure py3_PyGILState_Ensure
142 # define PyGILState_Release py3_PyGILState_Release
143 # define PyLong_AsLong py3_PyLong_AsLong
144 # define PyLong_FromLong py3_PyLong_FromLong
145 # define PyList_GetItem py3_PyList_GetItem
146 # define PyList_Append py3_PyList_Append
147 # define PyList_Insert py3_PyList_Insert
148 # define PyList_New py3_PyList_New
149 # define PyList_SetItem py3_PyList_SetItem
150 # define PyList_Size py3_PyList_Size
151 # define PySequence_Check py3_PySequence_Check
152 # define PySequence_Size py3_PySequence_Size
153 # define PySequence_GetItem py3_PySequence_GetItem
154 # define PySequence_Fast py3_PySequence_Fast
155 # define PyTuple_Size py3_PyTuple_Size
156 # define PyTuple_GetItem py3_PyTuple_GetItem
157 # define PySlice_GetIndicesEx py3_PySlice_GetIndicesEx
158 # define PyImport_ImportModule py3_PyImport_ImportModule
159 # define PyObject_Init py3__PyObject_Init
160 # define PyDict_New py3_PyDict_New
161 # define PyDict_GetItemString py3_PyDict_GetItemString
162 # define PyDict_Next py3_PyDict_Next
163 # define PyMapping_Check py3_PyMapping_Check
164 # ifndef PyMapping_Keys
165 #  define PyMapping_Keys py3_PyMapping_Keys
166 # endif
167 # define PyIter_Next py3_PyIter_Next
168 # define PyObject_GetIter py3_PyObject_GetIter
169 # define PyObject_Repr py3_PyObject_Repr
170 # define PyObject_GetItem py3_PyObject_GetItem
171 # define PyObject_IsTrue py3_PyObject_IsTrue
172 # define PyModule_GetDict py3_PyModule_GetDict
173 #undef PyRun_SimpleString
174 # define PyRun_SimpleString py3_PyRun_SimpleString
175 #undef PyRun_String
176 # define PyRun_String py3_PyRun_String
177 # define PyObject_GetAttrString py3_PyObject_GetAttrString
178 # define PyObject_HasAttrString py3_PyObject_HasAttrString
179 # define PyObject_SetAttrString py3_PyObject_SetAttrString
180 # define PyObject_CallFunctionObjArgs py3_PyObject_CallFunctionObjArgs
181 # define _PyObject_CallFunction_SizeT py3__PyObject_CallFunction_SizeT
182 # define PyObject_Call py3_PyObject_Call
183 # define PyEval_GetLocals py3_PyEval_GetLocals
184 # define PyEval_GetGlobals py3_PyEval_GetGlobals
185 # define PySys_SetObject py3_PySys_SetObject
186 # define PySys_GetObject py3_PySys_GetObject
187 # define PySys_SetArgv py3_PySys_SetArgv
188 # define PyType_Ready py3_PyType_Ready
189 #undef Py_BuildValue
190 # define Py_BuildValue py3_Py_BuildValue
191 # define Py_SetPythonHome py3_Py_SetPythonHome
192 # define Py_Initialize py3_Py_Initialize
193 # define Py_Finalize py3_Py_Finalize
194 # define Py_IsInitialized py3_Py_IsInitialized
195 # define _Py_NoneStruct (*py3__Py_NoneStruct)
196 # define _Py_FalseStruct (*py3__Py_FalseStruct)
197 # define _Py_TrueStruct (*py3__Py_TrueStruct)
198 # define _PyObject_NextNotImplemented (*py3__PyObject_NextNotImplemented)
199 # define PyModule_AddObject py3_PyModule_AddObject
200 # define PyImport_AppendInittab py3_PyImport_AppendInittab
201 # define PyImport_AddModule py3_PyImport_AddModule
202 # if PY_VERSION_HEX >= 0x030300f0
203 #  undef _PyUnicode_AsString
204 #  define _PyUnicode_AsString py3_PyUnicode_AsUTF8
205 # else
206 #  define _PyUnicode_AsString py3__PyUnicode_AsString
207 # endif
208 # undef PyUnicode_AsEncodedString
209 # define PyUnicode_AsEncodedString py3_PyUnicode_AsEncodedString
210 # undef PyBytes_AsString
211 # define PyBytes_AsString py3_PyBytes_AsString
212 # ifndef PyBytes_AsStringAndSize
213 #  define PyBytes_AsStringAndSize py3_PyBytes_AsStringAndSize
214 # endif
215 # undef PyBytes_FromString
216 # define PyBytes_FromString py3_PyBytes_FromString
217 # define PyFloat_FromDouble py3_PyFloat_FromDouble
218 # define PyFloat_AsDouble py3_PyFloat_AsDouble
219 # define PyObject_GenericGetAttr py3_PyObject_GenericGetAttr
220 # define PyType_Type (*py3_PyType_Type)
221 # define PySlice_Type (*py3_PySlice_Type)
222 # define PyFloat_Type (*py3_PyFloat_Type)
223 # define PyNumber_Check (*py3_PyNumber_Check)
224 # define PyNumber_Long (*py3_PyNumber_Long)
225 # define PyBool_Type (*py3_PyBool_Type)
226 # define PyErr_NewException py3_PyErr_NewException
227 # ifdef Py_DEBUG
228 #  define _Py_NegativeRefcount py3__Py_NegativeRefcount
229 #  define _Py_RefTotal (*py3__Py_RefTotal)
230 #  define _Py_Dealloc py3__Py_Dealloc
231 #  define PyModule_Create2TraceRefs py3_PyModule_Create2TraceRefs
232 # else
233 #  define PyModule_Create2 py3_PyModule_Create2
234 # endif
235 # if defined(Py_DEBUG) && !defined(Py_DEBUG_NO_PYMALLOC)
236 #  define _PyObject_DebugMalloc py3__PyObject_DebugMalloc
237 #  define _PyObject_DebugFree py3__PyObject_DebugFree
238 # else
239 #  define PyObject_Malloc py3_PyObject_Malloc
240 #  define PyObject_Free py3_PyObject_Free
241 # endif
242 # define _PyObject_GC_New py3__PyObject_GC_New
243 # define PyObject_GC_Del py3_PyObject_GC_Del
244 # define PyObject_GC_UnTrack py3_PyObject_GC_UnTrack
245 # define PyType_GenericAlloc py3_PyType_GenericAlloc
246 # define PyType_GenericNew py3_PyType_GenericNew
247 # undef PyUnicode_FromString
248 # define PyUnicode_FromString py3_PyUnicode_FromString
249 # ifndef PyUnicode_FromFormat
250 #  define PyUnicode_FromFormat py3_PyUnicode_FromFormat
251 # else
252 #  define Py_UNICODE_USE_UCS_FUNCTIONS
253 #  ifdef Py_UNICODE_WIDE
254 #   define PyUnicodeUCS4_FromFormat py3_PyUnicodeUCS4_FromFormat
255 #  else
256 #   define PyUnicodeUCS2_FromFormat py3_PyUnicodeUCS2_FromFormat
257 #  endif
258 # endif
259 # undef PyUnicode_Decode
260 # define PyUnicode_Decode py3_PyUnicode_Decode
261 # define PyType_IsSubtype py3_PyType_IsSubtype
262 # define PyCapsule_New py3_PyCapsule_New
263 # define PyCapsule_GetPointer py3_PyCapsule_GetPointer
264 
265 # if defined(Py_DEBUG) && !defined(Py_DEBUG_NO_PYMALLOC)
266 #  undef PyObject_NEW
267 #  define PyObject_NEW(type, typeobj) \
268 ( (type *) PyObject_Init( \
269 	(PyObject *) _PyObject_DebugMalloc( _PyObject_SIZE(typeobj) ), (typeobj)) )
270 # endif
271 
272 /*
273  * Pointers for dynamic link
274  */
275 static int (*py3_PySys_SetArgv)(int, wchar_t **);
276 static void (*py3_Py_SetPythonHome)(wchar_t *home);
277 static void (*py3_Py_Initialize)(void);
278 static PyObject* (*py3_PyList_New)(Py_ssize_t size);
279 static PyGILState_STATE (*py3_PyGILState_Ensure)(void);
280 static void (*py3_PyGILState_Release)(PyGILState_STATE);
281 static int (*py3_PySys_SetObject)(char *, PyObject *);
282 static PyObject* (*py3_PySys_GetObject)(char *);
283 static int (*py3_PyList_Append)(PyObject *, PyObject *);
284 static int (*py3_PyList_Insert)(PyObject *, int, PyObject *);
285 static Py_ssize_t (*py3_PyList_Size)(PyObject *);
286 static int (*py3_PySequence_Check)(PyObject *);
287 static Py_ssize_t (*py3_PySequence_Size)(PyObject *);
288 static PyObject* (*py3_PySequence_GetItem)(PyObject *, Py_ssize_t);
289 static PyObject* (*py3_PySequence_Fast)(PyObject *, const char *);
290 static Py_ssize_t (*py3_PyTuple_Size)(PyObject *);
291 static PyObject* (*py3_PyTuple_GetItem)(PyObject *, Py_ssize_t);
292 static int (*py3_PyMapping_Check)(PyObject *);
293 static PyObject* (*py3_PyMapping_Keys)(PyObject *);
294 static int (*py3_PySlice_GetIndicesEx)(PyObject *r, Py_ssize_t length,
295 		     Py_ssize_t *start, Py_ssize_t *stop, Py_ssize_t *step, Py_ssize_t *slicelength);
296 static PyObject* (*py3_PyErr_NoMemory)(void);
297 static void (*py3_Py_Finalize)(void);
298 static void (*py3_PyErr_SetString)(PyObject *, const char *);
299 static void (*py3_PyErr_SetObject)(PyObject *, PyObject *);
300 static int (*py3_PyErr_ExceptionMatches)(PyObject *);
301 static int (*py3_PyRun_SimpleString)(char *);
302 static PyObject* (*py3_PyRun_String)(char *, int, PyObject *, PyObject *);
303 static PyObject* (*py3_PyObject_GetAttrString)(PyObject *, const char *);
304 static int (*py3_PyObject_HasAttrString)(PyObject *, const char *);
305 static int (*py3_PyObject_SetAttrString)(PyObject *, const char *, PyObject *);
306 static PyObject* (*py3_PyObject_CallFunctionObjArgs)(PyObject *, ...);
307 static PyObject* (*py3__PyObject_CallFunction_SizeT)(PyObject *, char *, ...);
308 static PyObject* (*py3_PyObject_Call)(PyObject *, PyObject *, PyObject *);
309 static PyObject* (*py3_PyEval_GetGlobals)();
310 static PyObject* (*py3_PyEval_GetLocals)();
311 static PyObject* (*py3_PyList_GetItem)(PyObject *, Py_ssize_t);
312 static PyObject* (*py3_PyImport_ImportModule)(const char *);
313 static PyObject* (*py3_PyImport_AddModule)(const char *);
314 static int (*py3_PyErr_BadArgument)(void);
315 static PyObject* (*py3_PyErr_Occurred)(void);
316 static PyObject* (*py3_PyModule_GetDict)(PyObject *);
317 static int (*py3_PyList_SetItem)(PyObject *, Py_ssize_t, PyObject *);
318 static PyObject* (*py3_PyDict_GetItemString)(PyObject *, const char *);
319 static int (*py3_PyDict_Next)(PyObject *, Py_ssize_t *, PyObject **, PyObject **);
320 static PyObject* (*py3_PyLong_FromLong)(long);
321 static PyObject* (*py3_PyDict_New)(void);
322 static PyObject* (*py3_PyIter_Next)(PyObject *);
323 static PyObject* (*py3_PyObject_GetIter)(PyObject *);
324 static PyObject* (*py3_PyObject_Repr)(PyObject *);
325 static PyObject* (*py3_PyObject_GetItem)(PyObject *, PyObject *);
326 static int (*py3_PyObject_IsTrue)(PyObject *);
327 static PyObject* (*py3_Py_BuildValue)(char *, ...);
328 static int (*py3_PyType_Ready)(PyTypeObject *type);
329 static int (*py3_PyDict_SetItemString)(PyObject *dp, char *key, PyObject *item);
330 static PyObject* (*py3_PyUnicode_FromString)(const char *u);
331 # ifndef Py_UNICODE_USE_UCS_FUNCTIONS
332 static PyObject* (*py3_PyUnicode_FromFormat)(const char *u, ...);
333 # else
334 #  ifdef Py_UNICODE_WIDE
335 static PyObject* (*py3_PyUnicodeUCS4_FromFormat)(const char *u, ...);
336 #  else
337 static PyObject* (*py3_PyUnicodeUCS2_FromFormat)(const char *u, ...);
338 #  endif
339 # endif
340 static PyObject* (*py3_PyUnicode_Decode)(const char *u, Py_ssize_t size,
341 	const char *encoding, const char *errors);
342 static long (*py3_PyLong_AsLong)(PyObject *);
343 static void (*py3_PyErr_SetNone)(PyObject *);
344 static void (*py3_PyEval_InitThreads)(void);
345 static void(*py3_PyEval_RestoreThread)(PyThreadState *);
346 static PyThreadState*(*py3_PyEval_SaveThread)(void);
347 static int (*py3_PyArg_Parse)(PyObject *, char *, ...);
348 static int (*py3_PyArg_ParseTuple)(PyObject *, char *, ...);
349 static int (*py3_PyMem_Free)(void *);
350 static void* (*py3_PyMem_Malloc)(size_t);
351 static int (*py3_Py_IsInitialized)(void);
352 static void (*py3_PyErr_Clear)(void);
353 static PyObject* (*py3_PyErr_Format)(PyObject *, const char *, ...);
354 static void (*py3_PyErr_PrintEx)(int);
355 static PyObject*(*py3__PyObject_Init)(PyObject *, PyTypeObject *);
356 static iternextfunc py3__PyObject_NextNotImplemented;
357 static PyObject* py3__Py_NoneStruct;
358 static PyObject* py3__Py_FalseStruct;
359 static PyObject* py3__Py_TrueStruct;
360 static int (*py3_PyModule_AddObject)(PyObject *m, const char *name, PyObject *o);
361 static int (*py3_PyImport_AppendInittab)(const char *name, PyObject* (*initfunc)(void));
362 # if PY_VERSION_HEX >= 0x030300f0
363 static char* (*py3_PyUnicode_AsUTF8)(PyObject *unicode);
364 # else
365 static char* (*py3__PyUnicode_AsString)(PyObject *unicode);
366 # endif
367 static PyObject* (*py3_PyUnicode_AsEncodedString)(PyObject *unicode, const char* encoding, const char* errors);
368 static char* (*py3_PyBytes_AsString)(PyObject *bytes);
369 static int (*py3_PyBytes_AsStringAndSize)(PyObject *bytes, char **buffer, Py_ssize_t *length);
370 static PyObject* (*py3_PyBytes_FromString)(char *str);
371 static PyObject* (*py3_PyFloat_FromDouble)(double num);
372 static double (*py3_PyFloat_AsDouble)(PyObject *);
373 static PyObject* (*py3_PyObject_GenericGetAttr)(PyObject *obj, PyObject *name);
374 static PyObject* (*py3_PyType_GenericAlloc)(PyTypeObject *type, Py_ssize_t nitems);
375 static PyObject* (*py3_PyType_GenericNew)(PyTypeObject *type, PyObject *args, PyObject *kwds);
376 static PyTypeObject* py3_PyType_Type;
377 static PyTypeObject* py3_PySlice_Type;
378 static PyTypeObject* py3_PyFloat_Type;
379 static PyTypeObject* py3_PyBool_Type;
380 static int (*py3_PyNumber_Check)(PyObject *);
381 static PyObject* (*py3_PyNumber_Long)(PyObject *);
382 static PyObject* (*py3_PyErr_NewException)(char *name, PyObject *base, PyObject *dict);
383 static PyObject* (*py3_PyCapsule_New)(void *, char *, PyCapsule_Destructor);
384 static void* (*py3_PyCapsule_GetPointer)(PyObject *, char *);
385 # ifdef Py_DEBUG
386 static void (*py3__Py_NegativeRefcount)(const char *fname, int lineno, PyObject *op);
387 static Py_ssize_t* py3__Py_RefTotal;
388 static void (*py3__Py_Dealloc)(PyObject *obj);
389 static PyObject* (*py3_PyModule_Create2TraceRefs)(struct PyModuleDef* module, int module_api_version);
390 # else
391 static PyObject* (*py3_PyModule_Create2)(struct PyModuleDef* module, int module_api_version);
392 # endif
393 # if defined(Py_DEBUG) && !defined(Py_DEBUG_NO_PYMALLOC)
394 static void (*py3__PyObject_DebugFree)(void*);
395 static void* (*py3__PyObject_DebugMalloc)(size_t);
396 # else
397 static void (*py3_PyObject_Free)(void*);
398 static void* (*py3_PyObject_Malloc)(size_t);
399 # endif
400 static PyObject*(*py3__PyObject_GC_New)(PyTypeObject *);
401 static void(*py3_PyObject_GC_Del)(void *);
402 static void(*py3_PyObject_GC_UnTrack)(void *);
403 static int (*py3_PyType_IsSubtype)(PyTypeObject *, PyTypeObject *);
404 
405 static HINSTANCE hinstPy3 = 0; /* Instance of python.dll */
406 
407 /* Imported exception objects */
408 static PyObject *p3imp_PyExc_AttributeError;
409 static PyObject *p3imp_PyExc_IndexError;
410 static PyObject *p3imp_PyExc_KeyError;
411 static PyObject *p3imp_PyExc_KeyboardInterrupt;
412 static PyObject *p3imp_PyExc_TypeError;
413 static PyObject *p3imp_PyExc_ValueError;
414 static PyObject *p3imp_PyExc_SystemExit;
415 static PyObject *p3imp_PyExc_RuntimeError;
416 static PyObject *p3imp_PyExc_ImportError;
417 static PyObject *p3imp_PyExc_OverflowError;
418 
419 # define PyExc_AttributeError p3imp_PyExc_AttributeError
420 # define PyExc_IndexError p3imp_PyExc_IndexError
421 # define PyExc_KeyError p3imp_PyExc_KeyError
422 # define PyExc_KeyboardInterrupt p3imp_PyExc_KeyboardInterrupt
423 # define PyExc_TypeError p3imp_PyExc_TypeError
424 # define PyExc_ValueError p3imp_PyExc_ValueError
425 # define PyExc_SystemExit p3imp_PyExc_SystemExit
426 # define PyExc_RuntimeError p3imp_PyExc_RuntimeError
427 # define PyExc_ImportError p3imp_PyExc_ImportError
428 # define PyExc_OverflowError p3imp_PyExc_OverflowError
429 
430 /*
431  * Table of name to function pointer of python.
432  */
433 # define PYTHON_PROC FARPROC
434 static struct
435 {
436     char *name;
437     PYTHON_PROC *ptr;
438 } py3_funcname_table[] =
439 {
440     {"PySys_SetArgv", (PYTHON_PROC*)&py3_PySys_SetArgv},
441     {"Py_SetPythonHome", (PYTHON_PROC*)&py3_Py_SetPythonHome},
442     {"Py_Initialize", (PYTHON_PROC*)&py3_Py_Initialize},
443     {"_PyArg_ParseTuple_SizeT", (PYTHON_PROC*)&py3_PyArg_ParseTuple},
444     {"_Py_BuildValue_SizeT", (PYTHON_PROC*)&py3_Py_BuildValue},
445     {"PyMem_Free", (PYTHON_PROC*)&py3_PyMem_Free},
446     {"PyMem_Malloc", (PYTHON_PROC*)&py3_PyMem_Malloc},
447     {"PyList_New", (PYTHON_PROC*)&py3_PyList_New},
448     {"PyGILState_Ensure", (PYTHON_PROC*)&py3_PyGILState_Ensure},
449     {"PyGILState_Release", (PYTHON_PROC*)&py3_PyGILState_Release},
450     {"PySys_SetObject", (PYTHON_PROC*)&py3_PySys_SetObject},
451     {"PySys_GetObject", (PYTHON_PROC*)&py3_PySys_GetObject},
452     {"PyList_Append", (PYTHON_PROC*)&py3_PyList_Append},
453     {"PyList_Insert", (PYTHON_PROC*)&py3_PyList_Insert},
454     {"PyList_Size", (PYTHON_PROC*)&py3_PyList_Size},
455     {"PySequence_Check", (PYTHON_PROC*)&py3_PySequence_Check},
456     {"PySequence_Size", (PYTHON_PROC*)&py3_PySequence_Size},
457     {"PySequence_GetItem", (PYTHON_PROC*)&py3_PySequence_GetItem},
458     {"PySequence_Fast", (PYTHON_PROC*)&py3_PySequence_Fast},
459     {"PyTuple_Size", (PYTHON_PROC*)&py3_PyTuple_Size},
460     {"PyTuple_GetItem", (PYTHON_PROC*)&py3_PyTuple_GetItem},
461     {"PySlice_GetIndicesEx", (PYTHON_PROC*)&py3_PySlice_GetIndicesEx},
462     {"PyErr_NoMemory", (PYTHON_PROC*)&py3_PyErr_NoMemory},
463     {"Py_Finalize", (PYTHON_PROC*)&py3_Py_Finalize},
464     {"PyErr_SetString", (PYTHON_PROC*)&py3_PyErr_SetString},
465     {"PyErr_SetObject", (PYTHON_PROC*)&py3_PyErr_SetObject},
466     {"PyErr_ExceptionMatches", (PYTHON_PROC*)&py3_PyErr_ExceptionMatches},
467     {"PyRun_SimpleString", (PYTHON_PROC*)&py3_PyRun_SimpleString},
468     {"PyRun_String", (PYTHON_PROC*)&py3_PyRun_String},
469     {"PyObject_GetAttrString", (PYTHON_PROC*)&py3_PyObject_GetAttrString},
470     {"PyObject_HasAttrString", (PYTHON_PROC*)&py3_PyObject_HasAttrString},
471     {"PyObject_SetAttrString", (PYTHON_PROC*)&py3_PyObject_SetAttrString},
472     {"PyObject_CallFunctionObjArgs", (PYTHON_PROC*)&py3_PyObject_CallFunctionObjArgs},
473     {"_PyObject_CallFunction_SizeT", (PYTHON_PROC*)&py3__PyObject_CallFunction_SizeT},
474     {"PyObject_Call", (PYTHON_PROC*)&py3_PyObject_Call},
475     {"PyEval_GetGlobals", (PYTHON_PROC*)&py3_PyEval_GetGlobals},
476     {"PyEval_GetLocals", (PYTHON_PROC*)&py3_PyEval_GetLocals},
477     {"PyList_GetItem", (PYTHON_PROC*)&py3_PyList_GetItem},
478     {"PyImport_ImportModule", (PYTHON_PROC*)&py3_PyImport_ImportModule},
479     {"PyImport_AddModule", (PYTHON_PROC*)&py3_PyImport_AddModule},
480     {"PyErr_BadArgument", (PYTHON_PROC*)&py3_PyErr_BadArgument},
481     {"PyErr_Occurred", (PYTHON_PROC*)&py3_PyErr_Occurred},
482     {"PyModule_GetDict", (PYTHON_PROC*)&py3_PyModule_GetDict},
483     {"PyList_SetItem", (PYTHON_PROC*)&py3_PyList_SetItem},
484     {"PyDict_GetItemString", (PYTHON_PROC*)&py3_PyDict_GetItemString},
485     {"PyDict_Next", (PYTHON_PROC*)&py3_PyDict_Next},
486     {"PyMapping_Check", (PYTHON_PROC*)&py3_PyMapping_Check},
487     {"PyMapping_Keys", (PYTHON_PROC*)&py3_PyMapping_Keys},
488     {"PyIter_Next", (PYTHON_PROC*)&py3_PyIter_Next},
489     {"PyObject_GetIter", (PYTHON_PROC*)&py3_PyObject_GetIter},
490     {"PyObject_Repr", (PYTHON_PROC*)&py3_PyObject_Repr},
491     {"PyObject_GetItem", (PYTHON_PROC*)&py3_PyObject_GetItem},
492     {"PyObject_IsTrue", (PYTHON_PROC*)&py3_PyObject_IsTrue},
493     {"PyLong_FromLong", (PYTHON_PROC*)&py3_PyLong_FromLong},
494     {"PyDict_New", (PYTHON_PROC*)&py3_PyDict_New},
495     {"PyType_Ready", (PYTHON_PROC*)&py3_PyType_Ready},
496     {"PyDict_SetItemString", (PYTHON_PROC*)&py3_PyDict_SetItemString},
497     {"PyLong_AsLong", (PYTHON_PROC*)&py3_PyLong_AsLong},
498     {"PyErr_SetNone", (PYTHON_PROC*)&py3_PyErr_SetNone},
499     {"PyEval_InitThreads", (PYTHON_PROC*)&py3_PyEval_InitThreads},
500     {"PyEval_RestoreThread", (PYTHON_PROC*)&py3_PyEval_RestoreThread},
501     {"PyEval_SaveThread", (PYTHON_PROC*)&py3_PyEval_SaveThread},
502     {"_PyArg_Parse_SizeT", (PYTHON_PROC*)&py3_PyArg_Parse},
503     {"Py_IsInitialized", (PYTHON_PROC*)&py3_Py_IsInitialized},
504     {"_PyObject_NextNotImplemented", (PYTHON_PROC*)&py3__PyObject_NextNotImplemented},
505     {"_Py_NoneStruct", (PYTHON_PROC*)&py3__Py_NoneStruct},
506     {"_Py_FalseStruct", (PYTHON_PROC*)&py3__Py_FalseStruct},
507     {"_Py_TrueStruct", (PYTHON_PROC*)&py3__Py_TrueStruct},
508     {"PyErr_Clear", (PYTHON_PROC*)&py3_PyErr_Clear},
509     {"PyErr_Format", (PYTHON_PROC*)&py3_PyErr_Format},
510     {"PyErr_PrintEx", (PYTHON_PROC*)&py3_PyErr_PrintEx},
511     {"PyObject_Init", (PYTHON_PROC*)&py3__PyObject_Init},
512     {"PyModule_AddObject", (PYTHON_PROC*)&py3_PyModule_AddObject},
513     {"PyImport_AppendInittab", (PYTHON_PROC*)&py3_PyImport_AppendInittab},
514 # if PY_VERSION_HEX >= 0x030300f0
515     {"PyUnicode_AsUTF8", (PYTHON_PROC*)&py3_PyUnicode_AsUTF8},
516 # else
517     {"_PyUnicode_AsString", (PYTHON_PROC*)&py3__PyUnicode_AsString},
518 # endif
519 # ifndef Py_UNICODE_USE_UCS_FUNCTIONS
520     {"PyUnicode_FromFormat", (PYTHON_PROC*)&py3_PyUnicode_FromFormat},
521 # else
522 #  ifdef Py_UNICODE_WIDE
523     {"PyUnicodeUCS4_FromFormat", (PYTHON_PROC*)&py3_PyUnicodeUCS4_FromFormat},
524 #  else
525     {"PyUnicodeUCS2_FromFormat", (PYTHON_PROC*)&py3_PyUnicodeUCS2_FromFormat},
526 #  endif
527 # endif
528     {"PyBytes_AsString", (PYTHON_PROC*)&py3_PyBytes_AsString},
529     {"PyBytes_AsStringAndSize", (PYTHON_PROC*)&py3_PyBytes_AsStringAndSize},
530     {"PyBytes_FromString", (PYTHON_PROC*)&py3_PyBytes_FromString},
531     {"PyFloat_FromDouble", (PYTHON_PROC*)&py3_PyFloat_FromDouble},
532     {"PyFloat_AsDouble", (PYTHON_PROC*)&py3_PyFloat_AsDouble},
533     {"PyObject_GenericGetAttr", (PYTHON_PROC*)&py3_PyObject_GenericGetAttr},
534     {"PyType_GenericAlloc", (PYTHON_PROC*)&py3_PyType_GenericAlloc},
535     {"PyType_GenericNew", (PYTHON_PROC*)&py3_PyType_GenericNew},
536     {"PyType_Type", (PYTHON_PROC*)&py3_PyType_Type},
537     {"PySlice_Type", (PYTHON_PROC*)&py3_PySlice_Type},
538     {"PyFloat_Type", (PYTHON_PROC*)&py3_PyFloat_Type},
539     {"PyBool_Type", (PYTHON_PROC*)&py3_PyBool_Type},
540     {"PyNumber_Check", (PYTHON_PROC*)&py3_PyNumber_Check},
541     {"PyNumber_Long", (PYTHON_PROC*)&py3_PyNumber_Long},
542     {"PyErr_NewException", (PYTHON_PROC*)&py3_PyErr_NewException},
543 # ifdef Py_DEBUG
544     {"_Py_NegativeRefcount", (PYTHON_PROC*)&py3__Py_NegativeRefcount},
545     {"_Py_RefTotal", (PYTHON_PROC*)&py3__Py_RefTotal},
546     {"_Py_Dealloc", (PYTHON_PROC*)&py3__Py_Dealloc},
547     {"PyModule_Create2TraceRefs", (PYTHON_PROC*)&py3_PyModule_Create2TraceRefs},
548 # else
549     {"PyModule_Create2", (PYTHON_PROC*)&py3_PyModule_Create2},
550 # endif
551 # if defined(Py_DEBUG) && !defined(Py_DEBUG_NO_PYMALLOC)
552     {"_PyObject_DebugFree", (PYTHON_PROC*)&py3__PyObject_DebugFree},
553     {"_PyObject_DebugMalloc", (PYTHON_PROC*)&py3__PyObject_DebugMalloc},
554 # else
555     {"PyObject_Malloc", (PYTHON_PROC*)&py3_PyObject_Malloc},
556     {"PyObject_Free", (PYTHON_PROC*)&py3_PyObject_Free},
557 # endif
558     {"_PyObject_GC_New", (PYTHON_PROC*)&py3__PyObject_GC_New},
559     {"PyObject_GC_Del", (PYTHON_PROC*)&py3_PyObject_GC_Del},
560     {"PyObject_GC_UnTrack", (PYTHON_PROC*)&py3_PyObject_GC_UnTrack},
561     {"PyType_IsSubtype", (PYTHON_PROC*)&py3_PyType_IsSubtype},
562     {"PyCapsule_New", (PYTHON_PROC*)&py3_PyCapsule_New},
563     {"PyCapsule_GetPointer", (PYTHON_PROC*)&py3_PyCapsule_GetPointer},
564     {"", NULL},
565 };
566 
567 /*
568  * Free python.dll
569  */
570     static void
571 end_dynamic_python3(void)
572 {
573     if (hinstPy3 != 0)
574     {
575 	close_dll(hinstPy3);
576 	hinstPy3 = 0;
577     }
578 }
579 
580 /*
581  * Load library and get all pointers.
582  * Parameter 'libname' provides name of DLL.
583  * Return OK or FAIL.
584  */
585     static int
586 py3_runtime_link_init(char *libname, int verbose)
587 {
588     int i;
589     void *ucs_from_string, *ucs_decode, *ucs_as_encoded_string;
590 
591 # if !(defined(PY_NO_RTLD_GLOBAL) && defined(PY3_NO_RTLD_GLOBAL)) && defined(UNIX) && defined(FEAT_PYTHON)
592     /* Can't have Python and Python3 loaded at the same time.
593      * It cause a crash, because RTLD_GLOBAL is needed for
594      * standard C extension libraries of one or both python versions. */
595     if (python_loaded())
596     {
597 	if (verbose)
598 	    EMSG(_("E837: This Vim cannot execute :py3 after using :python"));
599 	return FAIL;
600     }
601 # endif
602 
603     if (hinstPy3 != 0)
604 	return OK;
605     hinstPy3 = load_dll(libname);
606 
607     if (!hinstPy3)
608     {
609 	if (verbose)
610 	    EMSG2(_(e_loadlib), libname);
611 	return FAIL;
612     }
613 
614     for (i = 0; py3_funcname_table[i].ptr; ++i)
615     {
616 	if ((*py3_funcname_table[i].ptr = symbol_from_dll(hinstPy3,
617 			py3_funcname_table[i].name)) == NULL)
618 	{
619 	    close_dll(hinstPy3);
620 	    hinstPy3 = 0;
621 	    if (verbose)
622 		EMSG2(_(e_loadfunc), py3_funcname_table[i].name);
623 	    return FAIL;
624 	}
625     }
626 
627     /* Load unicode functions separately as only the ucs2 or the ucs4 functions
628      * will be present in the library. */
629 # if PY_VERSION_HEX >= 0x030300f0
630     ucs_from_string = symbol_from_dll(hinstPy3, "PyUnicode_FromString");
631     ucs_decode = symbol_from_dll(hinstPy3, "PyUnicode_Decode");
632     ucs_as_encoded_string = symbol_from_dll(hinstPy3,
633 	    "PyUnicode_AsEncodedString");
634 # else
635     ucs_from_string = symbol_from_dll(hinstPy3, "PyUnicodeUCS2_FromString");
636     ucs_decode = symbol_from_dll(hinstPy3,
637 	    "PyUnicodeUCS2_Decode");
638     ucs_as_encoded_string = symbol_from_dll(hinstPy3,
639 	    "PyUnicodeUCS2_AsEncodedString");
640     if (!ucs_from_string || !ucs_decode || !ucs_as_encoded_string)
641     {
642 	ucs_from_string = symbol_from_dll(hinstPy3,
643 		"PyUnicodeUCS4_FromString");
644 	ucs_decode = symbol_from_dll(hinstPy3,
645 		"PyUnicodeUCS4_Decode");
646 	ucs_as_encoded_string = symbol_from_dll(hinstPy3,
647 		"PyUnicodeUCS4_AsEncodedString");
648     }
649 # endif
650     if (ucs_from_string && ucs_decode && ucs_as_encoded_string)
651     {
652 	py3_PyUnicode_FromString = ucs_from_string;
653 	py3_PyUnicode_Decode = ucs_decode;
654 	py3_PyUnicode_AsEncodedString = ucs_as_encoded_string;
655     }
656     else
657     {
658 	close_dll(hinstPy3);
659 	hinstPy3 = 0;
660 	if (verbose)
661 	    EMSG2(_(e_loadfunc), "PyUnicode_UCSX_*");
662 	return FAIL;
663     }
664 
665     return OK;
666 }
667 
668 /*
669  * If python is enabled (there is installed python on Windows system) return
670  * TRUE, else FALSE.
671  */
672     int
673 python3_enabled(int verbose)
674 {
675     return py3_runtime_link_init(DYNAMIC_PYTHON3_DLL, verbose) == OK;
676 }
677 
678 /* Load the standard Python exceptions - don't import the symbols from the
679  * DLL, as this can cause errors (importing data symbols is not reliable).
680  */
681 static void get_py3_exceptions __ARGS((void));
682 
683     static void
684 get_py3_exceptions()
685 {
686     PyObject *exmod = PyImport_ImportModule("builtins");
687     PyObject *exdict = PyModule_GetDict(exmod);
688     p3imp_PyExc_AttributeError = PyDict_GetItemString(exdict, "AttributeError");
689     p3imp_PyExc_IndexError = PyDict_GetItemString(exdict, "IndexError");
690     p3imp_PyExc_KeyError = PyDict_GetItemString(exdict, "KeyError");
691     p3imp_PyExc_KeyboardInterrupt = PyDict_GetItemString(exdict, "KeyboardInterrupt");
692     p3imp_PyExc_TypeError = PyDict_GetItemString(exdict, "TypeError");
693     p3imp_PyExc_ValueError = PyDict_GetItemString(exdict, "ValueError");
694     p3imp_PyExc_SystemExit = PyDict_GetItemString(exdict, "SystemExit");
695     p3imp_PyExc_RuntimeError = PyDict_GetItemString(exdict, "RuntimeError");
696     p3imp_PyExc_ImportError = PyDict_GetItemString(exdict, "ImportError");
697     p3imp_PyExc_OverflowError = PyDict_GetItemString(exdict, "OverflowError");
698     Py_XINCREF(p3imp_PyExc_AttributeError);
699     Py_XINCREF(p3imp_PyExc_IndexError);
700     Py_XINCREF(p3imp_PyExc_KeyError);
701     Py_XINCREF(p3imp_PyExc_KeyboardInterrupt);
702     Py_XINCREF(p3imp_PyExc_TypeError);
703     Py_XINCREF(p3imp_PyExc_ValueError);
704     Py_XINCREF(p3imp_PyExc_SystemExit);
705     Py_XINCREF(p3imp_PyExc_RuntimeError);
706     Py_XINCREF(p3imp_PyExc_ImportError);
707     Py_XINCREF(p3imp_PyExc_OverflowError);
708     Py_XDECREF(exmod);
709 }
710 #endif /* DYNAMIC_PYTHON3 */
711 
712 static int py3initialised = 0;
713 
714 #define PYINITIALISED py3initialised
715 
716 #define DESTRUCTOR_FINISH(self) Py_TYPE(self)->tp_free((PyObject*)self)
717 
718 #define WIN_PYTHON_REF(win) win->w_python3_ref
719 #define BUF_PYTHON_REF(buf) buf->b_python3_ref
720 #define TAB_PYTHON_REF(tab) tab->tp_python3_ref
721 
722     static void
723 call_PyObject_Free(void *p)
724 {
725 #if defined(Py_DEBUG) && !defined(Py_DEBUG_NO_PYMALLOC)
726     _PyObject_DebugFree(p);
727 #else
728     PyObject_Free(p);
729 #endif
730 }
731 
732     static PyObject *
733 call_PyType_GenericNew(PyTypeObject *type, PyObject *args, PyObject *kwds)
734 {
735     return PyType_GenericNew(type,args,kwds);
736 }
737 
738     static PyObject *
739 call_PyType_GenericAlloc(PyTypeObject *type, Py_ssize_t nitems)
740 {
741     return PyType_GenericAlloc(type,nitems);
742 }
743 
744 static PyObject *OutputGetattro(PyObject *, PyObject *);
745 static int OutputSetattro(PyObject *, PyObject *, PyObject *);
746 static PyObject *BufferGetattro(PyObject *, PyObject *);
747 static int BufferSetattro(PyObject *, PyObject *, PyObject *);
748 static PyObject *TabPageGetattro(PyObject *, PyObject *);
749 static PyObject *WindowGetattro(PyObject *, PyObject *);
750 static int WindowSetattro(PyObject *, PyObject *, PyObject *);
751 static PyObject *RangeGetattro(PyObject *, PyObject *);
752 static PyObject *CurrentGetattro(PyObject *, PyObject *);
753 static int CurrentSetattro(PyObject *, PyObject *, PyObject *);
754 static PyObject *DictionaryGetattro(PyObject *, PyObject *);
755 static int DictionarySetattro(PyObject *, PyObject *, PyObject *);
756 static PyObject *ListGetattro(PyObject *, PyObject *);
757 static int ListSetattro(PyObject *, PyObject *, PyObject *);
758 static PyObject *FunctionGetattro(PyObject *, PyObject *);
759 
760 static PyObject *VimPathHook(PyObject *, PyObject *);
761 
762 static struct PyModuleDef vimmodule;
763 
764 #define PY_CAN_RECURSE
765 
766 /*
767  * Include the code shared with if_python.c
768  */
769 #include "if_py_both.h"
770 
771 #define GET_ATTR_STRING(name, nameobj) \
772     char	*name = ""; \
773     if (PyUnicode_Check(nameobj)) \
774 	name = _PyUnicode_AsString(nameobj)
775 
776 #define PY3OBJ_DELETED(obj) (obj->ob_base.ob_refcnt<=0)
777 
778 /******************************************************
779  * Internal function prototypes.
780  */
781 
782 static PyObject *Py3Init_vim(void);
783 
784 /******************************************************
785  * 1. Python interpreter main program.
786  */
787 
788     void
789 python3_end()
790 {
791     static int recurse = 0;
792 
793     /* If a crash occurs while doing this, don't try again. */
794     if (recurse != 0)
795 	return;
796 
797     ++recurse;
798 
799 #ifdef DYNAMIC_PYTHON3
800     if (hinstPy3)
801 #endif
802     if (Py_IsInitialized())
803     {
804 	// acquire lock before finalizing
805 	PyGILState_Ensure();
806 
807 	Py_Finalize();
808     }
809 
810 #ifdef DYNAMIC_PYTHON3
811     end_dynamic_python3();
812 #endif
813 
814     --recurse;
815 }
816 
817 #if (defined(DYNAMIC_PYTHON) && defined(FEAT_PYTHON)) || defined(PROTO)
818     int
819 python3_loaded()
820 {
821     return (hinstPy3 != 0);
822 }
823 #endif
824 
825     static int
826 Python3_Init(void)
827 {
828     if (!py3initialised)
829     {
830 #ifdef DYNAMIC_PYTHON3
831 	if (!python3_enabled(TRUE))
832 	{
833 	    EMSG(_("E263: Sorry, this command is disabled, the Python library could not be loaded."));
834 	    goto fail;
835 	}
836 #endif
837 
838 	init_structs();
839 
840 
841 #ifdef PYTHON3_HOME
842 	Py_SetPythonHome(PYTHON3_HOME);
843 #endif
844 
845 	PyImport_AppendInittab("vim", Py3Init_vim);
846 
847 #if !defined(MACOS) || defined(MACOS_X_UNIX)
848 	Py_Initialize();
849 #else
850 	PyMac_Initialize();
851 #endif
852 	/* Initialise threads, and below save the state using
853 	 * PyEval_SaveThread.  Without the call to PyEval_SaveThread, thread
854 	 * specific state (such as the system trace hook), will be lost
855 	 * between invocations of Python code. */
856 	PyEval_InitThreads();
857 #ifdef DYNAMIC_PYTHON3
858 	get_py3_exceptions();
859 #endif
860 
861 	if (PythonIO_Init_io())
862 	    goto fail;
863 
864 	globals = PyModule_GetDict(PyImport_AddModule("__main__"));
865 
866 	/* Remove the element from sys.path that was added because of our
867 	 * argv[0] value in Py3Init_vim().  Previously we used an empty
868 	 * string, but depending on the OS we then get an empty entry or
869 	 * the current directory in sys.path.
870 	 * Only after vim has been imported, the element does exist in
871 	 * sys.path.
872 	 */
873 	PyRun_SimpleString("import vim; import sys; sys.path = list(filter(lambda x: not x.endswith('must>not&exist'), sys.path))");
874 
875 	/* lock is created and acquired in PyEval_InitThreads() and thread
876 	 * state is created in Py_Initialize()
877 	 * there _PyGILState_NoteThreadState() also sets gilcounter to 1
878 	 * (python must have threads enabled!)
879 	 * so the following does both: unlock GIL and save thread state in TLS
880 	 * without deleting thread state
881 	 */
882 	PyEval_SaveThread();
883 
884 	py3initialised = 1;
885     }
886 
887     return 0;
888 
889 fail:
890     /* We call PythonIO_Flush() here to print any Python errors.
891      * This is OK, as it is possible to call this function even
892      * if PythonIO_Init_io() has not completed successfully (it will
893      * not do anything in this case).
894      */
895     PythonIO_Flush();
896     return -1;
897 }
898 
899 /*
900  * External interface
901  */
902     static void
903 DoPyCommand(const char *cmd, rangeinitializer init_range, runner run, void *arg)
904 {
905 #if defined(MACOS) && !defined(MACOS_X_UNIX)
906     GrafPtr		oldPort;
907 #endif
908 #if defined(HAVE_LOCALE_H) || defined(X_LOCALE)
909     char		*saved_locale;
910 #endif
911     PyObject		*cmdstr;
912     PyObject		*cmdbytes;
913     PyGILState_STATE	pygilstate;
914 
915 #if defined(MACOS) && !defined(MACOS_X_UNIX)
916     GetPort(&oldPort);
917     /* Check if the Python library is available */
918     if ((Ptr)PyMac_Initialize == (Ptr)kUnresolvedCFragSymbolAddress)
919 	goto theend;
920 #endif
921     if (Python3_Init())
922 	goto theend;
923 
924     init_range(arg);
925 
926     Python_Release_Vim();	    /* leave vim */
927 
928 #if defined(HAVE_LOCALE_H) || defined(X_LOCALE)
929     /* Python only works properly when the LC_NUMERIC locale is "C". */
930     saved_locale = setlocale(LC_NUMERIC, NULL);
931     if (saved_locale == NULL || STRCMP(saved_locale, "C") == 0)
932 	saved_locale = NULL;
933     else
934     {
935 	/* Need to make a copy, value may change when setting new locale. */
936 	saved_locale = (char *)vim_strsave((char_u *)saved_locale);
937 	(void)setlocale(LC_NUMERIC, "C");
938     }
939 #endif
940 
941     pygilstate = PyGILState_Ensure();
942 
943     /* PyRun_SimpleString expects a UTF-8 string. Wrong encoding may cause
944      * SyntaxError (unicode error). */
945     cmdstr = PyUnicode_Decode(cmd, strlen(cmd),
946 					(char *)ENC_OPT, CODEC_ERROR_HANDLER);
947     cmdbytes = PyUnicode_AsEncodedString(cmdstr, "utf-8", CODEC_ERROR_HANDLER);
948     Py_XDECREF(cmdstr);
949 
950     run(PyBytes_AsString(cmdbytes), arg, &pygilstate);
951     Py_XDECREF(cmdbytes);
952 
953     PyGILState_Release(pygilstate);
954 
955 #if defined(HAVE_LOCALE_H) || defined(X_LOCALE)
956     if (saved_locale != NULL)
957     {
958 	(void)setlocale(LC_NUMERIC, saved_locale);
959 	vim_free(saved_locale);
960     }
961 #endif
962 
963     Python_Lock_Vim();		    /* enter vim */
964     PythonIO_Flush();
965 #if defined(MACOS) && !defined(MACOS_X_UNIX)
966     SetPort(oldPort);
967 #endif
968 
969 theend:
970     return;	    /* keeps lint happy */
971 }
972 
973 /*
974  * ":py3"
975  */
976     void
977 ex_py3(exarg_T *eap)
978 {
979     char_u *script;
980 
981     script = script_get(eap, eap->arg);
982     if (!eap->skip)
983     {
984 	DoPyCommand(script == NULL ? (char *) eap->arg : (char *) script,
985 		(rangeinitializer) init_range_cmd,
986 		(runner) run_cmd,
987 		(void *) eap);
988     }
989     vim_free(script);
990 }
991 
992 #define BUFFER_SIZE 2048
993 
994 /*
995  * ":py3file"
996  */
997     void
998 ex_py3file(exarg_T *eap)
999 {
1000     static char buffer[BUFFER_SIZE];
1001     const char *file;
1002     char *p;
1003     int i;
1004 
1005     /* Have to do it like this. PyRun_SimpleFile requires you to pass a
1006      * stdio file pointer, but Vim and the Python DLL are compiled with
1007      * different options under Windows, meaning that stdio pointers aren't
1008      * compatible between the two. Yuk.
1009      *
1010      * construct: exec(compile(open('a_filename', 'rb').read(), 'a_filename', 'exec'))
1011      *
1012      * Using bytes so that Python can detect the source encoding as it normally
1013      * does. The doc does not say "compile" accept bytes, though.
1014      *
1015      * We need to escape any backslashes or single quotes in the file name, so that
1016      * Python won't mangle the file name.
1017      */
1018 
1019     strcpy(buffer, "exec(compile(open('");
1020     p = buffer + 19; /* size of "exec(compile(open('" */
1021 
1022     for (i=0; i<2; ++i)
1023     {
1024 	file = (char *)eap->arg;
1025 	while (*file && p < buffer + (BUFFER_SIZE - 3))
1026 	{
1027 	    if (*file == '\\' || *file == '\'')
1028 		*p++ = '\\';
1029 	    *p++ = *file++;
1030 	}
1031 	/* If we didn't finish the file name, we hit a buffer overflow */
1032 	if (*file != '\0')
1033 	    return;
1034 	if (i==0)
1035 	{
1036 	    strcpy(p,"','rb').read(),'");
1037 	    p += 16;
1038 	}
1039 	else
1040 	{
1041 	    strcpy(p,"','exec'))");
1042 	    p += 10;
1043 	}
1044     }
1045 
1046 
1047     /* Execute the file */
1048     DoPyCommand(buffer,
1049 	    (rangeinitializer) init_range_cmd,
1050 	    (runner) run_cmd,
1051 	    (void *) eap);
1052 }
1053 
1054     void
1055 ex_py3do(exarg_T *eap)
1056 {
1057     DoPyCommand((char *)eap->arg,
1058 	    (rangeinitializer)init_range_cmd,
1059 	    (runner)run_do,
1060 	    (void *)eap);
1061 }
1062 
1063 /******************************************************
1064  * 2. Python output stream: writes output via [e]msg().
1065  */
1066 
1067 /* Implementation functions
1068  */
1069 
1070     static PyObject *
1071 OutputGetattro(PyObject *self, PyObject *nameobj)
1072 {
1073     GET_ATTR_STRING(name, nameobj);
1074 
1075     if (strcmp(name, "softspace") == 0)
1076 	return PyLong_FromLong(((OutputObject *)(self))->softspace);
1077 
1078     return PyObject_GenericGetAttr(self, nameobj);
1079 }
1080 
1081     static int
1082 OutputSetattro(PyObject *self, PyObject *nameobj, PyObject *val)
1083 {
1084     GET_ATTR_STRING(name, nameobj);
1085 
1086     return OutputSetattr((OutputObject *)(self), name, val);
1087 }
1088 
1089 /******************************************************
1090  * 3. Implementation of the Vim module for Python
1091  */
1092 
1093 /* Window type - Implementation functions
1094  * --------------------------------------
1095  */
1096 
1097 #define WindowType_Check(obj) ((obj)->ob_base.ob_type == &WindowType)
1098 
1099 /* Buffer type - Implementation functions
1100  * --------------------------------------
1101  */
1102 
1103 #define BufferType_Check(obj) ((obj)->ob_base.ob_type == &BufferType)
1104 
1105 static PyObject* BufferSubscript(PyObject *self, PyObject *idx);
1106 static Py_ssize_t BufferAsSubscript(PyObject *self, PyObject *idx, PyObject *val);
1107 
1108 /* Line range type - Implementation functions
1109  * --------------------------------------
1110  */
1111 
1112 #define RangeType_Check(obj) ((obj)->ob_base.ob_type == &RangeType)
1113 
1114 static PyObject* RangeSubscript(PyObject *self, PyObject *idx);
1115 static Py_ssize_t RangeAsItem(PyObject *, Py_ssize_t, PyObject *);
1116 static Py_ssize_t RangeAsSubscript(PyObject *self, PyObject *idx, PyObject *val);
1117 
1118 /* Current objects type - Implementation functions
1119  * -----------------------------------------------
1120  */
1121 
1122 static PySequenceMethods BufferAsSeq = {
1123     (lenfunc)		BufferLength,	    /* sq_length,    len(x)   */
1124     (binaryfunc)	0,		    /* sq_concat,    x+y      */
1125     (ssizeargfunc)	0,		    /* sq_repeat,    x*n      */
1126     (ssizeargfunc)	BufferItem,	    /* sq_item,      x[i]     */
1127     0,					    /* was_sq_slice,	 x[i:j]   */
1128     0,					    /* sq_ass_item,  x[i]=v   */
1129     0,					    /* sq_ass_slice, x[i:j]=v */
1130     0,					    /* sq_contains */
1131     0,					    /* sq_inplace_concat */
1132     0,					    /* sq_inplace_repeat */
1133 };
1134 
1135 static PyMappingMethods BufferAsMapping = {
1136     /* mp_length	*/ (lenfunc)BufferLength,
1137     /* mp_subscript     */ (binaryfunc)BufferSubscript,
1138     /* mp_ass_subscript */ (objobjargproc)BufferAsSubscript,
1139 };
1140 
1141 
1142 /* Buffer object
1143  */
1144 
1145     static PyObject *
1146 BufferGetattro(PyObject *self, PyObject *nameobj)
1147 {
1148     PyObject *r;
1149 
1150     GET_ATTR_STRING(name, nameobj);
1151 
1152     if ((r = BufferAttrValid((BufferObject *)(self), name)))
1153 	return r;
1154 
1155     if (CheckBuffer((BufferObject *)(self)))
1156 	return NULL;
1157 
1158     r = BufferAttr((BufferObject *)(self), name);
1159     if (r || PyErr_Occurred())
1160 	return r;
1161     else
1162 	return PyObject_GenericGetAttr(self, nameobj);
1163 }
1164 
1165     static int
1166 BufferSetattro(PyObject *self, PyObject *nameobj, PyObject *val)
1167 {
1168     GET_ATTR_STRING(name, nameobj);
1169 
1170     return BufferSetattr((BufferObject *)(self), name, val);
1171 }
1172 
1173 /******************/
1174 
1175     static PyObject *
1176 BufferSubscript(PyObject *self, PyObject* idx)
1177 {
1178     if (PyLong_Check(idx))
1179     {
1180 	long _idx = PyLong_AsLong(idx);
1181 	return BufferItem((BufferObject *)(self), _idx);
1182     } else if (PySlice_Check(idx))
1183     {
1184 	Py_ssize_t start, stop, step, slicelen;
1185 
1186 	if (CheckBuffer((BufferObject *) self))
1187 	    return NULL;
1188 
1189 	if (PySlice_GetIndicesEx((PyObject *)idx,
1190 	      (Py_ssize_t)((BufferObject *)(self))->buf->b_ml.ml_line_count,
1191 	      &start, &stop,
1192 	      &step, &slicelen) < 0)
1193 	{
1194 	    return NULL;
1195 	}
1196 	return BufferSlice((BufferObject *)(self), start, stop);
1197     }
1198     else
1199     {
1200 	RAISE_INVALID_INDEX_TYPE(idx);
1201 	return NULL;
1202     }
1203 }
1204 
1205     static Py_ssize_t
1206 BufferAsSubscript(PyObject *self, PyObject* idx, PyObject* val)
1207 {
1208     if (PyLong_Check(idx))
1209     {
1210 	long n = PyLong_AsLong(idx);
1211 	return RBAsItem((BufferObject *)(self), n, val, 1,
1212 		    (Py_ssize_t)((BufferObject *)(self))->buf->b_ml.ml_line_count,
1213 		    NULL);
1214     } else if (PySlice_Check(idx))
1215     {
1216 	Py_ssize_t start, stop, step, slicelen;
1217 
1218 	if (CheckBuffer((BufferObject *) self))
1219 	    return -1;
1220 
1221 	if (PySlice_GetIndicesEx((PyObject *)idx,
1222 	      (Py_ssize_t)((BufferObject *)(self))->buf->b_ml.ml_line_count,
1223 	      &start, &stop,
1224 	      &step, &slicelen) < 0)
1225 	{
1226 	    return -1;
1227 	}
1228 	return RBAsSlice((BufferObject *)(self), start, stop, val, 1,
1229 			  (PyInt)((BufferObject *)(self))->buf->b_ml.ml_line_count,
1230 			  NULL);
1231     }
1232     else
1233     {
1234 	RAISE_INVALID_INDEX_TYPE(idx);
1235 	return -1;
1236     }
1237 }
1238 
1239 static PySequenceMethods RangeAsSeq = {
1240     (lenfunc)		RangeLength,	 /* sq_length,	  len(x)   */
1241     (binaryfunc)	0,		 /* RangeConcat, sq_concat,  x+y   */
1242     (ssizeargfunc)	0,		 /* RangeRepeat, sq_repeat,  x*n   */
1243     (ssizeargfunc)	RangeItem,	 /* sq_item,	  x[i]	   */
1244     0,					 /* was_sq_slice,     x[i:j]   */
1245     (ssizeobjargproc)	RangeAsItem,	 /* sq_as_item,  x[i]=v   */
1246     0,					 /* sq_ass_slice, x[i:j]=v */
1247     0,					 /* sq_contains */
1248     0,					 /* sq_inplace_concat */
1249     0,					 /* sq_inplace_repeat */
1250 };
1251 
1252 static PyMappingMethods RangeAsMapping = {
1253     /* mp_length	*/ (lenfunc)RangeLength,
1254     /* mp_subscript     */ (binaryfunc)RangeSubscript,
1255     /* mp_ass_subscript */ (objobjargproc)RangeAsSubscript,
1256 };
1257 
1258 /* Line range object - Implementation
1259  */
1260 
1261     static PyObject *
1262 RangeGetattro(PyObject *self, PyObject *nameobj)
1263 {
1264     GET_ATTR_STRING(name, nameobj);
1265 
1266     if (strcmp(name, "start") == 0)
1267 	return Py_BuildValue("n", ((RangeObject *)(self))->start - 1);
1268     else if (strcmp(name, "end") == 0)
1269 	return Py_BuildValue("n", ((RangeObject *)(self))->end - 1);
1270     else
1271 	return PyObject_GenericGetAttr(self, nameobj);
1272 }
1273 
1274 /****************/
1275 
1276     static Py_ssize_t
1277 RangeAsItem(PyObject *self, Py_ssize_t n, PyObject *val)
1278 {
1279     return RBAsItem(((RangeObject *)(self))->buf, n, val,
1280 		    ((RangeObject *)(self))->start,
1281 		    ((RangeObject *)(self))->end,
1282 		    &((RangeObject *)(self))->end);
1283 }
1284 
1285     static Py_ssize_t
1286 RangeAsSlice(PyObject *self, Py_ssize_t lo, Py_ssize_t hi, PyObject *val)
1287 {
1288     return RBAsSlice(((RangeObject *)(self))->buf, lo, hi, val,
1289 		    ((RangeObject *)(self))->start,
1290 		    ((RangeObject *)(self))->end,
1291 		    &((RangeObject *)(self))->end);
1292 }
1293 
1294     static PyObject *
1295 RangeSubscript(PyObject *self, PyObject* idx)
1296 {
1297     if (PyLong_Check(idx))
1298     {
1299 	long _idx = PyLong_AsLong(idx);
1300 	return RangeItem((RangeObject *)(self), _idx);
1301     } else if (PySlice_Check(idx))
1302     {
1303 	Py_ssize_t start, stop, step, slicelen;
1304 
1305 	if (PySlice_GetIndicesEx((PyObject *)idx,
1306 		((RangeObject *)(self))->end-((RangeObject *)(self))->start+1,
1307 		&start, &stop,
1308 		&step, &slicelen) < 0)
1309 	{
1310 	    return NULL;
1311 	}
1312 	return RangeSlice((RangeObject *)(self), start, stop);
1313     }
1314     else
1315     {
1316 	RAISE_INVALID_INDEX_TYPE(idx);
1317 	return NULL;
1318     }
1319 }
1320 
1321     static Py_ssize_t
1322 RangeAsSubscript(PyObject *self, PyObject *idx, PyObject *val)
1323 {
1324     if (PyLong_Check(idx))
1325     {
1326 	long n = PyLong_AsLong(idx);
1327 	return RangeAsItem(self, n, val);
1328     } else if (PySlice_Check(idx))
1329     {
1330 	Py_ssize_t start, stop, step, slicelen;
1331 
1332 	if (PySlice_GetIndicesEx((PyObject *)idx,
1333 		((RangeObject *)(self))->end-((RangeObject *)(self))->start+1,
1334 		&start, &stop,
1335 		&step, &slicelen) < 0)
1336 	{
1337 	    return -1;
1338 	}
1339 	return RangeAsSlice(self, start, stop, val);
1340     }
1341     else
1342     {
1343 	RAISE_INVALID_INDEX_TYPE(idx);
1344 	return -1;
1345     }
1346 }
1347 
1348 /* TabPage object - Implementation
1349  */
1350 
1351     static PyObject *
1352 TabPageGetattro(PyObject *self, PyObject *nameobj)
1353 {
1354     PyObject *r;
1355 
1356     GET_ATTR_STRING(name, nameobj);
1357 
1358     if ((r = TabPageAttrValid((TabPageObject *)(self), name)))
1359 	return r;
1360 
1361     if (CheckTabPage((TabPageObject *)(self)))
1362 	return NULL;
1363 
1364     r = TabPageAttr((TabPageObject *)(self), name);
1365     if (r || PyErr_Occurred())
1366 	return r;
1367     else
1368 	return PyObject_GenericGetAttr(self, nameobj);
1369 }
1370 
1371 /* Window object - Implementation
1372  */
1373 
1374     static PyObject *
1375 WindowGetattro(PyObject *self, PyObject *nameobj)
1376 {
1377     PyObject *r;
1378 
1379     GET_ATTR_STRING(name, nameobj);
1380 
1381     if ((r = WindowAttrValid((WindowObject *)(self), name)))
1382 	return r;
1383 
1384     if (CheckWindow((WindowObject *)(self)))
1385 	return NULL;
1386 
1387     r = WindowAttr((WindowObject *)(self), name);
1388     if (r || PyErr_Occurred())
1389 	return r;
1390     else
1391 	return PyObject_GenericGetAttr(self, nameobj);
1392 }
1393 
1394     static int
1395 WindowSetattro(PyObject *self, PyObject *nameobj, PyObject *val)
1396 {
1397     GET_ATTR_STRING(name, nameobj);
1398 
1399     return WindowSetattr((WindowObject *)(self), name, val);
1400 }
1401 
1402 /* Tab page list object - Definitions
1403  */
1404 
1405 static PySequenceMethods TabListAsSeq = {
1406     (lenfunc)	     TabListLength,	    /* sq_length,    len(x)   */
1407     (binaryfunc)     0,			    /* sq_concat,    x+y      */
1408     (ssizeargfunc)   0,			    /* sq_repeat,    x*n      */
1409     (ssizeargfunc)   TabListItem,	    /* sq_item,      x[i]     */
1410     0,					    /* sq_slice,     x[i:j]   */
1411     (ssizeobjargproc)0,			    /* sq_as_item,  x[i]=v   */
1412     0,					    /* sq_ass_slice, x[i:j]=v */
1413     0,					    /* sq_contains */
1414     0,					    /* sq_inplace_concat */
1415     0,					    /* sq_inplace_repeat */
1416 };
1417 
1418 /* Window list object - Definitions
1419  */
1420 
1421 static PySequenceMethods WinListAsSeq = {
1422     (lenfunc)	     WinListLength,	    /* sq_length,    len(x)   */
1423     (binaryfunc)     0,			    /* sq_concat,    x+y      */
1424     (ssizeargfunc)   0,			    /* sq_repeat,    x*n      */
1425     (ssizeargfunc)   WinListItem,	    /* sq_item,      x[i]     */
1426     0,					    /* sq_slice,     x[i:j]   */
1427     (ssizeobjargproc)0,			    /* sq_as_item,  x[i]=v   */
1428     0,					    /* sq_ass_slice, x[i:j]=v */
1429     0,					    /* sq_contains */
1430     0,					    /* sq_inplace_concat */
1431     0,					    /* sq_inplace_repeat */
1432 };
1433 
1434 /* Current items object - Implementation
1435  */
1436     static PyObject *
1437 CurrentGetattro(PyObject *self, PyObject *nameobj)
1438 {
1439     PyObject	*r;
1440     GET_ATTR_STRING(name, nameobj);
1441     if (!(r = CurrentGetattr(self, name)))
1442 	return PyObject_GenericGetAttr(self, nameobj);
1443     return r;
1444 }
1445 
1446     static int
1447 CurrentSetattro(PyObject *self, PyObject *nameobj, PyObject *value)
1448 {
1449     GET_ATTR_STRING(name, nameobj);
1450     return CurrentSetattr(self, name, value);
1451 }
1452 
1453 /* Dictionary object - Definitions
1454  */
1455 
1456     static PyObject *
1457 DictionaryGetattro(PyObject *self, PyObject *nameobj)
1458 {
1459     DictionaryObject	*this = ((DictionaryObject *) (self));
1460 
1461     GET_ATTR_STRING(name, nameobj);
1462 
1463     if (strcmp(name, "locked") == 0)
1464 	return PyLong_FromLong(this->dict->dv_lock);
1465     else if (strcmp(name, "scope") == 0)
1466 	return PyLong_FromLong(this->dict->dv_scope);
1467 
1468     return PyObject_GenericGetAttr(self, nameobj);
1469 }
1470 
1471     static int
1472 DictionarySetattro(PyObject *self, PyObject *nameobj, PyObject *val)
1473 {
1474     GET_ATTR_STRING(name, nameobj);
1475     return DictionarySetattr((DictionaryObject *)(self), name, val);
1476 }
1477 
1478 /* List object - Definitions
1479  */
1480 
1481 static PySequenceMethods ListAsSeq = {
1482     (lenfunc)		ListLength,	 /* sq_length,	  len(x)   */
1483     (binaryfunc)	0,		 /* RangeConcat, sq_concat,  x+y   */
1484     (ssizeargfunc)	0,		 /* RangeRepeat, sq_repeat,  x*n   */
1485     (ssizeargfunc)	ListItem,	 /* sq_item,	  x[i]	   */
1486     (void *)		0,		 /* was_sq_slice,     x[i:j]   */
1487     (ssizeobjargproc)	ListAssItem,	 /* sq_as_item,  x[i]=v   */
1488     (void *)		0,		 /* was_sq_ass_slice, x[i:j]=v */
1489     0,					 /* sq_contains */
1490     (binaryfunc)	ListConcatInPlace,/* sq_inplace_concat */
1491     0,					 /* sq_inplace_repeat */
1492 };
1493 
1494 static PyObject *ListSubscript(PyObject *, PyObject *);
1495 static Py_ssize_t ListAsSubscript(PyObject *, PyObject *, PyObject *);
1496 
1497 static PyMappingMethods ListAsMapping = {
1498     /* mp_length	*/ (lenfunc) ListLength,
1499     /* mp_subscript     */ (binaryfunc) ListSubscript,
1500     /* mp_ass_subscript */ (objobjargproc) ListAsSubscript,
1501 };
1502 
1503     static PyObject *
1504 ListSubscript(PyObject *self, PyObject* idx)
1505 {
1506     if (PyLong_Check(idx))
1507     {
1508 	long _idx = PyLong_AsLong(idx);
1509 	return ListItem((ListObject *)(self), _idx);
1510     }
1511     else if (PySlice_Check(idx))
1512     {
1513 	Py_ssize_t start, stop, step, slicelen;
1514 
1515 	if (PySlice_GetIndicesEx(idx, ListLength((ListObject *)(self)),
1516 				 &start, &stop, &step, &slicelen) < 0)
1517 	    return NULL;
1518 	return ListSlice((ListObject *)(self), start, stop);
1519     }
1520     else
1521     {
1522 	RAISE_INVALID_INDEX_TYPE(idx);
1523 	return NULL;
1524     }
1525 }
1526 
1527     static Py_ssize_t
1528 ListAsSubscript(PyObject *self, PyObject *idx, PyObject *obj)
1529 {
1530     if (PyLong_Check(idx))
1531     {
1532 	long _idx = PyLong_AsLong(idx);
1533 	return ListAssItem((ListObject *)(self), _idx, obj);
1534     }
1535     else if (PySlice_Check(idx))
1536     {
1537 	Py_ssize_t start, stop, step, slicelen;
1538 
1539 	if (PySlice_GetIndicesEx(idx, ListLength((ListObject *)(self)),
1540 				 &start, &stop, &step, &slicelen) < 0)
1541 	    return -1;
1542 	return ListAssSlice((ListObject *)(self), start, stop, obj);
1543     }
1544     else
1545     {
1546 	RAISE_INVALID_INDEX_TYPE(idx);
1547 	return -1;
1548     }
1549 }
1550 
1551     static PyObject *
1552 ListGetattro(PyObject *self, PyObject *nameobj)
1553 {
1554     GET_ATTR_STRING(name, nameobj);
1555 
1556     if (strcmp(name, "locked") == 0)
1557 	return PyLong_FromLong(((ListObject *) (self))->list->lv_lock);
1558 
1559     return PyObject_GenericGetAttr(self, nameobj);
1560 }
1561 
1562     static int
1563 ListSetattro(PyObject *self, PyObject *nameobj, PyObject *val)
1564 {
1565     GET_ATTR_STRING(name, nameobj);
1566     return ListSetattr((ListObject *)(self), name, val);
1567 }
1568 
1569 /* Function object - Definitions
1570  */
1571 
1572     static PyObject *
1573 FunctionGetattro(PyObject *self, PyObject *nameobj)
1574 {
1575     FunctionObject	*this = (FunctionObject *)(self);
1576 
1577     GET_ATTR_STRING(name, nameobj);
1578 
1579     if (strcmp(name, "name") == 0)
1580 	return PyUnicode_FromString((char *)(this->name));
1581 
1582     return PyObject_GenericGetAttr(self, nameobj);
1583 }
1584 
1585 /* External interface
1586  */
1587 
1588     void
1589 python3_buffer_free(buf_T *buf)
1590 {
1591     if (BUF_PYTHON_REF(buf) != NULL)
1592     {
1593 	BufferObject *bp = BUF_PYTHON_REF(buf);
1594 	bp->buf = INVALID_BUFFER_VALUE;
1595 	BUF_PYTHON_REF(buf) = NULL;
1596     }
1597 }
1598 
1599 #if defined(FEAT_WINDOWS) || defined(PROTO)
1600     void
1601 python3_window_free(win_T *win)
1602 {
1603     if (WIN_PYTHON_REF(win) != NULL)
1604     {
1605 	WindowObject *wp = WIN_PYTHON_REF(win);
1606 	wp->win = INVALID_WINDOW_VALUE;
1607 	WIN_PYTHON_REF(win) = NULL;
1608     }
1609 }
1610 
1611     void
1612 python3_tabpage_free(tabpage_T *tab)
1613 {
1614     if (TAB_PYTHON_REF(tab) != NULL)
1615     {
1616 	TabPageObject *tp = TAB_PYTHON_REF(tab);
1617 	tp->tab = INVALID_TABPAGE_VALUE;
1618 	TAB_PYTHON_REF(tab) = NULL;
1619     }
1620 }
1621 #endif
1622 
1623     static PyObject *
1624 Py3Init_vim(void)
1625 {
1626     /* The special value is removed from sys.path in Python3_Init(). */
1627     static wchar_t *(argv[2]) = {L"/must>not&exist/foo", NULL};
1628 
1629     if (init_types())
1630 	return NULL;
1631 
1632     /* Set sys.argv[] to avoid a crash in warn(). */
1633     PySys_SetArgv(1, argv);
1634 
1635     if ((vim_module = PyModule_Create(&vimmodule)) == NULL)
1636 	return NULL;
1637 
1638     if (populate_module(vim_module))
1639 	return NULL;
1640 
1641     if (init_sys_path())
1642 	return NULL;
1643 
1644     return vim_module;
1645 }
1646 
1647 /*************************************************************************
1648  * 4. Utility functions for handling the interface between Vim and Python.
1649  */
1650 
1651 /* Convert a Vim line into a Python string.
1652  * All internal newlines are replaced by null characters.
1653  *
1654  * On errors, the Python exception data is set, and NULL is returned.
1655  */
1656     static PyObject *
1657 LineToString(const char *str)
1658 {
1659     PyObject *result;
1660     Py_ssize_t len = strlen(str);
1661     char *tmp,*p;
1662 
1663     tmp = (char *)alloc((unsigned)(len+1));
1664     p = tmp;
1665     if (p == NULL)
1666     {
1667 	PyErr_NoMemory();
1668 	return NULL;
1669     }
1670 
1671     while (*str)
1672     {
1673 	if (*str == '\n')
1674 	    *p = '\0';
1675 	else
1676 	    *p = *str;
1677 
1678 	++p;
1679 	++str;
1680     }
1681     *p = '\0';
1682 
1683     result = PyUnicode_Decode(tmp, len, (char *)ENC_OPT, CODEC_ERROR_HANDLER);
1684 
1685     vim_free(tmp);
1686     return result;
1687 }
1688 
1689     void
1690 do_py3eval (char_u *str, typval_T *rettv)
1691 {
1692     DoPyCommand((char *) str,
1693 	    (rangeinitializer) init_range_eval,
1694 	    (runner) run_eval,
1695 	    (void *) rettv);
1696     switch(rettv->v_type)
1697     {
1698 	case VAR_DICT: ++rettv->vval.v_dict->dv_refcount; break;
1699 	case VAR_LIST: ++rettv->vval.v_list->lv_refcount; break;
1700 	case VAR_FUNC: func_ref(rettv->vval.v_string);    break;
1701 	case VAR_UNKNOWN:
1702 	    rettv->v_type = VAR_NUMBER;
1703 	    rettv->vval.v_number = 0;
1704 	    break;
1705     }
1706 }
1707 
1708     void
1709 set_ref_in_python3 (int copyID)
1710 {
1711     set_ref_in_py(copyID);
1712 }
1713