From: Keith Packard <keithp@keithp.com>
Date: Sun, 2 Apr 2017 23:22:28 +0000 (-0700)
Subject: cortexelf-v1: Add serialblather command.
X-Git-Tag: 1.7~67
X-Git-Url: https://git.gag.com/?p=fw%2Faltos;a=commitdiff_plain;h=8284d3639cd24e2fa0faf1e35e7276ba35a24f8f

cortexelf-v1: Add serialblather command.

This reads from stdin and dumps it to both serial ports until you type ~

Signed-off-by: Keith Packard <keithp@keithp.com>
---

diff --git a/src/cortexelf-v1/ao_cortexelf.c b/src/cortexelf-v1/ao_cortexelf.c
index 1dc0a4be..f9be59e8 100644
--- a/src/cortexelf-v1/ao_cortexelf.c
+++ b/src/cortexelf-v1/ao_cortexelf.c
@@ -187,11 +187,23 @@ static void lisp_cmd() {
 	ao_lisp_read_eval_print();
 }
 
+static void
+ao_serial_blather(void)
+{
+	char c;
+
+	while ((c = getchar()) != '~') {
+		ao_serial1_putchar(c);
+		ao_serial2_putchar(c);
+	}
+}
+
 __code struct ao_cmds ao_demo_cmds[] = {
 	{ ao_video_toggle, "V\0Toggle video" },
 	{ ao_ball_toggle, "B\0Toggle ball" },
 	{ ao_ps2_read_keys, "K\0Read keys from keyboard" },
 	{ ao_console_send, "C\0Send data to console, end with ~" },
+	{ ao_serial_blather, "S\0Blather on serial ports briefly" },
 	{ lisp_cmd, "l\0Run lisp interpreter" },
 	{ 0, NULL }
 };
diff --git a/src/cortexelf-v1/ao_pins.h b/src/cortexelf-v1/ao_pins.h
index bc8288cf..e9c9deb3 100644
--- a/src/cortexelf-v1/ao_pins.h
+++ b/src/cortexelf-v1/ao_pins.h
@@ -38,7 +38,7 @@
 
 /* Run APB1 at HCLK/1 */
 #define AO_APB1_PRESCALER	1
-#define AO_RCC_CFGR_PPRE1_DIV	STM_RCC_CFGR_PPRE2_DIV_1
+#define AO_RCC_CFGR_PPRE1_DIV	STM_RCC_CFGR_PPRE1_DIV_1
 
 /* Run APB2 at HCLK/1 */
 #define AO_APB2_PRESCALER	1