mbed library sources

Dependents:   frdm_kl05z_gpio_test

Fork of mbed-src by mbed official

Committer:
mbed_official
Date:
Mon Jun 30 08:00:09 2014 +0100
Revision:
245:b4dea936db71
Child:
250:a49055e7a707
Synchronized with git revision 6d2c15e80d518718dd1ce6f44299acca1ff63ea3

Full URL: https://github.com/mbedmicro/mbed/commit/6d2c15e80d518718dd1ce6f44299acca1ff63ea3/

[LPC1549] CAN support

Who changed what in which revision?

UserRevisionLine numberNew contents of line
mbed_official 245:b4dea936db71 1 /* mbed Microcontroller Library
mbed_official 245:b4dea936db71 2 * Copyright (c) 2006-2013 ARM Limited
mbed_official 245:b4dea936db71 3 *
mbed_official 245:b4dea936db71 4 * Licensed under the Apache License, Version 2.0 (the "License");
mbed_official 245:b4dea936db71 5 * you may not use this file except in compliance with the License.
mbed_official 245:b4dea936db71 6 * You may obtain a copy of the License at
mbed_official 245:b4dea936db71 7 *
mbed_official 245:b4dea936db71 8 * http://www.apache.org/licenses/LICENSE-2.0
mbed_official 245:b4dea936db71 9 *
mbed_official 245:b4dea936db71 10 * Unless required by applicable law or agreed to in writing, software
mbed_official 245:b4dea936db71 11 * distributed under the License is distributed on an "AS IS" BASIS,
mbed_official 245:b4dea936db71 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
mbed_official 245:b4dea936db71 13 * See the License for the specific language governing permissions and
mbed_official 245:b4dea936db71 14 * limitations under the License.
mbed_official 245:b4dea936db71 15 */
mbed_official 245:b4dea936db71 16
mbed_official 245:b4dea936db71 17 #include "can_api.h"
mbed_official 245:b4dea936db71 18
mbed_official 245:b4dea936db71 19 #include "cmsis.h"
mbed_official 245:b4dea936db71 20 #include "error.h"
mbed_official 245:b4dea936db71 21
mbed_official 245:b4dea936db71 22 #include <math.h>
mbed_official 245:b4dea936db71 23 #include <string.h>
mbed_official 245:b4dea936db71 24
mbed_official 245:b4dea936db71 25 /* Handy defines */
mbed_official 245:b4dea936db71 26 #define MSG_OBJ_MAX 32
mbed_official 245:b4dea936db71 27 #define DLC_MAX 8
mbed_official 245:b4dea936db71 28
mbed_official 245:b4dea936db71 29 #define ID_STD_MASK 0x07FF
mbed_official 245:b4dea936db71 30 #define ID_EXT_MASK 0x1FFFFFFF
mbed_official 245:b4dea936db71 31 #define DLC_MASK 0x0F
mbed_official 245:b4dea936db71 32
mbed_official 245:b4dea936db71 33 #define CANIFn_ARB2_DIR (1UL << 13)
mbed_official 245:b4dea936db71 34 #define CANIFn_ARB2_XTD (1UL << 14)
mbed_official 245:b4dea936db71 35 #define CANIFn_ARB2_MSGVAL (1UL << 15)
mbed_official 245:b4dea936db71 36 #define CANIFn_MSK2_MXTD (1UL << 15)
mbed_official 245:b4dea936db71 37 #define CANIFn_MSK2_MDIR (1UL << 14)
mbed_official 245:b4dea936db71 38 #define CANIFn_MCTRL_EOB (1UL << 7)
mbed_official 245:b4dea936db71 39 #define CANIFn_MCTRL_TXRQST (1UL << 8)
mbed_official 245:b4dea936db71 40 #define CANIFn_MCTRL_RMTEN (1UL << 9)
mbed_official 245:b4dea936db71 41 #define CANIFn_MCTRL_RXIE (1UL << 10)
mbed_official 245:b4dea936db71 42 #define CANIFn_MCTRL_TXIE (1UL << 11)
mbed_official 245:b4dea936db71 43 #define CANIFn_MCTRL_UMASK (1UL << 12)
mbed_official 245:b4dea936db71 44 #define CANIFn_MCTRL_INTPND (1UL << 13)
mbed_official 245:b4dea936db71 45 #define CANIFn_MCTRL_MSGLST (1UL << 14)
mbed_official 245:b4dea936db71 46 #define CANIFn_MCTRL_NEWDAT (1UL << 15)
mbed_official 245:b4dea936db71 47 #define CANIFn_CMDMSK_DATA_B (1UL << 0)
mbed_official 245:b4dea936db71 48 #define CANIFn_CMDMSK_DATA_A (1UL << 1)
mbed_official 245:b4dea936db71 49 #define CANIFn_CMDMSK_TXRQST (1UL << 2)
mbed_official 245:b4dea936db71 50 #define CANIFn_CMDMSK_NEWDAT (1UL << 2)
mbed_official 245:b4dea936db71 51 #define CANIFn_CMDMSK_CLRINTPND (1UL << 3)
mbed_official 245:b4dea936db71 52 #define CANIFn_CMDMSK_CTRL (1UL << 4)
mbed_official 245:b4dea936db71 53 #define CANIFn_CMDMSK_ARB (1UL << 5)
mbed_official 245:b4dea936db71 54 #define CANIFn_CMDMSK_MASK (1UL << 6)
mbed_official 245:b4dea936db71 55 #define CANIFn_CMDMSK_WR (1UL << 7)
mbed_official 245:b4dea936db71 56 #define CANIFn_CMDMSK_RD (0UL << 7)
mbed_official 245:b4dea936db71 57 #define CANIFn_CMDREQ_BUSY (1UL << 15)
mbed_official 245:b4dea936db71 58
mbed_official 245:b4dea936db71 59 static uint32_t can_irq_id = 0;
mbed_official 245:b4dea936db71 60 static can_irq_handler irq_handler;
mbed_official 245:b4dea936db71 61
mbed_official 245:b4dea936db71 62 static inline void can_disable(can_t *obj) {
mbed_official 245:b4dea936db71 63 LPC_C_CAN0->CANCNTL |= 0x1;
mbed_official 245:b4dea936db71 64 }
mbed_official 245:b4dea936db71 65
mbed_official 245:b4dea936db71 66 static inline void can_enable(can_t *obj) {
mbed_official 245:b4dea936db71 67 if (LPC_C_CAN0->CANCNTL & 0x1) {
mbed_official 245:b4dea936db71 68 LPC_C_CAN0->CANCNTL &= ~(0x1);
mbed_official 245:b4dea936db71 69 }
mbed_official 245:b4dea936db71 70 }
mbed_official 245:b4dea936db71 71
mbed_official 245:b4dea936db71 72 int can_mode(can_t *obj, CanMode mode) {
mbed_official 245:b4dea936db71 73 return 0; // not implemented
mbed_official 245:b4dea936db71 74 }
mbed_official 245:b4dea936db71 75
mbed_official 245:b4dea936db71 76 int can_filter(can_t *obj, uint32_t id, uint32_t mask, CANFormat format, int32_t handle) {
mbed_official 245:b4dea936db71 77 uint16_t i;
mbed_official 245:b4dea936db71 78
mbed_official 245:b4dea936db71 79 // Find first free message object
mbed_official 245:b4dea936db71 80 if (handle == 0) {
mbed_official 245:b4dea936db71 81 uint32_t msgval = LPC_C_CAN0->CANMSGV1 | (LPC_C_CAN0->CANMSGV2 << 16);
mbed_official 245:b4dea936db71 82
mbed_official 245:b4dea936db71 83 // Find first free messagebox
mbed_official 245:b4dea936db71 84 for (i = 0; i < 32; i++) {
mbed_official 245:b4dea936db71 85 if ((msgval & (1 << i)) == 0) {
mbed_official 245:b4dea936db71 86 handle = i+1;
mbed_official 245:b4dea936db71 87 break;
mbed_official 245:b4dea936db71 88 }
mbed_official 245:b4dea936db71 89 }
mbed_official 245:b4dea936db71 90 }
mbed_official 245:b4dea936db71 91
mbed_official 245:b4dea936db71 92 if (handle > 0 && handle < 32) {
mbed_official 245:b4dea936db71 93 if (format == CANExtended) {
mbed_official 245:b4dea936db71 94 // Mark message valid, Direction = TX, Extended Frame, Set Identifier and mask everything
mbed_official 245:b4dea936db71 95 LPC_C_CAN0->CANIF1_ARB1 = (id & 0xFFFF);
mbed_official 245:b4dea936db71 96 LPC_C_CAN0->CANIF1_ARB2 = CANIFn_ARB2_MSGVAL | CANIFn_ARB2_XTD | ((id >> 16) & 0x1FFF);
mbed_official 245:b4dea936db71 97 LPC_C_CAN0->CANIF1_MSK1 = (mask & 0xFFFF);
mbed_official 245:b4dea936db71 98 LPC_C_CAN0->CANIF1_MSK2 = CANIFn_MSK2_MXTD /*| CANIFn_MSK2_MDIR*/ | ((mask >> 16) & 0x1FFF);
mbed_official 245:b4dea936db71 99 } else {
mbed_official 245:b4dea936db71 100 // Mark message valid, Direction = TX, Set Identifier and mask everything
mbed_official 245:b4dea936db71 101 LPC_C_CAN0->CANIF1_ARB2 = CANIFn_ARB2_MSGVAL | ((id << 2) & 0x1FFF);
mbed_official 245:b4dea936db71 102 LPC_C_CAN0->CANIF1_MSK2 = /*CANIFn_MSK2_MDIR |*/ ((mask << 2) & 0x1FFF);
mbed_official 245:b4dea936db71 103 }
mbed_official 245:b4dea936db71 104
mbed_official 245:b4dea936db71 105 // Use mask, single message object and set DLC
mbed_official 245:b4dea936db71 106 LPC_C_CAN0->CANIF1_MCTRL = CANIFn_MCTRL_UMASK | CANIFn_MCTRL_EOB | CANIFn_MCTRL_RXIE | (DLC_MAX & 0xF);
mbed_official 245:b4dea936db71 107
mbed_official 245:b4dea936db71 108 // Transfer all fields to message object
mbed_official 245:b4dea936db71 109 LPC_C_CAN0->CANIF1_CMDMSK_W = CANIFn_CMDMSK_WR | CANIFn_CMDMSK_MASK | CANIFn_CMDMSK_ARB | CANIFn_CMDMSK_CTRL;
mbed_official 245:b4dea936db71 110
mbed_official 245:b4dea936db71 111 // Start Transfer to given message number
mbed_official 245:b4dea936db71 112 LPC_C_CAN0->CANIF1_CMDREQ = (handle & 0x3F);
mbed_official 245:b4dea936db71 113
mbed_official 245:b4dea936db71 114 // Wait until transfer to message ram complete - TODO: maybe not block??
mbed_official 245:b4dea936db71 115 while ( LPC_C_CAN0->CANIF1_CMDREQ & CANIFn_CMDREQ_BUSY );
mbed_official 245:b4dea936db71 116 }
mbed_official 245:b4dea936db71 117
mbed_official 245:b4dea936db71 118 return handle;
mbed_official 245:b4dea936db71 119 }
mbed_official 245:b4dea936db71 120
mbed_official 245:b4dea936db71 121 static inline void can_irq() {
mbed_official 245:b4dea936db71 122 irq_handler(can_irq_id, IRQ_RX);
mbed_official 245:b4dea936db71 123 }
mbed_official 245:b4dea936db71 124
mbed_official 245:b4dea936db71 125 // Register CAN object's irq handler
mbed_official 245:b4dea936db71 126 void can_irq_init(can_t *obj, can_irq_handler handler, uint32_t id) {
mbed_official 245:b4dea936db71 127 irq_handler = handler;
mbed_official 245:b4dea936db71 128 can_irq_id = id;
mbed_official 245:b4dea936db71 129 }
mbed_official 245:b4dea936db71 130
mbed_official 245:b4dea936db71 131 // Unregister CAN object's irq handler
mbed_official 245:b4dea936db71 132 void can_irq_free(can_t *obj) {
mbed_official 245:b4dea936db71 133 LPC_C_CAN0->CANCNTL &= ~(1UL << 1); // Disable Interrupts :)
mbed_official 245:b4dea936db71 134 can_irq_id = 0;
mbed_official 245:b4dea936db71 135 NVIC_DisableIRQ(C_CAN0_IRQn);
mbed_official 245:b4dea936db71 136 }
mbed_official 245:b4dea936db71 137
mbed_official 245:b4dea936db71 138 // Clear or set a irq
mbed_official 245:b4dea936db71 139 void can_irq_set(can_t *obj, CanIrqType type, uint32_t enable) {
mbed_official 245:b4dea936db71 140 // Put CAN in Reset Mode and enable interrupt
mbed_official 245:b4dea936db71 141 can_disable(obj);
mbed_official 245:b4dea936db71 142 if (enable == 0) {
mbed_official 245:b4dea936db71 143 LPC_C_CAN0->CANCNTL &= ~(1UL << 1 | 1UL << 2);
mbed_official 245:b4dea936db71 144 } else {
mbed_official 245:b4dea936db71 145 LPC_C_CAN0->CANCNTL |= 1UL << 1 | 1UL << 2;
mbed_official 245:b4dea936db71 146 }
mbed_official 245:b4dea936db71 147 // Take it out of reset...
mbed_official 245:b4dea936db71 148 can_enable(obj);
mbed_official 245:b4dea936db71 149
mbed_official 245:b4dea936db71 150 // Enable NVIC if at least 1 interrupt is active
mbed_official 245:b4dea936db71 151 NVIC_SetVector(C_CAN0_IRQn, (uint32_t) &can_irq);
mbed_official 245:b4dea936db71 152 NVIC_EnableIRQ(C_CAN0_IRQn);
mbed_official 245:b4dea936db71 153 }
mbed_official 245:b4dea936db71 154
mbed_official 245:b4dea936db71 155 // This table has the sampling points as close to 75% as possible. The first
mbed_official 245:b4dea936db71 156 // value is TSEG1, the second TSEG2.
mbed_official 245:b4dea936db71 157 static const int timing_pts[23][2] = {
mbed_official 245:b4dea936db71 158 {0x0, 0x0}, // 2, 50%
mbed_official 245:b4dea936db71 159 {0x1, 0x0}, // 3, 67%
mbed_official 245:b4dea936db71 160 {0x2, 0x0}, // 4, 75%
mbed_official 245:b4dea936db71 161 {0x3, 0x0}, // 5, 80%
mbed_official 245:b4dea936db71 162 {0x3, 0x1}, // 6, 67%
mbed_official 245:b4dea936db71 163 {0x4, 0x1}, // 7, 71%
mbed_official 245:b4dea936db71 164 {0x5, 0x1}, // 8, 75%
mbed_official 245:b4dea936db71 165 {0x6, 0x1}, // 9, 78%
mbed_official 245:b4dea936db71 166 {0x6, 0x2}, // 10, 70%
mbed_official 245:b4dea936db71 167 {0x7, 0x2}, // 11, 73%
mbed_official 245:b4dea936db71 168 {0x8, 0x2}, // 12, 75%
mbed_official 245:b4dea936db71 169 {0x9, 0x2}, // 13, 77%
mbed_official 245:b4dea936db71 170 {0x9, 0x3}, // 14, 71%
mbed_official 245:b4dea936db71 171 {0xA, 0x3}, // 15, 73%
mbed_official 245:b4dea936db71 172 {0xB, 0x3}, // 16, 75%
mbed_official 245:b4dea936db71 173 {0xC, 0x3}, // 17, 76%
mbed_official 245:b4dea936db71 174 {0xD, 0x3}, // 18, 78%
mbed_official 245:b4dea936db71 175 {0xD, 0x4}, // 19, 74%
mbed_official 245:b4dea936db71 176 {0xE, 0x4}, // 20, 75%
mbed_official 245:b4dea936db71 177 {0xF, 0x4}, // 21, 76%
mbed_official 245:b4dea936db71 178 {0xF, 0x5}, // 22, 73%
mbed_official 245:b4dea936db71 179 {0xF, 0x6}, // 23, 70%
mbed_official 245:b4dea936db71 180 {0xF, 0x7}, // 24, 67%
mbed_official 245:b4dea936db71 181 };
mbed_official 245:b4dea936db71 182
mbed_official 245:b4dea936db71 183 static unsigned int can_speed(unsigned int sclk, unsigned int cclk, unsigned char psjw) {
mbed_official 245:b4dea936db71 184 uint32_t btr;
mbed_official 245:b4dea936db71 185 uint32_t clkdiv = 1;
mbed_official 245:b4dea936db71 186 uint16_t brp = 0;
mbed_official 245:b4dea936db71 187 uint32_t calcbit;
mbed_official 245:b4dea936db71 188 uint32_t bitwidth;
mbed_official 245:b4dea936db71 189 int hit = 0;
mbed_official 245:b4dea936db71 190 int bits = 0;
mbed_official 245:b4dea936db71 191
mbed_official 245:b4dea936db71 192 bitwidth = sclk / cclk;
mbed_official 245:b4dea936db71 193
mbed_official 245:b4dea936db71 194 brp = bitwidth / 0x18;
mbed_official 245:b4dea936db71 195 while ((!hit) && (brp < bitwidth / 4)) {
mbed_official 245:b4dea936db71 196 brp++;
mbed_official 245:b4dea936db71 197 for (bits = 22; bits > 0; bits--) {
mbed_official 245:b4dea936db71 198 calcbit = (bits + 3) * (brp + 1);
mbed_official 245:b4dea936db71 199 if (calcbit == bitwidth) {
mbed_official 245:b4dea936db71 200 hit = 1;
mbed_official 245:b4dea936db71 201 break;
mbed_official 245:b4dea936db71 202 }
mbed_official 245:b4dea936db71 203 }
mbed_official 245:b4dea936db71 204 }
mbed_official 245:b4dea936db71 205
mbed_official 245:b4dea936db71 206 clkdiv = clkdiv - 1;
mbed_official 245:b4dea936db71 207
mbed_official 245:b4dea936db71 208 if (hit) {
mbed_official 245:b4dea936db71 209 btr = (timing_pts[bits][1] & 0x7) << 12
mbed_official 245:b4dea936db71 210 | (timing_pts[bits][0] & 0xf) << 8
mbed_official 245:b4dea936db71 211 | (psjw & 0x3) << 6
mbed_official 245:b4dea936db71 212 | (brp & 0x3F);
mbed_official 245:b4dea936db71 213 btr = btr | (clkdiv << 16);
mbed_official 245:b4dea936db71 214 } else {
mbed_official 245:b4dea936db71 215 btr = 0;
mbed_official 245:b4dea936db71 216 }
mbed_official 245:b4dea936db71 217
mbed_official 245:b4dea936db71 218 return btr;
mbed_official 245:b4dea936db71 219 }
mbed_official 245:b4dea936db71 220
mbed_official 245:b4dea936db71 221
mbed_official 245:b4dea936db71 222 int can_config_rxmsgobj(can_t *obj) {
mbed_official 245:b4dea936db71 223 uint16_t i = 0;
mbed_official 245:b4dea936db71 224
mbed_official 245:b4dea936db71 225 // Make sure the interface is available
mbed_official 245:b4dea936db71 226 while ( LPC_C_CAN0->CANIF1_CMDREQ & CANIFn_CMDREQ_BUSY );
mbed_official 245:b4dea936db71 227
mbed_official 245:b4dea936db71 228 // Mark message valid, Direction = RX, Don't care about anything else
mbed_official 245:b4dea936db71 229 LPC_C_CAN0->CANIF1_ARB1 = 0;
mbed_official 245:b4dea936db71 230 LPC_C_CAN0->CANIF1_ARB2 = 0;
mbed_official 245:b4dea936db71 231 LPC_C_CAN0->CANIF1_MCTRL = 0;
mbed_official 245:b4dea936db71 232
mbed_official 245:b4dea936db71 233 for ( i = 0; i < MSG_OBJ_MAX; i++ ) {
mbed_official 245:b4dea936db71 234 // Transfer arb and control fields to message object
mbed_official 245:b4dea936db71 235 LPC_C_CAN0->CANIF1_CMDMSK_W = CANIFn_CMDMSK_WR | CANIFn_CMDMSK_ARB | CANIFn_CMDMSK_CTRL | CANIFn_CMDMSK_TXRQST;
mbed_official 245:b4dea936db71 236
mbed_official 245:b4dea936db71 237 // Start Transfer to given message number
mbed_official 245:b4dea936db71 238 LPC_C_CAN0->CANIF1_CMDREQ = (i & 0x3F);
mbed_official 245:b4dea936db71 239
mbed_official 245:b4dea936db71 240 // Wait until transfer to message ram complete - TODO: maybe not block??
mbed_official 245:b4dea936db71 241 while ( LPC_C_CAN0->CANIF1_CMDREQ & CANIFn_CMDREQ_BUSY );
mbed_official 245:b4dea936db71 242 }
mbed_official 245:b4dea936db71 243
mbed_official 245:b4dea936db71 244 // Accept all messages
mbed_official 245:b4dea936db71 245 can_filter(obj, 0, 0, CANStandard, 1);
mbed_official 245:b4dea936db71 246
mbed_official 245:b4dea936db71 247 return 1;
mbed_official 245:b4dea936db71 248 }
mbed_official 245:b4dea936db71 249
mbed_official 245:b4dea936db71 250
mbed_official 245:b4dea936db71 251 void can_init(can_t *obj, PinName rd, PinName td) {
mbed_official 245:b4dea936db71 252 // Enable power and clock
mbed_official 245:b4dea936db71 253 LPC_SYSCON->SYSAHBCLKCTRL1 |= (1UL << 7);
mbed_official 245:b4dea936db71 254 LPC_SYSCON->PRESETCTRL1 |= (1UL << 7);
mbed_official 245:b4dea936db71 255 LPC_SYSCON->PRESETCTRL1 &= ~(1UL << 7);
mbed_official 245:b4dea936db71 256
mbed_official 245:b4dea936db71 257 // Enable Initialization mode
mbed_official 245:b4dea936db71 258 if (!(LPC_C_CAN0->CANCNTL & (1UL << 0))) {
mbed_official 245:b4dea936db71 259 LPC_C_CAN0->CANCNTL |= (1UL << 0);
mbed_official 245:b4dea936db71 260 }
mbed_official 245:b4dea936db71 261
mbed_official 245:b4dea936db71 262 LPC_SWM->PINASSIGN[6] &= ~(0x00FFFF00L);
mbed_official 245:b4dea936db71 263 LPC_SWM->PINASSIGN[6] |= (rd << 16) | (td << 8);
mbed_official 245:b4dea936db71 264
mbed_official 245:b4dea936db71 265 can_frequency(obj, 100000);
mbed_official 245:b4dea936db71 266
mbed_official 245:b4dea936db71 267 // Resume operation
mbed_official 245:b4dea936db71 268 LPC_C_CAN0->CANCNTL &= ~(1UL << 0);
mbed_official 245:b4dea936db71 269 while ( LPC_C_CAN0->CANCNTL & (1UL << 0) );
mbed_official 245:b4dea936db71 270
mbed_official 245:b4dea936db71 271 // Initialize RX message object
mbed_official 245:b4dea936db71 272 can_config_rxmsgobj(obj);
mbed_official 245:b4dea936db71 273 }
mbed_official 245:b4dea936db71 274
mbed_official 245:b4dea936db71 275 void can_free(can_t *obj) {
mbed_official 245:b4dea936db71 276 LPC_SYSCON->SYSAHBCLKCTRL1 &= ~(1UL << 7);
mbed_official 245:b4dea936db71 277 LPC_SYSCON->PRESETCTRL1 &= ~(1UL << 7);
mbed_official 245:b4dea936db71 278 }
mbed_official 245:b4dea936db71 279
mbed_official 245:b4dea936db71 280 int can_frequency(can_t *obj, int f) {
mbed_official 245:b4dea936db71 281 int btr = can_speed(SystemCoreClock, (unsigned int)f, 1);
mbed_official 245:b4dea936db71 282 int clkdiv = (btr >> 16) & 0x0F;
mbed_official 245:b4dea936db71 283 btr = btr & 0xFFFF;
mbed_official 245:b4dea936db71 284
mbed_official 245:b4dea936db71 285 if (btr > 0) {
mbed_official 245:b4dea936db71 286 // Set the bit clock
mbed_official 245:b4dea936db71 287 LPC_C_CAN0->CANCNTL |= (1UL << 6 | 1UL << 0); // set CCE and INIT
mbed_official 245:b4dea936db71 288 LPC_C_CAN0->CANCLKDIV = clkdiv;
mbed_official 245:b4dea936db71 289 LPC_C_CAN0->CANBT = btr;
mbed_official 245:b4dea936db71 290 LPC_C_CAN0->CANBRPE = 0x0000;
mbed_official 245:b4dea936db71 291 LPC_C_CAN0->CANCNTL &= ~(1UL << 6 | 1UL << 0); // clear CCE and INIT
mbed_official 245:b4dea936db71 292 return 1;
mbed_official 245:b4dea936db71 293 }
mbed_official 245:b4dea936db71 294 return 0;
mbed_official 245:b4dea936db71 295 }
mbed_official 245:b4dea936db71 296
mbed_official 245:b4dea936db71 297 int can_write(can_t *obj, CAN_Message msg, int cc) {
mbed_official 245:b4dea936db71 298 uint16_t msgnum = 0;
mbed_official 245:b4dea936db71 299
mbed_official 245:b4dea936db71 300 // Make sure controller is enabled
mbed_official 245:b4dea936db71 301 can_enable(obj);
mbed_official 245:b4dea936db71 302
mbed_official 245:b4dea936db71 303 // Make sure the interface is available
mbed_official 245:b4dea936db71 304 while ( LPC_C_CAN0->CANIF1_CMDREQ & CANIFn_CMDREQ_BUSY );
mbed_official 245:b4dea936db71 305
mbed_official 245:b4dea936db71 306 // Set the direction bit based on the message type
mbed_official 245:b4dea936db71 307 uint32_t direction = 0;
mbed_official 245:b4dea936db71 308 if (msg.type == CANData) {
mbed_official 245:b4dea936db71 309 direction = CANIFn_ARB2_DIR;
mbed_official 245:b4dea936db71 310 }
mbed_official 245:b4dea936db71 311
mbed_official 245:b4dea936db71 312 if (msg.format == CANExtended) {
mbed_official 245:b4dea936db71 313 // Mark message valid, Extended Frame, Set Identifier and mask everything
mbed_official 245:b4dea936db71 314 LPC_C_CAN0->CANIF1_ARB1 = (msg.id & 0xFFFF);
mbed_official 245:b4dea936db71 315 LPC_C_CAN0->CANIF1_ARB2 = CANIFn_ARB2_MSGVAL | CANIFn_ARB2_XTD | direction | ((msg.id >> 16) & 0x1FFFF);
mbed_official 245:b4dea936db71 316 LPC_C_CAN0->CANIF1_MSK1 = (ID_EXT_MASK & 0xFFFF);
mbed_official 245:b4dea936db71 317 LPC_C_CAN0->CANIF1_MSK2 = CANIFn_MSK2_MXTD | CANIFn_MSK2_MDIR | ((ID_EXT_MASK >> 16) & 0x1FFF);
mbed_official 245:b4dea936db71 318 } else {
mbed_official 245:b4dea936db71 319 // Mark message valid, Set Identifier and mask everything
mbed_official 245:b4dea936db71 320 LPC_C_CAN0->CANIF1_ARB2 = CANIFn_ARB2_MSGVAL | direction | ((msg.id << 2) & 0x1FFF);
mbed_official 245:b4dea936db71 321 LPC_C_CAN0->CANIF1_MSK2 = CANIFn_MSK2_MDIR | ((ID_STD_MASK << 2) & 0x1FFF);
mbed_official 245:b4dea936db71 322 }
mbed_official 245:b4dea936db71 323
mbed_official 245:b4dea936db71 324 // Use mask, request transmission, single message object and set DLC
mbed_official 245:b4dea936db71 325 LPC_C_CAN0->CANIF1_MCTRL = CANIFn_MCTRL_UMASK | CANIFn_MCTRL_TXRQST | CANIFn_MCTRL_EOB | (msg.len & 0xF);
mbed_official 245:b4dea936db71 326
mbed_official 245:b4dea936db71 327 LPC_C_CAN0->CANIF1_DA1 = ((msg.data[1] & 0xFF) << 8) | (msg.data[0] & 0xFF);
mbed_official 245:b4dea936db71 328 LPC_C_CAN0->CANIF1_DA2 = ((msg.data[3] & 0xFF) << 8) | (msg.data[2] & 0xFF);
mbed_official 245:b4dea936db71 329 LPC_C_CAN0->CANIF1_DB1 = ((msg.data[5] & 0xFF) << 8) | (msg.data[4] & 0xFF);
mbed_official 245:b4dea936db71 330 LPC_C_CAN0->CANIF1_DB2 = ((msg.data[7] & 0xFF) << 8) | (msg.data[6] & 0xFF);
mbed_official 245:b4dea936db71 331
mbed_official 245:b4dea936db71 332 // Transfer all fields to message object
mbed_official 245:b4dea936db71 333 LPC_C_CAN0->CANIF1_CMDMSK_W = CANIFn_CMDMSK_WR | CANIFn_CMDMSK_MASK | CANIFn_CMDMSK_ARB | CANIFn_CMDMSK_CTRL | CANIFn_CMDMSK_TXRQST | CANIFn_CMDMSK_DATA_A | CANIFn_CMDMSK_DATA_B;
mbed_official 245:b4dea936db71 334
mbed_official 245:b4dea936db71 335 // Start Transfer to given message number
mbed_official 245:b4dea936db71 336 LPC_C_CAN0->CANIF1_CMDREQ = (msgnum & 0x3F);
mbed_official 245:b4dea936db71 337
mbed_official 245:b4dea936db71 338 // Wait until transfer to message ram complete - TODO: maybe not block??
mbed_official 245:b4dea936db71 339 while ( LPC_C_CAN0->CANIF1_CMDREQ & CANIFn_CMDREQ_BUSY);
mbed_official 245:b4dea936db71 340
mbed_official 245:b4dea936db71 341 // Wait until TXOK is set, then clear it - TODO: maybe not block
mbed_official 245:b4dea936db71 342 //while ( !(LPC_C_CAN0->STAT & CANSTAT_TXOK) );
mbed_official 245:b4dea936db71 343 LPC_C_CAN0->CANSTAT &= ~(1UL << 3);
mbed_official 245:b4dea936db71 344
mbed_official 245:b4dea936db71 345 return 1;
mbed_official 245:b4dea936db71 346 }
mbed_official 245:b4dea936db71 347
mbed_official 245:b4dea936db71 348 int can_read(can_t *obj, CAN_Message *msg, int handle) {
mbed_official 245:b4dea936db71 349 uint16_t i;
mbed_official 245:b4dea936db71 350
mbed_official 245:b4dea936db71 351 // Make sure controller is enabled
mbed_official 245:b4dea936db71 352 can_enable(obj);
mbed_official 245:b4dea936db71 353
mbed_official 245:b4dea936db71 354 // Find first message object with new data
mbed_official 245:b4dea936db71 355 if (handle == 0) {
mbed_official 245:b4dea936db71 356 uint32_t newdata = LPC_C_CAN0->CANND1 | (LPC_C_CAN0->CANND2 << 16);
mbed_official 245:b4dea936db71 357 // Find first free messagebox
mbed_official 245:b4dea936db71 358 for (i = 0; i < 32; i++) {
mbed_official 245:b4dea936db71 359 if (newdata & (1 << i)) {
mbed_official 245:b4dea936db71 360 handle = i+1;
mbed_official 245:b4dea936db71 361 break;
mbed_official 245:b4dea936db71 362 }
mbed_official 245:b4dea936db71 363 }
mbed_official 245:b4dea936db71 364 }
mbed_official 245:b4dea936db71 365
mbed_official 245:b4dea936db71 366 if (handle > 0 && handle < 32) {
mbed_official 245:b4dea936db71 367 // Wait until message interface is free
mbed_official 245:b4dea936db71 368 while ( LPC_C_CAN0->CANIF2_CMDREQ & CANIFn_CMDREQ_BUSY );
mbed_official 245:b4dea936db71 369
mbed_official 245:b4dea936db71 370 // Transfer all fields to message object
mbed_official 245:b4dea936db71 371 LPC_C_CAN0->CANIF2_CMDMSK_W = CANIFn_CMDMSK_RD | CANIFn_CMDMSK_MASK | CANIFn_CMDMSK_ARB | CANIFn_CMDMSK_CTRL | CANIFn_CMDMSK_CLRINTPND | CANIFn_CMDMSK_TXRQST | CANIFn_CMDMSK_DATA_A | CANIFn_CMDMSK_DATA_B;
mbed_official 245:b4dea936db71 372
mbed_official 245:b4dea936db71 373 // Start Transfer from given message number
mbed_official 245:b4dea936db71 374 LPC_C_CAN0->CANIF2_CMDREQ = (handle & 0x3F);
mbed_official 245:b4dea936db71 375
mbed_official 245:b4dea936db71 376 // Wait until transfer to message ram complete
mbed_official 245:b4dea936db71 377 while ( LPC_C_CAN0->CANIF2_CMDREQ & CANIFn_CMDREQ_BUSY );
mbed_official 245:b4dea936db71 378
mbed_official 245:b4dea936db71 379 if (LPC_C_CAN0->CANIF2_ARB2 & CANIFn_ARB2_XTD) {
mbed_official 245:b4dea936db71 380 msg->format = CANExtended;
mbed_official 245:b4dea936db71 381 msg->id = (LPC_C_CAN0->CANIF2_ARB1 & 0x1FFF) << 16;
mbed_official 245:b4dea936db71 382 msg->id |= (LPC_C_CAN0->CANIF2_ARB2 & 0x1FFF);
mbed_official 245:b4dea936db71 383 } else {
mbed_official 245:b4dea936db71 384 msg->format = CANStandard;
mbed_official 245:b4dea936db71 385 msg->id = (LPC_C_CAN0->CANIF2_ARB2 & 0x1FFF) >> 2;
mbed_official 245:b4dea936db71 386 }
mbed_official 245:b4dea936db71 387
mbed_official 245:b4dea936db71 388 if (LPC_C_CAN0->CANIF2_ARB2 & CANIFn_ARB2_DIR) {
mbed_official 245:b4dea936db71 389 msg->type = CANRemote;
mbed_official 245:b4dea936db71 390 }
mbed_official 245:b4dea936db71 391 else {
mbed_official 245:b4dea936db71 392 msg->type = CANData;
mbed_official 245:b4dea936db71 393 }
mbed_official 245:b4dea936db71 394
mbed_official 245:b4dea936db71 395 msg->len = (LPC_C_CAN0->CANIF2_MCTRL & 0xF); // TODO: If > 8, len = 8
mbed_official 245:b4dea936db71 396 msg->data[0] = ((LPC_C_CAN0->CANIF2_DA1 >> 0) & 0xFF);
mbed_official 245:b4dea936db71 397 msg->data[1] = ((LPC_C_CAN0->CANIF2_DA1 >> 8) & 0xFF);
mbed_official 245:b4dea936db71 398 msg->data[2] = ((LPC_C_CAN0->CANIF2_DA2 >> 0) & 0xFF);
mbed_official 245:b4dea936db71 399 msg->data[3] = ((LPC_C_CAN0->CANIF2_DA2 >> 8) & 0xFF);
mbed_official 245:b4dea936db71 400 msg->data[4] = ((LPC_C_CAN0->CANIF2_DB1 >> 0) & 0xFF);
mbed_official 245:b4dea936db71 401 msg->data[5] = ((LPC_C_CAN0->CANIF2_DB1 >> 8) & 0xFF);
mbed_official 245:b4dea936db71 402 msg->data[6] = ((LPC_C_CAN0->CANIF2_DB2 >> 0) & 0xFF);
mbed_official 245:b4dea936db71 403 msg->data[7] = ((LPC_C_CAN0->CANIF2_DB2 >> 8) & 0xFF);
mbed_official 245:b4dea936db71 404
mbed_official 245:b4dea936db71 405 LPC_C_CAN0->CANSTAT &= ~(1UL << 4);
mbed_official 245:b4dea936db71 406 return 1;
mbed_official 245:b4dea936db71 407 }
mbed_official 245:b4dea936db71 408 return 0;
mbed_official 245:b4dea936db71 409 }
mbed_official 245:b4dea936db71 410
mbed_official 245:b4dea936db71 411 void can_reset(can_t *obj) {
mbed_official 245:b4dea936db71 412 LPC_SYSCON->PRESETCTRL1 &= ~(1UL << 7);
mbed_official 245:b4dea936db71 413 LPC_C_CAN0->CANSTAT = 0;
mbed_official 245:b4dea936db71 414 can_config_rxmsgobj(obj);
mbed_official 245:b4dea936db71 415 }
mbed_official 245:b4dea936db71 416
mbed_official 245:b4dea936db71 417 unsigned char can_rderror(can_t *obj) {
mbed_official 245:b4dea936db71 418 return ((LPC_C_CAN0->CANEC >> 8) & 0x7F);
mbed_official 245:b4dea936db71 419 }
mbed_official 245:b4dea936db71 420
mbed_official 245:b4dea936db71 421 unsigned char can_tderror(can_t *obj) {
mbed_official 245:b4dea936db71 422 return (LPC_C_CAN0->CANEC & 0xFF);
mbed_official 245:b4dea936db71 423 }
mbed_official 245:b4dea936db71 424
mbed_official 245:b4dea936db71 425 void can_monitor(can_t *obj, int silent) {
mbed_official 245:b4dea936db71 426 if (silent) {
mbed_official 245:b4dea936db71 427 LPC_C_CAN0->CANCNTL |= (1UL << 7);
mbed_official 245:b4dea936db71 428 LPC_C_CAN0->CANTEST |= (1UL << 3);
mbed_official 245:b4dea936db71 429 } else {
mbed_official 245:b4dea936db71 430 LPC_C_CAN0->CANCNTL &= ~(1UL << 7);
mbed_official 245:b4dea936db71 431 LPC_C_CAN0->CANTEST &= ~(1UL << 3);
mbed_official 245:b4dea936db71 432 }
mbed_official 245:b4dea936db71 433
mbed_official 245:b4dea936db71 434 if (!(LPC_C_CAN0->CANCNTL & (1UL << 0))) {
mbed_official 245:b4dea936db71 435 LPC_C_CAN0->CANCNTL |= (1UL << 0);
mbed_official 245:b4dea936db71 436 }
mbed_official 245:b4dea936db71 437 }