/* * This file is part of the Black Magic Debug project. * * Copyright (C) 2011 Black Sphere Technologies Ltd. * Written by Gareth McMullin * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation, either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /* This file implements the platform specific functions for the STM32 * implementation. */ #include #include #include #include #include #include #include "platform.h" #include "jtag_scan.h" #include uint8_t running_status; volatile uint32_t timeout_counter; jmp_buf fatal_error_jmpbuf; void morse(const char *msg, char repeat); static void morse_update(void); #ifdef INCLUDE_UART_INTERFACE static void uart_init(void); #endif int platform_init(void) { rcc_clock_setup_in_hse_8mhz_out_72mhz(); /* Enable peripherals */ rcc_peripheral_enable_clock(&RCC_APB1ENR, RCC_APB1ENR_USBEN); rcc_peripheral_enable_clock(&RCC_APB1ENR, RCC_APB1ENR_TIM2EN); rcc_peripheral_enable_clock(&RCC_APB2ENR, RCC_APB2ENR_IOPAEN); rcc_peripheral_enable_clock(&RCC_APB2ENR, RCC_APB2ENR_IOPBEN); rcc_peripheral_enable_clock(&RCC_APB2ENR, RCC_APB2ENR_IOPDEN); /* Setup GPIO ports */ gpio_clear(USB_PU_PORT, USB_PU_PIN); gpio_set_mode(USB_PU_PORT, GPIO_MODE_INPUT, GPIO_CNF_INPUT_FLOAT, USB_PU_PIN); gpio_set_mode(JTAG_PORT, GPIO_MODE_OUTPUT_50_MHZ, GPIO_CNF_OUTPUT_PUSHPULL, TMS_PIN | TCK_PIN | TDI_PIN); gpio_set_mode(LED_PORT, GPIO_MODE_OUTPUT_2_MHZ, GPIO_CNF_OUTPUT_PUSHPULL, LED_RUN | LED_IDLE | LED_ERROR); /* FIXME: This pin in intended to be input, but the TXS0108 fails * to release the device from reset if this floats. */ gpio_set_mode(GPIOA, GPIO_MODE_OUTPUT_2_MHZ, GPIO_CNF_OUTPUT_PUSHPULL, GPIO7); /* Setup heartbeat timer */ systick_set_clocksource(STK_CTRL_CLKSOURCE_AHB_DIV8); systick_set_reload(900000); /* Interrupt us at 10 Hz */ systick_interrupt_enable(); systick_counter_enable(); #ifdef INCLUDE_UART_INTERFACE uart_init(); #endif SCB_VTOR = 0x2000; // Relocate interrupt vector table here cdcacm_init(); jtag_scan(); return 0; } void sys_tick_handler(void) { if(running_status) gpio_toggle(LED_PORT, LED_RUN); else gpio_clear(LED_PORT, LED_RUN); if(timeout_counter) timeout_counter--; morse_update(); } /* Morse code patterns and lengths */ static const struct { uint16_t code; uint8_t bits; } morse_letter[] = { { 0b00011101, 8}, // 'A' .- { 0b000101010111, 12}, // 'B' -... { 0b00010111010111, 14}, // 'C' -.-. { 0b0001010111, 10}, // 'D' -.. { 0b0001, 4}, // 'E' . { 0b000101110101, 12}, // 'F' ..-. { 0b000101110111, 12}, // 'G' --. { 0b0001010101, 10}, // 'H' .... { 0b000101, 6}, // 'I' .. {0b0001110111011101, 16}, // 'J' .--- { 0b000111010111, 12}, // 'K' -.- { 0b000101011101, 12}, // 'L' .-.. { 0b0001110111, 10}, // 'M' -- { 0b00010111, 8}, // 'N' -. { 0b00011101110111, 14}, // 'O' --- { 0b00010111011101, 14}, // 'P' .--. {0b0001110101110111, 16}, // 'Q' --.- { 0b0001011101, 10}, // 'R' .-. { 0b00010101, 8}, // 'S' ... { 0b000111, 6}, // 'T' - { 0b0001110101, 10}, // 'U' ..- { 0b000111010101, 12}, // 'V' ...- { 0b000111011101, 12}, // 'W' .-- { 0b00011101010111, 14}, // 'X' -..- {0b0001110111010111, 16}, // 'Y' -.-- { 0b00010101110111, 14}, // 'Z' --.. }; const char *morse_msg; static const char * volatile morse_ptr; static char morse_repeat; void morse(const char *msg, char repeat) { morse_msg = morse_ptr = msg; morse_repeat = repeat; SET_ERROR_STATE(0); } static void morse_update(void) { static uint16_t code; static uint8_t bits; if(!morse_ptr) return; if(!bits) { char c = *morse_ptr++; if(!c) { if(morse_repeat) { morse_ptr = morse_msg; c = *morse_ptr++; } else { morse_ptr = 0; return; } } if((c >= 'A') && (c <= 'Z')) { c -= 'A'; code = morse_letter[c].code; bits = morse_letter[c].bits; } else { code = 0; bits = 4; } } SET_ERROR_STATE(code & 1); code >>= 1; bits--; } #ifdef INCLUDE_UART_INTERFACE void uart_init(void) { rcc_peripheral_enable_clock(&RCC_APB2ENR, RCC_APB2ENR_USART1EN); /* UART1 TX to 'alternate function output push-pull' */ gpio_set_mode(GPIOA, GPIO_MODE_OUTPUT_2_MHZ, GPIO_CNF_OUTPUT_ALTFN_PUSHPULL, GPIO9); /* Setup UART parameters. */ usart_set_baudrate(USART1, 38400); usart_set_databits(USART1, 8); usart_set_stopbits(USART1, USART_STOPBITS_1); usart_set_mode(USART1, USART_MODE_TX_RX); usart_set_parity(USART1, USART_PARITY_NONE); usart_set_flow_control(USART1, USART_FLOWCONTROL_NONE); /* Finally enable the USART. */ usart_enable(USART1); /* Enable interrupts */ USART1_CR1 |= USART_CR1_RXNEIE; nvic_enable_irq(NVIC_USART1_IRQ); } void usart1_isr(void) { char c = usart_recv(USART1); usbd_ep_write_packet(0x83, &c, 1); } #endif