From 1bea49869b8daadddedf1c78c4eea5281b931d93 Mon Sep 17 00:00:00 2001
From: Lorenz Meier <lm@inf.ethz.ch>
Date: Wed, 22 Aug 2012 10:00:46 +0200
Subject: task file list gdb macro

---
 Debug/NuttX | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

(limited to 'Debug')

diff --git a/Debug/NuttX b/Debug/NuttX
index b6d4e74f0..5396ab6b1 100644
--- a/Debug/NuttX
+++ b/Debug/NuttX
@@ -73,6 +73,29 @@ document showheap
 .        Prints the contents of the malloc heap(s).
 end
 
+################################################################################
+# Task file listing 
+################################################################################
+
+define showfiles
+	set $task = (struct _TCB *)$arg0
+	set $nfiles = sizeof((*(struct filelist*)0).fl_files) / sizeof(struct file)
+	printf "%d files\n", $nfiles
+	set $index = 0
+	while $index < $nfiles
+		set $file = &($task->filelist->fl_files[$index])
+		printf "%d: inode %p f_priv %p\n", $index, $file->f_inode, $file->f_priv
+		if $file->f_inode != 0
+			printf "    i_name %s  i_private %p\n", &$file->f_inode->i_name[0], $file->f_inode->i_private
+		end
+		set $index = $index + 1
+	end
+end
+
+document showfiles
+.    showfiles <TCB pointer>
+.        Prints the files opened by a task.
+
 ################################################################################
 # Task display
 ################################################################################
-- 
cgit v1.2.3