mirror of
https://sourceware.org/git/glibc.git
synced 2024-12-24 11:41:07 +00:00
0d8733c4fc
1997-03-16 18:43 Ulrich Drepper <drepper@cygnus.com> * manual/filesys.texi: Add documentation for scandir and alphasort. * math/math.c (fpclassify): Correct stupid typos. * math/libm-test.c: New file. libm test suite by Andreas Jaeger. * nss/nss_files/files-hosts.c: Add gethostbyname2 imlementation. * posix/Makefile (routines): Add bsd-getpgrp. * posix/bsd-getpgrp.c: New file. * posix/unistd.h [__FAVOR_BSD]: Define macro getpgrp which maps calls to __bsd_getpgrp. * sysdeps/generic/getpgrp.c: De-ANSI-declfy. * sysdeps/i386/huge_val.h: New file. ix87 specific infinity values. * sysdeps/m68k/huge_val.h: New file. m68k specific infinity values. * sysdeps/generic/huge_val.h: Remove definition of long double definition. Make it the same as the double definition. * sysdeps/libm-i387/e_acos.S: Fix bug in FPU stack handling. * sysdeps/libm-i387/e_acosf.S: Likewise. * sysdeps/libm-i387/e_acosl.S: Likewise. * sysdeps/libm-i387/e_asin.S: Likewise. * sysdeps/libm-i387/e_asinf.S: Likewise. * sysdeps/libm-i387/e_asinl.S: Likewise. * sysdeps/libm-i387/e_exp.S: Likewise. * sysdeps/libm-i387/e_expf.S: Likewise. * sysdeps/libm-i387/e_expl.S: Likewise. * sysdeps/libm-i387/e_scalbn.S: Likewise. * sysdeps/libm-i387/e_scalbnf.S: Likewise. * sysdeps/libm-i387/e_scalbnl.S: Likewise. * sysdeps/libm-i387/e_log.S: Optimize branch code. * sysdeps/libm-i387/e_logf.S: Likewise. * sysdeps/libm-i387/e_logl.S: Likewise. * sysdeps/libm-i387/e_log10.S: Likewise. * sysdeps/libm-i387/e_log10f.S: Likewise. * sysdeps/libm-i387/e_log10l.S: Likewise. * sysdeps/libm-i387/e_pow.S: Major rewrite to handle special cases. * sysdeps/libm-i387/e_powf.S: Likewise. * sysdeps/libm-i387/e_powl.S: Likewise. * sysdeps/libm-i387/e_expm1.S: Change return value for -inf argument to -1.0. * sysdeps/libm-i387/e_expm1f.S: Likewise. * sysdeps/libm-i387/e_expm1l.S: Likewise. * sysdeps/libm-i387/e_isinfl.c: Return -1 for -inf. * sysdeps/libm-i387/e_logbl.S: Correct return value. Discard first stack element after fxtract. * sysdeps/libm-ieee754/e_atan2l.c: New file. `long double' implementation for atan2 function. * sysdeps/libm-ieee754/k_standard.c: Return NAN for libm not in _SVID_ mode when acos, asin, atan2, log, log10 is called with argument out of range. Add new error case for pow(+0,neg). * sysdeps/libm-ieee754/s_fpclassifyf.c: Correct recognition of NaN and +-inf. * sysdeps/libm-ieee754/s_fpclassifyl.c: Mask out explicit leading digit in stupid 80 bit formats. * sysdeps/libm-ieee754/s_isinf.c: Rewrite to return -1 for -inf. * sysdeps/libm-ieee754/s_isinff.c: Likewise. * sysdeps/libm-ieee754/s_isinfl.c: Likewise. * sysdeps/libm-ieee754/s_scalbnl.c (huge, tiny): Adapt values for long double type. * sysdeps/libm-ieee754/w_atan2.c: Do not raise exception expect when in SVID mode. * sysdeps/libm-ieee754/w_atan2f.c: Likewise. * sysdeps/libm-ieee754/w_atan2l.c: Likewise. * sysdeps/libm-ieee754/w_pow.c: Distinguish error cases for x is +0 or -0. * sysdeps/posix/isfdtype.c: Add cast to prevent warning. * sysdeps/stub/fcntlbits.h: Update copyright. * sysdeps/unix/bsd/fcntlbits.h: Likewise. * sysdeps/unix/bsd/bsd4.4/fcntlbits.h: Likewise. * sysdeps/unix/bsd/sun/sunos4/fcntlbits.h: Likewise. * sysdeps/unix/bsd/ultrix4/fcntlbits.h: Likewise. * sysdeps/unix/common/fcntlbits.h: Likewise. * sysdeps/unix/sysv/fcntlbits.h: Likewise. Define O_FSYNC as alias of O_SYNC. Add BSD compatibility macros FAPPEND, FFSYNC, FNONBLOCK, and FNDELAY. * sysdeps/unix/sysv/irix4/fcntlbits.h: Likewise. * sysdeps/unix/readdir_r.c: Don't copy whole `struct dirent' record, only reclen bytes. * sysdeps/unix/sysv/linux/fcntlbits.h [__USE_GNU]: Add O_READ, O_WRITE and O_NORW. * sysdeps/unix/sysv/linux/alpha/fcntlbits.h: Likewise. * sysdeps/unix/sysv/linux/init-first.h: Add copyright. * sysdeps/unix/sysv/linux/fxstat.c: New file. Rewrite kernel-level struct stat to user-level form. * sysdeps/unix/sysv/linux/lxstat: New file. * sysdeps/unix/sysv/linux/xstat: New file. * sysdeps/unix/sysv/linux/kernel_stat.h: Define struct stat used in kernel. * sysdeps/unix/sysv/linux/statbuf.h (struct stat): Change definition to use prescribed types for elements. (_STAT_VER): Change to value 3. * sysdeps/unix/sysv/linux/alph/statbuf.h: Likewise. * sysdeps/unix/sysv/linux/Dist: Add kernel_stat.h. * sysdeps/unix/sysv/linux/alpha/Dist: Likewise. * time/Makefile: Correct dependencies for test-tz. 1997-03-16 14:59 Philip Blundell <phil@london.uk.eu.org> * resolv/netdb.h: Add prototypes for gai_strerror and getnameinfo (needed for IPv6 basic sockets API). 1997-03-16 15:02 a sun <asun@zoology.washington.edu> * sysdeps/unix/sysv/linux/net/if_ppp.h: Don't use incompatible kernel header. * sysdeps/unix/sysv/linux/net/ppp_defs.h: Likewise. 1997-03-14 17:15 Ulrich Drepper <drepper@cygnus.com> * db/hash/hash_bigkey.c (__big_delete): Don't call __free_ovflpage without testing for last_bfp to be NULL. Reported by fabsoft@fabserver1.zarm.uni-bremen.de. 1997-03-13 11:42 Jim Meyering <meyering@asic.sc.ti.com> * time/mktime.c (TIME_T_MIN): Work around a bug in Cray C 5.0.3.0. 1997-03-14 04:00 Kurt Garloff <garloff@kg1.ping.de> * sysdeps/unix/sysv/linux/fcntlbits.h (O_FSYNC): Make alias for O_SYNC. (FASYNC): Move to __USE_BSD section. Create new macro O_ASYNC. 1997-03-14 02:50 Ulrich Drepper <drepper@cygnus.com> * nis/nss_nis/nis-hosts.c (_nss_nis_gethostbyname2_r): New functions. Compare result for correct address type. (_nss_nis_gethostbyname_r): Use _nss_nis_gethostbyname2_r. Reported by Mirko Streckenbach <mirko@marian.hil.de>. 1997-02-17 01:40 Zlatko Calusic <zcalusic@srce.hr> * time/strptime.c (recursive): Return rp to caller. (strptime_internal): First check for long names, then abbreviated (month & weekday). 1997-03-10 19:44 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de> * Makeconfig: Remove useless definitions of ASFLAGS-%. * config.make.in (ASFLAGS-.so): Remove. * configure.in: Don't substitute ASFLAGS_SO. * sysdeps/sparc/configure.in: Remove file. * sysdeps/sparc/Makefile (ASFLAGS-.so): Define. 1997-03-11 17:00 Andreas Schwab <schwab@issan.informatik.uni-dortmund.de> * time/strptime.c (strptime_internal) [case 'Y']: Always subtract 1900 from year, regardless of century. 1997-03-12 05:43 Ulrich Drepper <drepper@cygnus.com> * stdlib/strtod.c (_tens_in_limb) [BITS_PER_MP_LIMB > 32]: Make all numbers unsigned to make buggy gccs happy. Patch by Bryan W. Headley <bheadley@interaccess.com>. * sysdeps/unix/sysv/linux/netinet/ip.h: Add backward-compatibility definitions. Patch by a sun <asun@zoology.washington.edu>. Pretty print header. * Makerules (build-shlib): Also create symlink if library is versioned. based on a patch by H.J. Lu <hjl@gnu.ai.mit.edu>. Remove special rule to libc.so symlink. 1997-03-11 20:16 Andreas Jaeger <aj@arthur.pfalz.de> * manual/math.texi (Domain and Range Errors): Change descriptions according to recent changes for ISO C 9X. 1997-03-11 22:39 Ulrich Drepper <drepper@cygnus.com> * sysdeps/libm-ieee754/k_standard.c (__kernel_standard): Correct return values for acos, asin, and atan2. Reported by Andreas Jaeger <aj@arthur.pfalz.de>. 1997-03-10 18:16 Thorsten Kukuk <kukuk@vt.uni-paderborn.de> * ypclnt.c (__yp_bind): Fix possible buffer overflow. 1997-03-10 18:06 Bernd Schmidt <crux@Pool.Informatik.RWTH-Aachen.DE> * dirent/alphasort.c (alphasort): Interpret arguments as pointers to pointers to directory entries so that alphasort really can be used as argument for scandir. 1997-03-09 23:33 Andreas Jaeger <aj@arthur.pfalz.de> * string/strdup.c: Declare memcpy if !(_LIBC || STDC_HEADERS) instead of strcpy. 1997-03-10 03:34 Ulrich Drepper <drepper@cygnus.com> * catgets/catgets.c (catopen): Always add NLSPATH to search path for catalogs, not only if the envvar NLSPATH is not available. Reported by Andries.Brouwer@cwi.nl. 1997-03-10 02:46 Ulrich Drepper <drepper@cygnus.com> * Makeconfig (localtime-file): Don't define using installation directory. (inst_localtime-file): New variable. * time/Makefile (installed-localtime-file): Use inst_localtime-file. Reported by Edward Seidl <seidl@janed.com>. 1997-03-10 02:31 H.J. Lu <hjl@gnu.ai.mit.edu> * time/Makefile: Add source files to dependencies for test data. 1997-03-09 22:53 Thorsten Kukuk <kukuk@weber.uni-paderborn.de> * nis/nss_nis/nis-ethers.c: Don't ignore return value of yp_all. * nis/nss_nis/nis-proto.c: Likewise. * nis/nss_nis/nis-rpc.c: Likewise. * nis/nss_nis/nis-service.c: Likewise. 1997-03-08 14:37 Miguel de Icaza <miguel@nuclecu.unam.mx> * sysdeps/sparc/dl-machine.h (elf_machine_rela): Upgrade to versioning; Added missing R_SPARC_WDISP30 handling. (RTLD_START): Implement it. * sysdeps/unix/sysv/linux/sparc/brk.c: Fix. * sysdeps/unix/sysv/linux/sparc/start.c: Startup code for Linux/SPARC. 1997-03-02 18:06 Miguel de Icaza <miguel@nuclecu.unam.mx> * sysdeps/sparc/dl-machine.h (RTLD_START): Make arg as expected by the dynamic linker instead of having a new conditional define. Thanks to Richard Henderson for pointing this out. * elf/rtld.c: Remove usage of ELF_ADJUST_ARG. 1997-03-20 20:44 Thomas Bushnell, n/BSG <thomas@gnu.ai.mit.edu> * sysdeps/mach/hurd/euidaccess.c: Define as __euidaccess and make euidaccess weak alias. 1997-03-07 10:30 Thomas Bushnell, n/BSG <thomas@gnu.ai.mit.edu> * stdio-common/printf_fphex.c (MIN): New macro. * sysdeps/generic/netinet/in.h: Include <sys/types.h>. * sysdeps/generic/sys/mman.h (msync): Mention third arg. * sysdeps/generic/netinet/in.h: Add definitions for IPv6 basic API. (See change by Philip Blundell on Feb 16, 1997.) 1997-03-05 10:40 Thomas Bushnell, n/BSG <thomas@gnu.ai.mit.edu> * hurd/hurd.h (vpprintf): Include <stdarg.h>. New declaration. * hurd/set-host.c (_hurd_set_host_config): Cast second arg to __file_name_split. * mach/mach_error.c (mach_error_string_int): Give full prototype. * mach/errstring.c (mach_error_string_int): Likewise. * mach/error_compat.c (__mach_error_map_compat): Likewise. * hurd/vpprintf.c (pwrite, vpprintf): Likewise. * stdio/vasprintf.c (vasprintf): Likewise. * mach/mach/mach_traps.h: Include <mach/kern_return.h>. * mach/spin-solid.c: Include <mach/mach_traps.h>. * mach/spin-solid.c (__spin_lock_solid): Provide arg to swtch_pri. * mach/mach_init.c: Include <mach/mig_support.h>. * mach/mach_error.h (mach_error_string, mach_error, mach_error_type): Always provide prototypes. * mach/mach/error.h (mach_error_fn_t): Comment out declaration; it appears to be entirely unused dead code. * stdio/stdio.h (freopen): Fix spelling error. 1997-03-02 13:38 Miles Bader <miles@gnu.ai.mit.edu> * string/argz.h (__need_error_t): New macro, before including <errno.h> [!__const] (__const): New macro. [!__error_t_defined] (error_t): New typedef. * sysdeps/generic/socketbits.h: Add PF_FILE as synonym for PF_LOCAL * sysdeps/unix/sysv/linux/socketbits.h: Likewise.
871 lines
21 KiB
C
871 lines
21 KiB
C
/* Copyright (C) 1996, 1997 Free Software Foundation, Inc.
|
|
This file is part of the GNU C Library.
|
|
Contributed by Thorsten Kukuk <kukuk@vt.uni-paderborn.de>, 1996.
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Library General Public License as
|
|
published by the Free Software Foundation; either version 2 of the
|
|
License, or (at your option) any later version.
|
|
|
|
The GNU C Library is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Library General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Library General Public
|
|
License along with the GNU C Library; see the file COPYING.LIB. If not,
|
|
write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
Boston, MA 02111-1307, USA. */
|
|
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
#include <fcntl.h>
|
|
#include <libc-lock.h>
|
|
#include <rpcsvc/yp.h>
|
|
#include <rpcsvc/ypclnt.h>
|
|
#include <rpcsvc/ypupd.h>
|
|
|
|
struct dom_binding
|
|
{
|
|
struct dom_binding *dom_pnext;
|
|
char dom_domain[YPMAXDOMAIN + 1];
|
|
struct sockaddr_in dom_server_addr;
|
|
int dom_socket;
|
|
CLIENT *dom_client;
|
|
long int dom_vers;
|
|
};
|
|
typedef struct dom_binding dom_binding;
|
|
|
|
static struct timeval TIMEOUT = {25, 0};
|
|
static int const MAXTRIES = 5;
|
|
static char __ypdomainname[MAXHOSTNAMELEN + 1] = "\0";
|
|
__libc_lock_define_initialized (static, ypbindlist_lock)
|
|
static dom_binding *__ypbindlist = NULL;
|
|
|
|
|
|
static int
|
|
__yp_bind (const char *domain, dom_binding ** ypdb)
|
|
{
|
|
struct sockaddr_in clnt_saddr;
|
|
struct ypbind_resp ypbr;
|
|
dom_binding *ysd;
|
|
int clnt_sock;
|
|
CLIENT *client;
|
|
int is_new = 0;
|
|
int try;
|
|
|
|
if (ypdb != NULL)
|
|
*ypdb = NULL;
|
|
|
|
if ((domain == NULL) || (strlen (domain) == 0))
|
|
return YPERR_BADARGS;
|
|
|
|
ysd = __ypbindlist;
|
|
while (ysd != NULL)
|
|
{
|
|
if (strcmp (domain, ysd->dom_domain) == 0)
|
|
break;
|
|
ysd = ysd->dom_pnext;
|
|
}
|
|
|
|
if (ysd == NULL)
|
|
{
|
|
is_new = 1;
|
|
ysd = (dom_binding *) malloc (sizeof *ysd);
|
|
memset (ysd, '\0', sizeof *ysd);
|
|
ysd->dom_socket = -1;
|
|
ysd->dom_vers = -1;
|
|
}
|
|
|
|
try = 0;
|
|
|
|
do
|
|
{
|
|
try++;
|
|
if (try > MAXTRIES)
|
|
{
|
|
if (is_new)
|
|
free (ysd);
|
|
return YPERR_YPBIND;
|
|
}
|
|
|
|
if (ysd->dom_vers == -1)
|
|
{
|
|
if(ysd->dom_client)
|
|
{
|
|
clnt_destroy(ysd->dom_client);
|
|
ysd->dom_client = NULL;
|
|
ysd->dom_socket = -1;
|
|
}
|
|
memset (&clnt_saddr, '\0', sizeof clnt_saddr);
|
|
clnt_saddr.sin_family = AF_INET;
|
|
clnt_saddr.sin_addr.s_addr = htonl (INADDR_LOOPBACK);
|
|
clnt_sock = RPC_ANYSOCK;
|
|
client = clnttcp_create (&clnt_saddr, YPBINDPROG, YPBINDVERS,
|
|
&clnt_sock, 0, 0);
|
|
if (client == NULL)
|
|
{
|
|
if (is_new)
|
|
free (ysd);
|
|
return YPERR_YPBIND;
|
|
}
|
|
/*
|
|
** Check the port number -- should be < IPPORT_RESERVED.
|
|
** If not, it's possible someone has registered a bogus
|
|
** ypbind with the portmapper and is trying to trick us.
|
|
*/
|
|
if (ntohs(clnt_saddr.sin_port) >= IPPORT_RESERVED)
|
|
{
|
|
clnt_destroy(client);
|
|
if (is_new)
|
|
free(ysd);
|
|
return(YPERR_YPBIND);
|
|
}
|
|
|
|
if (clnt_call (client, YPBINDPROC_DOMAIN,
|
|
(xdrproc_t) xdr_domainname, &domain,
|
|
(xdrproc_t) xdr_ypbind_resp,
|
|
&ypbr, TIMEOUT) != RPC_SUCCESS)
|
|
{
|
|
clnt_destroy (client);
|
|
if (is_new)
|
|
free (ysd);
|
|
return YPERR_YPBIND;
|
|
}
|
|
|
|
clnt_destroy (client);
|
|
if (ypbr.ypbind_status != YPBIND_SUCC_VAL)
|
|
{
|
|
switch (ypbr.ypbind_resp_u.ypbind_error)
|
|
{
|
|
case YPBIND_ERR_ERR:
|
|
fputs (_("YPBINDPROC_DOMAIN: Internal error\n"), stderr);
|
|
break;
|
|
case YPBIND_ERR_NOSERV:
|
|
fprintf (stderr,
|
|
_("YPBINDPROC_DOMAIN: No server for domain %s\n"),
|
|
domain);
|
|
break;
|
|
case YPBIND_ERR_RESC:
|
|
fputs (_("YPBINDPROC_DOMAIN: Resource allocation failure\n"),
|
|
stderr);
|
|
break;
|
|
default:
|
|
fputs (_("YPBINDPROC_DOMAIN: Unknown error\n"), stderr);
|
|
break;
|
|
}
|
|
if (is_new)
|
|
free (ysd);
|
|
return YPERR_DOMAIN;
|
|
}
|
|
memset (&ysd->dom_server_addr, '\0', sizeof ysd->dom_server_addr);
|
|
ysd->dom_server_addr.sin_family = AF_INET;
|
|
memcpy (&ysd->dom_server_addr.sin_port,
|
|
ypbr.ypbind_resp_u.ypbind_bindinfo.ypbind_binding_port,
|
|
sizeof (ysd->dom_server_addr.sin_port));
|
|
memcpy (&ysd->dom_server_addr.sin_addr.s_addr,
|
|
ypbr.ypbind_resp_u.ypbind_bindinfo.ypbind_binding_addr,
|
|
sizeof (ysd->dom_server_addr.sin_addr.s_addr));
|
|
ysd->dom_vers = YPVERS;
|
|
strncpy (ysd->dom_domain, domain, YPMAXDOMAIN);
|
|
ysd->dom_domain[YPMAXDOMAIN] = '\0';
|
|
}
|
|
|
|
if (ysd->dom_client)
|
|
clnt_destroy (ysd->dom_client);
|
|
ysd->dom_socket = RPC_ANYSOCK;
|
|
ysd->dom_client = clntudp_create (&ysd->dom_server_addr, YPPROG, YPVERS,
|
|
TIMEOUT, &ysd->dom_socket);
|
|
if (ysd->dom_client == NULL)
|
|
ysd->dom_vers = -1;
|
|
|
|
}
|
|
while (ysd->dom_client == NULL);
|
|
|
|
/* If the program exists, close the socket */
|
|
if (fcntl (ysd->dom_socket, F_SETFD, 1) == -1)
|
|
perror (_("fcntl: F_SETFD"));
|
|
|
|
if (is_new)
|
|
{
|
|
ysd->dom_pnext = __ypbindlist;
|
|
__ypbindlist = ysd;
|
|
}
|
|
|
|
if (NULL != ypdb)
|
|
*ypdb = ysd;
|
|
|
|
return YPERR_SUCCESS;
|
|
}
|
|
|
|
static void
|
|
__yp_unbind (dom_binding *ydb)
|
|
{
|
|
clnt_destroy (ydb->dom_client);
|
|
ydb->dom_client = NULL;
|
|
ydb->dom_socket = -1;
|
|
}
|
|
|
|
static int
|
|
do_ypcall (const char *domain, u_long prog, xdrproc_t xargs,
|
|
caddr_t req, xdrproc_t xres, caddr_t resp)
|
|
{
|
|
dom_binding *ydb = NULL;
|
|
int try, result;
|
|
|
|
try = 0;
|
|
result = YPERR_YPERR;
|
|
|
|
while (try < MAXTRIES && result != RPC_SUCCESS)
|
|
{
|
|
__libc_lock_lock (ypbindlist_lock);
|
|
|
|
if (__yp_bind (domain, &ydb) != 0)
|
|
{
|
|
__libc_lock_unlock (ypbindlist_lock);
|
|
return YPERR_DOMAIN;
|
|
}
|
|
|
|
result = clnt_call (ydb->dom_client, prog,
|
|
xargs, req, xres, resp, TIMEOUT);
|
|
|
|
if (result != RPC_SUCCESS)
|
|
{
|
|
clnt_perror (ydb->dom_client, "do_ypcall: clnt_call");
|
|
ydb->dom_vers = -1;
|
|
__yp_unbind (ydb);
|
|
result = YPERR_RPC;
|
|
}
|
|
|
|
__libc_lock_unlock (ypbindlist_lock);
|
|
|
|
try++;
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
int
|
|
yp_bind (const char *indomain)
|
|
{
|
|
int status;
|
|
|
|
__libc_lock_lock (ypbindlist_lock);
|
|
|
|
status = __yp_bind (indomain, NULL);
|
|
|
|
__libc_lock_unlock (ypbindlist_lock);
|
|
|
|
return status;
|
|
}
|
|
|
|
void
|
|
yp_unbind (const char *indomain)
|
|
{
|
|
dom_binding *ydbptr, *ydbptr2;
|
|
|
|
__libc_lock_lock (ypbindlist_lock);
|
|
|
|
ydbptr2 = NULL;
|
|
ydbptr = __ypbindlist;
|
|
while (ydbptr != NULL)
|
|
{
|
|
if (strcmp (ydbptr->dom_domain, indomain) == 0)
|
|
{
|
|
dom_binding *work;
|
|
|
|
work = ydbptr;
|
|
if (ydbptr2 == NULL)
|
|
__ypbindlist = __ypbindlist->dom_pnext;
|
|
else
|
|
ydbptr2 = ydbptr->dom_pnext;
|
|
__yp_unbind (work);
|
|
free (work);
|
|
break;
|
|
}
|
|
ydbptr2 = ydbptr;
|
|
ydbptr = ydbptr->dom_pnext;
|
|
}
|
|
|
|
__libc_lock_unlock (ypbindlist_lock);
|
|
|
|
return;
|
|
}
|
|
|
|
__libc_lock_define_initialized (static, domainname_lock)
|
|
|
|
int
|
|
yp_get_default_domain (char **outdomain)
|
|
{
|
|
int result = YPERR_SUCCESS;;
|
|
*outdomain = NULL;
|
|
|
|
__libc_lock_lock (domainname_lock);
|
|
|
|
if (__ypdomainname[0] == '\0')
|
|
{
|
|
if (getdomainname (__ypdomainname, MAXHOSTNAMELEN))
|
|
result = YPERR_NODOM;
|
|
else
|
|
*outdomain = __ypdomainname;
|
|
}
|
|
else
|
|
*outdomain = __ypdomainname;
|
|
|
|
__libc_lock_unlock (domainname_lock);
|
|
|
|
return result;
|
|
}
|
|
|
|
int
|
|
__yp_check (char **domain)
|
|
{
|
|
char *unused;
|
|
|
|
if (__ypdomainname[0] == '\0')
|
|
if (yp_get_default_domain (&unused))
|
|
return 0;
|
|
else if (strcmp (__ypdomainname, "(none)") == 0)
|
|
return 0;
|
|
|
|
if (domain)
|
|
*domain = __ypdomainname;
|
|
|
|
if (yp_bind (__ypdomainname) == 0)
|
|
return 1;
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
yp_match (const char *indomain, const char *inmap, const char *inkey,
|
|
const int inkeylen, char **outval, int *outvallen)
|
|
{
|
|
ypreq_key req;
|
|
ypresp_val resp;
|
|
int result;
|
|
|
|
if (indomain == NULL || indomain[0] == '\0' ||
|
|
inmap == NULL || inmap[0] == '\0' ||
|
|
inkey == NULL || inkey[0] == '\0' || inkeylen <= 0)
|
|
return YPERR_BADARGS;
|
|
|
|
req.domain = (char *) indomain;
|
|
req.map = (char *) inmap;
|
|
req.key.keydat_val = (char *) inkey;
|
|
req.key.keydat_len = inkeylen;
|
|
|
|
*outval = NULL;
|
|
*outvallen = 0;
|
|
memset (&resp, '\0', sizeof (resp));
|
|
|
|
result = do_ypcall (indomain, YPPROC_MATCH, (xdrproc_t) xdr_ypreq_key,
|
|
(caddr_t) & req, (xdrproc_t) xdr_ypresp_val,
|
|
(caddr_t) & resp);
|
|
|
|
if (result != RPC_SUCCESS)
|
|
return result;
|
|
if (resp.stat != YP_TRUE)
|
|
return ypprot_err (resp.stat);
|
|
|
|
*outvallen = resp.val.valdat_len;
|
|
*outval = malloc (*outvallen + 1);
|
|
memcpy (*outval, resp.val.valdat_val, *outvallen);
|
|
(*outval)[*outvallen] = '\0';
|
|
|
|
xdr_free ((xdrproc_t) xdr_ypresp_val, (char *) &resp);
|
|
|
|
return YPERR_SUCCESS;
|
|
}
|
|
|
|
int
|
|
yp_first (const char *indomain, const char *inmap, char **outkey,
|
|
int *outkeylen, char **outval, int *outvallen)
|
|
{
|
|
ypreq_nokey req;
|
|
ypresp_key_val resp;
|
|
int result;
|
|
|
|
if (indomain == NULL || indomain[0] == '\0' ||
|
|
inmap == NULL || inmap[0] == '\0')
|
|
return YPERR_BADARGS;
|
|
|
|
req.domain = (char *) indomain;
|
|
req.map = (char *) inmap;
|
|
|
|
*outkey = *outval = NULL;
|
|
*outkeylen = *outvallen = 0;
|
|
memset (&resp, '\0', sizeof (resp));
|
|
|
|
result = do_ypcall (indomain, YPPROC_FIRST, (xdrproc_t) xdr_ypreq_nokey,
|
|
(caddr_t) & req, (xdrproc_t) xdr_ypresp_key_val,
|
|
(caddr_t) & resp);
|
|
|
|
if (result != RPC_SUCCESS)
|
|
return result;
|
|
if (resp.stat != YP_TRUE)
|
|
return ypprot_err (resp.stat);
|
|
|
|
*outkeylen = resp.key.keydat_len;
|
|
*outkey = malloc (*outkeylen + 1);
|
|
memcpy (*outkey, resp.key.keydat_val, *outkeylen);
|
|
(*outkey)[*outkeylen] = '\0';
|
|
*outvallen = resp.val.valdat_len;
|
|
*outval = malloc (*outvallen + 1);
|
|
memcpy (*outval, resp.val.valdat_val, *outvallen);
|
|
(*outval)[*outvallen] = '\0';
|
|
|
|
xdr_free ((xdrproc_t) xdr_ypresp_key_val, (char *) &resp);
|
|
|
|
return YPERR_SUCCESS;
|
|
}
|
|
|
|
int
|
|
yp_next (const char *indomain, const char *inmap, const char *inkey,
|
|
const int inkeylen, char **outkey, int *outkeylen, char **outval,
|
|
int *outvallen)
|
|
{
|
|
ypreq_key req;
|
|
ypresp_key_val resp;
|
|
int result;
|
|
|
|
if (indomain == NULL || indomain[0] == '\0' ||
|
|
inmap == NULL || inmap[0] == '\0' ||
|
|
inkeylen <= 0 || inkey == NULL || inkey[0] == '\0')
|
|
return YPERR_BADARGS;
|
|
|
|
req.domain = (char *) indomain;
|
|
req.map = (char *) inmap;
|
|
req.key.keydat_val = (char *) inkey;
|
|
req.key.keydat_len = inkeylen;
|
|
|
|
*outkey = *outval = NULL;
|
|
*outkeylen = *outvallen = 0;
|
|
memset (&resp, '\0', sizeof (resp));
|
|
|
|
result = do_ypcall (indomain, YPPROC_NEXT, (xdrproc_t) xdr_ypreq_key,
|
|
(caddr_t) & req, (xdrproc_t) xdr_ypresp_key_val,
|
|
(caddr_t) & resp);
|
|
|
|
if (result != RPC_SUCCESS)
|
|
return result;
|
|
if (resp.stat != YP_TRUE)
|
|
return ypprot_err (resp.stat);
|
|
|
|
*outkeylen = resp.key.keydat_len;
|
|
*outkey = malloc (*outkeylen + 1);
|
|
memcpy (*outkey, resp.key.keydat_val, *outkeylen);
|
|
(*outkey)[*outkeylen] = '\0';
|
|
*outvallen = resp.val.valdat_len;
|
|
*outval = malloc (*outvallen + 1);
|
|
memcpy (*outval, resp.val.valdat_val, *outvallen);
|
|
(*outval)[*outvallen] = '\0';
|
|
|
|
xdr_free ((xdrproc_t) xdr_ypresp_key_val, (char *) &resp);
|
|
|
|
return YPERR_SUCCESS;
|
|
}
|
|
|
|
int
|
|
yp_master (const char *indomain, const char *inmap, char **outname)
|
|
{
|
|
ypreq_nokey req;
|
|
ypresp_master resp;
|
|
int result;
|
|
|
|
if (indomain == NULL || indomain[0] == '\0' ||
|
|
inmap == NULL || inmap[0] == '\0')
|
|
return YPERR_BADARGS;
|
|
|
|
req.domain = (char *) indomain;
|
|
req.map = (char *) inmap;
|
|
|
|
memset (&resp, '\0', sizeof (ypresp_master));
|
|
|
|
result = do_ypcall (indomain, YPPROC_MASTER, (xdrproc_t) xdr_ypreq_nokey,
|
|
(caddr_t) & req, (xdrproc_t) xdr_ypresp_master, (caddr_t) & resp);
|
|
|
|
if (result != RPC_SUCCESS)
|
|
return result;
|
|
if (resp.stat != YP_TRUE)
|
|
return ypprot_err (resp.stat);
|
|
|
|
*outname = strdup (resp.peer);
|
|
xdr_free ((xdrproc_t) xdr_ypresp_master, (char *) &resp);
|
|
|
|
return YPERR_SUCCESS;
|
|
}
|
|
|
|
int
|
|
yp_order (const char *indomain, const char *inmap, unsigned int *outorder)
|
|
{
|
|
struct ypreq_nokey req;
|
|
struct ypresp_order resp;
|
|
int result;
|
|
|
|
if (indomain == NULL || indomain[0] == '\0' ||
|
|
inmap == NULL || inmap == '\0')
|
|
return YPERR_BADARGS;
|
|
|
|
req.domain = (char *) indomain;
|
|
req.map = (char *) inmap;
|
|
|
|
memset (&resp, '\0', sizeof (resp));
|
|
|
|
result = do_ypcall (indomain, YPPROC_ORDER, (xdrproc_t) xdr_ypreq_nokey,
|
|
(caddr_t) & req, (xdrproc_t) xdr_ypresp_order, (caddr_t) & resp);
|
|
|
|
if (result != RPC_SUCCESS)
|
|
return result;
|
|
if (resp.stat != YP_TRUE)
|
|
return ypprot_err (resp.stat);
|
|
|
|
*outorder = resp.ordernum;
|
|
xdr_free ((xdrproc_t) xdr_ypresp_order, (char *) &resp);
|
|
|
|
return YPERR_SUCCESS;
|
|
}
|
|
|
|
static void *ypall_data;
|
|
static int (*ypall_foreach) ();
|
|
|
|
static bool_t
|
|
__xdr_ypresp_all (XDR * xdrs, u_long * objp)
|
|
{
|
|
while (1)
|
|
{
|
|
struct ypresp_all resp;
|
|
|
|
memset (&resp, '\0', sizeof (struct ypresp_all));
|
|
if (!xdr_ypresp_all (xdrs, &resp))
|
|
{
|
|
xdr_free ((xdrproc_t) xdr_ypresp_all, (char *) &resp);
|
|
*objp = YP_YPERR;
|
|
return (FALSE);
|
|
}
|
|
if (resp.more == 0)
|
|
{
|
|
xdr_free ((xdrproc_t) xdr_ypresp_all, (char *) &resp);
|
|
*objp = YP_NOMORE;
|
|
return (FALSE);
|
|
}
|
|
|
|
switch (resp.ypresp_all_u.val.stat)
|
|
{
|
|
case YP_TRUE:
|
|
{
|
|
char key[resp.ypresp_all_u.val.key.keydat_len + 1];
|
|
char val[resp.ypresp_all_u.val.val.valdat_len + 1];
|
|
int keylen = resp.ypresp_all_u.val.key.keydat_len;
|
|
int vallen = resp.ypresp_all_u.val.val.valdat_len;
|
|
|
|
*objp = YP_TRUE;
|
|
memcpy (key, resp.ypresp_all_u.val.key.keydat_val, keylen);
|
|
key[keylen] = '\0';
|
|
memcpy (val, resp.ypresp_all_u.val.val.valdat_val, vallen);
|
|
val[vallen] = '\0';
|
|
xdr_free ((xdrproc_t) xdr_ypresp_all, (char *) &resp);
|
|
if ((*ypall_foreach) (*objp, key, keylen,
|
|
val, vallen, ypall_data))
|
|
return TRUE;
|
|
}
|
|
break;
|
|
case YP_NOMORE:
|
|
*objp = YP_NOMORE;
|
|
xdr_free ((xdrproc_t) xdr_ypresp_all, (char *) &resp);
|
|
return TRUE;
|
|
break;
|
|
default:
|
|
*objp = resp.ypresp_all_u.val.stat;
|
|
xdr_free ((xdrproc_t) xdr_ypresp_all, (char *) &resp);
|
|
return TRUE;
|
|
}
|
|
}
|
|
}
|
|
|
|
int
|
|
yp_all (const char *indomain, const char *inmap,
|
|
const struct ypall_callback *incallback)
|
|
{
|
|
struct ypreq_nokey req;
|
|
dom_binding *ydb;
|
|
int try, result;
|
|
struct sockaddr_in clnt_sin;
|
|
CLIENT *clnt;
|
|
unsigned long status;
|
|
int clnt_sock;
|
|
|
|
if (indomain == NULL || indomain[0] == '\0' ||
|
|
inmap == NULL || inmap == '\0')
|
|
return YPERR_BADARGS;
|
|
|
|
try = 0;
|
|
result = YPERR_YPERR;
|
|
|
|
while (try < MAXTRIES && result != RPC_SUCCESS)
|
|
{
|
|
__libc_lock_lock (ypbindlist_lock);
|
|
|
|
if (__yp_bind (indomain, &ydb) != 0)
|
|
{
|
|
__libc_lock_unlock (ypbindlist_lock);
|
|
return YPERR_DOMAIN;
|
|
}
|
|
|
|
/* YPPROC_ALL get its own TCP channel to ypserv */
|
|
clnt_sock = RPC_ANYSOCK;
|
|
clnt_sin = ydb->dom_server_addr;
|
|
clnt_sin.sin_port = 0;
|
|
clnt = clnttcp_create (&clnt_sin, YPPROG, YPVERS, &clnt_sock, 0, 0);
|
|
if (clnt == NULL)
|
|
{
|
|
puts ("yp_all: clnttcp_create failed");
|
|
__libc_lock_unlock (ypbindlist_lock);
|
|
return YPERR_PMAP;
|
|
}
|
|
req.domain = (char *) indomain;
|
|
req.map = (char *) inmap;
|
|
|
|
ypall_foreach = incallback->foreach;
|
|
ypall_data = (void *) incallback->data;
|
|
|
|
result = clnt_call (clnt, YPPROC_ALL, (xdrproc_t) xdr_ypreq_nokey, &req,
|
|
(xdrproc_t) __xdr_ypresp_all, &status, TIMEOUT);
|
|
|
|
if (result != RPC_SUCCESS)
|
|
{
|
|
clnt_perror (ydb->dom_client, "yp_all: clnt_call");
|
|
clnt_destroy (clnt);
|
|
__yp_unbind (ydb);
|
|
result = YPERR_RPC;
|
|
}
|
|
else
|
|
{
|
|
clnt_destroy (clnt);
|
|
result = YPERR_SUCCESS;
|
|
}
|
|
|
|
__libc_lock_unlock (ypbindlist_lock);
|
|
|
|
if (status != YP_NOMORE)
|
|
return ypprot_err (status);
|
|
try++;
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
int
|
|
yp_maplist (const char *indomain, struct ypmaplist **outmaplist)
|
|
{
|
|
struct ypresp_maplist resp;
|
|
int result;
|
|
|
|
if (indomain == NULL || indomain[0] == '\0')
|
|
return YPERR_BADARGS;
|
|
|
|
memset (&resp, '\0', sizeof (resp));
|
|
|
|
result = do_ypcall (indomain, YPPROC_MAPLIST, (xdrproc_t) xdr_domainname,
|
|
(caddr_t) & indomain, (xdrproc_t) xdr_ypresp_maplist, (caddr_t) & resp);
|
|
|
|
if (result != RPC_SUCCESS)
|
|
return result;
|
|
if (resp.stat != YP_TRUE)
|
|
return ypprot_err (resp.stat);
|
|
|
|
*outmaplist = resp.maps;
|
|
/* We give the list not free, this will be done by ypserv
|
|
xdr_free((xdrproc_t)xdr_ypresp_maplist, (char *)&resp); */
|
|
|
|
return YPERR_SUCCESS;
|
|
}
|
|
|
|
const char *
|
|
yperr_string (const int error)
|
|
{
|
|
switch (error)
|
|
{
|
|
case YPERR_SUCCESS:
|
|
return _("Success");
|
|
case YPERR_BADARGS:
|
|
return _("Request arguments bad");
|
|
case YPERR_RPC:
|
|
return _("RPC failure on NIS operation");
|
|
case YPERR_DOMAIN:
|
|
return _("Can't bind to server which serves this domain");
|
|
case YPERR_MAP:
|
|
return _("No such map in server's domain");
|
|
case YPERR_KEY:
|
|
return _("No such key in map");
|
|
case YPERR_YPERR:
|
|
return _("Internal NIS error");
|
|
case YPERR_RESRC:
|
|
return _("Local resource allocation failure");
|
|
case YPERR_NOMORE:
|
|
return _("No more records in map database");
|
|
case YPERR_PMAP:
|
|
return _("Can't communicate with portmapper");
|
|
case YPERR_YPBIND:
|
|
return _("Can't communicate with ypbind");
|
|
case YPERR_YPSERV:
|
|
return _("Can't communicate with ypserv");
|
|
case YPERR_NODOM:
|
|
return _("Local domain name not set");
|
|
case YPERR_BADDB:
|
|
return _("NIS map data base is bad");
|
|
case YPERR_VERS:
|
|
return _("NIS client/server version mismatch - can't supply service");
|
|
case YPERR_ACCESS:
|
|
return _("Permission denied");
|
|
case YPERR_BUSY:
|
|
return _("Database is busy");
|
|
}
|
|
return _("Unknown NIS error code");
|
|
}
|
|
|
|
int
|
|
ypprot_err (const int code)
|
|
{
|
|
switch (code)
|
|
{
|
|
case YP_TRUE:
|
|
return YPERR_SUCCESS;
|
|
case YP_NOMORE:
|
|
return YPERR_NOMORE;
|
|
case YP_FALSE:
|
|
return YPERR_YPERR;
|
|
case YP_NOMAP:
|
|
return YPERR_MAP;
|
|
case YP_NODOM:
|
|
return YPERR_DOMAIN;
|
|
case YP_NOKEY:
|
|
return YPERR_KEY;
|
|
case YP_BADOP:
|
|
return YPERR_YPERR;
|
|
case YP_BADDB:
|
|
return YPERR_BADDB;
|
|
case YP_YPERR:
|
|
return YPERR_YPERR;
|
|
case YP_BADARGS:
|
|
return YPERR_BADARGS;
|
|
case YP_VERS:
|
|
return YPERR_VERS;
|
|
}
|
|
return YPERR_YPERR;
|
|
}
|
|
|
|
const char *
|
|
ypbinderr_string (const int error)
|
|
{
|
|
switch (error)
|
|
{
|
|
case 0:
|
|
return _("Success");
|
|
case YPBIND_ERR_ERR:
|
|
return _("Internal ypbind error");
|
|
case YPBIND_ERR_NOSERV:
|
|
return _("Domain not bound");
|
|
case YPBIND_ERR_RESC:
|
|
return _("System resource allocation failure");
|
|
default:
|
|
return _("Unknown ypbind error");
|
|
}
|
|
}
|
|
|
|
|
|
#define WINDOW 60
|
|
|
|
int
|
|
yp_update (char *domain, char *map, unsigned ypop,
|
|
char *key, int keylen, char *data, int datalen)
|
|
{
|
|
#if 0
|
|
union
|
|
{
|
|
ypupdate_args update_args;
|
|
ypdelete_args delete_args;
|
|
}
|
|
args;
|
|
xdrproc_t xdr_argument;
|
|
unsigned res = 0;
|
|
CLIENT *clnt;
|
|
char *master;
|
|
struct sockaddr saddr;
|
|
char servername[MAXNETNAMELEN + 1];
|
|
int r;
|
|
|
|
if (!domain || !map || !key || (ypop != YPOP_DELETE && !data))
|
|
return YPERR_BADARGS;
|
|
|
|
args.update_args.mapname = map;
|
|
args.update_args.key.yp_buf_len = keylen;
|
|
args.update_args.key.yp_buf_val = key;
|
|
args.update_args.datum.yp_buf_len = datalen;
|
|
args.update_args.datum.yp_buf_val = data;
|
|
|
|
if ((r = yp_master (domain, map, &master)) != 0)
|
|
return r;
|
|
|
|
if (!host2netname (servername, master, domain))
|
|
{
|
|
fputs (_("yp_update: cannot convert host to netname\n"), stderr);
|
|
return YPERR_YPERR;
|
|
}
|
|
|
|
if ((clnt = clnt_create (master, YPU_PROG, YPU_VERS, "tcp")) == NULL)
|
|
{
|
|
clnt_pcreateerror ("yp_update: clnt_create");
|
|
return YPERR_RPC;
|
|
}
|
|
|
|
if (!clnt_control (clnt, CLGET_SERVER_ADDR, (char *) &saddr))
|
|
{
|
|
fputs (_("yp_update: cannot get server address\n"), stderr);
|
|
return YPERR_RPC;
|
|
}
|
|
|
|
switch (ypop)
|
|
{
|
|
case YPOP_CHANGE:
|
|
case YPOP_INSERT:
|
|
case YPOP_STORE:
|
|
xdr_argument = (xdrproc_t) xdr_ypupdate_args;
|
|
break;
|
|
case YPOP_DELETE:
|
|
xdr_argument = (xdrproc_t) xdr_ypdelete_args;
|
|
break;
|
|
default:
|
|
return YPERR_BADARGS;
|
|
break;
|
|
}
|
|
|
|
clnt->cl_auth = authdes_create (servername, WINDOW, &saddr, NULL);
|
|
|
|
if (clnt->cl_auth == NULL)
|
|
clnt->cl_auth = authunix_create_default ();
|
|
|
|
again:
|
|
r = clnt_call (clnt, ypop, xdr_argument, &args,
|
|
(xdrproc_t) xdr_u_int, &res, TIMEOUT);
|
|
|
|
if (r == RPC_AUTHERROR)
|
|
{
|
|
if (clnt->cl_auth->ah_cred.oa_flavor == AUTH_DES)
|
|
{
|
|
clnt->cl_auth = authunix_create_default ();
|
|
goto again;
|
|
}
|
|
else
|
|
return YPERR_ACCESS;
|
|
}
|
|
if (r != RPC_SUCCESS)
|
|
{
|
|
clnt_perror (clnt, "yp_update: clnt_call");
|
|
return YPERR_RPC;
|
|
}
|
|
return res;
|
|
#else
|
|
return YPERR_YPERR;
|
|
#endif
|
|
}
|