parent
e8f3c4d0ff
commit
fd6587d2bb
@ -0,0 +1,3 @@ |
||||
#!/bin/bash |
||||
|
||||
ragel -L -G0 user/ansi_parser.rl -o user/ansi_parser.c |
@ -1 +1 @@ |
||||
<!doctype html><meta charset=utf-8><title>ESP8266 Remote Terminal</title><meta name=viewport content="width=device-width,shrink-to-fit=no,user-scalable=no,initial-scale=1,maximum-scale=1,minimum-scale=1"><link rel=stylesheet href=style.css><script src=script.js></script><header>ESP8266 Remote Terminal</header><div id=screen></div><div id=buttons><button>1</button><button>2</button><button>3</button><button>4</button></div><script>init()</script> |
||||
<!doctype html><meta charset=utf-8><title>ESP8266 Remote Terminal</title><meta name=viewport content="width=device-width,shrink-to-fit=no,user-scalable=no,initial-scale=1,maximum-scale=1,minimum-scale=1"><link rel=stylesheet href=style.css><script src=script.js></script><header>ESP8266 Remote Terminal</header><div id=screen></div><div id=buttons><button>1</button><button>2</button><button>3</button><button>4</button></div><script>init(%screenData%)</script> |
@ -1 +1 @@ |
||||
var $=function(d,c){d=d.match(/^(\W)?(.*)/);return(c||document)["getElement"+(d[1]?d[1]=="#"?"ById":"sByClassName":"sByTagName")](d[2])};var m=function(e,d,f){d=document;f=d.createElement("p");f.innerHTML=e;e=d.createDocumentFragment();while(d=f.firstChild){e.appendChild(d)}return e};(function(){function a(r){return document.createElement(r)}var b=26,k=10;var l={a:false,x:0,y:0,suppress:false,hidden:false};var o=[];var g=["#111213","#CC0000","#4E9A06","#C4A000","#3465A4","#75507B","#06989A","#D3D7CF","#555753","#EF2929","#8AE234","#FCE94F","#729FCF","#AD7FA8","#34E2E2","#EEEEEC"];function p(){o.forEach(function(r,s){r.t=" ";r.fg=7;r.bg=0;d(r)})}function c(s,r){return o[s*b+r]}function i(){return c(l.y,l.x)}function q(r){l.hidden=!r;l.a&=r;d(i(),l.a)}function f(s,r){l.suppress=true;d(i(),false);l.x=r;l.y=s;l.suppress=false;d(i(),l.a)}function d(s,r){var v=s.e,t,u;t=r?s.bg:s.fg;u=r?s.fg:s.bg;v.innerText=(s.t+" ")[0];v.style.color=e(t);v.style.backgroundColor=e(u);v.style.fontWeight=t>7?"bold":"normal"}function h(){o.forEach(function(s,t){var r=l.a&&(t==l.y*b+l.x);d(s,r)})}function j(s){if(s.length!=b*k*3){throw"Bad data format."}for(var t=0;t<b*k;t++){var r=o[t];r.t=s[t*3];r.fg=parseInt(s[t*3+1],16);r.bg=parseInt(s[t*3+2],16)}h()}function e(r){var r=parseInt(r);if(r<0||r>15){r=0}return g[r]}function n(){var u,t=$("#screen");for(var s=0;s<b*k;s++){u=a("span");if((s>0)&&(s%b==0)){t.appendChild(a("br"))}t.appendChild(u);var r={t:" ",fg:7,bg:0,e:u};o.push(r);d(r)}setInterval(function(){l.a=!l.a;if(l.hidden){l.a=false}if(!l.suppress){d(i(),l.a)}},500)}window.Term={init:n,load:j,setCursor:f,enableCursor:q,clear:p}})();(function(){var g="ws://"+window.location.host+"/ws/update.cgi";var d;function c(i){console.log("CONNECTED")}function b(i){console.error("SOCKET CLOSED")}function f(i){console.log("Message received!",i.data)}function e(i){console.error(i.data)}function a(i){d.send(i)}function h(){d=new WebSocket(g);d.onopen=c;d.onclose=b;d.onmessage=f;d.onerror=e;console.log("Opening socket.")}window.Conn={ws:null,init:h}})();function init(){Term.init();Conn.init()}; |
||||
var $=function(d,c){d=d.match(/^(\W)?(.*)/);return(c||document)["getElement"+(d[1]?d[1]=="#"?"ById":"sByClassName":"sByTagName")](d[2])};var m=function(e,d,f){d=document;f=d.createElement("p");f.innerHTML=e;e=d.createDocumentFragment();while(d=f.firstChild){e.appendChild(d)}return e};(function(){function a(r){return document.createElement(r)}var b=26,k=10;var l={a:false,x:0,y:0,suppress:false,hidden:false};var o=[];var g=["#111213","#CC0000","#4E9A06","#C4A000","#3465A4","#75507B","#06989A","#D3D7CF","#555753","#EF2929","#8AE234","#FCE94F","#729FCF","#AD7FA8","#34E2E2","#EEEEEC"];function p(){o.forEach(function(r,s){r.t=" ";r.fg=7;r.bg=0;d(r)})}function c(s,r){return o[s*b+r]}function i(){return c(l.y,l.x)}function q(r){l.hidden=!r;l.a&=r;d(i(),l.a)}function f(s,r){l.suppress=true;d(i(),false);l.x=r;l.y=s;l.suppress=false;d(i(),l.a)}function d(s,r){var v=s.e,t,u;t=r?s.bg:s.fg;u=r?s.fg:s.bg;v.innerText=(s.t+" ")[0];v.style.color=e(t);v.style.backgroundColor=e(u);v.style.fontWeight=t>7?"bold":"normal"}function h(){o.forEach(function(s,t){var r=l.a&&(t==l.y*b+l.x);d(s,r)})}function j(u){l.x=u.x;l.y=u.y;var v=0,B=0,x=u.screen;var r,w,A,z,s,y;while(v<x.length&&B<b*k){z=o[B++];r=z.fg=parseInt(x[v++],16);w=z.bg=parseInt(x[v++],16);A=z.t=x[v++];switch(x[v]){case"r":s=1;break;case"s":s=2;break;case"t":s=3;break;case"u":s=4;break;default:s=0}if(s>0){y=parseInt(x.substr(v+1,s));v=v+s+1;for(;y>0&&B<b*k;y--){z=o[B++];z.fg=r;z.bg=w;z.t=A}}}h()}function e(r){r=parseInt(r);if(r<0||r>15){r=0}return g[r]}function n(v){var u,r,t=$("#screen");for(var s=0;s<b*k;s++){u=a("span");if((s>0)&&(s%b==0)){t.appendChild(a("br"))}t.appendChild(u);r={t:" ",fg:7,bg:0,e:u};o.push(r);d(r)}setInterval(function(){l.a=!l.a;if(l.hidden){l.a=false}if(!l.suppress){d(i(),l.a)}},500);j(v)}window.Term={init:n,load:j,setCursor:f,enableCursor:q,clear:p}})();(function(){var g="ws://"+window.location.host+"/ws/update.cgi";var d;function c(i){console.log("CONNECTED")}function b(i){console.error("SOCKET CLOSED")}function f(i){try{Term.load(JSON.parse(i.data))}catch(j){console.error(j)}}function e(i){console.error(i.data)}function a(i){if(typeof i!="string"){i=JSON.stringify(i)}d.send(i)}function h(){d=new WebSocket(g);d.onopen=c;d.onclose=b;d.onmessage=f;d.onerror=e;console.log("Opening socket.")}window.Conn={ws:null,init:h,send:a}})();function init(a){Term.init(a);Conn.init()}; |
@ -0,0 +1,447 @@ |
||||
|
||||
/* #line 1 "user/ansi_parser.rl" */ |
||||
#include <esp8266.h> |
||||
#include "screen.h" |
||||
#include "ansi_parser.h" |
||||
|
||||
// Max nr of CSI parameters
|
||||
#define CSI_N_MAX 3 |
||||
|
||||
/**
|
||||
* \brief Handle fully received CSI ANSI sequence |
||||
* \param leadchar - private range leading character, 0 if none |
||||
* \param params - array of CSI_N_MAX ints holding the numeric arguments |
||||
* \param keychar - the char terminating the sequence |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
handle_CSI(char leadchar, int *params, char keychar) |
||||
{ |
||||
/*
|
||||
Implemented codes (from Wikipedia) |
||||
|
||||
CSI n A CUU – Cursor Up |
||||
CSI n B CUD – Cursor Down |
||||
CSI n C CUF – Cursor Forward |
||||
CSI n D CUB – Cursor Back |
||||
CSI n E CNL – Cursor Next Line |
||||
CSI n F CPL – Cursor Previous Line |
||||
CSI n G CHA – Cursor Horizontal Absolute |
||||
CSI n ; m H CUP – Cursor Position |
||||
CSI n J ED – Erase Display |
||||
CSI n K EL – Erase in Line |
||||
CSI n S SU – Scroll Up |
||||
CSI n T SD – Scroll Down |
||||
CSI n ; m f HVP – Horizontal and Vertical Position |
||||
CSI n m SGR – Select Graphic Rendition (Implemented only some) |
||||
CSI 6n DSR – Device Status Report NOT IMPL |
||||
CSI s SCP – Save Cursor Position |
||||
CSI u RCP – Restore Cursor Position |
||||
CSI ?25l DECTCEM Hides the cursor |
||||
CSI ?25h DECTCEM Shows the cursor |
||||
*/ |
||||
|
||||
int n1 = params[0]; |
||||
int n2 = params[1]; |
||||
// int n3 = params[2];
|
||||
|
||||
// defaults
|
||||
switch (keychar) { |
||||
case 'A': |
||||
case 'B': |
||||
case 'C': |
||||
case 'D': |
||||
case 'E': |
||||
case 'F': |
||||
case 'G': |
||||
case 'S': |
||||
case 'T': |
||||
if (n1 == 0) n1 = 1; |
||||
break; |
||||
|
||||
case 'H': |
||||
case 'f': |
||||
if (n1 == 0) n1 = 1; |
||||
if (n2 == 0) n2 = 1; |
||||
break; |
||||
|
||||
case 'J': |
||||
case 'K': |
||||
if (n1 > 2) n1 = 0; |
||||
break; |
||||
} |
||||
|
||||
switch (keychar) { |
||||
// CUU CUD CUF CUB
|
||||
case 'A': screen_cursor_move(0, -n1); break; |
||||
case 'B': screen_cursor_move(0, n1); break; |
||||
case 'C': screen_cursor_move(n1, 0); break; |
||||
case 'D': screen_cursor_move(-n1, 0); break; |
||||
|
||||
case 'E': // CNL
|
||||
screen_cursor_move(0, n1); |
||||
screen_cursor_set_x(0); |
||||
break; |
||||
|
||||
case 'F': // CPL
|
||||
screen_cursor_move(0, -n1); |
||||
screen_cursor_set_x(0); |
||||
break; |
||||
|
||||
// CHA
|
||||
case 'G': |
||||
screen_cursor_set_x(n1 - 1); break; // 1-based
|
||||
|
||||
// SU, SD
|
||||
case 'S': screen_scroll_up(n1); break; |
||||
case 'T': screen_scroll_down(n1); break; |
||||
|
||||
// CUP,HVP
|
||||
case 'H': |
||||
case 'f': |
||||
screen_cursor_set(n2-1, n1-1); break; // 1-based
|
||||
|
||||
case 'J': // ED
|
||||
if (n1 == 0) { |
||||
screen_clear(CLEAR_TO_CURSOR); |
||||
} else if (n1 == 1) { |
||||
screen_clear(CLEAR_FROM_CURSOR); |
||||
} else { |
||||
screen_clear(CLEAR_ALL); |
||||
screen_cursor_set(0, 0); |
||||
} |
||||
break; |
||||
|
||||
case 'K': // EL
|
||||
if (n1 == 0) { |
||||
screen_clear_line(CLEAR_TO_CURSOR); |
||||
} else if (n1 == 1) { |
||||
screen_clear_line(CLEAR_FROM_CURSOR); |
||||
} else { |
||||
screen_clear_line(CLEAR_ALL); |
||||
screen_cursor_set_x(0); |
||||
} |
||||
break; |
||||
|
||||
// SCP, RCP
|
||||
case 's': screen_cursor_save(); break; |
||||
case 'u': screen_cursor_restore(); break; |
||||
|
||||
// DECTCEM cursor show hide
|
||||
case 'l': |
||||
if (leadchar == '?' && n1 == 25) { |
||||
screen_cursor_enable(1); |
||||
} |
||||
break; |
||||
|
||||
case 'h': |
||||
if (leadchar == '?' && n1 == 25) { |
||||
screen_cursor_enable(0); |
||||
} |
||||
break; |
||||
|
||||
case 'm': // SGR
|
||||
// iterate arguments
|
||||
for (int i = 0; i < CSI_N_MAX; i++) { |
||||
int n = params[i]; |
||||
|
||||
if (i == 0 && n == 0) { // reset SGR
|
||||
screen_set_fg(7); |
||||
screen_set_bg(0); |
||||
break; // cannot combine reset with others
|
||||
} |
||||
else if (n >= 30 && n <= 37) screen_set_fg(n-30); // ANSI normal fg
|
||||
else if (n >= 40 && n <= 47) screen_set_bg(n-40); // ANSI normal bg
|
||||
else if (n == 39) screen_set_fg(7); // default fg
|
||||
else if (n == 49) screen_set_bg(0); // default bg
|
||||
else if (n == 7) screen_inverse(1); // inverse
|
||||
else if (n == 27) screen_inverse(0); // positive
|
||||
else if (n == 1) screen_set_bright_fg(); // ANSI bold = bright fg
|
||||
else if (n >= 90 && n <= 97) screen_set_fg(n-90+8); // AIX bright fg
|
||||
else if (n >= 100 && n <= 107) screen_set_bg(n-100+8); // AIX bright bg
|
||||
} |
||||
break; |
||||
} |
||||
} |
||||
|
||||
/**
|
||||
* \brief Handle a request to reset the display device |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
handle_RESET_cmd(void) |
||||
{ |
||||
screen_reset(); |
||||
} |
||||
|
||||
/**
|
||||
* \brief Handle a received plain character |
||||
* \param c - the character |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
handle_plainchar(char c) |
||||
{ |
||||
screen_putchar(c); |
||||
} |
||||
|
||||
/* Ragel constants block */ |
||||
|
||||
/* #line 188 "user/ansi_parser.c" */ |
||||
static const char _ansi_actions[] = { |
||||
0, 1, 0, 1, 1, 1, 2, 1,
|
||||
3, 1, 4, 1, 5, 1, 6, 1,
|
||||
7, 1, 8 |
||||
}; |
||||
|
||||
static const char _ansi_eof_actions[] = { |
||||
0, 0, 0, 13, 13, 0, 0 |
||||
}; |
||||
|
||||
static const int ansi_start = 1; |
||||
static const int ansi_first_final = 5; |
||||
static const int ansi_error = 0; |
||||
|
||||
static const int ansi_en_CSI_body = 3; |
||||
static const int ansi_en_main = 1; |
||||
|
||||
|
||||
/* #line 187 "user/ansi_parser.rl" */ |
||||
|
||||
|
||||
/**
|
||||
* \brief Linear ANSI chars stream parser |
||||
* |
||||
* Parses a stream of bytes using a Ragel parser. The defined |
||||
* grammar does not use 'unget', so the entire buffer is |
||||
* always processed in a linear manner. |
||||
* |
||||
* \attention -> but always check the Ragel output for 'p--' |
||||
* or 'p -=', that means trouble. |
||||
* |
||||
* \param newdata - array of new chars to process |
||||
* \param len - length of the newdata buffer |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
ansi_parser(const char *newdata, size_t len) |
||||
{ |
||||
static int cs = -1; |
||||
|
||||
// The CSI code is built here
|
||||
static char csi_leading; //!< Leading char, 0 if none
|
||||
static int csi_ni; //!< Number of the active digit
|
||||
static int csi_n[CSI_N_MAX]; //!< Param digits
|
||||
static char csi_char; //!< CSI action char (end)
|
||||
|
||||
if (len == 0) len = strlen(newdata); |
||||
|
||||
// Load new data to Ragel vars
|
||||
const char *p = newdata; |
||||
const char *eof = NULL; |
||||
const char *pe = newdata + len; |
||||
|
||||
// Init Ragel on the first run
|
||||
if (cs == -1) { |
||||
|
||||
/* #line 244 "user/ansi_parser.c" */ |
||||
{ |
||||
cs = ansi_start; |
||||
} |
||||
|
||||
/* #line 223 "user/ansi_parser.rl" */ |
||||
} |
||||
|
||||
// The parser
|
||||
|
||||
/* #line 254 "user/ansi_parser.c" */ |
||||
{ |
||||
const char *_acts; |
||||
unsigned int _nacts; |
||||
|
||||
if ( p == pe ) |
||||
goto _test_eof; |
||||
if ( cs == 0 ) |
||||
goto _out; |
||||
_resume: |
||||
switch ( cs ) { |
||||
case 1: |
||||
if ( (*p) == 27 ) |
||||
goto tr1; |
||||
goto tr0; |
||||
case 2: |
||||
switch( (*p) ) { |
||||
case 91: goto tr2; |
||||
case 93: goto tr4; |
||||
case 99: goto tr5; |
||||
} |
||||
goto tr3; |
||||
case 0: |
||||
goto _out; |
||||
case 5: |
||||
if ( (*p) == 27 ) |
||||
goto tr1; |
||||
goto tr0; |
||||
case 3: |
||||
if ( (*p) == 59 ) |
||||
goto tr9; |
||||
if ( (*p) < 60 ) { |
||||
if ( (*p) > 47 ) { |
||||
if ( 48 <= (*p) && (*p) <= 57 ) |
||||
goto tr8; |
||||
} else if ( (*p) >= 32 ) |
||||
goto tr7; |
||||
} else if ( (*p) > 64 ) { |
||||
if ( (*p) > 90 ) { |
||||
if ( 97 <= (*p) && (*p) <= 122 ) |
||||
goto tr10; |
||||
} else if ( (*p) >= 65 ) |
||||
goto tr10; |
||||
} else |
||||
goto tr7; |
||||
goto tr6; |
||||
case 4: |
||||
if ( (*p) == 59 ) |
||||
goto tr9; |
||||
if ( (*p) < 65 ) { |
||||
if ( 48 <= (*p) && (*p) <= 57 ) |
||||
goto tr8; |
||||
} else if ( (*p) > 90 ) { |
||||
if ( 97 <= (*p) && (*p) <= 122 ) |
||||
goto tr10; |
||||
} else |
||||
goto tr10; |
||||
goto tr6; |
||||
case 6: |
||||
goto tr6; |
||||
} |
||||
|
||||
tr3: cs = 0; goto _again; |
||||
tr6: cs = 0; goto f4; |
||||
tr0: cs = 1; goto f0; |
||||
tr1: cs = 2; goto _again; |
||||
tr7: cs = 4; goto f5; |
||||
tr8: cs = 4; goto f6; |
||||
tr9: cs = 4; goto f7; |
||||
tr2: cs = 5; goto f1; |
||||
tr4: cs = 5; goto f2; |
||||
tr5: cs = 5; goto f3; |
||||
tr10: cs = 6; goto f8; |
||||
|
||||
f0: _acts = _ansi_actions + 1; goto execFuncs; |
||||
f1: _acts = _ansi_actions + 3; goto execFuncs; |
||||
f5: _acts = _ansi_actions + 5; goto execFuncs; |
||||
f6: _acts = _ansi_actions + 7; goto execFuncs; |
||||
f7: _acts = _ansi_actions + 9; goto execFuncs; |
||||
f8: _acts = _ansi_actions + 11; goto execFuncs; |
||||
f4: _acts = _ansi_actions + 13; goto execFuncs; |
||||
f2: _acts = _ansi_actions + 15; goto execFuncs; |
||||
f3: _acts = _ansi_actions + 17; goto execFuncs; |
||||
|
||||
execFuncs: |
||||
_nacts = *_acts++; |
||||
while ( _nacts-- > 0 ) { |
||||
switch ( *_acts++ ) { |
||||
case 0: |
||||
/* #line 233 "user/ansi_parser.rl" */ |
||||
{ |
||||
handle_plainchar((*p)); |
||||
} |
||||
break; |
||||
case 1: |
||||
/* #line 240 "user/ansi_parser.rl" */ |
||||
{ |
||||
/* Reset the CSI builder */ |
||||
csi_leading = csi_char = 0; |
||||
csi_ni = 0; |
||||
|
||||
/* Zero out digits */ |
||||
for(int i = 0; i < CSI_N_MAX; i++) { |
||||
csi_n[i] = 0; |
||||
} |
||||
|
||||
{cs = 3; goto _again;} |
||||
} |
||||
break; |
||||
case 2: |
||||
/* #line 253 "user/ansi_parser.rl" */ |
||||
{ |
||||
csi_leading = (*p); |
||||
} |
||||
break; |
||||
case 3: |
||||
/* #line 257 "user/ansi_parser.rl" */ |
||||
{ |
||||
/* x10 + digit */ |
||||
if (csi_ni < CSI_N_MAX) { |
||||
csi_n[csi_ni] = csi_n[csi_ni]*10 + ((*p) - '0'); |
||||
} |
||||
} |
||||
break; |
||||
case 4: |
||||
/* #line 264 "user/ansi_parser.rl" */ |
||||
{ |
||||
csi_ni++; |
||||
} |
||||
break; |
||||
case 5: |
||||
/* #line 268 "user/ansi_parser.rl" */ |
||||
{ |
||||
csi_char = (*p); |
||||
|
||||
handle_CSI(csi_leading, csi_n, csi_char); |
||||
|
||||
{cs = 1; goto _again;} |
||||
} |
||||
break; |
||||
case 6: |
||||
/* #line 276 "user/ansi_parser.rl" */ |
||||
{ |
||||
{cs = 1; goto _again;} |
||||
} |
||||
break; |
||||
case 7: |
||||
/* #line 288 "user/ansi_parser.rl" */ |
||||
{ |
||||
// TODO implement OS control code parsing
|
||||
{cs = 1; goto _again;} |
||||
} |
||||
break; |
||||
case 8: |
||||
/* #line 293 "user/ansi_parser.rl" */ |
||||
{ |
||||
// Reset screen
|
||||
handle_RESET_cmd(); |
||||
{cs = 1; goto _again;} |
||||
} |
||||
break; |
||||
/* #line 415 "user/ansi_parser.c" */ |
||||
} |
||||
} |
||||
goto _again; |
||||
|
||||
_again: |
||||
if ( cs == 0 ) |
||||
goto _out; |
||||
if ( ++p != pe ) |
||||
goto _resume; |
||||
_test_eof: {} |
||||
if ( p == eof ) |
||||
{ |
||||
const char *__acts = _ansi_actions + _ansi_eof_actions[cs]; |
||||
unsigned int __nacts = (unsigned int) *__acts++; |
||||
while ( __nacts-- > 0 ) { |
||||
switch ( *__acts++ ) { |
||||
case 6: |
||||
/* #line 276 "user/ansi_parser.rl" */ |
||||
{ |
||||
{cs = 1; goto _again;} |
||||
} |
||||
break; |
||||
/* #line 438 "user/ansi_parser.c" */ |
||||
} |
||||
} |
||||
} |
||||
|
||||
_out: {} |
||||
} |
||||
|
||||
/* #line 311 "user/ansi_parser.rl" */ |
||||
|
||||
} |
@ -0,0 +1,24 @@ |
||||
#ifndef ANSI_PARSER_H |
||||
#define ANSI_PARSER_H |
||||
|
||||
#include <stdlib.h> |
||||
|
||||
// Max nr of CSI parameters
|
||||
#define CSI_N_MAX 3 |
||||
|
||||
/**
|
||||
* \brief Linear ANSI chars stream parser |
||||
*
|
||||
* Parses a stream of bytes using a Ragel parser. The defined |
||||
* grammar does not use 'unget', so the entire buffer is
|
||||
* always processed in a linear manner. |
||||
*
|
||||
* \attention -> but always check the Ragel output for 'p--'
|
||||
* or 'p -=', that means trouble. |
||||
*
|
||||
* \param newdata - array of new chars to process |
||||
* \param len - length of the newdata buffer |
||||
*/ |
||||
void ansi_parser(const char *newdata, size_t len); |
||||
|
||||
#endif // ANSI_PARSER_H
|
@ -0,0 +1,312 @@ |
||||
#include <esp8266.h> |
||||
#include "screen.h" |
||||
#include "ansi_parser.h" |
||||
|
||||
// Max nr of CSI parameters |
||||
#define CSI_N_MAX 3 |
||||
|
||||
/** |
||||
* \brief Handle fully received CSI ANSI sequence |
||||
* \param leadchar - private range leading character, 0 if none |
||||
* \param params - array of CSI_N_MAX ints holding the numeric arguments |
||||
* \param keychar - the char terminating the sequence |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
handle_CSI(char leadchar, int *params, char keychar) |
||||
{ |
||||
/* |
||||
Implemented codes (from Wikipedia) |
||||
|
||||
CSI n A CUU – Cursor Up |
||||
CSI n B CUD – Cursor Down |
||||
CSI n C CUF – Cursor Forward |
||||
CSI n D CUB – Cursor Back |
||||
CSI n E CNL – Cursor Next Line |
||||
CSI n F CPL – Cursor Previous Line |
||||
CSI n G CHA – Cursor Horizontal Absolute |
||||
CSI n ; m H CUP – Cursor Position |
||||
CSI n J ED – Erase Display |
||||
CSI n K EL – Erase in Line |
||||
CSI n S SU – Scroll Up |
||||
CSI n T SD – Scroll Down |
||||
CSI n ; m f HVP – Horizontal and Vertical Position |
||||
CSI n m SGR – Select Graphic Rendition (Implemented only some) |
||||
CSI 6n DSR – Device Status Report NOT IMPL |
||||
CSI s SCP – Save Cursor Position |
||||
CSI u RCP – Restore Cursor Position |
||||
CSI ?25l DECTCEM Hides the cursor |
||||
CSI ?25h DECTCEM Shows the cursor |
||||
*/ |
||||
|
||||
int n1 = params[0]; |
||||
int n2 = params[1]; |
||||
// int n3 = params[2]; |
||||
|
||||
// defaults |
||||
switch (keychar) { |
||||
case 'A': |
||||
case 'B': |
||||
case 'C': |
||||
case 'D': |
||||
case 'E': |
||||
case 'F': |
||||
case 'G': |
||||
case 'S': |
||||
case 'T': |
||||
if (n1 == 0) n1 = 1; |
||||
break; |
||||
|
||||
case 'H': |
||||
case 'f': |
||||
if (n1 == 0) n1 = 1; |
||||
if (n2 == 0) n2 = 1; |
||||
break; |
||||
|
||||
case 'J': |
||||
case 'K': |
||||
if (n1 > 2) n1 = 0; |
||||
break; |
||||
} |
||||
|
||||
switch (keychar) { |
||||
// CUU CUD CUF CUB |
||||
case 'A': screen_cursor_move(0, -n1); break; |
||||
case 'B': screen_cursor_move(0, n1); break; |
||||
case 'C': screen_cursor_move(n1, 0); break; |
||||
case 'D': screen_cursor_move(-n1, 0); break; |
||||
|
||||
case 'E': // CNL |
||||
screen_cursor_move(0, n1); |
||||
screen_cursor_set_x(0); |
||||
break; |
||||
|
||||
case 'F': // CPL |
||||
screen_cursor_move(0, -n1); |
||||
screen_cursor_set_x(0); |
||||
break; |
||||
|
||||
// CHA |
||||
case 'G': |
||||
screen_cursor_set_x(n1 - 1); break; // 1-based |
||||
|
||||
// SU, SD |
||||
case 'S': screen_scroll_up(n1); break; |
||||
case 'T': screen_scroll_down(n1); break; |
||||
|
||||
// CUP,HVP |
||||
case 'H': |
||||
case 'f': |
||||
screen_cursor_set(n2-1, n1-1); break; // 1-based |
||||
|
||||
case 'J': // ED |
||||
if (n1 == 0) { |
||||
screen_clear(CLEAR_TO_CURSOR); |
||||
} else if (n1 == 1) { |
||||
screen_clear(CLEAR_FROM_CURSOR); |
||||
} else { |
||||
screen_clear(CLEAR_ALL); |
||||
screen_cursor_set(0, 0); |
||||
} |
||||
break; |
||||
|
||||
case 'K': // EL |
||||
if (n1 == 0) { |
||||
screen_clear_line(CLEAR_TO_CURSOR); |
||||
} else if (n1 == 1) { |
||||
screen_clear_line(CLEAR_FROM_CURSOR); |
||||
} else { |
||||
screen_clear_line(CLEAR_ALL); |
||||
screen_cursor_set_x(0); |
||||
} |
||||
break; |
||||
|
||||
// SCP, RCP |
||||
case 's': screen_cursor_save(); break; |
||||
case 'u': screen_cursor_restore(); break; |
||||
|
||||
// DECTCEM cursor show hide |
||||
case 'l': |
||||
if (leadchar == '?' && n1 == 25) { |
||||
screen_cursor_enable(1); |
||||
} |
||||
break; |
||||
|
||||
case 'h': |
||||
if (leadchar == '?' && n1 == 25) { |
||||
screen_cursor_enable(0); |
||||
} |
||||
break; |
||||
|
||||
case 'm': // SGR |
||||
// iterate arguments |
||||
for (int i = 0; i < CSI_N_MAX; i++) { |
||||
int n = params[i]; |
||||
|
||||
if (i == 0 && n == 0) { // reset SGR |
||||
screen_set_fg(7); |
||||
screen_set_bg(0); |
||||
break; // cannot combine reset with others |
||||
} |
||||
else if (n >= 30 && n <= 37) screen_set_fg(n-30); // ANSI normal fg |
||||
else if (n >= 40 && n <= 47) screen_set_bg(n-40); // ANSI normal bg |
||||
else if (n == 39) screen_set_fg(7); // default fg |
||||
else if (n == 49) screen_set_bg(0); // default bg |
||||
else if (n == 7) screen_inverse(1); // inverse |
||||
else if (n == 27) screen_inverse(0); // positive |
||||
else if (n == 1) screen_set_bright_fg(); // ANSI bold = bright fg |
||||
else if (n >= 90 && n <= 97) screen_set_fg(n-90+8); // AIX bright fg |
||||
else if (n >= 100 && n <= 107) screen_set_bg(n-100+8); // AIX bright bg |
||||
} |
||||
break; |
||||
} |
||||
} |
||||
|
||||
/** |
||||
* \brief Handle a request to reset the display device |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
handle_RESET_cmd(void) |
||||
{ |
||||
screen_reset(); |
||||
} |
||||
|
||||
/** |
||||
* \brief Handle a received plain character |
||||
* \param c - the character |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
handle_plainchar(char c) |
||||
{ |
||||
screen_putchar(c); |
||||
} |
||||
|
||||
/* Ragel constants block */ |
||||
%%{ |
||||
machine ansi; |
||||
write data; |
||||
}%% |
||||
|
||||
/** |
||||
* \brief Linear ANSI chars stream parser |
||||
* |
||||
* Parses a stream of bytes using a Ragel parser. The defined |
||||
* grammar does not use 'unget', so the entire buffer is |
||||
* always processed in a linear manner. |
||||
* |
||||
* \attention -> but always check the Ragel output for 'p--' |
||||
* or 'p -=', that means trouble. |
||||
* |
||||
* \param newdata - array of new chars to process |
||||
* \param len - length of the newdata buffer |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
ansi_parser(const char *newdata, size_t len) |
||||
{ |
||||
static int cs = -1; |
||||
|
||||
// The CSI code is built here |
||||
static char csi_leading; //!< Leading char, 0 if none |
||||
static int csi_ni; //!< Number of the active digit |
||||
static int csi_n[CSI_N_MAX]; //!< Param digits |
||||
static char csi_char; //!< CSI action char (end) |
||||
|
||||
if (len == 0) len = strlen(newdata); |
||||
|
||||
// Load new data to Ragel vars |
||||
const char *p = newdata; |
||||
const char *eof = NULL; |
||||
const char *pe = newdata + len; |
||||
|
||||
// Init Ragel on the first run |
||||
if (cs == -1) { |
||||
%% write init; |
||||
} |
||||
|
||||
// The parser |
||||
%%{ |
||||
ESC = 27; |
||||
NOESC = (any - ESC); |
||||
TOK_ST = ESC '\\'; # String terminator - used for OSC commands |
||||
|
||||
# --- Regular characters to be printed --- |
||||
|
||||
action plain_char { |
||||
handle_plainchar(fc); |
||||
} |
||||
|
||||
# --- CSI CSI commands (Select Graphic Rendition) --- |
||||
# Text color & style |
||||
|
||||
action CSI_start { |
||||
/* Reset the CSI builder */ |
||||
csi_leading = csi_char = 0; |
||||
csi_ni = 0; |
||||
|
||||
/* Zero out digits */ |
||||
for(int i = 0; i < CSI_N_MAX; i++) { |
||||
csi_n[i] = 0; |
||||
} |
||||
|
||||
fgoto CSI_body; |
||||
} |
||||
|
||||
action CSI_leading { |
||||
csi_leading = fc; |
||||
} |
||||
|
||||
action CSI_digit { |
||||
/* x10 + digit */ |
||||
if (csi_ni < CSI_N_MAX) { |
||||
csi_n[csi_ni] = csi_n[csi_ni]*10 + (fc - '0'); |
||||
} |
||||
} |
||||
|
||||
action CSI_semi { |
||||
csi_ni++; |
||||
} |
||||
|
||||
action CSI_end { |
||||
csi_char = fc; |
||||
|
||||
handle_CSI(csi_leading, csi_n, csi_char); |
||||
|
||||
fgoto main; |
||||
} |
||||
|
||||
action CSI_fail { |
||||
fgoto main; |
||||
} |
||||
|
||||
CSI_body := ((32..47|60..64) @CSI_leading)? |
||||
((digit @CSI_digit)* ';' @CSI_semi)* |
||||
(digit @CSI_digit)* alpha @CSI_end $!CSI_fail; |
||||
|
||||
|
||||
# --- OSC commands (Operating System Commands) --- |
||||
# Module parametrisation |
||||
|
||||
action OSC_start { |
||||
// TODO implement OS control code parsing |
||||
fgoto main; |
||||
} |
||||
|
||||
action RESET_cmd { |
||||
// Reset screen |
||||
handle_RESET_cmd(); |
||||
fgoto main; |
||||
} |
||||
|
||||
# --- Main parser loop --- |
||||
|
||||
main := |
||||
( |
||||
(NOESC @plain_char)* ESC ( |
||||
'[' @CSI_start | |
||||
']' @OSC_start | |
||||
'c' @RESET_cmd |
||||
) |
||||
)+; |
||||
|
||||
write exec; |
||||
}%% |
||||
} |
@ -0,0 +1,559 @@ |
||||
#include <esp8266.h> |
||||
#include <httpd.h> |
||||
#include "screen.h" |
||||
|
||||
//region Data structures
|
||||
|
||||
/**
|
||||
* Highest permissible value of the color attribute |
||||
*/ |
||||
#define COLOR_MAX 15 |
||||
|
||||
/**
|
||||
* Screen cell data type |
||||
*/ |
||||
typedef struct { |
||||
char c; |
||||
Color fg; |
||||
Color bg; |
||||
} Cell; |
||||
|
||||
/**
|
||||
* The screen data array |
||||
*/ |
||||
static Cell screen[MAX_SCREEN_SIZE]; |
||||
|
||||
/**
|
||||
* Cursor position and attributes |
||||
*/ |
||||
static struct { |
||||
Coordinate x; //!< X coordinate
|
||||
Coordinate y; //!< Y coordinate
|
||||
bool visible; //!< Visible
|
||||
bool inverse; //!< Inverse colors
|
||||
Color fg; //!< Foreground color for writing
|
||||
Color bg; //!< Background color for writing
|
||||
} cursor; |
||||
|
||||
/**
|
||||
* Saved cursor position, used with the SCP RCP commands |
||||
*/ |
||||
static struct { |
||||
Coordinate x; |
||||
Coordinate y; |
||||
} cursor_sav; |
||||
|
||||
/**
|
||||
* Active screen width |
||||
*/ |
||||
static Coordinate W = SCREEN_DEF_W; |
||||
|
||||
/**
|
||||
* Active screen height |
||||
*/ |
||||
static Coordinate H = SCREEN_DEF_H; |
||||
|
||||
//endregion
|
||||
|
||||
//region Helpers
|
||||
|
||||
/**
|
||||
* Reset a cell |
||||
*/ |
||||
static inline void |
||||
cell_init(Cell *cell) |
||||
{ |
||||
cell->c = ' '; |
||||
cell->fg = SCREEN_DEF_FG; |
||||
cell->bg = SCREEN_DEF_BG; |
||||
} |
||||
|
||||
/**
|
||||
* Clear range, inclusive |
||||
*/ |
||||
static inline void |
||||
clear_range(unsigned int from, unsigned int to) |
||||
{ |
||||
for (unsigned int i = from; i <= to; i++) { |
||||
cell_init(&screen[i]); |
||||
} |
||||
} |
||||
|
||||
/**
|
||||
* Reset the cursor position & colors |
||||
*/ |
||||
static void ICACHE_FLASH_ATTR |
||||
cursor_reset(void) |
||||
{ |
||||
cursor.x = 0; |
||||
cursor.y = 0; |
||||
cursor.fg = SCREEN_DEF_FG; |
||||
cursor.bg = SCREEN_DEF_BG; |
||||
cursor.visible = 1; |
||||
cursor.inverse = 0; |
||||
} |
||||
|
||||
//endregion
|
||||
|
||||
//region Screen clearing
|
||||
|
||||
/**
|
||||
* Init the screen (entire mappable area - for consistency) |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_init(void) |
||||
{ |
||||
for (unsigned int i = 0; i < MAX_SCREEN_SIZE; i++) { |
||||
cell_init(&screen[i]); |
||||
} |
||||
|
||||
cursor_reset(); |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
/**
|
||||
* Reset the screen (only the visible area) |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_reset(void) |
||||
{ |
||||
screen_clear(CLEAR_ALL); |
||||
cursor_reset(); |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
/**
|
||||
* Clear screen area |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_clear(ClearMode mode) |
||||
{ |
||||
switch (mode) { |
||||
case CLEAR_ALL: |
||||
clear_range(0, W * H - 1); |
||||
break; |
||||
|
||||
case CLEAR_FROM_CURSOR: |
||||
clear_range((cursor.y * W) + cursor.x, W * H - 1); |
||||
break; |
||||
|
||||
case CLEAR_TO_CURSOR: |
||||
clear_range(0, (cursor.y * W) + cursor.x); |
||||
break; |
||||
} |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
/**
|
||||
* Line reset to gray-on-white, empty |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_clear_line(ClearMode mode) |
||||
{ |
||||
switch (mode) { |
||||
case CLEAR_ALL: |
||||
clear_range(cursor.y * W, (cursor.y + 1) * W - 1); |
||||
break; |
||||
|
||||
case CLEAR_FROM_CURSOR: |
||||
clear_range(cursor.y * W + cursor.x, (cursor.y + 1) * W - 1); |
||||
break; |
||||
|
||||
case CLEAR_TO_CURSOR: |
||||
clear_range(cursor.y * W, cursor.y * W + cursor.x); |
||||
break; |
||||
} |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
//endregion
|
||||
|
||||
//region Screen manipulation
|
||||
|
||||
/**
|
||||
* Change the screen size |
||||
* |
||||
* @param w - new width |
||||
* @param h - new height |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_resize(Coordinate w, Coordinate h) |
||||
{ |
||||
// sanitize
|
||||
if (w < 1) w = 1; |
||||
if (h < 1) h = 1; |
||||
|
||||
W = w; |
||||
H = h; |
||||
screen_reset(); |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
/**
|
||||
* Shift screen upwards |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_scroll_up(unsigned int lines) |
||||
{ |
||||
if (lines >= H - 1) { |
||||
screen_clear(CLEAR_ALL); |
||||
return; |
||||
} |
||||
|
||||
if (lines == 0) { |
||||
return; |
||||
} |
||||
|
||||
int y; |
||||
for (y = 0; y < H - lines; y++) { |
||||
memcpy(screen + y * W, screen + (y + lines) * W, W * sizeof(Cell)); |
||||
} |
||||
|
||||
clear_range(y * W, W * H - 1); |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
/**
|
||||
* Shift screen downwards |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_scroll_down(unsigned int lines) |
||||
{ |
||||
if (lines >= H - 1) { |
||||
screen_clear(CLEAR_ALL); |
||||
return; |
||||
} |
||||
|
||||
if (lines == 0) { |
||||
return; |
||||
} |
||||
|
||||
int y; |
||||
for (y = H-1; y >= lines; y--) { |
||||
memcpy(screen + y * W, screen + (y - lines) * W, W * sizeof(Cell)); |
||||
} |
||||
|
||||
clear_range(0, lines * W-1); |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
//endregion
|
||||
|
||||
//region Cursor manipulation
|
||||
|
||||
/**
|
||||
* Set cursor position |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_cursor_set(Coordinate x, Coordinate y) |
||||
{ |
||||
if (x >= W) x = W - 1; |
||||
if (y >= H) y = H - 1; |
||||
cursor.x = x; |
||||
cursor.y = y; |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
/**
|
||||
* Set cursor X position |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_cursor_set_x(Coordinate x) |
||||
{ |
||||
if (x >= W) x = W - 1; |
||||
cursor.x = x; |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
/**
|
||||
* Set cursor Y position |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_cursor_set_y(Coordinate y) |
||||
{ |
||||
if (y >= H) y = H - 1; |
||||
cursor.y = y; |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
/**
|
||||
* Relative cursor move |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_cursor_move(int dx, int dy) |
||||
{ |
||||
if (dx < 0 && -dx > cursor.x) dx = -cursor.x; |
||||
if (dy < 0 && -dy > cursor.y) dy = -cursor.y; |
||||
screen_cursor_set(cursor.x + dx, cursor.y + dy); |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
/**
|
||||
* Save the cursor pos |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_cursor_save(void) |
||||
{ |
||||
cursor_sav.x = cursor.x; |
||||
cursor_sav.y = cursor.y; |
||||
} |
||||
|
||||
/**
|
||||
* Restore the cursor pos |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_cursor_restore(void) |
||||
{ |
||||
cursor.x = cursor_sav.x; |
||||
cursor.y = cursor_sav.y; |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
/**
|
||||
* Enable cursor display |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_cursor_enable(bool enable) |
||||
{ |
||||
cursor.visible = enable; |
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
//endregion
|
||||
|
||||
//region Colors
|
||||
|
||||
/**
|
||||
* Set cursor foreground color |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_set_fg(Color color) |
||||
{ |
||||
if (color > COLOR_MAX) color = COLOR_MAX; |
||||
cursor.fg = color; |
||||
} |
||||
|
||||
/**
|
||||
* Set cursor background coloor |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_set_bg(Color color) |
||||
{ |
||||
if (color > COLOR_MAX) color = COLOR_MAX; |
||||
cursor.bg = color; |
||||
} |
||||
|
||||
/**
|
||||
* Set cursor foreground and background color |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_set_colors(Color fg, Color bg) |
||||
{ |
||||
screen_set_fg(fg); |
||||
screen_set_bg(bg); |
||||
} |
||||
|
||||
/**
|
||||
* Invert colors |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_inverse(bool inverse) |
||||
{ |
||||
cursor.inverse = inverse; |
||||
} |
||||
|
||||
/**
|
||||
* Make foreground bright. |
||||
* |
||||
* This relates to the '1' SGR command which originally means |
||||
* "bold font". We interpret that as "Bright", similar to other |
||||
* terminal emulators. |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_set_bright_fg(void) |
||||
{ |
||||
cursor.fg = (cursor.fg % 8) + 8; |
||||
} |
||||
|
||||
//endregion
|
||||
|
||||
/**
|
||||
* Set a character in the cursor color, move to right with wrap. |
||||
*/ |
||||
void ICACHE_FLASH_ATTR |
||||
screen_putchar(char ch) |
||||
{ |
||||
Cell *c = &screen[cursor.x + cursor.y * W]; |
||||
c->c = ch; |
||||
|
||||
if (cursor.inverse) { |
||||
c->fg = cursor.bg; |
||||
c->bg = cursor.fg; |
||||
} else { |
||||
c->fg = cursor.fg; |
||||
c->bg = cursor.bg; |
||||
} |
||||
|
||||
cursor.x++; |
||||
// X wrap
|
||||
if (cursor.x >= W) { |
||||
cursor.x = 0; |
||||
cursor.y++; |
||||
// Y wrap
|
||||
if (cursor.y > H-1) { |
||||
// Scroll up, so we have space for writing
|
||||
screen_scroll_up(1); |
||||
cursor.y = H-1; |
||||
} |
||||
} |
||||
|
||||
screen_notifyChange(); |
||||
} |
||||
|
||||
|
||||
//region Serialization
|
||||
|
||||
#if 0 |
||||
/**
|
||||
* Debug dump |
||||
*/ |
||||
void screen_dd(void) |
||||
{ |
||||
for (int y = 0; y < H; y++) { |
||||
for (int x = 0; x < W; x++) { |
||||
Cell *cell = &screen[y * W + x]; |
||||
|
||||
// FG
|
||||
printf("\033["); |
||||
if (cell->fg > 7) { |
||||
printf("%d", 90 + cell->fg - 8); |
||||
} else { |
||||
printf("%d", 30 + cell->fg); |
||||
} |
||||
printf("m"); |
||||
|
||||
// BG
|
||||
printf("\033["); |
||||
if (cell->bg > 7) { |
||||
printf("%d", 100 + cell->bg - 8); |
||||
} else { |
||||
printf("%d", 40 + cell->bg); |
||||
} |
||||
printf("m"); |
||||
|
||||
printf("%c", cell->c); |
||||
} |
||||
printf("\033[0m\n"); |
||||
} |
||||
} |
||||
#endif |
||||
|
||||
struct ScreenSerializeState { |
||||
Color lastFg; |
||||
Color lastBg; |
||||
char lastChar; |
||||
int index; |
||||
}; |
||||
|
||||
/**
|
||||
* Serialize the screen to a data buffer. May need multiple calls if the buffer is insufficient in size. |
||||
* |
||||
* @warning MAKE SURE *DATA IS NULL BEFORE FIRST CALL! |
||||
* Call with NULL 'buffer' at the end to free the data struct. |
||||
* |
||||
* @param buffer - buffer array of limited size. If NULL, indicates this is the last call. |
||||
* @param buf_len - buffer array size |
||||
* @param data - opaque pointer to internal data structure for storing state between repeated calls |
||||
* if NULL, indicates this is the first call. |
||||
* @return HTTPD_CGI_DONE or HTTPD_CGI_MORE. If more, repeat with the same DATA. |
||||
*/ |
||||
httpd_cgi_state ICACHE_FLASH_ATTR |
||||
screenSerializeToBuffer(char *buffer, size_t buf_len, void **data) |
||||
{ |
||||
struct ScreenSerializeState *ss = *data; |
||||
|
||||
if (buffer == NULL) { |
||||
if (ss != NULL) free(ss); |
||||
return HTTPD_CGI_DONE; |
||||
} |
||||
|
||||
Cell *cell, *cell0; |
||||
|
||||
size_t remain = buf_len; int used = 0; |
||||
char *bb = buffer; |
||||
|
||||
// Ideally we'd use snprintf here!
|
||||
#define bufprint(fmt, ...) do { \ |
||||
used = sprintf(bb, fmt, ##__VA_ARGS__); \
|
||||
if(used>0) { bb += used; remain -= used; } \
|
||||
} while(0) |
||||
|
||||
if (ss == NULL) { |
||||
*data = ss = malloc(sizeof(struct ScreenSerializeState)); |
||||
ss->index = 0; |
||||
ss->lastBg = 0; |
||||
ss->lastFg = 0; |
||||
ss->lastChar = '\0'; |
||||
|
||||
bufprint("{x:%d,y:%d,screen:\"", cursor.x, cursor.y); |
||||
} |
||||
|
||||
int i = ss->index; |
||||
while(i < W*H && remain > 6) { |
||||
cell = cell0 = &screen[i]; |
||||
|
||||
// Count how many times same as previous
|
||||
int repCnt = 0; |
||||
while (i < W*H |
||||
&& cell->fg == ss->lastFg |
||||
&& cell->bg == ss->lastBg |
||||
&& cell->c == ss->lastChar) { |
||||
// Repeat
|
||||
repCnt++; |
||||
cell = &screen[++i]; |
||||
} |
||||
|
||||
if (repCnt == 0) { |
||||
if (cell0->fg == ss->lastFg && cell0->bg == ss->lastBg) { |
||||
// same colors as previous
|
||||
bufprint(",%c", cell0->c); |
||||
} else { |
||||
bufprint("%X%X%c", cell0->fg, cell0->bg, cell0->c); |
||||
} |
||||
|
||||
ss->lastFg = cell0->fg; |
||||
ss->lastBg = cell0->bg; |
||||
ss->lastChar = cell0->c; |
||||
|
||||
i++; |
||||
} else { |
||||
char code; |
||||
if(repCnt<10) { |
||||
code = 'r'; |
||||
} else if(repCnt<100) { |
||||
code = 's'; |
||||
} else if(repCnt<1000) { |
||||
code = 't'; |
||||
} else { |
||||
code = 'u'; |
||||
} |
||||
|
||||
bufprint("%c%d", code, repCnt); |
||||
} |
||||
} |
||||
|
||||
ss->index = i; |
||||
|
||||
if (i < W*H-1) { |
||||
return HTTPD_CGI_MORE; |
||||
} |
||||
|
||||
if (remain >= 3) { |
||||
bufprint("\"}"); |
||||
return HTTPD_CGI_DONE; |
||||
} else { |
||||
return HTTPD_CGI_MORE; |
||||
} |
||||
} |
||||
|
||||
//endregion
|
@ -0,0 +1,135 @@ |
||||
#ifndef SCREEN_H |
||||
#define SCREEN_H |
||||
|
||||
#include <stdint.h> |
||||
#include <stdbool.h> |
||||
#include <esp8266.h> |
||||
#include <httpd.h> |
||||
|
||||
/**
|
||||
* This module handles the virtual screen and operations on it. |
||||
* |
||||
* It is interfaced by calls from the ANSI parser, and the screen |
||||
* data can be rendered for the front-end. |
||||
* |
||||
* --- |
||||
* |
||||
* Colors are 0-15, 0-7 dim, 8-15 bright. |
||||
* |
||||
* NORMAL |
||||
* 0 black, 1 red, 2 green, 3 yellow |
||||
* 4 blue, 5 mag, 6 cyan, 7 white |
||||
* |
||||
* BRIGHT |
||||
* 8 black, 9 red, 10 green, 11 yellow |
||||
* 12 blue, 13 mag, 14 cyan, 15 white |
||||
* |
||||
* Coordinates are 0-based, left-top is the origin. |
||||
* X grows to the right, Y to the bottom. |
||||
* |
||||
* +----> |
||||
* | X |
||||
* | |
||||
* V Y |
||||
* |
||||
*/ |
||||
|
||||
/**
|
||||
* Maximum screen size (determines size of the static data array) |
||||
* |
||||
* TODO May need adjusting if there are size problems when flashing the ESP. |
||||
* We could also try to pack the Cell struct to a single 32bit word. |
||||
*/ |
||||
#define MAX_SCREEN_SIZE (80*25) |
||||
|
||||
#define SCREEN_DEF_W 26 //!< Default screen width
|
||||
#define SCREEN_DEF_H 10 //!< Default screen height
|
||||
|
||||
#define SCREEN_DEF_BG 0 //!< Default screen background
|
||||
#define SCREEN_DEF_FG 7 //!< Default screen foreground
|
||||
|
||||
typedef enum { |
||||
CLEAR_TO_CURSOR=0, CLEAR_FROM_CURSOR=1, CLEAR_ALL=2 |
||||
} ClearMode; |
||||
|
||||
typedef uint8_t Color; |
||||
typedef unsigned int Coordinate; |
||||
|
||||
httpd_cgi_state ICACHE_FLASH_ATTR |
||||
screenSerializeToBuffer(char *buffer, size_t buf_len, void **data); |
||||
|
||||
/** Init the screen */ |
||||
void screen_init(void); |
||||
|
||||
/** Change the screen size */ |
||||
void screen_resize(Coordinate w, Coordinate h); |
||||
|
||||
// --- Clearing ---
|
||||
|
||||
/** Screen reset to default state */ |
||||
void screen_reset(void); |
||||
|
||||
/** Clear entire screen, set all to 7 on 0 */ |
||||
void screen_clear(ClearMode mode); |
||||
|
||||
/** Line reset to gray-on-white, empty */ |
||||
void screen_clear_line(ClearMode mode); |
||||
|
||||
/** Shift screen upwards */ |
||||
void screen_scroll_up(unsigned int lines); |
||||
|
||||
/** Shift screen downwards */ |
||||
void screen_scroll_down(unsigned int lines); |
||||
|
||||
// --- Cursor control ---
|
||||
|
||||
/** Set cursor position */ |
||||
void screen_cursor_set(Coordinate x, Coordinate y); |
||||
|
||||
/** Set cursor X position */ |
||||
void screen_cursor_set_x(Coordinate x); |
||||
|
||||
/** Set cursor Y position */ |
||||
void screen_cursor_set_y(Coordinate y); |
||||
|
||||
/** Relative cursor move */ |
||||
void screen_cursor_move(int dx, int dy); |
||||
|
||||
/** Save the cursor pos */ |
||||
void screen_cursor_save(void); |
||||
|
||||
/** Restore the cursor pos */ |
||||
void screen_cursor_restore(void); |
||||
|
||||
/** Enable cursor display */ |
||||
void screen_cursor_enable(bool enable); |
||||
|
||||
// --- Colors ---
|
||||
|
||||
/** Set cursor foreground color */ |
||||
void screen_set_fg(Color color); |
||||
|
||||
/** Set cursor background coloor */ |
||||
void screen_set_bg(Color color); |
||||
|
||||
/** make foreground bright */ |
||||
void screen_set_bright_fg(void); |
||||
|
||||
/** Set cursor foreground and background color */ |
||||
void screen_set_colors(Color fg, Color bg); |
||||
|
||||
/** Invert colors */ |
||||
void screen_inverse(bool inverse); |
||||
|
||||
|
||||
/** Set a character in the cursor color, move to right with wrap. */ |
||||
void screen_putchar(char c); |
||||
|
||||
#if 0 |
||||
/** Debug dump */ |
||||
void screen_dd(void); |
||||
#endif |
||||
|
||||
extern void screen_notifyChange(void); |
||||
|
||||
#endif // SCREEN_H
|
Loading…
Reference in new issue