ON Semiconductor / mbed-os

Dependents:   mbed-TFT-example-NCS36510 mbed-Accelerometer-example-NCS36510 mbed-Accelerometer-example-NCS36510

Committer:
group-onsemi
Date:
Wed Jan 25 20:34:15 2017 +0000
Revision:
0:098463de4c5d
Initial commit

Who changed what in which revision?

UserRevisionLine numberNew contents of line
group-onsemi 0:098463de4c5d 1 /* mbed Microcontroller Library
group-onsemi 0:098463de4c5d 2 * Copyright (c) 2006-2016 ARM Limited
group-onsemi 0:098463de4c5d 3 *
group-onsemi 0:098463de4c5d 4 * Licensed under the Apache License, Version 2.0 (the "License");
group-onsemi 0:098463de4c5d 5 * you may not use this file except in compliance with the License.
group-onsemi 0:098463de4c5d 6 * You may obtain a copy of the License at
group-onsemi 0:098463de4c5d 7 *
group-onsemi 0:098463de4c5d 8 * http://www.apache.org/licenses/LICENSE-2.0
group-onsemi 0:098463de4c5d 9 *
group-onsemi 0:098463de4c5d 10 * Unless required by applicable law or agreed to in writing, software
group-onsemi 0:098463de4c5d 11 * distributed under the License is distributed on an "AS IS" BASIS,
group-onsemi 0:098463de4c5d 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
group-onsemi 0:098463de4c5d 13 * See the License for the specific language governing permissions and
group-onsemi 0:098463de4c5d 14 * limitations under the License.
group-onsemi 0:098463de4c5d 15 */
group-onsemi 0:098463de4c5d 16 #include "can_api.h"
group-onsemi 0:098463de4c5d 17
group-onsemi 0:098463de4c5d 18 #if DEVICE_CAN
group-onsemi 0:098463de4c5d 19
group-onsemi 0:098463de4c5d 20 #include "cmsis.h"
group-onsemi 0:098463de4c5d 21 #include "pinmap.h"
group-onsemi 0:098463de4c5d 22 #include "PeripheralPins.h"
group-onsemi 0:098463de4c5d 23 #include "mbed_error.h"
group-onsemi 0:098463de4c5d 24 #include <math.h>
group-onsemi 0:098463de4c5d 25 #include <string.h>
group-onsemi 0:098463de4c5d 26
group-onsemi 0:098463de4c5d 27 #define CAN_NUM 2
group-onsemi 0:098463de4c5d 28 static CAN_HandleTypeDef CanHandle;
group-onsemi 0:098463de4c5d 29 static uint32_t can_irq_ids[CAN_NUM] = {0};
group-onsemi 0:098463de4c5d 30 static can_irq_handler irq_handler;
group-onsemi 0:098463de4c5d 31
group-onsemi 0:098463de4c5d 32 void can_init(can_t *obj, PinName rd, PinName td)
group-onsemi 0:098463de4c5d 33 {
group-onsemi 0:098463de4c5d 34 uint32_t filter_number;
group-onsemi 0:098463de4c5d 35 CANName can_rd = (CANName)pinmap_peripheral(rd, PinMap_CAN_RD);
group-onsemi 0:098463de4c5d 36 CANName can_td = (CANName)pinmap_peripheral(td, PinMap_CAN_TD);
group-onsemi 0:098463de4c5d 37 obj->can = (CANName)pinmap_merge(can_rd, can_td);
group-onsemi 0:098463de4c5d 38 MBED_ASSERT((int)obj->can != NC);
group-onsemi 0:098463de4c5d 39
group-onsemi 0:098463de4c5d 40 if(obj->can == CAN_1) {
group-onsemi 0:098463de4c5d 41 __HAL_RCC_CAN1_CLK_ENABLE();
group-onsemi 0:098463de4c5d 42 obj->index = 0;
group-onsemi 0:098463de4c5d 43 } else {
group-onsemi 0:098463de4c5d 44 __HAL_RCC_CAN2_CLK_ENABLE();
group-onsemi 0:098463de4c5d 45 obj->index = 1;
group-onsemi 0:098463de4c5d 46 }
group-onsemi 0:098463de4c5d 47
group-onsemi 0:098463de4c5d 48 // Configure the CAN pins
group-onsemi 0:098463de4c5d 49 pinmap_pinout(rd, PinMap_CAN_RD);
group-onsemi 0:098463de4c5d 50 pinmap_pinout(td, PinMap_CAN_TD);
group-onsemi 0:098463de4c5d 51 if (rd != NC) {
group-onsemi 0:098463de4c5d 52 pin_mode(rd, PullUp);
group-onsemi 0:098463de4c5d 53 }
group-onsemi 0:098463de4c5d 54 if (td != NC) {
group-onsemi 0:098463de4c5d 55 pin_mode(td, PullUp);
group-onsemi 0:098463de4c5d 56 }
group-onsemi 0:098463de4c5d 57
group-onsemi 0:098463de4c5d 58 CanHandle.Instance = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 59
group-onsemi 0:098463de4c5d 60 CanHandle.Init.TTCM = DISABLE;
group-onsemi 0:098463de4c5d 61 CanHandle.Init.ABOM = DISABLE;
group-onsemi 0:098463de4c5d 62 CanHandle.Init.AWUM = DISABLE;
group-onsemi 0:098463de4c5d 63 CanHandle.Init.NART = DISABLE;
group-onsemi 0:098463de4c5d 64 CanHandle.Init.RFLM = DISABLE;
group-onsemi 0:098463de4c5d 65 CanHandle.Init.TXFP = DISABLE;
group-onsemi 0:098463de4c5d 66 CanHandle.Init.Mode = CAN_MODE_NORMAL;
group-onsemi 0:098463de4c5d 67 CanHandle.Init.SJW = CAN_SJW_1TQ;
group-onsemi 0:098463de4c5d 68 CanHandle.Init.BS1 = CAN_BS1_6TQ;
group-onsemi 0:098463de4c5d 69 CanHandle.Init.BS2 = CAN_BS2_8TQ;
group-onsemi 0:098463de4c5d 70 CanHandle.Init.Prescaler = 2;
group-onsemi 0:098463de4c5d 71
group-onsemi 0:098463de4c5d 72 if (HAL_CAN_Init(&CanHandle) != HAL_OK) {
group-onsemi 0:098463de4c5d 73 error("Cannot initialize CAN");
group-onsemi 0:098463de4c5d 74 }
group-onsemi 0:098463de4c5d 75
group-onsemi 0:098463de4c5d 76 filter_number = (obj->can == CAN_1) ? 0 : 14;
group-onsemi 0:098463de4c5d 77
group-onsemi 0:098463de4c5d 78 // Set initial CAN frequency to 100kb/s
group-onsemi 0:098463de4c5d 79 can_frequency(obj, 100000);
group-onsemi 0:098463de4c5d 80
group-onsemi 0:098463de4c5d 81 can_filter(obj, 0, 0, CANStandard, filter_number);
group-onsemi 0:098463de4c5d 82 }
group-onsemi 0:098463de4c5d 83
group-onsemi 0:098463de4c5d 84 void can_irq_init(can_t *obj, can_irq_handler handler, uint32_t id)
group-onsemi 0:098463de4c5d 85 {
group-onsemi 0:098463de4c5d 86 irq_handler = handler;
group-onsemi 0:098463de4c5d 87 can_irq_ids[obj->index] = id;
group-onsemi 0:098463de4c5d 88 }
group-onsemi 0:098463de4c5d 89
group-onsemi 0:098463de4c5d 90 void can_irq_free(can_t *obj)
group-onsemi 0:098463de4c5d 91 {
group-onsemi 0:098463de4c5d 92 CAN_TypeDef *can = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 93
group-onsemi 0:098463de4c5d 94 can->IER &= ~(CAN_IT_FMP0 | CAN_IT_FMP1 | CAN_IT_TME | \
group-onsemi 0:098463de4c5d 95 CAN_IT_ERR | CAN_IT_EPV | CAN_IT_BOF);
group-onsemi 0:098463de4c5d 96 can_irq_ids[obj->can] = 0;
group-onsemi 0:098463de4c5d 97 }
group-onsemi 0:098463de4c5d 98
group-onsemi 0:098463de4c5d 99 void can_free(can_t *obj)
group-onsemi 0:098463de4c5d 100 {
group-onsemi 0:098463de4c5d 101 // Reset CAN and disable clock
group-onsemi 0:098463de4c5d 102 if (obj->can == CAN_1) {
group-onsemi 0:098463de4c5d 103 __HAL_RCC_CAN1_FORCE_RESET();
group-onsemi 0:098463de4c5d 104 __HAL_RCC_CAN1_RELEASE_RESET();
group-onsemi 0:098463de4c5d 105 __HAL_RCC_CAN1_CLK_DISABLE();
group-onsemi 0:098463de4c5d 106 }
group-onsemi 0:098463de4c5d 107
group-onsemi 0:098463de4c5d 108 if (obj->can == CAN_2) {
group-onsemi 0:098463de4c5d 109 __HAL_RCC_CAN2_FORCE_RESET();
group-onsemi 0:098463de4c5d 110 __HAL_RCC_CAN2_RELEASE_RESET();
group-onsemi 0:098463de4c5d 111 __HAL_RCC_CAN2_CLK_DISABLE();
group-onsemi 0:098463de4c5d 112 }
group-onsemi 0:098463de4c5d 113 }
group-onsemi 0:098463de4c5d 114
group-onsemi 0:098463de4c5d 115 // The following table is used to program bit_timing. It is an adjustment of the sample
group-onsemi 0:098463de4c5d 116 // point by synchronizing on the start-bit edge and resynchronizing on the following edges.
group-onsemi 0:098463de4c5d 117 // This table has the sampling points as close to 75% as possible (most commonly used).
group-onsemi 0:098463de4c5d 118 // The first value is TSEG1, the second TSEG2.
group-onsemi 0:098463de4c5d 119 static const int timing_pts[23][2] = {
group-onsemi 0:098463de4c5d 120 {0x0, 0x0}, // 2, 50%
group-onsemi 0:098463de4c5d 121 {0x1, 0x0}, // 3, 67%
group-onsemi 0:098463de4c5d 122 {0x2, 0x0}, // 4, 75%
group-onsemi 0:098463de4c5d 123 {0x3, 0x0}, // 5, 80%
group-onsemi 0:098463de4c5d 124 {0x3, 0x1}, // 6, 67%
group-onsemi 0:098463de4c5d 125 {0x4, 0x1}, // 7, 71%
group-onsemi 0:098463de4c5d 126 {0x5, 0x1}, // 8, 75%
group-onsemi 0:098463de4c5d 127 {0x6, 0x1}, // 9, 78%
group-onsemi 0:098463de4c5d 128 {0x6, 0x2}, // 10, 70%
group-onsemi 0:098463de4c5d 129 {0x7, 0x2}, // 11, 73%
group-onsemi 0:098463de4c5d 130 {0x8, 0x2}, // 12, 75%
group-onsemi 0:098463de4c5d 131 {0x9, 0x2}, // 13, 77%
group-onsemi 0:098463de4c5d 132 {0x9, 0x3}, // 14, 71%
group-onsemi 0:098463de4c5d 133 {0xA, 0x3}, // 15, 73%
group-onsemi 0:098463de4c5d 134 {0xB, 0x3}, // 16, 75%
group-onsemi 0:098463de4c5d 135 {0xC, 0x3}, // 17, 76%
group-onsemi 0:098463de4c5d 136 {0xD, 0x3}, // 18, 78%
group-onsemi 0:098463de4c5d 137 {0xD, 0x4}, // 19, 74%
group-onsemi 0:098463de4c5d 138 {0xE, 0x4}, // 20, 75%
group-onsemi 0:098463de4c5d 139 {0xF, 0x4}, // 21, 76%
group-onsemi 0:098463de4c5d 140 {0xF, 0x5}, // 22, 73%
group-onsemi 0:098463de4c5d 141 {0xF, 0x6}, // 23, 70%
group-onsemi 0:098463de4c5d 142 {0xF, 0x7}, // 24, 67%
group-onsemi 0:098463de4c5d 143 };
group-onsemi 0:098463de4c5d 144
group-onsemi 0:098463de4c5d 145 static unsigned int can_speed(unsigned int pclk, unsigned int cclk, unsigned char psjw)
group-onsemi 0:098463de4c5d 146 {
group-onsemi 0:098463de4c5d 147 uint32_t btr;
group-onsemi 0:098463de4c5d 148 uint16_t brp = 0;
group-onsemi 0:098463de4c5d 149 uint32_t calcbit;
group-onsemi 0:098463de4c5d 150 uint32_t bitwidth;
group-onsemi 0:098463de4c5d 151 int hit = 0;
group-onsemi 0:098463de4c5d 152 int bits;
group-onsemi 0:098463de4c5d 153
group-onsemi 0:098463de4c5d 154 bitwidth = (pclk / cclk);
group-onsemi 0:098463de4c5d 155
group-onsemi 0:098463de4c5d 156 brp = bitwidth / 0x18;
group-onsemi 0:098463de4c5d 157 while ((!hit) && (brp < bitwidth / 4)) {
group-onsemi 0:098463de4c5d 158 brp++;
group-onsemi 0:098463de4c5d 159 for (bits = 22; bits > 0; bits--) {
group-onsemi 0:098463de4c5d 160 calcbit = (bits + 3) * (brp + 1);
group-onsemi 0:098463de4c5d 161 if (calcbit == bitwidth) {
group-onsemi 0:098463de4c5d 162 hit = 1;
group-onsemi 0:098463de4c5d 163 break;
group-onsemi 0:098463de4c5d 164 }
group-onsemi 0:098463de4c5d 165 }
group-onsemi 0:098463de4c5d 166 }
group-onsemi 0:098463de4c5d 167
group-onsemi 0:098463de4c5d 168 if (hit) {
group-onsemi 0:098463de4c5d 169 btr = ((timing_pts[bits][1] << 20) & 0x00700000)
group-onsemi 0:098463de4c5d 170 | ((timing_pts[bits][0] << 16) & 0x000F0000)
group-onsemi 0:098463de4c5d 171 | ((psjw << 24) & 0x0000C000)
group-onsemi 0:098463de4c5d 172 | ((brp << 0) & 0x000003FF);
group-onsemi 0:098463de4c5d 173 } else {
group-onsemi 0:098463de4c5d 174 btr = 0xFFFFFFFF;
group-onsemi 0:098463de4c5d 175 }
group-onsemi 0:098463de4c5d 176
group-onsemi 0:098463de4c5d 177 return btr;
group-onsemi 0:098463de4c5d 178
group-onsemi 0:098463de4c5d 179 }
group-onsemi 0:098463de4c5d 180
group-onsemi 0:098463de4c5d 181 int can_frequency(can_t *obj, int f)
group-onsemi 0:098463de4c5d 182 {
group-onsemi 0:098463de4c5d 183 int pclk = HAL_RCC_GetPCLK1Freq();
group-onsemi 0:098463de4c5d 184 int btr = can_speed(pclk, (unsigned int)f, 1);
group-onsemi 0:098463de4c5d 185 CAN_TypeDef *can = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 186
group-onsemi 0:098463de4c5d 187 if (btr > 0) {
group-onsemi 0:098463de4c5d 188 can->MCR |= CAN_MCR_INRQ ;
group-onsemi 0:098463de4c5d 189 while((can->MSR & CAN_MSR_INAK) != CAN_MSR_INAK) {
group-onsemi 0:098463de4c5d 190 }
group-onsemi 0:098463de4c5d 191 can->BTR = btr;
group-onsemi 0:098463de4c5d 192 can->MCR &= ~(uint32_t)CAN_MCR_INRQ;
group-onsemi 0:098463de4c5d 193 while((can->MSR & CAN_MSR_INAK) == CAN_MSR_INAK) {
group-onsemi 0:098463de4c5d 194 }
group-onsemi 0:098463de4c5d 195 return 1;
group-onsemi 0:098463de4c5d 196 } else {
group-onsemi 0:098463de4c5d 197 return 0;
group-onsemi 0:098463de4c5d 198 }
group-onsemi 0:098463de4c5d 199 }
group-onsemi 0:098463de4c5d 200
group-onsemi 0:098463de4c5d 201 int can_write(can_t *obj, CAN_Message msg, int cc)
group-onsemi 0:098463de4c5d 202 {
group-onsemi 0:098463de4c5d 203 uint32_t transmitmailbox = 5;
group-onsemi 0:098463de4c5d 204 CAN_TypeDef *can = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 205
group-onsemi 0:098463de4c5d 206 /* Select one empty transmit mailbox */
group-onsemi 0:098463de4c5d 207 if ((can->TSR&CAN_TSR_TME0) == CAN_TSR_TME0) {
group-onsemi 0:098463de4c5d 208 transmitmailbox = 0;
group-onsemi 0:098463de4c5d 209 } else if ((can->TSR&CAN_TSR_TME1) == CAN_TSR_TME1) {
group-onsemi 0:098463de4c5d 210 transmitmailbox = 1;
group-onsemi 0:098463de4c5d 211 } else if ((can->TSR&CAN_TSR_TME2) == CAN_TSR_TME2) {
group-onsemi 0:098463de4c5d 212 transmitmailbox = 2;
group-onsemi 0:098463de4c5d 213 } else {
group-onsemi 0:098463de4c5d 214 transmitmailbox = CAN_TXSTATUS_NOMAILBOX;
group-onsemi 0:098463de4c5d 215 }
group-onsemi 0:098463de4c5d 216
group-onsemi 0:098463de4c5d 217 if (transmitmailbox != CAN_TXSTATUS_NOMAILBOX) {
group-onsemi 0:098463de4c5d 218 can->sTxMailBox[transmitmailbox].TIR &= CAN_TI0R_TXRQ;
group-onsemi 0:098463de4c5d 219 if (!(msg.format))
group-onsemi 0:098463de4c5d 220 {
group-onsemi 0:098463de4c5d 221 can->sTxMailBox[transmitmailbox].TIR |= ((msg.id << 21) | msg.type);
group-onsemi 0:098463de4c5d 222 }
group-onsemi 0:098463de4c5d 223 else
group-onsemi 0:098463de4c5d 224 {
group-onsemi 0:098463de4c5d 225 can->sTxMailBox[transmitmailbox].TIR |= ((msg.id << 3) | CAN_ID_EXT | msg.type);
group-onsemi 0:098463de4c5d 226 }
group-onsemi 0:098463de4c5d 227
group-onsemi 0:098463de4c5d 228 /* Set up the DLC */
group-onsemi 0:098463de4c5d 229 can->sTxMailBox[transmitmailbox].TDTR &= (uint32_t)0xFFFFFFF0;
group-onsemi 0:098463de4c5d 230 can->sTxMailBox[transmitmailbox].TDTR |= (msg.len & (uint8_t)0x0000000F);
group-onsemi 0:098463de4c5d 231
group-onsemi 0:098463de4c5d 232 /* Set up the data field */
group-onsemi 0:098463de4c5d 233 can->sTxMailBox[transmitmailbox].TDLR = (((uint32_t)msg.data[3] << 24) |
group-onsemi 0:098463de4c5d 234 ((uint32_t)msg.data[2] << 16) |
group-onsemi 0:098463de4c5d 235 ((uint32_t)msg.data[1] << 8) |
group-onsemi 0:098463de4c5d 236 ((uint32_t)msg.data[0]));
group-onsemi 0:098463de4c5d 237 can->sTxMailBox[transmitmailbox].TDHR = (((uint32_t)msg.data[7] << 24) |
group-onsemi 0:098463de4c5d 238 ((uint32_t)msg.data[6] << 16) |
group-onsemi 0:098463de4c5d 239 ((uint32_t)msg.data[5] << 8) |
group-onsemi 0:098463de4c5d 240 ((uint32_t)msg.data[4]));
group-onsemi 0:098463de4c5d 241 /* Request transmission */
group-onsemi 0:098463de4c5d 242 can->sTxMailBox[transmitmailbox].TIR |= CAN_TI0R_TXRQ;
group-onsemi 0:098463de4c5d 243 }
group-onsemi 0:098463de4c5d 244
group-onsemi 0:098463de4c5d 245 return 1;
group-onsemi 0:098463de4c5d 246 }
group-onsemi 0:098463de4c5d 247
group-onsemi 0:098463de4c5d 248 int can_read(can_t *obj, CAN_Message *msg, int handle)
group-onsemi 0:098463de4c5d 249 {
group-onsemi 0:098463de4c5d 250 //handle is the FIFO number
group-onsemi 0:098463de4c5d 251
group-onsemi 0:098463de4c5d 252 CAN_TypeDef *can = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 253
group-onsemi 0:098463de4c5d 254 // check FPM0 which holds the pending message count in FIFO 0
group-onsemi 0:098463de4c5d 255 // if no message is pending, return 0
group-onsemi 0:098463de4c5d 256 if ((can->RF0R & CAN_RF0R_FMP0) == 0) {
group-onsemi 0:098463de4c5d 257 return 0;
group-onsemi 0:098463de4c5d 258 }
group-onsemi 0:098463de4c5d 259
group-onsemi 0:098463de4c5d 260 /* Get the Id */
group-onsemi 0:098463de4c5d 261 msg->format = (CANFormat)((uint8_t)0x04 & can->sFIFOMailBox[handle].RIR);
group-onsemi 0:098463de4c5d 262 if (!msg->format) {
group-onsemi 0:098463de4c5d 263 msg->id = (uint32_t)0x000007FF & (can->sFIFOMailBox[handle].RIR >> 21);
group-onsemi 0:098463de4c5d 264 } else {
group-onsemi 0:098463de4c5d 265 msg->id = (uint32_t)0x1FFFFFFF & (can->sFIFOMailBox[handle].RIR >> 3);
group-onsemi 0:098463de4c5d 266 }
group-onsemi 0:098463de4c5d 267
group-onsemi 0:098463de4c5d 268 msg->type = (CANType)((uint8_t)0x02 & can->sFIFOMailBox[handle].RIR);
group-onsemi 0:098463de4c5d 269 /* Get the DLC */
group-onsemi 0:098463de4c5d 270 msg->len = (uint8_t)0x0F & can->sFIFOMailBox[handle].RDTR;
group-onsemi 0:098463de4c5d 271 // /* Get the FMI */
group-onsemi 0:098463de4c5d 272 // msg->FMI = (uint8_t)0xFF & (can->sFIFOMailBox[handle].RDTR >> 8);
group-onsemi 0:098463de4c5d 273 /* Get the data field */
group-onsemi 0:098463de4c5d 274 msg->data[0] = (uint8_t)0xFF & can->sFIFOMailBox[handle].RDLR;
group-onsemi 0:098463de4c5d 275 msg->data[1] = (uint8_t)0xFF & (can->sFIFOMailBox[handle].RDLR >> 8);
group-onsemi 0:098463de4c5d 276 msg->data[2] = (uint8_t)0xFF & (can->sFIFOMailBox[handle].RDLR >> 16);
group-onsemi 0:098463de4c5d 277 msg->data[3] = (uint8_t)0xFF & (can->sFIFOMailBox[handle].RDLR >> 24);
group-onsemi 0:098463de4c5d 278 msg->data[4] = (uint8_t)0xFF & can->sFIFOMailBox[handle].RDHR;
group-onsemi 0:098463de4c5d 279 msg->data[5] = (uint8_t)0xFF & (can->sFIFOMailBox[handle].RDHR >> 8);
group-onsemi 0:098463de4c5d 280 msg->data[6] = (uint8_t)0xFF & (can->sFIFOMailBox[handle].RDHR >> 16);
group-onsemi 0:098463de4c5d 281 msg->data[7] = (uint8_t)0xFF & (can->sFIFOMailBox[handle].RDHR >> 24);
group-onsemi 0:098463de4c5d 282
group-onsemi 0:098463de4c5d 283 /* Release the FIFO */
group-onsemi 0:098463de4c5d 284 if(handle == CAN_FIFO0) {
group-onsemi 0:098463de4c5d 285 /* Release FIFO0 */
group-onsemi 0:098463de4c5d 286 can->RF0R |= CAN_RF0R_RFOM0;
group-onsemi 0:098463de4c5d 287 } else { /* FIFONumber == CAN_FIFO1 */
group-onsemi 0:098463de4c5d 288 /* Release FIFO1 */
group-onsemi 0:098463de4c5d 289 can->RF1R |= CAN_RF1R_RFOM1;
group-onsemi 0:098463de4c5d 290 }
group-onsemi 0:098463de4c5d 291
group-onsemi 0:098463de4c5d 292 return 1;
group-onsemi 0:098463de4c5d 293 }
group-onsemi 0:098463de4c5d 294
group-onsemi 0:098463de4c5d 295 void can_reset(can_t *obj)
group-onsemi 0:098463de4c5d 296 {
group-onsemi 0:098463de4c5d 297 CAN_TypeDef *can = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 298
group-onsemi 0:098463de4c5d 299 can->MCR |= CAN_MCR_RESET;
group-onsemi 0:098463de4c5d 300 can->ESR = 0x0;
group-onsemi 0:098463de4c5d 301 }
group-onsemi 0:098463de4c5d 302
group-onsemi 0:098463de4c5d 303 unsigned char can_rderror(can_t *obj)
group-onsemi 0:098463de4c5d 304 {
group-onsemi 0:098463de4c5d 305 CAN_TypeDef *can = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 306 return (can->ESR >> 24) & 0xFF;
group-onsemi 0:098463de4c5d 307 }
group-onsemi 0:098463de4c5d 308
group-onsemi 0:098463de4c5d 309 unsigned char can_tderror(can_t *obj)
group-onsemi 0:098463de4c5d 310 {
group-onsemi 0:098463de4c5d 311 CAN_TypeDef *can = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 312 return (can->ESR >> 16) & 0xFF;
group-onsemi 0:098463de4c5d 313 }
group-onsemi 0:098463de4c5d 314
group-onsemi 0:098463de4c5d 315 void can_monitor(can_t *obj, int silent)
group-onsemi 0:098463de4c5d 316 {
group-onsemi 0:098463de4c5d 317 CAN_TypeDef *can = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 318
group-onsemi 0:098463de4c5d 319 can->MCR |= CAN_MCR_INRQ ;
group-onsemi 0:098463de4c5d 320 while((can->MSR & CAN_MSR_INAK) != CAN_MSR_INAK) {
group-onsemi 0:098463de4c5d 321 }
group-onsemi 0:098463de4c5d 322 if (silent) {
group-onsemi 0:098463de4c5d 323 can->BTR |= ((uint32_t)1 << 31);
group-onsemi 0:098463de4c5d 324 } else {
group-onsemi 0:098463de4c5d 325 can->BTR &= ~((uint32_t)1 << 31);
group-onsemi 0:098463de4c5d 326 }
group-onsemi 0:098463de4c5d 327 can->MCR &= ~(uint32_t)CAN_MCR_INRQ;
group-onsemi 0:098463de4c5d 328 while((can->MSR & CAN_MSR_INAK) == CAN_MSR_INAK) {
group-onsemi 0:098463de4c5d 329 }
group-onsemi 0:098463de4c5d 330 }
group-onsemi 0:098463de4c5d 331
group-onsemi 0:098463de4c5d 332 int can_mode(can_t *obj, CanMode mode)
group-onsemi 0:098463de4c5d 333 {
group-onsemi 0:098463de4c5d 334 int success = 0;
group-onsemi 0:098463de4c5d 335 CAN_TypeDef *can = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 336 can->MCR |= CAN_MCR_INRQ ;
group-onsemi 0:098463de4c5d 337 while((can->MSR & CAN_MSR_INAK) != CAN_MSR_INAK) {
group-onsemi 0:098463de4c5d 338 }
group-onsemi 0:098463de4c5d 339 switch (mode) {
group-onsemi 0:098463de4c5d 340 case MODE_NORMAL:
group-onsemi 0:098463de4c5d 341 can->BTR &= ~(CAN_BTR_SILM | CAN_BTR_LBKM);
group-onsemi 0:098463de4c5d 342 success = 1;
group-onsemi 0:098463de4c5d 343 break;
group-onsemi 0:098463de4c5d 344 case MODE_SILENT:
group-onsemi 0:098463de4c5d 345 can->BTR |= CAN_BTR_SILM;
group-onsemi 0:098463de4c5d 346 can->BTR &= ~CAN_BTR_LBKM;
group-onsemi 0:098463de4c5d 347 success = 1;
group-onsemi 0:098463de4c5d 348 break;
group-onsemi 0:098463de4c5d 349 case MODE_TEST_GLOBAL:
group-onsemi 0:098463de4c5d 350 case MODE_TEST_LOCAL:
group-onsemi 0:098463de4c5d 351 can->BTR |= CAN_BTR_LBKM;
group-onsemi 0:098463de4c5d 352 can->BTR &= ~CAN_BTR_SILM;
group-onsemi 0:098463de4c5d 353 success = 1;
group-onsemi 0:098463de4c5d 354 break;
group-onsemi 0:098463de4c5d 355 case MODE_TEST_SILENT:
group-onsemi 0:098463de4c5d 356 can->BTR |= (CAN_BTR_SILM | CAN_BTR_LBKM);
group-onsemi 0:098463de4c5d 357 success = 1;
group-onsemi 0:098463de4c5d 358 break;
group-onsemi 0:098463de4c5d 359 default:
group-onsemi 0:098463de4c5d 360 success = 0;
group-onsemi 0:098463de4c5d 361 break;
group-onsemi 0:098463de4c5d 362 }
group-onsemi 0:098463de4c5d 363 can->MCR &= ~(uint32_t)CAN_MCR_INRQ;
group-onsemi 0:098463de4c5d 364 while((can->MSR & CAN_MSR_INAK) == CAN_MSR_INAK) {
group-onsemi 0:098463de4c5d 365 }
group-onsemi 0:098463de4c5d 366 return success;
group-onsemi 0:098463de4c5d 367 }
group-onsemi 0:098463de4c5d 368
group-onsemi 0:098463de4c5d 369 int can_filter(can_t *obj, uint32_t id, uint32_t mask, CANFormat format, int32_t handle)
group-onsemi 0:098463de4c5d 370 {
group-onsemi 0:098463de4c5d 371 CanHandle.Instance = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 372 CAN_FilterConfTypeDef sFilterConfig;
group-onsemi 0:098463de4c5d 373
group-onsemi 0:098463de4c5d 374 sFilterConfig.FilterNumber = handle;
group-onsemi 0:098463de4c5d 375 sFilterConfig.FilterMode = CAN_FILTERMODE_IDMASK;
group-onsemi 0:098463de4c5d 376 sFilterConfig.FilterScale = CAN_FILTERSCALE_32BIT;
group-onsemi 0:098463de4c5d 377 sFilterConfig.FilterIdHigh = (uint8_t) (id >> 8);
group-onsemi 0:098463de4c5d 378 sFilterConfig.FilterIdLow = (uint8_t) id;
group-onsemi 0:098463de4c5d 379 sFilterConfig.FilterMaskIdHigh = (uint8_t) (mask >> 8);
group-onsemi 0:098463de4c5d 380 sFilterConfig.FilterMaskIdLow = (uint8_t) mask;
group-onsemi 0:098463de4c5d 381 sFilterConfig.FilterFIFOAssignment = 0;
group-onsemi 0:098463de4c5d 382 sFilterConfig.FilterActivation = ENABLE;
group-onsemi 0:098463de4c5d 383 sFilterConfig.BankNumber = 14 + handle;
group-onsemi 0:098463de4c5d 384
group-onsemi 0:098463de4c5d 385 HAL_CAN_ConfigFilter(&CanHandle, &sFilterConfig);
group-onsemi 0:098463de4c5d 386
group-onsemi 0:098463de4c5d 387 return 0;
group-onsemi 0:098463de4c5d 388 }
group-onsemi 0:098463de4c5d 389
group-onsemi 0:098463de4c5d 390 static void can_irq(CANName name, int id)
group-onsemi 0:098463de4c5d 391 {
group-onsemi 0:098463de4c5d 392 uint32_t tmp1 = 0, tmp2 = 0, tmp3 = 0;
group-onsemi 0:098463de4c5d 393 CanHandle.Instance = (CAN_TypeDef *)name;
group-onsemi 0:098463de4c5d 394
group-onsemi 0:098463de4c5d 395 if(__HAL_CAN_GET_IT_SOURCE(&CanHandle, CAN_IT_TME)) {
group-onsemi 0:098463de4c5d 396 tmp1 = __HAL_CAN_TRANSMIT_STATUS(&CanHandle, CAN_TXMAILBOX_0);
group-onsemi 0:098463de4c5d 397 tmp2 = __HAL_CAN_TRANSMIT_STATUS(&CanHandle, CAN_TXMAILBOX_1);
group-onsemi 0:098463de4c5d 398 tmp3 = __HAL_CAN_TRANSMIT_STATUS(&CanHandle, CAN_TXMAILBOX_2);
group-onsemi 0:098463de4c5d 399 if(tmp1 || tmp2 || tmp3)
group-onsemi 0:098463de4c5d 400 {
group-onsemi 0:098463de4c5d 401 irq_handler(can_irq_ids[id], IRQ_TX);
group-onsemi 0:098463de4c5d 402 }
group-onsemi 0:098463de4c5d 403 }
group-onsemi 0:098463de4c5d 404
group-onsemi 0:098463de4c5d 405 tmp1 = __HAL_CAN_MSG_PENDING(&CanHandle, CAN_FIFO0);
group-onsemi 0:098463de4c5d 406 tmp2 = __HAL_CAN_GET_IT_SOURCE(&CanHandle, CAN_IT_FMP0);
group-onsemi 0:098463de4c5d 407
group-onsemi 0:098463de4c5d 408 if((tmp1 != 0) && tmp2) {
group-onsemi 0:098463de4c5d 409 irq_handler(can_irq_ids[id], IRQ_RX);
group-onsemi 0:098463de4c5d 410 }
group-onsemi 0:098463de4c5d 411
group-onsemi 0:098463de4c5d 412 tmp1 = __HAL_CAN_GET_FLAG(&CanHandle, CAN_FLAG_EPV);
group-onsemi 0:098463de4c5d 413 tmp2 = __HAL_CAN_GET_IT_SOURCE(&CanHandle, CAN_IT_EPV);
group-onsemi 0:098463de4c5d 414 tmp3 = __HAL_CAN_GET_IT_SOURCE(&CanHandle, CAN_IT_ERR);
group-onsemi 0:098463de4c5d 415
group-onsemi 0:098463de4c5d 416 if(tmp1 && tmp2 && tmp3) {
group-onsemi 0:098463de4c5d 417 irq_handler(can_irq_ids[id], IRQ_PASSIVE);
group-onsemi 0:098463de4c5d 418 }
group-onsemi 0:098463de4c5d 419
group-onsemi 0:098463de4c5d 420 tmp1 = __HAL_CAN_GET_FLAG(&CanHandle, CAN_FLAG_BOF);
group-onsemi 0:098463de4c5d 421 tmp2 = __HAL_CAN_GET_IT_SOURCE(&CanHandle, CAN_IT_BOF);
group-onsemi 0:098463de4c5d 422 tmp3 = __HAL_CAN_GET_IT_SOURCE(&CanHandle, CAN_IT_ERR);
group-onsemi 0:098463de4c5d 423 if(tmp1 && tmp2 && tmp3) {
group-onsemi 0:098463de4c5d 424 irq_handler(can_irq_ids[id], IRQ_BUS);
group-onsemi 0:098463de4c5d 425 }
group-onsemi 0:098463de4c5d 426
group-onsemi 0:098463de4c5d 427 tmp3 = __HAL_CAN_GET_IT_SOURCE(&CanHandle, CAN_IT_ERR);
group-onsemi 0:098463de4c5d 428 if(tmp1 && tmp2 && tmp3) {
group-onsemi 0:098463de4c5d 429 irq_handler(can_irq_ids[id], IRQ_ERROR);
group-onsemi 0:098463de4c5d 430 }
group-onsemi 0:098463de4c5d 431 }
group-onsemi 0:098463de4c5d 432
group-onsemi 0:098463de4c5d 433 void CAN1_RX0_IRQHandler(void)
group-onsemi 0:098463de4c5d 434 {
group-onsemi 0:098463de4c5d 435 can_irq(CAN_1, 0);
group-onsemi 0:098463de4c5d 436 }
group-onsemi 0:098463de4c5d 437
group-onsemi 0:098463de4c5d 438 void CAN1_TX_IRQHandler(void)
group-onsemi 0:098463de4c5d 439 {
group-onsemi 0:098463de4c5d 440 can_irq(CAN_1, 0);
group-onsemi 0:098463de4c5d 441 }
group-onsemi 0:098463de4c5d 442
group-onsemi 0:098463de4c5d 443 void CAN1_SCE_IRQHandler(void)
group-onsemi 0:098463de4c5d 444 {
group-onsemi 0:098463de4c5d 445 can_irq(CAN_1, 0);
group-onsemi 0:098463de4c5d 446 }
group-onsemi 0:098463de4c5d 447
group-onsemi 0:098463de4c5d 448 void CAN2_RX0_IRQHandler(void)
group-onsemi 0:098463de4c5d 449 {
group-onsemi 0:098463de4c5d 450 can_irq(CAN_2, 1);
group-onsemi 0:098463de4c5d 451 }
group-onsemi 0:098463de4c5d 452
group-onsemi 0:098463de4c5d 453 void CAN2_TX_IRQHandler(void)
group-onsemi 0:098463de4c5d 454 {
group-onsemi 0:098463de4c5d 455 can_irq(CAN_2, 1);
group-onsemi 0:098463de4c5d 456 }
group-onsemi 0:098463de4c5d 457
group-onsemi 0:098463de4c5d 458 void CAN2_SCE_IRQHandler(void)
group-onsemi 0:098463de4c5d 459 {
group-onsemi 0:098463de4c5d 460 can_irq(CAN_2, 1);
group-onsemi 0:098463de4c5d 461 }
group-onsemi 0:098463de4c5d 462
group-onsemi 0:098463de4c5d 463 void can_irq_set(can_t *obj, CanIrqType type, uint32_t enable)
group-onsemi 0:098463de4c5d 464 {
group-onsemi 0:098463de4c5d 465
group-onsemi 0:098463de4c5d 466 CAN_TypeDef *can = (CAN_TypeDef *)(obj->can);
group-onsemi 0:098463de4c5d 467 IRQn_Type irq_n = (IRQn_Type)0;
group-onsemi 0:098463de4c5d 468 uint32_t vector = 0;
group-onsemi 0:098463de4c5d 469 uint32_t ier;
group-onsemi 0:098463de4c5d 470
group-onsemi 0:098463de4c5d 471 if(obj->can == CAN_1) {
group-onsemi 0:098463de4c5d 472 switch (type) {
group-onsemi 0:098463de4c5d 473 case IRQ_RX:
group-onsemi 0:098463de4c5d 474 ier = CAN_IT_FMP0;
group-onsemi 0:098463de4c5d 475 irq_n = CAN1_RX0_IRQn;
group-onsemi 0:098463de4c5d 476 vector = (uint32_t)&CAN1_RX0_IRQHandler;
group-onsemi 0:098463de4c5d 477 break;
group-onsemi 0:098463de4c5d 478 case IRQ_TX:
group-onsemi 0:098463de4c5d 479 ier = CAN_IT_TME;
group-onsemi 0:098463de4c5d 480 irq_n = CAN1_TX_IRQn;
group-onsemi 0:098463de4c5d 481 vector = (uint32_t)&CAN1_TX_IRQHandler;
group-onsemi 0:098463de4c5d 482 break;
group-onsemi 0:098463de4c5d 483 case IRQ_ERROR:
group-onsemi 0:098463de4c5d 484 ier = CAN_IT_ERR;
group-onsemi 0:098463de4c5d 485 irq_n = CAN1_SCE_IRQn;
group-onsemi 0:098463de4c5d 486 vector = (uint32_t)&CAN1_SCE_IRQHandler;
group-onsemi 0:098463de4c5d 487 break;
group-onsemi 0:098463de4c5d 488 case IRQ_PASSIVE:
group-onsemi 0:098463de4c5d 489 ier = CAN_IT_EPV;
group-onsemi 0:098463de4c5d 490 irq_n = CAN1_SCE_IRQn;
group-onsemi 0:098463de4c5d 491 vector = (uint32_t)&CAN1_SCE_IRQHandler;
group-onsemi 0:098463de4c5d 492 break;
group-onsemi 0:098463de4c5d 493 case IRQ_BUS:
group-onsemi 0:098463de4c5d 494 ier = CAN_IT_BOF;
group-onsemi 0:098463de4c5d 495 irq_n = CAN1_SCE_IRQn;
group-onsemi 0:098463de4c5d 496 vector = (uint32_t)&CAN1_SCE_IRQHandler;
group-onsemi 0:098463de4c5d 497 break;
group-onsemi 0:098463de4c5d 498 default: return;
group-onsemi 0:098463de4c5d 499 }
group-onsemi 0:098463de4c5d 500 } else {
group-onsemi 0:098463de4c5d 501 switch (type) {
group-onsemi 0:098463de4c5d 502 case IRQ_RX:
group-onsemi 0:098463de4c5d 503 ier = CAN_IT_FMP0;
group-onsemi 0:098463de4c5d 504 irq_n = CAN2_RX0_IRQn;
group-onsemi 0:098463de4c5d 505 vector = (uint32_t)&CAN2_RX0_IRQHandler;
group-onsemi 0:098463de4c5d 506 break;
group-onsemi 0:098463de4c5d 507 case IRQ_TX:
group-onsemi 0:098463de4c5d 508 ier = CAN_IT_TME;
group-onsemi 0:098463de4c5d 509 irq_n = CAN2_TX_IRQn;
group-onsemi 0:098463de4c5d 510 vector = (uint32_t)&CAN2_TX_IRQHandler;
group-onsemi 0:098463de4c5d 511 break;
group-onsemi 0:098463de4c5d 512 case IRQ_ERROR:
group-onsemi 0:098463de4c5d 513 ier = CAN_IT_ERR;
group-onsemi 0:098463de4c5d 514 irq_n = CAN2_SCE_IRQn;
group-onsemi 0:098463de4c5d 515 vector = (uint32_t)&CAN2_SCE_IRQHandler;
group-onsemi 0:098463de4c5d 516 break;
group-onsemi 0:098463de4c5d 517 case IRQ_PASSIVE:
group-onsemi 0:098463de4c5d 518 ier = CAN_IT_EPV;
group-onsemi 0:098463de4c5d 519 irq_n = CAN2_SCE_IRQn;
group-onsemi 0:098463de4c5d 520 vector = (uint32_t)&CAN2_SCE_IRQHandler;
group-onsemi 0:098463de4c5d 521 break;
group-onsemi 0:098463de4c5d 522 case IRQ_BUS:
group-onsemi 0:098463de4c5d 523 ier = CAN_IT_BOF;
group-onsemi 0:098463de4c5d 524 irq_n = CAN2_SCE_IRQn;
group-onsemi 0:098463de4c5d 525 vector = (uint32_t)&CAN2_SCE_IRQHandler;
group-onsemi 0:098463de4c5d 526 break;
group-onsemi 0:098463de4c5d 527 default: return;
group-onsemi 0:098463de4c5d 528 }
group-onsemi 0:098463de4c5d 529 }
group-onsemi 0:098463de4c5d 530
group-onsemi 0:098463de4c5d 531 if(enable) {
group-onsemi 0:098463de4c5d 532 can->IER |= ier;
group-onsemi 0:098463de4c5d 533 } else {
group-onsemi 0:098463de4c5d 534 can->IER &= ~ier;
group-onsemi 0:098463de4c5d 535 }
group-onsemi 0:098463de4c5d 536
group-onsemi 0:098463de4c5d 537 NVIC_SetVector(irq_n, vector);
group-onsemi 0:098463de4c5d 538 NVIC_EnableIRQ(irq_n);
group-onsemi 0:098463de4c5d 539 }
group-onsemi 0:098463de4c5d 540
group-onsemi 0:098463de4c5d 541 #endif // DEVICE_CAN
group-onsemi 0:098463de4c5d 542