-/* Copyright (C) 1996, 1997, 1998 Free Software Foundation, Inc.
+/* Copyright (C) 1996-2022 Free Software Foundation, Inc.
This file is part of the GNU C Library.
- Contributed by Ulrich Drepper <drepper@cygnus.com>, 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.
+ modify it under the terms of the GNU Lesser General Public
+ License as published by the Free Software Foundation; either
+ version 2.1 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.
+ Lesser 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. */
+ You should have received a copy of the GNU Lesser General Public
+ License along with the GNU C Library; if not, see
+ <https://www.gnu.org/licenses/>. */
#include <errno.h>
-#include <bits/libc-lock.h>
+#include <libc-lock.h>
#include "nsswitch.h"
#define INTERNAL(Name) CONCAT2_2 (__, Name)
#define CONCAT2_1(Pre, Post) CONCAT2_2 (Pre, Post)
#define CONCAT2_2(Pre, Post) Pre##Post
+#define NEW(name) NEW1 (name)
+#define NEW1(name) __new_##name
#define SETFUNC_NAME_STRING STRINGIZE (SETFUNC_NAME)
#define GETFUNC_NAME_STRING STRINGIZE (REENTRANT_GETNAME)
#define STRINGIZE(Name) STRINGIZE1 (Name)
#define STRINGIZE1(Name) #Name
-#define DB_LOOKUP_FCT CONCAT3_1 (__nss_, DATABASE_NAME, _lookup)
-#define CONCAT3_1(Pre, Name, Post) CONCAT3_2 (Pre, Name, Post)
-#define CONCAT3_2(Pre, Name, Post) Pre##Name##Post
+#ifndef DB_LOOKUP_FCT
+# define DB_LOOKUP_FCT CONCAT3_1 (__nss_, DATABASE_NAME, _lookup2)
+# define CONCAT3_1(Pre, Name, Post) CONCAT3_2 (Pre, Name, Post)
+# define CONCAT3_2(Pre, Name, Post) Pre##Name##Post
+#endif
/* Sometimes we need to store error codes in the `h_errno' variable. */
#ifdef NEED_H_ERRNO
# define H_ERRNO_PARM , int *h_errnop
# define H_ERRNO_VAR , &h_errno
+# define H_ERRNO_VAR_P &h_errno
#else
# define H_ERRNO_PARM
# define H_ERRNO_VAR
+# define H_ERRNO_VAR_P NULL
#endif
/* Some databases take the `stayopen' flag. */
#ifdef STAYOPEN
# define STAYOPEN_TMP CONCAT2_1 (STAYOPEN, _tmp)
-# define STAYOPEN_TMPVAR CONCAT2_1 (STAYOPEN_VAR, _tmp)
+# define STAYOPEN_TMPVAR &CONCAT2_1 (STAYOPEN_VAR, _tmp)
#else
# define STAYOPEN void
-# define STAYOPEN_VAR
-# define STAYOPEN_TMPVAR
+# define STAYOPEN_VAR 0
+# define STAYOPEN_TMPVAR NULL
#endif
-/* Prototype for the setXXXent functions we use here. */
-typedef enum nss_status (*set_function) (STAYOPEN);
-
-/* Prototype for the endXXXent functions we use here. */
-typedef enum nss_status (*end_function) (void);
-
-/* Prototype for the setXXXent functions we use here. */
-typedef enum nss_status (*get_function) (LOOKUP_TYPE *, char *, size_t, int *
- H_ERRNO_PARM);
-
+#ifndef NEED__RES
+# define NEED__RES 0
+#endif
/* This handle for the NSS data base is shared between all
set/get/endXXXent functions. */
-static service_user *nip;
+static nss_action_list nip;
/* Remember the last service used since the last call to `endXXent'. */
-static service_user *last_nip;
-/* Remember the first service_entry, it's always the same. */
-static service_user *startp;
+static nss_action_list last_nip;
+/* Remember the first service_entry across set/get/endent. */
+static nss_action_list startp;
#ifdef STAYOPEN_TMP
/* We need to remember the last `stayopen' flag given by the user
__libc_lock_define_initialized (static, lock)
/* The lookup function for the first entry of this service. */
-extern int DB_LOOKUP_FCT (service_user **nip, const char *name, void **fctp);
-
-/* Set up NIP to run through the services. If ALL is zero, use NIP's
- current location if it's not nil. Return nonzero if there are no
- services (left). */
-static enum nss_status
-setup (void **fctp, const char *func_name, int all)
-{
- int no_more;
- if (startp == NULL)
- {
- no_more = DB_LOOKUP_FCT (&nip, func_name, fctp);
- startp = no_more ? (service_user *) -1l : nip;
- }
- else if (startp == (service_user *) -1l)
- /* No services at all. */
- return 1;
- else
- {
- if (all || !nip)
- /* Reset to the beginning of the service list. */
- nip = startp;
- /* Look up the first function. */
- no_more = __nss_lookup (&nip, func_name, fctp);
- }
- return no_more;
-}
+extern int DB_LOOKUP_FCT (nss_action_list *nip, const char *name,
+ const char *name2, void **fctp);
+libc_hidden_proto (DB_LOOKUP_FCT)
\f
void
SETFUNC_NAME (STAYOPEN)
{
- set_function fct;
- int no_more;
-
-#ifdef NEED__RES
- if ((_res.options & RES_INIT) == 0 && res_init () == -1)
- {
- __set_h_errno (NETDB_INTERNAL);
- return;
- }
-#endif /* need _res */
+ int save;
__libc_lock_lock (lock);
+ __nss_setent (SETFUNC_NAME_STRING, DB_LOOKUP_FCT, &nip, &startp,
+ &last_nip, STAYOPEN_VAR, STAYOPEN_TMPVAR, NEED__RES);
- /* Cycle through the services and run their `setXXent' functions until
- we find an available service. */
- no_more = setup ((void **) &fct, SETFUNC_NAME_STRING, 1);
- while (! no_more)
- {
- int is_last_nip = nip == last_nip;
- enum nss_status status = _CALL_DL_FCT (fct, (STAYOPEN_VAR));
-
- no_more = __nss_next (&nip, SETFUNC_NAME_STRING, (void **) &fct,
- status, 0);
- if (is_last_nip)
- last_nip = nip;
- }
-
-#ifdef STAYOPEN_TMP
- STAYOPEN_TMPVAR = STAYOPEN_VAR;
-#endif
-
+ save = errno;
__libc_lock_unlock (lock);
+ __set_errno (save);
}
void
ENDFUNC_NAME (void)
{
- end_function fct;
- int no_more;
+ int save;
-#ifdef NEED__RES
- if ((_res.options & RES_INIT) == 0 && res_init () == -1)
+ /* If the service has not been used before do not do anything. */
+ if (startp != NULL)
{
- __set_h_errno (NETDB_INTERNAL);
- return;
+ __libc_lock_lock (lock);
+ __nss_endent (ENDFUNC_NAME_STRING, DB_LOOKUP_FCT, &nip, &startp,
+ &last_nip, NEED__RES);
+ save = errno;
+ __libc_lock_unlock (lock);
+ __set_errno (save);
}
-#endif /* need _res */
-
- __libc_lock_lock (lock);
-
- /* Cycle through all the services and run their endXXent functions. */
- no_more = setup ((void **) &fct, ENDFUNC_NAME_STRING, 1);
- while (! no_more)
- {
- /* Ignore status, we force check in __NSS_NEXT. */
- _CALL_DL_FCT (fct, ());
+}
- if (nip == last_nip)
- /* We have processed all services which were used. */
- break;
- no_more = __nss_next (&nip, ENDFUNC_NAME_STRING, (void **) &fct, 0, 1);
- }
- last_nip = nip = NULL;
+int
+INTERNAL (REENTRANT_GETNAME) (LOOKUP_TYPE *resbuf, char *buffer, size_t buflen,
+ LOOKUP_TYPE **result H_ERRNO_PARM)
+{
+ int status;
+ int save;
+ __libc_lock_lock (lock);
+ status = __nss_getent_r (GETFUNC_NAME_STRING, SETFUNC_NAME_STRING,
+ DB_LOOKUP_FCT, &nip, &startp, &last_nip,
+ STAYOPEN_TMPVAR, NEED__RES, resbuf, buffer,
+ buflen, (void **) result, H_ERRNO_VAR_P);
+ save = errno;
__libc_lock_unlock (lock);
+ __set_errno (save);
+ return status;
}
+#ifdef NO_COMPAT_NEEDED
+strong_alias (INTERNAL (REENTRANT_GETNAME), REENTRANT_GETNAME);
+#else
+# include <shlib-compat.h>
+# if SHLIB_COMPAT (libc, GLIBC_2_0, GLIBC_2_1_2)
+# define OLD(name) OLD1 (name)
+# define OLD1(name) __old_##name
+
int
-INTERNAL (REENTRANT_GETNAME) (LOOKUP_TYPE *resbuf, char *buffer, size_t buflen,
- LOOKUP_TYPE **result H_ERRNO_PARM)
+attribute_compat_text_section
+OLD (REENTRANT_GETNAME) (LOOKUP_TYPE *resbuf, char *buffer, size_t buflen,
+ LOOKUP_TYPE **result H_ERRNO_PARM)
{
- get_function fct;
- int no_more;
- enum nss_status status;
-
-#ifdef NEED__RES
- if ((_res.options & RES_INIT) == 0 && res_init () == -1)
- {
- __set_h_errno (NETDB_INTERNAL);
- *result = NULL;
- return -1;
- }
-#endif /* need _res */
+ int ret = INTERNAL (REENTRANT_GETNAME) (resbuf, buffer, buflen,
+ result H_ERRNO_VAR);
- /* Initialize status to return if no more functions are found. */
- status = NSS_STATUS_NOTFOUND;
+ if (ret != 0)
+ ret = -1;
- __libc_lock_lock (lock);
+ return ret;
+}
- /* Run through available functions, starting with the same function last
- run. We will repeat each function as long as it succeeds, and then go
- on to the next service action. */
- no_more = setup ((void **) &fct, GETFUNC_NAME_STRING, 0);
- while (! no_more)
- {
- int is_last_nip = nip == last_nip;
+# define do_symbol_version(real, name, version) \
+ compat_symbol (libc, real, name, version)
+do_symbol_version (OLD (REENTRANT_GETNAME), REENTRANT_GETNAME, GLIBC_2_0);
+# endif
- status = _CALL_DL_FCT (fct,
- (resbuf, buffer, buflen, &errno H_ERRNO_VAR));
+/* As INTERNAL (REENTRANT_GETNAME) may be hidden, we need an alias
+ in between so that the REENTRANT_GETNAME@@GLIBC_2.1.2 is not
+ hidden too. */
+strong_alias (INTERNAL (REENTRANT_GETNAME), NEW (REENTRANT_GETNAME));
- /* The the status is NSS_STATUS_TRYAGAIN and errno is ERANGE the
- provided buffer is too small. In this case we should give
- the user the possibility to enlarge the buffer and we should
- not simply go on with the next service (even if the TRYAGAIN
- action tells us so). */
- if (status == NSS_STATUS_TRYAGAIN
-#ifdef NEED_H_ERRNO
- && *h_errnop == NETDB_INTERNAL
+# define do_default_symbol_version(real, name, version) \
+ versioned_symbol (libc, real, name, version)
+do_default_symbol_version (NEW (REENTRANT_GETNAME),
+ REENTRANT_GETNAME, GLIBC_2_1_2);
#endif
- && errno == ERANGE)
- break;
-
- do
- {
- no_more = __nss_next (&nip, GETFUNC_NAME_STRING, (void **) &fct,
- status, 0);
-
- if (is_last_nip)
- last_nip = nip;
-
- if (! no_more)
- {
- /* Call the `setXXent' function. This wasn't done before. */
- set_function sfct;
-
- no_more = __nss_lookup (&nip, SETFUNC_NAME_STRING,
- (void **) &sfct);
-
- if (! no_more)
- status = _CALL_DL_FCT (sfct, (STAYOPEN_TMPVAR));
- else
- status = NSS_STATUS_NOTFOUND;
- }
- }
- while (! no_more && status != NSS_STATUS_SUCCESS);
- }
- __libc_lock_unlock (lock);
-
- *result = status == NSS_STATUS_SUCCESS ? resbuf : NULL;
- return status == NSS_STATUS_SUCCESS ? 0 : -1;
-}
-#define do_weak_alias(n1, n2) weak_alias (n1, n2)
-do_weak_alias (INTERNAL (REENTRANT_GETNAME), REENTRANT_GETNAME)
+nss_interface_function (SETFUNC_NAME)
+nss_interface_function (ENDFUNC_NAME)
+nss_interface_function (REENTRANT_GETNAME)