man/MKterminfo.sh

   1 #!/bin/sh
   2 # $Id: MKterminfo.sh,v 1.18 2020/02/02 23:34:34 tom Exp $
   3 #
   4 # MKterminfo.sh -- generate terminfo.5 from Caps tabular data
   5 #
   6 #***************************************************************************
   7 # Copyright 2018-2019,2020 Thomas E. Dickey                                *
   8 # Copyright 1998-2003,2017 Free Software Foundation, Inc.                  *
   9 #                                                                          *
  10 # Permission is hereby granted, free of charge, to any person obtaining a  *
  11 # copy of this software and associated documentation files (the            *
  12 # "Software"), to deal in the Software without restriction, including      *
  13 # without limitation the rights to use, copy, modify, merge, publish,      *
  14 # distribute, distribute with modifications, sublicense, and/or sell       *
  15 # copies of the Software, and to permit persons to whom the Software is    *
  16 # furnished to do so, subject to the following conditions:                 *
  17 #                                                                          *
  18 # The above copyright notice and this permission notice shall be included  *
  19 # in all copies or substantial portions of the Software.                   *
  20 #                                                                          *
  21 # THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
  22 # OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
  23 # MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
  24 # IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
  25 # DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
  26 # OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
  27 # THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
  28 #                                                                          *
  29 # Except as contained in this notice, the name(s) of the above copyright   *
  30 # holders shall not be used in advertising or otherwise to promote the     *
  31 # sale, use or other dealings in this Software without prior written       *
  32 # authorization.                                                           *
  33 #***************************************************************************
  34 #
  35 # This script takes terminfo.head and terminfo.tail and splices in between
  36 # them a table derived from the Caps data file.  Besides avoiding having
  37 # the docs fall out of sync with the table, this also lets us set up tbl
  38 # commands for better formatting of the table.
  39 #
  40 # NOTE: The \ 5s in this script really are control characters.  It translates
  41 # \ 5 to \n because I couldn't get used to inserting linefeeds directly.  There
  42 # had better be no \ 5s in the table source text.
  43 #
  44 # keep the order independent of locale:
  45 if test "${LANGUAGE+set}"    = set; then LANGUAGE=C;    export LANGUAGE;    fi
  46 if test "${LANG+set}"        = set; then LANG=C;        export LANG;        fi
  47 if test "${LC_ALL+set}"      = set; then LC_ALL=C;      export LC_ALL;      fi
  48 if test "${LC_MESSAGES+set}" = set; then LC_MESSAGES=C; export LC_MESSAGES; fi
  49 if test "${LC_CTYPE+set}"    = set; then LC_CTYPE=C;    export LC_CTYPE;    fi
  50 if test "${LC_COLLATE+set}"  = set; then LC_COLLATE=C;  export LC_COLLATE;  fi
  51
  52 #
  53 head=$1
  54 shift 1
  55 caps=
  56 while test $# -gt 1
  57 do
  58         caps="$caps $1"
  59         shift 1
  60 done
  61 tail=$1
  62 cat <<EOF
  63 '\\" t
  64 .\\" DO NOT EDIT THIS FILE BY HAND!
  65 .\\" It is generated from terminfo.head, $caps, and terminfo.tail.
  66 .\\"
  67 .\\" Note: this must be run through tbl before nroff.
  68 .\\" The magic cookie on the first line triggers this under some man programs.
  69 EOF
  70 cat $head
  71
  72 temp=temp$$
  73 sorted=sorted$$
  74 unsorted=unsorted$$
  75 trap "code=\$?; rm -f $sorted $temp $unsorted; exit \$code" EXIT HUP INT QUIT TERM
  76 rm -f $sorted $temp $unsorted
  77
  78 cat $caps | sed -n "\
  79 /%%-STOP-HERE-%%/q
  80 /^#%center/s, expand,,
  81 /^#%lw25/s, lw6 , lw7 ,
  82 /^#%/s/#%//p
  83 /^#/d
  84 s/[     ][      ]*/     /g
  85 s/$/\ 5T}/
  86 s/      [A-Z0-9_()\-][A-Z0-9_()\-]*     [0-9\-][0-9\-]* [Y\-][B\-][C\-][G\-][EK\-]\**   /       T{\ 5/
  87 s/      bool    /       /p
  88 s/      num     /       /p
  89 s/      str     /       /p
  90 " |sed -e 's/^$/../' | tr "\134" "\006" >$unsorted
  91
  92 rm -f $sorted
  93 rm -f $temp
  94 saved=no
  95 while true
  96 do
  97         data=
  98         read data
  99         test -z "$data" && break
 100         case "$data" in #(vi
 101         *\ 5*) #(vi
 102                 echo "$data" >>$temp
 103                 saved=yes
 104                 ;;
 105         *)
 106                 if test $saved = yes ; then
 107                         saved=no
 108                         sort $temp >>$sorted
 109                         rm -f $temp
 110                 fi
 111                 echo "$data" >>$sorted
 112                 ;;
 113         esac
 114 done <$unsorted
 115 test $saved = yes && sort $temp >>$sorted
 116
 117 sed -e 's/^\.\.$//' $sorted | tr "\005\006" "\012\134"
 118
 119 sed     -e '/^center expand;/s, expand,,' \
 120         -e '/^\.TS/,/^\\/s, lw[1-9][0-9]*\., l.,' \
 121         $tail