From 351f9a097fb8e005e9465a8a883b2f063e5c5160 Mon Sep 17 00:00:00 2001
From: Marti Bolivar <mbolivar@leaflabs.com>
Date: Thu, 14 Apr 2011 14:28:23 -0400
Subject: Ancillary file cleanups.

---
 support/gdb/gpio.gdb      |  12 -----
 support/gdb/gpio/gpio.gdb |  12 +++++
 support/gdb/i2c/test.gdb  | 112 ++++++++++++++++++++++++++++++++++++++++++++++
 3 files changed, 124 insertions(+), 12 deletions(-)
 delete mode 100644 support/gdb/gpio.gdb
 create mode 100644 support/gdb/gpio/gpio.gdb
 create mode 100644 support/gdb/i2c/test.gdb

(limited to 'support/gdb')

diff --git a/support/gdb/gpio.gdb b/support/gdb/gpio.gdb
deleted file mode 100644
index 4376cfd..0000000
--- a/support/gdb/gpio.gdb
+++ /dev/null
@@ -1,12 +0,0 @@
-set print pretty on
-
-print "GPIOA registers:"
-p/x *GPIOA->regs
-print "GPIOB registers:"
-p/x *GPIOB->regs
-print "GPIOC registers:"
-p/x *GPIOC->regs
-print "GPIOD registers:"
-p/x *GPIOD->regs
-print "AFIO registers:"
-p/x *(struct afio_reg_map*)0x40010000
diff --git a/support/gdb/gpio/gpio.gdb b/support/gdb/gpio/gpio.gdb
new file mode 100644
index 0000000..4376cfd
--- /dev/null
+++ b/support/gdb/gpio/gpio.gdb
@@ -0,0 +1,12 @@
+set print pretty on
+
+print "GPIOA registers:"
+p/x *GPIOA->regs
+print "GPIOB registers:"
+p/x *GPIOB->regs
+print "GPIOC registers:"
+p/x *GPIOC->regs
+print "GPIOD registers:"
+p/x *GPIOD->regs
+print "AFIO registers:"
+p/x *(struct afio_reg_map*)0x40010000
diff --git a/support/gdb/i2c/test.gdb b/support/gdb/i2c/test.gdb
new file mode 100644
index 0000000..8b71320
--- /dev/null
+++ b/support/gdb/i2c/test.gdb
@@ -0,0 +1,112 @@
+define i2c_sr1_flags
+set $s = $arg0
+printf "SR1: "
+
+if (($s & (1 << 15)))
+    printf "SMBALERT "
+end
+
+if (($s & (1 << 14)))
+    printf "TIMEOUT "
+end
+
+if (($s & (1 << 12)))
+    printf "PECERR "
+end
+
+if (($s & (1 << 11)))
+    printf "OVR "
+end
+
+if (($s & (1 << 10)))
+    printf "AF "
+end
+
+if (($s & (1 << 9)))
+    printf "ARLO "
+end
+
+if (($s & (1 << 8)))
+    printf "BERR "
+end
+
+if (($s & (1 << 7)))
+    printf "TXE "
+end
+
+if (($s & (1 << 6)))
+    printf "RXNE "
+end
+
+if (($s & (1 << 4)))
+    printf "STOPF "
+end
+
+if (($s & (1 << 3)))
+    printf "ADD10 "
+end
+
+if (($s & (1 << 2)))
+    printf "BTF "
+end
+
+if (($s & (1 << 1)))
+    printf "ADDR "
+end
+
+if (($s & (1 << 0)))
+    printf "SB "
+end
+end
+
+define i2c_sr2_flags
+set $s = $arg0
+printf "SR2: "
+
+if (($s & (1 << 7)))
+    printf "DUALF "
+end
+
+if (($s & (1 << 6)))
+    printf "SMBHOST "
+end
+
+if (($s & (1 << 5)))
+    printf "SMBDEFAULT "
+end
+
+if (($s & (1 << 4)))
+    printf "GENCALL "
+end
+
+
+if (($s & (1 << 2)))
+    printf "TRA "
+end
+
+if (($s & (1 << 1)))
+    printf "BUSY "
+end
+
+if (($s & (1 << 0)))
+    printf "MSL "
+end
+
+end
+
+define pbc
+set $c = crumbs
+while ($c->event)
+    if ($c->event != 0)
+        printf "Event: %d ", $c->event
+        if ($c->event == 1)
+            i2c_sr1_flags $c->sr1
+            printf "\t"
+            i2c_sr2_flags $c->sr2
+        end
+        printf "\n"
+    end
+    set $c = $c + 1
+end
+
+
-- 
cgit v1.2.3