summaryrefslogtreecommitdiff
path: root/usr/src/lib/libsqlite/tool/memleak2.awk
diff options
context:
space:
mode:
Diffstat (limited to 'usr/src/lib/libsqlite/tool/memleak2.awk')
-rw-r--r--usr/src/lib/libsqlite/tool/memleak2.awk32
1 files changed, 32 insertions, 0 deletions
diff --git a/usr/src/lib/libsqlite/tool/memleak2.awk b/usr/src/lib/libsqlite/tool/memleak2.awk
new file mode 100644
index 0000000000..51b3a1fa7a
--- /dev/null
+++ b/usr/src/lib/libsqlite/tool/memleak2.awk
@@ -0,0 +1,32 @@
+
+#pragma ident "%Z%%M% %I% %E% SMI"
+
+# This AWK script reads the output of testfixture when compiled for memory
+# debugging. It generates SQL commands that can be fed into an sqlite
+# instance to determine what memory is never freed. A typical usage would
+# be as follows:
+#
+# make -f memleak.mk fulltest 2>mem.out
+# awk -f ../sqlite/tool/memleak2.awk mem.out | ./sqlite :memory:
+#
+# The job performed by this script is the same as that done by memleak.awk.
+# The difference is that this script uses much less memory when the size
+# of the mem.out file is huge.
+#
+BEGIN {
+ print "CREATE TABLE mem(loc INTEGER PRIMARY KEY, src);"
+}
+/[0-9]+ malloc / {
+ print "INSERT INTO mem VALUES(" strtonum($6) ",'" $0 "');"
+}
+/[0-9]+ realloc / {
+ print "INSERT INTO mem VALUES(" strtonum($10) \
+ ",(SELECT src FROM mem WHERE loc=" strtonum($8) "));"
+ print "DELETE FROM mem WHERE loc=" strtonum($8) ";"
+}
+/[0-9]+ free / {
+ print "DELETE FROM mem WHERE loc=" strtonum($6) ";"
+}
+END {
+ print "SELECT src FROM mem;"
+}