home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / misc / volume20 / perl / patch04 next >
Encoding:
Text File  |  1991-06-19  |  55.1 KB  |  1,951 lines
  1. Newsgroups: comp.sources.misc
  2. From: Larry Wall <lwall@netlabs.com>
  3. Subject:  v20i056:  perl - The perl programming language, Patch04
  4. Message-ID: <csm-v20i056=perl.220122@sparky.imd.sterling.com>
  5. X-Md4-Signature: 6e5a8c800bf0a070ab9b3971547c1f12
  6. Date: Thu, 20 Jun 1991 03:02:33 GMT
  7. Approved: kent@sparky.imd.sterling.com
  8.  
  9. Submitted-by: Larry Wall <lwall@netlabs.com>
  10. Posting-number: Volume 20, Issue 56
  11. Archive-name: perl/patch04
  12. Patch-To: perl: Volume 18, Issue 19-54
  13.  
  14. System: perl version 4.0
  15. Patch #: 4
  16. Priority: High
  17. Subject: many, many itty-bitty portability fixes
  18. Subject: there's now a separate doSH script
  19. Subject: new copyright notice
  20. Subject: new files
  21. Subject: cflags now emits entire cc command except for the filename
  22. Subject: alternate make programs are now semi-supported
  23. Subject: uperl.o no longer tries to link in libraries prematurely
  24. Subject: installperl now installs x2p stuff too
  25. Subject: length($`), length($&), length($') now optimized to avoid string copy
  26. Subject: cflags.SH now spits out cflags for execution
  27. Subject: Configure can now propagate arbitrary variables from old config.sh
  28. Subject: cflags can now heed config variables on a file by file basis
  29. Subject: made some allowances for "semi-standard" C
  30. Subject: added global modifier for pattern matches
  31. Subject: // wouldn't use previous pattern if it started with a null character
  32. Subject: //o and s///o now optimize themselves fully at runtime
  33. Subject: undef @array disabled "@array" interpolation
  34. Subject: chop("") was returning "\0" rather than ""
  35. Subject: vector logical operations &, | and ^ sometimes returned null string
  36. Subject: syscall couldn't pass numbers with most significant bit set on sparcs
  37. Subject: system fd's are now treated specially
  38. Subject: added $^F variable to specify maximum system fd, default 2
  39. Subject: character special files now opened with bidirectional stdio buffers
  40. Subject: taintchecks could improperly modify parent in vfork()
  41. Subject: $` was busted inside s///
  42. Subject: caller($arg) didn't work except under debugger
  43. Subject: perl-mode.el now does better with formats
  44. Subject: assignment wasn't correctly de-tainting the assigned variable.
  45. Subject: default top-of-form format is now FILEHANDLE_TOP
  46. Subject: added $^P variable to control calling of perldb routines
  47. Subject: debugger sometimes listed wrong number of lines for a statement
  48. Subject: Makefile is no longer self-modifying code under makedepend
  49. Subject: debugger lost track of lines in eval
  50. Subject: changed old $^P to $^X
  51. Subject: /(x+) \1/ incorrectly optimized to not match "xxx xx"
  52. Subject: $^D |= 1024 now does syntax tree dump at run-time
  53. Subject: taint check on undefined string could cause core dump
  54. Subject: t/TEST now tells you number of tests executed
  55. Subject: t/op/stat.t no longer depends on certain devices being in /dev
  56. Subject: index() could blow up searching for null string
  57. Subject: exec would close files even if you cleared close-on-exec flag
  58. Subject: find2perl now makes use of find.pl and finddepth.pl
  59. Subject: find2perl now optimizes -exec rm -f {} to an unlink
  60. Subject: s2p now handles embedded newlines better and optimizes common idioms
  61. Subject: a2p didn't correctly implement -n switch
  62.  
  63. Description:
  64.     Random patches, mostly bugs and portability stuff.  //g is the
  65.     only major new feature.  Additionally, there is now an alternate
  66.     license you can distribute Perl under.
  67.  
  68. Fix:    From rn, say "| patch -p -N -d DIR", where DIR is your perl source
  69.     directory.  Outside of rn, say "cd DIR; patch -p -N <thisarticle".
  70.     If you don't have the patch program, apply the following by hand,
  71.     or get patch (version 2.0, latest patchlevel).
  72.  
  73.     After patching:
  74.         *** DO NOTHING--INSTALL ALL PATCHES UP THROUGH #09 FIRST ***
  75.  
  76.     If patch indicates that patchlevel is the wrong version, you may need
  77.     to apply one or more previous patches, or the patch may already
  78.     have been applied.  See the patchlevel.h file to find out what has or
  79.     has not been applied.  In any event, don't continue with the patch.
  80.  
  81.     If you are missing previous patches they can be obtained from me:
  82.  
  83.     Larry Wall
  84.     lwall@netlabs.com
  85.  
  86.     If you send a mail message of the following form it will greatly speed
  87.     processing:
  88.  
  89.     Subject: Command
  90.     @SH mailpatch PATH perl 4.0 LIST
  91.            ^ note the c
  92.  
  93.     where PATH is a return path FROM ME TO YOU either in Internet notation,
  94.     or in bang notation from some well-known host, and LIST is the number
  95.     of one or more patches you need, separated by spaces, commas, and/or
  96.     hyphens.  Saying 35- says everything from 35 to the end.
  97.  
  98.  
  99. Index: patchlevel.h
  100. Prereq: 3
  101. 1c1
  102. < #define PATCHLEVEL 3
  103. ---
  104. > #define PATCHLEVEL 4
  105.  
  106. Index: hints/3b1.sh
  107. *** hints/3b1.sh.old    Fri Jun  7 12:24:17 1991
  108. --- hints/3b1.sh    Fri Jun  7 12:24:18 1991
  109. ***************
  110. *** 0 ****
  111. --- 1,4 ----
  112. + d_voidsig='undef'
  113. + d_tosignal='int';
  114. + echo "If you're going to use shared libraries, don't include -lmalloc, and"
  115. + echo "change cc to '/bin/ccc' when editing config.sh at the end."
  116.  
  117. Index: Artistic
  118. *** Artistic.old    Fri Jun  7 12:22:09 1991
  119. --- Artistic    Fri Jun  7 12:22:10 1991
  120. ***************
  121. *** 0 ****
  122. --- 1,117 ----
  123. + 
  124. + 
  125. + 
  126. + 
  127. +              The "Artistic License"
  128. + 
  129. +                 Preamble
  130. + 
  131. + The intent of this document is to state the conditions under which a
  132. + Package may be copied, such that the Copyright Holder maintains some
  133. + semblance of artistic control over the development of the package,
  134. + while giving the users of the package the right to use and distribute
  135. + the Package in a more-or-less customary fashion, plus the right to make
  136. + reasonable modifications.
  137. + 
  138. + Definitions:
  139. + 
  140. +     "Package" refers to the collection of files distributed by the
  141. +     Copyright Holder, and derivatives of that collection of files
  142. +     created through textual modification.
  143. + 
  144. +     "Standard Version" refers to such a Package if it has not been
  145. +     modified, or has been modified in accordance with the wishes
  146. +     of the Copyright Holder.
  147. + 
  148. +     "Copyright Holder" is whoever is named in the copyright or
  149. +     copyrights for the package.
  150. + 
  151. +     "You" is you, if you're thinking about copying or distributing
  152. +     this Package.
  153. + 
  154. +     "Reasonable copying fee" is whatever you can justify on the
  155. +     basis of media cost, duplication charges, time of people involved,
  156. +     and so on.  (You will not be required to justify it to the
  157. +     Copyright Holder, but only to the computing community at large
  158. +     as a market that must bear the fee.)
  159. + 
  160. +     "Freely Available" means that no fee is charged for the item
  161. +     itself, though there may be fees involved in handling the item.
  162. +     It also means that recipients of the item may redistribute it
  163. +     under the same conditions they received it.
  164. + 
  165. + 1. You may make and give away verbatim copies of the source form of the
  166. + Standard Version of this Package without restriction, provided that you
  167. + duplicate all of the original copyright notices and associated disclaimers.
  168. + 
  169. + 2. You may apply bug fixes, portability fixes and other modifications
  170. + derived from the Public Domain or from the Copyright Holder.  A Package
  171. + modified in such a way shall still be considered the Standard Version.
  172. + 
  173. + 3. You may otherwise modify your copy of this Package in any way, provided
  174. + that you insert a prominent notice in each changed file stating how and
  175. + when you changed that file, and provided that you do at least ONE of the
  176. + following:
  177. + 
  178. +     a) place your modifications in the Public Domain or otherwise make them
  179. +     Freely Available, such as by posting said modifications to Usenet or
  180. +     an equivalent medium, or placing the modifications on a major archive
  181. +     site such as uunet.uu.net, or by allowing the Copyright Holder to include
  182. +     your modifications in the Standard Version of the Package.
  183. + 
  184. +     b) use the modified Package only within your corporation or organization.
  185. + 
  186. +     c) rename any non-standard executables so the names do not conflict
  187. +     with standard executables, which must also be provided, and provide
  188. +     a separate manual page for each non-standard executable that clearly
  189. +     documents how it differs from the Standard Version.
  190. + 
  191. +     d) make other distribution arrangements with the Copyright Holder.
  192. + 
  193. + 4. You may distribute the programs of this Package in object code or
  194. + executable form, provided that you do at least ONE of the following:
  195. + 
  196. +     a) distribute a Standard Version of the executables and library files,
  197. +     together with instructions (in the manual page or equivalent) on where
  198. +     to get the Standard Version.
  199. + 
  200. +     b) accompany the distribution with the machine-readable source of
  201. +     the Package with your modifications.
  202. + 
  203. +     c) accompany any non-standard executables with their corresponding
  204. +     Standard Version executables, giving the non-standard executables
  205. +     non-standard names, and clearly documenting the differences in manual
  206. +     pages (or equivalent), together with instructions on where to get
  207. +     the Standard Version.
  208. + 
  209. +     d) make other distribution arrangements with the Copyright Holder.
  210. + 
  211. + 5. You may charge a reasonable copying fee for any distribution of this
  212. + Package.  You may charge any fee you choose for support of this Package.
  213. + You may not charge a fee for this Package itself.  However,
  214. + you may distribute this Package in aggregate with other (possibly
  215. + commercial) programs as part of a larger (possibly commercial) software
  216. + distribution provided that you do not advertise this Package as a
  217. + product of your own.
  218. + 
  219. + 6. The scripts and library files supplied as input to or produced as
  220. + output from the programs of this Package do not automatically fall
  221. + under the copyright of this Package, but belong to whomever generated
  222. + them, and may be sold commercially, and may be aggregated with this
  223. + Package.
  224. + 
  225. + 7. C subroutines supplied by you and linked into this Package in order
  226. + to emulate subroutines and variables of the language defined by this
  227. + Package shall not be considered part of this Package, but are the
  228. + equivalent of input as in Paragraph 6, provided these subroutines do
  229. + not change the language in any way that would cause it to fail the
  230. + regression tests for the language.
  231. + 
  232. + 8. The name of the Copyright Holder may not be used to endorse or promote
  233. + products derived from this software without specific prior written permission.
  234. + 
  235. + 9. THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR
  236. + IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  237. + WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  238. + 
  239. +                 The End
  240.  
  241. Index: Configure
  242. Prereq: 4.0.1.1
  243. *** Configure.old    Fri Jun  7 12:22:15 1991
  244. --- Configure    Fri Jun  7 12:22:17 1991
  245. ***************
  246. *** 8,14 ****
  247.   # and edit it to reflect your system.  Some packages may include samples
  248.   # of config.h for certain machines, so you might look for one of those.)
  249.   #
  250. ! # $RCSfile: Configure,v $$Revision: 4.0.1.1 $$Date: 91/04/11 17:26:42 $
  251.   #
  252.   # Yes, you may rip this off to use in other distribution packages.
  253.   # (Note: this Configure script was generated automatically.  Rather than
  254. --- 8,14 ----
  255.   # and edit it to reflect your system.  Some packages may include samples
  256.   # of config.h for certain machines, so you might look for one of those.)
  257.   #
  258. ! # $RCSfile: Configure,v $$Revision: 4.0.1.2 $$Date: 91/06/07 10:09:34 $
  259.   #
  260.   # Yes, you may rip this off to use in other distribution packages.
  261.   # (Note: this Configure script was generated automatically.  Rather than
  262. ***************
  263. *** 189,194 ****
  264. --- 189,195 ----
  265.   d_setruid=''
  266.   d_shm=''
  267.   d_shmat=''
  268. + d_voidshmat=''
  269.   d_shmctl=''
  270.   d_shmdt=''
  271.   d_shmget=''
  272. ***************
  273. *** 263,268 ****
  274. --- 264,270 ----
  275.   cppflags=''
  276.   ldflags=''
  277.   cc=''
  278. + nativegcc=''
  279.   libs=''
  280.   n=''
  281.   c=''
  282. ***************
  283. *** 269,274 ****
  284. --- 271,277 ----
  285.   package=''
  286.   randbits=''
  287.   scriptdir=''
  288. + installscr=''
  289.   sig_name=''
  290.   spitshell=''
  291.   shsharp=''
  292. ***************
  293. *** 338,345 ****
  294.   d_ndir=ndir
  295.   voidwant=1
  296.   voidwant=7
  297. ! libswanted="net_s net nsl_s nsl socket nm ndir ndbm dbm malloc sun m bsd BSD x c_s posix"
  298. ! inclwanted='/usr/include /usr/netinclude /usr/include/sun /usr/include/bsd /usr/include/lan'
  299.   
  300.   : Now test for existence of everything in MANIFEST
  301.   
  302. --- 341,348 ----
  303.   d_ndir=ndir
  304.   voidwant=1
  305.   voidwant=7
  306. ! libswanted="c_s net_s net nsl_s nsl socket nm ndir ndbm dbm malloc sun m bsd BSD x posix ucb"
  307. ! inclwanted='/usr/include /usr/netinclude /usr/include/sun /usr/include/bsd /usr/include/lan /usr/ucbinclude'
  308.   
  309.   : Now test for existence of everything in MANIFEST
  310.   
  311. ***************
  312. *** 712,725 ****
  313.   hint=default
  314.   if test -f ../config.sh; then
  315.       echo " "
  316. !     eval `grep lastuname ../config.sh`
  317. !     uname=`(uname -a || hostname) 2>&1`
  318. !     if test "X$uname" = "X$lastuname"; then
  319.       dflt=y
  320.       else
  321.       dflt=n
  322.       fi
  323. !     lastuname="$uname"
  324.       rp="I see a config.sh file.  Did Configure make it on THIS system? [$dflt]"
  325.       echo $n "$rp $c"
  326.       . myread
  327. --- 715,728 ----
  328.   hint=default
  329.   if test -f ../config.sh; then
  330.       echo " "
  331. !     eval "`grep lastuname ../config.sh`"
  332. !     tmp=`(uname -a) 2>&1`
  333. !     if test "X$tmp" = "X$lastuname"; then
  334.       dflt=y
  335.       else
  336.       dflt=n
  337.       fi
  338. !     lastuname="$tmp"
  339.       rp="I see a config.sh file.  Did Configure make it on THIS system? [$dflt]"
  340.       echo $n "$rp $c"
  341.       . myread
  342. ***************
  343. *** 746,751 ****
  344. --- 749,755 ----
  345.       test -f /dynix && dflt="$dflt dynix"
  346.       test -f /dnix && dflt="$dflt dnix"
  347.       test -f /bin/mips && /bin/mips && dflt="$dflt mips"
  348. +     test -d /NextApps && test -f /usr/adm/software_version && dflt="$dflt next"
  349.       if test -f /bin/uname || test -f /usr/bin/uname; then
  350.       set `uname -a | tr '[A-Z]' '[a-z]'`
  351.   
  352. ***************
  353. *** 798,804 ****
  354.       case "$dflt" in
  355.       '') dflt=none;;
  356.       esac
  357. !     echo '(You may give one or more space-separated answers, or "none" if appropriate.)'
  358.       rp="Which of these apply, if any? [$dflt]"
  359.       echo $n "$rp $c"
  360.       . myread
  361. --- 802,809 ----
  362.       case "$dflt" in
  363.       '') dflt=none;;
  364.       esac
  365. !     echo '(You may give one or more space-separated answers, or "none" if appropriate.'
  366. !     echo 'If your OS version has no hints, do not give a wrong version--say "none".)'
  367.       rp="Which of these apply, if any? [$dflt]"
  368.       echo $n "$rp $c"
  369.       . myread
  370. ***************
  371. *** 805,810 ****
  372. --- 810,816 ----
  373.       for file in $ans; do
  374.       if test -f ../hints/$file.sh; then
  375.           . ../hints/$file.sh
  376. +         cat ../hints/$file.sh >>../config.sh
  377.           hint=recommended
  378.       fi
  379.       done
  380. ***************
  381. *** 1238,1244 ****
  382.       cc="$ans"
  383.   fi
  384.   case "$cc" in
  385. ! gcc*) cpp=`./loc gcc-cpp $cpp $pth`;;
  386.   esac
  387.   
  388.   : determine optimize, if desired, or use for debug flag also
  389. --- 1244,1268 ----
  390.       cc="$ans"
  391.   fi
  392.   case "$cc" in
  393. ! gcc*) cpp=`./loc gcc-cpp $cpp $pth`
  394. !     case "$nativegcc" in
  395. !     '') case "$ccflags" in
  396. !     *-fpcc-struct-return*) dflt=n;;
  397. !     *) dflt=y;;
  398. !     esac
  399. !     ;;
  400. !     undef) dflt=n;;
  401. !     *) dflt=y;;
  402. !     esac
  403. !     echo " "
  404. !     rp="Are your system (especially dbm) libraries compiled with gcc? [$dflt]"
  405. !     $echo $n "$rp $c"
  406. !     . myread
  407. !     case "$ans" in
  408. !     n*) nativegcc="$undef"; gccflags='-fpcc-struct-return';;
  409. !     *) nativegcc="$define"; gccflags='';;
  410. !     esac
  411. !     ;;
  412.   esac
  413.   
  414.   : determine optimize, if desired, or use for debug flag also
  415. ***************
  416. *** 1270,1280 ****
  417.   
  418.   case "$ccflags" in
  419.   '') case "$cc" in
  420. !     *gcc*) dflt='-fpcc-struct-return';;
  421.       *) dflt='';;
  422.       esac
  423.       ;;
  424. ! *) dflt="$ccflags";;
  425.   esac
  426.   for thisincl in $inclwanted; do
  427.       if test -d $thisincl; then
  428. --- 1294,1309 ----
  429.   
  430.   case "$ccflags" in
  431.   '') case "$cc" in
  432. !     *gcc*) dflt="$gccflags";;
  433.       *) dflt='';;
  434.       esac
  435.       ;;
  436. ! *-fpcc-struct-return*) dflt="$ccflags";;
  437. ! *) case "$cc" in
  438. !     *gcc*) dflt="$ccflags $gccflags";;
  439. !     *) dflt="$ccflags";;
  440. !     esac
  441. !     ;;
  442.   esac
  443.   for thisincl in $inclwanted; do
  444.       if test -d $thisincl; then
  445. ***************
  446. *** 1336,1342 ****
  447.       cppflags=''
  448.       for flag do
  449.       case $flag in
  450. !     -D*|-I*|-traditional|-ansi|-nostdinc) cppflags="$cppflags $flag";;
  451.       esac
  452.       done
  453.       case "$cppflags" in
  454. --- 1365,1371 ----
  455.       cppflags=''
  456.       for flag do
  457.       case $flag in
  458. !     -D*|-U*|-I*|-traditional|-ansi|-nostdinc) cppflags="$cppflags $flag";;
  459.       esac
  460.       done
  461.       case "$cppflags" in
  462. ***************
  463. *** 1524,1529 ****
  464. --- 1553,1559 ----
  465.   case "$installbin" in
  466.   '')
  467.       dflt=`echo $bin | sed 's#^/afs/#/afs/.#'`
  468. +     test -d $dflt || dflt="$bin"
  469.       ;;
  470.   *)  dflt="$installbin"
  471.       ;;
  472. ***************
  473. *** 1611,1616 ****
  474. --- 1641,1648 ----
  475.   $cat >try.c <<'EOCP'
  476.   #include <signal.h>
  477.   
  478. + blech() { exit(3); }
  479. + 
  480.   main()
  481.   {
  482.       double f = -123;
  483. ***************
  484. *** 1619,1625 ****
  485.       unsigned short ashort;
  486.       int result = 0;
  487.   
  488. !     signal(SIGFPE, SIG_IGN);
  489.       along = (unsigned long)f;
  490.       aint = (unsigned int)f;
  491.       ashort = (unsigned short)f;
  492. --- 1651,1657 ----
  493.       unsigned short ashort;
  494.       int result = 0;
  495.   
  496. !     signal(SIGFPE, blech);
  497.       along = (unsigned long)f;
  498.       aint = (unsigned int)f;
  499.       ashort = (unsigned short)f;
  500. ***************
  501. *** 1674,1776 ****
  502.   #define XYZ xyz
  503.   ABC.XYZ
  504.   EOT
  505. ! echo 'Maybe "'"$cc"' -E" will work...'
  506. ! $cc -E <testcpp.c >testcpp.out 2>&1
  507. ! : try to force gcc preprocessor if that is the compiler they are using
  508. ! case $? in
  509. ! 0) cppstdin="$cc -E";;
  510. ! *) case "$cc" in
  511. !     *gcc*)
  512. !     cd ..
  513. !     echo 'Trying (cat >/tmp/$$.c; '"$cc"' -E /tmp/$$.c; rm /tmp/$$.c)'
  514. !     echo 'cat >/tmp/$$.c; '"$cc"' -E /tmp/$$.c; rm /tmp/$$.c' >cppstdin
  515. !     chmod 755 cppstdin
  516. !     cppstdin=`pwd`/cppstdin
  517. !     cppminus='';
  518. !     cd UU
  519. !     $cppstdin <testcpp.c >testcpp.out 2>&1
  520. !     ;;
  521. !     esac
  522. !     ;;
  523. ! esac
  524. ! if $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  525.       echo "Yup, it does."
  526.       cppstdin="$cc -E"
  527.       cppminus='';
  528.   else
  529. !     echo 'Nope...maybe "'"$cc"' -E -" will work...'
  530. !     $cc -E - <testcpp.c >testcpp.out 2>&1
  531.       if $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  532. !     echo "Yup, it does."
  533. !     cppstdin="$cc -E"
  534. !     cppminus='-';
  535.       else
  536. !     echo 'No such luck, maybe "'$cpp'" will work...'
  537. !     $cpp <testcpp.c >testcpp.out 2>&1
  538. !     if $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  539. !         echo "It works!"
  540. !         cppstdin="$cpp"
  541. !         cppminus='';
  542. !     else
  543. !         echo 'Nixed again...maybe "'$cpp' -" will work...'
  544. !         $cpp - <testcpp.c >testcpp.out 2>&1
  545. !         if $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  546. !         echo "Hooray, it works!  I was beginning to wonder."
  547. !         cppstdin="$cpp"
  548. !         cppminus='-';
  549. !         else
  550. !         echo 'Nope...maybe "'"$cc"' -P" will work...'
  551. !         $cc -P <testcpp.c >testcpp.out 2>&1
  552. !         if $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  553. !             echo "Yup, that does."
  554. !             cppstdin="$cc -P"
  555. !             cppminus='';
  556. !         else
  557. !             echo 'Nope...maybe "'"$cc"' -P -" will work...'
  558. !             $cc -P - <testcpp.c >testcpp.out 2>&1
  559. !             if $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  560. !             echo "Yup, that does."
  561. !             cppstdin="$cc -P"
  562. !             cppminus='-';
  563. !             else
  564. !             echo 'Hmm...perhaps you already told me...'
  565. !             case "$cppstdin" in
  566. !             '') ;;
  567. !             *) $cppstdin $cppminus <testcpp.c >testcpp.out 2>&1;;
  568. !             esac
  569. !             if $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  570. !                 echo "Hooray, you did!  I was beginning to wonder."
  571. !             else
  572. !                 echo 'Uh-uh.  Time to get fancy...'
  573. !                 cd ..
  574. !                 echo 'Trying (cat >/tmp/$$.c; '"$cc"' -E /tmp/$$.c; rm /tmp/$$.c)'
  575. !                 echo 'cat >/tmp/$$.c; '"$cc"' -E /tmp/$$.c; rm /tmp/$$.c' >cppstdin
  576. !                 chmod 755 cppstdin
  577. !                 cppstdin=`pwd`/cppstdin
  578. !                 cppminus='';
  579. !                 cd UU
  580. !                 $cppstdin <testcpp.c >testcpp.out 2>&1
  581. !                 if $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  582. !                 echo "Eureka!."
  583. !                 else
  584. !                 dflt=blurfl
  585. !                 $echo $n "No dice.  I can't find a C preprocessor.  Name one: $c"
  586. !                 rp='Name a C preprocessor:'
  587. !                 . myread
  588. !                 cppstdin="$ans"
  589. !                 $cppstdin <testcpp.c >testcpp.out 2>&1
  590. !                 if $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  591. !                     echo "OK, that will do."
  592. !                 else
  593. !                     echo "Sorry, I can't get that to work.  Go find one."
  594. !                     exit 1
  595. !                 fi
  596. !                 fi
  597. !             fi
  598. !             fi
  599. !         fi
  600. !         fi
  601. !     fi
  602.       fi
  603.   fi
  604.   
  605. --- 1706,1783 ----
  606.   #define XYZ xyz
  607.   ABC.XYZ
  608.   EOT
  609. ! 
  610. ! cd ..
  611. ! echo 'cat >.$$.c; '"$cc"' -E ${1+"$@"} .$$.c; rm .$$.c' >cppstdin
  612. ! chmod 755 cppstdin
  613. ! wrapper=`pwd`/cppstdin
  614. ! cd UU
  615. ! 
  616. ! if test "X$cppstdin" != "X" && \
  617. !   $cppstdin $cppminus <testcpp.c >testcpp.out 2>&1 && \
  618. !   $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  619. !     echo "You used to use $cppstdin $cppminus so we'll use that again."
  620. ! elif test "$cc" = gcc && \
  621. !   (echo "Using gcc, eh?  We'll try to force gcc -E using a wrapper..."; \
  622. !   $wrapper <testcpp.c >testcpp.out 2>&1; \
  623. !   $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1) ; then
  624. !     echo "Yup, we can."
  625. !     cppstdin="$wrapper"
  626. !     cppminus='';
  627. ! elif echo 'Maybe "'"$cc"' -E" will work...'; \
  628. !   $cc -E <testcpp.c >testcpp.out 2>&1; \
  629. !   $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  630.       echo "Yup, it does."
  631.       cppstdin="$cc -E"
  632.       cppminus='';
  633. + elif echo 'Nope...maybe "'"$cc"' -E -" will work...'; \
  634. +   $cc -E - <testcpp.c >testcpp.out 2>&1; \
  635. +   $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  636. +     echo "Yup, it does."
  637. +     cppstdin="$cc -E"
  638. +     cppminus='-';
  639. + elif echo 'Uh-uh.  Time to get fancy.  Trying a wrapper...'; \
  640. +   $wrapper <testcpp.c >testcpp.out 2>&1; \
  641. +   $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  642. +     cppstdin="$wrapper"
  643. +     cppminus=''
  644. +     echo "Eureka!."
  645. + elif echo 'No such luck, maybe "'$cpp'" will work...'; \
  646. +   $cpp <testcpp.c >testcpp.out 2>&1; \
  647. +   $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  648. +     echo "It works!"
  649. +     cppstdin="$cpp"
  650. +     cppminus='';
  651. + elif echo 'Nixed again...maybe "'$cpp' -" will work...'; \
  652. +   $cpp - <testcpp.c >testcpp.out 2>&1; \
  653. +   $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  654. +     echo "Hooray, it works!  I was beginning to wonder."
  655. +     cppstdin="$cpp"
  656. +     cppminus='-';
  657. + elif echo 'Nope...maybe "'"$cc"' -P" will work...'; \
  658. +   $cc -P <testcpp.c >testcpp.out 2>&1; \
  659. +   $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  660. +     echo "Yipee, that works!"
  661. +     cppstdin="$cc -P"
  662. +     cppminus='';
  663. + elif echo 'Nope...maybe "'"$cc"' -P -" will work...'; \
  664. +   $cc -P - <testcpp.c >testcpp.out 2>&1; \
  665. +   $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  666. +     echo "At long last!"
  667. +     cppstdin="$cc -P"
  668. +     cppminus='-';
  669.   else
  670. !     dflt=blurfl
  671. !     $echo $n "No dice.  I can't find a C preprocessor.  Name one: $c"
  672. !     rp='Name a C preprocessor:'
  673. !     . myread
  674. !     cppstdin="$ans"
  675. !     $cppstdin <testcpp.c >testcpp.out 2>&1
  676.       if $contains 'abc.*xyz' testcpp.out >/dev/null 2>&1 ; then
  677. !     echo "OK, that will do."
  678.       else
  679. !     echo "Sorry, I can't get that to work.  Go find one and rerun Configure."
  680. !     exit 1
  681.       fi
  682.   fi
  683.   
  684. ***************
  685. *** 1834,1845 ****
  686.   test -f $1 || set /lib/libsys_s.a
  687.   eval set \$$#
  688.   if test -f "$1"; then
  689. !     echo "Your shared C library is in $1."
  690.       libc="$1"
  691.   elif test -f "$libc"; then
  692. !     echo "Your C library is in $libc."
  693.   elif test -f /lib/libc.a; then
  694. !     echo "Your C library is in /lib/libc.a.  You're normal."
  695.       libc=/lib/libc.a
  696.   else
  697.       if   ans=`./loc libc.a  blurfl/dyick $libpth`; test -f "$ans"; then
  698. --- 1841,1852 ----
  699.   test -f $1 || set /lib/libsys_s.a
  700.   eval set \$$#
  701.   if test -f "$1"; then
  702. !     echo "Your (shared) C library seems to be in $1."
  703.       libc="$1"
  704.   elif test -f "$libc"; then
  705. !     echo "Your C library seems to be in $libc."
  706.   elif test -f /lib/libc.a; then
  707. !     echo "Your C library seems to be in /lib/libc.a.  You're normal."
  708.       libc=/lib/libc.a
  709.   else
  710.       if   ans=`./loc libc.a  blurfl/dyick $libpth`; test -f "$ans"; then
  711. ***************
  712. *** 1856,1862 ****
  713.       :
  714.       fi
  715.       if test -f "$ans"; then
  716. !     echo "Your C library is in $ans, of all places."
  717.       libc=$ans
  718.       else
  719.       cat <<EOM
  720. --- 1863,1869 ----
  721.       :
  722.       fi
  723.       if test -f "$ans"; then
  724. !     echo "Your C library seems to be in $ans, of all places."
  725.       libc=$ans
  726.       else
  727.       cat <<EOM
  728. ***************
  729. *** 1878,1885 ****
  730.   if test $libc = "/lib/libc"; then
  731.       libc="$libc /lib/clib"
  732.   fi
  733. ! set `echo $libc $libnames | tr ' ' '\012' | sort | uniq`
  734. ! $echo $n "Extracting names from $* for later perusal...$c"
  735.   nm $nm_opts $* 2>/dev/null >libc.tmp
  736.   $sed -n -e 's/^.* [ATDS]  *[_.]*//p' -e 's/^.* [ATDS] //p' <libc.tmp >libc.list
  737.   if $contains '^printf$' libc.list >/dev/null 2>&1; then
  738. --- 1885,1907 ----
  739.   if test $libc = "/lib/libc"; then
  740.       libc="$libc /lib/clib"
  741.   fi
  742. ! cat <<END
  743. !  
  744. ! If the guess above is wrong (which it might be if you're using a strange
  745. ! compiler, or your machine supports multiple models), you can override it here.
  746. ! END
  747. ! dflt="$libc";
  748. ! rp="Your C library is where? [$dflt]"
  749. ! $echo $n "$rp $c"
  750. ! . myread
  751. ! libc="$ans"
  752. ! echo " "
  753. ! echo $libc $libnames | tr ' ' '\012' | sort | uniq >libnames
  754. ! $echo "Extracting names from the following files for later perusal:"
  755. ! sed 's/^/    /' libnames
  756. ! echo $n "This may take a while...$c"
  757. ! set X `cat libnames`
  758. ! shift
  759.   nm $nm_opts $* 2>/dev/null >libc.tmp
  760.   $sed -n -e 's/^.* [ATDS]  *[_.]*//p' -e 's/^.* [ATDS] //p' <libc.tmp >libc.list
  761.   if $contains '^printf$' libc.list >/dev/null 2>&1; then
  762. ***************
  763. *** 1898,1904 ****
  764.           <libc.tmp >libc.list; \
  765.     $contains '^printf$' libc.list >/dev/null 2>&1; then
  766.       echo done
  767. ! elif $grep '|' <libc.tmp | $sed -n -e '/|COMMON/d' -e '/|DATA/d' \
  768.                                      -e 's/^\([^     ]*\).*/\1/p' >libc.list
  769.     $contains '^printf$' libc.list >/dev/null 2>&1; then
  770.       echo done
  771. --- 1920,1926 ----
  772.           <libc.tmp >libc.list; \
  773.     $contains '^printf$' libc.list >/dev/null 2>&1; then
  774.       echo done
  775. ! elif $grep '|' <libc.tmp | $sed -n -e '/|COMMON/d' -e '/|DATA/d' -e '/ file/d' \
  776.                                      -e 's/^\([^     ]*\).*/\1/p' >libc.list
  777.     $contains '^printf$' libc.list >/dev/null 2>&1; then
  778.       echo done
  779. ***************
  780. *** 1939,1954 ****
  781.       fi
  782.       fi
  783.   fi
  784.   
  785. - : old version
  786. - 
  787. - inlibc='echo " ";
  788. - if $contains "^$1\$" libc.list >/dev/null 2>&1;
  789. - then echo "$1() found"; eval "$2=$define";
  790. - else echo "$1() not found"; eval "$2=$undef"; fi'
  791. - 
  792. - : new version
  793. - 
  794.   inlibc='echo " "; td=$define; tu=$undef;
  795.   if $contains "^$1\$" libc.list >/dev/null 2>&1;
  796.   then echo "$1() found";
  797. --- 1961,1971 ----
  798.       fi
  799.       fi
  800.   fi
  801. + if test -f /lib/syscalls.exp; then
  802. +     echo "Also extracting names from /lib/syscalls.exp for good ole AIX..."
  803. +     sed -n 's/^\([^     ]*\)[     ]*syscall$/\1/p' /lib/syscalls.exp >>libc.list
  804. + fi
  805.   
  806.   inlibc='echo " "; td=$define; tu=$undef;
  807.   if $contains "^$1\$" libc.list >/dev/null 2>&1;
  808.   then echo "$1() found";
  809. ***************
  810. *** 2615,2620 ****
  811. --- 2632,2650 ----
  812.   set shmat d_shmat
  813.   eval $inlibc
  814.   
  815. + d_voidshmat="$undef"
  816. + case "$d_shmat" in
  817. + define)
  818. +     $cppstdin $cppflags $cppminus < $usrinclude/sys/shm.h >voidshmat.txt 2>/dev/null
  819. +     if $contains "void.*shmat" voidshmat.txt >/dev/null 2>&1; then
  820. +     echo "and shmat returns (void*)"
  821. +     d_voidshmat="$define"
  822. +     else
  823. +     echo "and shmat returns (char*)"
  824. +     fi
  825. +     ;;
  826. + esac
  827. + 
  828.   : see if shmdt exists
  829.   set shmdt d_shmdt
  830.   eval $inlibc
  831. ***************
  832. *** 2854,2870 ****
  833.   : see if signal is declared as pointer to function returning int or void
  834.   echo " "
  835.   $cppstdin $cppflags $cppminus < $usrinclude/signal.h >d_voidsig.txt
  836. ! if $contains 'int.*signal' d_voidsig.txt >/dev/null 2>&1 ; then
  837.       echo "You have int (*signal())() instead of void."
  838.       val="$undef"
  839. -     d_tosignal=int
  840.   else
  841.       echo "You have void (*signal())() instead of int."
  842.       val="$define"
  843. -     d_tosignal=void
  844.   fi
  845.   set d_voidsig
  846.   eval $setvar
  847.   
  848.   : see if truncate exists
  849.   set truncate d_truncate
  850. --- 2884,2902 ----
  851.   : see if signal is declared as pointer to function returning int or void
  852.   echo " "
  853.   $cppstdin $cppflags $cppminus < $usrinclude/signal.h >d_voidsig.txt
  854. ! if $contains 'int[^A-Za-z]*signal' d_voidsig.txt >/dev/null 2>&1 ; then
  855.       echo "You have int (*signal())() instead of void."
  856.       val="$undef"
  857.   else
  858.       echo "You have void (*signal())() instead of int."
  859.       val="$define"
  860.   fi
  861.   set d_voidsig
  862.   eval $setvar
  863. + case $voidsig in
  864. + define) d_tosignal=void;;
  865. + *) d_tosignal=int;;
  866. + esac
  867.   
  868.   : see if truncate exists
  869.   set truncate d_truncate
  870. ***************
  871. *** 2929,2934 ****
  872. --- 2961,3004 ----
  873.   . myread
  874.   gidtype="$ans"
  875.   
  876. + : see what type gids are returned by getgroups
  877. + echo " "
  878. + case "$groupstype" in
  879. + '')
  880. +     if $contains 'getgroups.*short' /usr/lib/lint/llib-lc >/dev/null 2>&1; then
  881. +     dflt='short'
  882. +     elif $contains 'getgroups.*int' /usr/lib/lint/llib-lc >/dev/null 2>&1; then
  883. +     dflt='int'
  884. +     elif $contains 'getgroups.*short' /usr/include/libc.h >/dev/null 2>&1; then
  885. +     dflt='short'
  886. +     elif $contains 'getgroups.*int' /usr/include/libc.h >/dev/null 2>&1; then
  887. +     dflt='int'
  888. +     elif $contains 'getgroups.*short' /usr/lib/lint/llib-lbsd >/dev/null 2>&1; then
  889. +     dflt='short'
  890. +     elif $contains 'getgroups.*int' /usr/lib/lint/llib-lbsd >/dev/null 2>&1; then
  891. +     dflt='int'
  892. +     elif $contains 'int.*gidset' /usr/man/man2/getgroups.2 >/dev/null 2>&1; then
  893. +     dflt='int'
  894. +     elif $contains 'gid_t;' $usrinclude/sys/types.h >/dev/null 2>&1 ; then
  895. +     dflt='gid_t'
  896. +     else
  897. +     set `grep 'groups\[NGROUPS\];' $usrinclude/sys/user.h 2>/dev/null` unsigned short
  898. +     case $1 in
  899. +     unsigned) dflt="$1 $2" ;;
  900. +     *) dflt="$1" ;;
  901. +     esac
  902. +     fi
  903. +     ;;
  904. + *)  dflt="$groupstype"
  905. +     ;;
  906. + esac
  907. + cont=true
  908. + echo "(The following only matters if you have getgroups().)"
  909. + rp="What type are the group ids returned by getgroups()? [$dflt]"
  910. + $echo $n "$rp $c"
  911. + . myread
  912. + groupstype="$ans"
  913. + 
  914.   : check for length of integer
  915.   echo " "
  916.   case "$intsize" in
  917. ***************
  918. *** 2983,2989 ****
  919. --- 3053,3063 ----
  920.       case "$mallocptrtype" in
  921.       '')
  922.       cat >usemymalloc.c <<'END'
  923. + #ifdef __STDC__
  924. + #include <stdlib.h>
  925. + #else
  926.   #include <malloc.h>
  927. + #endif
  928.   void *malloc();
  929.   END
  930.       if $cc $ccflags -c usemymalloc.c >/dev/null 2>&1; then
  931. ***************
  932. *** 3021,3026 ****
  933. --- 3095,3101 ----
  934.   case "$installprivlib" in
  935.   '')
  936.       dflt=`echo $privlib | sed 's#^/afs/#/afs/.#'`
  937. +     test -d $dflt || dflt="$privlib"
  938.       ;;
  939.   *)  dflt="$installprivlib"
  940.       ;;
  941. ***************
  942. *** 3073,3079 ****
  943.   . myread
  944.   randbits="$ans"
  945.   
  946. ! : determine where public executables go
  947.   case "$scriptdir" in
  948.   '')
  949.       dflt="$bin"
  950. --- 3148,3154 ----
  951.   . myread
  952.   randbits="$ans"
  953.   
  954. ! : determine where publicly executable scripts go
  955.   case "$scriptdir" in
  956.   '')
  957.       dflt="$bin"
  958. ***************
  959. *** 3094,3100 ****
  960.    
  961.   EOM
  962.   while $test "$cont" ; do
  963. !     rp="Where do you keep publicly executable scripts (~name ok)? [$dflt]"
  964.       $echo $n "$rp $c"
  965.       . myread
  966.       scriptdir="$ans"
  967. --- 3169,3175 ----
  968.    
  969.   EOM
  970.   while $test "$cont" ; do
  971. !     rp="Where will publicly executable scripts reside (~name ok)? [$dflt]"
  972.       $echo $n "$rp $c"
  973.       . myread
  974.       scriptdir="$ans"
  975. ***************
  976. *** 3116,3121 ****
  977. --- 3191,3233 ----
  978.       fi
  979.   done
  980.   
  981. + case "$installscr" in
  982. + '')
  983. +     dflt=`echo $scriptdir | sed 's#^/afs/#/afs/.#'`
  984. +     test -d $dflt || dflt="$scriptdir"
  985. +     ;;
  986. + *)  dflt="$scriptdir"
  987. +     ;;
  988. + esac
  989. + cont=true
  990. + $cat <<EOM
  991. +  
  992. + Some installations must install scripts in a different directory than where
  993. + they will eventually reside.  On most systems they're the same directory.
  994. + EOM
  995. + while $test "$cont" ; do
  996. +     rp="Where do you install publicly executable scripts (~name ok)? [$dflt]"
  997. +     $echo $n "$rp $c"
  998. +     . myread
  999. +     installscr="$ans"
  1000. +     installscr=`./filexp "$installscr"`
  1001. +     if test -d $installscr; then
  1002. +     cont=''
  1003. +     else
  1004. +     case "$fastread" in
  1005. +     yes) dflt=y;;
  1006. +     *) dflt=n;;
  1007. +     esac
  1008. +     rp="Directory $installscr doesn't exist.  Use that name anyway? [$dflt]"
  1009. +     $echo $n "$rp $c"
  1010. +     . myread
  1011. +     dflt=''
  1012. +     case "$ans" in
  1013. +     y*) cont='';;
  1014. +     esac
  1015. +     fi
  1016. + done
  1017. + 
  1018.   : generate list of signal names
  1019.   echo " "
  1020.   case "$sig_name" in
  1021. ***************
  1022. *** 3159,3165 ****
  1023.   
  1024.   : see what type of char stdio uses.
  1025.   echo " "
  1026. ! if $contains 'unsigned.*char.*_ptr;' $usrinclude/stdio.h >/dev/null 2>&1 ; then
  1027.       echo "Your stdio uses unsigned chars."
  1028.       stdchar="unsigned char"
  1029.   else
  1030. --- 3271,3277 ----
  1031.   
  1032.   : see what type of char stdio uses.
  1033.   echo " "
  1034. ! if $contains 'unsigned.*char.*\*.*_ptr.*;' $usrinclude/stdio.h >/dev/null 2>&1 ; then
  1035.       echo "Your stdio uses unsigned chars."
  1036.       stdchar="unsigned char"
  1037.   else
  1038. ***************
  1039. *** 3223,3229 ****
  1040.       exit(0);
  1041.   }
  1042.   EOCP
  1043. !     if $cc -S -DTRY=$voidwant void.c >void.out 2>&1 ; then
  1044.       voidhave=$voidwant
  1045.       echo "It appears to support void to the level $package wants ($voidwant)."
  1046.       if $contains warning void.out >/dev/null 2>&1; then
  1047. --- 3335,3341 ----
  1048.       exit(0);
  1049.   }
  1050.   EOCP
  1051. !     if $cc -c -DTRY=$voidwant void.c >void.out 2>&1 ; then
  1052.       voidhave=$voidwant
  1053.       echo "It appears to support void to the level $package wants ($voidwant)."
  1054.       if $contains warning void.out >/dev/null 2>&1; then
  1055. ***************
  1056. *** 3232,3245 ****
  1057.       fi
  1058.       else
  1059.       echo "Hmm, your compiler has some difficulty with void.  Checking further..."
  1060. !     if $cc -S -DTRY=1 void.c >/dev/null 2>&1 ; then
  1061.           echo "It supports 1..."
  1062. !         if $cc -S -DTRY=3 void.c >/dev/null 2>&1 ; then
  1063.           voidhave=3
  1064.           echo "And it supports 2 but not 4."
  1065.           else
  1066.           echo "It doesn't support 2..."
  1067. !         if $cc -S -DTRY=5 void.c >/dev/null 2>&1 ; then
  1068.               voidhave=5
  1069.               echo "But it supports 4."
  1070.           else
  1071. --- 3344,3357 ----
  1072.       fi
  1073.       else
  1074.       echo "Hmm, your compiler has some difficulty with void.  Checking further..."
  1075. !     if $cc -c -DTRY=1 void.c >/dev/null 2>&1 ; then
  1076.           echo "It supports 1..."
  1077. !         if $cc -c -DTRY=3 void.c >/dev/null 2>&1 ; then
  1078.           voidhave=3
  1079.           echo "And it supports 2 but not 4."
  1080.           else
  1081.           echo "It doesn't support 2..."
  1082. !         if $cc -c -DTRY=5 void.c >/dev/null 2>&1 ; then
  1083.               voidhave=5
  1084.               echo "But it supports 4."
  1085.           else
  1086. ***************
  1087. *** 3292,3331 ****
  1088.   esac
  1089.   yacc="$ans"
  1090.   
  1091. - : see what type gids are returned by getgroups
  1092. - echo " "
  1093. - case "$groupstype" in
  1094. - '')
  1095. -     if $contains 'getgroups.*short' /usr/lib/lint/llib-lc >/dev/null 2>&1; then
  1096. -     dflt='short'
  1097. -     elif $contains 'getgroups.*int' /usr/lib/lint/llib-lc >/dev/null 2>&1; then
  1098. -     dflt='int'
  1099. -     elif $contains 'getgroups.*short' /usr/lib/lint/llib-lbsd >/dev/null 2>&1; then
  1100. -     dflt='short'
  1101. -     elif $contains 'getgroups.*int' /usr/lib/lint/llib-lbsd >/dev/null 2>&1; then
  1102. -     dflt='int'
  1103. -     elif $contains 'int gidset' /usr/man/man2/getgroups.2 >/dev/null 2>&1 ; then
  1104. -     dflt='int'
  1105. -     elif $contains 'gid_t;' $usrinclude/sys/types.h >/dev/null 2>&1 ; then
  1106. -     dflt='gid_t'
  1107. -     else
  1108. -     set `grep 'groups\[NGROUPS\];' $usrinclude/sys/user.h 2>/dev/null` unsigned short
  1109. -     case $1 in
  1110. -     unsigned) dflt="$1 $2" ;;
  1111. -     *) dflt="$1" ;;
  1112. -     esac
  1113. -     fi
  1114. -     ;;
  1115. - *)  dflt="$groupstype"
  1116. -     ;;
  1117. - esac
  1118. - cont=true
  1119. - echo "(The following only matters if you have getgroups().)"
  1120. - rp="What type are the group ids returned by getgroups()? [$dflt]"
  1121. - $echo $n "$rp $c"
  1122. - . myread
  1123. - groupstype="$ans"
  1124. - 
  1125.   : see if we can include fcntl.h
  1126.   echo " "
  1127.   if $h_fcntl; then
  1128. --- 3404,3409 ----
  1129. ***************
  1130. *** 3463,3473 ****
  1131.       cd ..
  1132.   fi
  1133.   echo "Creating config.sh..."
  1134.   $spitshell <<EOT >config.sh
  1135.   $startsh
  1136.   # config.sh
  1137.   # This file was produced by running the Configure script.
  1138. - 
  1139.   d_eunice='$d_eunice'
  1140.   define='$define'
  1141.   eunicefix='$eunicefix'
  1142. --- 3541,3551 ----
  1143.       cd ..
  1144.   fi
  1145.   echo "Creating config.sh..."
  1146. + test -f config.sh && cp config.sh UU/oldconfig.sh
  1147.   $spitshell <<EOT >config.sh
  1148.   $startsh
  1149.   # config.sh
  1150.   # This file was produced by running the Configure script.
  1151.   d_eunice='$d_eunice'
  1152.   define='$define'
  1153.   eunicefix='$eunicefix'
  1154. ***************
  1155. *** 3596,3601 ****
  1156. --- 3674,3680 ----
  1157.   d_setruid='$d_setruid'
  1158.   d_shm='$d_shm'
  1159.   d_shmat='$d_shmat'
  1160. + d_voidshmat='$d_voidshmat'
  1161.   d_shmctl='$d_shmctl'
  1162.   d_shmdt='$d_shmdt'
  1163.   d_shmget='$d_shmget'
  1164. ***************
  1165. *** 3670,3675 ****
  1166. --- 3749,3755 ----
  1167.   cppflags='$cppflags'
  1168.   ldflags='$ldflags'
  1169.   cc='$cc'
  1170. + nativegcc='$nativegcc'
  1171.   libs='$libs'
  1172.   n='$n'
  1173.   c='$c'
  1174. ***************
  1175. *** 3676,3681 ****
  1176. --- 3756,3762 ----
  1177.   package='$package'
  1178.   randbits='$randbits'
  1179.   scriptdir='$scriptdir'
  1180. + installscr='$installscr'
  1181.   sig_name='$sig_name'
  1182.   spitshell='$spitshell'
  1183.   shsharp='$shsharp'
  1184. ***************
  1185. *** 3695,3708 ****
  1186.   lib='$lib'
  1187.   privlib='$privlib'
  1188.   installprivlib='$installprivlib'
  1189. - CONFIG=true
  1190.   EOT
  1191.   
  1192.   : Finish up
  1193.   CONFIG=true
  1194.   
  1195.   echo " "
  1196. - test -f patchlevel.h && awk '{printf "%s=%s\n",$2,$3}' patchlevel.h >>config.sh
  1197.   dflt=''
  1198.   fastread=''
  1199.   echo "If you didn't make any mistakes, then just type a carriage return here."
  1200. --- 3776,3808 ----
  1201.   lib='$lib'
  1202.   privlib='$privlib'
  1203.   installprivlib='$installprivlib'
  1204.   EOT
  1205.   
  1206. + test -f patchlevel.h && awk '{printf "%s=%s\n",$2,$3}' patchlevel.h >>config.sh
  1207. + echo "CONFIG=true" >>config.sh
  1208. + 
  1209. + if test -f UU/oldconfig.sh; then
  1210. +     sed -n 's/^\([a-zA-Z_0-9]*\)=.*/\1/p' config.sh config.sh UU/oldconfig.sh |\
  1211. +       sort | uniq -u >UU/oldsyms
  1212. +     set X `cat UU/oldsyms`
  1213. +     shift
  1214. +     case $# in
  1215. +     0) ;;
  1216. +     *)  echo "Hmm...You had some extra variables I don't know about...I'll try to keep 'em..."
  1217. +     for sym in `cat UU/oldsyms`; do
  1218. +         echo "    Propagating $hint variable "'$'"$sym..."
  1219. +         eval 'tmp="$'"${sym}"'"'
  1220. +         echo "$tmp" | \
  1221. +           sed -e "s/'/'\"'\"'/g" -e "s/^/$sym='/" -e "s/$/'/" >>config.sh
  1222. +     done
  1223. +     ;;
  1224. +     esac
  1225. + fi
  1226. + 
  1227.   : Finish up
  1228.   CONFIG=true
  1229.   
  1230.   echo " "
  1231.   dflt=''
  1232.   fastread=''
  1233.   echo "If you didn't make any mistakes, then just type a carriage return here."
  1234. ***************
  1235. *** 3714,3754 ****
  1236.   *) : in case they cannot read
  1237.       eval $ans;;
  1238.   esac
  1239. ! : if this fails, just run all the .SH files by hand
  1240. ! . ./config.sh
  1241.   
  1242. - echo " "
  1243. - echo "Doing variable substitutions on .SH files..."
  1244. - set x `awk '{print $1}' <MANIFEST | $grep '\.SH'`
  1245. - shift
  1246. - case $# in
  1247. - 0) set x *.SH; shift;;
  1248. - esac
  1249. - if test ! -f $1; then
  1250. -     shift
  1251. - fi
  1252. - for file in $*; do
  1253. -     set X
  1254. -     shift
  1255. -     chmod +x $file
  1256. -     case "$file" in
  1257. -     */*)
  1258. -     dir=`$expr X$file : 'X\(.*\)/'`
  1259. -     file=`$expr X$file : 'X.*/\(.*\)'`
  1260. -     (cd $dir && . $file)
  1261. -     ;;
  1262. -     *)
  1263. -     . $file
  1264. -     ;;
  1265. -     esac
  1266. - done
  1267. - if test -f config.h.SH; then
  1268. -     if test ! -f config.h; then
  1269. -     : oops, they left it out of MANIFEST, probably, so do it anyway.
  1270. -     . config.h.SH
  1271. -     fi
  1272. - fi
  1273. - 
  1274.   if $contains '^depend:' [Mm]akefile >/dev/null 2>&1; then
  1275.       dflt=n
  1276.       $cat <<EOM
  1277. --- 3814,3822 ----
  1278.   *) : in case they cannot read
  1279.       eval $ans;;
  1280.   esac
  1281. ! chmod +x doSH
  1282. ! ./doSH
  1283.   
  1284.   if $contains '^depend:' [Mm]akefile >/dev/null 2>&1; then
  1285.       dflt=n
  1286.       $cat <<EOM
  1287. ***************
  1288. *** 3775,3779 ****
  1289.   fi
  1290.   
  1291.   $rm -f kit*isdone
  1292. ! cd .. && $rm -rf UU
  1293.   : end of Configure
  1294. --- 3843,3847 ----
  1295.   fi
  1296.   
  1297.   $rm -f kit*isdone
  1298. ! $rm -rf UU
  1299.   : end of Configure
  1300.  
  1301. Index: EXTERN.h
  1302. Prereq: 4.0
  1303. *** EXTERN.h.old    Fri Jun  7 12:22:23 1991
  1304. --- EXTERN.h    Fri Jun  7 12:22:24 1991
  1305. ***************
  1306. *** 1,11 ****
  1307. ! /* $Header: EXTERN.h,v 4.0 91/03/20 00:58:26 lwall Locked $
  1308.    *
  1309. !  *    Copyright (c) 1989, Larry Wall
  1310.    *
  1311. !  *    You may distribute under the terms of the GNU General Public License
  1312. !  *    as specified in the README file that comes with the perl 3.0 kit.
  1313.    *
  1314.    * $Log:    EXTERN.h,v $
  1315.    * Revision 4.0  91/03/20  00:58:26  lwall
  1316.    * 4.0 baseline.
  1317.    * 
  1318. --- 1,14 ----
  1319. ! /* $RCSfile: EXTERN.h,v $$Revision: 4.0.1.1 $$Date: 91/06/07 10:10:32 $
  1320.    *
  1321. !  *    Copyright (c) 1991, Larry Wall
  1322.    *
  1323. !  *    You may distribute under the terms of either the GNU General Public
  1324. !  *    License or the Artistic License, as specified in the README file.
  1325.    *
  1326.    * $Log:    EXTERN.h,v $
  1327. +  * Revision 4.0.1.1  91/06/07  10:10:32  lwall
  1328. +  * patch4: new copyright notice
  1329. +  * 
  1330.    * Revision 4.0  91/03/20  00:58:26  lwall
  1331.    * 4.0 baseline.
  1332.    * 
  1333.  
  1334. Index: x2p/EXTERN.h
  1335. Prereq: 4.0
  1336. *** x2p/EXTERN.h.old    Fri Jun  7 12:27:34 1991
  1337. --- x2p/EXTERN.h    Fri Jun  7 12:27:35 1991
  1338. ***************
  1339. *** 1,11 ****
  1340. ! /* $Header: EXTERN.h,v 4.0 91/03/20 01:56:53 lwall Locked $
  1341.    *
  1342. !  *    Copyright (c) 1989, Larry Wall
  1343.    *
  1344. !  *    You may distribute under the terms of the GNU General Public License
  1345. !  *    as specified in the README file that comes with the perl 3.0 kit.
  1346.    *
  1347.    * $Log:    EXTERN.h,v $
  1348.    * Revision 4.0  91/03/20  01:56:53  lwall
  1349.    * 4.0 baseline.
  1350.    * 
  1351. --- 1,14 ----
  1352. ! /* $RCSfile: EXTERN.h,v $$Revision: 4.0.1.1 $$Date: 91/06/07 12:11:15 $
  1353.    *
  1354. !  *    Copyright (c) 1991, Larry Wall
  1355.    *
  1356. !  *    You may distribute under the terms of either the GNU General Public
  1357. !  *    License or the Artistic License, as specified in the README file.
  1358.    *
  1359.    * $Log:    EXTERN.h,v $
  1360. +  * Revision 4.0.1.1  91/06/07  12:11:15  lwall
  1361. +  * patch4: new copyright notice
  1362. +  * 
  1363.    * Revision 4.0  91/03/20  01:56:53  lwall
  1364.    * 4.0 baseline.
  1365.    * 
  1366.  
  1367. Index: INTERN.h
  1368. Prereq: 4.0
  1369. *** INTERN.h.old    Fri Jun  7 12:22:26 1991
  1370. --- INTERN.h    Fri Jun  7 12:22:27 1991
  1371. ***************
  1372. *** 1,11 ****
  1373. ! /* $Header: INTERN.h,v 4.0 91/03/20 00:58:35 lwall Locked $
  1374.    *
  1375. !  *    Copyright (c) 1989, Larry Wall
  1376.    *
  1377. !  *    You may distribute under the terms of the GNU General Public License
  1378. !  *    as specified in the README file that comes with the perl 3.0 kit.
  1379.    *
  1380.    * $Log:    INTERN.h,v $
  1381.    * Revision 4.0  91/03/20  00:58:35  lwall
  1382.    * 4.0 baseline.
  1383.    * 
  1384. --- 1,14 ----
  1385. ! /* $RCSfile: INTERN.h,v $$Revision: 4.0.1.1 $$Date: 91/06/07 10:10:42 $
  1386.    *
  1387. !  *    Copyright (c) 1991, Larry Wall
  1388.    *
  1389. !  *    You may distribute under the terms of either the GNU General Public
  1390. !  *    License or the Artistic License, as specified in the README file.
  1391.    *
  1392.    * $Log:    INTERN.h,v $
  1393. +  * Revision 4.0.1.1  91/06/07  10:10:42  lwall
  1394. +  * patch4: new copyright notice
  1395. +  * 
  1396.    * Revision 4.0  91/03/20  00:58:35  lwall
  1397.    * 4.0 baseline.
  1398.    * 
  1399.  
  1400. Index: x2p/INTERN.h
  1401. Prereq: 4.0
  1402. *** x2p/INTERN.h.old    Fri Jun  7 12:27:37 1991
  1403. --- x2p/INTERN.h    Fri Jun  7 12:27:37 1991
  1404. ***************
  1405. *** 1,11 ****
  1406. ! /* $Header: INTERN.h,v 4.0 91/03/20 01:56:58 lwall Locked $
  1407.    *
  1408. !  *    Copyright (c) 1989, Larry Wall
  1409.    *
  1410. !  *    You may distribute under the terms of the GNU General Public License
  1411. !  *    as specified in the README file that comes with the perl 3.0 kit.
  1412.    *
  1413.    * $Log:    INTERN.h,v $
  1414.    * Revision 4.0  91/03/20  01:56:58  lwall
  1415.    * 4.0 baseline.
  1416.    * 
  1417. --- 1,14 ----
  1418. ! /* $RCSfile: INTERN.h,v $$Revision: 4.0.1.1 $$Date: 91/06/07 12:11:20 $
  1419.    *
  1420. !  *    Copyright (c) 1991, Larry Wall
  1421.    *
  1422. !  *    You may distribute under the terms of either the GNU General Public
  1423. !  *    License or the Artistic License, as specified in the README file.
  1424.    *
  1425.    * $Log:    INTERN.h,v $
  1426. +  * Revision 4.0.1.1  91/06/07  12:11:20  lwall
  1427. +  * patch4: new copyright notice
  1428. +  * 
  1429.    * Revision 4.0  91/03/20  01:56:58  lwall
  1430.    * 4.0 baseline.
  1431.    * 
  1432.  
  1433. Index: MANIFEST
  1434. *** MANIFEST.old    Fri Jun  7 12:22:30 1991
  1435. --- MANIFEST    Fri Jun  7 12:22:31 1991
  1436. ***************
  1437. *** 1,3 ****
  1438. --- 1,4 ----
  1439. + Artistic        The "Artistic License"
  1440.   Configure        Run this first
  1441.   Copying            The GNU General Public License
  1442.   EXTERN.h        Included before foreign .h files
  1443. ***************
  1444. *** 20,25 ****
  1445. --- 21,27 ----
  1446.   config_h.SH        Produces config.h
  1447.   cons.c            Routines to construct cmd nodes of a parse tree
  1448.   consarg.c        Routines to construct arg nodes of a parse tree
  1449. + doSH            Script to run all the *.SH files
  1450.   doarg.c            Scalar expression evaluation
  1451.   doio.c            I/O operations
  1452.   dolist.c        Array expression evaluation
  1453. ***************
  1454. *** 87,92 ****
  1455. --- 89,95 ----
  1456.   handy.h            Handy definitions
  1457.   hash.c            Associative arrays
  1458.   hash.h            Public declarations for the above
  1459. + hints/3b1.sh
  1460.   hints/3b2.sh
  1461.   hints/aix_rs.sh
  1462.   hints/aix_rt.sh
  1463. ***************
  1464. *** 114,122 ****
  1465. --- 117,127 ----
  1466.   hints/sunos_3_5.sh
  1467.   hints/sunos_4_0_1.sh
  1468.   hints/sunos_4_0_2.sh
  1469. + hints/svr4.sh
  1470.   hints/ultrix_3.sh
  1471.   hints/ultrix_4.sh
  1472.   hints/uts.sh
  1473. + hints/vax.sh
  1474.   installperl        Perl script to do "make install" dirty work
  1475.   ioctl.pl        Sample ioctl.pl
  1476.   lib/abbrev.pl        An abbreviation table builder
  1477. ***************
  1478. *** 127,139 ****
  1479. --- 132,148 ----
  1480.   lib/complete.pl        A command completion subroutine
  1481.   lib/ctime.pl        A ctime workalike
  1482.   lib/dumpvar.pl        A variable dumper
  1483. + lib/find.pl        A find emulator--used by find2perl
  1484. + lib/finddepth.pl    A depth-first find emulator--used by find2perl
  1485.   lib/flush.pl        Routines to do single flush
  1486.   lib/getopt.pl        Perl library supporting option parsing
  1487.   lib/getopts.pl        Perl library supporting option parsing
  1488.   lib/importenv.pl    Perl routine to get environment into variables
  1489.   lib/look.pl        A "look" equivalent
  1490. + lib/newgetopt.pl    A perl library supporting long option parsing
  1491.   lib/perldb.pl        Perl debugging routines
  1492.   lib/pwd.pl        Routines to keep track of PWD environment variable
  1493. + lib/shellwords.pl    Perl library to split into words with shell quoting
  1494.   lib/stat.pl        Perl library supporting stat function
  1495.   lib/syslog.pl        Perl library supporting syslogging
  1496.   lib/termcap.pl        Perl library supporting termcap usage
  1497. ***************
  1498. *** 296,301 ****
  1499. --- 305,311 ----
  1500.   x2p/a2p.man        Manual page for awk to perl translator
  1501.   x2p/a2p.y        A yacc grammer for awk
  1502.   x2p/a2py.c        Awk compiler, sort of
  1503. + x2p/cflags.SH        A script that emits C compilation flags per file
  1504.   x2p/find2perl.SH    A find to perl translator
  1505.   x2p/handy.h        Handy definitions
  1506.   x2p/hash.c        Associative arrays again
  1507.  
  1508. Index: usub/Makefile
  1509. *** usub/Makefile.old    Fri Jun  7 12:27:23 1991
  1510. --- usub/Makefile    Fri Jun  7 12:27:23 1991
  1511. ***************
  1512. *** 1,10 ****
  1513. ! SRC = /usr/local/src/perl
  1514.   GLOBINCS = 
  1515.   LOCINCS = 
  1516. ! LIBS = -lcurses -ltermlib
  1517.   
  1518.   curseperl: $(SRC)/uperl.o usersub.o curses.o
  1519. !     cc $(SRC)/uperl.o usersub.o curses.o $(LIBS) -lm -o curseperl
  1520.   
  1521.   usersub.o: usersub.c
  1522.       cc -c -I$(SRC) $(GLOBINCS) -DDEBUGGING -g usersub.c
  1523. --- 1,10 ----
  1524. ! SRC = ..
  1525.   GLOBINCS = 
  1526.   LOCINCS = 
  1527. ! LIBS = -lcurses -ltermlib `. $(SRC)/config.sh; echo $$libs`
  1528.   
  1529.   curseperl: $(SRC)/uperl.o usersub.o curses.o
  1530. !     cc $(SRC)/uperl.o usersub.o curses.o $(LIBS) -o curseperl
  1531.   
  1532.   usersub.o: usersub.c
  1533.       cc -c -I$(SRC) $(GLOBINCS) -DDEBUGGING -g usersub.c
  1534.  
  1535. Index: Makefile.SH
  1536. *** Makefile.SH.old    Fri Jun  7 12:22:33 1991
  1537. --- Makefile.SH    Fri Jun  7 12:22:34 1991
  1538. ***************
  1539. *** 25,33 ****
  1540.   
  1541.   echo "Extracting Makefile (with variable substitutions)"
  1542.   cat >Makefile <<!GROK!THIS!
  1543. ! # $RCSfile: Makefile.SH,v $$Revision: 4.0.1.1 $$Date: 91/04/11 17:30:39 $
  1544.   #
  1545.   # $Log:    Makefile.SH,v $
  1546.   # Revision 4.0.1.1  91/04/11  17:30:39  lwall
  1547.   # patch1: C flags are now settable on a per-file basis
  1548.   # 
  1549. --- 25,39 ----
  1550.   
  1551.   echo "Extracting Makefile (with variable substitutions)"
  1552.   cat >Makefile <<!GROK!THIS!
  1553. ! # $RCSfile: Makefile.SH,v $$Revision: 4.0.1.2 $$Date: 91/06/07 10:14:43 $
  1554.   #
  1555.   # $Log:    Makefile.SH,v $
  1556. + # Revision 4.0.1.2  91/06/07  10:14:43  lwall
  1557. + # patch4: cflags now emits entire cc command except for the filename
  1558. + # patch4: alternate make programs are now semi-supported
  1559. + # patch4: uperl.o no longer tries to link in libraries prematurely
  1560. + # patch4: installperl now installs x2p stuff too
  1561. + # 
  1562.   # Revision 4.0.1.1  91/04/11  17:30:39  lwall
  1563.   # patch1: C flags are now settable on a per-file basis
  1564.   # 
  1565. ***************
  1566. *** 55,72 ****
  1567.   
  1568.   public = perl taintperl $suidperl
  1569.   
  1570.   !GROK!THIS!
  1571.   
  1572.   cat >>Makefile <<'!NO!SUBS!'
  1573.   
  1574. ! CFLAGS = `sh cflags.SH $@`
  1575.   
  1576.   private = 
  1577.   
  1578.   scripts = h2ph
  1579.   
  1580. - MAKE = make
  1581. - 
  1582.   manpages = perl.man h2ph.man
  1583.   
  1584.   util =
  1585. --- 61,79 ----
  1586.   
  1587.   public = perl taintperl $suidperl
  1588.   
  1589. + # To use an alternate make, set $altmake in config.sh.
  1590. + MAKE = ${altmake-make}
  1591. + 
  1592.   !GROK!THIS!
  1593.   
  1594.   cat >>Makefile <<'!NO!SUBS!'
  1595.   
  1596. ! CCCMD = `sh cflags $@`
  1597.   
  1598.   private = 
  1599.   
  1600.   scripts = h2ph
  1601.   
  1602.   manpages = perl.man h2ph.man
  1603.   
  1604.   util =
  1605. ***************
  1606. *** 104,110 ****
  1607.   SHELL = /bin/sh
  1608.   
  1609.   .c.o:
  1610. !     $(CC) -c $(CFLAGS) $*.c
  1611.   
  1612.   all: $(public) $(private) $(util) uperl.o $(scripts)
  1613.       cd x2p; $(MAKE) all
  1614. --- 111,117 ----
  1615.   SHELL = /bin/sh
  1616.   
  1617.   .c.o:
  1618. !     $(CCCMD) $*.c
  1619.   
  1620.   all: $(public) $(private) $(util) uperl.o $(scripts)
  1621.       cd x2p; $(MAKE) all
  1622. ***************
  1623. *** 119,125 ****
  1624.       $(CC) $(LARGE) $(CLDFLAGS) $(obj) perly.o usersub.o $(libs) -o perl
  1625.   
  1626.   uperl.o: $& perly.o $(obj)
  1627. !     -ld $(LARGE) $(LDFLAGS) -r $(obj) perly.o $(libs) -o uperl.o
  1628.   
  1629.   saber: perly.c
  1630.       # load $(c) perly.c
  1631. --- 126,132 ----
  1632.       $(CC) $(LARGE) $(CLDFLAGS) $(obj) perly.o usersub.o $(libs) -o perl
  1633.   
  1634.   uperl.o: $& perly.o $(obj)
  1635. !     -ld $(LARGE) $(LDFLAGS) -r $(obj) perly.o -o uperl.o
  1636.   
  1637.   saber: perly.c
  1638.       # load $(c) perly.c
  1639. ***************
  1640. *** 147,267 ****
  1641.   tperly.o: perly.c perly.h $(h)
  1642.       /bin/rm -f tperly.c
  1643.       $(SLN) perly.c tperly.c
  1644. !     $(CC) -c -DTAINT $(CFLAGS) tperly.c
  1645.       /bin/rm -f tperly.c
  1646.   
  1647.   tperl.o: perl.c perly.h patchlevel.h perl.h $(h)
  1648.       /bin/rm -f tperl.c
  1649.       $(SLN) perl.c tperl.c
  1650. !     $(CC) -c -DTAINT $(CFLAGS) tperl.c
  1651.       /bin/rm -f tperl.c
  1652.   
  1653.   sperl.o: perl.c perly.h patchlevel.h $(h)
  1654.       /bin/rm -f sperl.c
  1655.       $(SLN) perl.c sperl.c
  1656. !     $(CC) -c -DTAINT -DIAMSUID $(CFLAGS) sperl.c
  1657.       /bin/rm -f sperl.c
  1658.   
  1659.   tarray.o: array.c $(h)
  1660.       /bin/rm -f tarray.c
  1661.       $(SLN) array.c tarray.c
  1662. !     $(CC) -c -DTAINT $(CFLAGS) tarray.c
  1663.       /bin/rm -f tarray.c
  1664.   
  1665.   tcmd.o: cmd.c $(h)
  1666.       /bin/rm -f tcmd.c
  1667.       $(SLN) cmd.c tcmd.c
  1668. !     $(CC) -c -DTAINT $(CFLAGS) tcmd.c
  1669.       /bin/rm -f tcmd.c
  1670.   
  1671.   tcons.o: cons.c $(h) perly.h
  1672.       /bin/rm -f tcons.c
  1673.       $(SLN) cons.c tcons.c
  1674. !     $(CC) -c -DTAINT $(CFLAGS) tcons.c
  1675.       /bin/rm -f tcons.c
  1676.   
  1677.   tconsarg.o: consarg.c $(h)
  1678.       /bin/rm -f tconsarg.c
  1679.       $(SLN) consarg.c tconsarg.c
  1680. !     $(CC) -c -DTAINT $(CFLAGS) tconsarg.c
  1681.       /bin/rm -f tconsarg.c
  1682.   
  1683.   tdoarg.o: doarg.c $(h)
  1684.       /bin/rm -f tdoarg.c
  1685.       $(SLN) doarg.c tdoarg.c
  1686. !     $(CC) -c -DTAINT $(CFLAGS) tdoarg.c
  1687.       /bin/rm -f tdoarg.c
  1688.   
  1689.   tdoio.o: doio.c $(h)
  1690.       /bin/rm -f tdoio.c
  1691.       $(SLN) doio.c tdoio.c
  1692. !     $(CC) -c -DTAINT $(CFLAGS) tdoio.c
  1693.       /bin/rm -f tdoio.c
  1694.   
  1695.   tdolist.o: dolist.c $(h)
  1696.       /bin/rm -f tdolist.c
  1697.       $(SLN) dolist.c tdolist.c
  1698. !     $(CC) -c -DTAINT $(CFLAGS) tdolist.c
  1699.       /bin/rm -f tdolist.c
  1700.   
  1701.   tdump.o: dump.c $(h)
  1702.       /bin/rm -f tdump.c
  1703.       $(SLN) dump.c tdump.c
  1704. !     $(CC) -c -DTAINT $(CFLAGS) tdump.c
  1705.       /bin/rm -f tdump.c
  1706.   
  1707.   teval.o: eval.c $(h)
  1708.       /bin/rm -f teval.c
  1709.       $(SLN) eval.c teval.c
  1710. !     $(CC) -c -DTAINT $(CFLAGS) teval.c
  1711.       /bin/rm -f teval.c
  1712.   
  1713.   tform.o: form.c $(h)
  1714.       /bin/rm -f tform.c
  1715.       $(SLN) form.c tform.c
  1716. !     $(CC) -c -DTAINT $(CFLAGS) tform.c
  1717.       /bin/rm -f tform.c
  1718.   
  1719.   thash.o: hash.c $(h)
  1720.       /bin/rm -f thash.c
  1721.       $(SLN) hash.c thash.c
  1722. !     $(CC) -c -DTAINT $(CFLAGS) thash.c
  1723.       /bin/rm -f thash.c
  1724.   
  1725.   tregcomp.o: regcomp.c $(h)
  1726.       /bin/rm -f tregcomp.c
  1727.       $(SLN) regcomp.c tregcomp.c
  1728. !     $(CC) -c -DTAINT $(CFLAGS) tregcomp.c
  1729.       /bin/rm -f tregcomp.c
  1730.   
  1731.   tregexec.o: regexec.c $(h)
  1732.       /bin/rm -f tregexec.c
  1733.       $(SLN) regexec.c tregexec.c
  1734. !     $(CC) -c -DTAINT $(CFLAGS) tregexec.c
  1735.       /bin/rm -f tregexec.c
  1736.   
  1737.   tstab.o: stab.c $(h)
  1738.       /bin/rm -f tstab.c
  1739.       $(SLN) stab.c tstab.c
  1740. !     $(CC) -c -DTAINT $(CFLAGS) tstab.c
  1741.       /bin/rm -f tstab.c
  1742.   
  1743.   tstr.o: str.c $(h) perly.h
  1744.       /bin/rm -f tstr.c
  1745.       $(SLN) str.c tstr.c
  1746. !     $(CC) -c -DTAINT $(CFLAGS) tstr.c
  1747.       /bin/rm -f tstr.c
  1748.   
  1749.   ttoke.o: toke.c $(h) perly.h
  1750.       /bin/rm -f ttoke.c
  1751.       $(SLN) toke.c ttoke.c
  1752. !     $(CC) -c -DTAINT $(CFLAGS) ttoke.c
  1753.       /bin/rm -f ttoke.c
  1754.   
  1755.   tutil.o: util.c $(h)
  1756.       /bin/rm -f tutil.c
  1757.       $(SLN) util.c tutil.c
  1758. !     $(CC) -c -DTAINT $(CFLAGS) tutil.c
  1759.       /bin/rm -f tutil.c
  1760.   
  1761.   perly.h: perly.c
  1762. --- 154,274 ----
  1763.   tperly.o: perly.c perly.h $(h)
  1764.       /bin/rm -f tperly.c
  1765.       $(SLN) perly.c tperly.c
  1766. !     $(CCCMD) -DTAINT tperly.c
  1767.       /bin/rm -f tperly.c
  1768.   
  1769.   tperl.o: perl.c perly.h patchlevel.h perl.h $(h)
  1770.       /bin/rm -f tperl.c
  1771.       $(SLN) perl.c tperl.c
  1772. !     $(CCCMD) -DTAINT tperl.c
  1773.       /bin/rm -f tperl.c
  1774.   
  1775.   sperl.o: perl.c perly.h patchlevel.h $(h)
  1776.       /bin/rm -f sperl.c
  1777.       $(SLN) perl.c sperl.c
  1778. !     $(CCCMD) -DTAINT -DIAMSUID sperl.c
  1779.       /bin/rm -f sperl.c
  1780.   
  1781.   tarray.o: array.c $(h)
  1782.       /bin/rm -f tarray.c
  1783.       $(SLN) array.c tarray.c
  1784. !     $(CCCMD) -DTAINT tarray.c
  1785.       /bin/rm -f tarray.c
  1786.   
  1787.   tcmd.o: cmd.c $(h)
  1788.       /bin/rm -f tcmd.c
  1789.       $(SLN) cmd.c tcmd.c
  1790. !     $(CCCMD) -DTAINT tcmd.c
  1791.       /bin/rm -f tcmd.c
  1792.   
  1793.   tcons.o: cons.c $(h) perly.h
  1794.       /bin/rm -f tcons.c
  1795.       $(SLN) cons.c tcons.c
  1796. !     $(CCCMD) -DTAINT tcons.c
  1797.       /bin/rm -f tcons.c
  1798.   
  1799.   tconsarg.o: consarg.c $(h)
  1800.       /bin/rm -f tconsarg.c
  1801.       $(SLN) consarg.c tconsarg.c
  1802. !     $(CCCMD) -DTAINT tconsarg.c
  1803.       /bin/rm -f tconsarg.c
  1804.   
  1805.   tdoarg.o: doarg.c $(h)
  1806.       /bin/rm -f tdoarg.c
  1807.       $(SLN) doarg.c tdoarg.c
  1808. !     $(CCCMD) -DTAINT tdoarg.c
  1809.       /bin/rm -f tdoarg.c
  1810.   
  1811.   tdoio.o: doio.c $(h)
  1812.       /bin/rm -f tdoio.c
  1813.       $(SLN) doio.c tdoio.c
  1814. !     $(CCCMD) -DTAINT tdoio.c
  1815.       /bin/rm -f tdoio.c
  1816.   
  1817.   tdolist.o: dolist.c $(h)
  1818.       /bin/rm -f tdolist.c
  1819.       $(SLN) dolist.c tdolist.c
  1820. !     $(CCCMD) -DTAINT tdolist.c
  1821.       /bin/rm -f tdolist.c
  1822.   
  1823.   tdump.o: dump.c $(h)
  1824.       /bin/rm -f tdump.c
  1825.       $(SLN) dump.c tdump.c
  1826. !     $(CCCMD) -DTAINT tdump.c
  1827.       /bin/rm -f tdump.c
  1828.   
  1829.   teval.o: eval.c $(h)
  1830.       /bin/rm -f teval.c
  1831.       $(SLN) eval.c teval.c
  1832. !     $(CCCMD) -DTAINT teval.c
  1833.       /bin/rm -f teval.c
  1834.   
  1835.   tform.o: form.c $(h)
  1836.       /bin/rm -f tform.c
  1837.       $(SLN) form.c tform.c
  1838. !     $(CCCMD) -DTAINT tform.c
  1839.       /bin/rm -f tform.c
  1840.   
  1841.   thash.o: hash.c $(h)
  1842.       /bin/rm -f thash.c
  1843.       $(SLN) hash.c thash.c
  1844. !     $(CCCMD) -DTAINT thash.c
  1845.       /bin/rm -f thash.c
  1846.   
  1847.   tregcomp.o: regcomp.c $(h)
  1848.       /bin/rm -f tregcomp.c
  1849.       $(SLN) regcomp.c tregcomp.c
  1850. !     $(CCCMD) -DTAINT tregcomp.c
  1851.       /bin/rm -f tregcomp.c
  1852.   
  1853.   tregexec.o: regexec.c $(h)
  1854.       /bin/rm -f tregexec.c
  1855.       $(SLN) regexec.c tregexec.c
  1856. !     $(CCCMD) -DTAINT tregexec.c
  1857.       /bin/rm -f tregexec.c
  1858.   
  1859.   tstab.o: stab.c $(h)
  1860.       /bin/rm -f tstab.c
  1861.       $(SLN) stab.c tstab.c
  1862. !     $(CCCMD) -DTAINT tstab.c
  1863.       /bin/rm -f tstab.c
  1864.   
  1865.   tstr.o: str.c $(h) perly.h
  1866.       /bin/rm -f tstr.c
  1867.       $(SLN) str.c tstr.c
  1868. !     $(CCCMD) -DTAINT tstr.c
  1869.       /bin/rm -f tstr.c
  1870.   
  1871.   ttoke.o: toke.c $(h) perly.h
  1872.       /bin/rm -f ttoke.c
  1873.       $(SLN) toke.c ttoke.c
  1874. !     $(CCCMD) -DTAINT ttoke.c
  1875.       /bin/rm -f ttoke.c
  1876.   
  1877.   tutil.o: util.c $(h)
  1878.       /bin/rm -f tutil.c
  1879.       $(SLN) util.c tutil.c
  1880. !     $(CCCMD) -DTAINT tutil.c
  1881.       /bin/rm -f tutil.c
  1882.   
  1883.   perly.h: perly.c
  1884. ***************
  1885. *** 268,287 ****
  1886.       @ echo Dummy dependency for dumb parallel make
  1887.       touch perly.h
  1888.   
  1889. ! perly.c: perly.y
  1890.       @ echo 'Expect either' 29 shift/reduce and 59 reduce/reduce conflicts...
  1891.       @ echo '           or' 27 shift/reduce and 61 reduce/reduce conflicts...
  1892.       $(YACC) -d perly.y
  1893. !     sh perly.fixer y.tab.c perly.c
  1894.       mv y.tab.h perly.h
  1895.       echo 'extern YYSTYPE yylval;' >>perly.h
  1896.   
  1897.   perly.o: perly.c perly.h $(h)
  1898. !     $(CC) -c $(CFLAGS) perly.c
  1899.   
  1900.   install: all
  1901.       ./perl installperl
  1902. -     cd x2p; $(MAKE) install
  1903.   
  1904.   clean:
  1905.       rm -f *.o all perl taintperl suidperl
  1906. --- 275,293 ----
  1907.       @ echo Dummy dependency for dumb parallel make
  1908.       touch perly.h
  1909.   
  1910. ! perly.c: perly.y perly.fixer
  1911.       @ echo 'Expect either' 29 shift/reduce and 59 reduce/reduce conflicts...
  1912.       @ echo '           or' 27 shift/reduce and 61 reduce/reduce conflicts...
  1913.       $(YACC) -d perly.y
  1914. !     sh ./perly.fixer y.tab.c perly.c
  1915.       mv y.tab.h perly.h
  1916.       echo 'extern YYSTYPE yylval;' >>perly.h
  1917.   
  1918.   perly.o: perly.c perly.h $(h)
  1919. !     $(CCCMD) perly.c
  1920.   
  1921.   install: all
  1922.       ./perl installperl
  1923.   
  1924.   clean:
  1925.       rm -f *.o all perl taintperl suidperl
  1926. ***************
  1927. *** 291,297 ****
  1928.       cd x2p; $(MAKE) realclean
  1929.       rm -f *.orig */*.orig *~ */*~ core $(addedbyconf) h2ph h2ph.man
  1930.       rm -f perly.c perly.h t/perl Makefile config.h makedepend makedir
  1931. !     rm -f x2p/Makefile
  1932.   
  1933.   # The following lint has practically everything turned on.  Unfortunately,
  1934.   # you have to wade through a lot of mumbo jumbo that can't be suppressed.
  1935. --- 297,303 ----
  1936.       cd x2p; $(MAKE) realclean
  1937.       rm -f *.orig */*.orig *~ */*~ core $(addedbyconf) h2ph h2ph.man
  1938.       rm -f perly.c perly.h t/perl Makefile config.h makedepend makedir
  1939. !     rm -f makefile x2p/Makefile x2p/makefile cflags x2p/cflags
  1940.   
  1941.   # The following lint has practically everything turned on.  Unfortunately,
  1942.   # you have to wade through a lot of mumbo jumbo that can't be suppressed.
  1943.  
  1944. *** End of Patch 4 ***
  1945. exit 0 # Just in case...
  1946. -- 
  1947. Kent Landfield                   INTERNET: kent@sparky.IMD.Sterling.COM
  1948. Sterling Software, IMD           UUCP:     uunet!sparky!kent
  1949. Phone:    (402) 291-8300         FAX:      (402) 291-4362
  1950. Please send comp.sources.misc-related mail to kent@uunet.uu.net.
  1951.