/* This module exports the C API to such Pure Software Inc. (tm) products * as Purify (tm) and Quantify (tm). Other Pure packages could be added to * this module, but since I don't have them and don't use them, I didn't * add them here. * * Currently supported: Quantify 2.x, Purify 3.x * * Module version number: 1.0 * See for usage notes. * * You need to decide which products you want to incorporate into the * module when you compile this file. The way to do this is to edit * /Modules/Setup to pass the appropriate flags to the compiler. * -DWITH_PURIFY compiles in the Purify support, and -DWITH_QUANTIFY * compiles in the Quantify support. -DWITH_ALL_PURE compiles in all Pure * Software support. Also, I have hacked Modules/Makefile.pre.in so that * you can build an instrumented Python 1.3 interpreter by passing * PURE= to make. The trivial diff is available at * * * It would be nice (and probably easy) to provide this file as a shared * library, however since it doesn't appear that Pure gives us shared * libraries of the stubs, it doesn't really matter. * * Major bogosity. The purify.h header file exports purify_exit(), but * guess what? It is not defined in the libpurify_stubs.a file! I tried * to fake one here, hoping the Pure linker would Do The Right Thing when * instrumented for Purify, but it doesn't so I don't export purify_exit() * to the Python layer. In Python you should raise a SystemExit exception * anyway. * * The actual purify.h and quantify.h files which embody the APIs are * copyrighted by Pure Software, Inc. and are only attainable through them. * This module assumes you have legally installed licenses of their * software. * * TBD: * 1. Make Python's configure aware of this module. * 2. Check for compatibility on other Pure supported platforms. * * Author: Barry Warsaw * */ #include "Python.h" #if defined(WITH_PURIFY) || defined(WITH_ALL_PURE) # include # define HAS_PURIFY_EXIT 0 /* See note at top of file */ # define PURE_PURIFY_VERSION 3 /* not provided by purify.h */ #endif #if defined(WITH_QUANTIFY) || defined(WITH_ALL_PURE) # include # define PURE_QUANTIFY_VERSION 2 /* not provided by quantify.h */ #endif #if defined(PURIFY_H) || defined(QUANTIFY_H) # define COMMON_PURE_FUNCTIONS #endif /* PURIFY_H || QUANTIFY_H */ static PyObject* PurifyVersion; static PyObject* QuantifyVersion; static PyObject* PureCallVoidargFunction(int (*func)(void), PyObject* self, PyObject* args) { int status; if (!PyArg_ParseTuple(args, "")) return NULL; status = func(); return Py_BuildValue("i", status); } static PyObject* PureCallStringargFunction(int (*func)(char*), PyObject* self, PyObject* args) { int status; char* stringarg; if (!PyArg_ParseTuple(args, "s", &stringarg)) return NULL; status = func(stringarg); return Py_BuildValue("i", status); } static PyObject* PureCallStringOrIntFunction(int (*func)(char*), PyObject* self, PyObject* args) { int status; int intarg; char* stringarg; /* according to the quantify.h file, the argument to * *_recording_system_call can be an integer or a string. */ if (!PyArg_ParseTuple(args, "i", &intarg)) { PyErr_Clear(); if (!PyArg_ParseTuple(args, "s", &stringarg)) { return NULL; } else { status = func(stringarg); } } else { /* func is prototyped as int(*)(char*) * better shut up the compiler */ status = func((char*)intarg); } return Py_BuildValue("i", status); } static PyObject* PureCallPrintfStyleFunction(int (*func)(const char*, ...), PyObject* self, PyObject* args) { /* we support the printf() style vararg functions by requiring the * formatting be done in Python. At the C level we pass just a string * to the printf() style function. */ int status; char* argstring; if (!PyArg_ParseTuple(args, "s", &argstring)) return NULL; status = func("%s", argstring); return Py_BuildValue("i", status); } static PyObject* PureCallIntobjAsMemaddrFunction(int (*func)(char* addr), PyObject* self, PyObject* args) { long memrep; char* mem; int id; if (!PyArg_ParseTuple(args, "l", &mem)) return NULL; mem = (char*)memrep; id = func(mem); return Py_BuildValue("i", id); } static PyObject* PureAssertFunction(int (*func)(const char*, int), PyObject* self, PyObject* args) { long srcrep; char* src; int size; int status; if (!PyArg_ParseTuple(args, "li", &srcrep, &size)) return NULL; src = (char*)srcrep; status = func(src, size); return Py_BuildValue("i", status); } /* non-product specific functions * * N.B. These printf() style functions are a bit of a kludge. Since Pure * doesn't provide vprintf versions of them, we can't call them directly. * They don't support all the standard printf % modifiers anyway. The way * to use these is to use Python's % string operator to do the formatting. * By the time these functions get the thing to print, it's already a * string, and they just use "%s" as the format string. */ #ifdef COMMON_PURE_FUNCTIONS static PyObject* pure_pure_logfile_printf(PyObject* self, PyObject* args) { return PureCallPrintfStyleFunction(pure_logfile_printf, self, args); } static PyObject* pure_pure_printf(PyObject* self, PyObject* args) { return PureCallPrintfStyleFunction(pure_printf, self, args); } static PyObject* pure_pure_printf_with_banner(PyObject* self, PyObject* args) { return PureCallPrintfStyleFunction(pure_printf_with_banner, self, args); } #endif /* COMMON_PURE_FUNCTIONS */ /* Purify functions * * N.B. There are some interfaces described in the purify.h file that are * not described in the manual. * * Unsigned longs purify_report_{address,number,type,result} are not * accessible from the Python layer. * * The header file says purify_{new,all,clear_new}_reports are obsolete so * they aren't exported. * * purify_stop_here_internal isn't exported since it seems only useful from * the debugger. And purify_stop_here should never be called directly. * * None of the custom dynamic loader functions are exported. * * purify_unsafe_memcpy isn't exported. * * purify_{start,size}_of_block aren't exported. * * The manual that I have says that the prototype for the second argument * to purify_map_pool is: * void (*fn)(char*) * but the purify.h file declares it as: * void (*fn)(char*, int, void*) * and does not explain what the other arguments are for. I support the * latter but I don't know if I do it right or usefully. * * The header file says that purify_describe returns a char* which is the * pointer passed to it. The manual says it returns an int, but I believe * that is a typo. */ #ifdef PURIFY_H /* These aren't terribly useful because purify_exit() isn't exported * correctly. See the note at the top of the file. */ static PyObject* pure_PURIFY_EXIT_ERRORS; static PyObject* pure_PURIFY_EXIT_LEAKS; static PyObject* pure_PURIFY_EXIT_PLEAKS; static PyObject* pure_purify_all_inuse(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_all_inuse, self, args); } static PyObject* pure_purify_all_leaks(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_all_leaks, self, args); } static PyObject* pure_purify_new_inuse(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_new_inuse, self, args); } static PyObject* pure_purify_new_leaks(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_new_leaks, self, args); } static PyObject* pure_purify_clear_inuse(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_clear_inuse, self, args); } static PyObject* pure_purify_clear_leaks(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_clear_leaks, self, args); } static PyObject* pure_purify_all_fds_inuse(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_all_fds_inuse, self, args); } static PyObject* pure_purify_new_fds_inuse(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_new_fds_inuse, self, args); } static PyObject* pure_purify_printf_with_call_chain(PyObject* self, PyObject* args) { return PureCallPrintfStyleFunction(purify_printf_with_call_chain, self, args); } static PyObject* pure_purify_set_pool_id(PyObject* self, PyObject* args) { long memrep; char* mem; int id; if (!PyArg_ParseTuple(args, "li", &memrep, &id)) return NULL; mem = (char*)memrep; purify_set_pool_id(mem, id); Py_INCREF(Py_None); return Py_None; } static PyObject* pure_purify_get_pool_id(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_get_pool_id, self, args); } static PyObject* pure_purify_set_user_data(PyObject* self, PyObject* args) { long memrep; char* mem; long datarep; void* data; if (!PyArg_ParseTuple(args, "ll", &memrep, &datarep)) return NULL; mem = (char*)memrep; data = (void*)datarep; purify_set_user_data(mem, data); Py_INCREF(Py_None); return Py_None; } static PyObject* pure_purify_get_user_data(PyObject* self, PyObject* args) { /* can't use PureCallIntobjAsMemaddrFunction since * purify_get_user_data returns a void* */ long memrep; char* mem; long datarep; void* data; if (!PyArg_ParseTuple(args, "l", &memrep)) return NULL; mem = (char*)memrep; data = purify_get_user_data(mem); datarep = (long)data; return Py_BuildValue("l", datarep); } /* this global variable is shared by both mapping functions: * pure_purify_map_pool and pure_purify_map_pool_id. Since they cache this * variable it should be safe in the face of recursion or cross calling. * * Further note that the prototype for the callback function is wrong in * the Purify manual. The manual says the function takes a since char*, * but the header file says it takes an additional int and void*. I have * no idea what these are for! */ static PyObject* MapCallable = NULL; static void PurifyMapPoolCallback(char* mem, int user_size, void* user_aux_data) { long memrep = (long)mem; long user_aux_data_rep = (long)user_aux_data; PyObject* result; PyObject* memobj = Py_BuildValue("lil", memrep, user_size, user_aux_data_rep); if (memobj == NULL) return; result = PyEval_CallObject(MapCallable, memobj); Py_DECREF(result); Py_DECREF(memobj); } static PyObject* pure_purify_map_pool(PyObject* self, PyObject* args) { PyObject* saved_callable; PyObject* arg_callable; int id; if (!PyArg_ParseTuple(args, "iO", &id, &arg_callable)) return NULL; if (!PyCallable_Check(arg_callable)) { PyErr_SetString(PyExc_TypeError, "Second arg is not a callable."); return NULL; } /* cache global variable in case of recursion */ saved_callable = MapCallable; MapCallable = arg_callable; purify_map_pool(id, PurifyMapPoolCallback); MapCallable = saved_callable; Py_INCREF(Py_None); return Py_None; } static void PurifyMapPoolIdCallback(int id) { PyObject* result; PyObject* intobj = Py_BuildValue("i", id); if (intobj == NULL) return; result = PyEval_CallObject(MapCallable, intobj); Py_DECREF(result); Py_DECREF(intobj); } static PyObject* pure_purify_map_pool_id(PyObject* self, PyObject* args) { PyObject* saved_callable; PyObject* arg_callable; if (!PyArg_ParseTuple(args, "O", &arg_callable)) return NULL; if (!PyCallable_Check(arg_callable)) { PyErr_SetString(PyExc_TypeError, "Arg is not a callable."); return NULL; } /* cache global variable in case of recursion */ saved_callable = MapCallable; MapCallable = arg_callable; purify_map_pool_id(PurifyMapPoolIdCallback); MapCallable = saved_callable; Py_INCREF(Py_None); return Py_None; } static PyObject* pure_purify_new_messages(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_new_messages, self, args); } static PyObject* pure_purify_all_messages(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_all_messages, self, args); } static PyObject* pure_purify_clear_messages(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_clear_messages, self, args); } static PyObject* pure_purify_clear_new_messages(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_clear_new_messages, self, args); } static PyObject* pure_purify_start_batch(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_start_batch, self, args); } static PyObject* pure_purify_start_batch_show_first(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_start_batch_show_first, self, args); } static PyObject* pure_purify_stop_batch(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_stop_batch, self, args); } static PyObject* pure_purify_name_thread(PyObject* self, PyObject* args) { /* can't strictly use PureCallStringargFunction since * purify_name_thread takes a const char*, not a char* */ int status; char* stringarg; if (!PyArg_ParseTuple(args, "s", &stringarg)) return NULL; status = purify_name_thread(stringarg); return Py_BuildValue("i", status); } static PyObject* pure_purify_watch(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch, self, args); } static PyObject* pure_purify_watch_1(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_1, self, args); } static PyObject* pure_purify_watch_2(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_2, self, args); } static PyObject* pure_purify_watch_4(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_4, self, args); } static PyObject* pure_purify_watch_8(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_8, self, args); } static PyObject* pure_purify_watch_w_1(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_w_1, self, args); } static PyObject* pure_purify_watch_w_2(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_w_2, self, args); } static PyObject* pure_purify_watch_w_4(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_w_4, self, args); } static PyObject* pure_purify_watch_w_8(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_w_8, self, args); } static PyObject* pure_purify_watch_r_1(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_r_1, self, args); } static PyObject* pure_purify_watch_r_2(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_r_2, self, args); } static PyObject* pure_purify_watch_r_4(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_r_4, self, args); } static PyObject* pure_purify_watch_r_8(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_r_8, self, args); } static PyObject* pure_purify_watch_rw_1(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_rw_1, self, args); } static PyObject* pure_purify_watch_rw_2(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_rw_2, self, args); } static PyObject* pure_purify_watch_rw_4(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_rw_4, self, args); } static PyObject* pure_purify_watch_rw_8(PyObject* self, PyObject* args) { return PureCallIntobjAsMemaddrFunction(purify_watch_rw_8, self, args); } static PyObject* pure_purify_watch_n(PyObject* self, PyObject* args) { long addrrep; char* addr; unsigned int size; char* type; int status; if (!PyArg_ParseTuple(args, "lis", &addrrep, &size, &type)) return NULL; addr = (char*)addrrep; status = purify_watch_n(addr, size, type); return Py_BuildValue("i", status); } static PyObject* pure_purify_watch_info(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_watch_info, self, args); } static PyObject* pure_purify_watch_remove(PyObject* self, PyObject* args) { int watchno; int status; if (!PyArg_ParseTuple(args, "i", &watchno)) return NULL; status = purify_watch_remove(watchno); return Py_BuildValue("i", status); } static PyObject* pure_purify_watch_remove_all(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_watch_remove_all, self, args); } static PyObject* pure_purify_describe(PyObject* self, PyObject* args) { long addrrep; char* addr; long rtnrep; char* rtn; if (!PyArg_ParseTuple(args, "l", &addrrep)) return NULL; addr = (char*)addrrep; rtn = purify_describe(addr); rtnrep = (long)rtn; return Py_BuildValue("l", rtnrep); } static PyObject* pure_purify_what_colors(PyObject* self, PyObject* args) { long addrrep; char* addr; unsigned int size; int status; if (!PyArg_ParseTuple(args, "li", &addrrep, &size)) return NULL; addr = (char*)addrrep; status = purify_what_colors(addr, size); return Py_BuildValue("i", status); } static PyObject* pure_purify_is_running(PyObject* self, PyObject* args) { return PureCallVoidargFunction(purify_is_running, self, args); } static PyObject* pure_purify_assert_is_readable(PyObject* self, PyObject* args) { return PureAssertFunction(purify_assert_is_readable, self, args); } static PyObject* pure_purify_assert_is_writable(PyObject* self, PyObject* args) { return PureAssertFunction(purify_assert_is_writable, self, args); } #if HAS_PURIFY_EXIT /* I wish I could include this, but I can't. See the notes at the top of * the file. */ static PyObject* pure_purify_exit(PyObject* self, PyObject* args) { int status; if (!PyArg_ParseTuple(args, "i", &status)) return NULL; /* purify_exit doesn't always act like exit(). See the manual */ purify_exit(status); Py_INCREF(Py_None); return Py_None; } #endif /* HAS_PURIFY_EXIT */ #endif /* PURIFY_H */ /* Quantify functions * * N.B. Some of these functions are only described in the quantify.h file, * not in the version of the hardcopy manual that I had. If you're not * sure what some of these do, check the header file, it is documented * fairly well. * * None of the custom dynamic loader functions are exported. * */ #ifdef QUANTIFY_H static PyObject* pure_quantify_is_running(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_is_running, self, args); } static PyObject* pure_quantify_help(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_help, self, args); } static PyObject* pure_quantify_print_recording_state(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_print_recording_state, self, args); } static PyObject* pure_quantify_start_recording_data(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_start_recording_data, self, args); } static PyObject* pure_quantify_stop_recording_data(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_stop_recording_data, self, args); } static PyObject* pure_quantify_is_recording_data(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_is_recording_data, self, args); } static PyObject* pure_quantify_start_recording_system_calls(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_start_recording_system_calls, self, args); } static PyObject* pure_quantify_stop_recording_system_calls(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_stop_recording_system_calls, self, args); } static PyObject* pure_quantify_is_recording_system_calls(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_is_recording_system_calls, self, args); } static PyObject* pure_quantify_start_recording_system_call(PyObject* self, PyObject* args) { return PureCallStringOrIntFunction(quantify_start_recording_system_call, self, args); } static PyObject* pure_quantify_stop_recording_system_call(PyObject* self, PyObject* args) { return PureCallStringOrIntFunction(quantify_stop_recording_system_call, self, args); } static PyObject* pure_quantify_is_recording_system_call(PyObject* self, PyObject* args) { return PureCallStringOrIntFunction(quantify_is_recording_system_call, self, args); } static PyObject* pure_quantify_start_recording_dynamic_library_data(PyObject* self, PyObject* args) { return PureCallVoidargFunction( quantify_start_recording_dynamic_library_data, self, args); } static PyObject* pure_quantify_stop_recording_dynamic_library_data(PyObject* self, PyObject* args) { return PureCallVoidargFunction( quantify_stop_recording_dynamic_library_data, self, args); } static PyObject* pure_quantify_is_recording_dynamic_library_data(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_is_recording_dynamic_library_data, self, args); } static PyObject* pure_quantify_start_recording_register_window_traps(PyObject* self, PyObject* args) { return PureCallVoidargFunction( quantify_start_recording_register_window_traps, self, args); } static PyObject* pure_quantify_stop_recording_register_window_traps(PyObject* self, PyObject* args) { return PureCallVoidargFunction( quantify_stop_recording_register_window_traps, self, args); } static PyObject* pure_quantify_is_recording_register_window_traps(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_is_recording_register_window_traps, self, args); } static PyObject* pure_quantify_disable_recording_data(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_disable_recording_data, self, args); } static PyObject* pure_quantify_clear_data(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_clear_data, self, args); } static PyObject* pure_quantify_save_data(PyObject* self, PyObject* args) { return PureCallVoidargFunction(quantify_save_data, self, args); } static PyObject* pure_quantify_save_data_to_file(PyObject* self, PyObject* args) { return PureCallStringargFunction(quantify_save_data_to_file, self, args); } static PyObject* pure_quantify_add_annotation(PyObject* self, PyObject* args) { return PureCallStringargFunction(quantify_add_annotation, self, args); } #endif /* QUANTIFY_H */ /* external interface */ static struct PyMethodDef pure_methods[] = { #ifdef COMMON_PURE_FUNCTIONS {"pure_logfile_printf", pure_pure_logfile_printf, 1}, {"pure_printf", pure_pure_printf, 1}, {"pure_printf_with_banner", pure_pure_printf_with_banner, 1}, #endif /* COMMON_PURE_FUNCTIONS */ #ifdef PURIFY_H {"purify_all_inuse", pure_purify_all_inuse, 1}, {"purify_all_leaks", pure_purify_all_leaks, 1}, {"purify_new_inuse", pure_purify_new_inuse, 1}, {"purify_new_leaks", pure_purify_new_leaks, 1}, {"purify_clear_inuse", pure_purify_clear_inuse, 1}, {"purify_clear_leaks", pure_purify_clear_leaks, 1}, {"purify_all_fds_inuse", pure_purify_all_fds_inuse, 1}, {"purify_new_fds_inuse", pure_purify_new_fds_inuse, 1}, /* see purify.h */ {"purify_logfile_printf", pure_pure_logfile_printf, 1}, {"purify_printf", pure_pure_printf, 1}, {"purify_printf_with_banner", pure_pure_printf_with_banner, 1}, /**/ {"purify_printf_with_call_chain", pure_purify_printf_with_call_chain, 1}, {"purify_set_pool_id", pure_purify_set_pool_id, 1}, {"purify_get_pool_id", pure_purify_get_pool_id, 1}, {"purify_set_user_data", pure_purify_set_user_data, 1}, {"purify_get_user_data", pure_purify_get_user_data, 1}, {"purify_map_pool", pure_purify_map_pool, 1}, {"purify_map_pool_id", pure_purify_map_pool_id, 1}, {"purify_new_messages", pure_purify_new_messages, 1}, {"purify_all_messages", pure_purify_all_messages, 1}, {"purify_clear_messages", pure_purify_clear_messages, 1}, {"purify_clear_new_messages", pure_purify_clear_new_messages, 1}, {"purify_start_batch", pure_purify_start_batch, 1}, {"purify_start_batch_show_first", pure_purify_start_batch_show_first, 1}, {"purify_stop_batch", pure_purify_stop_batch, 1}, {"purify_name_thread", pure_purify_name_thread, 1}, {"purify_watch", pure_purify_watch, 1}, {"purify_watch_1", pure_purify_watch_1, 1}, {"purify_watch_2", pure_purify_watch_2, 1}, {"purify_watch_4", pure_purify_watch_4, 1}, {"purify_watch_8", pure_purify_watch_8, 1}, {"purify_watch_w_1", pure_purify_watch_w_1, 1}, {"purify_watch_w_2", pure_purify_watch_w_2, 1}, {"purify_watch_w_4", pure_purify_watch_w_4, 1}, {"purify_watch_w_8", pure_purify_watch_w_8, 1}, {"purify_watch_r_1", pure_purify_watch_r_1, 1}, {"purify_watch_r_2", pure_purify_watch_r_2, 1}, {"purify_watch_r_4", pure_purify_watch_r_4, 1}, {"purify_watch_r_8", pure_purify_watch_r_8, 1}, {"purify_watch_rw_1", pure_purify_watch_rw_1, 1}, {"purify_watch_rw_2", pure_purify_watch_rw_2, 1}, {"purify_watch_rw_4", pure_purify_watch_rw_4, 1}, {"purify_watch_rw_8", pure_purify_watch_rw_8, 1}, {"purify_watch_n", pure_purify_watch_n, 1}, {"purify_watch_info", pure_purify_watch_info, 1}, {"purify_watch_remove", pure_purify_watch_remove, 1}, {"purify_watch_remove_all", pure_purify_watch_remove_all, 1}, {"purify_describe", pure_purify_describe, 1}, {"purify_what_colors", pure_purify_what_colors, 1}, {"purify_is_running", pure_purify_is_running, 1}, {"purify_assert_is_readable", pure_purify_assert_is_readable, 1}, {"purify_assert_is_writable", pure_purify_assert_is_writable, 1}, #if HAS_PURIFY_EXIT /* I wish I could include this, but I can't. See the notes at the * top of the file. */ {"purify_exit", pure_purify_exit, 1}, #endif /* HAS_PURIFY_EXIT */ #endif /* PURIFY_H */ #ifdef QUANTIFY_H {"quantify_is_running", pure_quantify_is_running, 1}, {"quantify_help", pure_quantify_help, 1}, {"quantify_print_recording_state", pure_quantify_print_recording_state, 1}, {"quantify_start_recording_data", pure_quantify_start_recording_data, 1}, {"quantify_stop_recording_data", pure_quantify_stop_recording_data, 1}, {"quantify_is_recording_data", pure_quantify_is_recording_data, 1}, {"quantify_start_recording_system_calls", pure_quantify_start_recording_system_calls, 1}, {"quantify_stop_recording_system_calls", pure_quantify_stop_recording_system_calls, 1}, {"quantify_is_recording_system_calls", pure_quantify_is_recording_system_calls, 1}, {"quantify_start_recording_system_call", pure_quantify_start_recording_system_call, 1}, {"quantify_stop_recording_system_call", pure_quantify_stop_recording_system_call, 1}, {"quantify_is_recording_system_call", pure_quantify_is_recording_system_call, 1}, {"quantify_start_recording_dynamic_library_data", pure_quantify_start_recording_dynamic_library_data, 1}, {"quantify_stop_recording_dynamic_library_data", pure_quantify_stop_recording_dynamic_library_data, 1}, {"quantify_is_recording_dynamic_library_data", pure_quantify_is_recording_dynamic_library_data, 1}, {"quantify_start_recording_register_window_traps", pure_quantify_start_recording_register_window_traps, 1}, {"quantify_stop_recording_register_window_traps", pure_quantify_stop_recording_register_window_traps, 1}, {"quantify_is_recording_register_window_traps", pure_quantify_is_recording_register_window_traps, 1}, {"quantify_disable_recording_data", pure_quantify_disable_recording_data, 1}, {"quantify_clear_data", pure_quantify_clear_data, 1}, {"quantify_save_data", pure_quantify_save_data, 1}, {"quantify_save_data_to_file", pure_quantify_save_data_to_file, 1}, {"quantify_add_annotation", pure_quantify_add_annotation, 1}, #endif /* QUANTIFY_H */ {NULL, NULL, 0} /* sentinel */ }; void initpure() { PyObject* module; PyObject* dict; module = Py_InitModule("pure", pure_methods); dict = PyModule_GetDict(module); /* this is bogus because we should be able to find this information * out from the header files. Pure's current versions don't include * this information! */ #ifdef PURIFY_H PurifyVersion = Py_BuildValue("i", PURE_PURIFY_VERSION); #else /* !PURIFY_H */ PurifyVersion = Py_None; Py_INCREF(PurifyVersion); /* these aren't terribly useful because purify_exit() isn't exported * correctly. See the note at the top of the file. */ PyObject* pure_PURIFY_EXIT_ERRORS = Py_BuildValue("i", PURIFY_EXIT_ERRORS); PyObject* pure_PURIFY_EXIT_LEAKS = Py_BuildValue("i", PURIFY_EXIT_LEAKS); PyObject* pure_PURIFY_EXIT_PLEAKS = Py_BuildValue("i", PURIFY_EXIT_PLEAKS); #endif /* PURIFY_H */ #ifdef QUANTIFY_H QuantifyVersion = Py_BuildValue("i", PURE_QUANTIFY_VERSION); #else /* !QUANTIFY_H */ QuantifyVersion = Py_None; Py_INCREF(QuantifyVersion); #endif /* QUANTIFY_H */ PyDict_SetItemString(dict, "purify_version", PurifyVersion); PyDict_SetItemString(dict, "quantify_version", QuantifyVersion); }