標(biāo)題:
用C來做一個解釋性語言,一個狀態(tài)機(jī),初始化的順序決定執(zhí)行順序
[打印本頁]
作者:
電子黑
時間:
2016-6-28 00:23
標(biāo)題:
用C來做一個解釋性語言,一個狀態(tài)機(jī),初始化的順序決定執(zhí)行順序
寫了幾年的代碼,今天試著用C來做一個解釋性語言,一個狀態(tài)機(jī),初始化的順序決定執(zhí)行順序。支持時間和事件觸發(fā)兩種方案。現(xiàn)在只是不同匯編,要是會的話也許可以做一個OS,本代碼沒有做驗(yàn)證,慎用!
/*
事件狀態(tài)機(jī),用于處理基于時間和消息
step by step
用戶只需要將需要做的事情按照步驟后條件加入到本函數(shù)中即可
事件狀態(tài)機(jī)
*/
#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 - 本事件總數(shù)
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++;
}
}
}
/* 事件結(jié)構(gòu)體初始化
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++;
}
}
}
/* 事件狀態(tài)機(jī)時間鉤子函數(shù)
*/
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++; /* 時間順序結(jié)構(gòu)體要求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)
{
//啟動延時數(shù)秒
if(esmSta[i].dat[step].recordTime == 0)
{
esmSta[i].dat[step].recordTime = esmSysTime ;
}
else
{
esmTimeCheck(i, step);
}
}
else
{
//事件參考執(zhí)行
esmEventCheck(i, step);
}
//恢復(fù)開始從新執(zhí)行
if(esmSta[i].totalNum == step)
{
esmSta[i].nextStepId = 0;
}
}
}
//測試驗(yàn)證
u8 esmTestFun1(void)
{
static u8 ii;
ii = esmSysTime ;
return 0;
}
u8 esmTestFun2(void)
{
if(esmSysTime == 10)
{
return esmStepPlus ;
}
else
{
return esmWaiteStell ;
}
}
//測試驗(yàn)證
u8 esmTestFun3(void)
{
static u8 iii;
iii = esmSysTime ;
return 0;
}
/* 初始化順序就是執(zhí)行的順序 */
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 /* 申請多個事件狀態(tài)機(jī) */
#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; /* 使用標(biāo)記 */
u8 totalNum ;
event_disc *dat;
}esm_sta;
#define esmWaiteStell 0xff /* 繼續(xù)等待 */
#define esmStepPlus 0xfe /* 下一步操作 */
void esmTest(void);
#endif
復(fù)制代碼
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1