command_util.sh

   1 #!/usr/bin/env bash
   2
   3
   4 read_header()
   5 {
   6         local key value i
   7
   8         while read key value; do
   9                 case "$key" in
  10                 ---)
  11                         break
  12                         ;;
  13                 OF:)
  14                         output_file="$value"
  15                         array_name=${value%command_list}cmds
  16                         ;;
  17                 SF:)
  18                         source_files="$value"
  19                         ;;
  20                 AT:)
  21                         array_type="$value"
  22                         ;;
  23                 SI:)
  24                         for i in $value; do
  25                                 system_includes="$system_includes
  26 #include <$i.h>"
  27                         done
  28                         ;;
  29                 IN:)
  30                         for i in $value; do
  31                                 includes="$includes
  32 #include \"$i.h\""
  33                         done
  34                         includes="$includes
  35 #include \"$output_file.h\""
  36                         ;;
  37                 SN:)
  38                         section_name="$value"
  39                         ;;
  40                 TM:)
  41                         template_members="$value"
  42                 esac
  43         done
  44         if test -z "$output_file"; then
  45                 echo "header error" 1&>2
  46                 exit 1
  47         fi
  48 }
  49
  50 read_one_command()
  51 {
  52         local line
  53
  54         name_txt=""
  55         desc_txt=""
  56         usage_txt=""
  57         help_txt=""
  58         perms_txt=""
  59         template=0
  60         template_name=""
  61         template_prototype=""
  62         mkdir -p man/man1
  63         while read key value; do
  64                 case "$key" in
  65                 ---)
  66                         break
  67                         ;;
  68                 N:)
  69                         name_txt="$value"
  70                         ;;
  71                 T:)
  72                         template_name="$value"
  73                         template=1
  74                         ;;
  75                 O:)
  76                         template_prototype="$value"
  77                         template=1
  78                         ;;
  79                 P:)
  80                         perms_txt="$value"
  81                         ;;
  82                 D:)
  83                         desc_txt="$value"
  84                         ;;
  85                 U:)
  86                         usage_txt="$value"
  87                         ;;
  88                 H:)
  89                         help_txt="${value}"
  90                         while read line; do
  91                                 if test "$line" = "---"; then
  92                                         break;
  93                                 fi
  94                                 line=${line#H:}
  95                                 help_txt="$help_txt
  96 ${line# }"
  97                         done
  98                         break
  99                         ;;
 100                 esac
 101         done
 102         if test $template -eq 0; then
 103                 if test -n "$name_txt" -a -n "$desc_txt" -a -n "$usage_txt" \
 104                                 -a -n "$help_txt"; then
 105                         ret=1
 106                         return
 107                 fi
 108         else
 109                 if test -n "$template_name" -a -n "$template_prototype" \
 110                                 -a -n "$name_txt " -a -n "$template_members" \
 111                                 -a -n "$desc_txt" -a -n "$usage_txt" \
 112                                 -a -n "$help_txt"; then
 113                         ret=1
 114                         return
 115                 fi
 116         fi
 117         if test -z "$name_txt" -a -z "$desc_txt" -a -z "$usage_txt" \
 118                         -a -z "$help_txt"; then
 119                 ret=0
 120                 return
 121         fi
 122         ret=-1
 123         #return
 124         echo "!ERROR!"
 125         echo "N: $name_txt"
 126         echo "D: $desc_txt"
 127         echo "S: $usage_txt"
 128         echo "P: $perms_txt"
 129         echo "H: $help_txt"
 130         echo "O: $template_prototype"
 131 }
 132
 133 dump_man()
 134 {
 135         if test $template -eq 0; then
 136                 echo ".SS \"$name_txt\""
 137                 echo "$desc_txt"
 138                 echo
 139                 echo "\\fBUsage: \\fP$usage_txt"
 140         else
 141                 for member in $template_members; do
 142                         local sed_cmd="sed -e s/@member@/$member/g"
 143                         local t_name_txt=$(echo $name_txt | $sed_cmd)
 144                         echo ".SS \"$t_name_txt\""
 145                 done
 146                 echo "$desc_txt" | sed -e "s/@member@/{$(echo $template_members | sed -e 's/ / | /g')}/g"
 147                 echo
 148                 echo "\\fBUsage: \\fP"
 149                 echo
 150                 echo ".nf"
 151                 for member in $template_members; do
 152                         local sed_cmd="sed -e s/@member@/$member/g"
 153                         local t_usage_txt=$(echo $usage_txt | $sed_cmd)
 154                         printf "\t$t_usage_txt\n"
 155                 done
 156                 echo ".fi"
 157         fi
 158         echo
 159         echo "$help_txt" | sed -e 's/^  //'
 160         echo
 161         if test -n "$perms_txt"; then
 162                 echo -n "\\fBpermissions:\\fP "
 163                 if test "$perms_txt" = "0"; then
 164                         echo "(none)"
 165                 else
 166                         echo "$perms_txt"
 167                 fi
 168         fi
 169         echo
 170 }
 171
 172
 173 com_man()
 174 {
 175         echo "[$section_name]"
 176         echo
 177         while : ; do
 178                 read_one_command
 179                 if test $ret -lt 0; then
 180                         exit 1
 181                 fi
 182                 if test $ret -eq 0; then
 183                         break
 184                 fi
 185                 dump_man
 186         done
 187 }
 188
 189 make_proto()
 190 {
 191         local source_file match="" CR='
 192 '
 193         if test -n "$prototype"; then
 194                 result="$prototype$CR"
 195                 return
 196         fi
 197         result=
 198         for source_file in $source_files; do
 199                 match=$(grep "^\(__noreturn \)*int com_$name_txt(" $source_file | head -n 1 | sed -e 's/$/;/1')
 200                 if test -n "$match"; then
 201                         result="$result $match$CR"
 202                         break
 203                 fi
 204         done
 205         echo
 206 }
 207
 208 make_array_member()
 209 {
 210         local TAB='     '
 211         local tmp
 212
 213         result="
 214         {
 215         .name = \"$name_txt\",
 216         .handler = com_$name_txt,
 217         "
 218         if test -n "$perms_txt"; then
 219                 result="$result .perms = $perms_txt,"
 220         fi
 221         result="$result
 222         .description = \"$desc_txt\",
 223         .usage = \"$usage_txt\",
 224         .help = "
 225         tmp="$(printf "%s\n" "$help_txt" | sed -e 's/^/\"/g' -e 's/$/\\n\"/g' \
 226                 -e "s/$TAB/\\\t/g")"
 227         result="$result $tmp },"
 228 }
 229
 230 make_completion()
 231 {
 232         result="  {.name = \"$name_txt\", .completer = ${name_txt}_completer}, \\"
 233 }
 234
 235 template_loop()
 236 {
 237         local t_name="$name_txt"
 238         local t_perms="$perms_txt"
 239         local t_desc="$desc_txt"
 240         local t_usage="$usage_txt"
 241         local t_help="$help_txt"
 242         local t_source_files="$source_files"
 243         local member
 244         for member in $template_members; do
 245                 local sed_cmd="sed -e s/@member@/$member/g"
 246                 #echo "sed_cmd: $sed_cmd"
 247                 name_txt=$(echo "$t_name" | $sed_cmd)
 248                 #name_txt="$tname"
 249                 perms_txt=$(echo "$t_perms" | $sed_cmd)
 250                 desc_txt=$(echo "$t_desc" | $sed_cmd)
 251                 usage_txt=$(echo "$t_usage" | $sed_cmd)
 252                 help_txt=$(printf "%s\n" "$t_help" | $sed_cmd)
 253                 prototype=$(echo "$template_prototype" | $sed_cmd)
 254                 result=
 255                 $1
 256                 echo "$result"
 257         done
 258
 259 }
 260
 261 com_c_file()
 262 {
 263         echo "$system_includes"
 264         echo "$includes"
 265         echo "struct $array_type $array_name[] = {"
 266         while : ; do
 267                 read_one_command
 268                 if test $ret -lt 0; then
 269                         exit 1
 270                 fi
 271                 if test $ret -eq 0; then
 272                         break
 273                 fi
 274                 if test $template -eq 0; then
 275                         make_array_member
 276                         echo "$result"
 277                         continue
 278                 fi
 279                 template_loop make_array_member
 280         done
 281         echo '{.name = NULL}};'
 282 }
 283
 284 com_header()
 285 {
 286         echo "extern struct $array_type $array_name[];"
 287         while : ; do
 288                 read_one_command
 289                 if test $ret -lt 0; then
 290                         exit 1
 291                 fi
 292                 if test $ret -eq 0; then
 293                         break
 294                 fi
 295                 if test $template -eq 0; then
 296                         make_proto
 297                         echo "$result"
 298                         continue
 299                 fi
 300                 template_loop make_proto
 301         done
 302 }
 303
 304 com_completion()
 305 {
 306
 307         echo "#define $1 \\"
 308         while : ; do
 309                 read_one_command
 310                 if test $ret -lt 0; then
 311                         exit 1
 312                 fi
 313                 if test $ret -eq 0; then
 314                         break
 315                 fi
 316                 if test $template -eq 0; then
 317                         make_completion
 318                         echo "$result"
 319                         continue
 320                 fi
 321                 template_loop make_completion
 322         done
 323         echo
 324 }
 325
 326 read_header
 327 arg="$1"
 328 shift
 329 case "$arg" in
 330         "c")
 331                 com_c_file
 332                 ;;
 333         "h")
 334                 com_header
 335                 ;;
 336         "man")
 337                 com_man $*
 338                 ;;
 339         "compl")
 340                 com_completion $*
 341                 ;;
 342 esac