|
|
1.1 ! root 1: < ../ADM/defns ! 2: LP=$LPFONTS ! 3: ! 4: all:V: contents.out contents.list ! 5: ! 6: pg: contents.out ! 7: count contents.ms contents.out ! 8: ! 9: spell:VQ: ! 10: dospell contents.ms ! 11: ! 12: lp: contents.out ! 13: $LP $newprereq && touch $target ! 14: ! 15: contents.list:QPcmp -s: contents.nlist ! 16: cp $prereq $target ! 17: grep -v Contents $target | awk -F= '{ ! 18: file = $4; gsub("/", "\\/", file) ! 19: printf "/^\\.XX [^ ][^ ]* [0-9]* %s/s/ [0-9]* / %d /\n", file, $3 ! 20: } ! 21: END { print "w" }' | ed - contents.ms ! 22: ! 23: contents.nlist contents.out odd.pages:DQ: contents.ms $REF ! 24: echo 'troffing contents.ms ...' ! 25: $PREFER -sapa contents.ms | troff -mpm > contents.out 2> /tmp/$$ ! 26: (cat /tmp/$$; rm /tmp/$$) | awk -F= 'BEGIN { page = 1; } ! 27: { printf "=%s=%d=%s=%s\n", $2, page, $4, $5; ! 28: name = $4; ! 29: file = "../" $4 ".pg"; getline < file; pp = $0; close(file) ! 30: page += pp ! 31: if((page%2) == 0){ ! 32: spare++; ! 33: printf "%s: odd page count %d\n", name, page >"odd.pages"; ! 34: page++; ! 35: } ! 36: } ! 37: END { printf "%d pages.\n%d blank pages.\n", page-1, spare >"/dev/fd/2" }' > contents.nlist ! 38: ! 39: headers:Q: contents.list ! 40: f(){ # f(file, secno, startpage, title) ! 41: if [ -f $1 ] ! 42: then ! 43: echo $1 ! 44: case $1 in ! 45: *.ms) ! 46: echo "2s=XX.*=XX $2 $3 \"$4\"= ! 47: w" | sed -e 's/\\/\\\\/g' | ed - $1 ! 48: ;; ! 49: */ms) ! 50: echo "3s=XX.*=XX $2 $3 \"$4\" \\\" do not move= ! 51: w" | sed -e 's/\\/\\\\/g' | ed - $1 ! 52: ;; ! 53: *.m) ! 54: echo "/VOL2HEADER/s=VOL2HEADER.*=VOL2HEADER)|set_counter(page $3-1)|set_string(page_headers \"'''\")|set_string(even_headers \"'$4''\\f(NI$2\\fP'\")|set_string(odd_headers \"'\\f(NI$2\\fP''$4'\")|set_string(even_footers \"_\\\\nP__UNIX Papers_\")|set_string(odd_footers \"'Tenth Edition''\\\nP'\")= ! 55: w" | sed -e 's/\\/\\\\/g' | ed - $1 ! 56: ;; ! 57: *.tex) ! 58: echo "2s=XX.*=XX{$3}{$4}{$2}= ! 59: w" | ed - $1 ! 60: ;; ! 61: *) ! 62: echo "$1: unknown file type" ! 63: ;; ! 64: esac ! 65: else ! 66: echo $1 seems broken! ! 67: fi ! 68: } ! 69: export f ! 70: awk -F= '{ print "f", "../"$4, $2, $3, "\""$5"\"" }' contents.list | sh ! 71: touch $target ! 72: ! 73: photo.out:D: photo1.ms photo2.ms photo0.pic photo1.pic photo2.pic ! 74: pic photo0.pic > photo0.pic.o ! 75: pic photo1.pic > photo1.pic.o ! 76: pic photo11.pic > pho11.pic.o ! 77: pic photo2.pic > photo2.pic.o ! 78: pic photo22.pic > pho22.pic.o ! 79: troff -mpm photo1.ms > photo1.out ! 80: troff -mpm photo2.ms > photo2.out ! 81: ! 82: div.out:D: div.ms ! 83: troff -mpm div.ms > $target ! 84: ! 85: title.out:D: title.tr ! 86: troff title.tr > $target ! 87: ! 88: index:V: ! 89: touch contents.ind ! 90: pindex:V: ! 91: touch contents.ind
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.