commit
3e4181f18e
GPG Key ID:
2C5FD5035250423D
@ -1 +1 @@ |
||||
Subproject commit d2fabc40f1874cabd7f7ceca690a5874887c3c5d |
||||
Subproject commit a96b522ca899c687d70b9ad92f708cd416b8d460 |
||||
@ -1 +1 @@ |
||||
Subproject commit e4ecf0724e36c828be5222eddce58a6a5cd2386f |
||||
Subproject commit d6651ca0d11b7950078247b8305f5b23a6be6c6c |
||||
@ -0,0 +1,3 @@ |
||||
#!/usr/bin/env bash |
||||
|
||||
xtensa-lx106-elf-gcc -E -Iuser -Ilibesphttpd/include -Iesp_iot_sdk_v1.5.2/include -Iinclude $@ |
||||
@ -0,0 +1,144 @@ |
||||
//
|
||||
// Created by MightyPork on 2017/10/22.
|
||||
//
|
||||
|
||||
#include "config_xmacros.h" |
||||
#include "cgi_logging.h" |
||||
|
||||
void ICACHE_FLASH_ATTR xget_dec(char *buff, u32 value) |
||||
{ |
||||
sprintf(buff, "%d", value); |
||||
} |
||||
|
||||
void ICACHE_FLASH_ATTR xget_bool(char *buff, bool value) |
||||
{ |
||||
sprintf(buff, "%d", value?1:0); |
||||
} |
||||
|
||||
void ICACHE_FLASH_ATTR xget_ustring(char *buff, const u8 *value) |
||||
{ |
||||
sprintf(buff, "%s", (const char *) value); |
||||
} |
||||
|
||||
void ICACHE_FLASH_ATTR xget_string(char *buff, const char *value) |
||||
{ |
||||
sprintf(buff, "%s", value); |
||||
} |
||||
|
||||
void ICACHE_FLASH_ATTR xget_ip(char *buff, const struct ip_addr *value) |
||||
{ |
||||
sprintf(buff, IPSTR, GOOD_IP2STR(value->addr)); |
||||
} |
||||
|
||||
// ------------- XSET -------------
|
||||
|
||||
enum xset_result ICACHE_FLASH_ATTR |
||||
xset_ip(const char *name, struct ip_addr *field, const char *buff, const void *arg) |
||||
{ |
||||
cgi_dbg("Setting %s = %s", name, buff); |
||||
u32 ip = ipaddr_addr(buff); |
||||
if (ip != 0 && ip != 0xFFFFFFFFUL) { |
||||
if (field->addr != ip) { |
||||
field->addr = ip; |
||||
return XSET_SET; |
||||
} |
||||
return XSET_UNCHANGED; |
||||
} else { |
||||
cgi_warn("Bad IP: %s", buff); |
||||
return XSET_FAIL; |
||||
} |
||||
} |
||||
|
||||
enum xset_result ICACHE_FLASH_ATTR |
||||
xset_bool(const char *name, bool *field, const char *buff, const void *arg) |
||||
{ |
||||
cgi_dbg("Setting %s = %s", name, buff); |
||||
bool enable = (atoi(buff) != 0); |
||||
|
||||
if (*field != enable) { |
||||
*field = enable; |
||||
return XSET_SET; |
||||
} |
||||
return XSET_UNCHANGED; |
||||
} |
||||
|
||||
enum xset_result ICACHE_FLASH_ATTR |
||||
xset_u8(const char *name, u8 *field, const char *buff, const void *arg) |
||||
{ |
||||
cgi_dbg("Setting %s = %s", name, buff); |
||||
u32 val = (u32) atoi(buff); |
||||
|
||||
if (val <= 255) { |
||||
if (*field != val) { |
||||
*field = (u8) val; |
||||
return XSET_SET; |
||||
} |
||||
return XSET_UNCHANGED; |
||||
} else { |
||||
cgi_warn("Bad value, max 255: %s", buff); |
||||
return XSET_FAIL; |
||||
} |
||||
} |
||||
|
||||
enum xset_result ICACHE_FLASH_ATTR |
||||
xset_u32(const char *name, u32 *field, const char *buff, const void *arg) |
||||
{ |
||||
cgi_dbg("Setting %s = %s", name, buff); |
||||
u32 val = (u32) atoi(buff); |
||||
|
||||
if (*field != val) { |
||||
*field = (u32) val; |
||||
return XSET_SET; |
||||
} |
||||
return XSET_UNCHANGED; |
||||
} |
||||
|
||||
enum xset_result ICACHE_FLASH_ATTR |
||||
xset_u16(const char *name, u16 *field, const char *buff, const void *arg) |
||||
{ |
||||
cgi_dbg("Setting %s = %s", name, buff); |
||||
u16 val = (u16) atoi(buff); |
||||
|
||||
if (*field != val) { |
||||
*field = (u16) val; |
||||
return XSET_SET; |
||||
} |
||||
return XSET_UNCHANGED; |
||||
} |
||||
|
||||
enum xset_result ICACHE_FLASH_ATTR |
||||
xset_string(const char *name, char *field, const char *buff, const void *arg) |
||||
{ |
||||
cgi_dbg("Setting %s = %s", name, buff); |
||||
u32 maxlen = (u32) arg; |
||||
|
||||
if (arg > 0 && (u32)strlen(buff) > maxlen) { |
||||
cgi_warn("String too long, max %d", maxlen); |
||||
return XSET_FAIL; |
||||
} |
||||
|
||||
if (!streq(field, buff)) { |
||||
strncpy_safe(field, buff, (u32)arg); |
||||
return XSET_SET; |
||||
} |
||||
return XSET_UNCHANGED; |
||||
} |
||||
|
||||
|
||||
enum xset_result ICACHE_FLASH_ATTR |
||||
xset_ustring(const char *name, uchar *field, const char *buff, const void *arg) |
||||
{ |
||||
cgi_dbg("Setting %s = %s", name, buff); |
||||
u32 maxlen = (u32) arg; |
||||
|
||||
if (arg > 0 && (u32)strlen(buff) > maxlen) { |
||||
cgi_warn("String too long, max %d", maxlen); |
||||
return XSET_FAIL; |
||||
} |
||||
|
||||
if (!streq(field, buff)) { |
||||
strncpy_safe(field, buff, (u32)arg); |
||||
return XSET_SET; |
||||
} |
||||
return XSET_UNCHANGED; |
||||
} |
||||
@ -0,0 +1,106 @@ |
||||
//
|
||||
// Created by MightyPork on 2017/10/22.
|
||||
//
|
||||
|
||||
#ifndef ESPTERM_CONFIG_XMACROS_H |
||||
#define ESPTERM_CONFIG_XMACROS_H |
||||
|
||||
#include <esp8266.h> |
||||
#include <helpers.h> |
||||
|
||||
typedef unsigned char uchar; |
||||
|
||||
#define XJOIN(a, b) a##b |
||||
|
||||
/**Do nothing xnotify */ |
||||
#define xnoop() |
||||
|
||||
/**
|
||||
* XGET interface |
||||
* |
||||
* @param buff - buffer where the value should be printed |
||||
* @param value - value to render to the buffer |
||||
*/ |
||||
|
||||
static inline bool xget_dummy(char *buff, u32 value) |
||||
{ |
||||
sprintf(buff, "unused %d", value); |
||||
return false; |
||||
} |
||||
|
||||
void xget_dec(char *buff, u32 value); |
||||
void xget_bool(char *buff, bool value); |
||||
void xget_ustring(char *buff, const u8 *value); |
||||
void xget_string(char *buff, const char *value); |
||||
void xget_ip(char *buff, const struct ip_addr *value); |
||||
void xget_dhcp(char *buff, const struct dhcps_lease *value); |
||||
|
||||
|
||||
/**
|
||||
* XSET interface |
||||
* |
||||
* @param name - field name (for debug) |
||||
* @param field - pointer to the target field |
||||
* @param buff - field with the value to be set |
||||
* @param arg - arbitrary argument, used to modify behavior |
||||
* |
||||
* @return xset_result |
||||
*/ |
||||
|
||||
enum xset_result { |
||||
XSET_FAIL = 0, |
||||
XSET_SET = 1, |
||||
XSET_UNCHANGED = 2 |
||||
}; |
||||
|
||||
// Dummy for unimplemented setters
|
||||
static inline enum xset_result xset_dummy(const char *name, void *field, const char *buff, const void *arg) |
||||
{ |
||||
return XSET_UNCHANGED; |
||||
} |
||||
|
||||
enum xset_result xset_ip(const char *name, struct ip_addr *field, const char *buff, const void *arg); |
||||
enum xset_result xset_bool(const char *name, bool *field, const char *buff, const void *arg); |
||||
enum xset_result xset_u8(const char *name, u8 *field, const char *buff, const void *arg); |
||||
enum xset_result xset_u32(const char *name, u32 *field, const char *buff, const void *arg); |
||||
enum xset_result xset_u16(const char *name, u16 *field, const char *buff, const void *arg); |
||||
|
||||
// static string arrays are not &'d, so we don't get **
|
||||
/** @param arg - max string length */ |
||||
enum xset_result xset_string(const char *name, char *field, const char *buff, const void *arg); |
||||
enum xset_result xset_ustring(const char *name, u8 *field, const char *buff, const void *arg); |
||||
|
||||
/**
|
||||
* Helper template macro for CGI functions that load GET args to structs using XTABLE |
||||
* |
||||
* If 'name' is found in connData->getArgs, xset() is called. |
||||
* If the result is SET, xnotify() is fired. Else, 'name,' is appended to the redir_url buffer. |
||||
*/ |
||||
#define XSET_CGI_FUNC(type, name, suffix, deref, xget, xset, xsarg, xnotify, allow) \ |
||||
if ((allow) && GET_ARG(#name)) { \
|
||||
type *_p = (type *) &XSTRUCT->name; \
|
||||
enum xset_result res = xset(#name, _p, buff, (const void*) (xsarg)); \
|
||||
if (res == XSET_SET) { xnotify; } \
|
||||
else if (res == XSET_FAIL) { redir_url += sprintf(redir_url, #name","); } \
|
||||
} |
||||
|
||||
/** used for INI */ |
||||
#define XSET_ASSIGN(type, name, suffix, deref, xget, xset, xsarg, xnotify, allow) \ |
||||
if (streq(#name, key)) { \
|
||||
found = true; \
|
||||
type *_p = (type *) &XSTRUCT->name; \
|
||||
enum xset_result res = xset(#name, _p, value, (const void*) (xsarg)); \
|
||||
if (res == XSET_SET) { xnotify; } \
|
||||
else if (res == XSET_FAIL) { suc = false; } \
|
||||
} |
||||
|
||||
#define XGET_CGI_FUNC(type, name, suffix, deref, xget, xset, xsarg, xnotify, allow) \ |
||||
if ((allow) && streq(token, #name)) xget(buff, deref XSTRUCT->name); |
||||
|
||||
#define XSTRUCT_FIELD(type, name, suffix, deref, xget, xset, xsarg, xnotify, allow) \ |
||||
type name suffix; |
||||
|
||||
#define XDUMP_FIELD(type, name, suffix, deref, xget, allow, xset, xsarg, xnotify) \ |
||||
{ xget(buff, deref XSTRUCT->name); dbg(#name " = %s", buff); } |
||||
|
||||
#endif //ESPTERM_CONFIG_XMACROS_H
|
||||
@ -0,0 +1,526 @@ |
||||
|
||||
/* #line 1 "user/ini_parser.rl" */ |
||||
|
||||
/* Ragel constants block */ |
||||
#include "ini_parser.h" |
||||
|
||||
// Ragel setup
|
||||
|
||||
/* #line 10 "user/ini_parser.c" */ |
||||
static const char _ini_actions[] ESP_CONST_DATA = { |
||||
0, 1, 1, 1, 2, 1, 3, 1,
|
||||
4, 1, 5, 1, 6, 1, 7, 1,
|
||||
8, 1, 9, 1, 10, 1, 11, 1,
|
||||
13, 2, 0, 4, 2, 12, 4 |
||||
}; |
||||
|
||||
static const char _ini_eof_actions[] ESP_CONST_DATA = { |
||||
0, 23, 5, 5, 15, 15, 15, 15,
|
||||
19, 19, 0, 0, 0, 0, 0, 0,
|
||||
0 |
||||
}; |
||||
|
||||
static const int ini_start = 1; |
||||
static const int ini_first_final = 12; |
||||
static const int ini_error = 0; |
||||
|
||||
static const int ini_en_section = 2; |
||||
static const int ini_en_keyvalue = 4; |
||||
static const int ini_en_comment = 8; |
||||
static const int ini_en_discard2eol = 10; |
||||
static const int ini_en_main = 1; |
||||
|
||||
|
||||
/* #line 10 "user/ini_parser.rl" */ |
||||
|
||||
|
||||
// Persistent state
|
||||
static int8_t cs = -1; //!< Ragel's Current State variable
|
||||
static uint32_t buff_i = 0; //!< Write pointer for the buffers
|
||||
static char value_quote = 0; //!< Quote character of the currently collected value
|
||||
static bool value_nextesc = false; //!< Next character is escaped, trated specially, and if quote, as literal quote character
|
||||
static IniParserCallback keyCallback = NULL; //!< Currently assigned callback
|
||||
static void *userdata = NULL; //!< Currently assigned user data for the callback
|
||||
|
||||
// Buffers
|
||||
static char keybuf[INI_KEY_MAX]; |
||||
static char secbuf[INI_KEY_MAX]; |
||||
static char valbuf[INI_VALUE_MAX]; |
||||
|
||||
// See header for doxygen!
|
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parse_reset_partial(void) |
||||
{ |
||||
buff_i = 0; |
||||
value_quote = 0; |
||||
value_nextesc = false; |
||||
} |
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parse_reset(void) |
||||
{ |
||||
ini_parse_reset_partial(); |
||||
keybuf[0] = secbuf[0] = valbuf[0] = 0; |
||||
|
||||
/* #line 67 "user/ini_parser.c" */ |
||||
{ |
||||
cs = ini_start; |
||||
} |
||||
|
||||
/* #line 41 "user/ini_parser.rl" */ |
||||
} |
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parser_error(const char* msg) |
||||
{ |
||||
ini_error("Parser error: %s", msg); |
||||
ini_parse_reset_partial(); |
||||
} |
||||
|
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parse_begin(IniParserCallback callback, void *userData) |
||||
{ |
||||
keyCallback = callback; |
||||
userdata = userData; |
||||
ini_parse_reset(); |
||||
} |
||||
|
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
*ini_parse_end(void) |
||||
{ |
||||
ini_parse("\n", 1); |
||||
if (keyCallback) { |
||||
keyCallback = NULL; |
||||
} |
||||
|
||||
void *ud = userdata; |
||||
userdata = NULL; |
||||
return ud; |
||||
} |
||||
|
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parse_file(const char *text, size_t len, IniParserCallback callback, void *userData) |
||||
{ |
||||
ini_parse_begin(callback, userData); |
||||
ini_parse(text, len); |
||||
ini_parse_end(); |
||||
} |
||||
|
||||
static void ICACHE_FLASH_ATTR |
||||
rtrim_buf(char *buf, int32_t end) |
||||
{ |
||||
if (end > 0) { |
||||
while ((uint8_t)buf[--end] < 33); |
||||
end++; // go past the last character
|
||||
} |
||||
|
||||
buf[end] = 0; |
||||
} |
||||
|
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parse(const char *newstr, size_t len) |
||||
{ |
||||
int32_t i; |
||||
char c; |
||||
bool isnl; |
||||
bool isquot; |
||||
|
||||
// Load new data to Ragel vars
|
||||
const uint8_t *p; |
||||
const uint8_t *eof; |
||||
const uint8_t *pe; |
||||
|
||||
if (len == 0) while(newstr[++len] != 0); // alternative to strlen
|
||||
|
||||
p = (const uint8_t *) newstr; |
||||
eof = NULL; |
||||
pe = (const uint8_t *) (newstr + len); |
||||
|
||||
// Init Ragel on the first run
|
||||
if (cs == -1) { |
||||
ini_parse_reset(); |
||||
} |
||||
|
||||
// The parser
|
||||
|
||||
/* #line 152 "user/ini_parser.c" */ |
||||
{ |
||||
const char *_acts; |
||||
unsigned int _nacts; |
||||
|
||||
if ( p == pe ) |
||||
goto _test_eof; |
||||
if ( cs == 0 ) |
||||
goto _out; |
||||
_resume: |
||||
switch ( cs ) { |
||||
case 1: |
||||
switch( (*p) ) { |
||||
case 32u: goto tr1; |
||||
case 35u: goto tr3; |
||||
case 58u: goto tr0; |
||||
case 59u: goto tr3; |
||||
case 61u: goto tr0; |
||||
case 91u: goto tr4; |
||||
} |
||||
if ( (*p) < 9u ) { |
||||
if ( (*p) <= 8u ) |
||||
goto tr0; |
||||
} else if ( (*p) > 13u ) { |
||||
if ( 14u <= (*p) && (*p) <= 31u ) |
||||
goto tr0; |
||||
} else |
||||
goto tr1; |
||||
goto tr2; |
||||
case 0: |
||||
goto _out; |
||||
case 12: |
||||
goto tr0; |
||||
case 2: |
||||
switch( (*p) ) { |
||||
case 9u: goto tr6; |
||||
case 32u: goto tr6; |
||||
case 93u: goto tr5; |
||||
} |
||||
if ( (*p) <= 31u ) |
||||
goto tr5; |
||||
goto tr7; |
||||
case 3: |
||||
if ( (*p) == 93u ) |
||||
goto tr8; |
||||
if ( (*p) > 8u ) { |
||||
if ( 10u <= (*p) && (*p) <= 31u ) |
||||
goto tr5; |
||||
} else |
||||
goto tr5; |
||||
goto tr7; |
||||
case 13: |
||||
goto tr5; |
||||
case 4: |
||||
switch( (*p) ) { |
||||
case 10u: goto tr10; |
||||
case 58u: goto tr11; |
||||
case 61u: goto tr11; |
||||
} |
||||
goto tr9; |
||||
case 5: |
||||
switch( (*p) ) { |
||||
case 9u: goto tr13; |
||||
case 10u: goto tr14; |
||||
case 13u: goto tr15; |
||||
case 32u: goto tr13; |
||||
} |
||||
goto tr12; |
||||
case 6: |
||||
switch( (*p) ) { |
||||
case 10u: goto tr14; |
||||
case 13u: goto tr15; |
||||
} |
||||
goto tr12; |
||||
case 14: |
||||
goto tr10; |
||||
case 7: |
||||
if ( (*p) == 10u ) |
||||
goto tr14; |
||||
goto tr10; |
||||
case 8: |
||||
switch( (*p) ) { |
||||
case 10u: goto tr17; |
||||
case 13u: goto tr18; |
||||
} |
||||
goto tr16; |
||||
case 15: |
||||
goto tr19; |
||||
case 9: |
||||
if ( (*p) == 10u ) |
||||
goto tr17; |
||||
goto tr19; |
||||
case 10: |
||||
switch( (*p) ) { |
||||
case 10u: goto tr21; |
||||
case 13u: goto tr22; |
||||
} |
||||
goto tr20; |
||||
case 16: |
||||
goto tr23; |
||||
case 11: |
||||
if ( (*p) == 10u ) |
||||
goto tr21; |
||||
goto tr23; |
||||
} |
||||
|
||||
tr23: cs = 0; goto _again; |
||||
tr0: cs = 0; goto f0; |
||||
tr5: cs = 0; goto f4; |
||||
tr10: cs = 0; goto f7; |
||||
tr19: cs = 0; goto f11; |
||||
tr1: cs = 1; goto _again; |
||||
tr6: cs = 2; goto _again; |
||||
tr7: cs = 3; goto f5; |
||||
tr9: cs = 4; goto f8; |
||||
tr13: cs = 5; goto _again; |
||||
tr11: cs = 5; goto f9; |
||||
tr12: cs = 6; goto f10; |
||||
tr15: cs = 7; goto _again; |
||||
tr16: cs = 8; goto _again; |
||||
tr18: cs = 9; goto _again; |
||||
tr20: cs = 10; goto _again; |
||||
tr22: cs = 11; goto _again; |
||||
tr2: cs = 12; goto f1; |
||||
tr3: cs = 12; goto f2; |
||||
tr4: cs = 12; goto f3; |
||||
tr8: cs = 13; goto f6; |
||||
tr14: cs = 14; goto f10; |
||||
tr17: cs = 15; goto f12; |
||||
tr21: cs = 16; goto f13; |
||||
|
||||
f5: _acts = _ini_actions + 1; goto execFuncs; |
||||
f6: _acts = _ini_actions + 3; goto execFuncs; |
||||
f4: _acts = _ini_actions + 5; goto execFuncs; |
||||
f1: _acts = _ini_actions + 7; goto execFuncs; |
||||
f8: _acts = _ini_actions + 9; goto execFuncs; |
||||
f9: _acts = _ini_actions + 11; goto execFuncs; |
||||
f10: _acts = _ini_actions + 13; goto execFuncs; |
||||
f7: _acts = _ini_actions + 15; goto execFuncs; |
||||
f12: _acts = _ini_actions + 17; goto execFuncs; |
||||
f11: _acts = _ini_actions + 19; goto execFuncs; |
||||
f13: _acts = _ini_actions + 21; goto execFuncs; |
||||
f0: _acts = _ini_actions + 23; goto execFuncs; |
||||
f3: _acts = _ini_actions + 25; goto execFuncs; |
||||
f2: _acts = _ini_actions + 28; goto execFuncs; |
||||
|
||||
execFuncs: |
||||
_nacts = *_acts++; |
||||
while ( _nacts-- > 0 ) { |
||||
switch ( *_acts++ ) { |
||||
case 0: |
||||
/* #line 130 "user/ini_parser.rl" */ |
||||
{ |
||||
buff_i = 0; |
||||
{cs = 2;goto _again;} |
||||
} |
||||
break; |
||||
case 1: |
||||
/* #line 135 "user/ini_parser.rl" */ |
||||
{ |
||||
if (buff_i >= INI_KEY_MAX) { |
||||
ini_parser_error("Section name too long"); |
||||
{cs = 10;goto _again;} |
||||
} |
||||
keybuf[buff_i++] = (*p); |
||||
} |
||||
break; |
||||
case 2: |
||||
/* #line 143 "user/ini_parser.rl" */ |
||||
{ |
||||
// we need a separate buffer for the result, otherwise a failed
|
||||
// partial parse would corrupt the section string
|
||||
rtrim_buf(keybuf, buff_i); |
||||
for (i = 0; (c = keybuf[i]) != 0; i++) secbuf[i] = c; |
||||
secbuf[i] = 0; |
||||
{cs = 1;goto _again;} |
||||
} |
||||
break; |
||||
case 3: |
||||
/* #line 155 "user/ini_parser.rl" */ |
||||
{ |
||||
ini_parser_error("Syntax error in [section]"); |
||||
if((*p) == '\n') {cs = 1;goto _again;} else {cs = 10;goto _again;} |
||||
} |
||||
break; |
||||
case 4: |
||||
/* #line 162 "user/ini_parser.rl" */ |
||||
{ |
||||
buff_i = 0; |
||||
keybuf[buff_i++] = (*p); // add the first char
|
||||
{cs = 4;goto _again;} |
||||
} |
||||
break; |
||||
case 5: |
||||
/* #line 168 "user/ini_parser.rl" */ |
||||
{ |
||||
if (buff_i >= INI_KEY_MAX) { |
||||
ini_parser_error("Key too long"); |
||||
{cs = 10;goto _again;} |
||||
} |
||||
keybuf[buff_i++] = (*p); |
||||
} |
||||
break; |
||||
case 6: |
||||
/* #line 176 "user/ini_parser.rl" */ |
||||
{ |
||||
rtrim_buf(keybuf, buff_i); |
||||
|
||||
// --- Value begin ---
|
||||
buff_i = 0; |
||||
value_quote = 0; |
||||
value_nextesc = false; |
||||
} |
||||
break; |
||||
case 7: |
||||
/* #line 185 "user/ini_parser.rl" */ |
||||
{ |
||||
isnl = ((*p) == '\r' || (*p) == '\n'); |
||||
isquot = ((*p) == '\'' || (*p) == '"'); |
||||
|
||||
// detect our starting quote
|
||||
if (isquot && !value_nextesc && buff_i == 0 && value_quote == 0) { |
||||
value_quote = (*p); |
||||
goto valueCharDone; |
||||
} |
||||
|
||||
if (buff_i >= INI_VALUE_MAX) { |
||||
ini_parser_error("Value too long"); |
||||
{cs = 10;goto _again;} |
||||
} |
||||
|
||||
// end of string - clean up and report
|
||||
if ((!value_nextesc && (*p) == value_quote) || isnl) { |
||||
if (isnl && value_quote) { |
||||
ini_parser_error("Unterminated string"); |
||||
{cs = 1;goto _again;} |
||||
} |
||||
|
||||
// unquoted: trim from the end
|
||||
if (!value_quote) { |
||||
rtrim_buf(valbuf, buff_i); |
||||
} else { |
||||
valbuf[buff_i] = 0; |
||||
} |
||||
|
||||
if (keyCallback) { |
||||
keyCallback(secbuf, keybuf, valbuf, userdata); |
||||
} |
||||
|
||||
// we don't want to discard to eol if the string was terminated by eol
|
||||
// - would delete the next line
|
||||
|
||||
if (isnl) {cs = 1;goto _again;} else {cs = 10;goto _again;} |
||||
} |
||||
|
||||
c = (*p); |
||||
// escape...
|
||||
if (value_nextesc) { |
||||
if ((*p) == 'n') c = '\n'; |
||||
else if ((*p) == 'r') c = '\r'; |
||||
else if ((*p) == 't') c = '\t'; |
||||
else if ((*p) == 'e') c = '\033'; |
||||
} |
||||
|
||||
// collecting characters...
|
||||
if (value_nextesc || (*p) != '\\') { // is quoted, or is not a quoting backslash - literal character
|
||||
valbuf[buff_i++] = c; |
||||
} |
||||
|
||||
value_nextesc = (!value_nextesc && (*p) == '\\'); |
||||
valueCharDone:; |
||||
} |
||||
break; |
||||
case 8: |
||||
/* #line 247 "user/ini_parser.rl" */ |
||||
{ |
||||
ini_parser_error("Syntax error in key=value"); |
||||
if((*p) == '\n') {cs = 1;goto _again;} else {cs = 10;goto _again;} |
||||
} |
||||
break; |
||||
case 9: |
||||
/* #line 257 "user/ini_parser.rl" */ |
||||
{ {cs = 1;goto _again;} } |
||||
break; |
||||
case 10: |
||||
/* #line 258 "user/ini_parser.rl" */ |
||||
{ |
||||
ini_parser_error("Syntax error in comment"); |
||||
if((*p) == '\n') {cs = 1;goto _again;} else {cs = 10;goto _again;} |
||||
} |
||||
break; |
||||
case 11: |
||||
/* #line 265 "user/ini_parser.rl" */ |
||||
{ {cs = 1;goto _again;} } |
||||
break; |
||||
case 12: |
||||
/* #line 273 "user/ini_parser.rl" */ |
||||
{ {cs = 8;goto _again;} } |
||||
break; |
||||
case 13: |
||||
/* #line 276 "user/ini_parser.rl" */ |
||||
{ |
||||
ini_parser_error("Syntax error in root"); |
||||
{cs = 10;goto _again;} |
||||
} |
||||
break; |
||||
/* #line 458 "user/ini_parser.c" */ |
||||
} |
||||
} |
||||
goto _again; |
||||
|
||||
_again: |
||||
if ( cs == 0 ) |
||||
goto _out; |
||||
if ( ++p != pe ) |
||||
goto _resume; |
||||
_test_eof: {} |
||||
if ( p == eof ) |
||||
{ |
||||
const char *__acts = _ini_actions + _ini_eof_actions[cs]; |
||||
unsigned int __nacts = (unsigned int) *__acts++; |
||||
while ( __nacts-- > 0 ) { |
||||
switch ( *__acts++ ) { |
||||
case 3: |
||||
/* #line 155 "user/ini_parser.rl" */ |
||||
{ |
||||
ini_parser_error("Syntax error in [section]"); |
||||
if((*p) == '\n') {cs = 1; if ( p == pe ) |
||||
goto _test_eof; |
||||
goto _again;} else {cs = 10; if ( p == pe ) |
||||
goto _test_eof; |
||||
goto _again;} |
||||
} |
||||
break; |
||||
case 8: |
||||
/* #line 247 "user/ini_parser.rl" */ |
||||
{ |
||||
ini_parser_error("Syntax error in key=value"); |
||||
if((*p) == '\n') {cs = 1; if ( p == pe ) |
||||
goto _test_eof; |
||||
goto _again;} else {cs = 10; if ( p == pe ) |
||||
goto _test_eof; |
||||
goto _again;} |
||||
} |
||||
break; |
||||
case 10: |
||||
/* #line 258 "user/ini_parser.rl" */ |
||||
{ |
||||
ini_parser_error("Syntax error in comment"); |
||||
if((*p) == '\n') {cs = 1; if ( p == pe ) |
||||
goto _test_eof; |
||||
goto _again;} else {cs = 10; if ( p == pe ) |
||||
goto _test_eof; |
||||
goto _again;} |
||||
} |
||||
break; |
||||
case 13: |
||||
/* #line 276 "user/ini_parser.rl" */ |
||||
{ |
||||
ini_parser_error("Syntax error in root"); |
||||
{cs = 10; if ( p == pe ) |
||||
goto _test_eof; |
||||
goto _again;} |
||||
} |
||||
break; |
||||
/* #line 517 "user/ini_parser.c" */ |
||||
} |
||||
} |
||||
} |
||||
|
||||
_out: {} |
||||
} |
||||
|
||||
/* #line 283 "user/ini_parser.rl" */ |
||||
|
||||
} |
||||
@ -0,0 +1,65 @@ |
||||
#ifndef INIPARSE_STREAM_H |
||||
#define INIPARSE_STREAM_H |
||||
|
||||
#include <esp8266.h> |
||||
|
||||
#ifdef DEBUG_INI |
||||
#define ini_error(fmt, ...) error("[INI] "#fmt, ##__VA_ARGS__) |
||||
#else |
||||
#define ini_error(fmt, ...) |
||||
#endif |
||||
|
||||
// buffer sizes
|
||||
#define INI_KEY_MAX 64 |
||||
#define INI_VALUE_MAX 256 |
||||
|
||||
/**
|
||||
* INI parser callback, called for each found key-value pair. |
||||
* |
||||
* @param section - current section, empty string for global keys |
||||
* @param key - found key (trimmed of whitespace) |
||||
* @param value - value, trimmed of quotes or whitespace |
||||
* @param userData - opaque user data pointer, general purpose |
||||
*/ |
||||
typedef void (*IniParserCallback)(const char *section, const char *key, const char *value, void *userData); |
||||
|
||||
/**
|
||||
* Begin parsing a stream |
||||
* |
||||
* @param callback - key callback to assign |
||||
* @param userData - optional user data that willb e passed to the callback |
||||
*/ |
||||
void ini_parse_begin(IniParserCallback callback, void *userData); |
||||
|
||||
/**
|
||||
* End parse stream. |
||||
* Flushes what remains in the buffer and removes callback. |
||||
* |
||||
* @returns userData or NULL if none |
||||
*/ |
||||
void* ini_parse_end(void); |
||||
|
||||
/**
|
||||
* Parse a string (needn't be complete line or file) |
||||
* |
||||
* @param data - string to parse |
||||
* @param len - string length (0 = use strlen) |
||||
*/ |
||||
void ini_parse(const char *data, size_t len); |
||||
|
||||
/**
|
||||
* Parse a complete file loaded to string |
||||
* |
||||
* @param text - entire file as string |
||||
* @param len - file length (0 = use strlen) |
||||
* @param callback - key callback |
||||
* @param userData - optional user data for key callback |
||||
*/ |
||||
void ini_parse_file(const char *text, size_t len, IniParserCallback callback, void *userData); |
||||
|
||||
/**
|
||||
* Explicitly reset the parser |
||||
*/ |
||||
void ini_parse_reset(void); |
||||
|
||||
#endif // INIPARSE_STREAM_H
|
||||
@ -0,0 +1,284 @@ |
||||
|
||||
/* Ragel constants block */ |
||||
#include "ini_parser.h" |
||||
|
||||
// Ragel setup |
||||
%%{ |
||||
machine ini; |
||||
write data; |
||||
alphtype unsigned char; |
||||
}%% |
||||
|
||||
// Persistent state |
||||
static int8_t cs = -1; //!< Ragel's Current State variable |
||||
static uint32_t buff_i = 0; //!< Write pointer for the buffers |
||||
static char value_quote = 0; //!< Quote character of the currently collected value |
||||
static bool value_nextesc = false; //!< Next character is escaped, trated specially, and if quote, as literal quote character |
||||
static IniParserCallback keyCallback = NULL; //!< Currently assigned callback |
||||
static void *userdata = NULL; //!< Currently assigned user data for the callback |
||||
|
||||
// Buffers |
||||
static char keybuf[INI_KEY_MAX]; |
||||
static char secbuf[INI_KEY_MAX]; |
||||
static char valbuf[INI_VALUE_MAX]; |
||||
|
||||
// See header for doxygen! |
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parse_reset_partial(void) |
||||
{ |
||||
buff_i = 0; |
||||
value_quote = 0; |
||||
value_nextesc = false; |
||||
} |
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parse_reset(void) |
||||
{ |
||||
ini_parse_reset_partial(); |
||||
keybuf[0] = secbuf[0] = valbuf[0] = 0; |
||||
%% write init; |
||||
} |
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parser_error(const char* msg) |
||||
{ |
||||
ini_error("Parser error: %s", msg); |
||||
ini_parse_reset_partial(); |
||||
} |
||||
|
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parse_begin(IniParserCallback callback, void *userData) |
||||
{ |
||||
keyCallback = callback; |
||||
userdata = userData; |
||||
ini_parse_reset(); |
||||
} |
||||
|
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
*ini_parse_end(void) |
||||
{ |
||||
ini_parse("\n", 1); |
||||
if (keyCallback) { |
||||
keyCallback = NULL; |
||||
} |
||||
|
||||
void *ud = userdata; |
||||
userdata = NULL; |
||||
return ud; |
||||
} |
||||
|
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parse_file(const char *text, size_t len, IniParserCallback callback, void *userData) |
||||
{ |
||||
ini_parse_begin(callback, userData); |
||||
ini_parse(text, len); |
||||
ini_parse_end(); |
||||
} |
||||
|
||||
static void ICACHE_FLASH_ATTR |
||||
rtrim_buf(char *buf, int32_t end) |
||||
{ |
||||
if (end > 0) { |
||||
while ((uint8_t)buf[--end] < 33); |
||||
end++; // go past the last character |
||||
} |
||||
|
||||
buf[end] = 0; |
||||
} |
||||
|
||||
|
||||
void ICACHE_FLASH_ATTR |
||||
ini_parse(const char *newstr, size_t len) |
||||
{ |
||||
int32_t i; |
||||
char c; |
||||
bool isnl; |
||||
bool isquot; |
||||
|
||||
// Load new data to Ragel vars |
||||
const uint8_t *p; |
||||
const uint8_t *eof; |
||||
const uint8_t *pe; |
||||
|
||||
if (len == 0) while(newstr[++len] != 0); // alternative to strlen |
||||
|
||||
p = (const uint8_t *) newstr; |
||||
eof = NULL; |
||||
pe = (const uint8_t *) (newstr + len); |
||||
|
||||
// Init Ragel on the first run |
||||
if (cs == -1) { |
||||
ini_parse_reset(); |
||||
} |
||||
|
||||
// The parser |
||||
%%{ |
||||
#/ * |
||||
ispace = [ \t]; # inline space |
||||
wchar = any - 0..8 - 10..31; |
||||
#apos = '\''; |
||||
#quot = '\"'; |
||||
nonl = [^\r\n]; |
||||
nl = '\r'? '\n'; |
||||
|
||||
# ---- [SECTION] ---- |
||||
|
||||
action sectionStart { |
||||
buff_i = 0; |
||||
fgoto section; |
||||
} |
||||
|
||||
action sectionChar { |
||||
if (buff_i >= INI_KEY_MAX) { |
||||
ini_parser_error("Section name too long"); |
||||
fgoto discard2eol; |
||||
} |
||||
keybuf[buff_i++] = fc; |
||||
} |
||||
|
||||
action sectionEnd { |
||||
// we need a separate buffer for the result, otherwise a failed |
||||
// partial parse would corrupt the section string |
||||
rtrim_buf(keybuf, buff_i); |
||||
for (i = 0; (c = keybuf[i]) != 0; i++) secbuf[i] = c; |
||||
secbuf[i] = 0; |
||||
fgoto main; |
||||
} |
||||
|
||||
section := |
||||
( |
||||
ispace* <: ((wchar - ']')+ @sectionChar) ']' @sectionEnd |
||||
) $!{ |
||||
ini_parser_error("Syntax error in [section]"); |
||||
if(fc == '\n') fgoto main; else fgoto discard2eol; |
||||
}; |
||||
|
||||
# ---- KEY=VALUE ---- |
||||
|
||||
action keyStart { |
||||
buff_i = 0; |
||||
keybuf[buff_i++] = fc; // add the first char |
||||
fgoto keyvalue; |
||||
} |
||||
|
||||
action keyChar { |
||||
if (buff_i >= INI_KEY_MAX) { |
||||
ini_parser_error("Key too long"); |
||||
fgoto discard2eol; |
||||
} |
||||
keybuf[buff_i++] = fc; |
||||
} |
||||
|
||||
action keyEnd { |
||||
rtrim_buf(keybuf, buff_i); |
||||
|
||||
// --- Value begin --- |
||||
buff_i = 0; |
||||
value_quote = 0; |
||||
value_nextesc = false; |
||||
} |
||||
|
||||
action valueChar { |
||||
isnl = (fc == '\r' || fc == '\n'); |
||||
isquot = (fc == '\'' || fc == '"'); |
||||
|
||||
// detect our starting quote |
||||
if (isquot && !value_nextesc && buff_i == 0 && value_quote == 0) { |
||||
value_quote = fc; |
||||
goto valueCharDone; |
||||
} |
||||
|
||||
if (buff_i >= INI_VALUE_MAX) { |
||||
ini_parser_error("Value too long"); |
||||
fgoto discard2eol; |
||||
} |
||||
|
||||
// end of string - clean up and report |
||||
if ((!value_nextesc && fc == value_quote) || isnl) { |
||||
if (isnl && value_quote) { |
||||
ini_parser_error("Unterminated string"); |
||||
fgoto main; |
||||
} |
||||
|
||||
// unquoted: trim from the end |
||||
if (!value_quote) { |
||||
rtrim_buf(valbuf, buff_i); |
||||
} else { |
||||
valbuf[buff_i] = 0; |
||||
} |
||||
|
||||
if (keyCallback) { |
||||
keyCallback(secbuf, keybuf, valbuf, userdata); |
||||
} |
||||
|
||||
// we don't want to discard to eol if the string was terminated by eol |
||||
// - would delete the next line |
||||
|
||||
if (isnl) fgoto main; else fgoto discard2eol; |
||||
} |
||||
|
||||
c = fc; |
||||
// escape... |
||||
if (value_nextesc) { |
||||
if (fc == 'n') c = '\n'; |
||||
else if (fc == 'r') c = '\r'; |
||||
else if (fc == 't') c = '\t'; |
||||
else if (fc == 'e') c = '\033'; |
||||
} |
||||
|
||||
// collecting characters... |
||||
if (value_nextesc || fc != '\\') { // is quoted, or is not a quoting backslash - literal character |
||||
valbuf[buff_i++] = c; |
||||
} |
||||
|
||||
value_nextesc = (!value_nextesc && fc == '\\'); |
||||
valueCharDone:; |
||||
} |
||||
|
||||
# use * for key, first char is already consumed. |
||||
keyvalue := |
||||
( |
||||
([^\n=:]* @keyChar %keyEnd) |
||||
[=:] ispace* <: nonl* @valueChar nl @valueChar |
||||
) $!{ |
||||
ini_parser_error("Syntax error in key=value"); |
||||
if(fc == '\n') fgoto main; else fgoto discard2eol; |
||||
}; |
||||
|
||||
# ---- COMMENT ---- |
||||
|
||||
comment := |
||||
( |
||||
nonl* nl |
||||
@{ fgoto main; } |
||||
) $!{ |
||||
ini_parser_error("Syntax error in comment"); |
||||
if(fc == '\n') fgoto main; else fgoto discard2eol; |
||||
}; |
||||
|
||||
# ---- CLEANUP ---- |
||||
|
||||
discard2eol := nonl* nl @{ fgoto main; }; |
||||
|
||||
# ---- ROOT ---- |
||||
|
||||
main := |
||||
(space* |
||||
( |
||||
'[' @sectionStart | |
||||
[#;] @{ fgoto comment; } | |
||||
(wchar - [\t =:]) @keyStart |
||||
) |
||||
) $!{ |
||||
ini_parser_error("Syntax error in root"); |
||||
fgoto discard2eol; |
||||
}; |
||||
|
||||
write exec; |
||||
#*/ |
||||
}%% |
||||
} |
||||
Loading…
Reference in new issue