| /* | 
 |  * Copyright (c) 2006 Oracle.  All rights reserved. | 
 |  * | 
 |  * This software is available to you under a choice of one of two | 
 |  * licenses.  You may choose to be licensed under the terms of the GNU | 
 |  * General Public License (GPL) Version 2, available from the file | 
 |  * COPYING in the main directory of this source tree, or the | 
 |  * OpenIB.org BSD license below: | 
 |  * | 
 |  *     Redistribution and use in source and binary forms, with or | 
 |  *     without modification, are permitted provided that the following | 
 |  *     conditions are met: | 
 |  * | 
 |  *      - Redistributions of source code must retain the above | 
 |  *        copyright notice, this list of conditions and the following | 
 |  *        disclaimer. | 
 |  * | 
 |  *      - Redistributions in binary form must reproduce the above | 
 |  *        copyright notice, this list of conditions and the following | 
 |  *        disclaimer in the documentation and/or other materials | 
 |  *        provided with the distribution. | 
 |  * | 
 |  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, | 
 |  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF | 
 |  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND | 
 |  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS | 
 |  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN | 
 |  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN | 
 |  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE | 
 |  * SOFTWARE. | 
 |  * | 
 |  */ | 
 | #include <linux/percpu.h> | 
 | #include <linux/seq_file.h> | 
 | #include <linux/slab.h> | 
 | #include <linux/proc_fs.h> | 
 |  | 
 | #include "rds.h" | 
 |  | 
 | /* | 
 |  * This file implements a getsockopt() call which copies a set of fixed | 
 |  * sized structs into a user-specified buffer as a means of providing | 
 |  * read-only information about RDS. | 
 |  * | 
 |  * For a given information source there are a given number of fixed sized | 
 |  * structs at a given time.  The structs are only copied if the user-specified | 
 |  * buffer is big enough.  The destination pages that make up the buffer | 
 |  * are pinned for the duration of the copy. | 
 |  * | 
 |  * This gives us the following benefits: | 
 |  * | 
 |  * - simple implementation, no copy "position" across multiple calls | 
 |  * - consistent snapshot of an info source | 
 |  * - atomic copy works well with whatever locking info source has | 
 |  * - one portable tool to get rds info across implementations | 
 |  * - long-lived tool can get info without allocating | 
 |  * | 
 |  * at the following costs: | 
 |  * | 
 |  * - info source copy must be pinned, may be "large" | 
 |  */ | 
 |  | 
 | struct rds_info_iterator { | 
 | 	struct page **pages; | 
 | 	void *addr; | 
 | 	unsigned long offset; | 
 | }; | 
 |  | 
 | static DEFINE_SPINLOCK(rds_info_lock); | 
 | static rds_info_func rds_info_funcs[RDS_INFO_LAST - RDS_INFO_FIRST + 1]; | 
 |  | 
 | void rds_info_register_func(int optname, rds_info_func func) | 
 | { | 
 | 	int offset = optname - RDS_INFO_FIRST; | 
 |  | 
 | 	BUG_ON(optname < RDS_INFO_FIRST || optname > RDS_INFO_LAST); | 
 |  | 
 | 	spin_lock(&rds_info_lock); | 
 | 	BUG_ON(rds_info_funcs[offset]); | 
 | 	rds_info_funcs[offset] = func; | 
 | 	spin_unlock(&rds_info_lock); | 
 | } | 
 | EXPORT_SYMBOL_GPL(rds_info_register_func); | 
 |  | 
 | void rds_info_deregister_func(int optname, rds_info_func func) | 
 | { | 
 | 	int offset = optname - RDS_INFO_FIRST; | 
 |  | 
 | 	BUG_ON(optname < RDS_INFO_FIRST || optname > RDS_INFO_LAST); | 
 |  | 
 | 	spin_lock(&rds_info_lock); | 
 | 	BUG_ON(rds_info_funcs[offset] != func); | 
 | 	rds_info_funcs[offset] = NULL; | 
 | 	spin_unlock(&rds_info_lock); | 
 | } | 
 | EXPORT_SYMBOL_GPL(rds_info_deregister_func); | 
 |  | 
 | /* | 
 |  * Typically we hold an atomic kmap across multiple rds_info_copy() calls | 
 |  * because the kmap is so expensive.  This must be called before using blocking | 
 |  * operations while holding the mapping and as the iterator is torn down. | 
 |  */ | 
 | void rds_info_iter_unmap(struct rds_info_iterator *iter) | 
 | { | 
 | 	if (iter->addr) { | 
 | 		kunmap_atomic(iter->addr, KM_USER0); | 
 | 		iter->addr = NULL; | 
 | 	} | 
 | } | 
 |  | 
 | /* | 
 |  * get_user_pages() called flush_dcache_page() on the pages for us. | 
 |  */ | 
 | void rds_info_copy(struct rds_info_iterator *iter, void *data, | 
 | 		   unsigned long bytes) | 
 | { | 
 | 	unsigned long this; | 
 |  | 
 | 	while (bytes) { | 
 | 		if (!iter->addr) | 
 | 			iter->addr = kmap_atomic(*iter->pages, KM_USER0); | 
 |  | 
 | 		this = min(bytes, PAGE_SIZE - iter->offset); | 
 |  | 
 | 		rdsdebug("page %p addr %p offset %lu this %lu data %p " | 
 | 			  "bytes %lu\n", *iter->pages, iter->addr, | 
 | 			  iter->offset, this, data, bytes); | 
 |  | 
 | 		memcpy(iter->addr + iter->offset, data, this); | 
 |  | 
 | 		data += this; | 
 | 		bytes -= this; | 
 | 		iter->offset += this; | 
 |  | 
 | 		if (iter->offset == PAGE_SIZE) { | 
 | 			kunmap_atomic(iter->addr, KM_USER0); | 
 | 			iter->addr = NULL; | 
 | 			iter->offset = 0; | 
 | 			iter->pages++; | 
 | 		} | 
 | 	} | 
 | } | 
 | EXPORT_SYMBOL_GPL(rds_info_copy); | 
 |  | 
 | /* | 
 |  * @optval points to the userspace buffer that the information snapshot | 
 |  * will be copied into. | 
 |  * | 
 |  * @optlen on input is the size of the buffer in userspace.  @optlen | 
 |  * on output is the size of the requested snapshot in bytes. | 
 |  * | 
 |  * This function returns -errno if there is a failure, particularly -ENOSPC | 
 |  * if the given userspace buffer was not large enough to fit the snapshot. | 
 |  * On success it returns the positive number of bytes of each array element | 
 |  * in the snapshot. | 
 |  */ | 
 | int rds_info_getsockopt(struct socket *sock, int optname, char __user *optval, | 
 | 			int __user *optlen) | 
 | { | 
 | 	struct rds_info_iterator iter; | 
 | 	struct rds_info_lengths lens; | 
 | 	unsigned long nr_pages = 0; | 
 | 	unsigned long start; | 
 | 	unsigned long i; | 
 | 	rds_info_func func; | 
 | 	struct page **pages = NULL; | 
 | 	int ret; | 
 | 	int len; | 
 | 	int total; | 
 |  | 
 | 	if (get_user(len, optlen)) { | 
 | 		ret = -EFAULT; | 
 | 		goto out; | 
 | 	} | 
 |  | 
 | 	/* check for all kinds of wrapping and the like */ | 
 | 	start = (unsigned long)optval; | 
 | 	if (len < 0 || len + PAGE_SIZE - 1 < len || start + len < start) { | 
 | 		ret = -EINVAL; | 
 | 		goto out; | 
 | 	} | 
 |  | 
 | 	/* a 0 len call is just trying to probe its length */ | 
 | 	if (len == 0) | 
 | 		goto call_func; | 
 |  | 
 | 	nr_pages = (PAGE_ALIGN(start + len) - (start & PAGE_MASK)) | 
 | 			>> PAGE_SHIFT; | 
 |  | 
 | 	pages = kmalloc(nr_pages * sizeof(struct page *), GFP_KERNEL); | 
 | 	if (!pages) { | 
 | 		ret = -ENOMEM; | 
 | 		goto out; | 
 | 	} | 
 | 	ret = get_user_pages_fast(start, nr_pages, 1, pages); | 
 | 	if (ret != nr_pages) { | 
 | 		if (ret > 0) | 
 | 			nr_pages = ret; | 
 | 		else | 
 | 			nr_pages = 0; | 
 | 		ret = -EAGAIN; /* XXX ? */ | 
 | 		goto out; | 
 | 	} | 
 |  | 
 | 	rdsdebug("len %d nr_pages %lu\n", len, nr_pages); | 
 |  | 
 | call_func: | 
 | 	func = rds_info_funcs[optname - RDS_INFO_FIRST]; | 
 | 	if (!func) { | 
 | 		ret = -ENOPROTOOPT; | 
 | 		goto out; | 
 | 	} | 
 |  | 
 | 	iter.pages = pages; | 
 | 	iter.addr = NULL; | 
 | 	iter.offset = start & (PAGE_SIZE - 1); | 
 |  | 
 | 	func(sock, len, &iter, &lens); | 
 | 	BUG_ON(lens.each == 0); | 
 |  | 
 | 	total = lens.nr * lens.each; | 
 |  | 
 | 	rds_info_iter_unmap(&iter); | 
 |  | 
 | 	if (total > len) { | 
 | 		len = total; | 
 | 		ret = -ENOSPC; | 
 | 	} else { | 
 | 		len = total; | 
 | 		ret = lens.each; | 
 | 	} | 
 |  | 
 | 	if (put_user(len, optlen)) | 
 | 		ret = -EFAULT; | 
 |  | 
 | out: | 
 | 	for (i = 0; pages && i < nr_pages; i++) | 
 | 		put_page(pages[i]); | 
 | 	kfree(pages); | 
 |  | 
 | 	return ret; | 
 | } |