1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate * Copyright (c) 1988-1999 by Sun Microsystems, Inc.
3*0Sstevel@tonic-gate * All rights reserved.
4*0Sstevel@tonic-gate */
5*0Sstevel@tonic-gate
6*0Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI"
7*0Sstevel@tonic-gate
8*0Sstevel@tonic-gate #include <stdio.h>
9*0Sstevel@tonic-gate #include <stdlib.h>
10*0Sstevel@tonic-gate #include <rpc/rpc.h>
11*0Sstevel@tonic-gate #include <errno.h>
12*0Sstevel@tonic-gate #include <syslog.h>
13*0Sstevel@tonic-gate #include <rpc/nettype.h>
14*0Sstevel@tonic-gate #include <netconfig.h>
15*0Sstevel@tonic-gate #include <netdir.h>
16*0Sstevel@tonic-gate #include <tiuser.h>
17*0Sstevel@tonic-gate #include <fcntl.h>
18*0Sstevel@tonic-gate #include <string.h>
19*0Sstevel@tonic-gate #include <rpc/svc.h>
20*0Sstevel@tonic-gate #include <locale.h>
21*0Sstevel@tonic-gate
22*0Sstevel@tonic-gate extern int __rpc_negotiate_uid(int);
23*0Sstevel@tonic-gate
24*0Sstevel@tonic-gate /*
25*0Sstevel@tonic-gate * The highest level interface for server creation.
26*0Sstevel@tonic-gate * Copied from svc_generic.c and cmd/keyserv/key_generic.c, but adapted
27*0Sstevel@tonic-gate * to work only for TPI_CLTS semantics, and to be called only once
28*0Sstevel@tonic-gate * from kwarnd.c. Returns 1 (interface created) on success and 0
29*0Sstevel@tonic-gate * (no interfaces created) on failure.
30*0Sstevel@tonic-gate */
31*0Sstevel@tonic-gate int
svc_create_local_service(void (* dispatch)(),u_long prognum,u_long versnum,char * nettype,char * servname)32*0Sstevel@tonic-gate svc_create_local_service(void (*dispatch) (), /* Dispatch function */
33*0Sstevel@tonic-gate u_long prognum, /* Program number */
34*0Sstevel@tonic-gate u_long versnum, /* Version number */
35*0Sstevel@tonic-gate char *nettype, /* Networktype token */
36*0Sstevel@tonic-gate char *servname) /* name of the srvc */
37*0Sstevel@tonic-gate {
38*0Sstevel@tonic-gate int num = 0;
39*0Sstevel@tonic-gate SVCXPRT *xprt;
40*0Sstevel@tonic-gate struct netconfig *nconf;
41*0Sstevel@tonic-gate struct t_bind *bind_addr;
42*0Sstevel@tonic-gate void *net;
43*0Sstevel@tonic-gate int fd;
44*0Sstevel@tonic-gate struct nd_hostserv ns;
45*0Sstevel@tonic-gate struct nd_addrlist *nas;
46*0Sstevel@tonic-gate
47*0Sstevel@tonic-gate if ((net = __rpc_setconf(nettype)) == 0) {
48*0Sstevel@tonic-gate (void) syslog(LOG_ERR,
49*0Sstevel@tonic-gate gettext("svc_create: could not read netconfig database"));
50*0Sstevel@tonic-gate return (0);
51*0Sstevel@tonic-gate }
52*0Sstevel@tonic-gate while (nconf = __rpc_getconf(net)) {
53*0Sstevel@tonic-gate if ((strcmp(nconf->nc_protofmly, NC_LOOPBACK)) ||
54*0Sstevel@tonic-gate (nconf->nc_semantics != NC_TPI_COTS_ORD))
55*0Sstevel@tonic-gate continue;
56*0Sstevel@tonic-gate
57*0Sstevel@tonic-gate if ((fd = t_open(nconf->nc_device, O_RDWR, NULL)) < 0) {
58*0Sstevel@tonic-gate (void) syslog(LOG_ERR,
59*0Sstevel@tonic-gate gettext("svc_create: %s: cannot open connection: %s"),
60*0Sstevel@tonic-gate nconf->nc_netid, t_errlist[t_errno]);
61*0Sstevel@tonic-gate break;
62*0Sstevel@tonic-gate }
63*0Sstevel@tonic-gate
64*0Sstevel@tonic-gate /*
65*0Sstevel@tonic-gate * Negotiate for returning the uid of the caller.
66*0Sstevel@tonic-gate * This should be done before enabling the endpoint for
67*0Sstevel@tonic-gate * service via t_bind() (called in svc_tli_create())
68*0Sstevel@tonic-gate * so that requests to kwarnd contain the uid.
69*0Sstevel@tonic-gate */
70*0Sstevel@tonic-gate if (__rpc_negotiate_uid(fd) != 0) {
71*0Sstevel@tonic-gate syslog(LOG_ERR,
72*0Sstevel@tonic-gate gettext("Could not negotiate for"
73*0Sstevel@tonic-gate " uid with loopback transport %s"),
74*0Sstevel@tonic-gate nconf->nc_netid);
75*0Sstevel@tonic-gate t_close(fd);
76*0Sstevel@tonic-gate break;
77*0Sstevel@tonic-gate }
78*0Sstevel@tonic-gate
79*0Sstevel@tonic-gate /* LINTED pointer alignment */
80*0Sstevel@tonic-gate bind_addr = (struct t_bind *) t_alloc(fd, T_BIND, T_ADDR);
81*0Sstevel@tonic-gate if ((bind_addr == NULL)) {
82*0Sstevel@tonic-gate (void) t_close(fd);
83*0Sstevel@tonic-gate (void) syslog(LOG_ERR,
84*0Sstevel@tonic-gate gettext("svc_create: t_alloc failed\n"));
85*0Sstevel@tonic-gate break;
86*0Sstevel@tonic-gate }
87*0Sstevel@tonic-gate ns.h_host = HOST_SELF;
88*0Sstevel@tonic-gate ns.h_serv = servname;
89*0Sstevel@tonic-gate if (!netdir_getbyname(nconf, &ns, &nas)) {
90*0Sstevel@tonic-gate /* Copy the address */
91*0Sstevel@tonic-gate bind_addr->addr.len = nas->n_addrs->len;
92*0Sstevel@tonic-gate (void) memcpy(bind_addr->addr.buf, nas->n_addrs->buf,
93*0Sstevel@tonic-gate (int) nas->n_addrs->len);
94*0Sstevel@tonic-gate bind_addr->qlen = 8;
95*0Sstevel@tonic-gate netdir_free((char *) nas, ND_ADDRLIST);
96*0Sstevel@tonic-gate } else {
97*0Sstevel@tonic-gate (void) syslog(LOG_ERR,
98*0Sstevel@tonic-gate gettext("svc_create: no well known "
99*0Sstevel@tonic-gate "address for %s on %s\n"),
100*0Sstevel@tonic-gate servname, nconf->nc_netid);
101*0Sstevel@tonic-gate (void) t_free((char *) bind_addr, T_BIND);
102*0Sstevel@tonic-gate bind_addr = NULL;
103*0Sstevel@tonic-gate }
104*0Sstevel@tonic-gate
105*0Sstevel@tonic-gate xprt = svc_tli_create(fd, nconf, bind_addr, 0, 0);
106*0Sstevel@tonic-gate if (bind_addr)
107*0Sstevel@tonic-gate (void) t_free((char *) bind_addr, T_BIND);
108*0Sstevel@tonic-gate if (xprt == NULL) {
109*0Sstevel@tonic-gate (void) t_close(fd);
110*0Sstevel@tonic-gate (void) syslog(LOG_ERR,
111*0Sstevel@tonic-gate gettext("svc_create: svc_tli_create failed\n"));
112*0Sstevel@tonic-gate break;
113*0Sstevel@tonic-gate } else {
114*0Sstevel@tonic-gate (void) rpcb_unset(prognum, versnum, nconf);
115*0Sstevel@tonic-gate if (svc_reg(xprt, prognum, versnum, dispatch, nconf)
116*0Sstevel@tonic-gate == FALSE) {
117*0Sstevel@tonic-gate (void) syslog(LOG_ERR,
118*0Sstevel@tonic-gate gettext("svc_create: cannot"
119*0Sstevel@tonic-gate " register %d vers %d on %s"),
120*0Sstevel@tonic-gate prognum, versnum, nconf->nc_netid);
121*0Sstevel@tonic-gate SVC_DESTROY(xprt); /* also t_closes fd */
122*0Sstevel@tonic-gate break;
123*0Sstevel@tonic-gate }
124*0Sstevel@tonic-gate num = 1;
125*0Sstevel@tonic-gate break;
126*0Sstevel@tonic-gate }
127*0Sstevel@tonic-gate }
128*0Sstevel@tonic-gate __rpc_endconf(net);
129*0Sstevel@tonic-gate return (num);
130*0Sstevel@tonic-gate }
131