Wholesale update to 5.004.
[p5sagit/p5-mst-13.2.git] / pod / roffitall
1 #!/bin/sh
2 #
3 # Usage: roffitall [-nroff|-psroff|-groff]
4 #
5 # Authors: Tom Christiansen, Raphael Manfredi
6
7 me=roffitall
8 tmp=.
9
10 if test -f ../config.sh; then
11         . ../config.sh
12 fi
13
14 mandir=$installman1dir
15 libdir=$installman3dir
16
17 test -d $mandir || mandir=/usr/local/man/man1
18 test -d $libdir || libdir=/usr/local/man/man3
19
20 case "$1" in
21 -nroff) cmd="nroff -man"; ext='txt';;
22 -psroff) cmd="psroff -t"; ext='ps';;
23 -groff) cmd="groff -man"; ext='ps';;
24 *)
25         echo "Usage: roffitall [-nroff|-psroff|-groff]" >&2
26         exit 1
27         ;;
28 esac
29
30 toroff=`
31         echo            \
32     $mandir/perl.1      \
33     $mandir/perldelta.1 \
34     $mandir/perldata.1  \
35     $mandir/perlsyn.1   \
36     $mandir/perlop.1    \
37     $mandir/perlre.1    \
38     $mandir/perlrun.1   \
39     $mandir/perllocale.1        \
40     $mandir/perlfunc.1  \
41     $mandir/perlvar.1   \
42     $mandir/perlsub.1   \
43     $mandir/perlmod.1   \
44     $mandir/perlmodlib.1        \
45     $mandir/perlref.1   \
46     $mandir/perldsc.1   \
47     $mandir/perllol.1   \
48     $mandir/perlobj.1   \
49     $mandir/perltie.1   \
50     $mandir/perltoot.1  \
51     $mandir/perlbot.1   \
52     $mandir/perldebug.1 \
53     $mandir/perldiag.1  \
54     $mandir/perlform.1  \
55     $mandir/perlipc.1   \
56     $mandir/perlsec.1   \
57     $mandir/perltrap.1  \
58     $mandir/perlstyle.1 \
59     $mandir/perlapio.1  \
60     $mandir/perlxs.1    \
61     $mandir/perlxstut.1 \
62     $mandir/perlguts.1  \
63     $mandir/perlcall.1  \
64     $mandir/perlembed.1 \
65     $mandir/perlpod.1   \
66     $mandir/perlbook.1  \
67     $mandir/perlfaq.1   \
68     $mandir/perlfaq1.1  \
69     $mandir/perlfaq2.1  \
70     $mandir/perlfaq3.1  \
71     $mandir/perlfaq4.1  \
72     $mandir/perlfaq5.1  \
73     $mandir/perlfaq6.1  \
74     $mandir/perlfaq7.1  \
75     $mandir/perlfaq8.1  \
76     $mandir/perlfaq9.1  \
77         \
78     $libdir/blib.3      \
79     $libdir/diagnostics.3       \
80     $libdir/integer.3   \
81     $libdir/less.3      \
82     $libdir/lib.3       \
83     $libdir/locale.3    \
84     $libdir/overload.3  \
85     $libdir/sigtrap.3   \
86     $libdir/strict.3    \
87     $libdir/subs.3      \
88     $libdir/vars.3      \
89         \
90     $libdir/AnyDBM_File.3       \
91     $libdir/AutoLoader.3        \
92     $libdir/AutoSplit.3 \
93     $libdir/Benchmark.3 \
94     $libdir/Carp.3      \
95     $libdir/Config.3    \
96     $libdir/Cwd.3       \
97     $libdir/DB_File.3   \
98     $libdir/Devel::SelfStubber.3        \
99     $libdir/DynaLoader.3        \
100     $libdir/English.3   \
101     $libdir/Env.3       \
102     $libdir/Exporter.3  \
103     $libdir/ExtUtils::Embed.3   \
104     $libdir/ExtUtils::Install.3 \
105     $libdir/ExtUtils::Liblist.3 \
106     $libdir/ExtUtils::MakeMaker.3       \
107     $libdir/ExtUtils::Manifest.3        \
108     $libdir/ExtUtils::Mkbootstrap.3     \
109     $libdir/ExtUtils::Mksymlists.3      \
110     $libdir/Fcntl.3     \
111     $libdir/File::Basename.3    \
112     $libdir/File::CheckTree.3   \
113     $libdir/File::Copy.3        \
114     $libdir/File::Compare.3     \
115     $libdir/File::Find.3        \
116     $libdir/File::Path.3        \
117     $libdir/File::stat.3        \
118     $libdir/FileCache.3 \
119     $libdir/FileHandle.3        \
120     $libdir/FindBin.3   \
121     $libdir/Getopt::Long.3      \
122     $libdir/Getopt::Std.3       \
123     $libdir/I18N::Collate.3     \
124     $libdir/IO.3 \
125     $libdir/IO::File.3 \
126     $libdir/IO::Handle.3 \
127     $libdir/IO::Pipe.3 \
128     $libdir/IO::Seekable.3 \
129     $libdir/IO::Select.3 \
130     $libdir/IO::Socket.3 \
131     $libdir/IPC::Open2.3        \
132     $libdir/IPC::Open3.3        \
133     $libdir/Math::BigFloat.3    \
134     $libdir/Math::BigInt.3      \
135     $libdir/Math::Complex.3     \
136     $libdir/Math::Trig.3        \
137     $libdir/Net::Ping.3 \
138     $libdir/Net::hostent.3      \
139     $libdir/Net::netent.3       \
140     $libdir/Net::protoent.3     \
141     $libdir/Net::servent.3      \
142     $libdir/Opcode.3    \
143     $libdir/POSIX.3     \
144     $libdir/Pod::Text.3 \
145     $libdir/Safe.3      \
146     $libdir/Search::Dict.3      \
147     $libdir/SelectSaver.3       \
148     $libdir/SelfLoader.3        \
149     $libdir/Shell.3     \
150     $libdir/Socket.3    \
151     $libdir/Symbol.3    \
152     $libdir/Sys::Hostname.3     \
153     $libdir/Sys::Syslog.3       \
154     $libdir/Term::Cap.3 \
155     $libdir/Term::Complete.3    \
156     $libdir/Test::Harness.3     \
157     $libdir/Text::Abbrev.3      \
158     $libdir/Text::ParseWords.3  \
159     $libdir/Text::Soundex.3     \
160     $libdir/Text::Tabs.3        \
161     $libdir/Tie::Hash.3 \
162     $libdir/Tie::RefHash.3      \
163     $libdir/Tie::Scalar.3       \
164     $libdir/Tie::SubstrHash.3   \
165     $libdir/Time::Local.3               \
166     $libdir/Time::gmtime.3      \
167     $libdir/Time::localtime.3   \
168     $libdir/Time::tm.3          \
169     $libdir/UNIVERSAL.3         \
170     $libdir/User::grent.3               \
171     $libdir/User::pwent.3 | \
172 perl -ne 'map { -r && print "$_ " } split'`
173
174 # Bypass internal shell buffer limit -- can't use case
175 if perl -e '$a = shift; exit($a =~ m|/|)' $toroff; then
176         echo "$me: empty file list -- did you run install?" >&2
177         exit 1
178 fi
179
180 #psroff -t -man -rC1 -rD1 -rF1 > $tmp/PerlDoc.ps 2>$tmp/PerlTOC.raw
181 #nroff -man -rC1 -rD1 -rF1 > $tmp/PerlDoc.txt 2>$tmp/PerlTOC.nr.raw
182
183 run="$cmd -rC1 -rD1 -rF1 >$tmp/PerlDoc.$ext 2>$tmp/PerlTOC.$ext.raw"
184 echo "$me: running $run"
185 eval $run $toroff
186 echo "$me: parsing TOC"
187 ./rofftoc $tmp/PerlTOC.$ext.raw > $tmp/PerlTOC.tmp.man
188 run="$cmd $tmp/PerlTOC.tmp.man >$tmp/PerlTOC.$ext"
189 echo "$me: running $run"
190 eval $run
191 rm -f $tmp/PerlTOC.tmp.man $tmp/PerlTOC.$ext.raw
192 echo "$me: leaving you with $tmp/PerlDoc.$ext and $tmp/PerlTOC.$ext"
193