简单梳理一下CAPL常用的一些语法

在车载控制器测试中，CAPL是常用的总线测试脚本之一，今天来简单梳理一下常用的一些语法。

1.定时器

首先肯定是定时器了，在编写CAPL脚本中，使用的频率很高，比如我们需要周期性的发送CAN报文，或者周期性的检测某个系统变量的变化时就需要用到定时器。

使用定时器的第一步就是申明定时器，如下。

 

msTimer  msTimer50;  //声明了一个ms定时器；
timer    sTimer1;  //声明了一个为s定时器；

 

申明完后，就需要设置定时器。

 

setTimer（msTimer50,50）;//设置定时器msTimer50的时间为50ms；
setTimerCyclic(sTimer1,1);//设置定时器sTimer1为1s为周期的循环定时器；

 

在这些都做完之后，可以设计定时器到时之后，需要执行的操作了，以msTimer50为例。

 

on timer msTimer50
{   
.......
}

 

2.信息的发送操作

CAN报文操作，是我们常用的之一，下面就以CAN报文的发送操作为示例。这里如果在CANOE工程中添加了dbc文件，则可以直接通过dbc来定义message。

 

message Msg;//声明一个message；
Msg.dlc=8;//设置其DLC=8；
Msg.id=0x100;//设置CAN ID=0x100;
Msg.byte(0)=A5;//设置数据场的第一个字节为A5
output（Msg）;//发送Msg

 

3.CAN错误帧检查

进行CAN总线测试时，检查错误帧是很常见的，用CAPL脚本实现自动检测错误帧也不困难，CAPL中有现成的函数接口ChkStart_ErrorFrameOccured()。

该函数一旦被调用，CANoe就会从此函数被调用时开始持续检测总线上有没有出现错误帧。

 

dword chechId;
dword numCheckEvents;


checkId=ChkStart_ErrorFrameOccured();//开始检测错误帧
TestAddCondition(checkId);//添加检测条件，如果出现了错误帧，则输出报告中会记录下来
TestWaitForTimeout(10000);//持续检测10s
checkControl_Stop(checkId);//停止检测错误帧
numCheckEvents=ChkQuery_NumEvents(checkId);//对5s内的检测情况进行获取，若函数返回0则没有出现错误帧


if(numCheckEvents>0)
     TestStepFail("Error Frames Occured");

 

4.添加事件信号

一般使用是某个事件发生，然后需要执行一些动作，比如打印出错误信息等。

具体做法是：在一个位置添加需要等待的事件，程序中的其他地方，如果某个事件发生了（如周期超界、错误帧出现等），提供该事件的供应，则等待的程序段获得了该事件，继续执行下面的操作。几个核心的函数接口如下所示。

 

//供应text事件，主要用于关联事件的触发源，以及特定的text
long TestSupplyTextEvent( char aText[] );
//添加text事件
long TestJoinTextEvent(char[]aText);
//等待text事件，有一个出现则程序执行下一步
long TestWaitForAnyJoinedEvent(dword aTimeout);
//等待text事件，所有等待事件都出现则程序执行下一步
long TestWaitForAllJoinedEvents(dword aTimeout);

 

5.回调函数

CAPL中也有类似于C语言中的回调函数的机制，如检测报错误帧的函数中就可以使用，当总线出现错误帧就会自动调用回调函数执行一些操作。

 

ErrChkId=ChkStart_ErrorFramesOccured("Callback_ErrorFrameOccured");//检查错误帧，如果发现错误帧就调用回调函数
回调函数设计如下：
void Callback_errorFrameOccured(dword chk_id)
{
  float t;
  t=timeNow()/100000.0;//记录出现错误帧的时间
  testStep("ErrorFrame_TimeStamp","%.7f s",t);//打印事件戳
  TestSupplyTextEvent("ErrorFrameOccured");//设置前面提到的事件
}

 

6.总线节点检测

监控总线上有没有出现通讯异常的情况。需要使用函数接口ChkStart_NodeBabbling( )，例如检测一段时间内总线有没有出现停止通讯的情况。

 

CheckId=ChkStart_NodeBabbling(CAN::ACAN,0);//立即开始检查总线状态
testWaitForTimeout(5000);//延时5s
ChkControl_Stop(CheckId);//停止检测
NumberEvents=ChkQuery_NumEvents(CheckId);//如果在2s内总线停止通讯，则NumberEvents！=0

 

审核编辑：刘清