1 /* Copyright (c) 1997-2022 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3 
4    The GNU C Library is free software; you can redistribute it and/or
5    modify it under the terms of the GNU Lesser General Public
6    License as published by the Free Software Foundation; either
7    version 2.1 of the License, or (at your option) any later version.
8 
9    The GNU C Library is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12    Lesser General Public License for more details.
13 
14    You should have received a copy of the GNU Lesser General Public
15    License along with the GNU C Library; if not, see
16    <https://www.gnu.org/licenses/>.  */
17 
18 #include <stdio.h>
19 #include <stdlib.h>
20 #include <string.h>
21 #include <rpcsvc/nis.h>
22 #include <shlib-compat.h>
23 #include "nis_xdr.h"
24 
25 typedef bool_t (*iofct_t) (XDR *, void *);
26 typedef void (*freefct_t) (void *);
27 
28 
29 static void *
read_nis_obj(const char * name,iofct_t readfct,freefct_t freefct,size_t objsize)30 read_nis_obj (const char *name, iofct_t readfct, freefct_t freefct,
31 	      size_t objsize)
32 {
33   FILE *in = fopen (name, "rce");
34   if (in == NULL)
35     return NULL;
36 
37   void *obj = calloc (1, objsize);
38 
39   if (obj != NULL)
40     {
41       XDR xdrs;
42       xdrstdio_create (&xdrs, in, XDR_DECODE);
43       bool_t status = readfct (&xdrs, obj);
44       xdr_destroy (&xdrs);
45 
46       if (!status)
47 	{
48 	  freefct (obj);
49 	  obj = NULL;
50 	}
51     }
52 
53   fclose (in);
54 
55   return obj;
56 }
57 
58 static bool_t
write_nis_obj(const char * name,const void * obj,iofct_t writefct)59 write_nis_obj (const char *name, const void *obj, iofct_t writefct)
60 {
61   FILE *out = fopen (name, "wce");
62   if (out == NULL)
63     return FALSE;
64 
65   XDR xdrs;
66   xdrstdio_create (&xdrs, out, XDR_ENCODE);
67   bool_t status = writefct (&xdrs, (void *) obj);
68   xdr_destroy (&xdrs);
69   fclose (out);
70 
71   return status;
72 }
73 
74 
75 static const char cold_start_file[] = "/var/nis/NIS_COLD_START";
76 
77 directory_obj *
readColdStartFile(void)78 readColdStartFile (void)
79 {
80   return read_nis_obj (cold_start_file, (iofct_t) _xdr_directory_obj,
81 		       (freefct_t) nis_free_directory, sizeof (directory_obj));
82 }
libnsl_hidden_nolink_def(readColdStartFile,GLIBC_2_1)83 libnsl_hidden_nolink_def (readColdStartFile, GLIBC_2_1)
84 
85 bool_t
86 writeColdStartFile (const directory_obj *obj)
87 {
88   return write_nis_obj (cold_start_file, obj, (iofct_t) _xdr_directory_obj);
89 }
libnsl_hidden_nolink_def(writeColdStartFile,GLIBC_2_1)90 libnsl_hidden_nolink_def (writeColdStartFile, GLIBC_2_1)
91 
92 nis_object *
93 nis_read_obj (const char *name)
94 {
95   return read_nis_obj (name, (iofct_t) _xdr_nis_object,
96 		       (freefct_t) nis_free_object, sizeof (nis_object));
97 }
libnsl_hidden_nolink_def(nis_read_obj,GLIBC_2_1)98 libnsl_hidden_nolink_def (nis_read_obj, GLIBC_2_1)
99 
100 bool_t
101 nis_write_obj (const char *name, const nis_object *obj)
102 {
103   return write_nis_obj (name, obj, (iofct_t) _xdr_nis_object);
104 }
105 libnsl_hidden_nolink_def (nis_write_obj, GLIBC_2_1)
106