emileclarkb/hammer
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

add "VRULE" family of macros to attach validations like actions

Browse source
This commit is contained in:
Sven M. Hallberg 2013-01-17 17:44:41 +01:00
parent 6515a80c3a
commit e875dcd19a
2 changed files with 55 additions and 46 deletions
Download patch file Download diff file Expand all files Collapse all files

17
examples/dns.c
View file

@ -12,10 +12,10 @@
/// ///
// Semantic Actions and Validations // Validations
/// ///
bool is_zero(HParseResult *p) { bool validate_hdzero(HParseResult *p) {
if (TT_UINT != p->ast->token_type) if (TT_UINT != p->ast->token_type)
return false; return false;
return (0 == p->ast->uint); return (0 == p->ast->uint);
@ -25,7 +25,7 @@ bool is_zero(HParseResult *p) {
* Every DNS message should have QDCOUNT entries in the question * Every DNS message should have QDCOUNT entries in the question
* section, and ANCOUNT+NSCOUNT+ARCOUNT resource records. * section, and ANCOUNT+NSCOUNT+ARCOUNT resource records.
*/ */
bool validate_dns(HParseResult *p) { bool validate_message(HParseResult *p) {
if (TT_SEQUENCE != p->ast->token_type) if (TT_SEQUENCE != p->ast->token_type)
return false; return false;
dns_header_t *header = H_FIELD(dns_header_t, 0); dns_header_t *header = H_FIELD(dns_header_t, 0);
@ -42,6 +42,10 @@ bool validate_dns(HParseResult *p) {
return true; return true;
} }
///
// Semantic Actions
///
uint8_t* get_cs(const HCountedArray *arr) { uint8_t* get_cs(const HCountedArray *arr) {
uint8_t *ret = h_arena_malloc(arr->arena, sizeof(uint8_t)*arr->used); uint8_t *ret = h_arena_malloc(arr->arena, sizeof(uint8_t)*arr->used);
for (size_t i=0; i<arr->used; ++i) for (size_t i=0; i<arr->used; ++i)
@ -272,7 +276,7 @@ const HParser* init_parser() {
return ret; return ret;
H_RULE (domain, init_domain()); H_RULE (domain, init_domain());
H_ARULE(hdzero, h_attr_bool(h_bits(3, false), is_zero)); H_AVRULE(hdzero, h_bits(3, false));
H_ARULE (header, h_sequence(h_bits(16, false), // ID H_ARULE (header, h_sequence(h_bits(16, false), // ID
h_bits(1, false), // QR h_bits(1, false), // QR
h_bits(4, false), // opcode h_bits(4, false), // opcode
@ -308,12 +312,11 @@ const HParser* init_parser() {
h_uint32(), // TTL h_uint32(), // TTL
rdata, // RDLENGTH+RDATA rdata, // RDLENGTH+RDATA
NULL)); NULL));
H_ARULE(message, h_attr_bool(h_sequence(header, H_AVRULE(message, h_sequence(header,
h_many(question), h_many(question),
h_many(rr), h_many(rr),
h_end_p(), h_end_p(),
NULL), NULL));
validate_dns));
ret = message; ret = message;
return ret; return ret;

6
examples/glue.h
View file

@ -10,6 +10,12 @@
#define H_RULE(rule, def) const HParser *rule = def #define H_RULE(rule, def) const HParser *rule = def
#define H_ARULE(rule, def) const HParser *rule = h_action(def, act_ ## rule) #define H_ARULE(rule, def) const HParser *rule = h_action(def, act_ ## rule)
#define H_VRULE(rule, def) const HParser *rule = \
h_attr_bool(def, validate_ ## rule)
#define H_VARULE(rule, def) const HParser *rule = \
h_attr_bool(h_action(def, act_ ## rule), validate_ ## rule)
#define H_AVRULE(rule, def) const HParser *rule = \
h_action(h_attr_bool(def, validate_ ## rule), act_ ## rule)
const HParsedToken *act_ignore(const HParseResult *p); const HParsedToken *act_ignore(const HParseResult *p);
const HParsedToken *act_index(int i, const HParseResult *p); const HParsedToken *act_index(int i, const HParseResult *p);