/* * linux/fs/lockd/xdr.c * * XDR support for lockd and the lock client. * * Copyright (C) 1995, 1996 Olaf Kirch <okir@monad.swb.de> */ #include <linux/config.h> #include <linux/types.h> #include <linux/sched.h> #include <linux/utsname.h> #include <linux/nfs.h> #include <linux/sunrpc/xdr.h> #include <linux/sunrpc/clnt.h> #include <linux/sunrpc/svc.h> #include <linux/sunrpc/stats.h> #include <linux/lockd/lockd.h> #include <linux/lockd/sm_inter.h> #define NLMDBG_FACILITY NLMDBG_XDR static inline loff_t s32_to_loff_t(__s32 offset) { return (loff_t)offset; } static inline __s32 loff_t_to_s32(loff_t offset) { __s32 res; if (offset >= NLM_OFFSET_MAX) res = NLM_OFFSET_MAX; else if (offset <= -NLM_OFFSET_MAX) res = -NLM_OFFSET_MAX; else res = offset; return res; } /* * XDR functions for basic NLM types */ static inline u32 *nlm_decode_cookie(u32 *p, struct nlm_cookie *c) { unsigned int len; len = ntohl(*p++); if(len==0) { c->len=4; memset(c->data, 0, 4); /* hockeypux brain damage */ } else if(len<=NLM_MAXCOOKIELEN) { c->len=len; memcpy(c->data, p, len); p+=XDR_QUADLEN(len); } else { printk(KERN_NOTICE "lockd: bad cookie size %d (only cookies under %d bytes are supported.)\n", len, NLM_MAXCOOKIELEN); return NULL; } return p; } static inline u32 * nlm_encode_cookie(u32 *p, struct nlm_cookie *c) { *p++ = htonl(c->len); memcpy(p, c->data, c->len); p+=XDR_QUADLEN(c->len); return p; } static inline u32 * nlm_decode_fh(u32 *p, struct nfs_fh *f) { unsigned int len; if ((len = ntohl(*p++)) != NFS2_FHSIZE) { printk(KERN_NOTICE "lockd: bad fhandle size %d (should be %d)\n", len, NFS2_FHSIZE); return NULL; } f->size = NFS2_FHSIZE; memset(f->data, 0, sizeof(f->data)); memcpy(f->data, p, NFS2_FHSIZE); return p + XDR_QUADLEN(NFS2_FHSIZE); } static inline u32 * nlm_encode_fh(u32 *p, struct nfs_fh *f) { *p++ = htonl(NFS2_FHSIZE); memcpy(p, f->data, NFS2_FHSIZE); return p + XDR_QUADLEN(NFS2_FHSIZE); } /* * Encode and decode owner handle */ static inline u32 * nlm_decode_oh(u32 *p, struct xdr_netobj *oh) { return xdr_decode_netobj(p, oh); } static inline u32 * nlm_encode_oh(u32 *p, struct xdr_netobj *oh) { return xdr_encode_netobj(p, oh); } static inline u32 * nlm_decode_lock(u32 *p, struct nlm_lock *lock) { struct file_lock *fl = &lock->fl; s32 start, len, end; if (!(p = xdr_decode_string_inplace(p, &lock->caller, &lock->len, NLM_MAXSTRLEN)) || !(p = nlm_decode_fh(p, &lock->fh)) || !(p = nlm_decode_oh(p, &lock->oh))) return NULL; locks_init_lock(fl); fl->fl_owner = current->files; fl->fl_pid = ntohl(*p++); fl->fl_flags = FL_POSIX; fl->fl_type = F_RDLCK; /* as good as anything else */ start = ntohl(*p++); len = ntohl(*p++); end = start + len - 1; fl->fl_start = s32_to_loff_t(start); if (len == 0 || end < 0) fl->fl_end = OFFSET_MAX; else fl->fl_end = s32_to_loff_t(end); return p; } /* * Encode a lock as part of an NLM call */ static u32 * nlm_encode_lock(u32 *p, struct nlm_lock *lock) { struct file_lock *fl = &lock->fl; __s32 start, len; if (!(p = xdr_encode_string(p, lock->caller)) || !(p = nlm_encode_fh(p, &lock->fh)) || !(p = nlm_encode_oh(p, &lock->oh))) return NULL; if (fl->fl_start > NLM_OFFSET_MAX || (fl->fl_end > NLM_OFFSET_MAX && fl->fl_end != OFFSET_MAX)) return NULL; start = loff_t_to_s32(fl->fl_start); if (fl->fl_end == OFFSET_MAX) len = 0; else len = loff_t_to_s32(fl->fl_end - fl->fl_start + 1); *p++ = htonl(fl->fl_pid); *p++ = htonl(start); *p++ = htonl(len); return p; } /* * Encode result of a TEST/TEST_MSG call */ static u32 * nlm_encode_testres(u32 *p, struct nlm_res *resp) { s32 start, len; if (!(p = nlm_encode_cookie(p, &resp->cookie))) return NULL; *p++ = resp->status; if (resp->status == nlm_lck_denied) { struct file_lock *fl = &resp->lock.fl; *p++ = (fl->fl_type == F_RDLCK)? xdr_zero : xdr_one; *p++ = htonl(fl->fl_pid); /* Encode owner handle. */ if (!(p = xdr_encode_netobj(p, &resp->lock.oh))) return NULL; start = loff_t_to_s32(fl->fl_start); if (fl->fl_end == OFFSET_MAX) len = 0; else len = loff_t_to_s32(fl->fl_end - fl->fl_start + 1); *p++ = htonl(start); *p++ = htonl(len); } return p; } /* * First, the server side XDR functions */ int nlmsvc_decode_testargs(struct svc_rqst *rqstp, u32 *p, nlm_args *argp) { u32 exclusive; if (!(p = nlm_decode_cookie(p, &argp->cookie))) return 0; exclusive = ntohl(*p++); if (!(p = nlm_decode_lock(p, &argp->lock))) return 0; if (exclusive) argp->lock.fl.fl_type = F_WRLCK; return xdr_argsize_check(rqstp, p); } int nlmsvc_encode_testres(struct svc_rqst *rqstp, u32 *p, struct nlm_res *resp) { if (!(p = nlm_encode_testres(p, resp))) return 0; return xdr_ressize_check(rqstp, p); } int nlmsvc_decode_lockargs(struct svc_rqst *rqstp, u32 *p, nlm_args *argp) { u32 exclusive; if (!(p = nlm_decode_cookie(p, &argp->cookie))) return 0; argp->block = ntohl(*p++); exclusive = ntohl(*p++); if (!(p = nlm_decode_lock(p, &argp->lock))) return 0; if (exclusive) argp->lock.fl.fl_type = F_WRLCK; argp->reclaim = ntohl(*p++); argp->state = ntohl(*p++); argp->monitor = 1; /* monitor client by default */ return xdr_argsize_check(rqstp, p); } int nlmsvc_decode_cancargs(struct svc_rqst *rqstp, u32 *p, nlm_args *argp) { u32 exclusive; if (!(p = nlm_decode_cookie(p, &argp->cookie))) return 0; argp->block = ntohl(*p++); exclusive = ntohl(*p++); if (!(p = nlm_decode_lock(p, &argp->lock))) return 0; if (exclusive) argp->lock.fl.fl_type = F_WRLCK; return xdr_argsize_check(rqstp, p); } int nlmsvc_decode_unlockargs(struct svc_rqst *rqstp, u32 *p, nlm_args *argp) { if (!(p = nlm_decode_cookie(p, &argp->cookie)) || !(p = nlm_decode_lock(p, &argp->lock))) return 0; argp->lock.fl.fl_type = F_UNLCK; return xdr_argsize_check(rqstp, p); } int nlmsvc_decode_shareargs(struct svc_rqst *rqstp, u32 *p, nlm_args *argp) { struct nlm_lock *lock = &argp->lock; memset(lock, 0, sizeof(*lock)); locks_init_lock(&lock->fl); lock->fl.fl_pid = ~(u32) 0; if (!(p = nlm_decode_cookie(p, &argp->cookie)) || !(p = xdr_decode_string_inplace(p, &lock->caller, &lock->len, NLM_MAXSTRLEN)) || !(p = nlm_decode_fh(p, &lock->fh)) || !(p = nlm_decode_oh(p, &lock->oh))) return 0; argp->fsm_mode = ntohl(*p++); argp->fsm_access = ntohl(*p++); return xdr_argsize_check(rqstp, p); } int nlmsvc_encode_shareres(struct svc_rqst *rqstp, u32 *p, struct nlm_res *resp) { if (!(p = nlm_encode_cookie(p, &resp->cookie))) return 0; *p++ = resp->status; *p++ = xdr_zero; /* sequence argument */ return xdr_ressize_check(rqstp, p); } int nlmsvc_encode_res(struct svc_rqst *rqstp, u32 *p, struct nlm_res *resp) { if (!(p = nlm_encode_cookie(p, &resp->cookie))) return 0; *p++ = resp->status; return xdr_ressize_check(rqstp, p); } int nlmsvc_decode_notify(struct svc_rqst *rqstp, u32 *p, struct nlm_args *argp) { struct nlm_lock *lock = &argp->lock; if (!(p = xdr_decode_string_inplace(p, &lock->caller, &lock->len, NLM_MAXSTRLEN))) return 0; argp->state = ntohl(*p++); return xdr_argsize_check(rqstp, p); } int nlmsvc_decode_reboot(struct svc_rqst *rqstp, u32 *p, struct nlm_reboot *argp) { if (!(p = xdr_decode_string_inplace(p, &argp->mon, &argp->len, SM_MAXSTRLEN))) return 0; argp->state = ntohl(*p++); /* Preserve the address in network byte order */ argp->addr = *p++; argp->vers = *p++; argp->proto = *p++; return xdr_argsize_check(rqstp, p); } int nlmsvc_decode_res(struct svc_rqst *rqstp, u32 *p, struct nlm_res *resp) { if (!(p = nlm_decode_cookie(p, &resp->cookie))) return 0; resp->status = ntohl(*p++); return xdr_argsize_check(rqstp, p); } int nlmsvc_decode_void(struct svc_rqst *rqstp, u32 *p, void *dummy) { return xdr_argsize_check(rqstp, p); } int nlmsvc_encode_void(struct svc_rqst *rqstp, u32 *p, void *dummy) { return xdr_ressize_check(rqstp, p); } /* * Now, the client side XDR functions */ #ifdef NLMCLNT_SUPPORT_SHARES static int nlmclt_decode_void(struct rpc_rqst *req, u32 *p, void *ptr) { return 0; } #endif static int nlmclt_encode_testargs(struct rpc_rqst *req, u32 *p, nlm_args *argp) { struct nlm_lock *lock = &argp->lock; if (!(p = nlm_encode_cookie(p, &argp->cookie))) return -EIO; *p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero; if (!(p = nlm_encode_lock(p, lock))) return -EIO; req->rq_slen = xdr_adjust_iovec(req->rq_svec, p); return 0; } static int nlmclt_decode_testres(struct rpc_rqst *req, u32 *p, struct nlm_res *resp) { if (!(p = nlm_decode_cookie(p, &resp->cookie))) return -EIO; resp->status = ntohl(*p++); if (resp->status == NLM_LCK_DENIED) { struct file_lock *fl = &resp->lock.fl; u32 excl; s32 start, len, end; memset(&resp->lock, 0, sizeof(resp->lock)); locks_init_lock(fl); excl = ntohl(*p++); fl->fl_pid = ntohl(*p++); if (!(p = nlm_decode_oh(p, &resp->lock.oh))) return -EIO; fl->fl_flags = FL_POSIX; fl->fl_type = excl? F_WRLCK : F_RDLCK; start = ntohl(*p++); len = ntohl(*p++); end = start + len - 1; fl->fl_start = s32_to_loff_t(start); if (len == 0 || end < 0) fl->fl_end = OFFSET_MAX; else fl->fl_end = s32_to_loff_t(end); } return 0; } static int nlmclt_encode_lockargs(struct rpc_rqst *req, u32 *p, nlm_args *argp) { struct nlm_lock *lock = &argp->lock; if (!(p = nlm_encode_cookie(p, &argp->cookie))) return -EIO; *p++ = argp->block? xdr_one : xdr_zero; *p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero; if (!(p = nlm_encode_lock(p, lock))) return -EIO; *p++ = argp->reclaim? xdr_one : xdr_zero; *p++ = htonl(argp->state); req->rq_slen = xdr_adjust_iovec(req->rq_svec, p); return 0; } static int nlmclt_encode_cancargs(struct rpc_rqst *req, u32 *p, nlm_args *argp) { struct nlm_lock *lock = &argp->lock; if (!(p = nlm_encode_cookie(p, &argp->cookie))) return -EIO; *p++ = argp->block? xdr_one : xdr_zero; *p++ = (lock->fl.fl_type == F_WRLCK)? xdr_one : xdr_zero; if (!(p = nlm_encode_lock(p, lock))) return -EIO; req->rq_slen = xdr_adjust_iovec(req->rq_svec, p); return 0; } static int nlmclt_encode_unlockargs(struct rpc_rqst *req, u32 *p, nlm_args *argp) { struct nlm_lock *lock = &argp->lock; if (!(p = nlm_encode_cookie(p, &argp->cookie))) return -EIO; if (!(p = nlm_encode_lock(p, lock))) return -EIO; req->rq_slen = xdr_adjust_iovec(req->rq_svec, p); return 0; } static int nlmclt_encode_res(struct rpc_rqst *req, u32 *p, struct nlm_res *resp) { if (!(p = nlm_encode_cookie(p, &resp->cookie))) return -EIO; *p++ = resp->status; req->rq_slen = xdr_adjust_iovec(req->rq_svec, p); return 0; } static int nlmclt_encode_testres(struct rpc_rqst *req, u32 *p, struct nlm_res *resp) { if (!(p = nlm_encode_testres(p, resp))) return -EIO; req->rq_slen = xdr_adjust_iovec(req->rq_svec, p); return 0; } static int nlmclt_decode_res(struct rpc_rqst *req, u32 *p, struct nlm_res *resp) { if (!(p = nlm_decode_cookie(p, &resp->cookie))) return -EIO; resp->status = ntohl(*p++); return 0; } /* * Buffer requirements for NLM */ #define NLM_void_sz 0 #define NLM_cookie_sz 1+XDR_QUADLEN(NLM_MAXCOOKIELEN) #define NLM_caller_sz 1+XDR_QUADLEN(sizeof(system_utsname.nodename)) #define NLM_netobj_sz 1+XDR_QUADLEN(XDR_MAX_NETOBJ) /* #define NLM_owner_sz 1+XDR_QUADLEN(NLM_MAXOWNER) */ #define NLM_fhandle_sz 1+XDR_QUADLEN(NFS2_FHSIZE) #define NLM_lock_sz 3+NLM_caller_sz+NLM_netobj_sz+NLM_fhandle_sz #define NLM_holder_sz 4+NLM_netobj_sz #define NLM_testargs_sz NLM_cookie_sz+1+NLM_lock_sz #define NLM_lockargs_sz NLM_cookie_sz+4+NLM_lock_sz #define NLM_cancargs_sz NLM_cookie_sz+2+NLM_lock_sz #define NLM_unlockargs_sz NLM_cookie_sz+NLM_lock_sz #define NLM_testres_sz NLM_cookie_sz+1+NLM_holder_sz #define NLM_res_sz NLM_cookie_sz+1 #define NLM_norep_sz 0 #ifndef MAX # define MAX(a, b) (((a) > (b))? (a) : (b)) #endif /* * For NLM, a void procedure really returns nothing */ #define nlmclt_decode_norep NULL #define PROC(proc, argtype, restype) \ [NLMPROC_##proc] = { \ .p_proc = NLMPROC_##proc, \ .p_encode = (kxdrproc_t) nlmclt_encode_##argtype, \ .p_decode = (kxdrproc_t) nlmclt_decode_##restype, \ .p_bufsiz = MAX(NLM_##argtype##_sz, NLM_##restype##_sz) << 2 \ } static struct rpc_procinfo nlm_procedures[] = { PROC(TEST, testargs, testres), PROC(LOCK, lockargs, res), PROC(CANCEL, cancargs, res), PROC(UNLOCK, unlockargs, res), PROC(GRANTED, testargs, res), PROC(TEST_MSG, testargs, norep), PROC(LOCK_MSG, lockargs, norep), PROC(CANCEL_MSG, cancargs, norep), PROC(UNLOCK_MSG, unlockargs, norep), PROC(GRANTED_MSG, testargs, norep), PROC(TEST_RES, testres, norep), PROC(LOCK_RES, res, norep), PROC(CANCEL_RES, res, norep), PROC(UNLOCK_RES, res, norep), PROC(GRANTED_RES, res, norep), #ifdef NLMCLNT_SUPPORT_SHARES PROC(SHARE, shareargs, shareres), PROC(UNSHARE, shareargs, shareres), PROC(NM_LOCK, lockargs, res), PROC(FREE_ALL, notify, void), #endif }; static struct rpc_version nlm_version1 = { .number = 1, .nrprocs = 16, .procs = nlm_procedures, }; static struct rpc_version nlm_version3 = { .number = 3, .nrprocs = 24, .procs = nlm_procedures, }; #ifdef CONFIG_LOCKD_V4 extern struct rpc_version nlm_version4; #endif static struct rpc_version * nlm_versions[] = { [1] = &nlm_version1, [3] = &nlm_version3, #ifdef CONFIG_LOCKD_V4 [4] = &nlm_version4, #endif }; static struct rpc_stat nlm_stats; struct rpc_program nlm_program = { .name = "lockd", .number = NLM_PROGRAM, .nrvers = sizeof(nlm_versions) / sizeof(nlm_versions[0]), .version = nlm_versions, .stats = &nlm_stats, }; #ifdef RPC_DEBUG const char *nlmdbg_cookie2a(const struct nlm_cookie *cookie) { /* * We can get away with a static buffer because we're only * called with BKL held. */ static char buf[2*NLM_MAXCOOKIELEN+1]; int i; int len = sizeof(buf); char *p = buf; len--; /* allow for trailing \0 */ if (len < 3) return "???"; for (i = 0 ; i < cookie->len ; i++) { if (len < 2) { strcpy(p-3, "..."); break; } sprintf(p, "%02x", cookie->data[i]); p += 2; len -= 2; } *p = '\0'; return buf; } #endif