You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
295 lines
6.4 KiB
295 lines
6.4 KiB
//#define DEBUG
|
|
//#define CAN_LOOPBACK_MODE
|
|
//#define USE_INTERNAL_OSC
|
|
|
|
#include "../config.h"
|
|
|
|
#include "drivers/drivers.h"
|
|
#include "drivers/llgpio.h"
|
|
#include "gpio.h"
|
|
|
|
#define CUSTOM_CAN_INTERRUPTS
|
|
|
|
#include "libc.h"
|
|
#include "safety.h"
|
|
#include "drivers/adc.h"
|
|
#include "drivers/uart.h"
|
|
#include "drivers/dac.h"
|
|
#include "drivers/can.h"
|
|
#include "drivers/timer.h"
|
|
|
|
#define CAN CAN1
|
|
|
|
//#define PEDAL_USB
|
|
|
|
#ifdef PEDAL_USB
|
|
#include "drivers/usb.h"
|
|
#endif
|
|
|
|
#define ENTER_BOOTLOADER_MAGIC 0xdeadbeef
|
|
uint32_t enter_bootloader_mode;
|
|
|
|
void __initialize_hardware_early() {
|
|
early();
|
|
}
|
|
|
|
// ********************* serial debugging *********************
|
|
|
|
void debug_ring_callback(uart_ring *ring) {
|
|
char rcv;
|
|
while (getc(ring, &rcv)) {
|
|
putc(ring, rcv);
|
|
}
|
|
}
|
|
|
|
#ifdef PEDAL_USB
|
|
|
|
int usb_cb_ep1_in(uint8_t *usbdata, int len, int hardwired) { return 0; }
|
|
void usb_cb_ep2_out(uint8_t *usbdata, int len, int hardwired) {}
|
|
void usb_cb_ep3_out(uint8_t *usbdata, int len, int hardwired) {}
|
|
void usb_cb_enumeration_complete() {}
|
|
|
|
int usb_cb_control_msg(USB_Setup_TypeDef *setup, uint8_t *resp, int hardwired) {
|
|
int resp_len = 0;
|
|
uart_ring *ur = NULL;
|
|
switch (setup->b.bRequest) {
|
|
// **** 0xe0: uart read
|
|
case 0xe0:
|
|
ur = get_ring_by_number(setup->b.wValue.w);
|
|
if (!ur) break;
|
|
if (ur == &esp_ring) uart_dma_drain();
|
|
// read
|
|
while ((resp_len < min(setup->b.wLength.w, MAX_RESP_LEN)) &&
|
|
getc(ur, (char*)&resp[resp_len])) {
|
|
++resp_len;
|
|
}
|
|
break;
|
|
}
|
|
return resp_len;
|
|
}
|
|
|
|
#endif
|
|
|
|
// ***************************** honda can checksum *****************************
|
|
|
|
int can_cksum(uint8_t *dat, int len, int addr, int idx) {
|
|
int i;
|
|
int s = 0;
|
|
for (i = 0; i < len; i++) {
|
|
s += (dat[i] >> 4);
|
|
s += dat[i] & 0xF;
|
|
}
|
|
s += (addr>>0)&0xF;
|
|
s += (addr>>4)&0xF;
|
|
s += (addr>>8)&0xF;
|
|
s += idx;
|
|
s = 8-s;
|
|
return s&0xF;
|
|
}
|
|
|
|
// ***************************** can port *****************************
|
|
|
|
// addresses to be used on CAN
|
|
#define CAN_GAS_INPUT 0x200
|
|
#define CAN_GAS_OUTPUT 0x201
|
|
|
|
void CAN1_TX_IRQHandler() {
|
|
// clear interrupt
|
|
CAN->TSR |= CAN_TSR_RQCP0;
|
|
}
|
|
|
|
// two independent values
|
|
uint16_t gas_set_0 = 0;
|
|
uint16_t gas_set_1 = 0;
|
|
|
|
#define MAX_TIMEOUT 10
|
|
uint32_t timeout = 0;
|
|
uint32_t current_index = 0;
|
|
|
|
#define NO_FAULT 0
|
|
#define FAULT_BAD_CHECKSUM 1
|
|
#define FAULT_SEND 2
|
|
#define FAULT_SCE 3
|
|
#define FAULT_STARTUP 4
|
|
#define FAULT_TIMEOUT 5
|
|
#define FAULT_INVALID 6
|
|
uint8_t state = FAULT_STARTUP;
|
|
|
|
void CAN1_RX0_IRQHandler() {
|
|
while (CAN->RF0R & CAN_RF0R_FMP0) {
|
|
#ifdef DEBUG
|
|
puts("CAN RX\n");
|
|
#endif
|
|
uint32_t address = CAN->sFIFOMailBox[0].RIR>>21;
|
|
if (address == CAN_GAS_INPUT) {
|
|
// softloader entry
|
|
if (CAN->sFIFOMailBox[0].RDLR == 0xdeadface) {
|
|
if (CAN->sFIFOMailBox[0].RDHR == 0x0ab00b1e) {
|
|
enter_bootloader_mode = ENTER_SOFTLOADER_MAGIC;
|
|
NVIC_SystemReset();
|
|
} else if (CAN->sFIFOMailBox[0].RDHR == 0x02b00b1e) {
|
|
enter_bootloader_mode = ENTER_BOOTLOADER_MAGIC;
|
|
NVIC_SystemReset();
|
|
}
|
|
}
|
|
|
|
// normal packet
|
|
uint8_t *dat = (uint8_t *)&CAN->sFIFOMailBox[0].RDLR;
|
|
uint8_t *dat2 = (uint8_t *)&CAN->sFIFOMailBox[0].RDHR;
|
|
uint16_t value_0 = (dat[0] << 8) | dat[1];
|
|
uint16_t value_1 = (dat[2] << 8) | dat[3];
|
|
uint8_t enable = (dat2[0] >> 7) & 1;
|
|
uint8_t index = (dat2[1] >> 4) & 3;
|
|
if (can_cksum(dat, 5, CAN_GAS_INPUT, index) == (dat2[1] & 0xF)) {
|
|
if (((current_index+1)&3) == index) {
|
|
#ifdef DEBUG
|
|
puts("setting gas ");
|
|
puth(value);
|
|
puts("\n");
|
|
#endif
|
|
if (enable) {
|
|
gas_set_0 = value_0;
|
|
gas_set_1 = value_1;
|
|
} else {
|
|
// clear the fault state if values are 0
|
|
if (value_0 == 0 && value_1 == 0) {
|
|
state = NO_FAULT;
|
|
} else {
|
|
state = FAULT_INVALID;
|
|
}
|
|
gas_set_0 = gas_set_1 = 0;
|
|
}
|
|
// clear the timeout
|
|
timeout = 0;
|
|
}
|
|
current_index = index;
|
|
} else {
|
|
// wrong checksum = fault
|
|
state = FAULT_BAD_CHECKSUM;
|
|
}
|
|
}
|
|
// next
|
|
CAN->RF0R |= CAN_RF0R_RFOM0;
|
|
}
|
|
}
|
|
|
|
void CAN1_SCE_IRQHandler() {
|
|
state = FAULT_SCE;
|
|
can_sce(CAN);
|
|
}
|
|
|
|
int pdl0 = 0, pdl1 = 0;
|
|
int pkt_idx = 0;
|
|
|
|
int led_value = 0;
|
|
|
|
void TIM3_IRQHandler() {
|
|
#ifdef DEBUG
|
|
puth(TIM3->CNT);
|
|
puts(" ");
|
|
puth(pdl0);
|
|
puts(" ");
|
|
puth(pdl1);
|
|
puts("\n");
|
|
#endif
|
|
|
|
// check timer for sending the user pedal and clearing the CAN
|
|
if ((CAN->TSR & CAN_TSR_TME0) == CAN_TSR_TME0) {
|
|
uint8_t dat[8];
|
|
dat[0] = (pdl0>>8)&0xFF;
|
|
dat[1] = (pdl0>>0)&0xFF;
|
|
dat[2] = (pdl1>>8)&0xFF;
|
|
dat[3] = (pdl1>>0)&0xFF;
|
|
dat[4] = state;
|
|
dat[5] = can_cksum(dat, 5, CAN_GAS_OUTPUT, pkt_idx) | (pkt_idx<<4);
|
|
CAN->sTxMailBox[0].TDLR = dat[0] | (dat[1]<<8) | (dat[2]<<16) | (dat[3]<<24);
|
|
CAN->sTxMailBox[0].TDHR = dat[4] | (dat[5]<<8);
|
|
CAN->sTxMailBox[0].TDTR = 6; // len of packet is 5
|
|
CAN->sTxMailBox[0].TIR = (CAN_GAS_OUTPUT << 21) | 1;
|
|
++pkt_idx;
|
|
pkt_idx &= 3;
|
|
} else {
|
|
// old can packet hasn't sent!
|
|
state = FAULT_SEND;
|
|
#ifdef DEBUG
|
|
puts("CAN MISS\n");
|
|
#endif
|
|
}
|
|
|
|
// blink the LED
|
|
set_led(LED_GREEN, led_value);
|
|
led_value = !led_value;
|
|
|
|
TIM3->SR = 0;
|
|
|
|
// up timeout for gas set
|
|
if (timeout == MAX_TIMEOUT) {
|
|
state = FAULT_TIMEOUT;
|
|
} else {
|
|
timeout += 1;
|
|
}
|
|
}
|
|
|
|
// ***************************** main code *****************************
|
|
|
|
void pedal() {
|
|
// read/write
|
|
pdl0 = adc_get(ADCCHAN_ACCEL0);
|
|
pdl1 = adc_get(ADCCHAN_ACCEL1);
|
|
|
|
// write the pedal to the DAC
|
|
if (state == NO_FAULT) {
|
|
dac_set(0, max(gas_set_0, pdl0));
|
|
dac_set(1, max(gas_set_1, pdl1));
|
|
} else {
|
|
dac_set(0, pdl0);
|
|
dac_set(1, pdl1);
|
|
}
|
|
|
|
// feed the watchdog
|
|
IWDG->KR = 0xAAAA;
|
|
}
|
|
|
|
int main() {
|
|
__disable_irq();
|
|
|
|
// init devices
|
|
clock_init();
|
|
periph_init();
|
|
gpio_init();
|
|
|
|
#ifdef PEDAL_USB
|
|
// enable USB
|
|
usb_init();
|
|
#endif
|
|
|
|
// pedal stuff
|
|
dac_init();
|
|
adc_init();
|
|
|
|
// init can
|
|
can_silent = ALL_CAN_LIVE;
|
|
can_init(0);
|
|
|
|
// 48mhz / 65536 ~= 732
|
|
timer_init(TIM3, 15);
|
|
NVIC_EnableIRQ(TIM3_IRQn);
|
|
|
|
// setup watchdog
|
|
IWDG->KR = 0x5555;
|
|
IWDG->PR = 0; // divider /4
|
|
// 0 = 0.125 ms, let's have a 50ms watchdog
|
|
IWDG->RLR = 400 - 1;
|
|
IWDG->KR = 0xCCCC;
|
|
|
|
puts("**** INTERRUPTS ON ****\n");
|
|
__enable_irq();
|
|
|
|
// main pedal loop
|
|
while (1) {
|
|
pedal();
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
|