#include "ao.h"
-uint8_t ao_btm_running;
int8_t ao_btm_stdio;
__xdata uint8_t ao_btm_connected;
-uint8_t ao_btm_chat;
-
-__xdata char ao_btm_buffer[1024];
-int ao_btm_ptr;
-char ao_btm_dir;
-
-void
-ao_btm_putchar(char c);
-
-static void
-ao_btm_add_char(char c)
-{
- if (ao_btm_ptr < sizeof (ao_btm_buffer))
- ao_btm_buffer[ao_btm_ptr++] = c;
-}
-
-static void
-ao_btm_log_char(char c, char dir)
-{
- if (dir != ao_btm_dir) {
- ao_btm_add_char(dir);
- ao_btm_dir = dir;
- }
- ao_btm_add_char(c);
-}
-
-static void
-ao_btm_log_out_char(char c)
-{
- ao_btm_log_char(c, '>');
-}
-
-static void
-ao_btm_log_in_char(char c)
-{
- ao_btm_log_char(c, '<');
-}
#define AO_BTM_MAX_REPLY 16
__xdata char ao_btm_reply[AO_BTM_MAX_REPLY];
for (;;) {
while ((c = ao_serial_pollchar()) != AO_READ_AGAIN) {
- ao_btm_log_in_char(c);
if (ao_btm_reply_len < sizeof (ao_btm_reply))
ao_btm_reply[ao_btm_reply_len++] = c;
if (c == '\r' || c == '\n')
}
/*
- * A command line pre-processor to detect connect/disconnect messages
- * and update the internal state
+ * Delay between command charaters; the BT module
+ * can't keep up with 57600 baud
*/
-uint8_t
-ao_cmd_filter(void)
-{
- if (ao_cur_stdio != ao_btm_stdio)
- return 0;
- ao_cmd_lex();
- while (ao_cmd_lex_c != '\n') {
- if (ao_match_word("CONNECT"))
- return 1;
- if (ao_match_word("DISCONNECT"))
- return 1;
- if (ao_match_word("ERROR"))
- return 1;
- if (ao_match_word("OK"))
- return 1;
- ao_cmd_lex();
- }
- ao_cmd_status = 0;
- return 0;
-}
-
-/*
- * A wrapper for ao_serial_pollchar that
- * doesn't return any characters while we're
- * initializing the bluetooth device
- */
-char
-ao_btm_pollchar(void)
-{
- char c;
- if (!ao_btm_running)
- return AO_READ_AGAIN;
- c = ao_serial_pollchar();
- if (c != AO_READ_AGAIN)
- ao_btm_log_in_char(c);
- return c;
-}
-
void
ao_btm_putchar(char c)
{
- ao_btm_log_out_char(c);
ao_serial_putchar(c);
- if (!ao_btm_running)
- ao_delay(1);
+ ao_delay(1);
}
/*
*/
ao_delay(AO_SEC_TO_TICKS(3));
+#if HAS_BEEP
+ ao_beep_for(AO_BEEP_MID, AO_MS_TO_TICKS(200));
+#endif
+
/*
* The first time we connect, the BTM-180 comes up at 19200 baud.
* After that, it will remember and come up at 57600 baud. So, see
/* Turn off status reporting */
ao_btm_cmd("ATQ1\r");
- ao_btm_stdio = ao_add_stdio(ao_btm_pollchar,
- ao_btm_putchar,
+ ao_btm_stdio = ao_add_stdio(ao_serial_pollchar,
+ ao_serial_putchar,
NULL);
ao_btm_echo(0);
- ao_btm_running = 1;
for (;;) {
- while (!ao_btm_connected && !ao_btm_chat)
+ while (!ao_btm_connected)
ao_sleep(&ao_btm_connected);
- if (ao_btm_chat) {
- ao_btm_running = 0;
- while (ao_btm_chat) {
- char c;
- c = ao_serial_pollchar();
- if (c != AO_READ_AGAIN) {
- ao_btm_log_in_char(c);
- ao_usb_putchar(c);
- } else {
- ao_usb_flush();
- ao_sleep(&ao_usart1_rx_fifo);
- }
- }
- ao_btm_running = 1;
- }
while (ao_btm_connected) {
ao_led_for(AO_LED_GREEN, AO_MS_TO_TICKS(20));
ao_delay(AO_SEC_TO_TICKS(3));
__xdata struct ao_task ao_btm_task;
-/*
- * Connect directly to the bluetooth device, mostly
- * useful for testing
- */
-static void
-ao_btm_forward(void)
-{
- char c;
-
- ao_btm_chat = 1;
- ao_wakeup(&ao_btm_connected);
- ao_usb_flush();
- while ((c = ao_usb_getchar()) != '~') {
- if (c == '\n') c = '\r';
- ao_btm_putchar(c);
- }
- ao_btm_chat = 0;
- while (!ao_btm_running) {
- ao_wakeup(&ao_usart1_rx_fifo);
- ao_delay(AO_MS_TO_TICKS(10));
- }
-}
-
-/*
- * Dump everything received from the bluetooth device during startup
- */
-static void
-ao_btm_dump(void)
-{
- int i;
- char c;
-
- for (i = 0; i < ao_btm_ptr; i++) {
- c = ao_btm_buffer[i];
- if (c < ' ' && c != '\n')
- printf("\\%03o", ((int) c) & 0xff);
- else
- putchar(ao_btm_buffer[i]);
- }
- putchar('\n');
-}
-
-static void
-ao_btm_speed(void)
-{
- ao_cmd_decimal();
- if (ao_cmd_lex_u32 == 57600)
- ao_serial_set_speed(AO_SERIAL_SPEED_57600);
- else if (ao_cmd_lex_u32 == 19200)
- ao_serial_set_speed(AO_SERIAL_SPEED_19200);
- else
- ao_cmd_status = ao_cmd_syntax_error;
-}
+#if BT_LINK_ON_P2
+#define BT_PICTL_ICON PICTL_P2ICON
+#define BT_PIFG P2IFG
+#define BT_PDIR P2DIR
+#define BT_PINP P2INP
+#define BT_IEN2_PIE IEN2_P2IE
+#endif
+#if BT_LINK_ON_P1
+#define BT_PICTL_ICON PICTL_P1ICON
+#define BT_PIFG P1IFG
+#define BT_PDIR P1DIR
+#define BT_PINP P1INP
+#define BT_IEN2_PIE IEN2_P1IE
+#endif
void
ao_btm_check_link() __critical
{
- if (P2_1) {
+ /* Check the pin and configure the interrupt detector to wait for the
+ * pin to flip the other way
+ */
+ if (BT_LINK_PIN) {
ao_btm_connected = 0;
- PICTL |= PICTL_P2ICON;
+ PICTL |= BT_PICTL_ICON;
} else {
ao_btm_connected = 1;
- PICTL &= ~PICTL_P2ICON;
+ PICTL &= ~BT_PICTL_ICON;
}
}
void
ao_btm_isr(void)
+#if BT_LINK_ON_P1
+ __interrupt 15
+#endif
{
- if (P2IFG & (1 << 1)) {
+#if BT_LINK_ON_P1
+ P1IF = 0;
+#endif
+ if (BT_PIFG & (1 << BT_LINK_PIN_INDEX)) {
ao_btm_check_link();
ao_wakeup(&ao_btm_connected);
}
- P2IFG = 0;
+ BT_PIFG = 0;
}
-__code struct ao_cmds ao_btm_cmds[] = {
- { ao_btm_forward, "B\0BTM serial link." },
- { ao_btm_dump, "d\0Dump btm buffer." },
- { ao_btm_speed, "s <19200,57600>\0Set btm serial speed." },
- { 0, NULL },
-};
-
void
ao_btm_init (void)
{
ao_serial_init();
ao_serial_set_speed(AO_SERIAL_SPEED_19200);
+#if BT_LINK_ON_P1
+ /*
+ * Configure ser reset line
+ */
+
+ P1_6 = 0;
+ P1DIR |= (1 << 6);
+#endif
+
/*
* Configure link status line
*/
- /* Set P2_1 to input, pull-down */
- P2DIR &= ~(1 << 1);
- P2INP |= P2INP_MDP2_1_TRISTATE;
+ /* Set pin to input */
+ BT_PDIR &= ~(1 << BT_LINK_PIN_INDEX);
- /* Enable P2 interrupts */
- IEN2 |= IEN2_P2IE;
+ /* Set pin to tri-state */
+ BT_PINP |= (1 << BT_LINK_PIN_INDEX);
+
+ /* Enable interrupts */
+ IEN2 |= BT_IEN2_PIE;
+
+ /* Check current pin state */
ao_btm_check_link();
+
+#if BT_LINK_ON_P2
+ /* Eable the pin interrupt */
PICTL |= PICTL_P2IEN;
+#endif
+#if BT_LINK_ON_P1
+ /* Enable pin interrupt */
+ P1IEN |= (1 << BT_LINK_PIN_INDEX);
+#endif
ao_add_task(&ao_btm_task, ao_btm, "bt");
- ao_cmd_register(&ao_btm_cmds[0]);
}
projects / fw / altos / blobdiff