PageRenderTime 54ms CodeModel.GetById 26ms RepoModel.GetById 1ms app.codeStats 0ms

/kbe/src/lib/python/Objects/moduleobject.c

https://bitbucket.org/kbengine/kbengine
C | 446 lines | 388 code | 36 blank | 22 comment | 111 complexity | 2b204fd3e6d449d73b1234e47da83fcf MD5 | raw file
  1. /* Module object implementation */
  2. #include "Python.h"
  3. #include "structmember.h"
  4. static Py_ssize_t max_module_number;
  5. typedef struct {
  6. PyObject_HEAD
  7. PyObject *md_dict;
  8. struct PyModuleDef *md_def;
  9. void *md_state;
  10. } PyModuleObject;
  11. static PyMemberDef module_members[] = {
  12. {"__dict__", T_OBJECT, offsetof(PyModuleObject, md_dict), READONLY},
  13. {0}
  14. };
  15. static PyTypeObject moduledef_type = {
  16. PyVarObject_HEAD_INIT(&PyType_Type, 0)
  17. "moduledef", /* tp_name */
  18. sizeof(struct PyModuleDef), /* tp_size */
  19. 0, /* tp_itemsize */
  20. };
  21. PyObject *
  22. PyModule_New(const char *name)
  23. {
  24. PyModuleObject *m;
  25. PyObject *nameobj;
  26. m = PyObject_GC_New(PyModuleObject, &PyModule_Type);
  27. if (m == NULL)
  28. return NULL;
  29. m->md_def = NULL;
  30. m->md_state = NULL;
  31. nameobj = PyUnicode_FromString(name);
  32. m->md_dict = PyDict_New();
  33. if (m->md_dict == NULL || nameobj == NULL)
  34. goto fail;
  35. if (PyDict_SetItemString(m->md_dict, "__name__", nameobj) != 0)
  36. goto fail;
  37. if (PyDict_SetItemString(m->md_dict, "__doc__", Py_None) != 0)
  38. goto fail;
  39. if (PyDict_SetItemString(m->md_dict, "__package__", Py_None) != 0)
  40. goto fail;
  41. Py_DECREF(nameobj);
  42. PyObject_GC_Track(m);
  43. return (PyObject *)m;
  44. fail:
  45. Py_XDECREF(nameobj);
  46. Py_DECREF(m);
  47. return NULL;
  48. }
  49. PyObject *
  50. PyModule_Create2(struct PyModuleDef* module, int module_api_version)
  51. {
  52. PyObject *d, *v, *n;
  53. PyMethodDef *ml;
  54. const char* name;
  55. PyModuleObject *m;
  56. PyInterpreterState *interp = PyThreadState_Get()->interp;
  57. if (interp->modules == NULL)
  58. Py_FatalError("Python import machinery not initialized");
  59. if (PyType_Ready(&moduledef_type) < 0)
  60. return NULL;
  61. if (module->m_base.m_index == 0) {
  62. max_module_number++;
  63. Py_REFCNT(module) = 1;
  64. Py_TYPE(module) = &moduledef_type;
  65. module->m_base.m_index = max_module_number;
  66. }
  67. name = module->m_name;
  68. if (module_api_version != PYTHON_API_VERSION && module_api_version != PYTHON_ABI_VERSION) {
  69. int err;
  70. err = PyErr_WarnFormat(PyExc_RuntimeWarning, 1,
  71. "Python C API version mismatch for module %.100s: "
  72. "This Python has API version %d, module %.100s has version %d.",
  73. name,
  74. PYTHON_API_VERSION, name, module_api_version);
  75. if (err)
  76. return NULL;
  77. }
  78. /* Make sure name is fully qualified.
  79. This is a bit of a hack: when the shared library is loaded,
  80. the module name is "package.module", but the module calls
  81. PyModule_Create*() with just "module" for the name. The shared
  82. library loader squirrels away the true name of the module in
  83. _Py_PackageContext, and PyModule_Create*() will substitute this
  84. (if the name actually matches).
  85. */
  86. if (_Py_PackageContext != NULL) {
  87. char *p = strrchr(_Py_PackageContext, '.');
  88. if (p != NULL && strcmp(module->m_name, p+1) == 0) {
  89. name = _Py_PackageContext;
  90. _Py_PackageContext = NULL;
  91. }
  92. }
  93. if ((m = (PyModuleObject*)PyModule_New(name)) == NULL)
  94. return NULL;
  95. if (module->m_size > 0) {
  96. m->md_state = PyMem_MALLOC(module->m_size);
  97. if (!m->md_state) {
  98. PyErr_NoMemory();
  99. Py_DECREF(m);
  100. return NULL;
  101. }
  102. memset(m->md_state, 0, module->m_size);
  103. }
  104. d = PyModule_GetDict((PyObject*)m);
  105. if (module->m_methods != NULL) {
  106. n = PyUnicode_FromString(name);
  107. if (n == NULL) {
  108. Py_DECREF(m);
  109. return NULL;
  110. }
  111. for (ml = module->m_methods; ml->ml_name != NULL; ml++) {
  112. if ((ml->ml_flags & METH_CLASS) ||
  113. (ml->ml_flags & METH_STATIC)) {
  114. PyErr_SetString(PyExc_ValueError,
  115. "module functions cannot set"
  116. " METH_CLASS or METH_STATIC");
  117. Py_DECREF(n);
  118. Py_DECREF(m);
  119. return NULL;
  120. }
  121. v = PyCFunction_NewEx(ml, (PyObject*)m, n);
  122. if (v == NULL) {
  123. Py_DECREF(n);
  124. Py_DECREF(m);
  125. return NULL;
  126. }
  127. if (PyDict_SetItemString(d, ml->ml_name, v) != 0) {
  128. Py_DECREF(v);
  129. Py_DECREF(n);
  130. Py_DECREF(m);
  131. return NULL;
  132. }
  133. Py_DECREF(v);
  134. }
  135. Py_DECREF(n);
  136. }
  137. if (module->m_doc != NULL) {
  138. v = PyUnicode_FromString(module->m_doc);
  139. if (v == NULL || PyDict_SetItemString(d, "__doc__", v) != 0) {
  140. Py_XDECREF(v);
  141. Py_DECREF(m);
  142. return NULL;
  143. }
  144. Py_DECREF(v);
  145. }
  146. m->md_def = module;
  147. return (PyObject*)m;
  148. }
  149. PyObject *
  150. PyModule_GetDict(PyObject *m)
  151. {
  152. PyObject *d;
  153. if (!PyModule_Check(m)) {
  154. PyErr_BadInternalCall();
  155. return NULL;
  156. }
  157. d = ((PyModuleObject *)m) -> md_dict;
  158. if (d == NULL)
  159. ((PyModuleObject *)m) -> md_dict = d = PyDict_New();
  160. return d;
  161. }
  162. const char *
  163. PyModule_GetName(PyObject *m)
  164. {
  165. PyObject *d;
  166. PyObject *nameobj;
  167. if (!PyModule_Check(m)) {
  168. PyErr_BadArgument();
  169. return NULL;
  170. }
  171. d = ((PyModuleObject *)m)->md_dict;
  172. if (d == NULL ||
  173. (nameobj = PyDict_GetItemString(d, "__name__")) == NULL ||
  174. !PyUnicode_Check(nameobj))
  175. {
  176. PyErr_SetString(PyExc_SystemError, "nameless module");
  177. return NULL;
  178. }
  179. return _PyUnicode_AsString(nameobj);
  180. }
  181. PyObject*
  182. PyModule_GetFilenameObject(PyObject *m)
  183. {
  184. PyObject *d;
  185. PyObject *fileobj;
  186. if (!PyModule_Check(m)) {
  187. PyErr_BadArgument();
  188. return NULL;
  189. }
  190. d = ((PyModuleObject *)m)->md_dict;
  191. if (d == NULL ||
  192. (fileobj = PyDict_GetItemString(d, "__file__")) == NULL ||
  193. !PyUnicode_Check(fileobj))
  194. {
  195. PyErr_SetString(PyExc_SystemError, "module filename missing");
  196. return NULL;
  197. }
  198. Py_INCREF(fileobj);
  199. return fileobj;
  200. }
  201. const char *
  202. PyModule_GetFilename(PyObject *m)
  203. {
  204. PyObject *fileobj;
  205. char *utf8;
  206. fileobj = PyModule_GetFilenameObject(m);
  207. if (fileobj == NULL)
  208. return NULL;
  209. utf8 = _PyUnicode_AsString(fileobj);
  210. Py_DECREF(fileobj);
  211. return utf8;
  212. }
  213. PyModuleDef*
  214. PyModule_GetDef(PyObject* m)
  215. {
  216. if (!PyModule_Check(m)) {
  217. PyErr_BadArgument();
  218. return NULL;
  219. }
  220. return ((PyModuleObject *)m)->md_def;
  221. }
  222. void*
  223. PyModule_GetState(PyObject* m)
  224. {
  225. if (!PyModule_Check(m)) {
  226. PyErr_BadArgument();
  227. return NULL;
  228. }
  229. return ((PyModuleObject *)m)->md_state;
  230. }
  231. void
  232. _PyModule_Clear(PyObject *m)
  233. {
  234. /* To make the execution order of destructors for global
  235. objects a bit more predictable, we first zap all objects
  236. whose name starts with a single underscore, before we clear
  237. the entire dictionary. We zap them by replacing them with
  238. None, rather than deleting them from the dictionary, to
  239. avoid rehashing the dictionary (to some extent). */
  240. Py_ssize_t pos;
  241. PyObject *key, *value;
  242. PyObject *d;
  243. d = ((PyModuleObject *)m)->md_dict;
  244. if (d == NULL)
  245. return;
  246. /* First, clear only names starting with a single underscore */
  247. pos = 0;
  248. while (PyDict_Next(d, &pos, &key, &value)) {
  249. if (value != Py_None && PyUnicode_Check(key)) {
  250. Py_UNICODE *u = PyUnicode_AS_UNICODE(key);
  251. if (u[0] == '_' && u[1] != '_') {
  252. if (Py_VerboseFlag > 1) {
  253. const char *s = _PyUnicode_AsString(key);
  254. if (s != NULL)
  255. PySys_WriteStderr("# clear[1] %s\n", s);
  256. else
  257. PyErr_Clear();
  258. }
  259. PyDict_SetItem(d, key, Py_None);
  260. }
  261. }
  262. }
  263. /* Next, clear all names except for __builtins__ */
  264. pos = 0;
  265. while (PyDict_Next(d, &pos, &key, &value)) {
  266. if (value != Py_None && PyUnicode_Check(key)) {
  267. Py_UNICODE *u = PyUnicode_AS_UNICODE(key);
  268. if (u[0] != '_'
  269. || PyUnicode_CompareWithASCIIString(key, "__builtins__") != 0)
  270. {
  271. if (Py_VerboseFlag > 1) {
  272. const char *s = _PyUnicode_AsString(key);
  273. if (s != NULL)
  274. PySys_WriteStderr("# clear[2] %s\n", s);
  275. else
  276. PyErr_Clear();
  277. }
  278. PyDict_SetItem(d, key, Py_None);
  279. }
  280. }
  281. }
  282. /* Note: we leave __builtins__ in place, so that destructors
  283. of non-global objects defined in this module can still use
  284. builtins, in particularly 'None'. */
  285. }
  286. /* Methods */
  287. static int
  288. module_init(PyModuleObject *m, PyObject *args, PyObject *kwds)
  289. {
  290. static char *kwlist[] = {"name", "doc", NULL};
  291. PyObject *dict, *name = Py_None, *doc = Py_None;
  292. if (!PyArg_ParseTupleAndKeywords(args, kwds, "U|O:module.__init__",
  293. kwlist, &name, &doc))
  294. return -1;
  295. dict = m->md_dict;
  296. if (dict == NULL) {
  297. dict = PyDict_New();
  298. if (dict == NULL)
  299. return -1;
  300. m->md_dict = dict;
  301. }
  302. if (PyDict_SetItemString(dict, "__name__", name) < 0)
  303. return -1;
  304. if (PyDict_SetItemString(dict, "__doc__", doc) < 0)
  305. return -1;
  306. return 0;
  307. }
  308. static void
  309. module_dealloc(PyModuleObject *m)
  310. {
  311. PyObject_GC_UnTrack(m);
  312. if (m->md_def && m->md_def->m_free)
  313. m->md_def->m_free(m);
  314. if (m->md_dict != NULL) {
  315. _PyModule_Clear((PyObject *)m);
  316. Py_DECREF(m->md_dict);
  317. }
  318. if (m->md_state != NULL)
  319. PyMem_FREE(m->md_state);
  320. Py_TYPE(m)->tp_free((PyObject *)m);
  321. }
  322. static PyObject *
  323. module_repr(PyModuleObject *m)
  324. {
  325. const char *name;
  326. PyObject *filename, *repr;
  327. name = PyModule_GetName((PyObject *)m);
  328. if (name == NULL) {
  329. PyErr_Clear();
  330. name = "?";
  331. }
  332. filename = PyModule_GetFilenameObject((PyObject *)m);
  333. if (filename == NULL) {
  334. PyErr_Clear();
  335. return PyUnicode_FromFormat("<module '%s' (built-in)>", name);
  336. }
  337. repr = PyUnicode_FromFormat("<module '%s' from '%U'>", name, filename);
  338. Py_DECREF(filename);
  339. return repr;
  340. }
  341. static int
  342. module_traverse(PyModuleObject *m, visitproc visit, void *arg)
  343. {
  344. if (m->md_def && m->md_def->m_traverse) {
  345. int res = m->md_def->m_traverse((PyObject*)m, visit, arg);
  346. if (res)
  347. return res;
  348. }
  349. Py_VISIT(m->md_dict);
  350. return 0;
  351. }
  352. static int
  353. module_clear(PyModuleObject *m)
  354. {
  355. if (m->md_def && m->md_def->m_clear) {
  356. int res = m->md_def->m_clear((PyObject*)m);
  357. if (res)
  358. return res;
  359. }
  360. Py_CLEAR(m->md_dict);
  361. return 0;
  362. }
  363. PyDoc_STRVAR(module_doc,
  364. "module(name[, doc])\n\
  365. \n\
  366. Create a module object.\n\
  367. The name must be a string; the optional doc argument can have any type.");
  368. PyTypeObject PyModule_Type = {
  369. PyVarObject_HEAD_INIT(&PyType_Type, 0)
  370. "module", /* tp_name */
  371. sizeof(PyModuleObject), /* tp_size */
  372. 0, /* tp_itemsize */
  373. (destructor)module_dealloc, /* tp_dealloc */
  374. 0, /* tp_print */
  375. 0, /* tp_getattr */
  376. 0, /* tp_setattr */
  377. 0, /* tp_reserved */
  378. (reprfunc)module_repr, /* tp_repr */
  379. 0, /* tp_as_number */
  380. 0, /* tp_as_sequence */
  381. 0, /* tp_as_mapping */
  382. 0, /* tp_hash */
  383. 0, /* tp_call */
  384. 0, /* tp_str */
  385. PyObject_GenericGetAttr, /* tp_getattro */
  386. PyObject_GenericSetAttr, /* tp_setattro */
  387. 0, /* tp_as_buffer */
  388. Py_TPFLAGS_DEFAULT | Py_TPFLAGS_HAVE_GC |
  389. Py_TPFLAGS_BASETYPE, /* tp_flags */
  390. module_doc, /* tp_doc */
  391. (traverseproc)module_traverse, /* tp_traverse */
  392. (inquiry)module_clear, /* tp_clear */
  393. 0, /* tp_richcompare */
  394. 0, /* tp_weaklistoffset */
  395. 0, /* tp_iter */
  396. 0, /* tp_iternext */
  397. 0, /* tp_methods */
  398. module_members, /* tp_members */
  399. 0, /* tp_getset */
  400. 0, /* tp_base */
  401. 0, /* tp_dict */
  402. 0, /* tp_descr_get */
  403. 0, /* tp_descr_set */
  404. offsetof(PyModuleObject, md_dict), /* tp_dictoffset */
  405. (initproc)module_init, /* tp_init */
  406. PyType_GenericAlloc, /* tp_alloc */
  407. PyType_GenericNew, /* tp_new */
  408. PyObject_GC_Del, /* tp_free */
  409. };