home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / misc / volume42 / tcp_wrappers / patch02 next >
Encoding:
Internet Message Format  |  1994-03-30  |  40.9 KB
  1. From: wietse@wzv.win.tue.nl (Wietse Venema)
  2. Newsgroups: comp.sources.misc
  3. Subject: v42i036:  tcp_wrappers - TCP/IP daemon wrappers v6.0, Patch02
  4. Date: 30 Mar 1994 15:27:04 -0600
  5. Organization: Eindhoven University of Technology, The Netherlands
  6. Sender: kent@sparky.sterling.com
  7. Approved: kent@sparky.sterling.com
  8. Message-ID: <2ncqr8$f8u@sparky.sterling.com>
  9. X-Md4-Signature: 35809842629fc95c3de6e2d8c4af8691
  10.  
  11. Submitted-by: wietse@wzv.win.tue.nl (Wietse Venema)
  12. Posting-number: Volume 42, Issue 36
  13. Archive-name: tcp_wrappers/patch02
  14. Environment: UNIX, INET
  15. Patch-To: tcp_wrappers: Volume 39, Issue 110-113
  16.  
  17. With these programs you can monitor and control who connects to your
  18. TFTP, EXEC, FTP, RSH, TELNET, RLOGIN, FINGER, and SYSTAT network
  19. daemons, and many others. The programs run on a wide variety of BSD
  20. and System-V systems, and can be installed without change to system
  21. software or configuration files.
  22.  
  23. This is a two-part update to the 6.1 version of last December.  After
  24. application of patch02 (this article) and patch03 (separate posting)
  25. the source will be at patchlevel 6.3.
  26.  
  27. A complete 6.3 source kit can be found on the primary archive site:
  28.  
  29.     ftp.win.tue.nl:/pub/security/tcp_wrappers_6.3.shar.Z
  30.  
  31. A copy is to appear soon in:
  32.  
  33.     cert.org:/pub/tools
  34.  
  35. Changes since release 6.1:
  36.  
  37.     - Portability: new Makefile rule sets for SCO and Pyramid OSx 5.1;
  38.       improved TLI support for Dynix/PTX; fix for Ultrix core dumps.
  39.  
  40.     - Features: compile-time option (APPEND_DOT) for faster DNS lookup
  41.       of already fully-qualified hostnames; a run-time option to enable
  42.       keepalives (useful when users reset or turn off the PC while
  43.       still connected), and an option to change the process nice value.
  44.  
  45. Good news: Sun patch 100804-03 for SunOS 4.1.x fixes the problem with
  46. the anti source-routing attack feature.
  47.  
  48. The libwrap.a library code should be binary compatible with release 6.1.
  49.  
  50.     Wietse Venema (wietse@wzv.win.tue.nl),
  51.     Department of Mathematics and Computing Science,
  52.     Eindhoven University of Technology,
  53.     The Netherlands.
  54.  
  55. *** ./BLURB-    Mon Dec 13 22:22:53 1993
  56. --- ./BLURB    Sat Feb  5 15:22:03 1994
  57. ***************
  58. *** 1,6 ****
  59. ! @(#) BLURB 1.15 93/12/13 22:22:51
  60.   
  61. ! This is the 6.1 version of the TCP/IP daemon wrapper package.
  62.   
  63.   With these programs you can monitor and control who connects to your
  64.   TFTP, EXEC, FTP, RSH, TELNET, RLOGIN, FINGER, and SYSTAT network
  65. --- 1,6 ----
  66. ! @(#) BLURB 1.17 94/02/05 15:22:01
  67.   
  68. ! This is the 6.2 version of the TCP/IP daemon wrapper package.
  69.   
  70.   With these programs you can monitor and control who connects to your
  71.   TFTP, EXEC, FTP, RSH, TELNET, RLOGIN, FINGER, and SYSTAT network
  72. ***************
  73. *** 11,23 ****
  74.   and do some sanity checks on the origin of the request. No information
  75.   is exchanged with the remote client process.
  76.   
  77. ! Release 6.1 deals with portability issues: new ready-to-build Makefile
  78. ! rule sets for Dynix, Convex, SCO, EP/IX and others; workarounds for
  79. ! strangeness in NeXT, Dynix/PTX (still incomplete), and DG/UX.  If the
  80. ! 6.0 release works for you, there is no need to install 6.1.
  81.   
  82. ! There is a small change in internal interfaces; older applications must
  83. ! be recompiled before they can be linked to the new wrapper library.
  84.   
  85.       Wietse Venema (wietse@wzv.win.tue.nl),
  86.       Department of Mathematics and Computing Science,
  87. --- 11,28 ----
  88.   and do some sanity checks on the origin of the request. No information
  89.   is exchanged with the remote client process.
  90.   
  91. ! Changes with this release:
  92.   
  93. !     - Portability: new Makefile rule sets for SCO and Pyramid OSx 5.1.
  94. ! 
  95. !     - Portability: improved TLI support for Dynix/PTX.
  96. ! 
  97. !     - Feature: a compile-time option (APPEND_DOT) to keep the hostname
  98. !       lookup routines from trying to append your own domain name to
  99. !       already fully-qualified hostnames. This may reduce the load on
  100. !       your name servers somewhat.
  101. ! 
  102. ! Other than that, the code should be binary compatible with release 6.1.
  103.   
  104.       Wietse Venema (wietse@wzv.win.tue.nl),
  105.       Department of Mathematics and Computing Science,
  106. *** ./CHANGES-    Mon Dec 13 22:22:55 1993
  107. --- ./CHANGES    Tue Feb  1 22:11:55 1994
  108. ***************
  109. *** 1,6 ****
  110. ! Changes per release 6.1.
  111. ! ========================
  112.   
  113.   - Re-implemented all environment access routines. Most systems have
  114.   putenv() but no setenv(), some systems have setenv() but no putenv(),
  115.   and there are even systems that have neither setenv() nor putenv(). The
  116. --- 1,26 ----
  117. ! Changes per release 6.2 (Feb 1994)
  118. ! ==================================
  119.   
  120. + - Resurrected my year-old code to reduce DNS load by appending a dot to
  121. + the gethostbyname() argument. This feature is still experimental and it
  122. + may go away if it causes more problems than it solves.
  123. + 
  124. + - Auxiliary code for the Pyramid, BSD universe. Karl Vogel figured out
  125. + what was missing: yp_get_default_domain() and vfprintf().
  126. + 
  127. + - Improved support for Dynix/PTX. The wrapper should now be able to
  128. + deal with all TLI over IP services.
  129. + 
  130. + - The try command now uses the hostname that gethostbyaddr() would
  131. + return, instead of the hostname returned by gethostbyname(). This can
  132. + be significant on systems with NIS that have short host names in the
  133. + hosts map. For example, gethostbyname("wzv.win.tue.nl") returns
  134. + "wzv.win.tue.nl"; gethostbyaddr(131.155.210.17) returns "wzv", and
  135. + so does gethostbyname("wzv").
  136. + 
  137. + Changes per release 6.1 (Dec 1993)
  138. + ==================================
  139. + 
  140.   - Re-implemented all environment access routines. Most systems have
  141.   putenv() but no setenv(), some systems have setenv() but no putenv(),
  142.   and there are even systems that have neither setenv() nor putenv(). The
  143. ***************
  144. *** 38,45 ****
  145.   - On some systems the finger client program lives in /usr/bsd. File:
  146.   safe_finger.c.
  147.   
  148. ! Changes per release 6.0.
  149. ! ========================
  150.   
  151.   - Easy build procedures for common platforms (sun, ultrix, aix, hpux
  152.   and others).
  153. --- 58,65 ----
  154.   - On some systems the finger client program lives in /usr/bsd. File:
  155.   safe_finger.c.
  156.   
  157. ! Changes per release 6.0 (Sept 1993)
  158. ! ===================================
  159.   
  160.   - Easy build procedures for common platforms (sun, ultrix, aix, hpux
  161.   and others).
  162. ***************
  163. *** 94,96 ****
  164. --- 114,209 ----
  165.   or down. Many sites wanted a means to shut up the program; other sites
  166.   wanted to to emphasize specific events.  Adapted from code contributed
  167.   by Dave Mitchell <D.Mitchell@dcs.shef.ac.uk>.
  168. + 
  169. + Changes per release 5.1 (Mar 1993)
  170. + ==================================
  171. + 
  172. + - The additional protection against source-routing attacks from hosts
  173. + that pretend to have someone elses network address has become optional
  174. + because it causes kernel panics with SunOS <= 4.1.3.
  175. + 
  176. + Changes per release 5.0 (Mar 1993)
  177. + ==================================
  178. + 
  179. + - Additional protection against source-routing attacks from hosts that
  180. + pretend to have someone elses network address. For example, the address
  181. + of a trusted host within your own network.
  182. + 
  183. + - The access control language has been extended with a simple but
  184. + powerful operator that greatly simplifies the design of rule sets (ALL:
  185. + .foo.edu EXCEPT dialup.foo.edu). Blank lines are permitted, and long
  186. + lines can be continued with backslash-newline.
  187. + 
  188. + - All configurable stuff, including path names, has been moved into the
  189. + Makefile so that you no longer have to hack source code to just
  190. + configure the programs.
  191. + 
  192. + - Ported to Solaris 2. TLI-based applications not yet supported.
  193. + Several workarounds for System V bugs.
  194. + 
  195. + - A small loophole in the netgroup lookup code was closed, and the
  196. + remote username lookup code was made more portable.
  197. + 
  198. + - Still more documentation. The README file now provides tutorial
  199. + sections with introductions to client, server, inetd and syslogd.
  200. + 
  201. + Changes per release 4.3 (Aug 1992) 
  202. + ==================================
  203. + 
  204. + - Some sites reported that connections would be rejected because
  205. + localhost != localhost.domain. The host name checking code now
  206. + special-cases localhost (problem reported by several sites).
  207. + 
  208. + - The programs now report an error if an existing access control file
  209. + cannot be opened (e.g. due to lack of privileges).  Until now, the
  210. + programs would just pretend that the access control file does not exist
  211. + (reported by Darren Reed, avalon@coombs.anu.edu.au).
  212. + 
  213. + - The timeout period for remote userid lookups was upped to 30 seconds,
  214. + in order to cope with slow hosts or networks.  If this is too long for
  215. + you, adjust the TIMEOUT definition in file rfc931.c (problem reported
  216. + by several sites).
  217. + 
  218. + - On hosts with more than one IP network interface, remote userid
  219. + lookups could use the IP address of the "wrong" local interface.  The
  220. + problem and its solution were discussed on the rfc931-users mailing
  221. + list.  Scott Schwartz (schwartz@cs.psu.edu) folded the fix into the
  222. + rfc931.c module.
  223. + 
  224. + - The result of % expansion (in shell commands) is now checked for
  225. + stuff that may confuse the shell; it is replaced by underscores
  226. + (problem reported by Icarus Sparry, I.Sparry@gdr.bath.ac.uk).
  227. + 
  228. + - A portability problem was fixed that caused compile-time problems
  229. + on a CRAY (problem reported by Michael Barnett, mikeb@rmit.edu.au).
  230. + 
  231. + Changes per release 4.0 (Jun 1992)
  232. + ==================================
  233. + 
  234. + 1 - network daemons no longer have to live within a common directory
  235. + 2 - the access control code now uses both the host address and name
  236. + 3 - an access control pattern that supports netmasks
  237. + 4 - additional protection against forged host names
  238. + 5 - a pattern that matches hosts whose name or address lookup fails
  239. + 6 - an operator that prevents hosts or services from being matched
  240. + 7 - optional remote username lookup with the RFC 931 protocol
  241. + 8 - an optional umask to prevent the creation of world-writable files
  242. + 9 - hooks for access control language extensions
  243. + 10 - last but not least, thoroughly revised documentation.
  244. + 
  245. + Changes per release 3.0 (Oct 1991)
  246. + ==================================
  247. + 
  248. + Enhancements over the previous release are: support for datagram (UDP
  249. + and RPC) services, and execution of shell commands when a (remote host,
  250. + requested service) pair matches a pattern in the access control tables.
  251. + 
  252. + Changes per release 2.0 (May 1991)
  253. + ==================================
  254. + 
  255. + Enhancements over the previous release are: protection against rlogin
  256. + and rsh attacks through compromised domain name servers, optional
  257. + netgroup support for systems with NIS (formerly YP), and an extension
  258. + of the wild card patterns supported by the access control files.
  259. + 
  260. + Release 1.0 (Jan 1991)
  261. *** ./Makefile-    Mon Dec 13 22:22:58 1993
  262. --- ./Makefile    Tue Feb  1 22:11:58 1994
  263. ***************
  264. *** 1,4 ****
  265. ! # @(#) Makefile 1.10 93/12/13 22:22:56
  266.   
  267.   what:
  268.       @echo
  269. --- 1,4 ----
  270. ! # @(#) Makefile 1.11 94/02/01 22:11:56
  271.   
  272.   what:
  273.       @echo
  274. ***************
  275. *** 19,26 ****
  276.       @echo "    generic (most bsd-ish systems with sys5 compatibility)"
  277.       @echo "    386bsd aix alpha apollo convex-ultranet dgux dynix"
  278.       @echo "    dynix-ptx epix esix freebsd hpux irix isc(untested)"
  279. !     @echo "    linux mips(untested) netbsd next osf sco-nis sco-od2"
  280. !     @echo "    sunos4 sunos40 sunos5 sysv4 ultrix unicos(untested)"
  281.       @echo
  282.       @echo "If none of these match your environment, edit the system"
  283.       @echo "dependencies sections in the Makefile and do a 'make other'."
  284. --- 19,26 ----
  285.       @echo "    generic (most bsd-ish systems with sys5 compatibility)"
  286.       @echo "    386bsd aix alpha apollo convex-ultranet dgux dynix"
  287.       @echo "    dynix-ptx epix esix freebsd hpux irix isc(untested)"
  288. !     @echo "    linux mips(untested) netbsd next osf pyramid sco sco-nis"
  289. !     @echo "    sco-od2 sunos4 sunos40 sunos5 sysv4 ultrix unicos(untested)"
  290.       @echo
  291.       @echo "If none of these match your environment, edit the system"
  292.       @echo "dependencies sections in the Makefile and do a 'make other'."
  293. ***************
  294. *** 143,149 ****
  295.   dynix-ptx:
  296.       @make REAL_DAEMON_DIR=$(REAL_DAEMON_DIR) STYLE=$(STYLE) \
  297.       LIBS="-lsocket -linet -lnsl" RANLIB=echo ARFLAGS=rv \
  298. !     AUX_OBJ="environ.o strcasecmp.o" NETGROUP= TLI=-DTLI_SOCKETS all
  299.   
  300.   # IRIX 4.0.x has a special ar(1) flag.
  301.   irix:
  302. --- 143,149 ----
  303.   dynix-ptx:
  304.       @make REAL_DAEMON_DIR=$(REAL_DAEMON_DIR) STYLE=$(STYLE) \
  305.       LIBS="-lsocket -linet -lnsl" RANLIB=echo ARFLAGS=rv \
  306. !     AUX_OBJ="environ.o strcasecmp.o ptx.o" NETGROUP= TLI=-DPTX all
  307.   
  308.   # IRIX 4.0.x has a special ar(1) flag.
  309.   irix:
  310. ***************
  311. *** 164,175 ****
  312.       NETGROUP=-DNETGROUP AUX_OBJ=environ.o TLI=-DTLI \
  313.       BUGS="$(BUGS) -DINET_ADDR_BUG" all
  314.   
  315.   # SCO OpenDesktop 2.0, release 3.2 (peter@midnight.com).
  316.   sco-od2:
  317.       @make REAL_DAEMON_DIR=$(REAL_DAEMON_DIR) STYLE=$(STYLE) \
  318.       LIBS="-lrpcsvc -lrpc -lyp -lrpc -lrpcsvc -lsocket" \
  319.       RANLIB=echo ARFLAGS=rv AUX_OBJ=environ.o \
  320. !     NETGROUP=-DNETGROUP TLI="" all
  321.   
  322.   # SCO 3.2v4.2 with TCP/IP 1.2.1 (Eduard.Vopicka@vse.cz)
  323.   sco-nis:
  324. --- 164,181 ----
  325.       NETGROUP=-DNETGROUP AUX_OBJ=environ.o TLI=-DTLI \
  326.       BUGS="$(BUGS) -DINET_ADDR_BUG" all
  327.   
  328. + # SCO 3.2v4.1 no frills (jedwards@sol1.solinet.net).
  329. + sco:
  330. +     @make REAL_DAEMON_DIR=$(REAL_DAEMON_DIR) STYLE=$(STYLE) \
  331. +     LIBS="-lsocket -lnsl_s" RANLIB=echo ARFLAGS=rv \
  332. +     NETGROUP= AUX_OBJ=environ.o TLI= all
  333. + 
  334.   # SCO OpenDesktop 2.0, release 3.2 (peter@midnight.com).
  335.   sco-od2:
  336.       @make REAL_DAEMON_DIR=$(REAL_DAEMON_DIR) STYLE=$(STYLE) \
  337.       LIBS="-lrpcsvc -lrpc -lyp -lrpc -lrpcsvc -lsocket" \
  338.       RANLIB=echo ARFLAGS=rv AUX_OBJ=environ.o \
  339. !     NETGROUP=-DNETGROUP TLI= all
  340.   
  341.   # SCO 3.2v4.2 with TCP/IP 1.2.1 (Eduard.Vopicka@vse.cz)
  342.   sco-nis:
  343. ***************
  344. *** 184,189 ****
  345. --- 190,202 ----
  346.       LIBS= RANLIB=ranlib ARFLAGS=rv AUX_OBJ=environ.o \
  347.       NETGROUP=-DNETGROUP TLI= SYSTYPE="-A run,any -A sys,any" all
  348.   
  349. + # Pyramid OSx 5.1, using the BSD universe.
  350. + pyramid:
  351. +     @make REAL_DAEMON_DIR=$(REAL_DAEMON_DIR) STYLE=$(STYLE) \
  352. +     LIBS= RANLIB=ranlib ARFLAGS=rv AUX_OBJ="environ.o vfprintf.o" \
  353. +     STRINGS="-Dstrchr=index -Dstrrchr=rindex -Dmemcmp=bcmp -Dno_memcpy" \
  354. +     NETGROUP="-DNETGROUP -DUSE_GETDOMAIN" TLI= all
  355. + 
  356.   # Untested.
  357.   mips:
  358.       @echo "Warning: some definitions may be wrong."
  359. ***************
  360. *** 332,338 ****
  361.   # are sent to a dedicated loghost. It may also be that no syslog daemon
  362.   # is running at all. The README file gives pointers to surrogate syslog
  363.   # implementations for systems that have no syslog library routines or
  364. ! # no syslog daemons.
  365.   #
  366.   # The LOG_XXX names below are taken from the /usr/include/syslog.h file.
  367.   
  368. --- 345,352 ----
  369.   # are sent to a dedicated loghost. It may also be that no syslog daemon
  370.   # is running at all. The README file gives pointers to surrogate syslog
  371.   # implementations for systems that have no syslog library routines or
  372. ! # no syslog daemons. When changing the syslog.conf file, remember that
  373. ! # there must be TABs between fields.
  374.   #
  375.   # The LOG_XXX names below are taken from the /usr/include/syslog.h file.
  376.   
  377. ***************
  378. *** 342,347 ****
  379. --- 356,375 ----
  380.   
  381.   SEVERITY= LOG_INFO    # LOG_INFO is normally not logged to the console
  382.   
  383. + ###########################
  384. + # Optional: Reduce DNS load
  385. + #
  386. + # When looking up the address for a host.domain name, the typical DNS
  387. + # server will first append substrings of your own domain, so it tries
  388. + # host.domain.your.own.domain, then host.domain.own.domain, and then
  389. + # host.domain. The APPEND_DOT feature stops this waste of cycles. It is
  390. + # off by default because it causes problems on sites that don't use DNS.
  391. + #
  392. + # This feature has undergone light testing and it may go away if there
  393. + # are problems with it. If you enable it let me know if it helps.
  394. + #
  395. + # DOT= -DAPPEND_DOT
  396. + 
  397.   ##################################################
  398.   # Optional: Always attempt remote username lookups
  399.   #
  400. ***************
  401. *** 455,461 ****
  402.       -DREAL_MISCD=\"$(REAL_DAEMON_DIR)/miscd\" \
  403.       -DREAL_DAEMON_DIR=\"$(REAL_DAEMON_DIR)\" $(STYLE) $(KILL_OPT) \
  404.       -DSEVERITY=$(SEVERITY) -DRFC931_TIMEOUT=$(RFC931_TIMEOUT) \
  405. !     $(UCHAR) $(TABLES) $(STRINGS) $(TLI) $(EXTRA_CFLAGS)
  406.   
  407.   LIB_OBJ= hosts_access.o options.o shell_cmd.o rfc931.o hosts_info.o \
  408.       hosts_ctl.o refuse.o percent_x.o clean_exit.o $(AUX_OBJ) \
  409. --- 483,489 ----
  410.       -DREAL_MISCD=\"$(REAL_DAEMON_DIR)/miscd\" \
  411.       -DREAL_DAEMON_DIR=\"$(REAL_DAEMON_DIR)\" $(STYLE) $(KILL_OPT) \
  412.       -DSEVERITY=$(SEVERITY) -DRFC931_TIMEOUT=$(RFC931_TIMEOUT) \
  413. !     $(UCHAR) $(TABLES) $(STRINGS) $(TLI) $(EXTRA_CFLAGS) $(DOT)
  414.   
  415.   LIB_OBJ= hosts_access.o options.o shell_cmd.o rfc931.o hosts_info.o \
  416.       hosts_ctl.o refuse.o percent_x.o clean_exit.o $(AUX_OBJ) \
  417. ***************
  418. *** 468,474 ****
  419.       percent_x.c options.c clean_exit.c environ.c patchlevel.h strtok.c \
  420.       fix_options.c workarounds.c socket.c tli.c DISCLAIMER \
  421.       fakelog.c safe_finger.c hosts_options.5 options.h CHANGES \
  422. !     try-from.c init_client.c 6compat.c
  423.   
  424.   LIB    = libwrap.a
  425.   
  426. --- 496,502 ----
  427.       percent_x.c options.c clean_exit.c environ.c patchlevel.h strtok.c \
  428.       fix_options.c workarounds.c socket.c tli.c DISCLAIMER \
  429.       fakelog.c safe_finger.c hosts_options.5 options.h CHANGES \
  430. !     try-from.c init_client.c 6compat.c ptx.c vfprintf.c
  431.   
  432.   LIB    = libwrap.a
  433.   
  434. *** ./README-    Tue Feb  1 22:05:46 1994
  435. --- ./README    Sat Feb  5 15:22:00 1994
  436. ***************
  437. *** 1,6 ****
  438. ! @(#) README 1.18 93/12/14 20:53:13
  439.   
  440. ! This is the 6.1 version of the TCP/IP daemon wrapper package.
  441.   
  442.   Table of contents
  443.   -----------------
  444. --- 1,6 ----
  445. ! @(#) README 1.20 94/02/05 15:21:57
  446.   
  447. ! This is the 6.2 version of the TCP/IP daemon wrapper package.
  448.   
  449.   Table of contents
  450.   -----------------
  451. ***************
  452. *** 223,233 ****
  453.   the Makefile, or by providing no access control tables. The install
  454.   instructions below describe the Makefile editing process.
  455.   
  456. ! When TCP/IP or UDP/IP is used underneath TLI, the wrapper programs
  457. ! provide the same functions as with socket-based applications. When some
  458. ! other protocol is used underneath TLI, the host address will be some
  459. ! universal magic cookie that may not be usable for access control
  460. ! purposes.
  461.   
  462.   4.2 - Host name spoofing
  463.   ------------------------
  464. --- 223,233 ----
  465.   the Makefile, or by providing no access control tables. The install
  466.   instructions below describe the Makefile editing process.
  467.   
  468. ! On System V when TCP/IP or UDP/IP is used underneath TLI, the wrapper
  469. ! programs provide the same functions as with socket-based applications.
  470. ! When some other protocol is used underneath TLI, the host address will
  471. ! be some universal magic cookie that may not be usable for access
  472. ! control purposes.
  473.   
  474.   4.2 - Host name spoofing
  475.   ------------------------
  476. ***************
  477. *** 326,333 ****
  478.   TAP). To add to the confusion, both protocols use the same network
  479.   port.  The daemon wrappers implement a common subset of the protocols.
  480.   
  481. ! With TLI-based network services, remote username lookups will be
  482. ! possible only when TCP/IP is the underlying network protocol.
  483.   
  484.   4.5 - Language extensions
  485.   -------------------------
  486. --- 326,333 ----
  487.   TAP). To add to the confusion, both protocols use the same network
  488.   port.  The daemon wrappers implement a common subset of the protocols.
  489.   
  490. ! On System V with TLI-based network services, remote username lookups
  491. ! will be possible only when the underlying network protocol is TCP/IP.
  492.   
  493.   4.5 - Language extensions
  494.   -------------------------
  495. ***************
  496. *** 406,416 ****
  497.   runs until the machine goes down.  Available from eecs.nwu.edu, file
  498.   /pub/securelib.tar.
  499.   
  500. ! xinetd (posted to comp.sources.unix) is an inetd replacement program
  501. ! that provides, among others, logging, username lookup and access
  502. ! control. However, it does not support TLI services, and it is only six
  503. ! times as much source code as the daemon wrapper programs.
  504.   
  505.   Where shared libraries or router-based packet filtering are not an
  506.   option, an alternative portmap daemon can help to improve RPC security,
  507.   in particular that of NFS and of the NIS (YP) information service.
  508. --- 406,420 ----
  509.   runs until the machine goes down.  Available from eecs.nwu.edu, file
  510.   /pub/securelib.tar.
  511.   
  512. ! xinetd (posted to comp.sources.unix) is an inetd replacement that
  513. ! provides, among others, logging, username lookup and access control.
  514. ! However, it does not support the System V TLI services, and it is only
  515. ! six times as much source code as the daemon wrapper programs.
  516.   
  517. + netlog from Texas A&M relies on the SunOS 4.x /dev/nit interface to
  518. + passively watch all TCP and UDP network traffic on a network.  The
  519. + current version is net.tamu.edu:/pub/security/TAMU/netlog-1.03.tar.gz.
  520. + 
  521.   Where shared libraries or router-based packet filtering are not an
  522.   option, an alternative portmap daemon can help to improve RPC security,
  523.   in particular that of NFS and of the NIS (YP) information service.
  524. ***************
  525. *** 777,782 ****
  526. --- 781,790 ----
  527.   describes the external interface of the libwrap.a library.
  528.   
  529.   The tcpd wrapper can even be used to control access to the smtp port.
  530. + This can be useful when you suspect that someone is trying out some
  531. + obscure sendmail bug, or when a remote site is misconfigured and keeps
  532. + hammering your mail daemon.
  533. + 
  534.   In that case, sendmail should not be run as a stand-alone daemon, but
  535.   it should be registered in the inetd configuration file. For example:
  536.   
  537. ***************
  538. *** 787,795 ****
  539.   
  540.       0,15,30,45 * * * * /usr/lib/sendmail -q
  541.   
  542. ! should take care of that. When you are going to "protect" your sendmail
  543. ! daemon this way, you should realize that there are many "unprotected"
  544. ! sendmail daemons all over the network that can still be abused.
  545.   
  546.   8 - Acknowledgements
  547.   --------------------
  548. --- 795,803 ----
  549.   
  550.       0,15,30,45 * * * * /usr/lib/sendmail -q
  551.   
  552. ! should take care of that. You cannot really prevent people from posting
  553. ! forged mail this way, because there are many unprotected smtp daemons
  554. ! on the network.
  555.   
  556.   8 - Acknowledgements
  557.   --------------------
  558. *** ./fromhost.c-    Mon Dec 13 22:23:07 1993
  559. --- ./fromhost.c    Tue Feb  1 22:12:05 1994
  560. ***************
  561. *** 23,29 ****
  562.     */
  563.   
  564.   #ifndef lint
  565. ! static char sccsid[] = "@(#) fromhost.c 1.14 93/12/13 22:23:05";
  566.   #endif
  567.   
  568.   /* System libraries. */
  569. --- 23,29 ----
  570.     */
  571.   
  572.   #ifndef lint
  573. ! static char sccsid[] = "@(#) fromhost.c 1.15 94/02/01 22:12:03";
  574.   #endif
  575.   
  576.   /* System libraries. */
  577. ***************
  578. *** 32,38 ****
  579.   #include <stdio.h>
  580.   #include <syslog.h>
  581.   
  582. ! #if defined(TLI) || defined(TLI_SOCKETS)
  583.   #include <sys/tiuser.h>
  584.   #include <stropts.h>
  585.   #endif
  586. --- 32,38 ----
  587.   #include <stdio.h>
  588.   #include <syslog.h>
  589.   
  590. ! #if defined(TLI) || defined(PTX)
  591.   #include <sys/tiuser.h>
  592.   #include <stropts.h>
  593.   #endif
  594. ***************
  595. *** 41,47 ****
  596.   
  597.   #include "log_tcp.h"
  598.   
  599. ! #if !defined(TLI) && !defined(TLI_SOCKETS)
  600.   
  601.   /* fromhost - compatibility wrapper for socket-only systems */
  602.   
  603. --- 41,47 ----
  604.   
  605.   #include "log_tcp.h"
  606.   
  607. ! #if !defined(TLI) && !defined(PTX)
  608.   
  609.   /* fromhost - compatibility wrapper for socket-only systems */
  610.   
  611. ***************
  612. *** 53,61 ****
  613.       return (sock_host(client, client_fd));
  614.   }
  615.   
  616. ! #endif /* !defined(TLI) && !defined(TLI_SOCKETS) */
  617.   
  618. ! #ifdef TLI
  619.   
  620.   /* fromhost - find out what network API we should use */
  621.   
  622. --- 53,61 ----
  623.       return (sock_host(client, client_fd));
  624.   }
  625.   
  626. ! #endif /* !defined(TLI) && !defined(PTX) */
  627.   
  628. ! #if defined(TLI) || defined(PTX)
  629.   
  630.   /* fromhost - find out what network API we should use */
  631.   
  632. ***************
  633. *** 80,116 ****
  634.       }
  635.   }
  636.   
  637. ! #endif /* TLI */
  638. ! 
  639. ! #ifdef TLI_SOCKETS
  640. ! 
  641. ! /* fromhost - use socket primitives even with TLI */
  642. ! 
  643. ! int     fromhost(client)
  644. ! struct client_info *client;
  645. ! {
  646. !     int     client_fd = 0;        /* XXX compatibility */
  647. !     int     ret;
  648. ! 
  649. !     /*
  650. !      * Some System V.3 based systems have TLI but the supporting libraries
  651. !      * are not as complete as with System V.4. Dynix/PTX is an example. The
  652. !      * workaround is to temporarily switch to the socket interface, identify
  653. !      * the client name/address with socket calls, then to switch back to TLI.
  654. !      */
  655. ! 
  656. ! #define SWAP_MODULE(f, old, new) (ioctl(f, I_POP, old), ioctl(f, I_PUSH, new))
  657. ! 
  658. !     if (ioctl(client_fd, I_FIND, "timod") > 0) {
  659. !     if (SWAP_MODULE(client_fd, "timod", "sockmod") != 0)
  660. !         syslog(LOG_ERR, "swap timod for sockmod: %m");
  661. !     ret = sock_host(client, client_fd);
  662. !     if (SWAP_MODULE(client_fd, "sockmod", "timod") != 0)
  663. !         syslog(LOG_ERR, "swap sockmod for timod: %m");
  664. !     return (ret);
  665. !     } else {
  666. !     return (sock_host(client, client_fd));
  667. !     }
  668. ! }
  669. ! 
  670. ! #endif /* TLI_SOCKETS */
  671. --- 80,83 ----
  672.       }
  673.   }
  674.   
  675. ! #endif /* TLI || PTX */
  676. *** ./options.c-    Mon Dec 13 22:23:18 1993
  677. --- ./options.c    Tue Feb  1 22:12:13 1994
  678. ***************
  679. *** 186,192 ****
  680.   struct client_info *client;
  681.   {
  682.       if (dry_run)
  683. !     syslog(LOG_DEBUG, "option: allow");
  684.       longjmp(options_buf, OPT_ALLOW);
  685.   }
  686.   
  687. --- 186,192 ----
  688.   struct client_info *client;
  689.   {
  690.       if (dry_run)
  691. !     syslog(LOG_DEBUG, "option:   allow");
  692.       longjmp(options_buf, OPT_ALLOW);
  693.   }
  694.   
  695. ***************
  696. *** 200,206 ****
  697.   struct client_info *client;
  698.   {
  699.       if (dry_run)
  700. !     syslog(LOG_DEBUG, "option: deny");
  701.       longjmp(options_buf, OPT_DENY);
  702.   }
  703.   
  704. --- 200,206 ----
  705.   struct client_info *client;
  706.   {
  707.       if (dry_run)
  708. !     syslog(LOG_DEBUG, "option:   deny");
  709.       longjmp(options_buf, OPT_DENY);
  710.   }
  711.   
  712. ***************
  713. *** 224,230 ****
  714.       endpwent();
  715.   
  716.       if (dry_run) {
  717. !     syslog(LOG_DEBUG, "option: user = %s", value);
  718.       return;
  719.       }
  720.       if (setuid(pwd->pw_uid)) {
  721. --- 224,230 ----
  722.       endpwent();
  723.   
  724.       if (dry_run) {
  725. !     syslog(LOG_DEBUG, "option:   user = %s", value);
  726.       return;
  727.       }
  728.       if (setuid(pwd->pw_uid)) {
  729. ***************
  730. *** 254,260 ****
  731.       endgrent();
  732.   
  733.       if (dry_run) {
  734. !     syslog(LOG_DEBUG, "option: group = %s", value);
  735.       return;
  736.       }
  737.       if (setgid(grp->gr_gid)) {
  738. --- 254,260 ----
  739.       endgrent();
  740.   
  741.       if (dry_run) {
  742. !     syslog(LOG_DEBUG, "option:   group = %s", value);
  743.       return;
  744.       }
  745.       if (setgid(grp->gr_gid)) {
  746. ***************
  747. *** 282,288 ****
  748.       longjmp(options_buf, OPT_DENY);
  749.       }
  750.       if (dry_run) {
  751. !     syslog(LOG_DEBUG, "option: umask = %o", mask);
  752.       return;
  753.       }
  754.       (void) umask(mask);
  755. --- 282,288 ----
  756.       longjmp(options_buf, OPT_DENY);
  757.       }
  758.       if (dry_run) {
  759. !     syslog(LOG_DEBUG, "option:   umask = %o", mask);
  760.       return;
  761.       }
  762.       (void) umask(mask);
  763. ***************
  764. *** 300,306 ****
  765.   
  766.       if (dry_run) {
  767.       percent_x(buf, sizeof(buf), value, daemon, client, pid);
  768. !     syslog(LOG_DEBUG, "option: spawn = %s", buf);
  769.       return;
  770.       }
  771.       shell_cmd(value, daemon, client);
  772. --- 300,306 ----
  773.   
  774.       if (dry_run) {
  775.       percent_x(buf, sizeof(buf), value, daemon, client, pid);
  776. !     syslog(LOG_DEBUG, "option:   spawn = %s", buf);
  777.       return;
  778.       }
  779.       shell_cmd(value, daemon, client);
  780. ***************
  781. *** 326,332 ****
  782.       longjmp(options_buf, OPT_DENY);
  783.       }
  784.       if (dry_run) {
  785. !     syslog(LOG_DEBUG, "option: linger = %d", linger.l_linger);
  786.       return;
  787.       }
  788.       linger.l_onoff = (linger.l_linger != 0);
  789. --- 326,332 ----
  790.       longjmp(options_buf, OPT_DENY);
  791.       }
  792.       if (dry_run) {
  793. !     syslog(LOG_DEBUG, "option:   linger = %d", linger.l_linger);
  794.       return;
  795.       }
  796.       linger.l_onoff = (linger.l_linger != 0);
  797. ***************
  798. *** 357,363 ****
  799.       percent_x(buf, sizeof(buf), value, daemon, client, pid);
  800.   
  801.       if (dry_run) {
  802. !     syslog(LOG_DEBUG, "option: twist = %s", buf);
  803.       dry_run = 0;
  804.       return;
  805.       }
  806. --- 357,363 ----
  807.       percent_x(buf, sizeof(buf), value, daemon, client, pid);
  808.   
  809.       if (dry_run) {
  810. !     syslog(LOG_DEBUG, "option:   twist = %s", buf);
  811.       dry_run = 0;
  812.       return;
  813.       }
  814. ***************
  815. *** 412,418 ****
  816.       rfc931_timeout = timeout;
  817.       }
  818.       if (dry_run) {
  819. !     syslog(LOG_DEBUG, "option: rfc931 = %d", rfc931_timeout);
  820.       return;
  821.       }
  822.       if (client->user[0] == 0 && RFC931_POSSIBLE(client))
  823. --- 412,418 ----
  824.       rfc931_timeout = timeout;
  825.       }
  826.       if (dry_run) {
  827. !     syslog(LOG_DEBUG, "option:   rfc931 = %d", rfc931_timeout);
  828.       return;
  829.       }
  830.       if (client->user[0] == 0 && RFC931_POSSIBLE(client))
  831. ***************
  832. *** 449,455 ****
  833.       var_value = chop_string(buf);
  834.       }
  835.       if (dry_run) {
  836. !     syslog(LOG_DEBUG, "option: setenv = %s %s", var_name, var_value);
  837.       return;
  838.       }
  839.       if (setenv(var_name, var_value, 1)) {
  840. --- 449,455 ----
  841.       var_value = chop_string(buf);
  842.       }
  843.       if (dry_run) {
  844. !     syslog(LOG_DEBUG, "option:   setenv = %s %s", var_name, var_value);
  845.       return;
  846.       }
  847.       if (setenv(var_name, var_value, 1)) {
  848. ***************
  849. *** 675,681 ****
  850.       new_severity = severity_map(log_severities, chop_string(value));
  851.       }
  852.       if (dry_run) {
  853. !     syslog(LOG_DEBUG, "option: severity = %s", value);
  854.       return;
  855.       }
  856.       allow_severity = deny_severity = new_severity;
  857. --- 675,681 ----
  858.       new_severity = severity_map(log_severities, chop_string(value));
  859.       }
  860.       if (dry_run) {
  861. !     syslog(LOG_DEBUG, "option:   severity = %s", value);
  862.       return;
  863.       }
  864.       allow_severity = deny_severity = new_severity;
  865. *** ./hosts_access.c-    Mon Sep 27 20:59:51 1993
  866. --- ./hosts_access.c    Tue Feb  1 22:12:09 1994
  867. ***************
  868. *** 17,23 ****
  869.     */
  870.   
  871.   #ifndef lint
  872. ! static char sccsid[] = "@(#) hosts_access.c 1.15 93/09/27 20:59:49";
  873.   #endif
  874.   
  875.   /* System libraries. */
  876. --- 17,23 ----
  877.     */
  878.   
  879.   #ifndef lint
  880. ! static char sccsid[] = "@(#) hosts_access.c 1.16 94/02/01 22:12:05";
  881.   #endif
  882.   
  883.   /* System libraries. */
  884. ***************
  885. *** 34,39 ****
  886. --- 34,40 ----
  887.   extern char *fgets();
  888.   extern char *strchr();
  889.   extern char *strtok();
  890. + extern int errno;
  891.   
  892.   #ifndef    INADDR_NONE
  893.   #define    INADDR_NONE    (-1)        /* XXX should be 0xffffffff */
  894. *** ./patchlevel.h-    Mon Dec 13 22:23:20 1993
  895. --- ./patchlevel.h    Tue Feb  1 22:12:15 1994
  896. ***************
  897. *** 1,3 ****
  898.   #ifndef lint
  899. ! static char patchlevel[] = "@(#) patchlevel 6.1";
  900.   #endif
  901. --- 1,3 ----
  902.   #ifndef lint
  903. ! static char patchlevel[] = "@(#) patchlevel 6.2";
  904.   #endif
  905. *** ./ptx.c-    Tue Feb  1 21:54:49 1994
  906. --- ./ptx.c    Tue Feb  1 22:12:16 1994
  907. ***************
  908. *** 0 ****
  909. --- 1,122 ----
  910. +  /*
  911. +   * The Dynix/PTX TLI implementation is not quite compatible with System V
  912. +   * Release 4. Some important functions are not present so we are limited to
  913. +   * IP-based services.
  914. +   * 
  915. +   * This module takes a TLI endpoint, and tries to determine the local IP
  916. +   * address, the client IP address, and the remote username if username
  917. +   * lookups are done irrespective of client. All results are in static memory
  918. +   * and will be overwritten upon the next call.
  919. +   * 
  920. +   * The return status is (-1) if the remote host pretends to have someone elses
  921. +   * name, or if the remote host name is available but could not be verified;
  922. +   * in either case the hostname will be ignored. The return status is zero in
  923. +   * all other cases (the hostname is unavailable, or the host name double
  924. +   * check succeeds).
  925. +   * 
  926. +   * Diagnostics are reported through syslog(3).
  927. +   * 
  928. +   * Author: Wietse Venema, Eindhoven University of Technology, The Netherlands.
  929. +   */
  930. + 
  931. + #ifndef lint
  932. + static char sccsid[] = "@(#) ptx.c 1.1 94/02/01 22:12:15";
  933. + #endif
  934. + 
  935. + #ifdef PTX
  936. + 
  937. + /* System libraries. */
  938. + 
  939. + #include <sys/types.h>
  940. + #include <sys/tiuser.h>
  941. + #include <sys/socket.h>
  942. + #include <stropts.h>
  943. + #include <netinet/in.h>
  944. + #include <netdb.h>
  945. + #include <stdio.h>
  946. + #include <syslog.h>
  947. + 
  948. + /* Local stuff. */
  949. + 
  950. + #include "log_tcp.h"
  951. + 
  952. + /* Forward declarations. */
  953. + 
  954. + static void ptx_sink();
  955. + 
  956. + /* tli_host - determine TLI endpoint info, PTX version */
  957. + 
  958. + int     tli_host(client, fd)
  959. + struct client_info *client;
  960. + int     fd;
  961. + {
  962. +     static struct sockaddr_in rmt_sin;
  963. +     static struct sockaddr_in our_sin;
  964. +     int     ret;
  965. + 
  966. +     /*
  967. +      * Initialize the result with suitable defaults.
  968. +      */
  969. + 
  970. +     init_client(client);
  971. +     client->fd = fd;
  972. + 
  973. +     /*
  974. +      * getpeerinaddr() was suggested by someone at Sequent. It seems to work
  975. +      * with connection-oriented (TCP) services such as rlogind and telnetd,
  976. +      * but it returns 0.0.0.0 with datagram (UDP) services. No problem: UDP
  977. +      * needs special treatment anyway, in case we must refuse service.
  978. +      */
  979. + 
  980. +     if (getpeerinaddr(client->fd, &rmt_sin, sizeof(rmt_sin)) == 0
  981. +     && rmt_sin.sin_addr.s_addr != 0) {
  982. +     client->rmt_sin = &rmt_sin;
  983. +     if (getmyinaddr(client->fd, &our_sin, sizeof(our_sin)) == 0) {
  984. +         client->our_sin = &our_sin;
  985. +     } else {
  986. +         syslog(LOG_ERR, "getmyinaddr: %m");
  987. +     }
  988. +     return (sock_names(client));
  989. +     }
  990. + 
  991. +     /*
  992. +      * Another suggestion was to temporarily switch to the socket interface,
  993. +      * identify the client name/address with socket calls, then to switch
  994. +      * back to TLI. This seems to works OK with UDP services, but utterly
  995. +      * messes up rlogind and telnetd.
  996. +      */
  997. + 
  998. + #define SWAP_MODULE(f, old, new) (ioctl(f, I_POP, old), ioctl(f, I_PUSH, new))
  999. + 
  1000. +     if (SWAP_MODULE(client->fd, "timod", "sockmod") != 0)
  1001. +     syslog(LOG_ERR, "replace timod by sockmod: %m");
  1002. +     ret = sock_host(client, client->fd);
  1003. +     if (SWAP_MODULE(client->fd, "sockmod", "timod") != 0)
  1004. +     syslog(LOG_ERR, "replace sockmod by timod: %m");
  1005. +     if (client->sink != 0)
  1006. +     client->sink = ptx_sink;
  1007. +     return (ret);
  1008. + }
  1009. + 
  1010. + /* ptx_sink - absorb unreceived IP datagram */
  1011. + 
  1012. + static void ptx_sink(fd)
  1013. + int     fd;
  1014. + {
  1015. +     char    buf[BUFSIZ];
  1016. +     struct sockaddr sa;
  1017. +     int     size = sizeof(sa);
  1018. + 
  1019. +     /*
  1020. +      * Eat up the not-yet received datagram. Where needed, switch to the
  1021. +      * socket programming interface.
  1022. +      */
  1023. + 
  1024. +     if (ioctl(fd, I_FIND, "timod") != 0)
  1025. +     ioctl(fd, I_POP, "timod");
  1026. +     if (ioctl(fd, I_FIND, "sockmod") == 0)
  1027. +     ioctl(fd, I_PUSH, "sockmod");
  1028. +     (void) recvfrom(fd, buf, sizeof(buf), 0, &sa, &size);
  1029. + }
  1030. + 
  1031. + #endif /* PTX */
  1032. *** ./socket.c-    Mon Dec 13 22:23:27 1993
  1033. --- ./socket.c    Tue Feb  1 22:12:18 1994
  1034. ***************
  1035. *** 17,23 ****
  1036.     */
  1037.   
  1038.   #ifndef lint
  1039. ! static char sccsid[] = "@(#) socket.c 1.8 93/12/13 22:23:25";
  1040.   #endif
  1041.   
  1042.   /* System libraries. */
  1043. --- 17,23 ----
  1044.     */
  1045.   
  1046.   #ifndef lint
  1047. ! static char sccsid[] = "@(#) socket.c 1.9 94/02/01 22:12:16";
  1048.   #endif
  1049.   
  1050.   /* System libraries. */
  1051. ***************
  1052. *** 29,35 ****
  1053.   #include <netdb.h>
  1054.   #include <stdio.h>
  1055.   #include <syslog.h>
  1056. - #include <errno.h>
  1057.   
  1058.   extern char *inet_ntoa();
  1059.   extern char *strncpy();
  1060. --- 29,34 ----
  1061. ***************
  1062. *** 60,65 ****
  1063. --- 59,94 ----
  1064.   
  1065.   static int sock_match_hostname();
  1066.   static void sock_sink();
  1067. + 
  1068. + #ifdef APPEND_DOT
  1069. + 
  1070. +  /*
  1071. +   * Speed up DNS lookups by terminating the host name with a dot. Should be
  1072. +   * done with care. The speedup can give problems with lookups from sources
  1073. +   * that lack DNS-style trailing dot magic, such as local files or NIS maps.
  1074. +   */
  1075. + 
  1076. + static struct hostent *gethostbyname_dot(name)
  1077. + char   *name;
  1078. + {
  1079. +     char    dot_name[MAXHOSTNAMELEN + 1];
  1080. +     char   *strchr();
  1081. + 
  1082. +     /*
  1083. +      * Don't append dots to unqualified names. Such names are likely to come
  1084. +      * from local hosts files or from NIS.
  1085. +      */
  1086. + 
  1087. +     if (strchr(name, '.') == 0 || strlen(name) >= MAXHOSTNAMELEN - 1) {
  1088. +     return (gethostbyname(name));
  1089. +     } else {
  1090. +     sprintf(dot_name, "%s.", name);
  1091. +     return (gethostbyname(dot_name));
  1092. +     }
  1093. + }
  1094. + 
  1095. + #define gethostbyname gethostbyname_dot
  1096. + #endif
  1097.   
  1098.   /* sock_host - determine endpoint info */
  1099.   
  1100. *** ./try.c-    Mon Dec 13 22:23:31 1993
  1101. --- ./try.c    Tue Feb  1 22:12:21 1994
  1102. ***************
  1103. *** 17,26 ****
  1104.     */
  1105.   
  1106.   #ifndef lint
  1107. ! static char sccsid[] = "@(#) try.c 1.9 93/12/13 22:23:29";
  1108.   #endif
  1109.   
  1110.   #include <sys/types.h>
  1111.   #include <netinet/in.h>
  1112.   #include <arpa/inet.h>
  1113.   #include <netdb.h>
  1114. --- 17,27 ----
  1115.     */
  1116.   
  1117.   #ifndef lint
  1118. ! static char sccsid[] = "@(#) try.c 1.10 94/02/01 22:12:19";
  1119.   #endif
  1120.   
  1121.   #include <sys/types.h>
  1122. + #include <sys/socket.h>
  1123.   #include <netinet/in.h>
  1124.   #include <arpa/inet.h>
  1125.   #include <netdb.h>
  1126. ***************
  1127. *** 173,178 ****
  1128. --- 174,190 ----
  1129.        */
  1130.       if ((hp = gethostbyname(host)) == 0) {
  1131.       fprintf(stderr, "host %s: address lookup failed\n", host);
  1132. +     return (1);
  1133. +     }
  1134. + 
  1135. +     /*
  1136. +      * Use the hostname that gethostbyaddr() would give us. On systems with
  1137. +      * NIS this may be an unqualified name. We should use that even though a
  1138. +      * FQDN was given on the command line.
  1139. +      */
  1140. +     if ((hp = gethostbyaddr((char *) hp->h_addr_list[0],
  1141. +                 sizeof(struct in_addr), AF_INET)) == 0) {
  1142. +     fprintf(stderr, "host %s: address->name lookup failed\n", host);
  1143.       return (1);
  1144.       }
  1145.   
  1146. *** ./vfprintf.c-    Tue Feb  1 21:54:52 1994
  1147. --- ./vfprintf.c    Tue Feb  1 22:12:22 1994
  1148. ***************
  1149. *** 0 ****
  1150. --- 1,125 ----
  1151. +  /*
  1152. +   * vfprintf() and vprintf() clones. They will produce unexpected results
  1153. +   * when excessive dynamic ("*") field widths are specified. This code was
  1154. +   * adapted from my EXP programming language runtime system.
  1155. +   * 
  1156. +   * Author: Wietse Venema, Eindhoven University of Technology, The Netherlands.
  1157. +   */
  1158. + 
  1159. + #ifndef lint
  1160. + static char sccsid[] = "@(#) vfprintf.c 1.1 94/02/01 22:12:21";
  1161. + #endif
  1162. + 
  1163. + #include <stdio.h>
  1164. + #include <ctype.h>
  1165. + #ifdef __STDC__
  1166. + #include <stdarg.h>
  1167. + #else
  1168. + #include <varargs.h>
  1169. + #endif
  1170. + 
  1171. + /* vfprintf - print variable-length argument list to stream */
  1172. + 
  1173. + int     vfprintf(fp, format, ap)
  1174. + FILE   *fp;
  1175. + char   *format;
  1176. + va_list ap;
  1177. + {
  1178. +     char    fmt[BUFSIZ];        /* format specifier */
  1179. +     register char *fmtp;
  1180. +     register char *cp;
  1181. +     int     count = 0;
  1182. + 
  1183. +     /*
  1184. +      * Iterate over characters in the format string, picking up arguments
  1185. +      * when format specifiers are found.
  1186. +      */
  1187. + 
  1188. +     for (cp = format; *cp; cp++) {
  1189. +     if (*cp != '%') {
  1190. +         putc(*cp, fp);            /* ordinary character */
  1191. +         count++;
  1192. +     } else {
  1193. + 
  1194. +         /*
  1195. +          * Format specifiers are handled one at a time, since we can only
  1196. +          * deal with arguments one at a time. Try to determine the end of
  1197. +          * the format specifier. We do not attempt to fully parse format
  1198. +          * strings, since we are ging to let fprintf() do the hard work.
  1199. +          * In regular expression notation, we recognize:
  1200. +          * 
  1201. +          * %-?0?([0-9]*|\*)\.?([0-9]*|\*)l?[a-z]
  1202. +          * 
  1203. +          * which includes some combinations that do not make sense.
  1204. +          */
  1205. + 
  1206. +         fmtp = fmt;
  1207. +         *fmtp++ = *cp++;
  1208. +         if (*cp == '-')            /* left-adjusted field? */
  1209. +         *fmtp++ = *cp++;
  1210. +         if (*cp == '0')            /* zero-padded field? */
  1211. +         *fmtp++ = *cp++;
  1212. +         if (*cp == '*') {            /* dynamic field witdh */
  1213. +         sprintf(fmtp, "%d", va_arg(ap, int));
  1214. +         fmtp += strlen(fmtp);
  1215. +         cp++;
  1216. +         } else {
  1217. +         while (isdigit(*cp))        /* hard-coded field width */
  1218. +             *fmtp++ = *cp++;
  1219. +         }
  1220. +         if (*cp == '.')            /* width/precision separator */
  1221. +         *fmtp++ = *cp++;
  1222. +         if (*cp == '*') {            /* dynamic precision */
  1223. +         sprintf(fmtp, "%d", va_arg(ap, int));
  1224. +         fmtp += strlen(fmtp);
  1225. +         cp++;
  1226. +         } else {
  1227. +         while (isdigit(*cp))        /* hard-coded precision */
  1228. +             *fmtp++ = *cp++;
  1229. +         }
  1230. +         if (*cp == 'l')            /* long whatever */
  1231. +         *fmtp++ = *cp++;
  1232. +         if (*cp == 0)            /* premature end, punt */
  1233. +         break;
  1234. +         *fmtp++ = *cp;            /* type (checked below) */
  1235. +         *fmtp = 0;
  1236. + 
  1237. +         /* Execute the format string - let fprintf() do the hard work. */
  1238. + 
  1239. +         switch (fmtp[-1]) {
  1240. +         case 's':                /* string-valued argument */
  1241. +         count += fprintf(fp, fmt, va_arg(ap, char *));
  1242. +         break;
  1243. +         case 'c':                /* integral-valued argument */
  1244. +         case 'd':
  1245. +         case 'u':
  1246. +         case 'o':
  1247. +         case 'x':
  1248. +         if (fmtp[-2] == 'l')
  1249. +             count += fprintf(fp, fmt, va_arg(ap, long));
  1250. +         else
  1251. +             count += fprintf(fp, fmt, va_arg(ap, int));
  1252. +         break;
  1253. +         case 'e':                /* float-valued argument */
  1254. +         case 'f':
  1255. +         case 'g':
  1256. +         count += fprintf(fp, fmt, va_arg(ap, double));
  1257. +         break;
  1258. +         default:                /* anything else */
  1259. +         putc(fmtp[-1], fp);
  1260. +         count++;
  1261. +         break;
  1262. +         }
  1263. +     }
  1264. +     }
  1265. +     return (count);
  1266. + }
  1267. + 
  1268. + /* vprintf - print variable-length argument list to stdout */
  1269. + 
  1270. + vprintf(format, ap)
  1271. + char   *format;
  1272. + va_list ap;
  1273. + {
  1274. +     return (vfprintf(stdout, format, ap));
  1275. + }
  1276. *** ./workarounds.c-    Tue Sep 21 23:16:39 1993
  1277. --- ./workarounds.c    Tue Feb  1 22:12:24 1994
  1278. ***************
  1279. *** 8,14 ****
  1280.     */
  1281.   
  1282.   #ifndef lint
  1283. ! char    sccsid[] = "@(#) workarounds.c 1.1 93/09/21 23:16:38";
  1284.   #endif
  1285.   
  1286.   #include <sys/types.h>
  1287. --- 8,14 ----
  1288.     */
  1289.   
  1290.   #ifndef lint
  1291. ! char    sccsid[] = "@(#) workarounds.c 1.2 94/02/01 22:12:23";
  1292.   #endif
  1293.   
  1294.   #include <sys/types.h>
  1295. ***************
  1296. *** 20,28 ****
  1297. --- 20,47 ----
  1298.   #include <stdio.h>
  1299.   #include <syslog.h>
  1300.   
  1301. + extern int errno;
  1302. + 
  1303.   #include "log_tcp.h"
  1304.   
  1305.    /*
  1306. +   * Some AIX versions advertise a too small MAXHOSTNAMELEN value (32).
  1307. +   * Result: long hostnames would be truncated, and connections would be
  1308. +   * dropped because of host name verification failures. Adrian van Bloois
  1309. +   * (A.vanBloois@info.nic.surfnet.nl) figured out what was the problem.
  1310. +   */
  1311. + 
  1312. + #if (MAXHOSTNAMELEN < 64)
  1313. + #undef MAXHOSTNAMELEN
  1314. + #endif
  1315. + 
  1316. + /* In case not defined in <sys/param.h>. */
  1317. + 
  1318. + #ifndef MAXHOSTNAMELEN
  1319. + #define MAXHOSTNAMELEN  256             /* storage for host name */
  1320. + #endif
  1321. + 
  1322. +  /*
  1323.     * Some DG/UX inet_addr() versions return a struct/union instead of a long.
  1324.     * You have this problem when the compiler complains about illegal lvalues
  1325.     * or something like that. The following code fixes this mutant behaviour.
  1326. ***************
  1327. *** 158,160 ****
  1328. --- 177,198 ----
  1329.   }
  1330.   
  1331.   #endif /* GETPEERNAME_BUG */
  1332. + 
  1333. +  /*
  1334. +   * According to Karl Vogel (vogelke@c-17igp.wpafb.af.mil) some Pyramid
  1335. +   * versions have no yp_default_domain() function. We use getdomainname()
  1336. +   * instead.
  1337. +   */
  1338. + 
  1339. + #ifdef USE_GETDOMAIN
  1340. + 
  1341. + int     yp_get_default_domain(ptr)
  1342. + char  **ptr;
  1343. + {
  1344. +     static char mydomain[MAXHOSTNAMELEN];
  1345. + 
  1346. +     *ptr = mydomain;
  1347. +     return (getdomainname(mydomain, MAXHOSTNAMELEN));
  1348. + }
  1349. + 
  1350. + #endif /* USE_GETDOMAIN */
  1351.  
  1352. exit 0 # Just in case...
  1353.