0
0
mirror of https://gitlab.nic.cz/labs/bird.git synced 2024-11-15 07:38:43 +00:00
bird/conf/gen_parser.m4

73 lines
1.9 KiB
Plaintext
Raw Normal View History

m4_divert(-1)m4_dnl
#
# BIRD -- Generator of Configuration Grammar
#
# (c) 1998--1999 Martin Mares <mj@atrey.karlin.mff.cuni.cz>
#
# Can be freely distributed and used under the terms of the GNU GPL.
#
# Diversions used:
# 1 includes
# 2 context structure
# 3 inline C code and macros
# 4 parser declarations
# 5 grammar rules
# 6 C code
# Common aliases
m4_define(DNL, `m4_dnl')
# Define macros for defining sections
m4_define(CF_ZONE, `m4_divert($1)/* $2 from m4___file__ */')
m4_define(CF_HDR, `CF_ZONE(1, Headers)')
m4_define(CF_CTX, `CF_ZONE(2, Context)')
m4_define(CF_DEFINES, `CF_ZONE(3, Defines)')
m4_define(CF_DECLS, `CF_ZONE(4, Bison Declarations)')
m4_define(CF_GRAMMAR, `CF_ZONE(5, Grammar)')
m4_define(CF_CODE, `CF_ZONE(6, C Code)')
m4_define(CF_END, `m4_divert(-1)')
# Simple iterator
m4_define(CF_itera, `m4_ifelse($#, 1, [[CF_iter($1)]], [[CF_iter($1)[[]]CF_itera(m4_shift($@))]])')
m4_define(CF_iterate, `m4_define([[CF_iter]], m4_defn([[$1]]))CF_itera($2)')
# Keywords act as untyped %token
m4_define(CF_keywd, `m4_ifdef([[CF_tok_$1]],,[[m4_define([[CF_tok_$1]],1)m4_define([[CF_toks]],CF_toks $1)]])')
m4_define(CF_KEYWORDS, `m4_define([[CF_toks]],[[]])CF_iterate([[CF_keywd]], [[$@]])m4_ifelse(CF_toks,,,%token[[]]CF_toks
)DNL')
# CLI commands
m4_define(CF_CLI, `m4_define([[CF_cmd]], cmd_[[]]m4_translit($1, [[ ]], _))DNL
m4_divert(4)CF_KEYWORDS(m4_translit($1, [[ ]], [[,]]))
m4_divert(5)cli_cmd: CF_cmd
1999-11-17 12:00:21 +00:00
CF_cmd: $1 $2 END')
m4_define(CF_CLI_CMD, `')
1999-11-17 12:00:21 +00:00
m4_define(CF_CLI_HELP, `')
1999-11-15 11:35:41 +00:00
# ENUM declarations are ignored
m4_define(CF_ENUM, `')
# After all configuration templates end, we finally generate the grammar file.
m4_m4wrap(`
m4_divert(0)DNL
%{
m4_undivert(1)DNL
m4_undivert(3)DNL
%}
m4_undivert(4)DNL
%%
m4_undivert(5)DNL
%%
m4_undivert(6)DNL
')
# As we are processing C source, we must access all M4 primitives via
# m4_* and also set different quoting convention: `[[' and ']]'
m4_changequote([[,]])