Filter: Moved singleton member definitions to f-inst.c

diff --git a/filter/decl.m4 b/filter/decl.m4
index 898b298d473b4219cb25b8489573c1e98b30527e..786fee31f98bd36991f2507d000b3a845f92785a 100644 (file)
--- a/filter/decl.m4
+++ b/filter/decl.m4
@@ -140,14 +140,6 @@ m4_define([[INST_INVAL]], [[$2]])m4_dnl
 FID_ALL() m4_dnl
 ')
 
-m4_dnl FID_MEMBER call:
-m4_dnl type
-m4_dnl name in f_inst
-m4_dnl name in f_line_item
-m4_dnl comparator for same
-m4_dnl dump format string
-m4_dnl dump format args
-m4_dnl interpreter body
 m4_define(FID_MEMBER, `m4_dnl
 FID_LINE_IN
 $1 $2;
@@ -230,15 +222,11 @@ m4_define(RESULT_VOID, `RESULT_VAL([[ (struct f_val) { .type = T_VOID } ]])')
 
 m4_define(SYMBOL, `FID_MEMBER(const struct symbol *, sym, sym,
 [[strcmp(f1->sym->name, f2->sym->name) || (f1->sym->class != f2->sym->class)]], symbol %s, item->sym->name, const struct symbol *sym = whati->sym)')
-m4_define(VAL, `FID_MEMBER(struct f_val $1, val, val m4_ifelse($1,,,[0]), [[!val_same(&f1->val, &f2->val)]], value %s, val_dump(&item->val),)')
-m4_define(FRET, `FID_MEMBER(enum filter_return, fret, fret, f1->fret != f2->fret, %s, filter_return_str(item->fret), enum filter_return fret = whati->fret)')
+m4_define(FRET, `')
 m4_define(ECS, `FID_MEMBER(enum ec_subtype, ecs, ecs, f1->ecs != f2->ecs, ec subtype %s, ec_subtype_str(item->ecs), enum ec_subtype ecs = whati->ecs)')
 m4_define(RTC, `FID_MEMBER(const struct rtable_config *, rtc, rtc, [[strcmp(f1->rtc->name, f2->rtc->name)]], route table %s, item->rtc->name, struct rtable *table = whati->rtc->table)')
 m4_define(STATIC_ATTR, `FID_MEMBER(struct f_static_attr, sa, sa, f1->sa.sa_code != f2->sa.sa_code,,, struct f_static_attr sa = whati->sa)')
 m4_define(DYNAMIC_ATTR, `FID_MEMBER(struct f_dynamic_attr, da, da, f1->da.ea_code != f2->da.ea_code,,, struct f_dynamic_attr da = whati->da)')
-m4_define(COUNT, `FID_MEMBER(uint, count, count, f1->count != f2->count, number %u, item->count)')
-m4_define(TREE, `FID_MEMBER(const struct f_tree *, tree, tree, [[!same_tree(f1->tree, f2->tree)]], tree %p, item->tree, const struct f_tree *tree = whati->tree)')
-m4_define(STRING, `FID_MEMBER(const char *, s, s, [[strcmp(f1->s, f2->s)]], string \"%s\", item->s)')
 
 m4_define(FID_WR_PUT_LIST)
 m4_define(FID_WR_PUT_ALSO, `m4_define([[FID_WR_PUT_LIST]],FID_WR_PUT_LIST()[[FID_WR_DPUT(]]FID_WR_DIDX[[)FID_WR_DPUT(]]$1[[)]])m4_define([[FID_WR_DIDX]],m4_eval(FID_WR_DIDX+1))m4_divert(FID_WR_DIDX)')

diff --git a/filter/f-inst.c b/filter/f-inst.c
index d48a60866f526ef6148813bc092538106fe85d02..ffe07738a2dd84a7259b568e2bd68095c14a37f5 100644 (file)
--- a/filter/f-inst.c
+++ b/filter/f-inst.c
@@ -20,21 +20,31 @@
  *     for several C sources; every instruction block gets expanded into many
  *     different places.
  *
+ *     All the arguments are processed literally; if you need an argument including comma,
+ *     you have to quote it by [[ ... ]]
+ *
  *     What is the syntax here?
  *     m4_dnl  INST(FI_NOP, in, out) {                 enum value, input args, output args
  *     m4_dnl    ARG(num, type);                       argument, its id (in data fields) and type
  *     m4_dnl    ARG_ANY(num);                         argument with no type check
  *     m4_dnl    LINE(num, unused);                    this argument has to be converted to its own f_line
- *     m4_dnl    ECS;                                  extended community subtype
- *     m4_dnl    COUNT(unused);                        simply a uint
  *     m4_dnl    SYMBOL;                               symbol handed from config
- *     m4_dnl    FRET;                                 filter return value
  *     m4_dnl    STATIC_ATTR;                          static attribute definition
  *     m4_dnl    DYNAMIC_ATTR;                         dynamic attribute definition
  *     m4_dnl    RTC;                                  route table config
- *     m4_dnl    TREE;                                 a tree
  *     m4_dnl    ACCESS_RTE;                           this instruction needs route
  *     m4_dnl    ACCESS_EATTRS;                        this instruction needs extended attributes
+ *
+ *     m4_dnl    FID_MEMBER(                           custom instruction member
+ *     m4_dnl      C type,                             for storage in structs
+ *     m4_dnl      name in f_inst,                     how the member is named before linearization
+ *     m4_dnl      name in f_line_item,                how the member is named afterwards
+ *     m4_dnl      comparator for same(),              how the member is compared
+ *     m4_dnl      dump format string                  debug -> format string for bvsnprintf
+ *     m4_dnl      dump format args                    appropriate args
+ *     m4_dnl      interpreter body                    how to deal with this on execution
+ *     m4_dnl    )
+ *
  *     m4_dnl    RESULT(type, union-field, value);     putting this on value stack
  *     m4_dnl    RESULT_VAL(value-struct);             pass the struct f_val directly
  *     m4_dnl    RESULT_VOID;                          return undef
@@ -95,7 +105,8 @@
   INST(FI_EC_CONSTRUCT, 2, 1) {
     ARG_ANY(1);
     ARG(2, T_INT);
-    ECS;
+
+    FID_MEMBER(enum ec_subtype, ecs, ecs, f1->ecs != f2->ecs, ec subtype %s, ec_subtype_str(item->ecs), enum ec_subtype ecs = whati->ecs);
 
     int check, ipv4_used;
     u32 key, val;
@@ -141,7 +152,7 @@
 
   INST(FI_PATHMASK_CONSTRUCT, 0, 1) {
     ARG_ANY(1);
-    COUNT(2);
+    FID_MEMBER(uint, count, count, f1->count != f2->count, number of items %u, item->count);
 
     FID_NEW_BODY
       uint len = 0;
@@ -277,7 +288,7 @@
   }
 
   INST(FI_VAR_GET, 0, 1) {
-    SYMBOL(1);
+    SYMBOL;
     RESULT_VAL(fstk->vstk[curline.vbase + sym->offset]);
   }
 
@@ -346,7 +357,7 @@
     }
     FID_ALL
 
-    FRET(2);
+    FID_MEMBER(enum filter_return, fret, fret, f1->fret != f2->fret, %s, filter_return_str(item->fret), enum filter_return fret = whati->fret);
 
     if ((fret == F_NOP || (fret != F_NONL && (what->flags & FIF_PRINTED))) &&
        !(fs->flags & FF_SILENT))
@@ -789,7 +800,9 @@
 
   INST(FI_SWITCH, 1, 0) {
     ARG_ANY(1);
-    TREE;
+
+    FID_MEMBER(const struct f_tree *, tree, tree, [[!same_tree(f1->tree, f2->tree)]], tree %p, item->tree, const struct f_tree *tree = whati->tree);
+
     const struct f_tree *t = find_tree(tree, &v1);
     if (!t) {
       v1.type = T_VOID;
@@ -1034,7 +1047,8 @@
 
   INST(FI_ASSERT, 1, 0) {      /* Birdtest Assert */
     ARG(1, T_BOOL);
-    STRING;
+    FID_MEMBER(const char *, s, s, [[strcmp(f1->s, f2->s)]], string \"%s\", item->s);
+
     if (!bt_assert_hook)
       runtime("No bt_assert hook registered, can't assert");