1/* Template generic NSS service provider. See nss_test.h for usage.
2 Copyright (C) 2017-2022 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
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, see
17 <https://www.gnu.org/licenses/>. */
18
19#include <errno.h>
20#include <nss.h>
21#include <pthread.h>
22#include <string.h>
23#include <stdio.h>
24#include <alloc_buffer.h>
25
26
27/* We need to be able to handle NULLs "properly" within the testsuite,
28 to test known bad data. */
29#define alloc_buffer_maybe_copy_string(b,s) s ? alloc_buffer_copy_string (b, s) : NULL;
30
31/* This file is the master template. Other instances of this test
32 module should define NAME(x) to have their name instead of "test1",
33 then include this file.
34*/
35#define NAME_(x,n) _nss_##n##_##x
36#ifndef NAME
37#define NAME(x) NAME_(x,test1)
38#endif
39#define NAMESTR__(x) #x
40#define NAMESTR_(x) NAMESTR__(x)
41#define NAMESTR(x) NAMESTR_(NAME(x))
42
43#include "nss_test.h"
44
45/* -------------------------------------------------- */
46/* Default Data. */
47
48static struct passwd default_pwd_data[] =
49 {
50#define PWD(u) \
51 { .pw_name = (char *) "name" #u, .pw_passwd = (char *) "*", .pw_uid = u, \
52 .pw_gid = 100, .pw_gecos = (char *) "*", .pw_dir = (char *) "*", \
53 .pw_shell = (char *) "*" }
54 PWD (30),
55 PWD (100),
56 PWD (200),
57 PWD (60),
58 PWD (20000)
59 };
60#define default_npwd_data \
61 (sizeof (default_pwd_data) / sizeof (default_pwd_data[0]))
62
63static struct passwd *pwd_data = default_pwd_data;
64static int npwd_data = default_npwd_data;
65
66static struct group *grp_data = NULL;
67static int ngrp_data = 0;
68
69static struct spwd *spwd_data = NULL;
70static int nspwd_data = 0;
71
72static struct hostent *host_data = NULL;
73static int nhost_data = 0;
74
75/* This function will get called, and once per session, look back into
76 the test case's executable for an init hook function, and call
77 it. */
78
79static int initted = 0;
80static void
81init(void)
82{
83 test_tables t;
84 int i;
85
86 if (initted)
87 return;
88 if (NAME(init_hook))
89 {
90 memset (&t, 0, sizeof (t));
91 NAME(init_hook)(&t);
92
93 if (t.pwd_table)
94 {
95 pwd_data = t.pwd_table;
96 for (i=0; ! PWD_ISLAST(& pwd_data[i]); i++)
97 ;
98 npwd_data = i;
99 }
100
101 if (t.grp_table)
102 {
103 grp_data = t.grp_table;
104 for (i=0; ! GRP_ISLAST(& grp_data[i]); i++)
105 ;
106 ngrp_data = i;
107 }
108 if (t.spwd_table)
109 {
110 spwd_data = t.spwd_table;
111 for (i=0; ! SPWD_ISLAST(& spwd_data[i]); i++)
112 ;
113 nspwd_data = i;
114 }
115 if (t.host_table)
116 {
117 host_data = t.host_table;
118 for (i=0; ! HOST_ISLAST(& host_data[i]); i++)
119 ;
120 nhost_data = i;
121 }
122 }
123 initted = 1;
124}
125
126/* -------------------------------------------------- */
127/* Password handling. */
128
129static size_t pwd_iter;
130#define CURPWD pwd_data[pwd_iter]
131
132static pthread_mutex_t pwd_lock = PTHREAD_MUTEX_INITIALIZER;
133
134enum nss_status
135NAME(setpwent) (int stayopen)
136{
137 init();
138 pwd_iter = 0;
139 return NSS_STATUS_SUCCESS;
140}
141
142
143enum nss_status
144NAME(endpwent) (void)
145{
146 init();
147 return NSS_STATUS_SUCCESS;
148}
149
150static enum nss_status
151copy_passwd (struct passwd *result, struct passwd *local,
152 char *buffer, size_t buflen, int *errnop)
153{
154 struct alloc_buffer buf = alloc_buffer_create (start: buffer, size: buflen);
155
156 result->pw_name = alloc_buffer_maybe_copy_string (&buf, local->pw_name);
157 result->pw_passwd = alloc_buffer_maybe_copy_string (&buf, local->pw_passwd);
158 result->pw_uid = local->pw_uid;
159 result->pw_gid = local->pw_gid;
160 result->pw_gecos = alloc_buffer_maybe_copy_string (&buf, local->pw_gecos);
161 result->pw_dir = alloc_buffer_maybe_copy_string (&buf, local->pw_dir);
162 result->pw_shell = alloc_buffer_maybe_copy_string (&buf, local->pw_shell);
163
164 if (alloc_buffer_has_failed (buf: &buf))
165 {
166 *errnop = ERANGE;
167 return NSS_STATUS_TRYAGAIN;
168 }
169
170 return NSS_STATUS_SUCCESS;
171}
172
173enum nss_status
174NAME(getpwent_r) (struct passwd *result, char *buffer, size_t buflen,
175 int *errnop)
176{
177 int res = NSS_STATUS_SUCCESS;
178
179 init();
180 pthread_mutex_lock (mutex: &pwd_lock);
181
182 if (pwd_iter >= npwd_data)
183 res = NSS_STATUS_NOTFOUND;
184 else
185 {
186 res = copy_passwd (result, local: &CURPWD, buffer, buflen, errnop);
187 ++pwd_iter;
188 }
189
190 pthread_mutex_unlock (mutex: &pwd_lock);
191
192 return res;
193}
194
195
196enum nss_status
197NAME(getpwuid_r) (uid_t uid, struct passwd *result, char *buffer,
198 size_t buflen, int *errnop)
199{
200 init();
201 for (size_t idx = 0; idx < npwd_data; ++idx)
202 if (pwd_data[idx].pw_uid == uid)
203 return copy_passwd (result, local: &pwd_data[idx], buffer, buflen, errnop);
204
205 return NSS_STATUS_NOTFOUND;
206}
207
208
209enum nss_status
210NAME(getpwnam_r) (const char *name, struct passwd *result, char *buffer,
211 size_t buflen, int *errnop)
212{
213 init();
214 for (size_t idx = 0; idx < npwd_data; ++idx)
215 if (strcmp (pwd_data[idx].pw_name, name) == 0)
216 return copy_passwd (result, local: &pwd_data[idx], buffer, buflen, errnop);
217
218 return NSS_STATUS_NOTFOUND;
219}
220
221/* -------------------------------------------------- */
222/* Group handling. */
223
224static size_t grp_iter;
225#define CURGRP grp_data[grp_iter]
226
227static pthread_mutex_t grp_lock = PTHREAD_MUTEX_INITIALIZER;
228
229enum nss_status
230NAME(setgrent) (int stayopen)
231{
232 init();
233 grp_iter = 0;
234 return NSS_STATUS_SUCCESS;
235}
236
237
238enum nss_status
239NAME(endgrent) (void)
240{
241 init();
242 return NSS_STATUS_SUCCESS;
243}
244
245static enum nss_status
246copy_group (struct group *result, struct group *local,
247 char *buffer, size_t buflen, int *errnop)
248{
249 struct alloc_buffer buf = alloc_buffer_create (start: buffer, size: buflen);
250 char **memlist;
251 int i;
252
253 if (local->gr_mem)
254 {
255 i = 0;
256 while (local->gr_mem[i])
257 ++i;
258
259 memlist = alloc_buffer_alloc_array (&buf, char *, i + 1);
260
261 if (memlist) {
262 for (i = 0; local->gr_mem[i]; ++i)
263 memlist[i] = alloc_buffer_maybe_copy_string (&buf, local->gr_mem[i]);
264 memlist[i] = NULL;
265 }
266
267 result->gr_mem = memlist;
268 }
269 else
270 result->gr_mem = NULL;
271
272 result->gr_name = alloc_buffer_maybe_copy_string (&buf, local->gr_name);
273 result->gr_passwd = alloc_buffer_maybe_copy_string (&buf, local->gr_passwd);
274 result->gr_gid = local->gr_gid;
275
276 if (alloc_buffer_has_failed (buf: &buf))
277 {
278 *errnop = ERANGE;
279 return NSS_STATUS_TRYAGAIN;
280 }
281
282 return NSS_STATUS_SUCCESS;
283}
284
285
286enum nss_status
287NAME(getgrent_r) (struct group *result, char *buffer, size_t buflen,
288 int *errnop)
289{
290 int res = NSS_STATUS_SUCCESS;
291
292 init();
293 pthread_mutex_lock (mutex: &grp_lock);
294
295 if (grp_iter >= ngrp_data)
296 res = NSS_STATUS_NOTFOUND;
297 else
298 {
299 res = copy_group (result, local: &CURGRP, buffer, buflen, errnop);
300 ++grp_iter;
301 }
302
303 pthread_mutex_unlock (mutex: &grp_lock);
304
305 return res;
306}
307
308
309enum nss_status
310NAME(getgrgid_r) (gid_t gid, struct group *result, char *buffer,
311 size_t buflen, int *errnop)
312{
313 init();
314 for (size_t idx = 0; idx < ngrp_data; ++idx)
315 if (grp_data[idx].gr_gid == gid)
316 return copy_group (result, local: &grp_data[idx], buffer, buflen, errnop);
317
318 return NSS_STATUS_NOTFOUND;
319}
320
321
322enum nss_status
323NAME(getgrnam_r) (const char *name, struct group *result, char *buffer,
324 size_t buflen, int *errnop)
325{
326 init();
327 for (size_t idx = 0; idx < ngrp_data; ++idx)
328 if (strcmp (pwd_data[idx].pw_name, name) == 0)
329 {
330 return copy_group (result, local: &grp_data[idx], buffer, buflen, errnop);
331 }
332
333 return NSS_STATUS_NOTFOUND;
334}
335
336/* -------------------------------------------------- */
337/* Shadow password handling. */
338
339static size_t spwd_iter;
340#define CURSPWD spwd_data[spwd_iter]
341
342static pthread_mutex_t spwd_lock = PTHREAD_MUTEX_INITIALIZER;
343
344enum nss_status
345NAME(setspent) (int stayopen)
346{
347 init();
348 spwd_iter = 0;
349 return NSS_STATUS_SUCCESS;
350}
351
352
353enum nss_status
354NAME(endspwent) (void)
355{
356 init();
357 return NSS_STATUS_SUCCESS;
358}
359
360static enum nss_status
361copy_shadow (struct spwd *result, struct spwd *local,
362 char *buffer, size_t buflen, int *errnop)
363{
364 struct alloc_buffer buf = alloc_buffer_create (start: buffer, size: buflen);
365
366 result->sp_namp = alloc_buffer_maybe_copy_string (&buf, local->sp_namp);
367 result->sp_pwdp = alloc_buffer_maybe_copy_string (&buf, local->sp_pwdp);
368 result->sp_lstchg = local->sp_lstchg;
369 result->sp_min = local->sp_min;
370 result->sp_max = local->sp_max;
371 result->sp_warn = local->sp_warn;
372 result->sp_inact = local->sp_inact;
373 result->sp_expire = local->sp_expire;
374 result->sp_flag = local->sp_flag;
375
376 if (alloc_buffer_has_failed (buf: &buf))
377 {
378 *errnop = ERANGE;
379 return NSS_STATUS_TRYAGAIN;
380 }
381
382 return NSS_STATUS_SUCCESS;
383}
384
385enum nss_status
386NAME(getspent_r) (struct spwd *result, char *buffer, size_t buflen,
387 int *errnop)
388{
389 int res = NSS_STATUS_SUCCESS;
390
391 init();
392 pthread_mutex_lock (mutex: &spwd_lock);
393
394 if (spwd_iter >= nspwd_data)
395 res = NSS_STATUS_NOTFOUND;
396 else
397 {
398 res = copy_shadow (result, local: &CURSPWD, buffer, buflen, errnop);
399 ++spwd_iter;
400 }
401
402 pthread_mutex_unlock (mutex: &spwd_lock);
403
404 return res;
405}
406
407enum nss_status
408NAME(getspnam_r) (const char *name, struct spwd *result, char *buffer,
409 size_t buflen, int *errnop)
410{
411 init();
412 for (size_t idx = 0; idx < nspwd_data; ++idx)
413 if (strcmp (spwd_data[idx].sp_namp, name) == 0)
414 return copy_shadow (result, local: &spwd_data[idx], buffer, buflen, errnop);
415
416 return NSS_STATUS_NOTFOUND;
417}
418
419/* -------------------------------------------------- */
420/* Host handling. */
421
422static size_t host_iter;
423#define CURHOST host_data[host_iter]
424
425static pthread_mutex_t host_lock = PTHREAD_MUTEX_INITIALIZER;
426
427enum nss_status
428NAME(sethostent) (int stayopen)
429{
430 init();
431 host_iter = 0;
432 return NSS_STATUS_SUCCESS;
433}
434
435
436enum nss_status
437NAME(endhostent) (void)
438{
439 init();
440 return NSS_STATUS_SUCCESS;
441}
442
443static enum nss_status
444copy_host (struct hostent *result, struct hostent *local,
445 char *buffer, size_t buflen, int *errnop)
446{
447 struct alloc_buffer buf = alloc_buffer_create (start: buffer, size: buflen);
448 char **memlist;
449 int i, j;
450
451 if (local->h_addr_list)
452 {
453 i = 0;
454 while (local->h_addr_list[i])
455 ++i;
456
457 memlist = alloc_buffer_alloc_array (&buf, char *, i + 1);
458
459 if (memlist) {
460 for (j = 0; j < i; ++j)
461 memlist[j] = alloc_buffer_maybe_copy_string (&buf, local->h_addr_list[j]);
462 memlist[j] = NULL;
463 }
464
465 result->h_addr_list = memlist;
466 }
467 else
468 {
469 result->h_addr_list = NULL;
470 }
471
472 result->h_aliases = NULL;
473 result->h_addrtype = AF_INET;
474 result->h_length = 4;
475 result->h_name = alloc_buffer_maybe_copy_string (&buf, local->h_name);
476
477 if (alloc_buffer_has_failed (buf: &buf))
478 {
479 *errnop = ERANGE;
480 return NSS_STATUS_TRYAGAIN;
481 }
482
483 return NSS_STATUS_SUCCESS;
484}
485
486
487enum nss_status
488NAME(gethostent_r) (struct hostent *ret, char *buffer, size_t buflen,
489 struct hostent **result, int *errnop)
490{
491 int res = NSS_STATUS_SUCCESS;
492
493 init();
494 pthread_mutex_lock (mutex: &host_lock);
495
496 if (host_iter >= nhost_data)
497 {
498 res = NSS_STATUS_NOTFOUND;
499 *result = NULL;
500 }
501 else
502 {
503 res = copy_host (result: ret, local: &CURHOST, buffer, buflen, errnop);
504 *result = ret;
505 ++host_iter;
506 }
507
508 pthread_mutex_unlock (mutex: &host_lock);
509
510 return res;
511}
512
513enum nss_status
514NAME(gethostbyname3_r) (const char *name, int af, struct hostent *ret,
515 char *buffer, size_t buflen, int *errnop,
516 int *h_errnop, int32_t *ttlp, char **canonp)
517{
518 init();
519
520 for (size_t idx = 0; idx < nhost_data; ++idx)
521 if (strcmp (host_data[idx].h_name, name) == 0)
522 return copy_host (result: ret, local: & host_data[idx], buffer, buflen, errnop: h_errnop);
523
524 return NSS_STATUS_NOTFOUND;
525}
526
527enum nss_status
528NAME(gethostbyname_r) (const char *name, struct hostent *result,
529 char *buffer, size_t buflen,
530 int *errnop, int *h_errnop)
531{
532 return NAME(gethostbyname3_r) (name, AF_INET, ret: result, buffer, buflen,
533 errnop, h_errnop, NULL, NULL);
534}
535
536enum nss_status
537NAME(gethostbyname2_r) (const char *name, int af, struct hostent *result,
538 char *buffer, size_t buflen,
539 int *errnop, int *h_errnop)
540{
541 return NAME(gethostbyname3_r) (name, af, ret: result, buffer, buflen,
542 errnop, h_errnop, NULL, NULL);
543}
544
545enum nss_status
546NAME(gethostbyaddr2_r) (const void *addr, socklen_t len, int af,
547 struct hostent *result, char *buffer, size_t buflen,
548 int *errnop, int *h_errnop, int32_t *ttlp)
549{
550 init();
551
552 /* Support this later. */
553 if (len != 4)
554 return NSS_STATUS_NOTFOUND;
555
556 for (size_t idx = 0; idx < nhost_data; ++idx)
557 if (memcmp (host_data[idx].h_addr, addr, len) == 0)
558 return copy_host (result, local: & host_data[idx], buffer, buflen, errnop: h_errnop);
559
560 return NSS_STATUS_NOTFOUND;
561}
562
563/* Note: only the first address is supported, intentionally. */
564enum nss_status
565NAME(gethostbyaddr_r) (const void *addr, socklen_t len, int af,
566 struct hostent *result, char *buffer, size_t buflen,
567 int *errnop, int *h_errnop)
568{
569 return NAME(gethostbyaddr2_r) (addr, len, af, result, buffer, buflen,
570 errnop, h_errnop, NULL);
571}
572

source code of glibc/nss/nss_test1.c