1/*
2 * $NetBSD: rpcb_stat.c,v 1.2 2000/07/04 20:27:40 matt Exp $
3 * $FreeBSD$
4 */
5/*-
6 * SPDX-License-Identifier: BSD-3-Clause
7 *
8 * Copyright (c) 2009, Sun Microsystems, Inc.
9 * All rights reserved.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions are met:
13 * - Redistributions of source code must retain the above copyright notice,
14 *   this list of conditions and the following disclaimer.
15 * - Redistributions in binary form must reproduce the above copyright notice,
16 *   this list of conditions and the following disclaimer in the documentation
17 *   and/or other materials provided with the distribution.
18 * - Neither the name of Sun Microsystems, Inc. nor the names of its
19 *   contributors may be used to endorse or promote products derived
20 *   from this software without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
23 * AND 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 THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
26 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
27 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
28 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
29 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
30 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
31 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
32 * POSSIBILITY OF SUCH DAMAGE.
33 */
34/* #pragma ident   "@(#)rpcb_stat.c 1.7     94/04/25 SMI" */
35
36/*
37 * rpcb_stat.c
38 * Allows for gathering of statistics
39 *
40 * Copyright (c) 1990 by Sun Microsystems, Inc.
41 */
42
43#include <netconfig.h>
44#include <rpc/rpc.h>
45#include <rpc/rpcb_prot.h>
46#include <sys/stat.h>
47#ifdef PORTMAP
48#include <rpc/pmap_prot.h>
49#endif
50#include <stdlib.h>
51#include <string.h>
52#include "rpcbind.h"
53
54static rpcb_stat_byvers inf;
55
56void
57rpcbs_init(void)
58{
59
60}
61
62void
63rpcbs_procinfo(rpcvers_t rtype, rpcproc_t proc)
64{
65	switch (rtype + 2) {
66#ifdef PORTMAP
67	case PMAPVERS:		/* version 2 */
68		if (proc > rpcb_highproc_2)
69			return;
70		break;
71#endif
72	case RPCBVERS:		/* version 3 */
73		if (proc > rpcb_highproc_3)
74			return;
75		break;
76	case RPCBVERS4:		/* version 4 */
77		if (proc > rpcb_highproc_4)
78			return;
79		break;
80	default: return;
81	}
82	inf[rtype].info[proc]++;
83	return;
84}
85
86void
87rpcbs_set(rpcvers_t rtype, bool_t success)
88{
89	if ((rtype >= RPCBVERS_STAT) || (success == FALSE))
90		return;
91	inf[rtype].setinfo++;
92	return;
93}
94
95void
96rpcbs_unset(rpcvers_t rtype, bool_t success)
97{
98	if ((rtype >= RPCBVERS_STAT) || (success == FALSE))
99		return;
100	inf[rtype].unsetinfo++;
101	return;
102}
103
104void
105rpcbs_getaddr(rpcvers_t rtype, rpcprog_t prog, rpcvers_t vers, char *netid,
106	      char *uaddr)
107{
108	rpcbs_addrlist *al;
109	struct netconfig *nconf;
110
111	if (rtype >= RPCBVERS_STAT)
112		return;
113	for (al = inf[rtype].addrinfo; al; al = al->next) {
114
115		if(al->netid == NULL)
116			return;
117		if ((al->prog == prog) && (al->vers == vers) &&
118		    (strcmp(al->netid, netid) == 0)) {
119			if ((uaddr == NULL) || (uaddr[0] == 0))
120				al->failure++;
121			else
122				al->success++;
123			return;
124		}
125	}
126	nconf = rpcbind_get_conf(netid);
127	if (nconf == NULL) {
128		return;
129	}
130	al = (rpcbs_addrlist *) malloc(sizeof (rpcbs_addrlist));
131	if (al == NULL) {
132		return;
133	}
134	al->prog = prog;
135	al->vers = vers;
136	al->netid = nconf->nc_netid;
137	if ((uaddr == NULL) || (uaddr[0] == 0)) {
138		al->failure = 1;
139		al->success = 0;
140	} else {
141		al->failure = 0;
142		al->success = 1;
143	}
144	al->next = inf[rtype].addrinfo;
145	inf[rtype].addrinfo = al;
146}
147
148void
149rpcbs_rmtcall(rpcvers_t rtype, rpcproc_t rpcbproc, rpcprog_t prog,
150	      rpcvers_t vers, rpcproc_t proc, char *netid, rpcblist_ptr rbl)
151{
152	rpcbs_rmtcalllist *rl;
153	struct netconfig *nconf;
154
155	if (rtype >= RPCBVERS_STAT)
156		return;
157	for (rl = inf[rtype].rmtinfo; rl; rl = rl->next) {
158
159		if(rl->netid == NULL)
160			return;
161
162		if ((rl->prog == prog) && (rl->vers == vers) &&
163		    (rl->proc == proc) &&
164		    (strcmp(rl->netid, netid) == 0)) {
165			if ((rbl == NULL) ||
166			    (rbl->rpcb_map.r_vers != vers))
167				rl->failure++;
168			else
169				rl->success++;
170			if (rpcbproc == RPCBPROC_INDIRECT)
171				rl->indirect++;
172			return;
173		}
174	}
175	nconf = rpcbind_get_conf(netid);
176	if (nconf == NULL) {
177		return;
178	}
179	rl = (rpcbs_rmtcalllist *) malloc(sizeof (rpcbs_rmtcalllist));
180	if (rl == NULL) {
181		return;
182	}
183	rl->prog = prog;
184	rl->vers = vers;
185	rl->proc = proc;
186	rl->netid = nconf->nc_netid;
187	if ((rbl == NULL) ||
188		    (rbl->rpcb_map.r_vers != vers)) {
189		rl->failure = 1;
190		rl->success = 0;
191	} else {
192		rl->failure = 0;
193		rl->success = 1;
194	}
195	rl->indirect = 1;
196	rl->next = inf[rtype].rmtinfo;
197	inf[rtype].rmtinfo = rl;
198	return;
199}
200
201void *
202rpcbproc_getstat(void *arg __unused, struct svc_req *req __unused,
203    SVCXPRT *xprt __unused, rpcvers_t versnum __unused)
204{
205	return (void *)&inf;
206}
207