cpython-lru_cache-weakref: Modules/

annotate Modules/_lsprof.c @ 83447:678564fc0962 3.3

#17789: test_random now works with unittest test discovery. Patch by Zachary Ware.

author	Ezio Melotti <ezio.melotti@gmail.com>
date	Fri, 19 Apr 2013 05:45:27 +0300
parents	b87eac0369b5
children	dea15868963f

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;
70899 b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	179 PyObject *modname = NULL;
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	180 if (mod != NULL) {
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	181 if (PyUnicode_Check(mod)) {
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	182 modname = mod;
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	183 Py_INCREF(modname);
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	184 }
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	185 else if (PyModule_Check(mod)) {
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	186 modname = PyModule_GetNameObject(mod);
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	187 if (modname == NULL)
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	188 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	189 }
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	190 }
70899 b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	191 if (modname != NULL) {
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	192 if (PyUnicode_CompareWithASCIIString(modname, "builtins") != 0) {
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	193 PyObject *result;
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	194 result = PyUnicode_FromFormat("<%U.%s>", modname,
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	195 fn->m_ml->ml_name);
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	196 Py_DECREF(modname);
b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	197 return result;
66822 4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	198 }
70899 b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	199 Py_DECREF(modname);
66822 4f849720bf41 Reverted accidental commit (from r87159) Alexander Belopolsky <alexander.belopolsky@gmail.com> parents: 66821 diff changeset	200 }
70899 b87eac0369b5 Issue #6697: _lsprof: normalizeUserObj() doesn't encode/decode (UTF-8) the Victor Stinner <victor.stinner@haypocalc.com> parents: 66822 diff changeset	201 return PyUnicode_FromFormat("<%s>", fn->m_ml->ml_name);
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	202 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	203 else {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	204 /* built-in method: try to return
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	205 repr(getattr(type(__self__), __name__))
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	206 */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	207 PyObject *self = fn->m_self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	208 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	209 if (name != NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	210 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	211 Py_XINCREF(mo);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	212 Py_DECREF(name);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	213 if (mo != NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	214 PyObject *res = PyObject_Repr(mo);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	215 Py_DECREF(mo);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	216 if (res != NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	217 return res;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	218 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	219 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	220 PyErr_Clear();
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	221 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	222 fn->m_ml->ml_name);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	223 }
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	224 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	225
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	226 static ProfilerEntry*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	227 newProfilerEntry(ProfilerObject pObj, void key, PyObject *userObj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	228 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	229 ProfilerEntry *self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	230 self = (ProfilerEntry*) malloc(sizeof(ProfilerEntry));
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	231 if (self == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	232 pObj->flags \|= POF_NOMEMORY;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	233 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	234 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	235 userObj = normalizeUserObj(userObj);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	236 if (userObj == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	237 PyErr_Clear();
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	238 free(self);
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 self->header.key = key;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	243 self->userObj = userObj;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	244 self->tt = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	245 self->it = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	246 self->callcount = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	247 self->recursivecallcount = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	248 self->recursionLevel = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	249 self->calls = EMPTY_ROTATING_TREE;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	250 RotatingTree_Add(&pObj->profilerEntries, &self->header);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	251 return self;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	252 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	253
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	254 static ProfilerEntry*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	255 getEntry(ProfilerObject pObj, void key)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	256 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	257 return (ProfilerEntry*) RotatingTree_Get(&pObj->profilerEntries, key);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	258 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	259
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	260 static ProfilerSubEntry *
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	261 getSubEntry(ProfilerObject pObj, ProfilerEntry caller, ProfilerEntry* entry)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	262 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	263 return (ProfilerSubEntry*) RotatingTree_Get(&caller->calls,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	264 (void *)entry);
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
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	267 static ProfilerSubEntry *
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	268 newSubEntry(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 ProfilerSubEntry *self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	271 self = (ProfilerSubEntry*) malloc(sizeof(ProfilerSubEntry));
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	272 if (self == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	273 pObj->flags \|= POF_NOMEMORY;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	274 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	275 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	276 self->header.key = (void *)entry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	277 self->tt = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	278 self->it = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	279 self->callcount = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	280 self->recursivecallcount = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	281 self->recursionLevel = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	282 RotatingTree_Add(&caller->calls, &self->header);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	283 return self;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	284 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	285
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	286 static int freeSubEntry(rotating_node_t header, void arg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	287 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	288 ProfilerSubEntry subentry = (ProfilerSubEntry) header;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	289 free(subentry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	290 return 0;
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 freeEntry(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 ProfilerEntry entry = (ProfilerEntry) header;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	296 RotatingTree_Enum(entry->calls, freeSubEntry, NULL);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	297 Py_DECREF(entry->userObj);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	298 free(entry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	299 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	300 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	301
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	302 static void clearEntries(ProfilerObject *pObj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	303 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	304 RotatingTree_Enum(pObj->profilerEntries, freeEntry, NULL);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	305 pObj->profilerEntries = EMPTY_ROTATING_TREE;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	306 /* 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	307 if (pObj->currentProfilerContext) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	308 free(pObj->currentProfilerContext);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	309 pObj->currentProfilerContext = NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	310 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	311 while (pObj->freelistProfilerContext) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	312 ProfilerContext *c = pObj->freelistProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	313 pObj->freelistProfilerContext = c->previous;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	314 free(c);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	315 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	316 pObj->freelistProfilerContext = NULL;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	317 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	318
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	319 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	320 initContext(ProfilerObject pObj, ProfilerContext self, ProfilerEntry *entry)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	321 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	322 self->ctxEntry = entry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	323 self->subt = 0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	324 self->previous = pObj->currentProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	325 pObj->currentProfilerContext = self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	326 ++entry->recursionLevel;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	327 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	328 /* 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	329 ProfilerEntry *caller = self->previous->ctxEntry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	330 ProfilerSubEntry *subentry = getSubEntry(pObj, caller, entry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	331 if (subentry == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	332 subentry = newSubEntry(pObj, caller, entry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	333 if (subentry)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	334 ++subentry->recursionLevel;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	335 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	336 self->t0 = CALL_TIMER(pObj);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	337 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	338
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	339 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	340 Stop(ProfilerObject pObj, ProfilerContext self, ProfilerEntry *entry)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	341 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	342 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	343 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	344 if (self->previous)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	345 self->previous->subt += tt;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	346 pObj->currentProfilerContext = self->previous;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	347 if (--entry->recursionLevel == 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	348 entry->tt += tt;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	349 else
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	350 ++entry->recursivecallcount;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	351 entry->it += it;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	352 entry->callcount++;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	353 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	354 /* 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	355 ProfilerEntry *caller = self->previous->ctxEntry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	356 ProfilerSubEntry *subentry = getSubEntry(pObj, caller, entry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	357 if (subentry) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	358 if (--subentry->recursionLevel == 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	359 subentry->tt += tt;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	360 else
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	361 ++subentry->recursivecallcount;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	362 subentry->it += it;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	363 ++subentry->callcount;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	364 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	365 }
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	366 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	367
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	368 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	369 ptrace_enter_call(PyObject self, void key, PyObject *userObj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	370 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	371 /* 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	372 (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	373 ProfilerObject pObj = (ProfilerObject)self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	374 ProfilerEntry *profEntry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	375 ProfilerContext *pContext;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	376
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	377 /* 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	378 * 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	379 * 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	380 * 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	381 * 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	382 * save and restore any current exception. */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	383 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	384 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	385
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	386 profEntry = getEntry(pObj, key);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	387 if (profEntry == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	388 profEntry = newProfilerEntry(pObj, key, userObj);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	389 if (profEntry == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	390 goto restorePyerr;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	391 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	392 /* 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	393 pContext = pObj->freelistProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	394 if (pContext) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	395 pObj->freelistProfilerContext = pContext->previous;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	396 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	397 else {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	398 /* 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	399 pContext = (ProfilerContext*)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	400 malloc(sizeof(ProfilerContext));
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	401 if (pContext == NULL) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	402 pObj->flags \|= POF_NOMEMORY;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	403 goto restorePyerr;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	404 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	405 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	406 initContext(pObj, pContext, profEntry);
43292 876b7ef4775d Merged revisions 57778-58052 via svnmerge from Thomas Wouters <thomas@python.org> parents: 42888 diff changeset	407
876b7ef4775d Merged revisions 57778-58052 via svnmerge from Thomas Wouters <thomas@python.org> parents: 42888 diff changeset	408 restorePyerr:
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	409 PyErr_Restore(last_type, last_value, last_tb);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	410 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	411
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	412 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	413 ptrace_leave_call(PyObject self, void key)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	414 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	415 /* 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	416 ProfilerObject pObj = (ProfilerObject)self;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	417 ProfilerEntry *profEntry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	418 ProfilerContext *pContext;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	419
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	420 pContext = pObj->currentProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	421 if (pContext == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	422 return;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	423 profEntry = getEntry(pObj, key);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	424 if (profEntry) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	425 Stop(pObj, pContext, profEntry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	426 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	427 else {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	428 pObj->currentProfilerContext = pContext->previous;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	429 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	430 /* put pContext into the free list */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	431 pContext->previous = pObj->freelistProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	432 pObj->freelistProfilerContext = pContext;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	433 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	434
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	435 static int
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	436 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	437 PyObject *arg)
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	438 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	439 switch (what) {
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	440
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	441 /* 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	442 case PyTrace_CALL:
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	443 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	444 (PyObject *)frame->f_code);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	445 break;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	446
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	447 /* 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	448 (either normally or with an exception) */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	449 case PyTrace_RETURN:
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	450 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	451 break;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	452
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	453 /* case PyTrace_EXCEPTION:
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	454 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	455 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	456 handle it. */
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	457
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	458 #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	459 /* 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	460 function 'arg' */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	461 case PyTrace_C_CALL:
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	462 if ((((ProfilerObject *)self)->flags & POF_BUILTINS)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	463 && PyCFunction_Check(arg)) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	464 ptrace_enter_call(self,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	465 ((PyCFunctionObject *)arg)->m_ml,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	466 arg);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	467 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	468 break;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	469
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	470 /* 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	471 caller 'frame' */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	472 case PyTrace_C_RETURN: /* ...normally */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	473 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	474 if ((((ProfilerObject *)self)->flags & POF_BUILTINS)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	475 && PyCFunction_Check(arg)) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	476 ptrace_leave_call(self,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	477 ((PyCFunctionObject *)arg)->m_ml);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	478 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	479 break;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	480 #endif
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	481
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	482 default:
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	483 break;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	484 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	485 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	486 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	487
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	488 static int
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	489 pending_exception(ProfilerObject *pObj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	490 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	491 if (pObj->flags & POF_NOMEMORY) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	492 pObj->flags -= POF_NOMEMORY;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	493 PyErr_SetString(PyExc_MemoryError,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	494 "memory was exhausted while profiling");
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	495 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	496 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	497 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	498 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	499
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	500 /************************************************************/
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	501
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	502 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	503 {"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	504 {"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	505 {"reccallcount", "how many times called recursively"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	506 {"totaltime", "total time in this entry"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	507 {"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	508 {"calls", "details of the calls"},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	509 {0}
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	510 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	511
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	512 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	513 {"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	514 {"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	515 {"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	516 {"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	517 {"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	518 {0}
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	519 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	520
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	521 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	522 "_lsprof.profiler_entry", /* name */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	523 NULL, /* doc */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	524 profiler_entry_fields,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	525 6
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_subentry_desc = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	529 "_lsprof.profiler_subentry", /* 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_subentry_fields,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	532 5
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
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	535 static int initialized;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	536 static PyTypeObject StatsEntryType;
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	537 static PyTypeObject StatsSubEntryType;
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	538
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	539
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	540 typedef struct {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	541 PyObject *list;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	542 PyObject *sublist;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	543 double factor;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	544 } statscollector_t;
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 static int statsForSubEntry(rotating_node_t node, void arg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	547 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	548 ProfilerSubEntry sentry = (ProfilerSubEntry) node;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	549 statscollector_t collect = (statscollector_t) arg;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	550 ProfilerEntry entry = (ProfilerEntry) sentry->header.key;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	551 int err;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	552 PyObject *sinfo;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	553 sinfo = PyObject_CallFunction((PyObject*) &StatsSubEntryType,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	554 "((Olldd))",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	555 entry->userObj,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	556 sentry->callcount,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	557 sentry->recursivecallcount,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	558 collect->factor * sentry->tt,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	559 collect->factor * sentry->it);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	560 if (sinfo == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	561 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	562 err = PyList_Append(collect->sublist, sinfo);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	563 Py_DECREF(sinfo);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	564 return err;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	565 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	566
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	567 static int statsForEntry(rotating_node_t node, void arg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	568 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	569 ProfilerEntry entry = (ProfilerEntry) node;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	570 statscollector_t collect = (statscollector_t) arg;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	571 PyObject *info;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	572 int err;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	573 if (entry->callcount == 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	574 return 0; /* skip */
36459 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 if (entry->calls != EMPTY_ROTATING_TREE) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	577 collect->sublist = PyList_New(0);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	578 if (collect->sublist == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	579 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	580 if (RotatingTree_Enum(entry->calls,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	581 statsForSubEntry, collect) != 0) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	582 Py_DECREF(collect->sublist);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	583 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	584 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	585 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	586 else {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	587 Py_INCREF(Py_None);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	588 collect->sublist = Py_None;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	589 }
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	590
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	591 info = PyObject_CallFunction((PyObject*) &StatsEntryType,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	592 "((OllddO))",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	593 entry->userObj,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	594 entry->callcount,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	595 entry->recursivecallcount,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	596 collect->factor * entry->tt,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	597 collect->factor * entry->it,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	598 collect->sublist);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	599 Py_DECREF(collect->sublist);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	600 if (info == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	601 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	602 err = PyList_Append(collect->list, info);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	603 Py_DECREF(info);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	604 return err;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	605 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	606
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	607 PyDoc_STRVAR(getstats_doc, "\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	608 getstats() -> list of profiler_entry objects\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	609 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	610 Return all information collected by the profiler.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	611 Each profiler_entry is a tuple-like object with the\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	612 following attributes:\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	613 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	614 code code object\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	615 callcount how many times this was called\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	616 reccallcount how many times called recursively\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	617 totaltime total time in this entry\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	618 inlinetime inline time in this entry (not in subcalls)\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	619 calls details of the calls\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 The calls attribute is either None or a list of\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	622 profiler_subentry objects:\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	623 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	624 code called code object\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	625 callcount how many times this is called\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	626 reccallcount how many times this is called recursively\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	627 totaltime total time spent in this call\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	628 inlinetime inline time (not in further subcalls)\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	629 ");
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	630
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	631 static PyObject*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	632 profiler_getstats(ProfilerObject pObj, PyObject noarg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	633 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	634 statscollector_t collect;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	635 if (pending_exception(pObj))
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	636 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	637 if (!pObj->externalTimer)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	638 collect.factor = hpTimerUnit();
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	639 else if (pObj->externalTimerUnit > 0.0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	640 collect.factor = pObj->externalTimerUnit;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	641 else
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	642 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	643 collect.list = PyList_New(0);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	644 if (collect.list == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	645 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	646 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	647 != 0) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	648 Py_DECREF(collect.list);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	649 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	650 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	651 return collect.list;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	652 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	653
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	654 static int
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	655 setSubcalls(ProfilerObject *pObj, int nvalue)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	656 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	657 if (nvalue == 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	658 pObj->flags &= ~POF_SUBCALLS;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	659 else if (nvalue > 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	660 pObj->flags \|= POF_SUBCALLS;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	661 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	662 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	663
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	664 static int
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	665 setBuiltins(ProfilerObject *pObj, int nvalue)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	666 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	667 if (nvalue == 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	668 pObj->flags &= ~POF_BUILTINS;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	669 else if (nvalue > 0) {
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	670 #ifndef PyTrace_C_CALL
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	671 PyErr_SetString(PyExc_ValueError,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	672 "builtins=True requires Python >= 2.4");
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	673 return -1;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	674 #else
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	675 pObj->flags \|= POF_BUILTINS;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	676 #endif
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	677 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	678 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	679 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	680
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	681 PyDoc_STRVAR(enable_doc, "\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	682 enable(subcalls=True, builtins=True)\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	683 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	684 Start collecting profiling information.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	685 If 'subcalls' is True, also records for each function\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	686 statistics separated according to its current caller.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	687 If 'builtins' is True, records the time spent in\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	688 built-in functions separately from their caller.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	689 ");
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	690
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	691 static PyObject*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	692 profiler_enable(ProfilerObject self, PyObject args, PyObject *kwds)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	693 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	694 int subcalls = -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	695 int builtins = -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	696 static char *kwlist[] = {"subcalls", "builtins", 0};
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	697 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	698 kwlist, &subcalls, &builtins))
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	699 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	700 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	701 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	702 PyEval_SetProfile(profiler_callback, (PyObject*)self);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	703 self->flags \|= POF_ENABLED;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	704 Py_INCREF(Py_None);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	705 return Py_None;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	706 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	707
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	708 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	709 flush_unmatched(ProfilerObject *pObj)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	710 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	711 while (pObj->currentProfilerContext) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	712 ProfilerContext *pContext = pObj->currentProfilerContext;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	713 ProfilerEntry *profEntry= pContext->ctxEntry;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	714 if (profEntry)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	715 Stop(pObj, pContext, profEntry);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	716 else
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	717 pObj->currentProfilerContext = pContext->previous;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	718 if (pContext)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	719 free(pContext);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	720 }
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	721
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	722 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	723
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	724 PyDoc_STRVAR(disable_doc, "\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	725 disable()\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	726 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	727 Stop collecting profiling information.\n\
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 static PyObject*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	731 profiler_disable(ProfilerObject self, PyObject noarg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	732 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	733 self->flags &= ~POF_ENABLED;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	734 PyEval_SetProfile(NULL, NULL);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	735 flush_unmatched(self);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	736 if (pending_exception(self))
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	737 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	738 Py_INCREF(Py_None);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	739 return Py_None;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	740 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	741
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	742 PyDoc_STRVAR(clear_doc, "\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	743 clear()\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	744 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	745 Clear all profiling information collected so far.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	746 ");
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 static PyObject*
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	749 profiler_clear(ProfilerObject pObj, PyObject noarg)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	750 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	751 clearEntries(pObj);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	752 Py_INCREF(Py_None);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	753 return Py_None;
36459 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
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	756 static void
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	757 profiler_dealloc(ProfilerObject *op)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	758 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	759 if (op->flags & POF_ENABLED)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	760 PyEval_SetProfile(NULL, NULL);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	761 flush_unmatched(op);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	762 clearEntries(op);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	763 Py_XDECREF(op->externalTimer);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	764 Py_TYPE(op)->tp_free(op);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	765 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	766
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	767 static int
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	768 profiler_init(ProfilerObject pObj, PyObject args, PyObject *kw)
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	769 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	770 PyObject *o;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	771 PyObject *timer = NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	772 double timeunit = 0.0;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	773 int subcalls = 1;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	774 #ifdef PyTrace_C_CALL
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	775 int builtins = 1;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	776 #else
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	777 int builtins = 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	778 #endif
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	779 static char *kwlist[] = {"timer", "timeunit",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	780 "subcalls", "builtins", 0};
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	781
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	782 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	783 &timer, &timeunit,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	784 &subcalls, &builtins))
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	785 return -1;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	786
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	787 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	788 return -1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	789 o = pObj->externalTimer;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	790 pObj->externalTimer = timer;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	791 Py_XINCREF(timer);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	792 Py_XDECREF(o);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	793 pObj->externalTimerUnit = timeunit;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	794 return 0;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	795 }
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	796
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	797 static PyMethodDef profiler_methods[] = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	798 {"getstats", (PyCFunction)profiler_getstats,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	799 METH_NOARGS, getstats_doc},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	800 {"enable", (PyCFunction)profiler_enable,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	801 METH_VARARGS \| METH_KEYWORDS, enable_doc},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	802 {"disable", (PyCFunction)profiler_disable,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	803 METH_NOARGS, disable_doc},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	804 {"clear", (PyCFunction)profiler_clear,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	805 METH_NOARGS, clear_doc},
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	806 {NULL, NULL}
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	807 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	808
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	809 PyDoc_STRVAR(profiler_doc, "\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	810 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	811 \n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	812 Builds a profiler object using the specified timer function.\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	813 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	814 For custom timer functions returning integers, time_unit can\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	815 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	816 is, in seconds).\n\
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	817 ");
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	818
37144 91dd4d44d3bc Finish getting rid of statichere/staticforward Neal Norwitz <nnorwitz@gmail.com> parents: 36861 diff changeset	819 static PyTypeObject PyProfiler_Type = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	820 PyVarObject_HEAD_INIT(NULL, 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	821 "_lsprof.Profiler", /* tp_name */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	822 sizeof(ProfilerObject), /* tp_basicsize */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	823 0, /* tp_itemsize */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	824 (destructor)profiler_dealloc, /* tp_dealloc */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	825 0, /* tp_print */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	826 0, /* tp_getattr */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	827 0, /* tp_setattr */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	828 0, /* tp_reserved */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	829 0, /* tp_repr */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	830 0, /* tp_as_number */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	831 0, /* tp_as_sequence */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	832 0, /* tp_as_mapping */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	833 0, /* tp_hash */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	834 0, /* tp_call */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	835 0, /* tp_str */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	836 0, /* tp_getattro */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	837 0, /* tp_setattro */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	838 0, /* tp_as_buffer */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	839 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	840 profiler_doc, /* tp_doc */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	841 0, /* tp_traverse */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	842 0, /* tp_clear */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	843 0, /* tp_richcompare */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	844 0, /* tp_weaklistoffset */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	845 0, /* tp_iter */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	846 0, /* tp_iternext */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	847 profiler_methods, /* tp_methods */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	848 0, /* tp_members */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	849 0, /* tp_getset */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	850 0, /* tp_base */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	851 0, /* tp_dict */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	852 0, /* tp_descr_get */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	853 0, /* tp_descr_set */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	854 0, /* tp_dictoffset */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	855 (initproc)profiler_init, /* tp_init */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	856 PyType_GenericAlloc, /* tp_alloc */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	857 PyType_GenericNew, /* tp_new */
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	858 PyObject_Del, /* tp_free */
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	859 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	860
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	861 static PyMethodDef moduleMethods[] = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	862 {NULL, NULL}
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	863 };
3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	864
47580 94f64f11fdd0 Implement PEP 3121: new module initialization and finalization API. Martin v. Löwis <martin@v.loewis.de> parents: 44351 diff changeset	865
94f64f11fdd0 Implement PEP 3121: new module initialization and finalization API. Martin v. Löwis <martin@v.loewis.de> parents: 44351 diff changeset	866 static struct PyModuleDef _lsprofmodule = {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	867 PyModuleDef_HEAD_INIT,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	868 "_lsprof",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	869 "Fast profiler",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	870 -1,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	871 moduleMethods,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	872 NULL,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	873 NULL,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	874 NULL,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	875 NULL
47580 94f64f11fdd0 Implement PEP 3121: new module initialization and finalization API. Martin v. Löwis <martin@v.loewis.de> parents: 44351 diff changeset	876 };
94f64f11fdd0 Implement PEP 3121: new module initialization and finalization API. Martin v. Löwis <martin@v.loewis.de> parents: 44351 diff changeset	877
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	878 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	879 PyInit__lsprof(void)
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	880 {
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	881 PyObject module, d;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	882 module = PyModule_Create(&_lsprofmodule);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	883 if (module == NULL)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	884 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	885 d = PyModule_GetDict(module);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	886 if (PyType_Ready(&PyProfiler_Type) < 0)
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	887 return NULL;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	888 PyDict_SetItemString(d, "Profiler", (PyObject *)&PyProfiler_Type);
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	889
61466 cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	890 if (!initialized) {
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	891 PyStructSequence_InitType(&StatsEntryType,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	892 &profiler_entry_desc);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	893 PyStructSequence_InitType(&StatsSubEntryType,
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	894 &profiler_subentry_desc);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	895 }
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	896 Py_INCREF((PyObject*) &StatsEntryType);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	897 Py_INCREF((PyObject*) &StatsSubEntryType);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	898 PyModule_AddObject(module, "profiler_entry",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	899 (PyObject*) &StatsEntryType);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	900 PyModule_AddObject(module, "profiler_subentry",
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	901 (PyObject*) &StatsSubEntryType);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	902 empty_tuple = PyTuple_New(0);
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	903 initialized = 1;
cab14be0ada1 Recorded merge of revisions 81029 via svnmerge from Antoine Pitrou <solipsis@pitrou.net> parents: 59319 diff changeset	904 return module;
36459 3abf33264146 Added the cProfile module. Armin Rigo <arigo@tunes.org> parents: diff changeset	905 }

Mercurial > cpython-lru_cache-weakref

annotate Modules/_lsprof.c @ 83447:678564fc0962 3.3