标题:
用C来做一个解释性语言,一个状态机,初始化的顺序决定执行顺序
[打印本页]
作者:
电子黑
时间:
2016-6-28 00:23
标题:
用C来做一个解释性语言,一个状态机,初始化的顺序决定执行顺序
写了几年的代码,今天试着用C来做一个解释性语言,一个状态机,初始化的顺序决定执行顺序。支持时间和事件触发两种方案。现在只是不同汇编,要是会的话也许可以做一个OS,本代码没有做验证,慎用!
/*
事件状态机,用于处理基于时间和消息
step by step
用户只需要将需要做的事情按照步骤后条件加入到本函数中即可
事件状态机
*/
#include"eventStateMachine.H"
esm_sta esmSta[emsNum];
event_disc eventDisc[eventNum];
u32 esmSysTime = 0;
u8 esmStructInit(event_disc *dat)
{
u8 i ;
for(i =0 ;i != emsNum ; i++)
{
if(esmSta[i].usedFlag != 0)
{
esmSta[i].dat = dat ;
return i ;
}
}
return emsNum ;
}
/* 用于初始化延时事件
0 - 本事件总数
1-写入位置
2- 3 延时时间
*/
void esmTimeInit(u8 *inBuf,u8(*fun)(void))
{
u8 totaol ,i ,add;
totaol = inBuf[0];
add = inBuf[1];
u16 time = inBuf[2]<<8|inBuf[3];
for(i =0 ; i != totaol ; i++)
{
if(esmSta[add].dat[i].fun != NULL)
{
esmSta[add].dat[i].fun = fun ;
esmSta[add].dat[i].time = time ;
esmSta[add].totalNum++;
}
}
}
/* 事件结构体初始化
0 - 本事件总量
1- 写入地址
*/
void esmEventInit(u8 *inBuf ,u8 (*fun)(void))
{
u8 totaol ,i ,add;
totaol = inBuf[0];
add = inBuf[1];
for(i =0 ; i != totaol ; i++)
{
if(esmSta[add].dat[i].fun != NULL)
{
esmSta[add].dat[i].fun = fun ;
esmSta[add].dat[i].time = 0xffff ;
esmSta[add].totalNum++;
}
}
}
/* 事件状态机时间钩子函数
*/
void esmTimeHookFun(void)
{
esmSysTime++;
}
void esmTimeCheck(u8 i ,u8 step)
{
if( esmSysTime - esmSta[i].dat[step].recordTime >= esmSta[i].dat[step].time)
{
esmSta[i].dat[step].fun();
esmSta[i].nextStepId++; /* 时间顺序结构体要求step by step */
esmSta[i].dat[step].recordTime = 0;
}
}
void esmEventCheck(u8 i ,u8 step)
{
u8 next ;
next =esmSta[i].dat[step].fun();
if(next != esmWaiteStell)
{
esmSta[i].nextStepId = next ;
}
}
void esmEventRunSta(void)
{
u8 i ;
u8 step ;
for(i = 0 ; i!= emsNum ; i++)
{
step = esmSta[i].nextStepId ;
if(esmSta[i].dat[step].time != 0xffff)
{
//启动延时数秒
if(esmSta[i].dat[step].recordTime == 0)
{
esmSta[i].dat[step].recordTime = esmSysTime ;
}
else
{
esmTimeCheck(i, step);
}
}
else
{
//事件参考执行
esmEventCheck(i, step);
}
//恢复开始从新执行
if(esmSta[i].totalNum == step)
{
esmSta[i].nextStepId = 0;
}
}
}
//测试验证
u8 esmTestFun1(void)
{
static u8 ii;
ii = esmSysTime ;
return 0;
}
u8 esmTestFun2(void)
{
if(esmSysTime == 10)
{
return esmStepPlus ;
}
else
{
return esmWaiteStell ;
}
}
//测试验证
u8 esmTestFun3(void)
{
static u8 iii;
iii = esmSysTime ;
return 0;
}
/* 初始化顺序就是执行的顺序 */
void esmTest(void)
{
u8 inBuf[5];
inBuf[0] = eventNum ;
inBuf[1] = esmStructInit(eventDisc);
inBuf[2] = 0x00 ;
inBuf[3] = 8;
esmTimeInit( inBuf, &esmTestFun1);
esmEventInit( inBuf, &esmTestFun2);
esmTimeInit( inBuf, &esmTestFun3);
while(1)
{
esmEventRunSta();
esmTimeHookFun();
}
}
#ifndef __eventStateMachine_H
#define __eventStateMachine_H
#include "stm32f10x.h"
/* Scheduler includes. */
#include "FreeRTOS.h"
#include "task.h"
#include"pBase.h"
#define emsNum 3 /* 申请多个事件状态机 */
#define eventNum 4
typedef struct
{
u8 id ;
u8 (*fun)(void);
u16 time; /* 延时时间 */
u16 recordTime ;
}event_disc;
typedef struct
{
u8 stepId ;
u8 nextStepId ;
u8 usedFlag :1; /* 使用标记 */
u8 totalNum ;
event_disc *dat;
}esm_sta;
#define esmWaiteStell 0xff /* 继续等待 */
#define esmStepPlus 0xfe /* 下一步操作 */
void esmTest(void);
#endif
复制代码
欢迎光临 (http://www.51hei.com/bbs/)
Powered by Discuz! X3.1