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