|
Packit |
6c4009 |
#!/bin/sh
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
OUTDIR=$1
|
|
Packit |
6c4009 |
shift
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
# Create libc.texinfo from the chapter files.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
trap "rm -f ${OUTDIR}*.$$; exit 1" 1 2 15
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
exec 3>${OUTDIR}incl.$$ 4>${OUTDIR}smenu.$$ 5>${OUTDIR}lmenu.$$
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
build_menu () {
|
|
Packit |
6c4009 |
while IFS=: read file node; do
|
|
Packit |
6c4009 |
echo "@include $file" >&3
|
|
Packit |
6c4009 |
echo "* $node:: `sed -n 's/^@c %MENU% //p' $file`" >&4
|
|
Packit |
6c4009 |
$AWK 'BEGIN { do_menu = 0 }
|
|
Packit |
6c4009 |
/^@node / { sub(/^@node /, ""); sub(/,.*$/, ""); node = $0 }
|
|
Packit |
6c4009 |
/^@menu/ { printf "\n%s\n\n", node; do_menu = 1; next }
|
|
Packit |
6c4009 |
/^@end menu/ { do_menu = 0 }
|
|
Packit |
6c4009 |
do_menu { print }' $file >&5
|
|
Packit |
6c4009 |
done
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
collect_nodes () {
|
|
Packit |
6c4009 |
egrep '^(@c )?@node.*Top' "$@" /dev/null | cut -d, -f-2 |
|
|
Packit |
6c4009 |
sed 's/@c //; s/, /:/; s/:@node /:/; s/ /_/g; s/:/ /g' |
|
|
Packit |
6c4009 |
$AWK '{ file[$2] = $1; nnode[$2] = $3 }
|
|
Packit |
6c4009 |
END { for (x in file)
|
|
Packit |
6c4009 |
if (file[x] != "")
|
|
Packit |
6c4009 |
print file[x] ":" x, file[nnode[x]] ":" nnode[x] }' |
|
|
Packit |
6c4009 |
$AWK -f tsort.awk | sed 's/_/ /g'
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
collect_nodes $1 | build_menu
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
{ echo; echo 'Appendices'; echo; } >&4
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
collect_nodes $2 | build_menu
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
exec 3>&- 4>&- 5>&-
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
mv -f ${OUTDIR}incl.$$ ${OUTDIR}chapters.texi
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
echo '@menu'
|
|
Packit |
6c4009 |
$AWK -F: '
|
|
Packit |
6c4009 |
/^\*/ {
|
|
Packit |
6c4009 |
printf("%-32s", $1 "::");
|
|
Packit |
6c4009 |
x = split($3, word, " ");
|
|
Packit |
6c4009 |
hpos = 34;
|
|
Packit |
6c4009 |
for (i = 1; i <= x; i++) {
|
|
Packit |
6c4009 |
hpos += length(word[i]) + 1;
|
|
Packit |
6c4009 |
if (hpos > 78) {
|
|
Packit |
6c4009 |
printf("\n%34s", "");
|
|
Packit |
6c4009 |
hpos = 35 + length(word[i]);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
printf(" %s", word[i]);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
print ".";
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
!/^\*/ { print; }
|
|
Packit |
6c4009 |
' ${OUTDIR}smenu.$$
|
|
Packit |
6c4009 |
cat <
|
|
Packit |
6c4009 |
* Free Manuals:: Free Software Needs Free Documentation.
|
|
Packit |
6c4009 |
* Copying:: The GNU Lesser General Public License says
|
|
Packit |
6c4009 |
how you can copy and share the GNU C Library.
|
|
Packit |
6c4009 |
* Documentation License:: This manual is under the GNU Free
|
|
Packit |
6c4009 |
Documentation License.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
Indices
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
* Concept Index:: Index of concepts and names.
|
|
Packit |
6c4009 |
* Type Index:: Index of types and type qualifiers.
|
|
Packit |
6c4009 |
* Function Index:: Index of functions and function-like macros.
|
|
Packit |
6c4009 |
* Variable Index:: Index of variables and variable-like macros.
|
|
Packit |
6c4009 |
* File Index:: Index of programs and files.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
@detailmenu
|
|
Packit |
6c4009 |
--- The Detailed Node Listing ---
|
|
Packit |
6c4009 |
EOF
|
|
Packit |
6c4009 |
cat ${OUTDIR}lmenu.$$
|
|
Packit |
6c4009 |
echo '@end detailmenu'
|
|
Packit |
6c4009 |
echo '@end menu'; } >${OUTDIR}top-menu.texi.$$
|
|
Packit |
6c4009 |
mv -f ${OUTDIR}top-menu.texi.$$ ${OUTDIR}top-menu.texi
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
rm -f ${OUTDIR}*.$$
|