summaryrefslogtreecommitdiffstats
path: root/conf
diff options
context:
space:
mode:
authorMartin Mares <mj@ucw.cz>1998-11-27 20:33:26 +0100
committerMartin Mares <mj@ucw.cz>1998-11-27 20:33:26 +0100
commit882c588a4060739a4820941cd1c6014bd10ab0db (patch)
tree359525a00123b1e5ab026c76a9104f49d03b18f5 /conf
parentd2ed2579fa365fa36b7882ef847b9e640290c05e (diff)
downloadbird-882c588a4060739a4820941cd1c6014bd10ab0db.tar
bird-882c588a4060739a4820941cd1c6014bd10ab0db.zip
This script takes configuration fragments and extracts keyword list
from them.
Diffstat (limited to 'conf')
-rw-r--r--conf/gen_keywords.m423
1 files changed, 23 insertions, 0 deletions
diff --git a/conf/gen_keywords.m4 b/conf/gen_keywords.m4
new file mode 100644
index 0000000..8bbe490
--- /dev/null
+++ b/conf/gen_keywords.m4
@@ -0,0 +1,23 @@
+m4_divert(-1)m4_dnl
+#
+# BIRD -- Generator of Configuration Keyword List
+#
+# (c) 1998 Martin Mares <mj@atrey.karlin.mff.cuni.cz>
+#
+# Can be freely distributed and used under the terms of the GNU GPL.
+#
+
+# 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 are translated to C initializers
+m4_define(CF_handle_kw, `m4_divert(0){ "m4_translit($1,[[A-Z]],[[a-z]])", $1 },
+m4_divert(-1)')
+m4_define(CF_keywd, `m4_ifdef([[CF_tok_$1]],,[[m4_define([[CF_tok_$1]],1)CF_handle_kw($1)]])')
+m4_define(CF_KEYWORDS, `m4_define([[CF_toks]],[[]])CF_iterate([[CF_keywd]], [[$@]])m4_ifelse(CF_toks,,,%token[[]]CF_toks
+)DNL')
+
+# As we are processing C source, we must access all M4 primitives via
+# m4_* and also set different quoting convention: `[[' and ']]'
+m4_changequote([[,]])