The next little game in the series where I make a fancy rogue game.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 
roguish/ansi_parser.cpp

293 lines
5.6 KiB

#line 1 "ansi_parser.rl"
#include <fmt/core.h>
#include <string_view>
#include <charconv>
#include "dbc.hpp"
#include <SFML/Graphics.hpp>
#include "ansi_parser.hpp"
using namespace fmt;
#line 81 "ansi_parser.rl"
#line 13 "ansi_parser.cpp"
static const char _foo_actions[] = {
0, 1, 0, 1, 3, 1, 4, 1,
5, 1, 6, 1, 7, 1, 11, 1,
12, 2, 1, 8, 2, 1, 9, 2,
12, 5, 3, 1, 10, 2
};
static const char _foo_key_offsets[] = {
0, 0, 1, 2, 4, 6, 7, 8,
9, 11, 14, 16, 19, 21, 24, 25,
27, 28, 29, 30, 31
};
static const int _foo_trans_keys[] = {
27, 91, 51, 52, 56, 57, 59, 50,
59, 48, 57, 59, 48, 57, 48, 57,
59, 48, 57, 48, 57, 109, 48, 57,
109, 56, 57, 59, 50, 109, 27, 27,
0
};
static const char _foo_single_lengths[] = {
0, 1, 1, 2, 2, 1, 1, 1,
0, 1, 0, 1, 0, 1, 1, 2,
1, 1, 1, 1, 1
};
static const char _foo_range_lengths[] = {
0, 0, 0, 0, 0, 0, 0, 0,
1, 1, 1, 1, 1, 1, 0, 0,
0, 0, 0, 0, 0
};
static const char _foo_index_offsets[] = {
0, 0, 2, 4, 7, 10, 12, 14,
16, 18, 21, 23, 26, 28, 31, 33,
36, 38, 40, 42, 44
};
static const char _foo_trans_targs[] = {
2, 1, 3, 0, 4, 15, 0, 5,
14, 0, 6, 0, 7, 0, 8, 0,
9, 0, 10, 9, 0, 11, 0, 12,
11, 0, 13, 0, 20, 13, 0, 20,
0, 16, 18, 0, 17, 0, 7, 0,
20, 0, 2, 1, 2, 1, 0
};
static const char _foo_trans_actions[] = {
0, 7, 0, 0, 13, 13, 0, 0,
0, 0, 0, 0, 3, 0, 0, 0,
1, 0, 17, 0, 0, 1, 0, 20,
0, 0, 1, 0, 26, 0, 0, 9,
0, 0, 0, 0, 0, 0, 5, 0,
11, 0, 0, 7, 15, 23, 0
};
static const char _foo_eof_actions[] = {
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 0, 15
};
static const int foo_start = 19;
static const int foo_first_final = 19;
static const int foo_error = 0;
static const int foo_en_main = 19;
#line 84 "ansi_parser.rl"
bool parse_ansi(std::wstring_view codes, sf::Color default_fg, sf::Color default_bg, WriteCB write) {
const wchar_t *start = NULL;
int cs = 0;
unsigned int value = 0;
const wchar_t *p = codes.data();
const wchar_t *pe = p + codes.size();
const wchar_t *eof = pe;
sf::Color bgcolor(default_bg);
sf::Color color(default_fg);
sf::Color &target = color;
#line 94 "ansi_parser.cpp"
{
cs = foo_start;
}
#line 97 "ansi_parser.rl"
#line 97 "ansi_parser.cpp"
{
int _klen;
unsigned int _trans;
const char *_acts;
unsigned int _nacts;
const int *_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 int *_lower = _keys;
const int *_mid;
const int *_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 int *_lower = _keys;
const int *_mid;
const int *_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:
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 14 "ansi_parser.rl"
{
start = p;
}
break;
case 1:
#line 18 "ansi_parser.rl"
{
value = 0;
size_t len = p - start;
dbc::check(start[0] != '-', "negative numbers not supported");
switch(len) {
case 10: value += (start[len-10] - '0') * 1000000000;
case 9: value += (start[len- 9] - '0') * 100000000;
case 8: value += (start[len- 8] - '0') * 10000000;
case 7: value += (start[len- 7] - '0') * 1000000;
case 6: value += (start[len- 6] - '0') * 100000;
case 5: value += (start[len- 5] - '0') * 10000;
case 4: value += (start[len- 4] - '0') * 1000;
case 3: value += (start[len- 3] - '0') * 100;
case 2: value += (start[len- 2] - '0') * 10;
case 1: value += (start[len- 1] - '0');
break;
default:
dbc::sentinel("can't process > 10 digits");
}
}
break;
case 2:
#line 40 "ansi_parser.rl"
{ }
break;
case 3:
#line 41 "ansi_parser.rl"
{
target = color;
}
break;
case 4:
#line 44 "ansi_parser.rl"
{
target = bgcolor;
}
break;
case 5:
#line 48 "ansi_parser.rl"
{
write(bgcolor, color, (*p));
}
break;
case 6:
#line 52 "ansi_parser.rl"
{ color = default_fg; }
break;
case 7:
#line 53 "ansi_parser.rl"
{ bgcolor = default_bg; }
break;
case 8:
#line 55 "ansi_parser.rl"
{ target.r = value; }
break;
case 9:
#line 56 "ansi_parser.rl"
{ target.g = value; }
break;
case 10:
#line 57 "ansi_parser.rl"
{ target.b = value; }
break;
case 11:
#line 58 "ansi_parser.rl"
{ value = 0; }
break;
case 12:
#line 59 "ansi_parser.rl"
{ }
break;
#line 236 "ansi_parser.cpp"
}
}
_again:
if ( cs == 0 )
goto _out;
if ( ++p != pe )
goto _resume;
_test_eof: {}
if ( p == eof )
{
const char *__acts = _foo_actions + _foo_eof_actions[cs];
unsigned int __nacts = (unsigned int) *__acts++;
while ( __nacts-- > 0 ) {
switch ( *__acts++ ) {
case 12:
#line 59 "ansi_parser.rl"
{ }
break;
#line 254 "ansi_parser.cpp"
}
}
}
_out: {}
}
#line 98 "ansi_parser.rl"
return p - pe == 0;
}