Basic ragel test that can parse 1 ASNI sequence and do nothing with it.

scratchpad/testragel.cpp

@@ -0,0 +1,182 @@
+
+#line 1 ".\\scratchpad\\testragel.rl"
+#include <fmt/core.h>
+
+using namespace fmt;
+
+
+#line 14 ".\\scratchpad\\testragel.rl"
+
+
+
+#line 8 ".\\scratchpad\\testragel.cpp"
+static const char _foo_actions[] = {
+	0, 1, 0, 1, 1, 1, 2
+};
+
+static const char _foo_key_offsets[] = {
+	0, 0, 1, 2, 4, 7, 9, 12, 
+	13
+};
+
+static const char _foo_trans_keys[] = {
+	27, 91, 48, 57, 59, 48, 57, 48, 
+	57, 109, 48, 57, 0, 0
+};
+
+static const char _foo_single_lengths[] = {
+	0, 1, 1, 0, 1, 0, 1, 1, 
+	0
+};
+
+static const char _foo_range_lengths[] = {
+	0, 0, 0, 1, 1, 1, 1, 0, 
+	0
+};
+
+static const char _foo_index_offsets[] = {
+	0, 0, 2, 4, 6, 9, 11, 14, 
+	16
+};
+
+static const char _foo_indicies[] = {
+	0, 1, 2, 1, 3, 1, 4, 3, 
+	1, 5, 1, 6, 5, 1, 7, 1, 
+	1, 0
+};
+
+static const char _foo_trans_targs[] = {
+	2, 0, 3, 4, 5, 6, 7, 8
+};
+
+static const char _foo_trans_actions[] = {
+	0, 0, 0, 1, 0, 3, 0, 5
+};
+
+static const int foo_start = 1;
+static const int foo_first_final = 8;
+static const int foo_error = 0;
+
+static const int foo_en_main = 1;
+
+
+#line 17 ".\\scratchpad\\testragel.rl"
+
+int main() {
+  int cs, res = 0;
+  char *test = "\x1B[36;46m";
+
+  char *p = test;
+  char *pe = p + strlen(p) + 1;
+  
+#line 64 ".\\scratchpad\\testragel.cpp"
+	{
+	cs = foo_start;
+	}
+
+#line 25 ".\\scratchpad\\testragel.rl"
+  
+#line 67 ".\\scratchpad\\testragel.cpp"
+	{
+	int _klen;
+	unsigned int _trans;
+	const char *_acts;
+	unsigned int _nacts;
+	const char *_keys;
+
+	if ( p == pe )
+		goto _test_eof;
+	if ( cs == 0 )
+		goto _out;
+_resume:
+	_keys = _foo_trans_keys + _foo_key_offsets[cs];
+	_trans = _foo_index_offsets[cs];
+
+	_klen = _foo_single_lengths[cs];
+	if ( _klen > 0 ) {
+		const char *_lower = _keys;
+		const char *_mid;
+		const char *_upper = _keys + _klen - 1;
+		while (1) {
+			if ( _upper < _lower )
+				break;
+
+			_mid = _lower + ((_upper-_lower) >> 1);
+			if ( (*p) < *_mid )
+				_upper = _mid - 1;
+			else if ( (*p) > *_mid )
+				_lower = _mid + 1;
+			else {
+				_trans += (unsigned int)(_mid - _keys);
+				goto _match;
+			}
+		}
+		_keys += _klen;
+		_trans += _klen;
+	}
+
+	_klen = _foo_range_lengths[cs];
+	if ( _klen > 0 ) {
+		const char *_lower = _keys;
+		const char *_mid;
+		const char *_upper = _keys + (_klen<<1) - 2;
+		while (1) {
+			if ( _upper < _lower )
+				break;
+
+			_mid = _lower + (((_upper-_lower) >> 1) & ~1);
+			if ( (*p) < _mid[0] )
+				_upper = _mid - 2;
+			else if ( (*p) > _mid[1] )
+				_lower = _mid + 2;
+			else {
+				_trans += (unsigned int)((_mid - _keys)>>1);
+				goto _match;
+			}
+		}
+		_trans += _klen;
+	}
+
+_match:
+	_trans = _foo_indicies[_trans];
+	cs = _foo_trans_targs[_trans];
+
+	if ( _foo_trans_actions[_trans] == 0 )
+		goto _again;
+
+	_acts = _foo_actions + _foo_trans_actions[_trans];
+	_nacts = (unsigned int) *_acts++;
+	while ( _nacts-- > 0 )
+	{
+		switch ( *_acts++ )
+		{
+	case 0:
+#line 9 ".\\scratchpad\\testragel.rl"
+	{ println("NUM1"); }
+	break;
+	case 1:
+#line 11 ".\\scratchpad\\testragel.rl"
+	{ println("NUM2"); }
+	break;
+	case 2:
+#line 13 ".\\scratchpad\\testragel.rl"
+	{ res = 1; }
+	break;
+#line 149 ".\\scratchpad\\testragel.cpp"
+		}
+	}
+
+_again:
+	if ( cs == 0 )
+		goto _out;
+	if ( ++p != pe )
+		goto _resume;
+	_test_eof: {}
+	_out: {}
+	}
+
+#line 26 ".\\scratchpad\\testragel.rl"
+
+  fmt::println("result = {}", res);
+  return 0;
+}

scratchpad/testragel.rl

@@ -0,0 +1,29 @@
+#include <fmt/core.h>
+
+using namespace fmt;
+
+%%{
+  machine foo;
+  main :=
+      0x1B "["
+      [0-9]+ @{ println("NUM1"); }
+      ";"
+      [0-9]+ @{ println("NUM2"); }
+      "m"
+      0 @{ res = 1; };
+}%%
+
+%% write data;
+
+int main() {
+  int cs, res = 0;
+  char *test = "\x1B[36;46m";
+
+  char *p = test;
+  char *pe = p + strlen(p) + 1;
+  %% write init;
+  %% write exec;
+
+  fmt::println("result = {}", res);
+  return 0;
+}