Return to daemon-parm.awk CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / rsync

Annotation of embedaddon/rsync/daemon-parm.awk, revision 1.1.1.1

1.1       misho       1: #!/usr/bin/awk -f
                      2: 
                      3: # The caller must pass arg: daemon-parm.txt
                      4: # The resulting code is output into daemon-parm.h
                      5: 
                      6: BEGIN {
                      7:     heading = "/* DO NOT EDIT THIS FILE!  It is auto-generated from a list of values in " ARGV[1] "! */\n\n"
                      8:     sect = psect = defines = accessors = prior_ptype = ""
                      9:     parms = "\nstatic struct parm_struct parm_table[] = {"
                     10:     comment_fmt = "\n/********** %s **********/\n"
                     11:     tdstruct = "typedef struct {"
                     12: }
                     13: 
                     14: /^\s*$/ { next }
                     15: /^#/ { next }
                     16: 
                     17: /^Globals:/ {
                     18:     if (defines != "") {
                     19:        print "The Globals section must come first!"
                     20:        defines = ""
                     21:        exit
                     22:     }
                     23:     defines = tdstruct
                     24:     values = "\nstatic const all_vars Defaults = {\n    { /* Globals: */\n"
                     25:     exps = exp_values = sprintf(comment_fmt, "EXP")
                     26:     sect = "GLOBAL"
                     27:     psect = ", P_GLOBAL, &Vars.g."
                     28:     next
                     29: }
                     30: 
                     31: /^Locals:/ {
                     32:     if (sect == "") {
                     33:        print "The Locals section must come after the Globals!"
                     34:        exit
                     35:     }
                     36:     defines = defines exps "} global_vars;\n\n" tdstruct
                     37:     values = values exp_values "\n    }, { /* Locals: */\n"
                     38:     exps = exp_values = sprintf(comment_fmt, "EXP")
                     39:     sect = "LOCAL"
                     40:     psect = ", P_LOCAL, &Vars.l."
                     41:     next
                     42: }
                     43: 
                     44: /^(STRING|CHAR|PATH|INTEGER|ENUM|OCTAL|BOOL|BOOLREV|BOOL3)[ \t]/ {
                     45:     ptype = $1
                     46:     name = $2
                     47:     $1 = $2 = ""
                     48:     sub(/^[ \t]+/, "")
                     49: 
                     50:     if (ptype != prior_ptype) {
                     51:        comment = sprintf(comment_fmt, ptype)
                     52:        defines = defines comment
                     53:        values = values comment
                     54:        parms = parms "\n"
                     55:        accessors = accessors "\n"
                     56:        prior_ptype = ptype
                     57:     }
                     58: 
                     59:     if (ptype == "STRING" || ptype == "PATH") {
                     60:        atype = "STRING"
                     61:        vtype = "char*"
                     62:     } else if (ptype ~ /BOOL/) {
                     63:        atype = vtype = "BOOL"
                     64:     } else if (ptype == "CHAR") {
                     65:        atype = "CHAR"
                     66:        vtype = "char"
                     67:     } else {
                     68:        atype = "INTEGER"
                     69:        vtype = "int"
                     70:     }
                     71: 
                     72:     # The name might be var_name|public_name
                     73:     pubname = name
                     74:     sub(/\|.*/, "", name)
                     75:     sub(/.*\|/, "", pubname)
                     76:     gsub(/_/, " ", pubname)
                     77:     gsub(/-/, "", name)
                     78: 
                     79:     if (ptype == "ENUM")
                     80:        enum = "enum_" name
                     81:     else
                     82:        enum = "NULL"
                     83: 
                     84:     defines = defines "\t" vtype " " name ";\n"
                     85:     values = values "\t" $0 ", /* " name " */\n"
                     86:     parms = parms " {\"" pubname "\", P_" ptype psect name ", " enum ", 0},\n"
                     87:     accessors = accessors "FN_" sect "_" atype "(lp_" name ", " name ")\n"
                     88: 
                     89:     if (vtype == "char*") {
                     90:        exps = exps "\tBOOL " name "_EXP;\n"
                     91:        exp_values = exp_values "\tFalse, /* " name "_EXP */\n"
                     92:     }
                     93: 
                     94:     next
                     95: }
                     96: 
                     97: /./ {
                     98:     print "Extraneous line:" $0
                     99:     defines = ""
                    100:     exit
                    101: }
                    102: 
                    103: END {
                    104:     if (sect != "" && defines != "") {
                    105:        defines = defines exps "} local_vars;\n\n"
                    106:        defines = defines tdstruct "\n\tglobal_vars g;\n\tlocal_vars l;\n} all_vars;\n"
                    107:        values = values exp_values "\n    }\n};\n\nstatic all_vars Vars;\n"
                    108:        parms = parms "\n {NULL, P_BOOL, P_NONE, NULL, NULL, 0}\n};\n"
                    109:        print heading defines values parms accessors > "daemon-parm.h"
                    110:     } else {
                    111:        print "Failed to parse the data in " ARGV[1]
                    112:        exit 1
                    113:     }
                    114: }