/* Module definition and import implementation */

#include "Python.h"

#include "Python-ast.h"

#undef Yield /* undefine macro conflicting with winbase.h */

#include "errcode.h"

#include "marshal.h"

#include "code.h"

#include "frameobject.h"

#include "osdefs.h"

#include "importdl.h"

#ifdef HAVE_FCNTL_H

#include <fcntl.h>

#endif

#ifdef __cplusplus

extern "C" {

#endif

#define CACHEDIR "__pycache__"

/* See _PyImport_FixupExtensionObject() below */

static PyObject *extensions = NULL;

/* This table is defined in config.c: */

extern struct _inittab _PyImport_Inittab[];

struct _inittab *PyImport_Inittab = _PyImport_Inittab;

static PyObject *initstr = NULL;

/*[clinic input]

module _imp

[clinic start generated code]*/

/*[clinic end generated code: output=da39a3ee5e6b4b0d input=9c332475d8686284]*/

/*[python input]

class fs_unicode_converter(CConverter):

type = 'PyObject *'

converter = 'PyUnicode_FSDecoder'

[python start generated code]*/

/*[python end generated code: output=da39a3ee5e6b4b0d input=9d6786230166006e]*/

/* Initialize things */

void

_PyImport_Init(void)

{

PyInterpreterState *interp = PyThreadState_Get()->interp;

initstr = PyUnicode_InternFromString("__init__");

if (initstr == NULL)

Py_FatalError("Can't initialize import variables");

interp->builtins_copy = PyDict_Copy(interp->builtins);

if (interp->builtins_copy == NULL)

Py_FatalError("Can't backup builtins dict");

}

void

_PyImportHooks_Init(void)

{

PyObject *v, *path_hooks = NULL;

int err = 0;

/* adding sys.path_hooks and sys.path_importer_cache */

v = PyList_New(0);

if (v == NULL)

goto error;

err = PySys_SetObject("meta_path", v);

Py_DECREF(v);

if (err)

goto error;

v = PyDict_New();

if (v == NULL)

goto error;

err = PySys_SetObject("path_importer_cache", v);

Py_DECREF(v);

if (err)

goto error;

path_hooks = PyList_New(0);

if (path_hooks == NULL)

goto error;

err = PySys_SetObject("path_hooks", path_hooks);

if (err) {

error:

PyErr_Print();

Py_FatalError("initializing sys.meta_path, sys.path_hooks, "

"or path_importer_cache failed");

}

Py_DECREF(path_hooks);

}

void

_PyImportZip_Init(void)

{

PyObject *path_hooks, *zimpimport;

int err = 0;

path_hooks = PySys_GetObject("path_hooks");

if (path_hooks == NULL) {

PyErr_SetString(PyExc_RuntimeError, "unable to get sys.path_hooks");

goto error;

}

if (Py_VerboseFlag)

PySys_WriteStderr("# installing zipimport hook\n");

zimpimport = PyImport_ImportModule("zipimport");

if (zimpimport == NULL) {

PyErr_Clear(); /* No zip import module -- okay */

if (Py_VerboseFlag)

PySys_WriteStderr("# can't import zipimport\n");

}

else {

_Py_IDENTIFIER(zipimporter);

PyObject *zipimporter = _PyObject_GetAttrId(zimpimport,

&PyId_zipimporter);

Py_DECREF(zimpimport);

if (zipimporter == NULL) {

PyErr_Clear(); /* No zipimporter object -- okay */

if (Py_VerboseFlag)

PySys_WriteStderr(

"# can't import zipimport.zipimporter\n");

}

else {

/* sys.path_hooks.insert(0, zipimporter) */

err = PyList_Insert(path_hooks, 0, zipimporter);

Py_DECREF(zipimporter);

if (err < 0) {

goto error;

}

if (Py_VerboseFlag)

PySys_WriteStderr(

"# installed zipimport hook\n");

}

}

return;

error:

PyErr_Print();

Py_FatalError("initializing zipimport failed");

}

/* Locking primitives to prevent parallel imports of the same module

in different threads to return with a partially loaded module.

These calls are serialized by the global interpreter lock. */

#ifdef WITH_THREAD

#include "pythread.h"

static PyThread_type_lock import_lock = 0;

static long import_lock_thread = -1;

static int import_lock_level = 0;

void

_PyImport_AcquireLock(void)

{

long me = PyThread_get_thread_ident();

if (me == -1)

return; /* Too bad */

if (import_lock == NULL) {

import_lock = PyThread_allocate_lock();

if (import_lock == NULL)

return; /* Nothing much we can do. */

}

if (import_lock_thread == me) {

import_lock_level++;

return;

}

if (import_lock_thread != -1 || !PyThread_acquire_lock(import_lock, 0))

{

PyThreadState *tstate = PyEval_SaveThread();

PyThread_acquire_lock(import_lock, 1);

PyEval_RestoreThread(tstate);

}

assert(import_lock_level == 0);

import_lock_thread = me;

import_lock_level = 1;

}

int

_PyImport_ReleaseLock(void)

{

long me = PyThread_get_thread_ident();

if (me == -1 || import_lock == NULL)

return 0; /* Too bad */

if (import_lock_thread != me)

return -1;

import_lock_level--;

assert(import_lock_level >= 0);

if (import_lock_level == 0) {

import_lock_thread = -1;

PyThread_release_lock(import_lock);

}

return 1;

}

/* This function is called from PyOS_AfterFork to ensure that newly

created child processes do not share locks with the parent.

We now acquire the import lock around fork() calls but on some platforms

(Solaris 9 and earlier? see isue7242) that still left us with problems. */

void

_PyImport_ReInitLock(void)

{

if (import_lock != NULL) {

import_lock = PyThread_allocate_lock();

if (import_lock == NULL) {

Py_FatalError("PyImport_ReInitLock failed to create a new lock");

}

}

if (import_lock_level > 1) {

/* Forked as a side effect of import */

long me = PyThread_get_thread_ident();

/* The following could fail if the lock is already held, but forking as

a side-effect of an import is a) rare, b) nuts, and c) difficult to

do thanks to the lock only being held when doing individual module

locks per import. */

PyThread_acquire_lock(import_lock, NOWAIT_LOCK);

import_lock_thread = me;

import_lock_level--;

} else {

import_lock_thread = -1;

import_lock_level = 0;

}

}

#endif

/*[clinic input]

_imp.lock_held

Return True if the import lock is currently held, else False.

On platforms without threads, return False.

[clinic start generated code]*/

PyDoc_STRVAR(_imp_lock_held__doc__,

"lock_held($module, /)\n"

"--\n"

"\n"

"Return True if the import lock is currently held, else False.\n"

"\n"

"On platforms without threads, return False.");

#define _IMP_LOCK_HELD_METHODDEF \

{"lock_held", (PyCFunction)_imp_lock_held, METH_NOARGS, _imp_lock_held__doc__},

static PyObject *

_imp_lock_held_impl(PyModuleDef *module);

static PyObject *

_imp_lock_held(PyModuleDef *module, PyObject *Py_UNUSED(ignored))

{

return _imp_lock_held_impl(module);

}

static PyObject *

_imp_lock_held_impl(PyModuleDef *module)

/*[clinic end generated code: output=dae65674966baa65 input=9b088f9b217d9bdf]*/

{

#ifdef WITH_THREAD

return PyBool_FromLong(import_lock_thread != -1);

#else

return PyBool_FromLong(0);

#endif

}

/*[clinic input]

_imp.acquire_lock

Acquires the interpreter's import lock for the current thread.

This lock should be used by import hooks to ensure thread-safety when importing

modules. On platforms without threads, this function does nothing.

[clinic start generated code]*/

PyDoc_STRVAR(_imp_acquire_lock__doc__,

"acquire_lock($module, /)\n"

"--\n"

"\n"

"Acquires the interpreter\'s import lock for the current thread.\n"

"\n"

"This lock should be used by import hooks to ensure thread-safety when importing\n"

"modules. On platforms without threads, this function does nothing.");

#define _IMP_ACQUIRE_LOCK_METHODDEF \

{"acquire_lock", (PyCFunction)_imp_acquire_lock, METH_NOARGS, _imp_acquire_lock__doc__},

static PyObject *

_imp_acquire_lock_impl(PyModuleDef *module);

static PyObject *

_imp_acquire_lock(PyModuleDef *module, PyObject *Py_UNUSED(ignored))

{

return _imp_acquire_lock_impl(module);

}

static PyObject *

_imp_acquire_lock_impl(PyModuleDef *module)

/*[clinic end generated code: output=478f1fa089fdb9a4 input=4a2d4381866d5fdc]*/

{

#ifdef WITH_THREAD

_PyImport_AcquireLock();

#endif

Py_INCREF(Py_None);

return Py_None;

}

/*[clinic input]

_imp.release_lock

Release the interpreter's import lock.

On platforms without threads, this function does nothing.

[clinic start generated code]*/

PyDoc_STRVAR(_imp_release_lock__doc__,

"release_lock($module, /)\n"

"--\n"

"\n"

"Release the interpreter\'s import lock.\n"

"\n"

"On platforms without threads, this function does nothing.");

#define _IMP_RELEASE_LOCK_METHODDEF \

{"release_lock", (PyCFunction)_imp_release_lock, METH_NOARGS, _imp_release_lock__doc__},

static PyObject *

_imp_release_lock_impl(PyModuleDef *module);

static PyObject *

_imp_release_lock(PyModuleDef *module, PyObject *Py_UNUSED(ignored))

{

return _imp_release_lock_impl(module);

}

static PyObject *

_imp_release_lock_impl(PyModuleDef *module)

/*[clinic end generated code: output=36c77a6832fdafd4 input=934fb11516dd778b]*/

{

#ifdef WITH_THREAD

if (_PyImport_ReleaseLock() < 0) {

PyErr_SetString(PyExc_RuntimeError,

"not holding the import lock");

return NULL;

}

#endif

Py_INCREF(Py_None);

return Py_None;

}

void

_PyImport_Fini(void)

{

Py_CLEAR(extensions);

#ifdef WITH_THREAD

if (import_lock != NULL) {

PyThread_free_lock(import_lock);

import_lock = NULL;

}

#endif

}

/* Helper for sys */

PyObject *

PyImport_GetModuleDict(void)

{

PyInterpreterState *interp = PyThreadState_GET()->interp;

if (interp->modules == NULL)

Py_FatalError("PyImport_GetModuleDict: no module dictionary!");

return interp->modules;

}

/* List of names to clear in sys */

static char* sys_deletes[] = {

"path", "argv", "ps1", "ps2",

"last_type", "last_value", "last_traceback",

"path_hooks", "path_importer_cache", "meta_path",

"__interactivehook__",

/* misc stuff */

"flags", "float_info",

NULL

};

static char* sys_files[] = {

"stdin", "__stdin__",

"stdout", "__stdout__",

"stderr", "__stderr__",

NULL

};

/* Un-initialize things, as good as we can */

void

PyImport_Cleanup(void)

{

Py_ssize_t pos;

PyObject *key, *value, *dict;

PyInterpreterState *interp = PyThreadState_GET()->interp;

PyObject *modules = interp->modules;

PyObject *weaklist = NULL;

char **p;

if (modules == NULL)

return; /* Already done */

/* Delete some special variables first. These are common

places where user values hide and people complain when their

destructors fail. Since the modules containing them are

deleted *last* of all, they would come too late in the normal

destruction order. Sigh. */

/* XXX Perhaps these precautions are obsolete. Who knows? */

if (Py_VerboseFlag)

PySys_WriteStderr("# clear builtins._\n");

PyDict_SetItemString(interp->builtins, "_", Py_None);

for (p = sys_deletes; *p != NULL; p++) {

if (Py_VerboseFlag)

PySys_WriteStderr("# clear sys.%s\n", *p);

PyDict_SetItemString(interp->sysdict, *p, Py_None);

}

for (p = sys_files; *p != NULL; p+=2) {

if (Py_VerboseFlag)

PySys_WriteStderr("# restore sys.%s\n", *p);

value = PyDict_GetItemString(interp->sysdict, *(p+1));

if (value == NULL)

value = Py_None;

PyDict_SetItemString(interp->sysdict, *p, value);

}

/* We prepare a list which will receive (name, weakref) tuples of

modules when they are removed from sys.modules. The name is used

for diagnosis messages (in verbose mode), while the weakref helps

detect those modules which have been held alive. */

weaklist = PyList_New(0);

if (weaklist == NULL)

PyErr_Clear();

#define STORE_MODULE_WEAKREF(name, mod) \

if (weaklist != NULL) { \

PyObject *wr = PyWeakref_NewRef(mod, NULL); \

if (name && wr) { \

PyObject *tup = PyTuple_Pack(2, name, wr); \

PyList_Append(weaklist, tup); \

Py_XDECREF(tup); \

} \

Py_XDECREF(wr); \

if (PyErr_Occurred()) \

PyErr_Clear(); \

}

/* Remove all modules from sys.modules, hoping that garbage collection

can reclaim most of them. */

pos = 0;

while (PyDict_Next(modules, &pos, &key, &value)) {

if (PyModule_Check(value)) {

if (Py_VerboseFlag && PyUnicode_Check(key))

PySys_FormatStderr("# cleanup[2] removing %U\n", key);

STORE_MODULE_WEAKREF(key, value);

PyDict_SetItem(modules, key, Py_None);

}

}

/* Clear the modules dict. */

PyDict_Clear(modules);

/* Restore the original builtins dict, to ensure that any

user data gets cleared. */

dict = PyDict_Copy(interp->builtins);

if (dict == NULL)

PyErr_Clear();

PyDict_Clear(interp->builtins);

if (PyDict_Update(interp->builtins, interp->builtins_copy))

PyErr_Clear();

Py_XDECREF(dict);

/* Clear module dict copies stored in the interpreter state */

_PyState_ClearModules();

/* Collect references */

_PyGC_CollectNoFail();

/* Dump GC stats before it's too late, since it uses the warnings

machinery. */

_PyGC_DumpShutdownStats();

/* Now, if there are any modules left alive, clear their globals to

minimize potential leaks. All C extension modules actually end

up here, since they are kept alive in the interpreter state.

The special treatment of "builtins" here is because even

when it's not referenced as a module, its dictionary is

referenced by almost every module's __builtins__. Since

deleting a module clears its dictionary (even if there are

references left to it), we need to delete the "builtins"

module last. Likewise, we don't delete sys until the very

end because it is implicitly referenced (e.g. by print). */

if (weaklist != NULL) {

Py_ssize_t i, n;

n = PyList_GET_SIZE(weaklist);

for (i = 0; i < n; i++) {

PyObject *tup = PyList_GET_ITEM(weaklist, i);

PyObject *name = PyTuple_GET_ITEM(tup, 0);

PyObject *mod = PyWeakref_GET_OBJECT(PyTuple_GET_ITEM(tup, 1));

if (mod == Py_None)

continue;

assert(PyModule_Check(mod));

dict = PyModule_GetDict(mod);

if (dict == interp->builtins || dict == interp->sysdict)

continue;

Py_INCREF(mod);

if (Py_VerboseFlag && PyUnicode_Check(name))

PySys_FormatStderr("# cleanup[3] wiping %U\n", name);

_PyModule_Clear(mod);

Py_DECREF(mod);

}

Py_DECREF(weaklist);

}

/* Next, delete sys and builtins (in that order) */

if (Py_VerboseFlag)

PySys_FormatStderr("# cleanup[3] wiping sys\n");

_PyModule_ClearDict(interp->sysdict);

if (Py_VerboseFlag)

PySys_FormatStderr("# cleanup[3] wiping builtins\n");

_PyModule_ClearDict(interp->builtins);

/* Clear and delete the modules directory. Actual modules will

still be there only if imported during the execution of some

destructor. */

interp->modules = NULL;

Py_DECREF(modules);

/* Once more */

_PyGC_CollectNoFail();

#undef STORE_MODULE_WEAKREF

}

/* Helper for pythonrun.c -- return magic number and tag. */

long

PyImport_GetMagicNumber(void)

{

long res;

PyInterpreterState *interp = PyThreadState_Get()->interp;

PyObject *pyc_magic = PyObject_GetAttrString(interp->importlib,

"_RAW_MAGIC_NUMBER");

if (pyc_magic == NULL)

return -1;

res = PyLong_AsLong(pyc_magic);

Py_DECREF(pyc_magic);

return res;

}

extern const char * _PySys_ImplCacheTag;

const char *

PyImport_GetMagicTag(void)

{

return _PySys_ImplCacheTag;

}

/* Magic for extension modules (built-in as well as dynamically

loaded). To prevent initializing an extension module more than

once, we keep a static dictionary 'extensions' keyed by the tuple

(module name, module name) (for built-in modules) or by

(filename, module name) (for dynamically loaded modules), containing these

modules. A copy of the module's dictionary is stored by calling

_PyImport_FixupExtensionObject() immediately after the module initialization

function succeeds. A copy can be retrieved from there by calling

_PyImport_FindExtensionObject().

Modules which do support multiple initialization set their m_size

field to a non-negative number (indicating the size of the

module-specific state). They are still recorded in the extensions

dictionary, to avoid loading shared libraries twice.

*/

int

_PyImport_FixupExtensionObject(PyObject *mod, PyObject *name,

PyObject *filename)

{

PyObject *modules, *dict, *key;

struct PyModuleDef *def;

int res;

if (extensions == NULL) {

extensions = PyDict_New();

if (extensions == NULL)

return -1;

}

if (mod == NULL || !PyModule_Check(mod)) {

PyErr_BadInternalCall();

return -1;

}

def = PyModule_GetDef(mod);

if (!def) {

PyErr_BadInternalCall();

return -1;

}

modules = PyImport_GetModuleDict();

if (PyDict_SetItem(modules, name, mod) < 0)

return -1;

if (_PyState_AddModule(mod, def) < 0) {

PyDict_DelItem(modules, name);

return -1;

}

if (def->m_size == -1) {

if (def->m_base.m_copy) {

/* Somebody already imported the module,

likely under a different name.

XXX this should really not happen. */

Py_CLEAR(def->m_base.m_copy);

}

dict = PyModule_GetDict(mod);

if (dict == NULL)

return -1;

def->m_base.m_copy = PyDict_Copy(dict);

if (def->m_base.m_copy == NULL)

return -1;

}

key = PyTuple_Pack(2, filename, name);

if (key == NULL)

return -1;

res = PyDict_SetItem(extensions, key, (PyObject *)def);

Py_DECREF(key);

if (res < 0)

return -1;

return 0;

}

int

_PyImport_FixupBuiltin(PyObject *mod, const char *name)

{

int res;

PyObject *nameobj;

nameobj = PyUnicode_InternFromString(name);

if (nameobj == NULL)

return -1;

res = _PyImport_FixupExtensionObject(mod, nameobj, nameobj);

Py_DECREF(nameobj);

return res;

}

PyObject *

_PyImport_FindExtensionObject(PyObject *name, PyObject *filename)

{

PyObject *mod, *mdict, *key;

PyModuleDef* def;

if (extensions == NULL)

return NULL;

key = PyTuple_Pack(2, filename, name);

if (key == NULL)

return NULL;

def = (PyModuleDef *)PyDict_GetItem(extensions, key);

Py_DECREF(key);

if (def == NULL)

return NULL;

if (def->m_size == -1) {

/* Module does not support repeated initialization */

if (def->m_base.m_copy == NULL)

return NULL;

mod = PyImport_AddModuleObject(name);

if (mod == NULL)

return NULL;

mdict = PyModule_GetDict(mod);

if (mdict == NULL)

return NULL;

if (PyDict_Update(mdict, def->m_base.m_copy))

return NULL;

}

else {

if (def->m_base.m_init == NULL)

return NULL;

mod = def->m_base.m_init();

if (mod == NULL)

return NULL;

if (PyDict_SetItem(PyImport_GetModuleDict(), name, mod) == -1) {

Py_DECREF(mod);

return NULL;

}

Py_DECREF(mod);

}

if (_PyState_AddModule(mod, def) < 0) {

PyDict_DelItem(PyImport_GetModuleDict(), name);

Py_DECREF(mod);

return NULL;

}

if (Py_VerboseFlag)

PySys_FormatStderr("import %U # previously loaded (%R)\n",

name, filename);

return mod;

}

PyObject *

_PyImport_FindBuiltin(const char *name)

{

PyObject *res, *nameobj;

nameobj = PyUnicode_InternFromString(name);

if (nameobj == NULL)

return NULL;

res = _PyImport_FindExtensionObject(nameobj, nameobj);

Py_DECREF(nameobj);

return res;

}

/* Get the module object corresponding to a module name.

First check the modules dictionary if there's one there,

if not, create a new one and insert it in the modules dictionary.

Because the former action is most common, THIS DOES NOT RETURN A

'NEW' REFERENCE! */

PyObject *

PyImport_AddModuleObject(PyObject *name)

{

PyObject *modules = PyImport_GetModuleDict();

PyObject *m;

if ((m = PyDict_GetItem(modules, name)) != NULL &&

PyModule_Check(m))

return m;

m = PyModule_NewObject(name);

if (m == NULL)

return NULL;

if (PyDict_SetItem(modules, name, m) != 0) {

Py_DECREF(m);

return NULL;

}

Py_DECREF(m); /* Yes, it still exists, in modules! */

return m;

}

PyObject *

PyImport_AddModule(const char *name)

{

PyObject *nameobj, *module;

nameobj = PyUnicode_FromString(name);

if (nameobj == NULL)

return NULL;

module = PyImport_AddModuleObject(nameobj);

Py_DECREF(nameobj);

return module;

}

/* Remove name from sys.modules, if it's there. */

static void

remove_module(PyObject *name)

{

PyObject *modules = PyImport_GetModuleDict();

if (PyDict_GetItem(modules, name) == NULL)

return;

if (PyDict_DelItem(modules, name) < 0)

Py_FatalError("import: deleting existing key in"

"sys.modules failed");

}

/* Execute a code object in a module and return the module object

* WITH INCREMENTED REFERENCE COUNT. If an error occurs, name is

* removed from sys.modules, to avoid leaving damaged module objects

* in sys.modules. The caller may wish to restore the original

* module object (if any) in this case; PyImport_ReloadModule is an

* example.

*

* Note that PyImport_ExecCodeModuleWithPathnames() is the preferred, richer

* interface. The other two exist primarily for backward compatibility.

*/

PyObject *

PyImport_ExecCodeModule(const char *name, PyObject *co)

{

return PyImport_ExecCodeModuleWithPathnames(

name, co, (char *)NULL, (char *)NULL);

}

PyObject *

PyImport_ExecCodeModuleEx(const char *name, PyObject *co, const char *pathname)

{

return PyImport_ExecCodeModuleWithPathnames(

name, co, pathname, (char *)NULL);

}

PyObject *

PyImport_ExecCodeModuleWithPathnames(const char *name, PyObject *co,

const char *pathname,

const char *cpathname)

{

PyObject *m = NULL;

PyObject *nameobj, *pathobj = NULL, *cpathobj = NULL;

nameobj = PyUnicode_FromString(name);

if (nameobj == NULL)

return NULL;

if (cpathname != NULL) {

cpathobj = PyUnicode_DecodeFSDefault(cpathname);

if (cpathobj == NULL)

goto error;

}

else

cpathobj = NULL;

if (pathname != NULL) {

pathobj = PyUnicode_DecodeFSDefault(pathname);

if (pathobj == NULL)

goto error;

}

else if (cpathobj != NULL) {

PyInterpreterState *interp = PyThreadState_GET()->interp;

_Py_IDENTIFIER(_get_sourcefile);

if (interp == NULL) {

Py_FatalError("PyImport_ExecCodeModuleWithPathnames: "

"no interpreter!");

}

pathobj = _PyObject_CallMethodIdObjArgs(interp->importlib,

&PyId__get_sourcefile, cpathobj,

NULL);

if (pathobj == NULL)

PyErr_Clear();

}

else

pathobj = NULL;

m = PyImport_ExecCodeModuleObject(nameobj, co, pathobj, cpathobj);

error:

Py_DECREF(nameobj);

Py_XDECREF(pathobj);

Py_XDECREF(cpathobj);

return m;

}

static PyObject *

module_dict_for_exec(PyObject *name)

{

PyObject *m, *d = NULL;

m = PyImport_AddModuleObject(name);

if (m == NULL)

return NULL;

/* If the module is being reloaded, we get the old module back

and re-use its dict to exec the new code. */

d = PyModule_GetDict(m);

if (PyDict_GetItemString(d, "__builtins__") == NULL) {

if (PyDict_SetItemString(d, "__builtins__",

PyEval_GetBuiltins()) != 0) {

remove_module(name);

return NULL;

}

}

return d; /* Return a borrowed reference. */

}

static PyObject *

exec_code_in_module(PyObject *name, PyObject *module_dict, PyObject *code_object)

{

PyObject *modules = PyImport_GetModuleDict();

PyObject *v, *m;

v = PyEval_EvalCode(code_object, module_dict, module_dict);

if (v == NULL) {

remove_module(name);

return NULL;

}

Py_DECREF(v);

if ((m = PyDict_GetItem(modules, name)) == NULL) {

PyErr_Format(PyExc_ImportError,

"Loaded module %R not found in sys.modules",

name);

return NULL;

}

Py_INCREF(m);

return m;

}

PyObject*

PyImport_ExecCodeModuleObject(PyObject *name, PyObject *co, PyObject *pathname,

PyObject *cpathname)

{

PyObject *d, *res;

PyInterpreterState *interp = PyThreadState_GET()->interp;

_Py_IDENTIFIER(_fix_up_module);

d = module_dict_for_exec(name);

if (d == NULL) {

return NULL;

}

if (pathname == NULL) {

pathname = ((PyCodeObject *)co)->co_filename;

}

res = _PyObject_CallMethodIdObjArgs(interp->importlib,

&PyId__fix_up_module,

d, name, pathname, cpathname, NULL);

if (res != NULL) {

Py_DECREF(res);

res = exec_code_in_module(name, d, co);

}

return res;

}

static void

update_code_filenames(PyCodeObject *co, PyObject *oldname, PyObject *newname)

{

PyObject *constants, *tmp;

Py_ssize_t i, n;

if (PyUnicode_Compare(co->co_filename, oldname))

return;

tmp = co->co_filename;

co->co_filename = newname;

Py_INCREF(co->co_filename);

Py_DECREF(tmp);

constants = co->co_consts;

n = PyTuple_GET_SIZE(constants);

for (i = 0; i < n; i++) {

tmp = PyTuple_GET_ITEM(constants, i);

if (PyCode_Check(tmp))

update_code_filenames((PyCodeObject *)tmp,

oldname, newname);

}

}

static void

update_compiled_module(PyCodeObject *co, PyObject *newname)

{

PyObject *oldname;

if (PyUnicode_Compare(co->co_filename, newname) == 0)

return;

oldname = co->co_filename;

Py_INCREF(oldname);

update_code_filenames(co, oldname, newname);

Py_DECREF(oldname);

}

/*[clinic input]

_imp._fix_co_filename

code: object(type="PyCodeObject *", subclass_of="&PyCode_Type")

Code object to change.

path: unicode

File path to use.

/

Changes code.co_filename to specify the passed-in file path.

[clinic start generated code]*/

PyDoc_STRVAR(_imp__fix_co_filename__doc__,

"_fix_co_filename($module, code, path, /)\n"

"--\n"

"\n"

"Changes code.co_filename to specify the passed-in file path.\n"

"\n"

" code\n"

" Code object to change.\n"

" path\n"

" File path to use.");

#define _IMP__FIX_CO_FILENAME_METHODDEF \

{"_fix_co_filename", (PyCFunction)_imp__fix_co_filename, METH_VARARGS, _imp__fix_co_filename__doc__},

static PyObject *

_imp__fix_co_filename_impl(PyModuleDef *module, PyCodeObject *code, PyObject *path);

static PyObject *

_imp__fix_co_filename(PyModuleDef *module, PyObject *args)

{

PyObject *return_value = NULL;

PyCodeObject *code;

PyObject *path;

if (!PyArg_ParseTuple(args,

"O!U:_fix_co_filename",

&PyCode_Type, &code, &path))

goto exit;

return_value = _imp__fix_co_filename_impl(module, code, path);

exit:

return return_value;