Initial import of qemu-2.4.1HEADmaster

1 files changed, 43 insertions, 0 deletions

diff --git a/roms/u-boot/board/fads/lamp.c b/roms/u-boot/board/fads/lamp.c
new file mode 100644
index 00000000..ffcc2b3c
--- /dev/null
+++ b/roms/u-boot/board/fads/lamp.c
@@ -0,0 +1,43 @@
+#include <config.h>
+
+#include <common.h>
+
+void
+signal_delay(unsigned int n)
+{
+  while (n--);
+}
+
+void
+signal_on(void)
+{
+  *((volatile uint *)BCSR4) &= ~(1<<(31-3)); /* led on */
+}
+
+void
+signal_off(void)
+{
+  *((volatile uint *)BCSR4) |= (1<<(31-3)); /* led off */
+}
+
+void
+slow_blink(unsigned int n)
+{
+  while (n--) {
+    signal_on();
+    signal_delay(0x00400000);
+    signal_off();
+    signal_delay(0x00400000);
+  }
+}
+
+void
+fast_blink(unsigned int n)
+{
+  while (n--) {
+    signal_on();
+    signal_delay(0x00100000);
+    signal_off();
+    signal_delay(0x00100000);
+  }
+}