If NSS_attribute_hidden is defined use it with the DB_LOOKUP_FCT prototype.
[kopensolaris-gnu/glibc.git] / nss / getXXent_r.c
1 /* Copyright (C) 1996,97,98,99,2000,2002 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
4
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Lesser General Public
7    License as published by the Free Software Foundation; either
8    version 2.1 of the License, or (at your option) any later version.
9
10    The GNU C Library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Lesser General Public License for more details.
14
15    You should have received a copy of the GNU Lesser General Public
16    License along with the GNU C Library; if not, write to the Free
17    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
18    02111-1307 USA.  */
19
20 #include <errno.h>
21 #include <bits/libc-lock.h>
22
23 #include "nsswitch.h"
24
25 /*******************************************************************\
26 |* Here we assume several symbols to be defined:                   *|
27 |*                                                                 *|
28 |* LOOKUP_TYPE   - the return type of the function                 *|
29 |*                                                                 *|
30 |* SETFUNC_NAME  - name of the non-reentrant setXXXent function    *|
31 |*                                                                 *|
32 |* GETFUNC_NAME  - name of the non-reentrant getXXXent function    *|
33 |*                                                                 *|
34 |* ENDFUNC_NAME  - name of the non-reentrant endXXXent function    *|
35 |*                                                                 *|
36 |* DATABASE_NAME - name of the database the function accesses      *|
37 |*                 (e.g., host, services, ...)                     *|
38 |*                                                                 *|
39 |* Optionally the following vars can be defined:                   *|
40 |*                                                                 *|
41 |* STAYOPEN      - variable declaration for setXXXent function     *|
42 |*                                                                 *|
43 |* STAYOPEN_VAR  - variable name for setXXXent function            *|
44 |*                                                                 *|
45 |* NEED_H_ERRNO  - an extra parameter will be passed to point to   *|
46 |*                 the global `h_errno' variable.                  *|
47 |*                                                                 *|
48 \*******************************************************************/
49
50 /* To make the real sources a bit prettier.  */
51 #define REENTRANT_GETNAME APPEND_R (GETFUNC_NAME)
52 #define APPEND_R(Name) CONCAT2_2 (Name, _r)
53 #define INTERNAL(Name) CONCAT2_2 (__, Name)
54 #define CONCAT2_1(Pre, Post) CONCAT2_2 (Pre, Post)
55 #define CONCAT2_2(Pre, Post) Pre##Post
56
57 #define SETFUNC_NAME_STRING STRINGIZE (SETFUNC_NAME)
58 #define GETFUNC_NAME_STRING STRINGIZE (REENTRANT_GETNAME)
59 #define ENDFUNC_NAME_STRING STRINGIZE (ENDFUNC_NAME)
60 #define DATABASE_NAME_STRING STRINGIZE (DATABASE_NAME)
61 #define STRINGIZE(Name) STRINGIZE1 (Name)
62 #define STRINGIZE1(Name) #Name
63
64 #ifndef DB_LOOKUP_FCT
65 # define DB_LOOKUP_FCT CONCAT3_1 (__nss_, DATABASE_NAME, _lookup)
66 # define CONCAT3_1(Pre, Name, Post) CONCAT3_2 (Pre, Name, Post)
67 # define CONCAT3_2(Pre, Name, Post) Pre##Name##Post
68 #endif
69
70 /* Sometimes we need to store error codes in the `h_errno' variable.  */
71 #ifdef NEED_H_ERRNO
72 # define H_ERRNO_PARM , int *h_errnop
73 # define H_ERRNO_VAR , &h_errno
74 # define H_ERRNO_VAR_P &h_errno
75 #else
76 # define H_ERRNO_PARM
77 # define H_ERRNO_VAR
78 # define H_ERRNO_VAR_P NULL
79 #endif
80
81 /* Some databases take the `stayopen' flag.  */
82 #ifdef STAYOPEN
83 # define STAYOPEN_TMP CONCAT2_1 (STAYOPEN, _tmp)
84 # define STAYOPEN_TMPVAR &CONCAT2_1 (STAYOPEN_VAR, _tmp)
85 #else
86 # define STAYOPEN void
87 # define STAYOPEN_VAR 0
88 # define STAYOPEN_TMPVAR NULL
89 #endif
90
91 #ifndef NEED__RES
92 # define NEED__RES 0
93 #endif
94
95 #ifndef NSS_attribute_hidden
96 # define NSS_attribute_hidden
97 #endif
98
99 /* This handle for the NSS data base is shared between all
100    set/get/endXXXent functions.  */
101 static service_user *nip;
102 /* Remember the last service used since the last call to  `endXXent'.  */
103 static service_user *last_nip;
104 /* Remember the first service_entry, it's always the same.  */
105 static service_user *startp;
106
107 #ifdef STAYOPEN_TMP
108 /* We need to remember the last `stayopen' flag given by the user
109    since the `setent' function is only called for the first available
110    service.  */
111 static STAYOPEN_TMP;
112 #endif
113
114 /* Protect above variable against multiple uses at the same time.  */
115 __libc_lock_define_initialized (static, lock)
116
117 /* The lookup function for the first entry of this service.  */
118 extern int DB_LOOKUP_FCT (service_user **nip, const char *name, void **fctp)
119      internal_function NSS_attribute_hidden;
120 \f
121 void
122 SETFUNC_NAME (STAYOPEN)
123 {
124   int save;
125
126   __libc_lock_lock (lock);
127   __nss_setent (SETFUNC_NAME_STRING, DB_LOOKUP_FCT, &nip, &startp,
128                 &last_nip, STAYOPEN_VAR, STAYOPEN_TMPVAR, NEED__RES);
129
130   save = errno;
131   __libc_lock_unlock (lock);
132   __set_errno (save);
133 }
134
135
136 void
137 ENDFUNC_NAME (void)
138 {
139   int save;
140
141   __libc_lock_lock (lock);
142   __nss_endent (ENDFUNC_NAME_STRING, DB_LOOKUP_FCT, &nip, &startp,
143                 &last_nip, NEED__RES);
144   save = errno;
145   __libc_lock_unlock (lock);
146   __set_errno (save);
147 }
148
149
150 int
151 INTERNAL (REENTRANT_GETNAME) (LOOKUP_TYPE *resbuf, char *buffer, size_t buflen,
152                               LOOKUP_TYPE **result H_ERRNO_PARM)
153 {
154   int status;
155   int save;
156
157   __libc_lock_lock (lock);
158   status = __nss_getent_r (GETFUNC_NAME_STRING, SETFUNC_NAME_STRING,
159                            DB_LOOKUP_FCT, &nip, &startp, &last_nip,
160                            STAYOPEN_TMPVAR, NEED__RES, resbuf, buffer,
161                            buflen, (void **) result, H_ERRNO_VAR_P);
162   save = errno;
163   __libc_lock_unlock (lock);
164   __set_errno (save);
165   return status;
166 }
167
168
169 #include <shlib-compat.h>
170 #if SHLIB_COMPAT (libc, GLIBC_2_0, GLIBC_2_1_2)
171 #define OLD(name) OLD1 (name)
172 #define OLD1(name) __old_##name
173
174 int
175 OLD (REENTRANT_GETNAME) (LOOKUP_TYPE *resbuf, char *buffer, size_t buflen,
176                          LOOKUP_TYPE **result H_ERRNO_PARM)
177 {
178   int ret = INTERNAL (REENTRANT_GETNAME) (resbuf, buffer, buflen,
179                                           result H_ERRNO_VAR);
180
181   if (ret != 0)
182     ret = -1;
183
184   return ret;
185 }
186
187 #define do_symbol_version(real, name, version) \
188   compat_symbol (libc, real, name, version)
189 do_symbol_version (OLD (REENTRANT_GETNAME), REENTRANT_GETNAME, GLIBC_2_0);
190 #endif
191
192 #define do_default_symbol_version(real, name, version) \
193   versioned_symbol (libc, real, name, version)
194 do_default_symbol_version (INTERNAL (REENTRANT_GETNAME),
195                            REENTRANT_GETNAME, GLIBC_2_1_2);