Return to gen_parser.m4 CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / bird / conf

Annotation of embedaddon/bird/conf/gen_parser.m4, revision 1.1.1.1

1.1       misho       1: m4_divert(-1)m4_dnl
                      2: #
                      3: #      BIRD -- Generator of Configuration Grammar
                      4: #
                      5: #      (c) 1998--1999 Martin Mares <mj@atrey.karlin.mff.cuni.cz>
                      6: #
                      7: #      Can be freely distributed and used under the terms of the GNU GPL.
                      8: #
                      9: 
                     10: # Diversions used:
                     11: #      1       includes
                     12: #      2       types etc.
                     13: #      3       rules
                     14: #      4       C code
                     15: 
                     16: # Common aliases
                     17: m4_define(DNL, `m4_dnl')
                     18: 
                     19: # Define macros for defining sections
                     20: m4_define(CF_ZONE, `m4_divert($1)/* $2 from m4___file__ */')
                     21: m4_define(CF_HDR, `CF_ZONE(1, Headers)')
                     22: m4_define(CF_DEFINES, `CF_ZONE(1, Defines)')
                     23: m4_define(CF_DECLS, `CF_ZONE(2, Declarations)')
                     24: m4_define(CF_GRAMMAR, `CF_ZONE(3, Grammar)')
                     25: m4_define(CF_CODE, `CF_ZONE(4, C Code)')
                     26: m4_define(CF_END, `m4_divert(-1)')
                     27: 
                     28: # Simple iterator
                     29: m4_define(CF_itera, `m4_ifelse($#, 1, [[CF_iter($1)]], [[CF_iter($1)[[]]CF_itera(m4_shift($@))]])')
                     30: m4_define(CF_iterate, `m4_define([[CF_iter]], m4_defn([[$1]]))CF_itera($2)')
                     31: 
                     32: # Keywords act as untyped %token
                     33: m4_define(CF_keywd, `m4_ifdef([[CF_tok_$1]],,[[m4_define([[CF_tok_$1]],1)m4_define([[CF_toks]],CF_toks $1)]])')
                     34: m4_define(CF_KEYWORDS, `m4_define([[CF_toks]],[[]])CF_iterate([[CF_keywd]], [[$@]])m4_ifelse(CF_toks,,,%token[[]]CF_toks
                     35: )DNL')
                     36: 
                     37: # Dynamic syntax rules
                     38: m4_define(CF_dyn_rules,)
                     39: m4_define(CF_ADDTO, `m4_define([[CF_rule_$1]],m4_ifdef([[CF_rule_$1]],CF_rule_$1 | ,[[m4_define([[CF_dyn_rules]],CF_dyn_rules[[CF_RULE($1)
                     40: ]])]])$2)DNL')
                     41: 
                     42: # CLI commands
                     43: m4_define(CF_CLI, `m4_define([[CF_cmd]], cmd_[[]]m4_translit($1, [[ ]], _))DNL
                     44: m4_divert(2)CF_KEYWORDS(m4_translit($1, [[ ]], [[,]]))
                     45: m4_divert(3)CF_ADDTO(cli_cmd, CF_cmd)
                     46: CF_cmd: $1 $2 END')
                     47: m4_define(CF_CLI_CMD, `')
                     48: m4_define(CF_CLI_HELP, `')
                     49: 
                     50: # ENUM declarations are ignored
                     51: m4_define(CF_ENUM, `')
                     52: 
                     53: # After all configuration templates end, we finally generate the grammar file.
                     54: m4_m4wrap(`
                     55: m4_divert(0)DNL
                     56: %{
                     57: m4_undivert(1)DNL
                     58: %}
                     59: 
                     60: m4_undivert(2)DNL
                     61: 
                     62: %%
                     63: m4_undivert(3)DNL
                     64: 
                     65: /* Dynamic rules */
                     66: 
                     67: m4_define(CF_RULE, [[$1: CF_rule_$1 ;]])
                     68: CF_dyn_rules
                     69: %%
                     70: m4_undivert(4)DNL
                     71: ')
                     72: 
                     73: # As we are processing C source, we must access all M4 primitives via
                     74: # m4_* and also set different quoting convention: `[[' and ']]'
                     75: m4_changequote([[,]])