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 }
 206
 207 make_array_member()
 208 {
 209         local TAB='     '
 210         local tmp
 211
 212         result="
 213         {
 214         .name = \"$name_txt\",
 215         .handler = com_$name_txt,
 216         "
 217         if test -n "$perms_txt"; then
 218                 result="$result .perms = $perms_txt,"
 219         fi
 220         result="$result
 221         .description = \"$desc_txt\",
 222         .usage = \"$usage_txt\",
 223         .help = "
 224         tmp="$(printf "%s\n" "$help_txt" | sed -e 's/^/\"/g' -e 's/$/\\n\"/g' \
 225                 -e "s/$TAB/\\\t/g")"
 226         result="$result $tmp },"
 227 }
 228
 229 make_completion()
 230 {
 231         local CR='
 232 '
 233         result="  {.name = \"$name_txt\", .completer = ${name_txt}_completer}, \\$CR"
 234 }
 235
 236 template_loop()
 237 {
 238         local loop_result=
 239
 240         local t_name="$name_txt"
 241         local t_perms="$perms_txt"
 242         local t_desc="$desc_txt"
 243         local t_usage="$usage_txt"
 244         local t_help="$help_txt"
 245         local t_source_files="$source_files"
 246         local member
 247         for member in $template_members; do
 248                 local sed_cmd="sed -e s/@member@/$member/g"
 249                 #echo "sed_cmd: $sed_cmd"
 250                 name_txt=$(echo "$t_name" | $sed_cmd)
 251                 #name_txt="$tname"
 252                 perms_txt=$(echo "$t_perms" | $sed_cmd)
 253                 desc_txt=$(echo "$t_desc" | $sed_cmd)
 254                 usage_txt=$(echo "$t_usage" | $sed_cmd)
 255                 help_txt=$(printf "%s\n" "$t_help" | $sed_cmd)
 256                 prototype=$(echo "$template_prototype" | $sed_cmd)
 257                 $1
 258                 loop_result="$loop_result$result"
 259         done
 260         result="$loop_result"
 261 }
 262
 263 com_c_file()
 264 {
 265         echo "$system_includes"
 266         echo "$includes"
 267         echo "struct $array_type $array_name[] = {"
 268         while : ; do
 269                 read_one_command
 270                 if test $ret -lt 0; then
 271                         exit 1
 272                 fi
 273                 if test $ret -eq 0; then
 274                         break
 275                 fi
 276                 if test $template -eq 0; then
 277                         make_array_member
 278                         printf "%s" "$result"
 279                         continue
 280                 fi
 281                 template_loop make_array_member
 282                 printf "%s" "$result"
 283         done
 284         echo '{.name = NULL}};'
 285 }
 286
 287 com_header()
 288 {
 289         echo "extern struct $array_type $array_name[];"
 290         while : ; do
 291                 read_one_command
 292                 if test $ret -lt 0; then
 293                         exit 1
 294                 fi
 295                 if test $ret -eq 0; then
 296                         break
 297                 fi
 298                 if test $template -eq 0; then
 299                         make_proto
 300                         printf "%s" "$result"
 301                         continue
 302                 fi
 303                 template_loop make_proto
 304                 printf "%s" "$result"
 305         done
 306 }
 307
 308 com_completion()
 309 {
 310
 311         echo "#define $1 \\"
 312         while : ; do
 313                 read_one_command
 314                 if test $ret -lt 0; then
 315                         exit 1
 316                 fi
 317                 if test $ret -eq 0; then
 318                         break
 319                 fi
 320                 if test $template -eq 0; then
 321                         make_completion
 322                         printf "%s" "$result"
 323                         continue
 324                 fi
 325                 template_loop make_completion
 326                 printf "%s" "$result"
 327         done
 328         echo
 329 }
 330
 331 read_header
 332 arg="$1"
 333 shift
 334 case "$arg" in
 335         "c")
 336                 com_c_file
 337                 ;;
 338         "h")
 339                 com_header
 340                 ;;
 341         "man")
 342                 com_man $*
 343                 ;;
 344         "compl")
 345                 com_completion $*
 346                 ;;
 347 esac