Petter Bellander / Mbed 2 deprecated Saab-BT

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Dependencies:   mbed

CDC.cpp@13:968af0520530, 2016-01-30 (annotated)

Committer:
petter
Date:
Sat Jan 30 21:03:52 2016 +0000
Revision:
13:968af0520530
Parent:
12:4194c47ca60b
Child:
14:3f4098e94c29
Added sleep control of CAN transceiver MCP2551

Who changed what in which revision?

UserRevisionLine numberNew contents of line
petter 0:6cf6e566c0da 1 // I-Bus information from http://pikkupossu.1g.fi/tomi/projects/i-bus/i-bus.html
petter 0:6cf6e566c0da 2 // 290h - Steering wheel and SID buttons | Rx
petter 0:6cf6e566c0da 3 // 328h - SID audio text | Tx
petter 0:6cf6e566c0da 4 // 32Ch - ACC to SID text
petter 0:6cf6e566c0da 5 // 32Fh - TWICE to SID text
petter 0:6cf6e566c0da 6 // 337h - SPA to SID text
petter 0:6cf6e566c0da 7 // 348h - SID audio text control | Tx
petter 0:6cf6e566c0da 8 // 34Ch - ACC to SID text control
petter 0:6cf6e566c0da 9 // 34Fh - TWICE to SID text control
petter 0:6cf6e566c0da 10 // 357h - SPA to SID text control
petter 0:6cf6e566c0da 11 // 368h - SID text priority | Tx
petter 0:6cf6e566c0da 12 // 3C0h - CD Changer control | Rx
petter 0:6cf6e566c0da 13 // 3C8h - CD Changer information | Tx
petter 0:6cf6e566c0da 14 // 430h - SID beep request | Tx
petter 0:6cf6e566c0da 15 // 6A1h - Audio head unit | Rx
petter 0:6cf6e566c0da 16 // 6A2h - CD changer | Tx
petter 0:6cf6e566c0da 17 // 320h - Doors, central locking and seat belts | Rx
petter 0:6cf6e566c0da 18
petter 0:6cf6e566c0da 19 /** Includes **/
petter 0:6cf6e566c0da 20 #include "CDC.h"
petter 0:6cf6e566c0da 21
petter 0:6cf6e566c0da 22 /** Various constants used for identifying the CDC **/
petter 0:6cf6e566c0da 23 #define CDC_APL_ADR 0x11
petter 0:6cf6e566c0da 24 #define CDC_SID_FUNCTION_ID 0x19
petter 0:6cf6e566c0da 25
petter 0:6cf6e566c0da 26 /** TX IDs: **/
petter 0:6cf6e566c0da 27 #define GENERAL_STATUS_CDC 0x3C8
petter 0:6cf6e566c0da 28 #define DISPLAY_RESOURCE_REQ 0x348 // 'Stolen' from the IHU since the CDC doesn't send this message
petter 0:6cf6e566c0da 29 #define WRITE_TEXT_ON_DISPLAY 0x328 // 'Stolen' from the IHU since the CDC doesn't send this message
petter 0:6cf6e566c0da 30 #define NODE_STATUS_TX 0x6A2
petter 0:6cf6e566c0da 31 #define SOUND_REQUEST 0x430
petter 0:6cf6e566c0da 32
petter 0:6cf6e566c0da 33 /** RX IDs: **/
petter 0:6cf6e566c0da 34 #define LOCK_STATUS 0x320
petter 0:6cf6e566c0da 35 #define IHU_BUTTONS 0x3C0
petter 0:6cf6e566c0da 36 #define DISPLAY_RESOURCE_GRANT 0x368
petter 0:6cf6e566c0da 37 #define NODE_STATUS_RX 0x6A1
petter 0:6cf6e566c0da 38 #define STEERING_WHEEL_BUTTONS 0x290
petter 0:6cf6e566c0da 39
petter 0:6cf6e566c0da 40
petter 0:6cf6e566c0da 41 /** Variables: **/
petter 0:6cf6e566c0da 42 bool cdc_active = false; // True while our module, the simulated CDC, is active.
petter 0:6cf6e566c0da 43 bool mute = false;
petter 0:6cf6e566c0da 44 int toggle_shuffle = 1;
petter 6:c454f88524d6 45 int ninefive_cmd[] = {0x32,0x00,0x00,0x16,0x01,0x02,0x00,0x00,-1};
petter 0:6cf6e566c0da 46 int beep_cmd[] = {0x80,0x04,0x00,0x00,0x00,0x00,0x00,0x00,-1};
petter 0:6cf6e566c0da 47 int cdc_status_cmd[] = {0xE0,0x00,0x01,0x41,0x01,0x00,0x00,0xD0,-1};
petter 11:74844f6ca8cf 48 int display_request_cmd[] = {CDC_APL_ADR,0x02,0x05,CDC_SID_FUNCTION_ID,0x00,0x00,0x00,0x00,-1};
petter 0:6cf6e566c0da 49 //int display_clear_cmd[] = {CDC_APL_ADR,0x02,0xFF,CDC_SID_FUNCTION_ID,0x00,0x00,0x00,0x00,-1};
petter 0:6cf6e566c0da 50
petter 0:6cf6e566c0da 51 /** Com: **/
petter 0:6cf6e566c0da 52 CAN can(p9, p10);
petter 0:6cf6e566c0da 53 CANMessage CAN_TxMsg;
petter 0:6cf6e566c0da 54 CANMessage CAN_RxMsg;
petter 11:74844f6ca8cf 55 CANMessage CAN_DispMsg[3];
petter 0:6cf6e566c0da 56
petter 0:6cf6e566c0da 57 /** I/O: **/
petter 0:6cf6e566c0da 58 DigitalOut led1(LED1, 0);
petter 0:6cf6e566c0da 59 DigitalOut led2(LED2, 0);
petter 13:968af0520530 60 DigitalOut enable_transceiver(p19);
petter 0:6cf6e566c0da 61
petter 2:10c60edc8573 62 /** Timers: **/
petter 2:10c60edc8573 63 Timer playback;
petter 11:74844f6ca8cf 64 Timer sleep_timer;
petter 2:10c60edc8573 65
petter 0:6cf6e566c0da 66 /******************************************************************************
petter 0:6cf6e566c0da 67 * PUBLIC METHODS
petter 0:6cf6e566c0da 68 ******************************************************************************/
petter 0:6cf6e566c0da 69
petter 13:968af0520530 70 /** Enables CAN traciever transmit **/
petter 13:968af0520530 71 void CDC::enable() {
petter 13:968af0520530 72 enable_transceiver = 0; //active
petter 13:968af0520530 73 }
petter 13:968af0520530 74
petter 13:968af0520530 75 /** Disables CAN traciever transmit **/
petter 13:968af0520530 76 void CDC::disable() {
petter 13:968af0520530 77 enable_transceiver = 1; //sleep
petter 13:968af0520530 78 }
petter 13:968af0520530 79
petter 0:6cf6e566c0da 80 /** Initializes CDC **/
petter 0:6cf6e566c0da 81 void CDC::init() {
petter 13:968af0520530 82 enable();
petter 0:6cf6e566c0da 83 can.frequency(47619);
petter 0:6cf6e566c0da 84 printf("CAN Frequency set\r\n");
petter 0:6cf6e566c0da 85 CAN_wrFilter(1, IHU_BUTTONS);
petter 0:6cf6e566c0da 86 CAN_wrFilter(1, DISPLAY_RESOURCE_GRANT);
petter 0:6cf6e566c0da 87 CAN_wrFilter(1, NODE_STATUS_RX);
petter 0:6cf6e566c0da 88 CAN_wrFilter(1, STEERING_WHEEL_BUTTONS);
petter 0:6cf6e566c0da 89 CAN_wrFilter(1, DISPLAY_RESOURCE_REQ);
petter 0:6cf6e566c0da 90 printf("CAN Filters set\r\n");
petter 0:6cf6e566c0da 91
petter 0:6cf6e566c0da 92 CAN_TxMsg.len = 8;
petter 11:74844f6ca8cf 93 CAN_DispMsg[0].len = 8;
petter 11:74844f6ca8cf 94 CAN_DispMsg[1].len = 8;
petter 11:74844f6ca8cf 95 CAN_DispMsg[2].len = 8;
petter 11:74844f6ca8cf 96 CAN_DispMsg[0].id = WRITE_TEXT_ON_DISPLAY;
petter 11:74844f6ca8cf 97 CAN_DispMsg[1].id = WRITE_TEXT_ON_DISPLAY;
petter 11:74844f6ca8cf 98 CAN_DispMsg[2].id = WRITE_TEXT_ON_DISPLAY;
petter 11:74844f6ca8cf 99 CAN_DispMsg[0].data[0] = 0x42; // order, new
petter 11:74844f6ca8cf 100 CAN_DispMsg[1].data[0] = 0x01; // order
petter 11:74844f6ca8cf 101 CAN_DispMsg[2].data[0] = 0x00; // order
petter 11:74844f6ca8cf 102 CAN_DispMsg[0].data[1] = 0x96; // Address of the SID
petter 11:74844f6ca8cf 103 CAN_DispMsg[1].data[1] = 0x96; // Address of the SID
petter 11:74844f6ca8cf 104 CAN_DispMsg[2].data[1] = 0x96; // Address of the SID
petter 12:4194c47ca60b 105 CAN_DispMsg[0].data[2] = 0x02; // Writing to row 2
petter 12:4194c47ca60b 106 CAN_DispMsg[1].data[2] = 0x02; // Writing to row 2
petter 12:4194c47ca60b 107 CAN_DispMsg[2].data[2] = 0x02; // Writing to row 2
petter 12:4194c47ca60b 108 display("PETTERS BT");
petter 11:74844f6ca8cf 109
petter 11:74844f6ca8cf 110 sleep_timer.start();
petter 0:6cf6e566c0da 111 }
petter 0:6cf6e566c0da 112
petter 0:6cf6e566c0da 113 /** Handles an incoming (RX) frame **/
petter 11:74844f6ca8cf 114 IBUS_COMMAND CDC::get_cmd() {
petter 0:6cf6e566c0da 115 if(can.read(CAN_RxMsg)) {
petter 0:6cf6e566c0da 116 led2 = !led2;
petter 0:6cf6e566c0da 117 CAN_TxMsg.data[0]++;
petter 0:6cf6e566c0da 118 switch (CAN_RxMsg.id) {
petter 0:6cf6e566c0da 119 case DISPLAY_RESOURCE_REQ:
petter 11:74844f6ca8cf 120 sleep_timer.reset();
petter 11:74844f6ca8cf 121 send_can_frame(DISPLAY_RESOURCE_REQ, display_request_cmd);
petter 2:10c60edc8573 122 update_elapsed_time();
petter 0:6cf6e566c0da 123 send_can_frame(GENERAL_STATUS_CDC, cdc_status_cmd);
petter 12:4194c47ca60b 124 led1 = !led1;
petter 11:74844f6ca8cf 125 return IBUS_HEAD_UNIT_ON;
petter 0:6cf6e566c0da 126 case NODE_STATUS_RX:
petter 6:c454f88524d6 127 send_can_frame(NODE_STATUS_TX, ninefive_cmd);
petter 0:6cf6e566c0da 128 break;
petter 0:6cf6e566c0da 129 case IHU_BUTTONS:
petter 0:6cf6e566c0da 130 return get_ihu_cmd();
petter 0:6cf6e566c0da 131 case STEERING_WHEEL_BUTTONS:
petter 0:6cf6e566c0da 132 return get_steering_wheel_cmd();
petter 0:6cf6e566c0da 133 case DISPLAY_RESOURCE_GRANT:
petter 10:8be92db98bf4 134 if (CAN_RxMsg.data[1] == CDC_SID_FUNCTION_ID) {
petter 0:6cf6e566c0da 135 //We have been granted the right to write text to the second row in the SID
petter 11:74844f6ca8cf 136 display_request_cmd[2] = 0x04;
petter 11:74844f6ca8cf 137 display_update();
petter 0:6cf6e566c0da 138 }
petter 10:8be92db98bf4 139 else {
petter 10:8be92db98bf4 140 //Someone else has been granted the display, we need to back down
petter 11:74844f6ca8cf 141 display_request_cmd[2] = 0x05; //message is considered new
petter 0:6cf6e566c0da 142 }
petter 0:6cf6e566c0da 143 break;
petter 0:6cf6e566c0da 144 }
petter 0:6cf6e566c0da 145 return IBUS_OTHER_MESSAGE;
petter 11:74844f6ca8cf 146 }
petter 11:74844f6ca8cf 147 if(sleep_timer.read() > 5) {
petter 11:74844f6ca8cf 148 return IBUS_HEAD_UNIT_OFF;
petter 0:6cf6e566c0da 149 }
petter 0:6cf6e566c0da 150 return IBUS_NO_MESSAGE;
petter 0:6cf6e566c0da 151 }
petter 0:6cf6e566c0da 152
petter 0:6cf6e566c0da 153 /** Handles the IHU_BUTTONS frame that the IHU sends us when it wants to control some feature of the CDC **/
petter 0:6cf6e566c0da 154 IBUS_COMMAND CDC::get_ihu_cmd() {
petter 0:6cf6e566c0da 155 bool event = (CAN_RxMsg.data[0] == 0x80);
petter 0:6cf6e566c0da 156 if (!event) {
petter 0:6cf6e566c0da 157 //Ignore the message if it wasn't sent on event
petter 0:6cf6e566c0da 158 return IBUS_OTHER_MESSAGE;
petter 0:6cf6e566c0da 159 }
petter 0:6cf6e566c0da 160 switch (CAN_RxMsg.data[1]) {
petter 0:6cf6e566c0da 161 case 0x24: // CDC = ON (CD/RDM button has been pressed twice)
petter 0:6cf6e566c0da 162 cdc_active = true;
petter 0:6cf6e566c0da 163 return IBUS_CDC_ON;
petter 0:6cf6e566c0da 164 case 0x14: // CDC = OFF (Back to Radio or Tape mode)
petter 0:6cf6e566c0da 165 cdc_active = false;
petter 0:6cf6e566c0da 166 return IBUS_CDC_OFF;
petter 0:6cf6e566c0da 167 }
petter 0:6cf6e566c0da 168 if (cdc_active) {
petter 0:6cf6e566c0da 169 switch (CAN_RxMsg.data[1]) {
petter 0:6cf6e566c0da 170 case 0x35: // Track up
petter 0:6cf6e566c0da 171 return IBUS_SKIP_FW;
petter 0:6cf6e566c0da 172 case 0x36: // Track down
petter 0:6cf6e566c0da 173 return IBUS_SKIP_BW;
petter 0:6cf6e566c0da 174 }
petter 0:6cf6e566c0da 175 }
petter 0:6cf6e566c0da 176 return IBUS_OTHER_MESSAGE;
petter 0:6cf6e566c0da 177 }
petter 0:6cf6e566c0da 178
petter 0:6cf6e566c0da 179 /** Handles the STEERING_WHEEL_BUTTONS frame * TODO connect the SID button events to actions **/
petter 0:6cf6e566c0da 180 IBUS_COMMAND CDC::get_steering_wheel_cmd() {
petter 0:6cf6e566c0da 181
petter 0:6cf6e566c0da 182 bool event = (CAN_RxMsg.data[0] == 0x80);
petter 0:6cf6e566c0da 183 if (!event) {
petter 0:6cf6e566c0da 184 //Ignore the message if it wasn't sent on event
petter 0:6cf6e566c0da 185 return IBUS_OTHER_MESSAGE;
petter 0:6cf6e566c0da 186 }
petter 0:6cf6e566c0da 187 if (!cdc_active) {
petter 0:6cf6e566c0da 188 return IBUS_OTHER_MESSAGE;
petter 0:6cf6e566c0da 189 }
petter 0:6cf6e566c0da 190 switch (CAN_RxMsg.data[4]) {
petter 0:6cf6e566c0da 191 case 0x04: // NXT button on wheel
petter 0:6cf6e566c0da 192 return IBUS_NEXT;
petter 0:6cf6e566c0da 193 case 0x10: // Seek+ button on wheel
petter 0:6cf6e566c0da 194 return IBUS_SKIP_FW;
petter 0:6cf6e566c0da 195 case 0x08: // Seek- button on wheel
petter 0:6cf6e566c0da 196 return IBUS_SKIP_BW;
petter 0:6cf6e566c0da 197 case 0x40: // Vol+ button on wheel
petter 0:6cf6e566c0da 198 return IBUS_VOLUME_UP;
petter 0:6cf6e566c0da 199 case 0x80: // Vol- button on wheel
petter 0:6cf6e566c0da 200 return IBUS_VOLUME_DOWN;
petter 0:6cf6e566c0da 201 }
petter 0:6cf6e566c0da 202 switch (CAN_RxMsg.data[5]) {
petter 0:6cf6e566c0da 203 case 0x40: // SET button on SID
petter 0:6cf6e566c0da 204 return IBUS_SET;
petter 0:6cf6e566c0da 205 case 0x80: // CLEAR button on SID
petter 0:6cf6e566c0da 206 return IBUS_CLEAR;
petter 0:6cf6e566c0da 207 }
petter 0:6cf6e566c0da 208 return IBUS_OTHER_MESSAGE;
petter 0:6cf6e566c0da 209 }
petter 0:6cf6e566c0da 210
petter 0:6cf6e566c0da 211
petter 0:6cf6e566c0da 212
petter 0:6cf6e566c0da 213 /** Writes the provided text on the SID. NOTE the character set used by the SID is slightly nonstandard. "Normal" characters should work fine. **/
petter 11:74844f6ca8cf 214 void CDC::display(char text[]) {
petter 0:6cf6e566c0da 215 if (!text) {
petter 0:6cf6e566c0da 216 return;
petter 0:6cf6e566c0da 217 }
petter 0:6cf6e566c0da 218
petter 0:6cf6e566c0da 219 //Notify the SID that we want to display a message
petter 11:74844f6ca8cf 220 send_can_frame(DISPLAY_RESOURCE_REQ, display_request_cmd);
petter 0:6cf6e566c0da 221
petter 0:6cf6e566c0da 222 // Copy the provided string and make sure we have a new array of the correct length:
petter 0:6cf6e566c0da 223 char display_text[15];
petter 0:6cf6e566c0da 224 int i, n;
petter 0:6cf6e566c0da 225 n = strlen(text);
petter 0:6cf6e566c0da 226 if(n > 15) {
petter 0:6cf6e566c0da 227 n = 15;
petter 0:6cf6e566c0da 228 }
petter 0:6cf6e566c0da 229 for (i = 0; i < n; i++) {
petter 0:6cf6e566c0da 230 display_text[i] = text[i];
petter 0:6cf6e566c0da 231 }
petter 9:9a4c81493a3d 232 for (i = n; i < 15; i++) {
petter 0:6cf6e566c0da 233 display_text[i] = 0;
petter 0:6cf6e566c0da 234 }
petter 0:6cf6e566c0da 235
petter 11:74844f6ca8cf 236 CAN_DispMsg[0].data[2] = 0x82; // Sent on basetime, writing to row 2, message changed
petter 11:74844f6ca8cf 237 CAN_DispMsg[0].data[3] = display_text[0];
petter 11:74844f6ca8cf 238 CAN_DispMsg[0].data[4] = display_text[1];
petter 11:74844f6ca8cf 239 CAN_DispMsg[0].data[5] = display_text[2];
petter 11:74844f6ca8cf 240 CAN_DispMsg[0].data[6] = display_text[3];
petter 11:74844f6ca8cf 241 CAN_DispMsg[0].data[7] = display_text[4];
petter 0:6cf6e566c0da 242
petter 11:74844f6ca8cf 243 CAN_DispMsg[1].data[3] = display_text[5];
petter 11:74844f6ca8cf 244 CAN_DispMsg[1].data[4] = display_text[6];
petter 11:74844f6ca8cf 245 CAN_DispMsg[1].data[5] = display_text[7];
petter 11:74844f6ca8cf 246 CAN_DispMsg[1].data[6] = display_text[8];
petter 11:74844f6ca8cf 247 CAN_DispMsg[1].data[7] = display_text[9];
petter 0:6cf6e566c0da 248
petter 11:74844f6ca8cf 249 CAN_DispMsg[2].data[3] = display_text[10];
petter 11:74844f6ca8cf 250 CAN_DispMsg[2].data[4] = display_text[11];
petter 11:74844f6ca8cf 251 CAN_DispMsg[2].data[5] = display_text[12];
petter 11:74844f6ca8cf 252 CAN_DispMsg[2].data[6] = display_text[13];
petter 11:74844f6ca8cf 253 CAN_DispMsg[2].data[7] = display_text[14];
petter 0:6cf6e566c0da 254 }
petter 0:6cf6e566c0da 255
petter 0:6cf6e566c0da 256 /** Writes the provided text on the SID. NOTE the character set used by the SID is slightly nonstandard. "Normal" characters should work fine. **/
petter 11:74844f6ca8cf 257 void CDC::display_update() {
petter 11:74844f6ca8cf 258 can.write(CAN_DispMsg[0]);
petter 11:74844f6ca8cf 259 can.write(CAN_DispMsg[1]);
petter 11:74844f6ca8cf 260 can.write(CAN_DispMsg[2]);
petter 11:74844f6ca8cf 261 CAN_DispMsg[0].data[2] = 0x02; // Message not changed next transmission unless display() is called
petter 0:6cf6e566c0da 262 }
petter 0:6cf6e566c0da 263
petter 2:10c60edc8573 264 /** Sets the elapsed time in the cdc_status message **/
petter 2:10c60edc8573 265 void CDC::update_elapsed_time() {
petter 2:10c60edc8573 266 cdc_status_cmd[5] = (char)(((int)playback.read())/60);
petter 2:10c60edc8573 267 cdc_status_cmd[6] = (char)(((int)playback.read())%60);
petter 2:10c60edc8573 268 }
petter 2:10c60edc8573 269
petter 2:10c60edc8573 270 /** Resets the elapsed time in the cdc_status message **/
petter 2:10c60edc8573 271 void CDC::reset_elapsed_time() {
petter 2:10c60edc8573 272 playback.reset();
petter 2:10c60edc8573 273 }
petter 2:10c60edc8573 274
petter 2:10c60edc8573 275 /** Stops the elapsed time in the cdc_status message **/
petter 2:10c60edc8573 276 void CDC::stop_elapsed_time() {
petter 2:10c60edc8573 277 playback.stop();
petter 2:10c60edc8573 278 }
petter 2:10c60edc8573 279
petter 2:10c60edc8573 280 /** Starts the elapsed time in the cdc_status message **/
petter 2:10c60edc8573 281 void CDC::start_elapsed_time() {
petter 2:10c60edc8573 282 playback.start();
petter 0:6cf6e566c0da 283 }
petter 0:6cf6e566c0da 284
petter 6:c454f88524d6 285 /** Sets the current track number as playing **/
petter 6:c454f88524d6 286 void CDC::set_track(char track_number) {
petter 6:c454f88524d6 287 cdc_status_cmd[4] = track_number;
petter 6:c454f88524d6 288 }
petter 6:c454f88524d6 289
petter 0:6cf6e566c0da 290
petter 0:6cf6e566c0da 291 /** Formats and puts a frame on CAN bus **/
petter 0:6cf6e566c0da 292 void CDC::send_can_frame(int message_id, int *msg) {
petter 0:6cf6e566c0da 293 CAN_TxMsg.id = message_id;
petter 0:6cf6e566c0da 294 int i = 0;
petter 0:6cf6e566c0da 295 while (msg[i] != -1) {
petter 0:6cf6e566c0da 296 CAN_TxMsg.data[i] = msg[i];
petter 0:6cf6e566c0da 297 i++;
petter 0:6cf6e566c0da 298 }
petter 0:6cf6e566c0da 299 can.write(CAN_TxMsg);
petter 0:6cf6e566c0da 300 }
petter 0:6cf6e566c0da 301
petter 0:6cf6e566c0da 302 /** DEBUG: Prints the CAN TX frame to serial output **/
petter 0:6cf6e566c0da 303 void CDC::print_can_frame(CANMessage *msg){
petter 0:6cf6e566c0da 304 printf("CAN message %X:", msg->id);
petter 0:6cf6e566c0da 305 for (int i = 0; i < msg->len; i++) {
petter 0:6cf6e566c0da 306 printf(" %X", msg->data[i]);
petter 0:6cf6e566c0da 307 }
petter 0:6cf6e566c0da 308 printf("\r\n");
petter 0:6cf6e566c0da 309 }
petter 0:6cf6e566c0da 310
petter 0:6cf6e566c0da 311 /*----------------------------------------------------------------------------
petter 0:6cf6e566c0da 312 setup acceptance filter. CAN controller (1..2)
petter 0:6cf6e566c0da 313 *----------------------------------------------------------------------------*/
petter 0:6cf6e566c0da 314 void CDC::CAN_wrFilter(uint32_t ctrl, uint32_t id) {
petter 0:6cf6e566c0da 315 static int CAN_std_cnt = 0;
petter 0:6cf6e566c0da 316 static int CAN_ext_cnt = 0;
petter 0:6cf6e566c0da 317 uint32_t buf0, buf1;
petter 0:6cf6e566c0da 318 int cnt1, cnt2, bound1;
petter 0:6cf6e566c0da 319
petter 0:6cf6e566c0da 320 /* Acceptance Filter Memory full */
petter 0:6cf6e566c0da 321 if ((((CAN_std_cnt + 1) >> 1) + CAN_ext_cnt) >= 512)
petter 0:6cf6e566c0da 322 return; /* error: objects full */
petter 0:6cf6e566c0da 323
petter 0:6cf6e566c0da 324 /* Setup Acceptance Filter Configuration
petter 0:6cf6e566c0da 325 Acceptance Filter Mode Register = Off */
petter 0:6cf6e566c0da 326 LPC_CANAF->AFMR = 0x00000001;
petter 0:6cf6e566c0da 327
petter 0:6cf6e566c0da 328 id |= (ctrl-1) << 13; /* Add controller number */
petter 0:6cf6e566c0da 329 id &= 0x0000F7FF; /* Mask out 16-bits of ID */
petter 0:6cf6e566c0da 330
petter 0:6cf6e566c0da 331 /* Move all remaining extended mask entries one place up
petter 0:6cf6e566c0da 332 if new entry will increase standard ID filters list */
petter 0:6cf6e566c0da 333 if ((CAN_std_cnt & 0x0001) == 0 && CAN_ext_cnt != 0) {
petter 0:6cf6e566c0da 334 cnt1 = (CAN_std_cnt >> 1);
petter 0:6cf6e566c0da 335 bound1 = CAN_ext_cnt;
petter 0:6cf6e566c0da 336 buf0 = LPC_CANAF_RAM->mask[cnt1];
petter 0:6cf6e566c0da 337 while (bound1--) {
petter 0:6cf6e566c0da 338 cnt1++;
petter 0:6cf6e566c0da 339 buf1 = LPC_CANAF_RAM->mask[cnt1];
petter 0:6cf6e566c0da 340 LPC_CANAF_RAM->mask[cnt1] = buf0;
petter 0:6cf6e566c0da 341 buf0 = buf1;
petter 0:6cf6e566c0da 342 }
petter 0:6cf6e566c0da 343 }
petter 0:6cf6e566c0da 344
petter 0:6cf6e566c0da 345 if (CAN_std_cnt == 0) { /* For entering first ID */
petter 0:6cf6e566c0da 346 LPC_CANAF_RAM->mask[0] = 0x0000FFFF | (id << 16);
petter 0:6cf6e566c0da 347 } else if (CAN_std_cnt == 1) { /* For entering second ID */
petter 0:6cf6e566c0da 348 if ((LPC_CANAF_RAM->mask[0] >> 16) > id)
petter 0:6cf6e566c0da 349 LPC_CANAF_RAM->mask[0] = (LPC_CANAF_RAM->mask[0] >> 16) | (id << 16);
petter 0:6cf6e566c0da 350 else
petter 0:6cf6e566c0da 351 LPC_CANAF_RAM->mask[0] = (LPC_CANAF_RAM->mask[0] & 0xFFFF0000) | id;
petter 0:6cf6e566c0da 352 } else {
petter 0:6cf6e566c0da 353 /* Find where to insert new ID */
petter 0:6cf6e566c0da 354 cnt1 = 0;
petter 0:6cf6e566c0da 355 cnt2 = CAN_std_cnt;
petter 0:6cf6e566c0da 356 bound1 = (CAN_std_cnt - 1) >> 1;
petter 0:6cf6e566c0da 357 while (cnt1 <= bound1) { /* Loop through standard existing IDs */
petter 0:6cf6e566c0da 358 if ((LPC_CANAF_RAM->mask[cnt1] >> 16) > id) {
petter 0:6cf6e566c0da 359 cnt2 = cnt1 * 2;
petter 0:6cf6e566c0da 360 break;
petter 0:6cf6e566c0da 361 }
petter 0:6cf6e566c0da 362 if ((LPC_CANAF_RAM->mask[cnt1] & 0x0000FFFF) > id) {
petter 0:6cf6e566c0da 363 cnt2 = cnt1 * 2 + 1;
petter 0:6cf6e566c0da 364 break;
petter 0:6cf6e566c0da 365 }
petter 0:6cf6e566c0da 366 cnt1++; /* cnt1 = U32 where to insert new ID */
petter 0:6cf6e566c0da 367 } /* cnt2 = U16 where to insert new ID */
petter 0:6cf6e566c0da 368
petter 0:6cf6e566c0da 369 if (cnt1 > bound1) { /* Adding ID as last entry */
petter 0:6cf6e566c0da 370 if ((CAN_std_cnt & 0x0001) == 0) /* Even number of IDs exists */
petter 0:6cf6e566c0da 371 LPC_CANAF_RAM->mask[cnt1] = 0x0000FFFF | (id << 16);
petter 0:6cf6e566c0da 372 else /* Odd number of IDs exists */
petter 0:6cf6e566c0da 373 LPC_CANAF_RAM->mask[cnt1] = (LPC_CANAF_RAM->mask[cnt1] & 0xFFFF0000) | id;
petter 0:6cf6e566c0da 374 } else {
petter 0:6cf6e566c0da 375 buf0 = LPC_CANAF_RAM->mask[cnt1]; /* Remember current entry */
petter 0:6cf6e566c0da 376 if ((cnt2 & 0x0001) == 0) /* Insert new mask to even address */
petter 0:6cf6e566c0da 377 buf1 = (id << 16) | (buf0 >> 16);
petter 0:6cf6e566c0da 378 else /* Insert new mask to odd address */
petter 0:6cf6e566c0da 379 buf1 = (buf0 & 0xFFFF0000) | id;
petter 0:6cf6e566c0da 380
petter 0:6cf6e566c0da 381 LPC_CANAF_RAM->mask[cnt1] = buf1; /* Insert mask */
petter 0:6cf6e566c0da 382
petter 0:6cf6e566c0da 383 bound1 = CAN_std_cnt >> 1;
petter 0:6cf6e566c0da 384 /* Move all remaining standard mask entries one place up */
petter 0:6cf6e566c0da 385 while (cnt1 < bound1) {
petter 0:6cf6e566c0da 386 cnt1++;
petter 0:6cf6e566c0da 387 buf1 = LPC_CANAF_RAM->mask[cnt1];
petter 0:6cf6e566c0da 388 LPC_CANAF_RAM->mask[cnt1] = (buf1 >> 16) | (buf0 << 16);
petter 0:6cf6e566c0da 389 buf0 = buf1;
petter 0:6cf6e566c0da 390 }
petter 0:6cf6e566c0da 391
petter 0:6cf6e566c0da 392 if ((CAN_std_cnt & 0x0001) == 0) /* Even number of IDs exists */
petter 0:6cf6e566c0da 393 LPC_CANAF_RAM->mask[cnt1] = (LPC_CANAF_RAM->mask[cnt1] & 0xFFFF0000) | (0x0000FFFF);
petter 0:6cf6e566c0da 394 }
petter 0:6cf6e566c0da 395 }
petter 0:6cf6e566c0da 396 CAN_std_cnt++;
petter 0:6cf6e566c0da 397
petter 0:6cf6e566c0da 398 /* Calculate std ID start address (buf0) and ext ID start address (buf1) */
petter 0:6cf6e566c0da 399 buf0 = ((CAN_std_cnt + 1) >> 1) << 2;
petter 0:6cf6e566c0da 400 buf1 = buf0 + (CAN_ext_cnt << 2);
petter 0:6cf6e566c0da 401
petter 0:6cf6e566c0da 402 /* Setup acceptance filter pointers */
petter 0:6cf6e566c0da 403 LPC_CANAF->SFF_sa = 0;
petter 0:6cf6e566c0da 404 LPC_CANAF->SFF_GRP_sa = buf0;
petter 0:6cf6e566c0da 405 LPC_CANAF->EFF_sa = buf0;
petter 0:6cf6e566c0da 406 LPC_CANAF->EFF_GRP_sa = buf1;
petter 0:6cf6e566c0da 407 LPC_CANAF->ENDofTable = buf1;
petter 0:6cf6e566c0da 408
petter 0:6cf6e566c0da 409 LPC_CANAF->AFMR = 0x00000000; /* Use acceptance filter */
petter 0:6cf6e566c0da 410 }