標(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)證,慎用!

  1. /*
  2. 事件狀態(tài)機(jī),用于處理基于時間和消息
  3. step by  step
  4. 用戶只需要將需要做的事情按照步驟后條件加入到本函數(shù)中即可

  5. 事件狀態(tài)機(jī)

  6. */

  7. #include"eventStateMachine.H"

  8. esm_sta esmSta[emsNum];
  9. event_disc eventDisc[eventNum];
  10. u32  esmSysTime = 0;

  11. u8  esmStructInit(event_disc *dat)
  12. {
  13.     u8 i ;
  14.     for(i =0 ;i != emsNum ; i++)
  15.         {
  16.         if(esmSta[i].usedFlag != 0)
  17.             {
  18.             esmSta[i].dat = dat ;
  19.                 return i ;
  20.             }
  21.         }
  22.     return emsNum ;
  23. }

  24. /* 用于初始化延時事件
  25. 0 - 本事件總數(shù)
  26. 1-寫入位置
  27. 2- 3 延時時間
  28. */

  29. void esmTimeInit(u8 *inBuf,u8(*fun)(void))
  30. {
  31.     u8 totaol ,i ,add;
  32.     totaol = inBuf[0];
  33.     add = inBuf[1];
  34.     u16 time = inBuf[2]<<8|inBuf[3];
  35.     for(i =0 ; i != totaol ; i++)
  36.         {
  37.         if(esmSta[add].dat[i].fun != NULL)
  38.             {
  39.             esmSta[add].dat[i].fun = fun ;
  40.             esmSta[add].dat[i].time = time ;
  41.             esmSta[add].totalNum++;
  42.             }
  43.         }
  44. }

  45. /* 事件結(jié)構(gòu)體初始化
  46. 0 - 本事件總量
  47. 1- 寫入地址

  48. */
  49. void esmEventInit(u8 *inBuf ,u8 (*fun)(void))
  50. {
  51.     u8 totaol ,i ,add;
  52.     totaol = inBuf[0];
  53.     add = inBuf[1];
  54.     for(i =0 ; i != totaol ; i++)
  55.         {
  56.         if(esmSta[add].dat[i].fun != NULL)
  57.             {
  58.             esmSta[add].dat[i].fun = fun ;
  59.             esmSta[add].dat[i].time = 0xffff ;
  60.             esmSta[add].totalNum++;
  61.             }
  62.         }
  63. }

  64. /* 事件狀態(tài)機(jī)時間鉤子函數(shù)

  65. */
  66. void esmTimeHookFun(void)
  67. {
  68.     esmSysTime++;
  69. }

  70. void esmTimeCheck(u8 i ,u8 step)
  71. {
  72.     if(  esmSysTime - esmSta[i].dat[step].recordTime >= esmSta[i].dat[step].time)
  73.         {
  74.         esmSta[i].dat[step].fun();
  75.         esmSta[i].nextStepId++;  /* 時間順序結(jié)構(gòu)體要求step by step */
  76.         esmSta[i].dat[step].recordTime = 0;
  77.         }
  78. }

  79. void esmEventCheck(u8 i ,u8 step)
  80. {
  81. u8 next ;
  82.    next =esmSta[i].dat[step].fun();
  83.    if(next != esmWaiteStell)
  84.        {
  85.        esmSta[i].nextStepId = next ;
  86.        }
  87. }
  88. void  esmEventRunSta(void)
  89. {
  90.     u8 i ;
  91.     u8 step ;
  92.     for(i = 0 ; i!= emsNum ; i++)
  93.         {
  94.         step = esmSta[i].nextStepId ;
  95.         if(esmSta[i].dat[step].time != 0xffff)
  96.             {
  97.             //啟動延時數(shù)秒
  98.             if(esmSta[i].dat[step].recordTime == 0)
  99.                 {
  100.                 esmSta[i].dat[step].recordTime = esmSysTime ;
  101.                 }
  102.             else
  103.                 {
  104.                 esmTimeCheck(i, step);
  105.                 }
  106.             }
  107.         else
  108.             {
  109.             //事件參考執(zhí)行
  110.                 esmEventCheck(i, step);
  111.             }
  112.         //恢復(fù)開始從新執(zhí)行
  113.         if(esmSta[i].totalNum == step)
  114.             {
  115.             esmSta[i].nextStepId = 0;
  116.             }
  117.         }
  118. }



  119. //測試驗(yàn)證
  120. u8  esmTestFun1(void)
  121. {
  122.     static  u8 ii;
  123.     ii  = esmSysTime ;
  124.     return 0;
  125. }

  126. u8 esmTestFun2(void)
  127. {
  128.     if(esmSysTime == 10)
  129.         {
  130.         return esmStepPlus ;
  131.         }
  132.     else
  133.         {
  134.         return esmWaiteStell ;
  135.         }
  136. }




  137. //測試驗(yàn)證
  138. u8  esmTestFun3(void)
  139. {
  140.     static  u8 iii;
  141.     iii  = esmSysTime ;
  142.     return 0;
  143. }

  144. /* 初始化順序就是執(zhí)行的順序 */
  145. void  esmTest(void)
  146. {
  147. u8 inBuf[5];
  148.     inBuf[0] = eventNum ;
  149.     inBuf[1] = esmStructInit(eventDisc);
  150.     inBuf[2] = 0x00 ;
  151.     inBuf[3] = 8;
  152.     esmTimeInit( inBuf, &esmTestFun1);
  153.     esmEventInit( inBuf, &esmTestFun2);
  154.     esmTimeInit( inBuf, &esmTestFun3);

  155.     while(1)
  156.         {
  157.         esmEventRunSta();
  158.         esmTimeHookFun();
  159.         }
  160. }


  161. #ifndef __eventStateMachine_H
  162. #define __eventStateMachine_H
  163. #include "stm32f10x.h"
  164. /* Scheduler includes. */
  165. #include "FreeRTOS.h"
  166. #include "task.h"
  167. #include"pBase.h"

  168. #define  emsNum 3  /* 申請多個事件狀態(tài)機(jī) */
  169. #define  eventNum 4
  170. typedef struct
  171. {
  172.   u8 id ;
  173.   u8 (*fun)(void);
  174.   u16 time; /* 延時時間 */
  175.   u16 recordTime ;
  176. }event_disc;

  177. typedef struct
  178. {
  179.   u8 stepId ;
  180.   u8 nextStepId ;
  181.   u8 usedFlag :1; /* 使用標(biāo)記 */
  182.   u8 totalNum ;
  183.   event_disc *dat;
  184. }esm_sta;


  185. #define  esmWaiteStell 0xff /* 繼續(xù)等待 */
  186. #define  esmStepPlus  0xfe  /* 下一步操作 */
  187. void  esmTest(void);
  188. #endif
復(fù)制代碼








歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1