bd478ac2ba39991817e400e3094f087b7e47e316
[openafs.git] / src / sys / rmtsyss.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  * 
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 /* Daemon that implements remote procedure call service for non-vendor system
11  * calls (currently setpag and pioctl). The AFS cache manager daemon, afsd,
12  * currently fires up this module, when the "-rmtsys" flag is given.
13  * This module resides in the lib/afs/librmtsys.a library.
14  */
15 #include <afsconfig.h>
16 #include <afs/param.h>
17
18
19 #include <sys/types.h>
20 #include <sys/ioctl.h>
21 #include <afs/vice.h>
22 #include <netdb.h>
23 #include <netinet/in.h>
24 #include <sys/stat.h>
25 #include <sys/file.h>
26 #include <stdio.h>
27 #include <errno.h>
28 #include <rx/xdr.h>
29 #include <errno.h>
30 #include <signal.h>
31 #include <string.h>
32 #include <stdarg.h>
33 /*#include <afs/cellconfig.h>*/
34 #include "rmtsys.h"
35 #include "sys_prototypes.h"
36
37 #define NFS_EXPORTER        1   /* To probably handle more later */
38 #define PSETPAG             110 /* Also defined in afs/afs_pioctl.c */
39 #define PIOCTL_HEADER       6   /* # of words prepended to special pioctl */
40 #define PSetClientContext   99  /* Sets up caller's creds */
41 #define N_SECURITY_OBJECTS  1   /* No real security yet */
42
43 #define SETCLIENTCONTEXT(BLOB, host, uid, group0, group1, cmd, exportertype) { \
44            (BLOB)[0] = (host); \
45            (BLOB)[1] = (uid); \
46            (BLOB)[2] = (group0); \
47            (BLOB)[3] = (group1); \
48            (BLOB)[4] = (cmd); \
49            (BLOB)[5] = (exportertype); \
50 }
51
52
53 /* Main routine of the remote AFS system call server. The calling process will
54  * never return; this is currently called from afsd (when "-rmtsys" is passed
55  * as a parameter) */
56 void
57 rmtsysd(void)
58 {
59 /*  void catchsig(int); */
60     struct rx_securityClass *(securityObjects[N_SECURITY_OBJECTS]);
61     struct rx_service *service;
62
63     /* 
64      * Ignore SIGHUP signal since apparently is sent to the processes that
65      * start up from /etc/rc for some systems like hpux and aix3.1... 
66      */
67     signal(SIGHUP, SIG_IGN);
68
69     /* Initialize the rx-based RMTSYS server */
70     if (rx_Init(htons(AFSCONF_RMTSYSPORT)) < 0)
71         rmt_Quit("rx_init");
72     securityObjects[0] = rxnull_NewServerSecurityObject();
73     if (securityObjects[0] == (struct rx_securityClass *)0)
74         rmt_Quit("rxnull_NewServerSecurityObject");
75     service =
76         rx_NewService(0, RMTSYS_SERVICEID, AFSCONF_RMTSYSSERVICE,
77                       securityObjects, N_SECURITY_OBJECTS,
78                       RMTSYS_ExecuteRequest);
79     if (service == NULL)
80         rmt_Quit("rx_NewService");
81     /* One may wish to tune some default RX params for better performance
82      * at some point... */
83     rx_SetMaxProcs(service, 2);
84     rx_StartServer(1);          /* Donate this process to the server process pool */
85 }
86
87
88 /* Implements the remote setpag(2) call. Note that unlike the standard call,
89  * here we also get back the new pag value; we need this so that the caller
90  * can add it to its group list via setgroups() */
91 afs_int32
92 SRMTSYS_SetPag(struct rx_call *call, clientcred *creds, afs_int32 *newpag, 
93                afs_int32 *errornumber)
94 {
95     afs_uint32 blob[PIOCTL_HEADER];
96     struct ViceIoctl data;
97     register afs_int32 error;
98
99     *errornumber = 0;
100     SETCLIENTCONTEXT(blob, rx_HostOf(call->conn->peer), creds->uid,
101                      creds->group0, creds->group1, PSETPAG, NFS_EXPORTER);
102     data.in = (caddr_t) blob;
103     data.in_size = sizeof(blob);
104     data.out = (caddr_t) blob;
105     data.out_size = sizeof(blob);
106     /* force local pioctl call */
107     error = lpioctl(0, _VICEIOCTL(PSetClientContext), (char *)&data, 1);
108     if (error) {
109         if (errno == PSETPAG) {
110             *newpag = blob[0];  /* new pag value */
111         } else
112             *errornumber = errno;
113     }
114     return 0;
115 }
116
117
118 /* Implements the remote pioctl(2) call */
119 afs_int32
120 SRMTSYS_Pioctl(struct rx_call *call, clientcred *creds, char *path, 
121                afs_int32 cmd, afs_int32 follow, rmtbulk *InData, 
122                rmtbulk *OutData, afs_int32 *errornumber)
123 {
124     register afs_int32 error;
125     struct ViceIoctl data;
126     char *pathp = path;
127     afs_uint32 blob[PIOCTL_HEADER];
128
129     *errornumber = 0;
130     SETCLIENTCONTEXT(blob, rx_HostOf(call->conn->peer), creds->uid,
131                      creds->group0, creds->group1, cmd, NFS_EXPORTER);
132     data.in =
133         (char *)malloc(InData->rmtbulk_len +
134                        PIOCTL_HEADER * sizeof(afs_int32));
135     if (!data.in)
136         return (-1);            /* helpless here */
137     if (!strcmp(path, NIL_PATHP))
138         pathp = (char *)0;      /* It meant to be NIL */
139     memcpy(data.in, blob, sizeof(blob));
140     inparam_conversion(cmd, InData->rmtbulk_val, 1);
141     memcpy(data.in + sizeof(blob), InData->rmtbulk_val, InData->rmtbulk_len);
142     data.in_size = InData->rmtbulk_len + PIOCTL_HEADER * sizeof(afs_int32);
143     data.out = OutData->rmtbulk_val;
144     data.out_size = OutData->rmtbulk_len;
145     /* force local pioctl call */
146     error = lpioctl(pathp, _VICEIOCTL(PSetClientContext), (char *)&data, follow);
147     if (error) {
148         *errornumber = errno;
149     } else {
150         /* Send the results back in network order */
151         outparam_conversion(cmd, data.out, 0);
152     }
153     free(data.in);
154     /* Note that we return success (i.e. 0) even when pioctl fails; that's
155      * because the actual errno is passed back via 'errornumber' and this call
156      * MUST return success error in order to get that OUT params back (YUCK!)
157      */
158     return (0);
159 }
160
161 void
162 rmt_Quit(char *msg, ...)
163 {
164     va_list ap;
165     
166     va_start(ap, msg);
167     vfprintf(stderr, msg, ap);
168     va_end(ap);
169     exit(1);
170 }