CAPL脚本语法之车载测试
在车载控制器测试中，CAPL是常用的总线测试脚本之一，测试工程师需要掌握相关用法。1.定时器
首先肯定是定时器了，在编写CAPL脚本中，使用的频率很高，比如我们需要周期性的发送CAN报文，或者周期性的检测某个系统变量的变化时就需要用到定时器。
使用定时器的第一步就是申明定时器，如下：
msTimermsTimer50;//声明了一个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！
页:
[1]
