cpython-lru_cache-weakref: Modules/

annotate Modules/_lsprof.c @ 70817:dd775b1561ba

Fix markup.

author	Georg Brandl <georg@python.org>
date	Tue, 14 Jun 2011 21:09:55 +0200
parents	4f849720bf41
children	b87eac0369b5

rev	line source
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	1 #include "Python.h"
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	2 #include "frameobject.h"
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	3 #include "rotatingtree.h"
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	4
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	5 #if !defined(HAVE_LONG_LONG)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	6 #error "This module requires long longs!"
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	7 #endif
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	8
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	9 /* Selection of a high-precision timer */
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	10
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	11 #ifdef MS_WINDOWS
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	12
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	13 #include <windows.h>
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	14
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	15 static PY_LONG_LONG
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	16 hpTimer(void)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	17 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	18 LARGE_INTEGER li;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	19 QueryPerformanceCounter(&li);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	20 return li.QuadPart;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	21 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	22
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	23 static double
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	24 hpTimerUnit(void)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	25 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	26 LARGE_INTEGER li;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	27 if (QueryPerformanceFrequency(&li))
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	28 return 1.0 / li.QuadPart;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	29 else
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	30 return 0.000001; /* unlikely */
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	31 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	32
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	33 #else /* !MS_WINDOWS */
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	34
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	35 #ifndef HAVE_GETTIMEOFDAY
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	36 #error "This module requires gettimeofday() on non-Windows platforms!"
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	37 #endif
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	38
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	39 #if (defined(PYOS_OS2) && defined(PYCC_GCC))
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	40 #include <sys/time.h>
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	41 #else
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	42 #include <sys/resource.h>
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	43 #include <sys/times.h>
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	44 #endif
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	45
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	46 static PY_LONG_LONG
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	47 hpTimer(void)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	48 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	49 struct timeval tv;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	50 PY_LONG_LONG ret;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	51 #ifdef GETTIMEOFDAY_NO_TZ
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	52 gettimeofday(&tv);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	53 #else
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	54 gettimeofday(&tv, (struct timezone *)NULL);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	55 #endif
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	56 ret = tv.tv_sec;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	57 ret = ret * 1000000 + tv.tv_usec;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	58 return ret;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	59 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	60
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	61 static double
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	62 hpTimerUnit(void)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	63 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	64 return 0.000001;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	65 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	66
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	67 #endif /* MS_WINDOWS */
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	68
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	69 /************************************************************/
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	70 /* Written by Brett Rosen and Ted Czotter */
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	71
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	72 struct _ProfilerEntry;
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	73
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	74 /* represents a function called from another function */
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	75 typedef struct _ProfilerSubEntry {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	76 rotating_node_t header;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	77 PY_LONG_LONG tt;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	78 PY_LONG_LONG it;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	79 long callcount;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	80 long recursivecallcount;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	81 long recursionLevel;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	82 } ProfilerSubEntry;
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	83
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	84 /* represents a function or user defined block */
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	85 typedef struct _ProfilerEntry {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	86 rotating_node_t header;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	87 PyObject userObj; / PyCodeObject, or a descriptive str for builtins */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	88 PY_LONG_LONG tt; /* total time in this entry */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	89 PY_LONG_LONG it; /* inline time in this entry (not in subcalls) */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	90 long callcount; /* how many times this was called */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	91 long recursivecallcount; /* how many times called recursively */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	92 long recursionLevel;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	93 rotating_node_t *calls;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	94 } ProfilerEntry;
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	95
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	96 typedef struct _ProfilerContext {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	97 PY_LONG_LONG t0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	98 PY_LONG_LONG subt;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	99 struct _ProfilerContext *previous;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	100 ProfilerEntry *ctxEntry;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	101 } ProfilerContext;
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	102
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	103 typedef struct {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	104 PyObject_HEAD
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	105 rotating_node_t *profilerEntries;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	106 ProfilerContext *currentProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	107 ProfilerContext *freelistProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	108 int flags;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	109 PyObject *externalTimer;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	110 double externalTimerUnit;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	111 } ProfilerObject;
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	112
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	113 #define POF_ENABLED 0x001
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	114 #define POF_SUBCALLS 0x002
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	115 #define POF_BUILTINS 0x004
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	116 #define POF_NOMEMORY 0x100
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	117
37144 91dd4d44d3bc Finish getting rid of statichere/staticforward Neal Norwitz <nnorwitz@gmail.com> parents: 36861 diff changeset	118 static PyTypeObject PyProfiler_Type;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	119
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	120 #define PyProfiler_Check(op) PyObject_TypeCheck(op, &PyProfiler_Type)
44351 86a2679dca46 #1629: Renamed Py_Size, Py_Type and Py_Refcnt to Py_SIZE, Py_TYPE and Py_REFCNT. Christian Heimes <christian@cheimes.de> parents: 44098 diff changeset	121 #define PyProfiler_CheckExact(op) (Py_TYPE(op) == &PyProfiler_Type)
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	122
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	123 /* External Timers */
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	124
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	125 #define DOUBLE_TIMER_PRECISION 4294967296.0
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	126 static PyObject *empty_tuple;
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	127
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	128 static PY_LONG_LONG CallExternalTimer(ProfilerObject *pObj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	129 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	130 PY_LONG_LONG result;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	131 PyObject *o = PyObject_Call(pObj->externalTimer, empty_tuple, NULL);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	132 if (o == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	133 PyErr_WriteUnraisable(pObj->externalTimer);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	134 return 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	135 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	136 if (pObj->externalTimerUnit > 0.0) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	137 /* interpret the result as an integer that will be scaled
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	138 in profiler_getstats() */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	139 result = PyLong_AsLongLong(o);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	140 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	141 else {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	142 /* interpret the result as a double measured in seconds.
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	143 As the profiler works with PY_LONG_LONG internally
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	144 we convert it to a large integer */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	145 double val = PyFloat_AsDouble(o);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	146 /* error handling delayed to the code below */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	147 result = (PY_LONG_LONG) (val * DOUBLE_TIMER_PRECISION);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	148 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	149 Py_DECREF(o);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	150 if (PyErr_Occurred()) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	151 PyErr_WriteUnraisable(pObj->externalTimer);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	152 return 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	153 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	154 return result;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	155 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	156
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	157 #define CALL_TIMER(pObj) ((pObj)->externalTimer ? \
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	158 CallExternalTimer(pObj) : \
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	159 hpTimer())
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	160
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	161 /* ProfilerObject */
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	162
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	163 static PyObject *
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	164 normalizeUserObj(PyObject *obj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	165 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	166 PyCFunctionObject *fn;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	167 if (!PyCFunction_Check(obj)) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	168 Py_INCREF(obj);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	169 return obj;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	170 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	171 /* Replace built-in function objects with a descriptive string
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	172 because of built-in methods -- keeping a reference to
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	173 __self__ is probably not a good idea. */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	174 fn = (PyCFunctionObject *)obj;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	175
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	176 if (fn->m_self == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	177 /* built-in function: look up the module name */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	178 PyObject *mod = fn->m_module;
66822 4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	179 const char *modname;
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	180 if (mod && PyUnicode_Check(mod)) {
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	181 /* XXX: The following will truncate module names with embedded
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	182 * null-characters. It is unlikely that this can happen in
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	183 * practice and the concequences are not serious enough to
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	184 * introduce extra checks here.
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	185 */
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	186 modname = _PyUnicode_AsString(mod);
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	187 if (modname == NULL) {
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	188 modname = "<encoding error>";
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	189 PyErr_Clear();
66799 50d170bb71c7 Issue #6697: Fixed instances of _PyUnicode_AsString() result not checked for NULL Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66556 diff changeset	190 }
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	191 }
66822 4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	192 else if (mod && PyModule_Check(mod)) {
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	193 modname = PyModule_GetName(mod);
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	194 if (modname == NULL) {
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	195 PyErr_Clear();
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	196 modname = "builtins";
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	197 }
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	198 }
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	199 else {
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	200 modname = "builtins";
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	201 }
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	202 if (strcmp(modname, "builtins") != 0)
4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	203 return PyUnicode_FromFormat("<%s.%s>",
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	204 modname,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	205 fn->m_ml->ml_name);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	206 else
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	207 return PyUnicode_FromFormat("<%s>",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	208 fn->m_ml->ml_name);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	209 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	210 else {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	211 /* built-in method: try to return
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	212 repr(getattr(type(__self__), __name__))
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	213 */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	214 PyObject *self = fn->m_self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	215 PyObject *name = PyUnicode_FromString(fn->m_ml->ml_name);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	216 if (name != NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	217 PyObject *mo = _PyType_Lookup(Py_TYPE(self), name);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	218 Py_XINCREF(mo);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	219 Py_DECREF(name);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	220 if (mo != NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	221 PyObject *res = PyObject_Repr(mo);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	222 Py_DECREF(mo);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	223 if (res != NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	224 return res;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	225 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	226 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	227 PyErr_Clear();
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	228 return PyUnicode_FromFormat("<built-in method %s>",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	229 fn->m_ml->ml_name);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	230 }
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	231 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	232
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	233 static ProfilerEntry*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	234 newProfilerEntry(ProfilerObject pObj, void key, PyObject *userObj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	235 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	236 ProfilerEntry *self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	237 self = (ProfilerEntry*) malloc(sizeof(ProfilerEntry));
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	238 if (self == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	239 pObj->flags \|= POF_NOMEMORY;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	240 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	241 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	242 userObj = normalizeUserObj(userObj);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	243 if (userObj == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	244 PyErr_Clear();
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	245 free(self);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	246 pObj->flags \|= POF_NOMEMORY;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	247 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	248 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	249 self->header.key = key;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	250 self->userObj = userObj;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	251 self->tt = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	252 self->it = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	253 self->callcount = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	254 self->recursivecallcount = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	255 self->recursionLevel = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	256 self->calls = EMPTY_ROTATING_TREE;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	257 RotatingTree_Add(&pObj->profilerEntries, &self->header);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	258 return self;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	259 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	260
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	261 static ProfilerEntry*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	262 getEntry(ProfilerObject pObj, void key)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	263 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	264 return (ProfilerEntry*) RotatingTree_Get(&pObj->profilerEntries, key);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	265 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	266
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	267 static ProfilerSubEntry *
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	268 getSubEntry(ProfilerObject pObj, ProfilerEntry caller, ProfilerEntry* entry)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	269 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	270 return (ProfilerSubEntry*) RotatingTree_Get(&caller->calls,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	271 (void *)entry);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	272 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	273
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	274 static ProfilerSubEntry *
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	275 newSubEntry(ProfilerObject pObj, ProfilerEntry caller, ProfilerEntry* entry)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	276 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	277 ProfilerSubEntry *self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	278 self = (ProfilerSubEntry*) malloc(sizeof(ProfilerSubEntry));
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	279 if (self == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	280 pObj->flags \|= POF_NOMEMORY;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	281 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	282 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	283 self->header.key = (void *)entry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	284 self->tt = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	285 self->it = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	286 self->callcount = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	287 self->recursivecallcount = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	288 self->recursionLevel = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	289 RotatingTree_Add(&caller->calls, &self->header);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	290 return self;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	291 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	292
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	293 static int freeSubEntry(rotating_node_t header, void arg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	294 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	295 ProfilerSubEntry subentry = (ProfilerSubEntry) header;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	296 free(subentry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	297 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	298 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	299
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	300 static int freeEntry(rotating_node_t header, void arg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	301 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	302 ProfilerEntry entry = (ProfilerEntry) header;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	303 RotatingTree_Enum(entry->calls, freeSubEntry, NULL);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	304 Py_DECREF(entry->userObj);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	305 free(entry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	306 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	307 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	308
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	309 static void clearEntries(ProfilerObject *pObj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	310 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	311 RotatingTree_Enum(pObj->profilerEntries, freeEntry, NULL);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	312 pObj->profilerEntries = EMPTY_ROTATING_TREE;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	313 /* release the memory hold by the ProfilerContexts */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	314 if (pObj->currentProfilerContext) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	315 free(pObj->currentProfilerContext);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	316 pObj->currentProfilerContext = NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	317 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	318 while (pObj->freelistProfilerContext) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	319 ProfilerContext *c = pObj->freelistProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	320 pObj->freelistProfilerContext = c->previous;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	321 free(c);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	322 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	323 pObj->freelistProfilerContext = NULL;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	324 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	325
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	326 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	327 initContext(ProfilerObject pObj, ProfilerContext self, ProfilerEntry *entry)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	328 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	329 self->ctxEntry = entry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	330 self->subt = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	331 self->previous = pObj->currentProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	332 pObj->currentProfilerContext = self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	333 ++entry->recursionLevel;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	334 if ((pObj->flags & POF_SUBCALLS) && self->previous) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	335 /* find or create an entry for me in my caller's entry */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	336 ProfilerEntry *caller = self->previous->ctxEntry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	337 ProfilerSubEntry *subentry = getSubEntry(pObj, caller, entry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	338 if (subentry == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	339 subentry = newSubEntry(pObj, caller, entry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	340 if (subentry)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	341 ++subentry->recursionLevel;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	342 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	343 self->t0 = CALL_TIMER(pObj);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	344 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	345
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	346 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	347 Stop(ProfilerObject pObj, ProfilerContext self, ProfilerEntry *entry)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	348 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	349 PY_LONG_LONG tt = CALL_TIMER(pObj) - self->t0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	350 PY_LONG_LONG it = tt - self->subt;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	351 if (self->previous)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	352 self->previous->subt += tt;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	353 pObj->currentProfilerContext = self->previous;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	354 if (--entry->recursionLevel == 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	355 entry->tt += tt;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	356 else
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	357 ++entry->recursivecallcount;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	358 entry->it += it;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	359 entry->callcount++;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	360 if ((pObj->flags & POF_SUBCALLS) && self->previous) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	361 /* find or create an entry for me in my caller's entry */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	362 ProfilerEntry *caller = self->previous->ctxEntry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	363 ProfilerSubEntry *subentry = getSubEntry(pObj, caller, entry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	364 if (subentry) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	365 if (--subentry->recursionLevel == 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	366 subentry->tt += tt;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	367 else
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	368 ++subentry->recursivecallcount;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	369 subentry->it += it;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	370 ++subentry->callcount;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	371 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	372 }
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	373 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	374
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	375 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	376 ptrace_enter_call(PyObject self, void key, PyObject *userObj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	377 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	378 /* entering a call to the function identified by 'key'
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	379 (which can be a PyCodeObject or a PyMethodDef pointer) */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	380 ProfilerObject pObj = (ProfilerObject)self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	381 ProfilerEntry *profEntry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	382 ProfilerContext *pContext;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	383
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	384 /* In the case of entering a generator expression frame via a
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	385 * throw (gen_send_ex(.., 1)), we may already have an
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	386 * Exception set here. We must not mess around with this
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	387 * exception, and some of the code under here assumes that
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	388 * PyErr_* is its own to mess around with, so we have to
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	389 * save and restore any current exception. */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	390 PyObject last_type, last_value, *last_tb;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	391 PyErr_Fetch(&last_type, &last_value, &last_tb);
43292 876b7ef4775d Merged revisions 57778-58052 via svnmerge from Thomas Wouters <thomas@python.org> parents: 42888 diff changeset	392
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	393 profEntry = getEntry(pObj, key);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	394 if (profEntry == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	395 profEntry = newProfilerEntry(pObj, key, userObj);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	396 if (profEntry == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	397 goto restorePyerr;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	398 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	399 /* grab a ProfilerContext out of the free list */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	400 pContext = pObj->freelistProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	401 if (pContext) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	402 pObj->freelistProfilerContext = pContext->previous;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	403 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	404 else {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	405 /* free list exhausted, allocate a new one */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	406 pContext = (ProfilerContext*)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	407 malloc(sizeof(ProfilerContext));
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	408 if (pContext == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	409 pObj->flags \|= POF_NOMEMORY;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	410 goto restorePyerr;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	411 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	412 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	413 initContext(pObj, pContext, profEntry);
43292 876b7ef4775d Merged revisions 57778-58052 via svnmerge from Thomas Wouters <thomas@python.org> parents: 42888 diff changeset	414
876b7ef4775d Merged revisions 57778-58052 via svnmerge from Thomas Wouters <thomas@python.org> parents: 42888 diff changeset	415 restorePyerr:
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	416 PyErr_Restore(last_type, last_value, last_tb);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	417 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	418
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	419 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	420 ptrace_leave_call(PyObject self, void key)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	421 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	422 /* leaving a call to the function identified by 'key' */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	423 ProfilerObject pObj = (ProfilerObject)self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	424 ProfilerEntry *profEntry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	425 ProfilerContext *pContext;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	426
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	427 pContext = pObj->currentProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	428 if (pContext == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	429 return;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	430 profEntry = getEntry(pObj, key);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	431 if (profEntry) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	432 Stop(pObj, pContext, profEntry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	433 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	434 else {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	435 pObj->currentProfilerContext = pContext->previous;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	436 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	437 /* put pContext into the free list */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	438 pContext->previous = pObj->freelistProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	439 pObj->freelistProfilerContext = pContext;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	440 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	441
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	442 static int
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	443 profiler_callback(PyObject self, PyFrameObject frame, int what,
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	444 PyObject *arg)
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	445 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	446 switch (what) {
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	447
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	448 /* the 'frame' of a called function is about to start its execution */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	449 case PyTrace_CALL:
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	450 ptrace_enter_call(self, (void *)frame->f_code,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	451 (PyObject *)frame->f_code);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	452 break;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	453
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	454 /* the 'frame' of a called function is about to finish
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	455 (either normally or with an exception) */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	456 case PyTrace_RETURN:
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	457 ptrace_leave_call(self, (void *)frame->f_code);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	458 break;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	459
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	460 /* case PyTrace_EXCEPTION:
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	461 If the exception results in the function exiting, a
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	462 PyTrace_RETURN event will be generated, so we don't need to
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	463 handle it. */
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	464
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	465 #ifdef PyTrace_C_CALL /* not defined in Python <= 2.3 */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	466 /* the Python function 'frame' is issuing a call to the built-in
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	467 function 'arg' */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	468 case PyTrace_C_CALL:
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	469 if ((((ProfilerObject *)self)->flags & POF_BUILTINS)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	470 && PyCFunction_Check(arg)) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	471 ptrace_enter_call(self,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	472 ((PyCFunctionObject *)arg)->m_ml,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	473 arg);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	474 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	475 break;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	476
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	477 /* the call to the built-in function 'arg' is returning into its
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	478 caller 'frame' */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	479 case PyTrace_C_RETURN: /* ...normally */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	480 case PyTrace_C_EXCEPTION: /* ...with an exception set */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	481 if ((((ProfilerObject *)self)->flags & POF_BUILTINS)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	482 && PyCFunction_Check(arg)) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	483 ptrace_leave_call(self,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	484 ((PyCFunctionObject *)arg)->m_ml);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	485 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	486 break;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	487 #endif
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	488
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	489 default:
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	490 break;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	491 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	492 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	493 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	494
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	495 static int
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	496 pending_exception(ProfilerObject *pObj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	497 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	498 if (pObj->flags & POF_NOMEMORY) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	499 pObj->flags -= POF_NOMEMORY;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	500 PyErr_SetString(PyExc_MemoryError,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	501 "memory was exhausted while profiling");
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	502 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	503 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	504 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	505 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	506
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	507 /************************************************************/
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	508
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	509 static PyStructSequence_Field profiler_entry_fields[] = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	510 {"code", "code object or built-in function name"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	511 {"callcount", "how many times this was called"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	512 {"reccallcount", "how many times called recursively"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	513 {"totaltime", "total time in this entry"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	514 {"inlinetime", "inline time in this entry (not in subcalls)"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	515 {"calls", "details of the calls"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	516 {0}
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	517 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	518
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	519 static PyStructSequence_Field profiler_subentry_fields[] = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	520 {"code", "called code object or built-in function name"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	521 {"callcount", "how many times this is called"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	522 {"reccallcount", "how many times this is called recursively"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	523 {"totaltime", "total time spent in this call"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	524 {"inlinetime", "inline time (not in further subcalls)"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	525 {0}
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	526 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	527
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	528 static PyStructSequence_Desc profiler_entry_desc = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	529 "_lsprof.profiler_entry", /* name */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	530 NULL, /* doc */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	531 profiler_entry_fields,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	532 6
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	533 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	534
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	535 static PyStructSequence_Desc profiler_subentry_desc = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	536 "_lsprof.profiler_subentry", /* name */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	537 NULL, /* doc */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	538 profiler_subentry_fields,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	539 5
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	540 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	541
37879 f731859e9b3b Merge p3yk branch with the trunk up to revision 45595. This breaks a fair Thomas Wouters <thomas@python.org> parents: 37144 diff changeset	542 static int initialized;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	543 static PyTypeObject StatsEntryType;
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	544 static PyTypeObject StatsSubEntryType;
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	545
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	546
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	547 typedef struct {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	548 PyObject *list;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	549 PyObject *sublist;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	550 double factor;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	551 } statscollector_t;
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	552
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	553 static int statsForSubEntry(rotating_node_t node, void arg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	554 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	555 ProfilerSubEntry sentry = (ProfilerSubEntry) node;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	556 statscollector_t collect = (statscollector_t) arg;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	557 ProfilerEntry entry = (ProfilerEntry) sentry->header.key;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	558 int err;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	559 PyObject *sinfo;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	560 sinfo = PyObject_CallFunction((PyObject*) &StatsSubEntryType,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	561 "((Olldd))",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	562 entry->userObj,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	563 sentry->callcount,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	564 sentry->recursivecallcount,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	565 collect->factor * sentry->tt,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	566 collect->factor * sentry->it);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	567 if (sinfo == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	568 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	569 err = PyList_Append(collect->sublist, sinfo);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	570 Py_DECREF(sinfo);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	571 return err;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	572 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	573
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	574 static int statsForEntry(rotating_node_t node, void arg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	575 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	576 ProfilerEntry entry = (ProfilerEntry) node;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	577 statscollector_t collect = (statscollector_t) arg;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	578 PyObject *info;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	579 int err;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	580 if (entry->callcount == 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	581 return 0; /* skip */
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	582
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	583 if (entry->calls != EMPTY_ROTATING_TREE) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	584 collect->sublist = PyList_New(0);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	585 if (collect->sublist == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	586 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	587 if (RotatingTree_Enum(entry->calls,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	588 statsForSubEntry, collect) != 0) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	589 Py_DECREF(collect->sublist);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	590 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	591 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	592 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	593 else {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	594 Py_INCREF(Py_None);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	595 collect->sublist = Py_None;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	596 }
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	597
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	598 info = PyObject_CallFunction((PyObject*) &StatsEntryType,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	599 "((OllddO))",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	600 entry->userObj,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	601 entry->callcount,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	602 entry->recursivecallcount,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	603 collect->factor * entry->tt,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	604 collect->factor * entry->it,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	605 collect->sublist);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	606 Py_DECREF(collect->sublist);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	607 if (info == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	608 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	609 err = PyList_Append(collect->list, info);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	610 Py_DECREF(info);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	611 return err;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	612 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	613
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	614 PyDoc_STRVAR(getstats_doc, "\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	615 getstats() -> list of profiler_entry objects\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	616 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	617 Return all information collected by the profiler.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	618 Each profiler_entry is a tuple-like object with the\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	619 following attributes:\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	620 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	621 code code object\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	622 callcount how many times this was called\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	623 reccallcount how many times called recursively\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	624 totaltime total time in this entry\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	625 inlinetime inline time in this entry (not in subcalls)\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	626 calls details of the calls\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	627 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	628 The calls attribute is either None or a list of\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	629 profiler_subentry objects:\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	630 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	631 code called code object\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	632 callcount how many times this is called\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	633 reccallcount how many times this is called recursively\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	634 totaltime total time spent in this call\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	635 inlinetime inline time (not in further subcalls)\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	636 ");
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	637
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	638 static PyObject*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	639 profiler_getstats(ProfilerObject pObj, PyObject noarg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	640 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	641 statscollector_t collect;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	642 if (pending_exception(pObj))
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	643 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	644 if (!pObj->externalTimer)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	645 collect.factor = hpTimerUnit();
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	646 else if (pObj->externalTimerUnit > 0.0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	647 collect.factor = pObj->externalTimerUnit;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	648 else
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	649 collect.factor = 1.0 / DOUBLE_TIMER_PRECISION;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	650 collect.list = PyList_New(0);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	651 if (collect.list == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	652 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	653 if (RotatingTree_Enum(pObj->profilerEntries, statsForEntry, &collect)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	654 != 0) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	655 Py_DECREF(collect.list);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	656 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	657 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	658 return collect.list;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	659 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	660
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	661 static int
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	662 setSubcalls(ProfilerObject *pObj, int nvalue)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	663 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	664 if (nvalue == 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	665 pObj->flags &= ~POF_SUBCALLS;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	666 else if (nvalue > 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	667 pObj->flags \|= POF_SUBCALLS;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	668 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	669 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	670
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	671 static int
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	672 setBuiltins(ProfilerObject *pObj, int nvalue)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	673 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	674 if (nvalue == 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	675 pObj->flags &= ~POF_BUILTINS;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	676 else if (nvalue > 0) {
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	677 #ifndef PyTrace_C_CALL
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	678 PyErr_SetString(PyExc_ValueError,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	679 "builtins=True requires Python >= 2.4");
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	680 return -1;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	681 #else
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	682 pObj->flags \|= POF_BUILTINS;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	683 #endif
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	684 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	685 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	686 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	687
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	688 PyDoc_STRVAR(enable_doc, "\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	689 enable(subcalls=True, builtins=True)\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	690 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	691 Start collecting profiling information.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	692 If 'subcalls' is True, also records for each function\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	693 statistics separated according to its current caller.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	694 If 'builtins' is True, records the time spent in\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	695 built-in functions separately from their caller.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	696 ");
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	697
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	698 static PyObject*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	699 profiler_enable(ProfilerObject self, PyObject args, PyObject *kwds)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	700 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	701 int subcalls = -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	702 int builtins = -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	703 static char *kwlist[] = {"subcalls", "builtins", 0};
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	704 if (!PyArg_ParseTupleAndKeywords(args, kwds, "\|ii:enable",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	705 kwlist, &subcalls, &builtins))
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	706 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	707 if (setSubcalls(self, subcalls) < 0 \|\| setBuiltins(self, builtins) < 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	708 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	709 PyEval_SetProfile(profiler_callback, (PyObject*)self);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	710 self->flags \|= POF_ENABLED;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	711 Py_INCREF(Py_None);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	712 return Py_None;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	713 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	714
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	715 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	716 flush_unmatched(ProfilerObject *pObj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	717 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	718 while (pObj->currentProfilerContext) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	719 ProfilerContext *pContext = pObj->currentProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	720 ProfilerEntry *profEntry= pContext->ctxEntry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	721 if (profEntry)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	722 Stop(pObj, pContext, profEntry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	723 else
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	724 pObj->currentProfilerContext = pContext->previous;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	725 if (pContext)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	726 free(pContext);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	727 }
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	728
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	729 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	730
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	731 PyDoc_STRVAR(disable_doc, "\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	732 disable()\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	733 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	734 Stop collecting profiling information.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	735 ");
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	736
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	737 static PyObject*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	738 profiler_disable(ProfilerObject self, PyObject noarg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	739 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	740 self->flags &= ~POF_ENABLED;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	741 PyEval_SetProfile(NULL, NULL);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	742 flush_unmatched(self);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	743 if (pending_exception(self))
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	744 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	745 Py_INCREF(Py_None);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	746 return Py_None;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	747 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	748
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	749 PyDoc_STRVAR(clear_doc, "\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	750 clear()\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	751 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	752 Clear all profiling information collected so far.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	753 ");
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	754
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	755 static PyObject*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	756 profiler_clear(ProfilerObject pObj, PyObject noarg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	757 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	758 clearEntries(pObj);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	759 Py_INCREF(Py_None);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	760 return Py_None;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	761 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	762
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	763 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	764 profiler_dealloc(ProfilerObject *op)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	765 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	766 if (op->flags & POF_ENABLED)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	767 PyEval_SetProfile(NULL, NULL);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	768 flush_unmatched(op);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	769 clearEntries(op);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	770 Py_XDECREF(op->externalTimer);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	771 Py_TYPE(op)->tp_free(op);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	772 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	773
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	774 static int
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	775 profiler_init(ProfilerObject pObj, PyObject args, PyObject *kw)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	776 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	777 PyObject *o;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	778 PyObject *timer = NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	779 double timeunit = 0.0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	780 int subcalls = 1;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	781 #ifdef PyTrace_C_CALL
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	782 int builtins = 1;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	783 #else
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	784 int builtins = 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	785 #endif
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	786 static char *kwlist[] = {"timer", "timeunit",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	787 "subcalls", "builtins", 0};
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	788
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	789 if (!PyArg_ParseTupleAndKeywords(args, kw, "\|Odii:Profiler", kwlist,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	790 &timer, &timeunit,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	791 &subcalls, &builtins))
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	792 return -1;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	793
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	794 if (setSubcalls(pObj, subcalls) < 0 \|\| setBuiltins(pObj, builtins) < 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	795 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	796 o = pObj->externalTimer;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	797 pObj->externalTimer = timer;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	798 Py_XINCREF(timer);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	799 Py_XDECREF(o);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	800 pObj->externalTimerUnit = timeunit;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	801 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	802 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	803
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	804 static PyMethodDef profiler_methods[] = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	805 {"getstats", (PyCFunction)profiler_getstats,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	806 METH_NOARGS, getstats_doc},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	807 {"enable", (PyCFunction)profiler_enable,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	808 METH_VARARGS \| METH_KEYWORDS, enable_doc},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	809 {"disable", (PyCFunction)profiler_disable,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	810 METH_NOARGS, disable_doc},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	811 {"clear", (PyCFunction)profiler_clear,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	812 METH_NOARGS, clear_doc},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	813 {NULL, NULL}
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	814 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	815
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	816 PyDoc_STRVAR(profiler_doc, "\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	817 Profiler(custom_timer=None, time_unit=None, subcalls=True, builtins=True)\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	818 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	819 Builds a profiler object using the specified timer function.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	820 The default timer is a fast built-in one based on real time.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	821 For custom timer functions returning integers, time_unit can\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	822 be a float specifying a scale (i.e. how long each integer unit\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	823 is, in seconds).\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	824 ");
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	825
37144 91dd4d44d3bc Finish getting rid of statichere/staticforward Neal Norwitz <nnorwitz@gmail.com> parents: 36861 diff changeset	826 static PyTypeObject PyProfiler_Type = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	827 PyVarObject_HEAD_INIT(NULL, 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	828 "_lsprof.Profiler", /* tp_name */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	829 sizeof(ProfilerObject), /* tp_basicsize */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	830 0, /* tp_itemsize */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	831 (destructor)profiler_dealloc, /* tp_dealloc */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	832 0, /* tp_print */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	833 0, /* tp_getattr */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	834 0, /* tp_setattr */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	835 0, /* tp_reserved */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	836 0, /* tp_repr */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	837 0, /* tp_as_number */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	838 0, /* tp_as_sequence */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	839 0, /* tp_as_mapping */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	840 0, /* tp_hash */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	841 0, /* tp_call */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	842 0, /* tp_str */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	843 0, /* tp_getattro */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	844 0, /* tp_setattro */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	845 0, /* tp_as_buffer */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	846 Py_TPFLAGS_DEFAULT \| Py_TPFLAGS_BASETYPE, /* tp_flags */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	847 profiler_doc, /* tp_doc */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	848 0, /* tp_traverse */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	849 0, /* tp_clear */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	850 0, /* tp_richcompare */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	851 0, /* tp_weaklistoffset */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	852 0, /* tp_iter */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	853 0, /* tp_iternext */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	854 profiler_methods, /* tp_methods */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	855 0, /* tp_members */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	856 0, /* tp_getset */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	857 0, /* tp_base */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	858 0, /* tp_dict */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	859 0, /* tp_descr_get */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	860 0, /* tp_descr_set */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	861 0, /* tp_dictoffset */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	862 (initproc)profiler_init, /* tp_init */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	863 PyType_GenericAlloc, /* tp_alloc */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	864 PyType_GenericNew, /* tp_new */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	865 PyObject_Del, /* tp_free */
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	866 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	867
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	868 static PyMethodDef moduleMethods[] = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	869 {NULL, NULL}
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	870 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	871
47580 94f64f11fdd0 Implement PEP 3121: new module initialization and finalization API. Martin v. Löwis <martin@v.loewis.de> parents: 44351 diff changeset	872
94f64f11fdd0 Implement PEP 3121: new module initialization and finalization API. Martin v. Löwis <martin@v.loewis.de> parents: 44351 diff changeset	873 static struct PyModuleDef _lsprofmodule = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	874 PyModuleDef_HEAD_INIT,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	875 "_lsprof",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	876 "Fast profiler",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	877 -1,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	878 moduleMethods,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	879 NULL,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	880 NULL,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	881 NULL,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	882 NULL
47580 94f64f11fdd0 Implement PEP 3121: new module initialization and finalization API. Martin v. Löwis <martin@v.loewis.de> parents: 44351 diff changeset	883 };
94f64f11fdd0 Implement PEP 3121: new module initialization and finalization API. Martin v. Löwis <martin@v.loewis.de> parents: 44351 diff changeset	884
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	885 PyMODINIT_FUNC
47580 94f64f11fdd0 Implement PEP 3121: new module initialization and finalization API. Martin v. Löwis <martin@v.loewis.de> parents: 44351 diff changeset	886 PyInit__lsprof(void)
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	887 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	888 PyObject module, d;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	889 module = PyModule_Create(&_lsprofmodule);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	890 if (module == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	891 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	892 d = PyModule_GetDict(module);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	893 if (PyType_Ready(&PyProfiler_Type) < 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	894 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	895 PyDict_SetItemString(d, "Profiler", (PyObject *)&PyProfiler_Type);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	896
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	897 if (!initialized) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	898 PyStructSequence_InitType(&StatsEntryType,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	899 &profiler_entry_desc);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	900 PyStructSequence_InitType(&StatsSubEntryType,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	901 &profiler_subentry_desc);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	902 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	903 Py_INCREF((PyObject*) &StatsEntryType);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	904 Py_INCREF((PyObject*) &StatsSubEntryType);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	905 PyModule_AddObject(module, "profiler_entry",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	906 (PyObject*) &StatsEntryType);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	907 PyModule_AddObject(module, "profiler_subentry",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	908 (PyObject*) &StatsSubEntryType);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	909 empty_tuple = PyTuple_New(0);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	910 initialized = 1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	911 return module;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	912 }

Mercurial > cpython-lru_cache-weakref

annotate Modules/_lsprof.c @ 70817:dd775b1561ba