125 lines
3.1 KiB
C
125 lines
3.1 KiB
C
|
/*
|
||
|
|
* BIRD Internet Routing Daemon -- Filter instructions
|
||
|
|
*
|
||
|
|
* (c) 2018--2019 Maria Matejka <mq@jmq.cz>
|
||
|
|
*
|
||
|
|
* Can be freely distributed and used under the terms of the GNU GPL.
|
||
|
|
*/
|
||
|
|
|
||
|
|
/* Filter instruction words */
|
||
|
|
#define FI__TWOCHAR(a,b) ((a<<8) | b)
|
||
|
|
#define FI__LIST \
|
||
|
|
F(FI_NOP, 0, '0') \
|
||
|
|
F(FI_ADD, 0, '+') \
|
||
|
|
F(FI_SUBTRACT, 0, '-') \
|
||
|
|
F(FI_MULTIPLY, 0, '*') \
|
||
|
|
F(FI_DIVIDE, 0, '/') \
|
||
|
|
F(FI_AND, 0, '&') \
|
||
|
|
F(FI_OR, 0, '|') \
|
||
|
|
F(FI_PAIR_CONSTRUCT, 'm', 'p') \
|
||
|
|
F(FI_EC_CONSTRUCT, 'm', 'c') \
|
||
|
|
F(FI_LC_CONSTRUCT, 'm', 'l') \
|
||
|
|
F(FI_PATHMASK_CONSTRUCT, 'm', 'P') \
|
||
|
|
F(FI_NEQ, '!', '=') \
|
||
|
|
F(FI_EQ, '=', '=') \
|
||
|
|
F(FI_LT, 0, '<') \
|
||
|
|
F(FI_LTE, '<', '=') \
|
||
|
|
F(FI_NOT, 0, '!') \
|
||
|
|
F(FI_MATCH, 0, '~') \
|
||
|
|
F(FI_NOT_MATCH, '!', '~') \
|
||
|
|
F(FI_DEFINED, 'd', 'e') \
|
||
|
|
F(FI_TYPE, 0, 'T') \
|
||
|
|
F(FI_IS_V4, 'I', 'i') \
|
||
|
|
F(FI_SET, 0, 's') \
|
||
|
|
F(FI_CONSTANT, 0, 'c') \
|
||
|
|
F(FI_VARIABLE, 0, 'V') \
|
||
|
|
F(FI_CONSTANT_INDIRECT, 0, 'C') \
|
||
|
|
F(FI_PRINT, 0, 'p') \
|
||
|
|
F(FI_CONDITION, 0, '?') \
|
||
|
|
F(FI_PRINT_AND_DIE, 'p', ',') \
|
||
|
|
F(FI_RTA_GET, 0, 'a') \
|
||
|
|
F(FI_RTA_SET, 'a', 'S') \
|
||
|
|
F(FI_EA_GET, 'e', 'a') \
|
||
|
|
F(FI_EA_SET, 'e', 'S') \
|
||
|
|
F(FI_PREF_GET, 0, 'P') \
|
||
|
|
F(FI_PREF_SET, 'P', 'S') \
|
||
|
|
F(FI_LENGTH, 0, 'L') \
|
||
|
|
F(FI_ROA_MAXLEN, 'R', 'M') \
|
||
|
|
F(FI_ROA_ASN, 'R', 'A') \
|
||
|
|
F(FI_SADR_SRC, 'n', 's') \
|
||
|
|
F(FI_IP, 'c', 'p') \
|
||
|
|
F(FI_ROUTE_DISTINGUISHER, 'R', 'D') \
|
||
|
|
F(FI_AS_PATH_FIRST, 'a', 'f') \
|
||
|
|
F(FI_AS_PATH_LAST, 'a', 'l') \
|
||
|
|
F(FI_AS_PATH_LAST_NAG, 'a', 'L') \
|
||
|
|
F(FI_RETURN, 0, 'r') \
|
||
|
|
F(FI_CALL, 'c', 'a') \
|
||
|
|
F(FI_DROP_RESULT, 'd', 'r') \
|
||
|
|
F(FI_CLEAR_LOCAL_VARS, 'c', 'V') \
|
||
|
|
F(FI_SWITCH, 'S', 'W') \
|
||
|
|
F(FI_IP_MASK, 'i', 'M') \
|
||
|
|
F(FI_PATH_PREPEND, 'A', 'p') \
|
||
|
|
F(FI_CLIST_ADD, 'C', 'a') \
|
||
|
|
F(FI_CLIST_DEL, 'C', 'd') \
|
||
|
|
F(FI_CLIST_FILTER, 'C', 'f') \
|
||
|
|
F(FI_ROA_CHECK_IMPLICIT, 'R', 'i') \
|
||
|
|
F(FI_ROA_CHECK_EXPLICIT, 'R', 'e') \
|
||
|
|
F(FI_FORMAT, 0, 'F') \
|
||
|
|
F(FI_ASSERT, 'a', 's')
|
||
|
|
|
||
|
|
/* The enum itself */
|
||
|
|
enum f_instruction_code {
|
||
|
|
#define F(c,a,b) \
|
||
|
|
c,
|
||
|
|
FI__LIST
|
||
|
|
#undef F
|
||
|
|
FI__MAX,
|
||
|
|
} PACKED;
|
||
|
|
|
||
|
|
/* Convert the instruction back to the enum name */
|
||
|
|
const char *f_instruction_name(enum f_instruction_code fi);
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/* Instruction structure for config */
|
||
|
|
struct f_inst {
|
||
|
|
const struct f_inst *next; /* Next instruction to be executed */
|
||
|
|
union { /* Instruction content */
|
||
|
|
struct { /* Instruction code for dispatching purposes */
|
||
|
|
enum f_instruction_code fi_code;
|
||
|
|
};
|
||
|
|
|
||
|
|
struct {
|
||
|
|
enum f_instruction_code fi_code_a;
|
||
|
|
const struct f_inst *p[3]; /* Three arguments at most */
|
||
|
|
};
|
||
|
|
|
||
|
|
struct {
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
struct {
|
||
|
|
enum f_instruction_code
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
enum f_iknst
|
||
|
|
u16 aux; /* Extension to instruction code, T_*, EA_*, EAF_* */
|
||
|
|
union {
|
||
|
|
|
||
|
|
union f_inst_attr a[3]; /* The three arguments */
|
||
|
|
struct f_val val; /* The value if FI_CONSTANT */
|
||
|
|
struct {
|
||
|
|
union f_inst_attr sa_a[1];
|
||
|
|
struct f_static_attr sa; /* Static attribute def for FI_RTA_* */
|
||
|
|
};
|
||
|
|
struct {
|
||
|
|
union f_inst_attr da_a[1];
|
||
|
|
struct f_dynamic_attr da; /* Dynamic attribute def for FI_EA_* */
|
||
|
|
};
|
||
|
|
};
|
||
|
|
int lineno;
|
||
|
|
};
|
||
|
|
|