bc2fb68098
we want to allow filter and similar complex constructs to be used in commands
and we should avoid code duplication), only with CLI_MARKER token prepended
before the whole input.
Defined macro CF_CLI(cmd, args, help) for defining CLI commands in .Y files.
The first argument specifies the command itself, the remaining two arguments
are copied to the help file (er, will be copied after the help file starts
to exist). This macro automatically creates a skeleton rule for the command,
you only need to append arguments as in:
CF_CLI(STEAL MONEY, <$>, [[Steal <$> US dollars or equivalent in any other currency]]): NUM {
cli_msg(0, "%d$ stolen", $3);
} ;
Also don't forget to reset lexer state between inputs.
123 lines
2.2 KiB
Plaintext
123 lines
2.2 KiB
Plaintext
/*
|
|
* BIRD -- Configuration Parser Top
|
|
*
|
|
* (c) 1998--1999 Martin Mares <mj@ucw.cz>
|
|
*
|
|
* Can be freely distributed and used under the terms of the GNU GPL.
|
|
*/
|
|
|
|
CF_HDR
|
|
|
|
#include "nest/bird.h"
|
|
#include "conf/conf.h"
|
|
#include "lib/resource.h"
|
|
#include "lib/socket.h"
|
|
#include "lib/timer.h"
|
|
#include "nest/protocol.h"
|
|
#include "nest/iface.h"
|
|
#include "nest/route.h"
|
|
#include "nest/cli.h"
|
|
#include "filter/filter.h"
|
|
|
|
#define cli_msg(x...) cli_printf(this_cli, x)
|
|
|
|
CF_DECLS
|
|
|
|
%union {
|
|
int i;
|
|
u32 i32;
|
|
ip_addr a;
|
|
struct symbol *s;
|
|
char *t;
|
|
struct rtable_config *r;
|
|
struct f_inst *x;
|
|
struct filter *f;
|
|
struct f_tree *e;
|
|
struct f_val v;
|
|
struct password_item *p;
|
|
}
|
|
|
|
%token END CLI_MARKER
|
|
%token <i> NUM
|
|
%token <i32> RTRID
|
|
%token <a> IPA
|
|
%token <s> SYM
|
|
%token <t> TEXT
|
|
|
|
%type <i> expr bool pxlen datetime
|
|
|
|
%nonassoc '=' '<' '>' '~' IF ELSE '.'
|
|
%left '+' '-'
|
|
%left '*' '/' '%'
|
|
%left '!'
|
|
|
|
CF_KEYWORDS(DEFINE, ON, OFF, YES, NO)
|
|
|
|
CF_GRAMMAR
|
|
|
|
/* Basic config file structure */
|
|
|
|
config: conf_entries END { return 0; }
|
|
| CLI_MARKER cli_cmd END { return 0; }
|
|
;
|
|
|
|
conf_entries:
|
|
/* EMPTY */
|
|
| conf_entries conf
|
|
;
|
|
|
|
CF_ADDTO(conf, ';')
|
|
|
|
/* Constant expressions */
|
|
|
|
expr:
|
|
NUM
|
|
| expr '+' expr { $$ = $1 + $3; }
|
|
| expr '-' expr { $$ = $1 - $3; }
|
|
| expr '*' expr { $$ = $1 * $3; }
|
|
| expr '/' expr { if ($3) $$ = $1 / $3; else cf_error("Division by zero"); }
|
|
| expr '%' expr { if ($3) $$ = $1 % $3; else cf_error("Division by zero"); }
|
|
| '(' expr ')' { $$ = $2; }
|
|
| SYM { if ($1->class != SYM_NUMBER) cf_error("Number expected"); else $$ = $1->aux; }
|
|
;
|
|
|
|
CF_ADDTO(conf, definition)
|
|
definition:
|
|
DEFINE SYM '=' expr ';' {
|
|
cf_define_symbol($2, SYM_NUMBER, NULL);
|
|
$2->aux = $4;
|
|
}
|
|
;
|
|
|
|
/* Switches */
|
|
|
|
bool:
|
|
expr {$$ = !!$1; }
|
|
| ON { $$ = 1; }
|
|
| YES { $$ = 1; }
|
|
| OFF { $$ = 0; }
|
|
| NO { $$ = 0; }
|
|
| /* Silence means agreement */ { $$ = 1; }
|
|
;
|
|
|
|
/* Prefixes and netmasks */
|
|
|
|
pxlen:
|
|
'/' NUM {
|
|
if ($2 < 0 || $2 > 32) cf_error("Invalid prefix length %d", $2);
|
|
$$ = $2;
|
|
}
|
|
| ':' IPA {
|
|
$$ = ipa_mklen($2);
|
|
if ($$ < 0) cf_error("Invalid netmask %I", $2);
|
|
}
|
|
;
|
|
|
|
datetime: /* Return seconds from epoch, FIXME we want be more user friendly */
|
|
NUM { $$ = $1; }
|
|
;
|
|
|
|
CF_CODE
|
|
|
|
CF_END
|