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 * #ident	"@(#)warmstart.c	1.7	93/07/05 SMI"
38 * $FreeBSD$/
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
66static bool_t write_struct(char *, xdrproc_t, void *);
67static bool_t read_struct(char *, xdrproc_t, void *);
68
69static bool_t
70write_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	(void) 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
104static bool_t
105read_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
140error:	fprintf(stderr, "rpcbind: will start from scratch\n");
141	return (FALSE);
142}
143
144void
145write_warmstart(void)
146{
147	(void) write_struct(RPCBFILE, (xdrproc_t)xdr_rpcblist_ptr, &list_rbl);
148#ifdef PORTMAP
149	(void) write_struct(PMAPFILE, (xdrproc_t)xdr_pmaplist_ptr, &list_pml);
150#endif
151
152}
153
154void
155read_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}
180