diff --git a/dev/gdb/task.gdb b/dev/gdb/task.gdb
new file mode 100644
index 000000000..576d93198
--- /dev/null
+++ b/dev/gdb/task.gdb
@@ -0,0 +1,31 @@
+# lists all tasks in the wait queue whose ebroot pointed to by $arg0
+# e.g.
+#   task_dump_wq &ha_tgroup_ctx[0].timers
+#   task_dump_wq &ha_thread_ctx[0].timers
+#
+define task_dump_rq
+   set $tot=0
+   ebtree_first ($arg0)
+   while ($node != 0)
+      set $tot = $tot+1
+      set $p = (struct task *)((void*)$node-(long)&((struct task*)0).rq)
+      printf "task %p ",$p
+      p -pretty off -- /a *$p
+      ebtree_next $node
+   end
+   printf "Total: %d tasks.\n",$tot
+end
+
+define task_dump_wq
+   set $tot=0
+   ebtree_first ($arg0)
+   while ($node != 0)
+      set $tot = $tot+1
+      set $p = (struct task *)((void*)$node-(long)&((struct task*)0).wq)
+      printf "task %p ",$p
+      p -pretty off -- /a *$p
+      ebtree_next $node
+   end
+   printf "Total: %d tasks.\n",$tot
+end
+