1/*-
2 * SPDX-License-Identifier: BSD-4-Clause
3 *
4 * Copyright (c) 1995, 1996
5 *	Bill Paul <wpaul@ctr.columbia.edu>.  All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 *    notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 *    notice, this list of conditions and the following disclaimer in the
14 *    documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 *    must display the following acknowledgement:
17 *	This product includes software developed by Bill Paul.
18 * 4. Neither the name of the author nor the names of any co-contributors
19 *    may be used to endorse or promote products derived from this software
20 *    without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY Bill Paul AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED.  IN NO EVENT SHALL Bill Paul OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * SUCH DAMAGE.
33 */
34
35#include <sys/cdefs.h>
36#include "ypxfrd.h"
37
38#include <stdio.h>
39#include <stdlib.h>
40#include <unistd.h>
41#include <string.h>
42#include <errno.h>
43#include <sys/types.h>
44#include <sys/param.h>
45#include <sys/uio.h>
46#include <sys/fcntl.h>
47#include <machine/endian.h>
48#include "ypxfrd_extern.h"
49
50int forked = 0;
51int children = 0;
52int fp = 0;
53
54static bool_t
55xdr_my_xfr(register XDR *xdrs, xfr *objp)
56{
57	unsigned char buf[XFRBLOCKSIZE];
58
59	while (1) {
60		if ((objp->xfr_u.xfrblock_buf.xfrblock_buf_len =
61		    read(fp, &buf, XFRBLOCKSIZE)) != -1) {
62			objp->ok = TRUE;
63			objp->xfr_u.xfrblock_buf.xfrblock_buf_val = (char *)&buf;
64		} else {
65			objp->ok = FALSE;
66			objp->xfr_u.xfrstat = XFR_READ_ERR;
67			yp_error("read error: %s", strerror(errno));
68		}
69
70		/* Serialize */
71		if (!xdr_xfr(xdrs, objp))
72			return(FALSE);
73		if (objp->ok == FALSE)
74			return(TRUE);
75		if (objp->xfr_u.xfrblock_buf.xfrblock_buf_len < XFRBLOCKSIZE) {
76			objp->ok = FALSE;
77			objp->xfr_u.xfrstat = XFR_DONE;
78			if (!xdr_xfr(xdrs, objp))
79				return(FALSE);
80			return(TRUE);
81		}
82	}
83}
84
85struct xfr *
86ypxfrd_getmap_1_svc(ypxfr_mapname *argp, struct svc_req *rqstp)
87{
88	static struct xfr  result;
89	char buf[MAXPATHLEN];
90
91	result.ok = FALSE;
92	result.xfr_u.xfrstat = XFR_DENIED;
93
94	if (yp_validdomain(argp->xfrdomain)) {
95		return(&result);
96	}
97
98	if (yp_access(argp->xfrmap, (struct svc_req *)rqstp)) {
99		return(&result);
100	}
101
102	snprintf (buf, sizeof(buf), "%s/%s/%s", yp_dir, argp->xfrdomain,
103							argp->xfrmap);
104	if (access(buf, R_OK) == -1) {
105		result.xfr_u.xfrstat = XFR_ACCESS;
106		return(&result);
107	}
108
109	if (argp->xfr_db_type != XFR_DB_BSD_HASH &&
110	    argp->xfr_db_type != XFR_DB_ANY) {
111		result.xfr_u.xfrstat = XFR_DB_TYPE_MISMATCH;
112		return(&result);
113	}
114
115#if BYTE_ORDER == LITTLE_ENDIAN
116	if (argp->xfr_byte_order == XFR_ENDIAN_BIG) {
117#else
118	if (argp->xfr_byte_order == XFR_ENDIAN_LITTLE) {
119#endif
120		result.xfr_u.xfrstat = XFR_DB_ENDIAN_MISMATCH;
121		return(&result);
122	}
123
124#ifndef DEBUG
125	if (children < MAX_CHILDREN && fork()) {
126		children++;
127		forked = 0;
128		return (NULL);
129	} else {
130		forked++;
131	}
132#endif
133	if ((fp = open(buf, O_RDONLY)) == -1) {
134		result.xfr_u.xfrstat = XFR_READ_ERR;
135		return(&result);
136	}
137
138	/* Start sending the file. */
139
140	svc_sendreply(rqstp->rq_xprt, (xdrproc_t)xdr_my_xfr, &result);
141
142	close(fp);
143
144	return (NULL);
145}
146