manual/libc-texinfo.sh

   1 #! /bin/sh
   2
   3 # Create libc.texinfo from the chapter files.
   4
   5 trap "rm -f *.$$; exit 1" 1 2 15
   6
   7 exec 3>incl.$$ 4>smenu.$$ 5>lmenu.$$
   8
   9 build_menu () {
  10   while IFS=: read file node; do
  11     echo "@include $file" >&3
  12     echo "* $node:: `sed -n 's/^@c %MENU% //p' $file`" >&4
  13     $AWK 'BEGIN { do_menu = 0 }
  14           /^@node / { sub(/^@node /, ""); sub(/,.*$/, ""); node = $0 }
  15           /^@menu/ { printf "\n%s\n\n", node; do_menu = 1; next }
  16           /^@end menu/ { do_menu = 0 }
  17           do_menu { print }' $file >&5
  18   done
  19 }
  20
  21 collect_nodes () {
  22   egrep '^(@c )?@node.*Top' "$@" /dev/null | cut -d, -f-2 |
  23   sed 's/@c //; s/, /:/; s/:@node /:/; s/ /_/g; s/:/ /g' |
  24   $AWK '{ file[$2] = $1; nnode[$2] = $3 }
  25         END  { for (x in file)
  26                  if (file[x] != "")
  27                    print file[x] ":" x, file[nnode[x]] ":" nnode[x] }' |
  28   $AWK -f tsort.awk | sed 's/_/ /g'
  29 }
  30
  31 collect_nodes $1 | build_menu
  32
  33 if [ -n "$2" ]; then
  34
  35   { echo; echo 'Add-ons'; echo; } >&4
  36
  37   egrep '^(@c )?@node.*Top' `echo $2 /dev/null | tr ' ' '\n' | sort` |
  38   cut -d, -f1 | sed 's/@c //;s/@node //' | build_menu
  39
  40 fi
  41
  42 { echo; echo 'Appendices'; echo; } >&4
  43
  44 collect_nodes $3 | build_menu
  45
  46 exec 3>&- 4>&- 5>&-
  47
  48 mv -f incl.$$ chapters.texi
  49
  50 {
  51  echo '@menu'
  52  $AWK -F: '
  53   /^\*/ {
  54     printf("%-32s", $1 "::");
  55     x = split($3, word, " ");
  56     hpos = 34;
  57     for (i = 1; i <= x; i++) {
  58       hpos += length(word[i]) + 1;
  59       if (hpos > 78) {
  60         printf("\n%34s", "");
  61         hpos = 35 + length(word[i]);
  62       }
  63       printf(" %s", word[i]);
  64     }
  65     print ".";
  66   }
  67
  68   !/^\*/ { print; }
  69  ' smenu.$$
  70  cat <<EOF
  71 * Free Manuals::                 Free Software Needs Free Documentation.
  72 * Copying::                      The GNU Lesser General Public License says
  73                                   how you can copy and share the GNU C Library.
  74 * Documentation License::        This manual is under the GNU Free
  75                                   Documentation License.
  76
  77 Indices
  78
  79 * Concept Index::                Index of concepts and names.
  80 * Type Index::                   Index of types and type qualifiers.
  81 * Function Index::               Index of functions and function-like macros.
  82 * Variable Index::               Index of variables and variable-like macros.
  83 * File Index::                   Index of programs and files.
  84
  85  --- The Detailed Node Listing ---
  86 EOF
  87  cat lmenu.$$
  88  echo '@end menu'; } >top-menu.texi.$$
  89 mv -f top-menu.texi.$$ top-menu.texi
  90
  91 rm -f *.$$