sh: Add simple CDPATH test.
[dragonfly.git] / usr.sbin / rpcbind / warmstart.c
1 /*
2  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
3  * unrestricted use provided that this legend is included on all tape
4  * media and as a part of the software program in whole or part.  Users
5  * may copy or modify Sun RPC without charge, but are not authorized
6  * to license or distribute it to anyone else except as part of a product or
7  * program developed by the user.
8  *
9  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
10  * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
11  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
12  *
13  * Sun RPC is provided with no support and without any obligation on the
14  * part of Sun Microsystems, Inc. to assist in its use, correction,
15  * modification or enhancement.
16  *
17  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
18  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
19  * OR ANY PART THEREOF.
20  *
21  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
22  * or profits or other special, indirect and consequential damages, even if
23  * Sun has been advised of the possibility of such damages.
24  *
25  * Sun Microsystems, Inc.
26  * 2550 Garcia Avenue
27  * Mountain View, California  94043
28  */
29 /*
30  * warmstart.c
31  * Allows for gathering of registrations from an earlier dumped file.
32  *
33  * Copyright (c) 1990 by Sun Microsystems, Inc.
34  */
35
36 /*
37  * @(#)warmstart.c      1.7     93/07/05 SMI
38  * $FreeBSD: src/usr.sbin/rpcbind/warmstart.c,v 1.4 2007/11/07 10:53:39 kevlo Exp $
39  */
40 #include <sys/types.h>
41 #include <sys/stat.h>
42 #include <stdio.h>
43 #include <rpc/rpc.h>
44 #include <rpc/rpcb_prot.h>
45 #include <rpc/xdr.h>
46 #ifdef PORTMAP
47 #include <netinet/in.h>
48 #include <rpc/pmap_prot.h>
49 #endif
50 #include <syslog.h>
51 #include <unistd.h>
52
53 #include "rpcbind.h"
54
55 /*
56  * XXX this code is unsafe and is not used. It should be made safe.
57  */
58
59
60 /* These files keep the pmap_list and rpcb_list in XDR format */
61 #define RPCBFILE        "/tmp/rpcbind.file"
62 #ifdef PORTMAP
63 #define PMAPFILE        "/tmp/portmap.file"
64 #endif
65
66 static bool_t write_struct(char *, xdrproc_t, void *);
67 static bool_t read_struct(char *, xdrproc_t, void *);
68
69 static bool_t
70 write_struct(char *filename, xdrproc_t structproc, void *list)
71 {
72         FILE *fp;
73         XDR xdrs;
74         mode_t omask;
75
76         omask = umask(077);
77         fp = fopen(filename, "w");
78         if (fp == NULL) {
79                 int i;
80
81                 for (i = 0; i < 10; i++)
82                         close(i);
83                 fp = fopen(filename, "w");
84                 if (fp == NULL) {
85                         syslog(LOG_ERR,
86                                 "cannot open file = %s for writing", filename);
87                         syslog(LOG_ERR, "cannot save any registration");
88                         return (FALSE);
89                 }
90         }
91         umask(omask);
92         xdrstdio_create(&xdrs, fp, XDR_ENCODE);
93
94         if (structproc(&xdrs, list) == FALSE) {
95                 syslog(LOG_ERR, "rpcbind: xdr_%s: failed", filename);
96                 fclose(fp);
97                 return (FALSE);
98         }
99         XDR_DESTROY(&xdrs);
100         fclose(fp);
101         return (TRUE);
102 }
103
104 static bool_t
105 read_struct(char *filename, xdrproc_t structproc, void *list)
106 {
107         FILE *fp;
108         XDR xdrs;
109         struct stat sbuf;
110
111         if (stat(filename, &sbuf) != 0) {
112                 fprintf(stderr,
113                 "rpcbind: cannot stat file = %s for reading\n", filename);
114                 goto error;
115         }
116         if ((sbuf.st_uid != 0) || (sbuf.st_mode & S_IRWXG) ||
117             (sbuf.st_mode & S_IRWXO)) {
118                 fprintf(stderr,
119                 "rpcbind: invalid permissions on file = %s for reading\n",
120                         filename);
121                 goto error;
122         }
123         fp = fopen(filename, "r");
124         if (fp == NULL) {
125                 fprintf(stderr,
126                 "rpcbind: cannot open file = %s for reading\n", filename);
127                 goto error;
128         }
129         xdrstdio_create(&xdrs, fp, XDR_DECODE);
130
131         if (structproc(&xdrs, list) == FALSE) {
132                 fprintf(stderr, "rpcbind: xdr_%s: failed\n", filename);
133                 fclose(fp);
134                 goto error;
135         }
136         XDR_DESTROY(&xdrs);
137         fclose(fp);
138         return (TRUE);
139
140 error:  fprintf(stderr, "rpcbind: will start from scratch\n");
141         return (FALSE);
142 }
143
144 void
145 write_warmstart(void)
146 {
147         write_struct(RPCBFILE, (xdrproc_t)xdr_rpcblist_ptr, &list_rbl);
148 #ifdef PORTMAP
149         write_struct(PMAPFILE, (xdrproc_t)xdr_pmaplist_ptr, &list_pml);
150 #endif
151
152 }
153
154 void
155 read_warmstart(void)
156 {
157         rpcblist_ptr tmp_rpcbl = NULL;
158 #ifdef PORTMAP
159         struct pmaplist *tmp_pmapl = NULL;
160 #endif
161         int ok1, ok2 = TRUE;
162
163         ok1 = read_struct(RPCBFILE, (xdrproc_t)xdr_rpcblist_ptr, &tmp_rpcbl);
164         if (ok1 == FALSE)
165                 return;
166 #ifdef PORTMAP
167         ok2 = read_struct(PMAPFILE, (xdrproc_t)xdr_pmaplist_ptr, &tmp_pmapl);
168 #endif
169         if (ok2 == FALSE) {
170                 xdr_free((xdrproc_t) xdr_rpcblist_ptr, (char *)&tmp_rpcbl);
171                 return;
172         }
173         xdr_free((xdrproc_t) xdr_rpcblist_ptr, (char *)&list_rbl);
174         list_rbl = tmp_rpcbl;
175 #ifdef PORTMAP
176         xdr_free((xdrproc_t) xdr_pmaplist_ptr, (char *)&list_pml);
177         list_pml = tmp_pmapl;
178 #endif
179 }