summaryrefslogtreecommitdiff
path: root/util/ss/ct_c.awk
diff options
context:
space:
mode:
Diffstat (limited to 'util/ss/ct_c.awk')
-rw-r--r--util/ss/ct_c.awk77
1 files changed, 0 insertions, 77 deletions
diff --git a/util/ss/ct_c.awk b/util/ss/ct_c.awk
deleted file mode 100644
index 872f6e0..0000000
--- a/util/ss/ct_c.awk
+++ /dev/null
@@ -1,77 +0,0 @@
-/^command_table / {
- cmdtbl = $2;
- printf "/* %s.c - automatically generated from %s.ct */\n", \
- rootname, rootname > outfile
- print "#include <ss/ss.h>" > outfile
- print "" >outfile
- print "#ifndef __STDC__" > outfile
- print "#define const" > outfile
- print "#endif" > outfile
- print "" > outfile
-}
-
-/^BOR$/ {
- cmdnum++
- options = 0
- cmdtab = ""
- printf "static char const * const ssu%05d[] = {\n", cmdnum > outfile
-}
-
-/^sub/ {
- subr = substr($0, 6, length($0)-5)
-}
-
-/^hlp/ {
- help = substr($0, 6, length($0)-5)
-}
-
-/^cmd/ {
- cmd = substr($0, 6, length($0)-5)
- printf "%s\"%s\",\n", cmdtab, cmd > outfile
- cmdtab = " "
-}
-
-/^opt/ {
- opt = substr($0, 6, length($0)-5)
- if (opt == "dont_list") {
- options += 1
- }
- if (opt == "dont_summarize") {
- options += 2
- }
-}
-
-/^EOR/ {
- print " (char const *)0" > outfile
- print "};" > outfile
- printf "extern void %s __SS_PROTO;\n", subr > outfile
- subr_tab[cmdnum] = subr
- options_tab[cmdnum] = options
- help_tab[cmdnum] = help
-}
-
-/^[0-9]/ {
- linenum = $1;
-}
-
-/^ERROR/ {
- error = substr($0, 8, length($0)-7)
- printf "Error in line %d: %s\n", linenum, error
- print "#__ERROR_IN_FILE__" > outfile
-}
-
-END {
- printf "static ss_request_entry ssu%05d[] = {\n", cmdnum+1 > outfile
- for (i=1; i <= cmdnum; i++) {
- printf " { ssu%05d,\n", i > outfile
- printf " %s,\n", subr_tab[i] > outfile
- printf " \"%s\",\n", help_tab[i] > outfile
- printf " %d },\n", options_tab[i] > outfile
- }
- print " { 0, 0, 0, 0 }" > outfile
- print "};" > outfile
- print "" > outfile
- printf "ss_request_table %s = { 2, ssu%05d };\n", \
- cmdtbl, cmdnum+1 > outfile
-}
-