* gnu/packages/onc-rpc.scm (libtirpc)[replacement]: New field. (libtirpc/fixed): New variable. (libtirpc-hurd)[source]: Add patch. * gnu/packages/patches/libtirpc-CVE-2021-46828.patch: New file. * gnu/local.mk (dist_patch_DATA): Register it.
		
			
				
	
	
		
			567 lines
		
	
	
	
		
			21 KiB
		
	
	
	
		
			Diff
		
	
	
	
	
	
			
		
		
	
	
			567 lines
		
	
	
	
		
			21 KiB
		
	
	
	
		
			Diff
		
	
	
	
	
	
https://cve.mitre.org/cgi-bin/cvename.cgi?name=CVE-2021-46828
 | 
						|
https://nvd.nist.gov/vuln/detail/CVE-2021-46828
 | 
						|
 | 
						|
http://git.linux-nfs.org/?p=steved/libtirpc.git;a=commit;h=86529758570cef4c73fb9b9c4104fdc510f701ed
 | 
						|
 | 
						|
From 86529758570cef4c73fb9b9c4104fdc510f701ed Mon Sep 17 00:00:00 2001
 | 
						|
From: Dai Ngo <dai.ngo@oracle.com>
 | 
						|
Date: Sat, 21 Aug 2021 13:16:23 -0400
 | 
						|
Subject: [PATCH] Fix DoS vulnerability in libtirpc
 | 
						|
 | 
						|
Currently svc_run does not handle poll timeout and rendezvous_request
 | 
						|
does not handle EMFILE error returned from accept(2 as it used to.
 | 
						|
These two missing functionality were removed by commit b2c9430f46c4.
 | 
						|
 | 
						|
The effect of not handling poll timeout allows idle TCP conections
 | 
						|
to remain ESTABLISHED indefinitely. When the number of connections
 | 
						|
reaches the limit of the open file descriptors (ulimit -n) then
 | 
						|
accept(2) fails with EMFILE. Since there is no handling of EMFILE
 | 
						|
error this causes svc_run() to get in a tight loop calling accept(2).
 | 
						|
This resulting in the RPC service of svc_run is being down, it's
 | 
						|
no longer able to service any requests.
 | 
						|
 | 
						|
RPC service rpcbind, statd and mountd are effected by this
 | 
						|
problem.
 | 
						|
 | 
						|
Fix by enhancing rendezvous_request to keep the number of
 | 
						|
SVCXPRT conections to 4/5 of the size of the file descriptor
 | 
						|
table. When this thresold is reached, it destroys the idle
 | 
						|
TCP connections or destroys the least active connection if
 | 
						|
no idle connnction was found.
 | 
						|
 | 
						|
Fixes: 44bf15b8 rpcbind: don't use obsolete svc_fdset interface of libtirpc
 | 
						|
Signed-off-by: dai.ngo@oracle.com
 | 
						|
Signed-off-by: Steve Dickson <steved@redhat.com>
 | 
						|
---
 | 
						|
 INSTALL      | 371 +----------------------------------------------------------
 | 
						|
 src/svc.c    |  17 ++-
 | 
						|
 src/svc_vc.c |  62 +++++++++-
 | 
						|
 3 files changed, 78 insertions(+), 372 deletions(-)
 | 
						|
 mode change 100644 => 120000 INSTALL
 | 
						|
 | 
						|
diff --git a/INSTALL b/INSTALL
 | 
						|
deleted file mode 100644
 | 
						|
index 2099840..0000000
 | 
						|
--- a/INSTALL
 | 
						|
+++ /dev/null
 | 
						|
@@ -1,370 +0,0 @@
 | 
						|
-Installation Instructions
 | 
						|
-*************************
 | 
						|
-
 | 
						|
-Copyright (C) 1994-1996, 1999-2002, 2004-2013 Free Software Foundation,
 | 
						|
-Inc.
 | 
						|
-
 | 
						|
-   Copying and distribution of this file, with or without modification,
 | 
						|
-are permitted in any medium without royalty provided the copyright
 | 
						|
-notice and this notice are preserved.  This file is offered as-is,
 | 
						|
-without warranty of any kind.
 | 
						|
-
 | 
						|
-Basic Installation
 | 
						|
-==================
 | 
						|
-
 | 
						|
-   Briefly, the shell command `./configure && make && make install'
 | 
						|
-should configure, build, and install this package.  The following
 | 
						|
-more-detailed instructions are generic; see the `README' file for
 | 
						|
-instructions specific to this package.  Some packages provide this
 | 
						|
-`INSTALL' file but do not implement all of the features documented
 | 
						|
-below.  The lack of an optional feature in a given package is not
 | 
						|
-necessarily a bug.  More recommendations for GNU packages can be found
 | 
						|
-in *note Makefile Conventions: (standards)Makefile Conventions.
 | 
						|
-
 | 
						|
-   The `configure' shell script attempts to guess correct values for
 | 
						|
-various system-dependent variables used during compilation.  It uses
 | 
						|
-those values to create a `Makefile' in each directory of the package.
 | 
						|
-It may also create one or more `.h' files containing system-dependent
 | 
						|
-definitions.  Finally, it creates a shell script `config.status' that
 | 
						|
-you can run in the future to recreate the current configuration, and a
 | 
						|
-file `config.log' containing compiler output (useful mainly for
 | 
						|
-debugging `configure').
 | 
						|
-
 | 
						|
-   It can also use an optional file (typically called `config.cache'
 | 
						|
-and enabled with `--cache-file=config.cache' or simply `-C') that saves
 | 
						|
-the results of its tests to speed up reconfiguring.  Caching is
 | 
						|
-disabled by default to prevent problems with accidental use of stale
 | 
						|
-cache files.
 | 
						|
-
 | 
						|
-   If you need to do unusual things to compile the package, please try
 | 
						|
-to figure out how `configure' could check whether to do them, and mail
 | 
						|
-diffs or instructions to the address given in the `README' so they can
 | 
						|
-be considered for the next release.  If you are using the cache, and at
 | 
						|
-some point `config.cache' contains results you don't want to keep, you
 | 
						|
-may remove or edit it.
 | 
						|
-
 | 
						|
-   The file `configure.ac' (or `configure.in') is used to create
 | 
						|
-`configure' by a program called `autoconf'.  You need `configure.ac' if
 | 
						|
-you want to change it or regenerate `configure' using a newer version
 | 
						|
-of `autoconf'.
 | 
						|
-
 | 
						|
-   The simplest way to compile this package is:
 | 
						|
-
 | 
						|
-  1. `cd' to the directory containing the package's source code and type
 | 
						|
-     `./configure' to configure the package for your system.
 | 
						|
-
 | 
						|
-     Running `configure' might take a while.  While running, it prints
 | 
						|
-     some messages telling which features it is checking for.
 | 
						|
-
 | 
						|
-  2. Type `make' to compile the package.
 | 
						|
-
 | 
						|
-  3. Optionally, type `make check' to run any self-tests that come with
 | 
						|
-     the package, generally using the just-built uninstalled binaries.
 | 
						|
-
 | 
						|
-  4. Type `make install' to install the programs and any data files and
 | 
						|
-     documentation.  When installing into a prefix owned by root, it is
 | 
						|
-     recommended that the package be configured and built as a regular
 | 
						|
-     user, and only the `make install' phase executed with root
 | 
						|
-     privileges.
 | 
						|
-
 | 
						|
-  5. Optionally, type `make installcheck' to repeat any self-tests, but
 | 
						|
-     this time using the binaries in their final installed location.
 | 
						|
-     This target does not install anything.  Running this target as a
 | 
						|
-     regular user, particularly if the prior `make install' required
 | 
						|
-     root privileges, verifies that the installation completed
 | 
						|
-     correctly.
 | 
						|
-
 | 
						|
-  6. You can remove the program binaries and object files from the
 | 
						|
-     source code directory by typing `make clean'.  To also remove the
 | 
						|
-     files that `configure' created (so you can compile the package for
 | 
						|
-     a different kind of computer), type `make distclean'.  There is
 | 
						|
-     also a `make maintainer-clean' target, but that is intended mainly
 | 
						|
-     for the package's developers.  If you use it, you may have to get
 | 
						|
-     all sorts of other programs in order to regenerate files that came
 | 
						|
-     with the distribution.
 | 
						|
-
 | 
						|
-  7. Often, you can also type `make uninstall' to remove the installed
 | 
						|
-     files again.  In practice, not all packages have tested that
 | 
						|
-     uninstallation works correctly, even though it is required by the
 | 
						|
-     GNU Coding Standards.
 | 
						|
-
 | 
						|
-  8. Some packages, particularly those that use Automake, provide `make
 | 
						|
-     distcheck', which can by used by developers to test that all other
 | 
						|
-     targets like `make install' and `make uninstall' work correctly.
 | 
						|
-     This target is generally not run by end users.
 | 
						|
-
 | 
						|
-Compilers and Options
 | 
						|
-=====================
 | 
						|
-
 | 
						|
-   Some systems require unusual options for compilation or linking that
 | 
						|
-the `configure' script does not know about.  Run `./configure --help'
 | 
						|
-for details on some of the pertinent environment variables.
 | 
						|
-
 | 
						|
-   You can give `configure' initial values for configuration parameters
 | 
						|
-by setting variables in the command line or in the environment.  Here
 | 
						|
-is an example:
 | 
						|
-
 | 
						|
-     ./configure CC=c99 CFLAGS=-g LIBS=-lposix
 | 
						|
-
 | 
						|
-   *Note Defining Variables::, for more details.
 | 
						|
-
 | 
						|
-Compiling For Multiple Architectures
 | 
						|
-====================================
 | 
						|
-
 | 
						|
-   You can compile the package for more than one kind of computer at the
 | 
						|
-same time, by placing the object files for each architecture in their
 | 
						|
-own directory.  To do this, you can use GNU `make'.  `cd' to the
 | 
						|
-directory where you want the object files and executables to go and run
 | 
						|
-the `configure' script.  `configure' automatically checks for the
 | 
						|
-source code in the directory that `configure' is in and in `..'.  This
 | 
						|
-is known as a "VPATH" build.
 | 
						|
-
 | 
						|
-   With a non-GNU `make', it is safer to compile the package for one
 | 
						|
-architecture at a time in the source code directory.  After you have
 | 
						|
-installed the package for one architecture, use `make distclean' before
 | 
						|
-reconfiguring for another architecture.
 | 
						|
-
 | 
						|
-   On MacOS X 10.5 and later systems, you can create libraries and
 | 
						|
-executables that work on multiple system types--known as "fat" or
 | 
						|
-"universal" binaries--by specifying multiple `-arch' options to the
 | 
						|
-compiler but only a single `-arch' option to the preprocessor.  Like
 | 
						|
-this:
 | 
						|
-
 | 
						|
-     ./configure CC="gcc -arch i386 -arch x86_64 -arch ppc -arch ppc64" \
 | 
						|
-                 CXX="g++ -arch i386 -arch x86_64 -arch ppc -arch ppc64" \
 | 
						|
-                 CPP="gcc -E" CXXCPP="g++ -E"
 | 
						|
-
 | 
						|
-   This is not guaranteed to produce working output in all cases, you
 | 
						|
-may have to build one architecture at a time and combine the results
 | 
						|
-using the `lipo' tool if you have problems.
 | 
						|
-
 | 
						|
-Installation Names
 | 
						|
-==================
 | 
						|
-
 | 
						|
-   By default, `make install' installs the package's commands under
 | 
						|
-`/usr/local/bin', include files under `/usr/local/include', etc.  You
 | 
						|
-can specify an installation prefix other than `/usr/local' by giving
 | 
						|
-`configure' the option `--prefix=PREFIX', where PREFIX must be an
 | 
						|
-absolute file name.
 | 
						|
-
 | 
						|
-   You can specify separate installation prefixes for
 | 
						|
-architecture-specific files and architecture-independent files.  If you
 | 
						|
-pass the option `--exec-prefix=PREFIX' to `configure', the package uses
 | 
						|
-PREFIX as the prefix for installing programs and libraries.
 | 
						|
-Documentation and other data files still use the regular prefix.
 | 
						|
-
 | 
						|
-   In addition, if you use an unusual directory layout you can give
 | 
						|
-options like `--bindir=DIR' to specify different values for particular
 | 
						|
-kinds of files.  Run `configure --help' for a list of the directories
 | 
						|
-you can set and what kinds of files go in them.  In general, the
 | 
						|
-default for these options is expressed in terms of `${prefix}', so that
 | 
						|
-specifying just `--prefix' will affect all of the other directory
 | 
						|
-specifications that were not explicitly provided.
 | 
						|
-
 | 
						|
-   The most portable way to affect installation locations is to pass the
 | 
						|
-correct locations to `configure'; however, many packages provide one or
 | 
						|
-both of the following shortcuts of passing variable assignments to the
 | 
						|
-`make install' command line to change installation locations without
 | 
						|
-having to reconfigure or recompile.
 | 
						|
-
 | 
						|
-   The first method involves providing an override variable for each
 | 
						|
-affected directory.  For example, `make install
 | 
						|
-prefix=/alternate/directory' will choose an alternate location for all
 | 
						|
-directory configuration variables that were expressed in terms of
 | 
						|
-`${prefix}'.  Any directories that were specified during `configure',
 | 
						|
-but not in terms of `${prefix}', must each be overridden at install
 | 
						|
-time for the entire installation to be relocated.  The approach of
 | 
						|
-makefile variable overrides for each directory variable is required by
 | 
						|
-the GNU Coding Standards, and ideally causes no recompilation.
 | 
						|
-However, some platforms have known limitations with the semantics of
 | 
						|
-shared libraries that end up requiring recompilation when using this
 | 
						|
-method, particularly noticeable in packages that use GNU Libtool.
 | 
						|
-
 | 
						|
-   The second method involves providing the `DESTDIR' variable.  For
 | 
						|
-example, `make install DESTDIR=/alternate/directory' will prepend
 | 
						|
-`/alternate/directory' before all installation names.  The approach of
 | 
						|
-`DESTDIR' overrides is not required by the GNU Coding Standards, and
 | 
						|
-does not work on platforms that have drive letters.  On the other hand,
 | 
						|
-it does better at avoiding recompilation issues, and works well even
 | 
						|
-when some directory options were not specified in terms of `${prefix}'
 | 
						|
-at `configure' time.
 | 
						|
-
 | 
						|
-Optional Features
 | 
						|
-=================
 | 
						|
-
 | 
						|
-   If the package supports it, you can cause programs to be installed
 | 
						|
-with an extra prefix or suffix on their names by giving `configure' the
 | 
						|
-option `--program-prefix=PREFIX' or `--program-suffix=SUFFIX'.
 | 
						|
-
 | 
						|
-   Some packages pay attention to `--enable-FEATURE' options to
 | 
						|
-`configure', where FEATURE indicates an optional part of the package.
 | 
						|
-They may also pay attention to `--with-PACKAGE' options, where PACKAGE
 | 
						|
-is something like `gnu-as' or `x' (for the X Window System).  The
 | 
						|
-`README' should mention any `--enable-' and `--with-' options that the
 | 
						|
-package recognizes.
 | 
						|
-
 | 
						|
-   For packages that use the X Window System, `configure' can usually
 | 
						|
-find the X include and library files automatically, but if it doesn't,
 | 
						|
-you can use the `configure' options `--x-includes=DIR' and
 | 
						|
-`--x-libraries=DIR' to specify their locations.
 | 
						|
-
 | 
						|
-   Some packages offer the ability to configure how verbose the
 | 
						|
-execution of `make' will be.  For these packages, running `./configure
 | 
						|
---enable-silent-rules' sets the default to minimal output, which can be
 | 
						|
-overridden with `make V=1'; while running `./configure
 | 
						|
---disable-silent-rules' sets the default to verbose, which can be
 | 
						|
-overridden with `make V=0'.
 | 
						|
-
 | 
						|
-Particular systems
 | 
						|
-==================
 | 
						|
-
 | 
						|
-   On HP-UX, the default C compiler is not ANSI C compatible.  If GNU
 | 
						|
-CC is not installed, it is recommended to use the following options in
 | 
						|
-order to use an ANSI C compiler:
 | 
						|
-
 | 
						|
-     ./configure CC="cc -Ae -D_XOPEN_SOURCE=500"
 | 
						|
-
 | 
						|
-and if that doesn't work, install pre-built binaries of GCC for HP-UX.
 | 
						|
-
 | 
						|
-   HP-UX `make' updates targets which have the same time stamps as
 | 
						|
-their prerequisites, which makes it generally unusable when shipped
 | 
						|
-generated files such as `configure' are involved.  Use GNU `make'
 | 
						|
-instead.
 | 
						|
-
 | 
						|
-   On OSF/1 a.k.a. Tru64, some versions of the default C compiler cannot
 | 
						|
-parse its `<wchar.h>' header file.  The option `-nodtk' can be used as
 | 
						|
-a workaround.  If GNU CC is not installed, it is therefore recommended
 | 
						|
-to try
 | 
						|
-
 | 
						|
-     ./configure CC="cc"
 | 
						|
-
 | 
						|
-and if that doesn't work, try
 | 
						|
-
 | 
						|
-     ./configure CC="cc -nodtk"
 | 
						|
-
 | 
						|
-   On Solaris, don't put `/usr/ucb' early in your `PATH'.  This
 | 
						|
-directory contains several dysfunctional programs; working variants of
 | 
						|
-these programs are available in `/usr/bin'.  So, if you need `/usr/ucb'
 | 
						|
-in your `PATH', put it _after_ `/usr/bin'.
 | 
						|
-
 | 
						|
-   On Haiku, software installed for all users goes in `/boot/common',
 | 
						|
-not `/usr/local'.  It is recommended to use the following options:
 | 
						|
-
 | 
						|
-     ./configure --prefix=/boot/common
 | 
						|
-
 | 
						|
-Specifying the System Type
 | 
						|
-==========================
 | 
						|
-
 | 
						|
-   There may be some features `configure' cannot figure out
 | 
						|
-automatically, but needs to determine by the type of machine the package
 | 
						|
-will run on.  Usually, assuming the package is built to be run on the
 | 
						|
-_same_ architectures, `configure' can figure that out, but if it prints
 | 
						|
-a message saying it cannot guess the machine type, give it the
 | 
						|
-`--build=TYPE' option.  TYPE can either be a short name for the system
 | 
						|
-type, such as `sun4', or a canonical name which has the form:
 | 
						|
-
 | 
						|
-     CPU-COMPANY-SYSTEM
 | 
						|
-
 | 
						|
-where SYSTEM can have one of these forms:
 | 
						|
-
 | 
						|
-     OS
 | 
						|
-     KERNEL-OS
 | 
						|
-
 | 
						|
-   See the file `config.sub' for the possible values of each field.  If
 | 
						|
-`config.sub' isn't included in this package, then this package doesn't
 | 
						|
-need to know the machine type.
 | 
						|
-
 | 
						|
-   If you are _building_ compiler tools for cross-compiling, you should
 | 
						|
-use the option `--target=TYPE' to select the type of system they will
 | 
						|
-produce code for.
 | 
						|
-
 | 
						|
-   If you want to _use_ a cross compiler, that generates code for a
 | 
						|
-platform different from the build platform, you should specify the
 | 
						|
-"host" platform (i.e., that on which the generated programs will
 | 
						|
-eventually be run) with `--host=TYPE'.
 | 
						|
-
 | 
						|
-Sharing Defaults
 | 
						|
-================
 | 
						|
-
 | 
						|
-   If you want to set default values for `configure' scripts to share,
 | 
						|
-you can create a site shell script called `config.site' that gives
 | 
						|
-default values for variables like `CC', `cache_file', and `prefix'.
 | 
						|
-`configure' looks for `PREFIX/share/config.site' if it exists, then
 | 
						|
-`PREFIX/etc/config.site' if it exists.  Or, you can set the
 | 
						|
-`CONFIG_SITE' environment variable to the location of the site script.
 | 
						|
-A warning: not all `configure' scripts look for a site script.
 | 
						|
-
 | 
						|
-Defining Variables
 | 
						|
-==================
 | 
						|
-
 | 
						|
-   Variables not defined in a site shell script can be set in the
 | 
						|
-environment passed to `configure'.  However, some packages may run
 | 
						|
-configure again during the build, and the customized values of these
 | 
						|
-variables may be lost.  In order to avoid this problem, you should set
 | 
						|
-them in the `configure' command line, using `VAR=value'.  For example:
 | 
						|
-
 | 
						|
-     ./configure CC=/usr/local2/bin/gcc
 | 
						|
-
 | 
						|
-causes the specified `gcc' to be used as the C compiler (unless it is
 | 
						|
-overridden in the site shell script).
 | 
						|
-
 | 
						|
-Unfortunately, this technique does not work for `CONFIG_SHELL' due to
 | 
						|
-an Autoconf limitation.  Until the limitation is lifted, you can use
 | 
						|
-this workaround:
 | 
						|
-
 | 
						|
-     CONFIG_SHELL=/bin/bash ./configure CONFIG_SHELL=/bin/bash
 | 
						|
-
 | 
						|
-`configure' Invocation
 | 
						|
-======================
 | 
						|
-
 | 
						|
-   `configure' recognizes the following options to control how it
 | 
						|
-operates.
 | 
						|
-
 | 
						|
-`--help'
 | 
						|
-`-h'
 | 
						|
-     Print a summary of all of the options to `configure', and exit.
 | 
						|
-
 | 
						|
-`--help=short'
 | 
						|
-`--help=recursive'
 | 
						|
-     Print a summary of the options unique to this package's
 | 
						|
-     `configure', and exit.  The `short' variant lists options used
 | 
						|
-     only in the top level, while the `recursive' variant lists options
 | 
						|
-     also present in any nested packages.
 | 
						|
-
 | 
						|
-`--version'
 | 
						|
-`-V'
 | 
						|
-     Print the version of Autoconf used to generate the `configure'
 | 
						|
-     script, and exit.
 | 
						|
-
 | 
						|
-`--cache-file=FILE'
 | 
						|
-     Enable the cache: use and save the results of the tests in FILE,
 | 
						|
-     traditionally `config.cache'.  FILE defaults to `/dev/null' to
 | 
						|
-     disable caching.
 | 
						|
-
 | 
						|
-`--config-cache'
 | 
						|
-`-C'
 | 
						|
-     Alias for `--cache-file=config.cache'.
 | 
						|
-
 | 
						|
-`--quiet'
 | 
						|
-`--silent'
 | 
						|
-`-q'
 | 
						|
-     Do not print messages saying which checks are being made.  To
 | 
						|
-     suppress all normal output, redirect it to `/dev/null' (any error
 | 
						|
-     messages will still be shown).
 | 
						|
-
 | 
						|
-`--srcdir=DIR'
 | 
						|
-     Look for the package's source code in directory DIR.  Usually
 | 
						|
-     `configure' can determine that directory automatically.
 | 
						|
-
 | 
						|
-`--prefix=DIR'
 | 
						|
-     Use DIR as the installation prefix.  *note Installation Names::
 | 
						|
-     for more details, including other options available for fine-tuning
 | 
						|
-     the installation locations.
 | 
						|
-
 | 
						|
-`--no-create'
 | 
						|
-`-n'
 | 
						|
-     Run the configure checks, but stop before creating any output
 | 
						|
-     files.
 | 
						|
-
 | 
						|
-`configure' also accepts some other, not widely useful, options.  Run
 | 
						|
-`configure --help' for more details.
 | 
						|
diff --git a/INSTALL b/INSTALL
 | 
						|
new file mode 120000
 | 
						|
index 0000000..e3f22c0
 | 
						|
--- /dev/null
 | 
						|
+++ b/INSTALL
 | 
						|
@@ -0,0 +1 @@
 | 
						|
+/usr/share/automake-1.16/INSTALL
 | 
						|
\ No newline at end of file
 | 
						|
diff --git a/src/svc.c b/src/svc.c
 | 
						|
index 6db164b..3a8709f 100644
 | 
						|
--- a/src/svc.c
 | 
						|
+++ b/src/svc.c
 | 
						|
@@ -57,7 +57,7 @@
 | 
						|
 
 | 
						|
 #define max(a, b) (a > b ? a : b)
 | 
						|
 
 | 
						|
-static SVCXPRT **__svc_xports;
 | 
						|
+SVCXPRT **__svc_xports;
 | 
						|
 int __svc_maxrec;
 | 
						|
 
 | 
						|
 /*
 | 
						|
@@ -194,6 +194,21 @@ __xprt_do_unregister (xprt, dolock)
 | 
						|
     rwlock_unlock (&svc_fd_lock);
 | 
						|
 }
 | 
						|
 
 | 
						|
+int
 | 
						|
+svc_open_fds()
 | 
						|
+{
 | 
						|
+	int ix;
 | 
						|
+	int nfds = 0;
 | 
						|
+
 | 
						|
+	rwlock_rdlock (&svc_fd_lock);
 | 
						|
+	for (ix = 0; ix < svc_max_pollfd; ++ix) {
 | 
						|
+		if (svc_pollfd[ix].fd != -1)
 | 
						|
+			nfds++;
 | 
						|
+	}
 | 
						|
+	rwlock_unlock (&svc_fd_lock);
 | 
						|
+	return (nfds);
 | 
						|
+}
 | 
						|
+
 | 
						|
 /*
 | 
						|
  * Add a service program to the callout list.
 | 
						|
  * The dispatch routine will be called when a rpc request for this
 | 
						|
diff --git a/src/svc_vc.c b/src/svc_vc.c
 | 
						|
index f1d9f00..3dc8a75 100644
 | 
						|
--- a/src/svc_vc.c
 | 
						|
+++ b/src/svc_vc.c
 | 
						|
@@ -64,6 +64,8 @@
 | 
						|
 
 | 
						|
 
 | 
						|
 extern rwlock_t svc_fd_lock;
 | 
						|
+extern SVCXPRT **__svc_xports;
 | 
						|
+extern int svc_open_fds();
 | 
						|
 
 | 
						|
 static SVCXPRT *makefd_xprt(int, u_int, u_int);
 | 
						|
 static bool_t rendezvous_request(SVCXPRT *, struct rpc_msg *);
 | 
						|
@@ -82,6 +84,7 @@ static void svc_vc_ops(SVCXPRT *);
 | 
						|
 static bool_t svc_vc_control(SVCXPRT *xprt, const u_int rq, void *in);
 | 
						|
 static bool_t svc_vc_rendezvous_control (SVCXPRT *xprt, const u_int rq,
 | 
						|
 				   	     void *in);
 | 
						|
+static int __svc_destroy_idle(int timeout);
 | 
						|
 
 | 
						|
 struct cf_rendezvous { /* kept in xprt->xp_p1 for rendezvouser */
 | 
						|
 	u_int sendsize;
 | 
						|
@@ -313,13 +316,14 @@ done:
 | 
						|
 	return (xprt);
 | 
						|
 }
 | 
						|
 
 | 
						|
+
 | 
						|
 /*ARGSUSED*/
 | 
						|
 static bool_t
 | 
						|
 rendezvous_request(xprt, msg)
 | 
						|
 	SVCXPRT *xprt;
 | 
						|
 	struct rpc_msg *msg;
 | 
						|
 {
 | 
						|
-	int sock, flags;
 | 
						|
+	int sock, flags, nfds, cnt;
 | 
						|
 	struct cf_rendezvous *r;
 | 
						|
 	struct cf_conn *cd;
 | 
						|
 	struct sockaddr_storage addr;
 | 
						|
@@ -379,6 +383,16 @@ again:
 | 
						|
 
 | 
						|
 	gettimeofday(&cd->last_recv_time, NULL);
 | 
						|
 
 | 
						|
+	nfds = svc_open_fds();
 | 
						|
+	if (nfds >= (_rpc_dtablesize() / 5) * 4) {
 | 
						|
+		/* destroy idle connections */
 | 
						|
+		cnt = __svc_destroy_idle(15);
 | 
						|
+		if (cnt == 0) {
 | 
						|
+			/* destroy least active */
 | 
						|
+			__svc_destroy_idle(0);
 | 
						|
+		}
 | 
						|
+	}
 | 
						|
+
 | 
						|
 	return (FALSE); /* there is never an rpc msg to be processed */
 | 
						|
 }
 | 
						|
 
 | 
						|
@@ -820,3 +834,49 @@ __svc_clean_idle(fd_set *fds, int timeout, bool_t cleanblock)
 | 
						|
 {
 | 
						|
 	return FALSE;
 | 
						|
 }
 | 
						|
+
 | 
						|
+static int
 | 
						|
+__svc_destroy_idle(int timeout)
 | 
						|
+{
 | 
						|
+	int i, ncleaned = 0;
 | 
						|
+	SVCXPRT *xprt, *least_active;
 | 
						|
+	struct timeval tv, tdiff, tmax;
 | 
						|
+	struct cf_conn *cd;
 | 
						|
+
 | 
						|
+	gettimeofday(&tv, NULL);
 | 
						|
+	tmax.tv_sec = tmax.tv_usec = 0;
 | 
						|
+	least_active = NULL;
 | 
						|
+	rwlock_wrlock(&svc_fd_lock);
 | 
						|
+
 | 
						|
+	for (i = 0; i <= svc_max_pollfd; i++) {
 | 
						|
+		if (svc_pollfd[i].fd == -1)
 | 
						|
+			continue;
 | 
						|
+		xprt = __svc_xports[i];
 | 
						|
+		if (xprt == NULL || xprt->xp_ops == NULL ||
 | 
						|
+			xprt->xp_ops->xp_recv != svc_vc_recv)
 | 
						|
+			continue;
 | 
						|
+		cd = (struct cf_conn *)xprt->xp_p1;
 | 
						|
+		if (!cd->nonblock)
 | 
						|
+			continue;
 | 
						|
+		if (timeout == 0) {
 | 
						|
+			timersub(&tv, &cd->last_recv_time, &tdiff);
 | 
						|
+			if (timercmp(&tdiff, &tmax, >)) {
 | 
						|
+				tmax = tdiff;
 | 
						|
+				least_active = xprt;
 | 
						|
+			}
 | 
						|
+			continue;
 | 
						|
+		}
 | 
						|
+		if (tv.tv_sec - cd->last_recv_time.tv_sec > timeout) {
 | 
						|
+			__xprt_unregister_unlocked(xprt);
 | 
						|
+			__svc_vc_dodestroy(xprt);
 | 
						|
+			ncleaned++;
 | 
						|
+		}
 | 
						|
+	}
 | 
						|
+	if (timeout == 0 && least_active != NULL) {
 | 
						|
+		__xprt_unregister_unlocked(least_active);
 | 
						|
+		__svc_vc_dodestroy(least_active);
 | 
						|
+		ncleaned++;
 | 
						|
+	}
 | 
						|
+	rwlock_unlock(&svc_fd_lock);
 | 
						|
+	return (ncleaned);
 | 
						|
+}
 | 
						|
-- 
 | 
						|
1.8.3.1
 | 
						|
 |