test/statechart1.rl

   1 /*
   2  * @LANG: c
   3  */
   4
   5 /*
   6  * Test in and out state actions.
   7  */
   8
   9 #include <stdio.h>
  10 #include <string.h>
  11
  12 struct state_chart
  13 {
  14         int cs;
  15 };
  16
  17 %%{
  18         machine state_chart;
  19         variable curstate fsm->cs;
  20
  21         action a { printf("a"); }
  22         action b { printf("b"); }
  23         action hexa { printf("a"); }
  24         action hexb { printf("b"); }
  25
  26         hex_a = '0x' '0'* '61' @hexa;
  27         hex_b = '0x' '0'* '62' @hexb;
  28
  29         a = 'a' @a | hex_a;
  30         b = 'b' @b | hex_b;
  31         ws = ' '+;
  32
  33         mach =
  34                 start: (
  35                         a -> st1 |
  36                         b -> st2 |
  37                         zlen -> final
  38                 ),
  39                 st1: (
  40                         a -> st1 |
  41                         ws -> start |
  42                         zlen -> final
  43                 ),
  44                 st2: (
  45                         b -> st2 |
  46                         ws -> start |
  47                         zlen -> final
  48                 );
  49
  50         main := ( mach '\n' )*;
  51 }%%
  52
  53 %% write data;
  54
  55 void state_chart_init( struct state_chart *fsm )
  56 {
  57         %% write init;
  58 }
  59
  60 void state_chart_execute( struct state_chart *fsm, const char *_data, int _len )
  61 {
  62         const char *p = _data;
  63         const char *pe = _data+_len;
  64
  65         %% write exec;
  66 }
  67
  68 int state_chart_finish( struct state_chart *fsm )
  69 {
  70         %% write eof;
  71
  72         if ( fsm->cs == state_chart_error )
  73                 return -1;
  74         if ( fsm->cs >= state_chart_first_final )
  75                 return 1;
  76         return 0;
  77 }
  78
  79 struct state_chart sc;
  80
  81 void test( char *buf )
  82 {
  83         int len = strlen( buf );
  84         state_chart_init( &sc );
  85         state_chart_execute( &sc, buf, len );
  86         state_chart_finish( &sc );
  87         printf("\n");
  88 }
  89
  90 int main()
  91 {
  92         test(
  93                 "aa0x0061aa b\n"
  94                 "bbb0x62b 0x61 0x000062\n"
  95         );
  96
  97         return 0;
  98 }
  99
 100 #ifdef _____OUTPUT_____
 101 aaaaabbbbbbab
 102 #endif