rtt-f030/bsp/lpc408x/drivers/drv_lpccan.c

1071 lines
31 KiB
C
Raw Normal View History

2015-07-04 08:06:02 +08:00
/*
* File : drv_lpccan.c
* This file is part of RT-Thread RTOS
* COPYRIGHT (C) 2015, RT-Thread Development Team
*
* The license and distribution terms for this file may be
* found in the file LICENSE in this distribution or at
* http://www.rt-thread.org/license/LICENSE
*
* Change Logs:
* Date Author Notes
* 2015-06-30 aubrcool@qq.com first version
*/
#include <rthw.h>
#include <rtdevice.h>
#include <board.h>
#include <drv_lpccan.h>
#ifdef RT_USING_COMPONENTS_INIT
#include <components.h>
#endif
#ifdef RT_USING_CAN
#include "lpc_types.h"
#include "lpc_can.h"
#include "lpc_pinsel.h"
#include "lpc_exti.h"
#include "lpc_clkpwr.h"
2015-07-08 10:44:49 +08:00
struct lpccandata
{
en_CAN_unitId id;
2015-07-04 08:06:02 +08:00
};
2015-07-08 10:44:49 +08:00
static const rt_uint32_t LPCBAUDTAB[] =
{
1000000,
800000,
500000,
250000,
125000,
100000,
50000,
20000,
10000,
2015-07-04 08:06:02 +08:00
};
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static LPC_CAN_TypeDef* lcpcan_get_reg_base(rt_uint32_t id)
{
2015-07-08 10:44:49 +08:00
LPC_CAN_TypeDef* pCan;
switch (id)
{
case CAN_ID_1:
pCan = LPC_CAN1;
break;
case CAN_ID_2:
pCan = LPC_CAN2;
break;
default:
pCan = NULL;
}
return pCan;
2015-07-04 08:06:02 +08:00
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static void lpccan_irqstate_init(rt_uint32_t id)
{
2015-07-08 10:44:49 +08:00
LPC_CAN_TypeDef* pCan = lcpcan_get_reg_base(id);
2015-07-04 08:06:02 +08:00
2015-07-08 10:44:49 +08:00
pCan->MOD = 1; // Enter Reset Mode
pCan->IER = 0; // Disable All CAN Interrupts
pCan->GSR = 0;
2015-07-04 08:06:02 +08:00
2015-07-08 10:44:49 +08:00
/* Request command to release Rx, Tx buffer and clear data overrun */
//pCan->CMR = CAN_CMR_AT | CAN_CMR_RRB | CAN_CMR_CDO;
pCan->CMR = (1 << 1) | (1 << 2) | (1 << 3);
2015-07-04 08:06:02 +08:00
2015-07-08 10:44:49 +08:00
/* Read to clear interrupt pending in interrupt capture register */
rt_int32_t i = pCan->ICR;
pCan->MOD = 0;// Return Normal operating
2015-07-04 08:06:02 +08:00
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static void lpccan_baud_set(rt_uint32_t id, rt_uint32_t baud)
{
2015-07-08 10:44:49 +08:00
uint32_t result = 0;
uint8_t NT, TSEG1, TSEG2;
uint32_t CANPclk = 0;
uint32_t BRP;
LPC_CAN_TypeDef* pCan = lcpcan_get_reg_base(id);
CANPclk = CLKPWR_GetCLK(CLKPWR_CLKTYPE_PER);
result = CANPclk / LPCBAUDTAB[baud];
/* Calculate suitable nominal time value
* NT (nominal time) = (TSEG1 + TSEG2 + 3)
* NT <= 24
* TSEG1 >= 2*TSEG2
*/
for(NT = 24; NT > 0; NT = NT-2)
{
if ((result%NT) == 0)
{
BRP = result / NT - 1;
NT--;
TSEG2 = (NT/3) - 1;
TSEG1 = NT -(NT/3) - 1;
break;
}
}
/* Enter reset mode */
pCan->MOD = 0x01;
/* Set bit timing
* Default: SAM = 0x00;
* SJW = 0x03;
*/
pCan->BTR = (TSEG2 << 20) | (TSEG1 << 16) | (3 << 14) | BRP;
/* Return to normal operating */
pCan->MOD = 0;
2015-07-04 08:06:02 +08:00
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static void lpccan_init_alut_ram(void)
{
2015-07-08 10:44:49 +08:00
//Reset CANAF value
LPC_CANAF->AFMR = 0x01;
//clear ALUT RAM
rt_memset((void *)LPC_CANAF_RAM->mask, 0, 2048);
LPC_CANAF->SFF_sa = 0;
LPC_CANAF->SFF_GRP_sa = 0;
LPC_CANAF->EFF_sa = 0;
LPC_CANAF->EFF_GRP_sa = 0;
LPC_CANAF->ENDofTable = 0;
LPC_CANAF->AFMR = 0x00;
// Set AF Mode
CAN_SetAFMode(CAN_NORMAL);
2015-07-04 08:06:02 +08:00
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
#ifdef RT_USING_LPCCAN1
static void lpccan1_turnon_clk(void)
{
2015-07-08 10:44:49 +08:00
CLKPWR_ConfigPPWR(CLKPWR_PCONP_PCAN1, ENABLE);
2015-07-04 08:06:02 +08:00
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static void lpccan1_filter_init(struct rt_can_device *can)
{
}
2015-07-08 10:44:49 +08:00
static void lpccan1_hw_init(uint32_t baud, CAN_MODE_Type mode)
2015-07-04 08:06:02 +08:00
{
2015-07-08 10:44:49 +08:00
if(mode != CAN_SELFTEST_MODE)
{
2015-07-04 08:06:02 +08:00
#ifndef LPCCAN1_USEING_GPIO_SECOND
2015-07-08 10:44:49 +08:00
PINSEL_ConfigPin (0, 0, 1);
PINSEL_ConfigPin (0, 1, 1);
2015-07-04 08:06:02 +08:00
#else
2015-07-08 10:44:49 +08:00
PINSEL_ConfigPin (0, 21, 4);
PINSEL_ConfigPin (0, 22, 4);
2015-07-04 08:06:02 +08:00
#endif
2015-07-08 10:44:49 +08:00
}
lpccan1_turnon_clk();
lpccan_irqstate_init(CAN_1);
lpccan_init_alut_ram();
lpccan1_turnon_clk();
lpccan_baud_set(CAN_1, baud);
CAN_ModeConfig(CAN_1, mode, ENABLE);
if(mode == CAN_SELFTEST_MODE)
{
//CAN_ModeConfig(CAN_1, CAN_TEST_MODE, ENABLE);
CAN_SetAFMode(CAN_ACC_BP);
}
2015-07-04 08:06:02 +08:00
}
#endif /*RT_USING_LPCCAN1*/
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
#ifdef RT_USING_LPCCAN2
static void lpccan2_turnon_clk(void)
{
2015-07-08 10:44:49 +08:00
CLKPWR_ConfigPPWR(CLKPWR_PCONP_PCAN2, ENABLE);
2015-07-04 08:06:02 +08:00
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static void lpccan2_filter_init(struct rt_can_device *can)
{
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static void lpccan2_hw_init(enum CANBAUD baud, CAN_MODE_Type mode)
{
2015-07-08 10:44:49 +08:00
if(mode != CAN_SELFTEST_MODE)
{
2015-07-04 08:06:02 +08:00
#ifndef LPCCAN2_USEING_GPIO_SECOND
2015-07-08 10:44:49 +08:00
PINSEL_ConfigPin (0, 4, 2);
PINSEL_ConfigPin (0, 5, 2);
2015-07-04 08:06:02 +08:00
#else
2015-07-08 10:44:49 +08:00
PINSEL_ConfigPin (2, 7, 1);
PINSEL_ConfigPin (2, 8, 1);
2015-07-04 08:06:02 +08:00
#endif
2015-07-08 10:44:49 +08:00
}
lpccan2_turnon_clk();
lpccan_irqstate_init(CAN_2);
2015-07-04 08:06:02 +08:00
#ifndef RT_USING_LPCCAN1
2015-07-08 10:44:49 +08:00
lpccan_init_alut_ram();
2015-07-04 08:06:02 +08:00
#endif /*RT_USING_LPCCAN1*/
2015-07-08 10:44:49 +08:00
lpccan_baud_set(CAN_2, baud);
CAN_ModeConfig(CAN_2, mode, ENABLE);
if(mode == CAN_SELFTEST_MODE)
{
CAN_SetAFMode(CAN_ACC_BP);
}
2015-07-04 08:06:02 +08:00
}
#endif /*RT_USING_LPCCAN2*/
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static rt_err_t configure(struct rt_can_device *can, struct can_configure *cfg)
{
2015-07-08 10:44:49 +08:00
CAN_MODE_Type mode;
switch(cfg->mode)
{
case RT_CAN_MODE_NORMAL:
mode = CAN_OPERATING_MODE;
break;
case RT_CAN_MODE_LISEN:
mode = CAN_LISTENONLY_MODE;
break;
case RT_CAN_MODE_LOOPBACKANLISEN:
mode = CAN_SELFTEST_MODE;
break;
default:
return RT_EIO;
}
rt_uint32_t canid;
canid = ((struct lpccandata *) can->parent.user_data)->id;
#ifdef RT_USING_LPCCAN1
if(canid == CAN_1)
{
lpccan1_hw_init(cfg->baud_rate, mode);
lpccan1_filter_init(can);
}
2015-07-04 08:06:02 +08:00
#endif /*RT_USING_LPCCAN1*/
#ifdef RT_USING_LPCCAN2
#ifdef RT_USING_LPCCAN1
2015-07-08 10:44:49 +08:00
else
2015-07-04 08:06:02 +08:00
#endif /*RT_USING_LPCCAN1*/
2015-07-08 10:44:49 +08:00
{
lpccan2_hw_init(cfg->baud_rate, mode);
lpccan2_filter_init(can);
}
2015-07-04 08:06:02 +08:00
#endif /*RT_USING_LPCCAN2*/
2015-07-08 10:44:49 +08:00
return RT_EOK;
2015-07-04 08:06:02 +08:00
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static CAN_ERROR findfilter(struct lpccandata* plpccan, struct rt_can_filter_item* pitem, rt_int32_t* pos)
{
2015-07-08 10:44:49 +08:00
extern uint16_t CANAF_FullCAN_cnt;
extern uint16_t CANAF_std_cnt;
extern uint16_t CANAF_gstd_cnt;
extern uint16_t CANAF_ext_cnt;
extern uint16_t CANAF_gext_cnt;
rt_uint32_t buf0 = 0, buf1 = 0;
rt_int16_t cnt1 = 0, cnt2 = 0, bound1 = 0;
CAN_ID_FORMAT_Type format;
*pos = -1;
if(pitem->ide)
{
format = EXT_ID_FORMAT;
}
else
{
format = STD_ID_FORMAT;
}
if(pitem->mode)
{
rt_uint32_t id = pitem->id;
if(format == STD_ID_FORMAT)
{
id &= 0x07FF;
id |= plpccan->id << 13;/* Add controller number */
if (CANAF_std_cnt == 0)
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
else if (CANAF_std_cnt == 1)
{
cnt2 = (CANAF_FullCAN_cnt + 1) >> 1;
if(id != LPC_CANAF_RAM->mask[cnt2] >> 16)
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
}
else
{
cnt1 = (CANAF_FullCAN_cnt+1)>>1;
bound1 = ((CANAF_FullCAN_cnt+1)>>1)+((CANAF_std_cnt+1)>>1);
while (cnt1 < bound1)
{
/* Loop through standard existing IDs */
if (((LPC_CANAF_RAM->mask[cnt1] >> 16) & 0xE7FF) == id)
{
*pos = cnt1 * 2;
return CAN_OK;
}
if ((LPC_CANAF_RAM->mask[cnt1] & 0x0000E7FF) == id)
{
*pos = cnt1 * 2 + 1;
return CAN_OK;
}
if (((LPC_CANAF_RAM->mask[cnt1] >> 16) & 0xE7FF) > id)
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
if ((LPC_CANAF_RAM->mask[cnt1] & 0x0000E7FF) > id)
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
cnt1++;
}
return CAN_ENTRY_NOT_EXIT_ERROR;
}
}
/*********** Add Explicit Extended Identifier Frame Format entry *********/
else
{
/* Add controller number */
id |= plpccan->id << 29;
cnt1 = ((CANAF_FullCAN_cnt+1) >> 1) + (((CANAF_std_cnt + 1) >> 1) + CANAF_gstd_cnt);
cnt2 = 0;
while (cnt2 < CANAF_ext_cnt)
{
/* Loop through extended existing masks*/
if (LPC_CANAF_RAM->mask[cnt1] == id)
{
*pos = cnt2;
return CAN_OK;
}
if (LPC_CANAF_RAM->mask[cnt1] > id)
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
cnt1++;
cnt2++;
}
}
}
else
{
rt_uint32_t lowerID = pitem->id;
rt_uint32_t upperID = pitem->mask;
rt_uint32_t LID,UID;
if(lowerID > upperID)
return CAN_CONFLICT_ID_ERROR;
if(format == STD_ID_FORMAT)
{
lowerID &=0x7FF; //mask ID
upperID &=0x7FF;
cnt1 = ((CANAF_FullCAN_cnt+1)>>1) + ((CANAF_std_cnt + 1) >> 1);
if(CANAF_gstd_cnt == 0)
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
else
{
bound1 = ((CANAF_FullCAN_cnt+1)>>1) + ((CANAF_std_cnt + 1) >> 1) + CANAF_gstd_cnt;
while(cnt1 < bound1)
{
//compare controller first
while((LPC_CANAF_RAM->mask[cnt1] >> 29) < (plpccan->id))//increase until meet greater or equal controller
cnt1++;
buf0 = LPC_CANAF_RAM->mask[cnt1];
if((LPC_CANAF_RAM->mask[cnt1] >> 29) > (plpccan->id)) //meet greater controller
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
else //meet equal controller
{
LID = (buf0 >> 16)&0x7FF;
UID = buf0 & 0x7FF;
if (upperID == LID && lowerID == UID)
{
*pos = cnt1;
return CAN_OK;
}
if (upperID < LID)
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
else if (lowerID >= UID)
{
cnt1 ++;
}
else
return CAN_CONFLICT_ID_ERROR;
}
}
if(cnt1 >= bound1)
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
}
}
/*********Add Group of Extended Identifier Frame Format************/
else
{
lowerID &= 0x1FFFFFFF; //mask ID
upperID &= 0x1FFFFFFF;
cnt1 = ((CANAF_FullCAN_cnt+1)>>1) + ((CANAF_std_cnt + 1) >> 1) + CANAF_gstd_cnt + CANAF_ext_cnt;
//if this is the first Group standard ID entry
if(CANAF_gext_cnt == 0)
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
else
{
bound1 = ((CANAF_FullCAN_cnt+1)>>1) + ((CANAF_std_cnt + 1) >> 1) + CANAF_gstd_cnt \
+ CANAF_ext_cnt + (CANAF_gext_cnt<<1);
while(cnt1 < bound1)
{
while((LPC_CANAF_RAM->mask[cnt1] >>29)< plpccan->id ) //increase until meet greater or equal controller
cnt1++;
buf0 = LPC_CANAF_RAM->mask[cnt1];
buf1 = LPC_CANAF_RAM->mask[cnt1+1];
if((LPC_CANAF_RAM->mask[cnt1] >> 29) > plpccan->id ) //meet greater controller
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
else //meet equal controller
{
LID = buf0 & 0x1FFFFFFF; //mask ID
UID = buf1 & 0x1FFFFFFF;
if (upperID == LID && lowerID == UID)
{
*pos = cnt1;
return CAN_OK;
}
if (upperID < LID)
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
else if (lowerID >= UID)
{
//load next entry to compare
cnt1 +=2;
}
else
return CAN_CONFLICT_ID_ERROR;
}
}
if(cnt1 >= bound1)
{
return CAN_ENTRY_NOT_EXIT_ERROR;
}
}
}
}
return CAN_ENTRY_NOT_EXIT_ERROR;
2015-07-04 08:06:02 +08:00
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static rt_err_t setfilter(struct lpccandata* plpccan,struct rt_can_filter_config *pconfig)
{
2015-07-08 10:44:49 +08:00
struct rt_can_filter_item* pitem = pconfig->items;
rt_uint32_t count = pconfig->count;
rt_int32_t pos;
CAN_ID_FORMAT_Type format;
CAN_ERROR lpccanres;
while(count)
{
if(pitem->ide)
{
format = EXT_ID_FORMAT;
}
else
{
format = STD_ID_FORMAT;
}
lpccanres = findfilter(plpccan, pitem, &pos);
if(pconfig->actived && lpccanres != CAN_OK)
{
if(pitem->mode)
{
lpccanres = CAN_LoadGroupEntry(plpccan->id, pitem->id, pitem->mask, format);
}
else
{
lpccanres = CAN_LoadExplicitEntry(plpccan->id, pitem->id, format);
}
}
else if(!pconfig->actived && lpccanres == CAN_OK)
{
AFLUT_ENTRY_Type type;
if(pitem->mode)
{
if(format == EXT_ID_FORMAT)
{
type = GROUP_EXTEND_ENTRY;
}
else
{
type = GROUP_STANDARD_ENTRY;
}
}
else
{
if(format == EXT_ID_FORMAT)
{
type = EXPLICIT_EXTEND_ENTRY;
}
else
{
type = EXPLICIT_STANDARD_ENTRY;
}
}
lpccanres = CAN_RemoveEntry(type, (rt_uint16_t)(pos));
}
else if(!pconfig->actived && lpccanres != CAN_OK)
{
lpccanres = CAN_OK;
}
if(lpccanres != CAN_OK)
{
return RT_EIO;
}
pitem++;
count--;
}
return RT_EOK;
2015-07-04 08:06:02 +08:00
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static rt_err_t control(struct rt_can_device *can, int cmd, void *arg)
{
2015-07-08 10:44:49 +08:00
struct lpccandata* plpccan;
rt_uint32_t argval;
CAN_MODE_Type mode;
plpccan = (struct lpccandata* ) can->parent.user_data;
RT_ASSERT(plpccan != RT_NULL);
switch (cmd)
{
case RT_DEVICE_CTRL_CLR_INT:
argval = (rt_uint32_t) arg;
if(argval == RT_DEVICE_FLAG_INT_RX)
{
CAN_IRQCmd(plpccan->id, CANINT_RIE, DISABLE);
CAN_IRQCmd(plpccan->id, CANINT_DOIE, DISABLE);
}
else if(argval == RT_DEVICE_FLAG_INT_TX)
{
CAN_IRQCmd(plpccan->id, CANINT_TIE1, DISABLE);
CAN_IRQCmd(plpccan->id, CANINT_TIE2, DISABLE);
CAN_IRQCmd(plpccan->id, CANINT_TIE3, DISABLE);
}
else if(argval == RT_DEVICE_CAN_INT_ERR)
{
CAN_IRQCmd(plpccan->id, CANINT_EIE, DISABLE);
}
break;
case RT_DEVICE_CTRL_SET_INT:
argval = (rt_uint32_t) arg;
if(argval == RT_DEVICE_FLAG_INT_RX)
{
CAN_IRQCmd(plpccan->id, CANINT_RIE, ENABLE);
CAN_IRQCmd(plpccan->id, CANINT_DOIE, ENABLE);
}
else if(argval == RT_DEVICE_FLAG_INT_TX)
{
CAN_IRQCmd(plpccan->id, CANINT_TIE1, ENABLE);
CAN_IRQCmd(plpccan->id, CANINT_TIE2, ENABLE);
CAN_IRQCmd(plpccan->id, CANINT_TIE3, ENABLE);
}
else if(argval == RT_DEVICE_CAN_INT_ERR)
{
CAN_IRQCmd(plpccan->id, CANINT_EIE, ENABLE);
}
break;
case RT_CAN_CMD_SET_FILTER:
return setfilter(plpccan, (struct rt_can_filter_config*) arg);
case RT_CAN_CMD_SET_MODE:
argval = (rt_uint32_t) arg;
if(argval != RT_CAN_MODE_NORMAL ||
argval != RT_CAN_MODE_LISEN)
{
return RT_ERROR;
}
if(argval != can->config.mode)
{
can->config.mode = argval;
switch(argval)
{
case RT_CAN_MODE_NORMAL:
mode = CAN_OPERATING_MODE;
break;
case RT_CAN_MODE_LISEN:
mode = CAN_LISTENONLY_MODE;
break;
case RT_CAN_MODE_LOOPBACKANLISEN:
mode = CAN_SELFTEST_MODE;
break;
default:
return RT_EIO;
}
CAN_ModeConfig(plpccan->id, mode, ENABLE);
if(mode == CAN_SELFTEST_MODE)
{
//CAN_ModeConfig(CAN_1, CAN_TEST_MODE, ENABLE);
CAN_SetAFMode(CAN_ACC_BP);
}
}
break;
case RT_CAN_CMD_SET_BAUD:
argval = (rt_uint32_t) arg;
if(argval != CAN1MBaud &&
argval != CAN800kBaud &&
argval != CAN500kBaud &&
argval != CAN250kBaud &&
argval != CAN125kBaud &&
argval != CAN100kBaud &&
argval != CAN50kBaud &&
argval != CAN20kBaud &&
argval != CAN10kBaud )
{
return RT_ERROR;
}
if(argval != can->config.baud_rate)
{
can->config.baud_rate = argval;
lpccan_baud_set(plpccan->id, (rt_uint32_t) arg);
}
break;
case RT_CAN_CMD_SET_PRIV:
argval = (rt_uint32_t) arg;
if(argval != RT_CAN_MODE_PRIV ||
argval != RT_CAN_MODE_NOPRIV)
{
return RT_ERROR;
}
if(argval != can->config.privmode)
{
can->config.privmode = argval;
CAN_ModeConfig(plpccan->id, CAN_TXPRIORITY_MODE, ENABLE);
}
break;
case RT_CAN_CMD_GET_STATUS:
{
rt_uint32_t errtype;
can->status.rcverrcnt = 0;
can->status.snderrcnt = 0;
can->status.errcode = 0;
if(arg != &can->status)
{
rt_memcpy(arg,&can->status,sizeof(can->status));
}
}
break;
}
return RT_EOK;
2015-07-04 08:06:02 +08:00
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static int sendmsg(struct rt_can_device *can, const void* buf, rt_uint32_t boxno)
{
2015-07-08 10:44:49 +08:00
struct lpccandata* plpccan;
plpccan = (struct lpccandata* ) can->parent.user_data;
RT_ASSERT(plpccan != RT_NULL);
LPC_CAN_TypeDef* pCan = lcpcan_get_reg_base(plpccan->id);
RT_ASSERT(pCan != RT_NULL);
struct rt_can_msg* pmsg = (struct rt_can_msg*) buf;
rt_uint32_t SR_Mask;
if(boxno > 2)
{
return RT_ERROR;
}
rt_uint32_t CMRMsk = 0x01 | (0x01 << (boxno + 5));
SR_Mask = 0x01 <<(boxno * 8 + 2);
volatile unsigned int *pTFI = (&pCan->TFI1 + 0 + 4 * boxno);
volatile unsigned int *pTID = (&pCan->TFI1 + 1 + 4 * boxno);
volatile unsigned int *pTDA = (&pCan->TFI1 + 2 + 4 * boxno);
volatile unsigned int *pTDB = (&pCan->TFI1 + 3 + 4 * boxno);
rt_uint32_t data;
if(pCan->SR & SR_Mask)
{
/* Transmit Channel 1 is available */
/* Write frame informations and frame data into its CANxTFI1,
* CANxTID1, CANxTDA1, CANxTDB1 register */
*pTFI &= ~ 0x000F0000;
*pTFI |= (pmsg->len) << 16;
if(pmsg->rtr == REMOTE_FRAME)
{
*pTFI |= (1 << 30); //set bit RTR
}
else
{
*pTFI &= ~(1 << 30);
}
if(pmsg->ide == EXT_ID_FORMAT)
{
*pTFI |= (((uint32_t)1) << 31); //set bit FF
}
else
{
*pTFI &= ~(((uint32_t)1) << 31);
}
if(can->config.privmode)
{
*pTFI &= ~0x000000FF;
*pTFI |= pmsg->priv;
}
/* Write CAN ID*/
*pTID = pmsg->id;
/*Write first 4 data bytes*/
data = (pmsg->data[0]) | (((pmsg->data[1]))<< 8) | ((pmsg->data[2]) << 16) | ((pmsg->data[3]) << 24);
*pTDA = data;
/*Write second 4 data bytes*/
data = (pmsg->data[4]) | (((pmsg->data[5])) << 8) | ((pmsg->data[6]) << 16) | ((pmsg->data[7]) << 24);
*pTDB = data;
/*Write transmission request*/
pCan->CMR = CMRMsk;
return RT_EOK;
}
else
{
return RT_ERROR;
}
2015-07-04 08:06:02 +08:00
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
static int recvmsg(struct rt_can_device *can, void* buf, rt_uint32_t boxno)
{
2015-07-08 10:44:49 +08:00
struct lpccandata* plpccan;
plpccan = (struct lpccandata* ) can->parent.user_data;
RT_ASSERT(plpccan != RT_NULL);
LPC_CAN_TypeDef* pCan = lcpcan_get_reg_base(plpccan->id);
RT_ASSERT(pCan != RT_NULL);
//CAN_ReceiveMsg
uint32_t data;
struct rt_can_msg* pmsg = (struct rt_can_msg*) buf;
//check status of Receive Buffer
if((pCan->SR &0x00000001))
{
/* Receive message is available */
/* Read frame informations */
pmsg->ide = (uint8_t)(((pCan->RFS) & 0x80000000) >> 31);
pmsg->rtr = (uint8_t)(((pCan->RFS) & 0x40000000) >> 30);
pmsg->len = (uint8_t)(((pCan->RFS) & 0x000F0000) >> 16);
/* Read CAN message identifier */
pmsg->id = pCan->RID;
/* Read the data if received message was DATA FRAME */
if (!pmsg->rtr)
{
/* Read first 4 data bytes */
data = pCan->RDA;
pmsg->data[0] = data & 0x000000FF;
pmsg->data[1] = (data & 0x0000FF00) >> 8;
pmsg->data[2] = (data & 0x00FF0000) >> 16;
pmsg->data[3] = (data & 0xFF000000) >> 24;
/* Read second 4 data bytes */
if(pmsg->len > 4)
{
data = pCan->RDB;
pmsg->data[4] = data & 0x000000FF;
pmsg->data[5] = (data & 0x0000FF00) >> 8;
pmsg->data[6] = (data & 0x00FF0000) >> 16;
pmsg->data[7] = (data & 0xFF000000) >> 24;
}
pmsg->hdr = 0;
/*release receive buffer*/
pCan->CMR = 0x04;
}
else
{
/* Received Frame is a Remote Frame, not have data, we just receive
* message information only */
pCan->CMR = 0x04; /*release receive buffer*/
return SUCCESS;
}
}
else
{
// no receive message available
return ERROR;
}
return RT_EOK;
2015-07-04 08:06:02 +08:00
}
static const struct rt_can_ops canops =
{
2015-07-08 10:44:49 +08:00
configure,
control,
sendmsg,
recvmsg,
2015-07-04 08:06:02 +08:00
};
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
#ifdef RT_USING_LPCCAN1
#ifdef RT_CAN_USING_LED
#endif
2015-07-08 10:44:49 +08:00
static struct lpccandata lpccandata1 =
{
CAN_ID_1,
2015-07-04 08:06:02 +08:00
};
static struct rt_can_device lpccan1;
#endif /*RT_USINGLPCCAN1*/
#ifdef RT_USING_LPCCAN2
#ifdef RT_CAN_USING_LED
#endif
2015-07-08 10:44:49 +08:00
static struct lpccandata lpccandata2 =
{
CAN_ID_2,
2015-07-04 08:06:02 +08:00
};
static struct rt_can_device lpccan2;
#endif /*RT_USINGLPCCAN2*/
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
/*----------------- INTERRUPT SERVICE ROUTINES --------------------------*/
/*********************************************************************//**
* @brief Event Router IRQ Handler
* @param[in] None
* @return None
**********************************************************************/
void CAN_IRQHandler(void)
{
2015-07-08 10:44:49 +08:00
rt_uint32_t IntStatus;
2015-07-04 08:06:02 +08:00
#ifdef RT_USING_LPCCAN1
2015-07-08 10:44:49 +08:00
IntStatus = CAN_IntGetStatus(CAN_1);
//check receive interrupt
if((IntStatus >> 0) & 0x01)
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_RX_IND | 0<<8);
}
//check Transmit Interrupt interrupt1
if((IntStatus >> 1) & 0x01)
{
rt_uint32_t state = 0;
state = CAN_GetCTRLStatus(CAN_1, CANCTRL_STS);
if(state & (0x01 << 3))
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_DONE | 0<<8);
}
else
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_FAIL | 0<<8);
}
}
//check Error Warning Interrupt
if((IntStatus >> 2) & 0x01)
{
rt_uint32_t errtype;
errtype = (IntStatus >> 16);
if(errtype & 0x1F && lpccan1.status.lasterrtype == (errtype & 0x1F))
{
switch((errtype & 0x1F))
{
case 00011: // Start of Frame
case 00010: // ID28 ... ID21
case 00110: //ID20 ... ID18
case 00100: // SRTR Bit
case 00101: // IDE bit
case 00111: // ID17 ... 13
case 01111: // ID12 ... ID5
case 01110: // ID4 ... ID0
case 01100: // RTR Bit
case 01011: // Data Length Code
case 01010: // Data Field
lpccan1.status.formaterrcnt++;
break;
case 01101: // Reserved Bit 1
case 01001: // Reserved Bit 0
lpccan1.status.bitpaderrcnt++;
break;
case 01000: // CRC Sequence
case 11000: // CRC Delimiter
lpccan1.status.crcerrcnt++;
break;
case 11001: // Acknowledge Slot
case 11011: // Acknowledge Delimiter
lpccan1.status.ackerrcnt++;
break;
case 11010: // End of Frame
case 10010: // Intermission
lpccan1.status.formaterrcnt++;
break;
}
lpccan1.status.lasterrtype = errtype & 0x1F;
}
rt_uint32_t state = 0;
state = CAN_GetCTRLStatus(CAN_1, CANCTRL_GLOBAL_STS);
lpccan1.status.rcverrcnt = (state >> 16) & 0xFF;
lpccan1.status.snderrcnt = (state >> 24) & 0xFF;
lpccan1.status.errcode = (state >> 5) & 0x06;
}
//check Data Overrun Interrupt Interrupt
if((IntStatus >> 3) & 0x01)
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_RXOF_IND | 0<<8);
}
//check Transmit Interrupt interrupt2
if((IntStatus >> 9) & 0x01)
{
rt_uint32_t state = 0;
state = CAN_GetCTRLStatus(CAN_1, CANCTRL_STS);
if(state & (0x01 << 11))
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_DONE | 1<<8);
}
else
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_FAIL | 1<<8);
}
}
//check Transmit Interrupt interrupt3
if((IntStatus >> 10) & 0x01)
{
rt_uint32_t state = 0;
state = CAN_GetCTRLStatus(CAN_1, CANCTRL_STS);
if(state & (0x01 << 19))
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_DONE | 2<<8);
}
else
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_FAIL | 2<<8);
}
}
2015-07-04 08:06:02 +08:00
#endif /*RT_USING_LPCCAN1*/
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
#ifdef RT_USING_LPCCAN2
2015-07-08 10:44:49 +08:00
IntStatus = CAN_IntGetStatus(CAN_2);
//check receive interrupt
if((IntStatus >> 0) & 0x01)
{
rt_hw_can_isr(&lpccan2,RT_CAN_EVENT_RX_IND | 0<<8);
}
//check Transmit Interrupt interrupt1
if((IntStatus >> 1) & 0x01)
{
rt_uint32_t state = 0;
state = CAN_GetCTRLStatus(CAN_2, CANCTRL_STS);
if(state & (0x01 << 3))
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_DONE | 0<<8);
}
else
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_FAIL | 0<<8);
}
}
//check Error Warning Interrupt
if((IntStatus >> 2) & 0x01)
{
rt_uint32_t errtype;
errtype = (IntStatus >> 16);
if(errtype & 0x1F && lpccan2.status.lasterrtype == (errtype & 0x1F))
{
switch((errtype & 0x1F))
{
case 00011: // Start of Frame
case 00010: // ID28 ... ID21
case 00110: //ID20 ... ID18
case 00100: // SRTR Bit
case 00101: // IDE bit
case 00111: // ID17 ... 13
case 01111: // ID12 ... ID5
case 01110: // ID4 ... ID0
case 01100: // RTR Bit
case 01011: // Data Length Code
case 01010: // Data Field
lpccan2.status.formaterrcnt++;
break;
case 01101: // Reserved Bit 1
case 01001: // Reserved Bit 0
lpccan2.status.bitpaderrcnt++;
break;
case 01000: // CRC Sequence
case 11000: // CRC Delimiter
lpccan2.status.crcerrcnt++;
break;
case 11001: // Acknowledge Slot
case 11011: // Acknowledge Delimiter
lpccan2.status.ackerrcnt++;
break;
case 11010: // End of Frame
case 10010: // Intermission
lpccan2.status.formaterrcnt++;
break;
}
lpccan2.status.lasterrtype = errtype & 0x1F;
}
rt_uint32_t state = 0;
state = CAN_GetCTRLStatus(CAN_2, CANCTRL_GLOBAL_STS);
lpccan2.status.rcverrcnt = (state >> 16) & 0xFF;
lpccan2.status.snderrcnt = (state >> 24) & 0xFF;
lpccan2.status.errcode = (state >> 5) & 0x06;
}
//check Data Overrun Interrupt Interrupt
if((IntStatus >> 3) & 0x01)
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_RXOF_IND | 0<<8);
}
//check Transmit Interrupt interrupt2
if((IntStatus >> 9) & 0x01)
{
rt_uint32_t state = 0;
state = CAN_GetCTRLStatus(CAN_2, CANCTRL_STS);
if(state & (0x01 << 11))
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_DONE | 1<<8);
}
else
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_FAIL | 1<<8);
}
}
//check Transmit Interrupt interrupt3
if((IntStatus >> 10) & 0x01)
{
rt_uint32_t state = 0;
state = CAN_GetCTRLStatus(CAN_2, CANCTRL_STS);
if(state & (0x01 << 19))
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_DONE | 2<<8);
}
else
{
rt_hw_can_isr(&lpccan1,RT_CAN_EVENT_TX_FAIL | 2<<8);
}
}
2015-07-04 08:06:02 +08:00
#endif /*RT_USING_LPCCAN2*/
}
2015-07-08 10:44:49 +08:00
2015-07-04 08:06:02 +08:00
int lpc_can_init(void)
{
#ifdef RT_USING_LPCCAN1
2015-07-08 10:44:49 +08:00
lpccan1.config.baud_rate=CAN1MBaud;
lpccan1.config.msgboxsz=16;
lpccan1.config.sndboxnumber=3;
lpccan1.config.mode=RT_CAN_MODE_NORMAL;
lpccan1.config.privmode=0;
2015-07-04 08:06:02 +08:00
#ifdef RT_CAN_USING_LED
#endif
2015-07-08 10:44:49 +08:00
lpccan1.config.ticks = 50;
2015-07-04 08:06:02 +08:00
#ifdef RT_CAN_USING_HDR
#endif
2015-07-08 10:44:49 +08:00
//Enable CAN Interrupt
NVIC_EnableIRQ(CAN_IRQn);
rt_hw_can_register(&lpccan1, "lpccan1", &canops, &lpccandata1);
2015-07-04 08:06:02 +08:00
#endif
#ifdef RT_USING_LPCCAN2
2015-07-08 10:44:49 +08:00
lpccan2.config.baud_rate=CAN1MBaud;
lpccan2.config.msgboxsz=16;
lpccan2.config.sndboxnumber=3;
lpccan2.config.mode=RT_CAN_MODE_NORMAL;
lpccan2.config.privmode=0;
2015-07-04 08:06:02 +08:00
#ifdef RT_CAN_USING_LED
2015-07-08 10:44:49 +08:00
#endif
lpccan2.config.ticks = 50;
2015-07-04 08:06:02 +08:00
#ifdef RT_CAN_USING_HDR
#endif
#ifndef RT_USING_LPCCAN1
2015-07-08 10:44:49 +08:00
//Enable CAN Interrupt
NVIC_EnableIRQ(CAN_IRQn);
2015-07-04 08:06:02 +08:00
#endif
#ifdef RT_CAN_USING_HDR
#endif
2015-07-08 10:44:49 +08:00
rt_hw_can_register(&lpccan2, "lpccan2", &canops, &lpccandata2);
2015-07-04 08:06:02 +08:00
#endif
2015-07-08 10:44:49 +08:00
return RT_EOK;
2015-07-04 08:06:02 +08:00
}
INIT_BOARD_EXPORT(lpc_can_init);
#endif /*RT_USING_CAN*/