bb5fc1bb37f7570973610a8895d42d25699bfba8
[safe/jmp/linux-2.6] / fs / lockd / mon.c
1 /*
2  * linux/fs/lockd/mon.c
3  *
4  * The kernel statd client.
5  *
6  * Copyright (C) 1996, Olaf Kirch <okir@monad.swb.de>
7  */
8
9 #include <linux/types.h>
10 #include <linux/utsname.h>
11 #include <linux/kernel.h>
12 #include <linux/sunrpc/clnt.h>
13 #include <linux/sunrpc/xprtsock.h>
14 #include <linux/sunrpc/svc.h>
15 #include <linux/lockd/lockd.h>
16 #include <linux/lockd/sm_inter.h>
17
18
19 #define NLMDBG_FACILITY         NLMDBG_MONITOR
20
21 static struct rpc_clnt *        nsm_create(void);
22
23 static struct rpc_program       nsm_program;
24
25 /*
26  * Local NSM state
27  */
28 int                             nsm_local_state;
29
30 /*
31  * Common procedure for SM_MON/SM_UNMON calls
32  */
33 static int
34 nsm_mon_unmon(struct nsm_handle *nsm, u32 proc, struct nsm_res *res)
35 {
36         struct rpc_clnt *clnt;
37         int             status;
38         struct nsm_args args = {
39                 .addr           = nsm_addr_in(nsm)->sin_addr.s_addr,
40                 .prog           = NLM_PROGRAM,
41                 .vers           = 3,
42                 .proc           = NLMPROC_NSM_NOTIFY,
43                 .mon_name       = nsm->sm_mon_name,
44         };
45         struct rpc_message msg = {
46                 .rpc_argp       = &args,
47                 .rpc_resp       = res,
48         };
49
50         clnt = nsm_create();
51         if (IS_ERR(clnt)) {
52                 status = PTR_ERR(clnt);
53                 dprintk("lockd: failed to create NSM upcall transport, "
54                                 "status=%d\n", status);
55                 goto out;
56         }
57
58         memset(res, 0, sizeof(*res));
59
60         msg.rpc_proc = &clnt->cl_procinfo[proc];
61         status = rpc_call_sync(clnt, &msg, 0);
62         if (status < 0)
63                 dprintk("lockd: NSM upcall RPC failed, status=%d\n",
64                                 status);
65         else
66                 status = 0;
67         rpc_shutdown_client(clnt);
68  out:
69         return status;
70 }
71
72 /*
73  * Set up monitoring of a remote host
74  */
75 int
76 nsm_monitor(struct nlm_host *host)
77 {
78         struct nsm_handle *nsm = host->h_nsmhandle;
79         struct nsm_res  res;
80         int             status;
81
82         dprintk("lockd: nsm_monitor(%s)\n", nsm->sm_name);
83
84         if (nsm->sm_monitored)
85                 return 0;
86
87         /*
88          * Choose whether to record the caller_name or IP address of
89          * this peer in the local rpc.statd's database.
90          */
91         nsm->sm_mon_name = nsm_use_hostnames ? nsm->sm_name : nsm->sm_addrbuf;
92
93         status = nsm_mon_unmon(nsm, SM_MON, &res);
94
95         if (status < 0 || res.status != 0)
96                 printk(KERN_NOTICE "lockd: cannot monitor %s\n", nsm->sm_name);
97         else
98                 nsm->sm_monitored = 1;
99         return status;
100 }
101
102 /*
103  * Cease to monitor remote host
104  */
105 int
106 nsm_unmonitor(struct nlm_host *host)
107 {
108         struct nsm_handle *nsm = host->h_nsmhandle;
109         struct nsm_res  res;
110         int             status = 0;
111
112         if (nsm == NULL)
113                 return 0;
114         host->h_nsmhandle = NULL;
115
116         if (atomic_read(&nsm->sm_count) == 1
117          && nsm->sm_monitored && !nsm->sm_sticky) {
118                 dprintk("lockd: nsm_unmonitor(%s)\n", nsm->sm_name);
119
120                 status = nsm_mon_unmon(nsm, SM_UNMON, &res);
121                 if (status < 0)
122                         printk(KERN_NOTICE "lockd: cannot unmonitor %s\n",
123                                         nsm->sm_name);
124                 else
125                         nsm->sm_monitored = 0;
126         }
127         nsm_release(nsm);
128         return status;
129 }
130
131 /*
132  * Create NSM client for the local host
133  */
134 static struct rpc_clnt *
135 nsm_create(void)
136 {
137         struct sockaddr_in      sin = {
138                 .sin_family     = AF_INET,
139                 .sin_addr.s_addr = htonl(INADDR_LOOPBACK),
140                 .sin_port       = 0,
141         };
142         struct rpc_create_args args = {
143                 .protocol       = XPRT_TRANSPORT_UDP,
144                 .address        = (struct sockaddr *)&sin,
145                 .addrsize       = sizeof(sin),
146                 .servername     = "localhost",
147                 .program        = &nsm_program,
148                 .version        = SM_VERSION,
149                 .authflavor     = RPC_AUTH_NULL,
150         };
151
152         return rpc_create(&args);
153 }
154
155 /*
156  * XDR functions for NSM.
157  *
158  * See http://www.opengroup.org/ for details on the Network
159  * Status Monitor wire protocol.
160  */
161
162 static __be32 *xdr_encode_nsm_string(__be32 *p, char *string)
163 {
164         size_t len = strlen(string);
165
166         if (len > SM_MAXSTRLEN)
167                 len = SM_MAXSTRLEN;
168         return xdr_encode_opaque(p, string, len);
169 }
170
171 /*
172  * "mon_name" specifies the host to be monitored.
173  */
174 static __be32 *xdr_encode_mon_name(__be32 *p, struct nsm_args *argp)
175 {
176         return xdr_encode_nsm_string(p, argp->mon_name);
177 }
178
179 /*
180  * The "my_id" argument specifies the hostname and RPC procedure
181  * to be called when the status manager receives notification
182  * (via the SM_NOTIFY call) that the state of host "mon_name"
183  * has changed.
184  */
185 static __be32 *xdr_encode_my_id(__be32 *p, struct nsm_args *argp)
186 {
187         p = xdr_encode_nsm_string(p, utsname()->nodename);
188         if (!p)
189                 return ERR_PTR(-EIO);
190
191         *p++ = htonl(argp->prog);
192         *p++ = htonl(argp->vers);
193         *p++ = htonl(argp->proc);
194
195         return p;
196 }
197
198 /*
199  * The "mon_id" argument specifies the non-private arguments
200  * of an SM_MON or SM_UNMON call.
201  */
202 static __be32 *xdr_encode_mon_id(__be32 *p, struct nsm_args *argp)
203 {
204         p = xdr_encode_mon_name(p, argp);
205         if (!p)
206                 return ERR_PTR(-EIO);
207
208         return xdr_encode_my_id(p, argp);
209 }
210
211 /*
212  * The "priv" argument may contain private information required
213  * by the SM_MON call. This information will be supplied in the
214  * SM_NOTIFY call.
215  *
216  * Linux provides the raw IP address of the monitored host,
217  * left in network byte order.
218  */
219 static __be32 *xdr_encode_priv(__be32 *p, struct nsm_args *argp)
220 {
221         *p++ = argp->addr;
222         *p++ = 0;
223         *p++ = 0;
224         *p++ = 0;
225
226         return p;
227 }
228
229 static int
230 xdr_encode_mon(struct rpc_rqst *rqstp, __be32 *p, struct nsm_args *argp)
231 {
232         p = xdr_encode_mon_id(p, argp);
233         if (IS_ERR(p))
234                 return PTR_ERR(p);
235
236         p = xdr_encode_priv(p, argp);
237         if (IS_ERR(p))
238                 return PTR_ERR(p);
239
240         rqstp->rq_slen = xdr_adjust_iovec(rqstp->rq_svec, p);
241         return 0;
242 }
243
244 static int
245 xdr_encode_unmon(struct rpc_rqst *rqstp, __be32 *p, struct nsm_args *argp)
246 {
247         p = xdr_encode_mon_id(p, argp);
248         if (IS_ERR(p))
249                 return PTR_ERR(p);
250         rqstp->rq_slen = xdr_adjust_iovec(rqstp->rq_svec, p);
251         return 0;
252 }
253
254 static int
255 xdr_decode_stat_res(struct rpc_rqst *rqstp, __be32 *p, struct nsm_res *resp)
256 {
257         resp->status = ntohl(*p++);
258         resp->state = ntohl(*p++);
259         dprintk("nsm: xdr_decode_stat_res status %d state %d\n",
260                         resp->status, resp->state);
261         return 0;
262 }
263
264 static int
265 xdr_decode_stat(struct rpc_rqst *rqstp, __be32 *p, struct nsm_res *resp)
266 {
267         resp->state = ntohl(*p++);
268         return 0;
269 }
270
271 #define SM_my_name_sz   (1+XDR_QUADLEN(SM_MAXSTRLEN))
272 #define SM_my_id_sz     (SM_my_name_sz+3)
273 #define SM_mon_name_sz  (1+XDR_QUADLEN(SM_MAXSTRLEN))
274 #define SM_mon_id_sz    (SM_mon_name_sz+SM_my_id_sz)
275 #define SM_priv_sz      (XDR_QUADLEN(SM_PRIV_SIZE))
276 #define SM_mon_sz       (SM_mon_id_sz+SM_priv_sz)
277 #define SM_monres_sz    2
278 #define SM_unmonres_sz  1
279
280 static struct rpc_procinfo      nsm_procedures[] = {
281 [SM_MON] = {
282                 .p_proc         = SM_MON,
283                 .p_encode       = (kxdrproc_t) xdr_encode_mon,
284                 .p_decode       = (kxdrproc_t) xdr_decode_stat_res,
285                 .p_arglen       = SM_mon_sz,
286                 .p_replen       = SM_monres_sz,
287                 .p_statidx      = SM_MON,
288                 .p_name         = "MONITOR",
289         },
290 [SM_UNMON] = {
291                 .p_proc         = SM_UNMON,
292                 .p_encode       = (kxdrproc_t) xdr_encode_unmon,
293                 .p_decode       = (kxdrproc_t) xdr_decode_stat,
294                 .p_arglen       = SM_mon_id_sz,
295                 .p_replen       = SM_unmonres_sz,
296                 .p_statidx      = SM_UNMON,
297                 .p_name         = "UNMONITOR",
298         },
299 };
300
301 static struct rpc_version       nsm_version1 = {
302                 .number         = 1,
303                 .nrprocs        = ARRAY_SIZE(nsm_procedures),
304                 .procs          = nsm_procedures
305 };
306
307 static struct rpc_version *     nsm_version[] = {
308         [1] = &nsm_version1,
309 };
310
311 static struct rpc_stat          nsm_stats;
312
313 static struct rpc_program       nsm_program = {
314                 .name           = "statd",
315                 .number         = SM_PROGRAM,
316                 .nrvers         = ARRAY_SIZE(nsm_version),
317                 .version        = nsm_version,
318                 .stats          = &nsm_stats
319 };