[net-next-2.6.git] / arch / frv / kernel / sysctl.c

/* sysctl.c: implementation of /proc/sys files relating to FRV specifically
 *
 * Copyright (C) 2004 Red Hat, Inc. All Rights Reserved.
 * Written by David Howells (dhowells@redhat.com)
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version
 * 2 of the License, or (at your option) any later version.
 */

#include <linux/sysctl.h>
#include <linux/proc_fs.h>
#include <linux/init.h>
#include <asm/uaccess.h>

static const char frv_cache_wback[] = "wback";
static const char frv_cache_wthru[] = "wthru";

static void frv_change_dcache_mode(unsigned long newmode)
{
	unsigned long flags, hsr0;

	local_irq_save(flags);

	hsr0 = __get_HSR(0);
	hsr0 &= ~HSR0_DCE;
	__set_HSR(0, hsr0);

	asm volatile("	dcef	@(gr0,gr0),#1	\n"
		     "	membar			\n"
		     : : : "memory"
		     );

	hsr0 = (hsr0 & ~HSR0_CBM) | newmode;
	__set_HSR(0, hsr0);
	hsr0 |= HSR0_DCE;
	__set_HSR(0, hsr0);

	local_irq_restore(flags);

	//printk("HSR0 now %08lx\n", hsr0);
}

/*****************************************************************************/
/*
 * handle requests to dynamically switch the write caching mode delivered by /proc
 */
static int procctl_frv_cachemode(ctl_table *table, int write,
				 void __user *buffer, size_t *lenp,
				 loff_t *ppos)
{
	unsigned long hsr0;
	char buff[8];
	int len;

	len = *lenp;

	if (write) {
		/* potential state change */
		if (len <= 1 || len > sizeof(buff) - 1)
			return -EINVAL;

		if (copy_from_user(buff, buffer, len) != 0)
			return -EFAULT;

		if (buff[len - 1] == '\n')
			buff[len - 1] = '\0';
		else
			buff[len] = '\0';

		if (strcmp(buff, frv_cache_wback) == 0) {
			/* switch dcache into write-back mode */
			frv_change_dcache_mode(HSR0_CBM_COPY_BACK);
			return 0;
		}

		if (strcmp(buff, frv_cache_wthru) == 0) {
			/* switch dcache into write-through mode */
			frv_change_dcache_mode(HSR0_CBM_WRITE_THRU);
			return 0;
		}

		return -EINVAL;
	}

	/* read the state */
	if (*ppos > 0) {
		*lenp = 0;
		return 0;
	}

	hsr0 = __get_HSR(0);
	switch (hsr0 & HSR0_CBM) {
	case HSR0_CBM_WRITE_THRU:
		memcpy(buff, frv_cache_wthru, sizeof(frv_cache_wthru) - 1);
		buff[sizeof(frv_cache_wthru) - 1] = '\n';
		len = sizeof(frv_cache_wthru);
		break;
	default:
		memcpy(buff, frv_cache_wback, sizeof(frv_cache_wback) - 1);
		buff[sizeof(frv_cache_wback) - 1] = '\n';
		len = sizeof(frv_cache_wback);
		break;
	}

	if (len > *lenp)
		len = *lenp;

	if (copy_to_user(buffer, buff, len) != 0)
		return -EFAULT;

	*lenp = len;
	*ppos = len;
	return 0;

} /* end procctl_frv_cachemode() */

/*****************************************************************************/
/*
 * permit the mm_struct the nominated process is using have its MMU context ID pinned
 */
#ifdef CONFIG_MMU
static int procctl_frv_pin_cxnr(ctl_table *table, int write,
				void __user *buffer, size_t *lenp,
				loff_t *ppos)
{
	pid_t pid;
	char buff[16], *p;
	int len;

	len = *lenp;

	if (write) {
		/* potential state change */
		if (len <= 1 || len > sizeof(buff) - 1)
			return -EINVAL;

		if (copy_from_user(buff, buffer, len) != 0)
			return -EFAULT;

		if (buff[len - 1] == '\n')
			buff[len - 1] = '\0';
		else
			buff[len] = '\0';

		pid = simple_strtoul(buff, &p, 10);
		if (*p)
			return -EINVAL;

		return cxn_pin_by_pid(pid);
	}

	/* read the currently pinned CXN */
	if (*ppos > 0) {
		*lenp = 0;
		return 0;
	}

	len = snprintf(buff, sizeof(buff), "%d\n", cxn_pinned);
	if (len > *lenp)
		len = *lenp;

	if (copy_to_user(buffer, buff, len) != 0)
		return -EFAULT;

	*lenp = len;
	*ppos = len;
	return 0;

} /* end procctl_frv_pin_cxnr() */
#endif

/*
 * FR-V specific sysctls
 */
static struct ctl_table frv_table[] =
{
	{
		.procname 	= "cache-mode",
		.data		= NULL,
		.maxlen		= 0,
		.mode		= 0644,
		.proc_handler	= procctl_frv_cachemode,
	},
#ifdef CONFIG_MMU
	{
		.procname	= "pin-cxnr",
		.data		= NULL,
		.maxlen		= 0,
		.mode		= 0644,
		.proc_handler	= procctl_frv_pin_cxnr
	},
#endif
	{}
};

/*
 * Use a temporary sysctl number. Horrid, but will be cleaned up in 2.6
 * when all the PM interfaces exist nicely.
 */
static struct ctl_table frv_dir_table[] =
{
	{
		.procname	= "frv",
		.mode 		= 0555,
		.child		= frv_table
	},
	{}
};

/*
 * Initialize power interface
 */
static int __init frv_sysctl_init(void)
{
	register_sysctl_table(frv_dir_table);
	return 0;
}

__initcall(frv_sysctl_init);
Commit	Line	Data
1da177e4 LT	1	/* sysctl.c: implementation of /proc/sys files relating to FRV specifically
	2	*
	3	* Copyright (C) 2004 Red Hat, Inc. All Rights Reserved.
	4	* Written by David Howells (dhowells@redhat.com)
	5	*
	6	* This program is free software; you can redistribute it and/or
	7	* modify it under the terms of the GNU General Public License
	8	* as published by the Free Software Foundation; either version
	9	* 2 of the License, or (at your option) any later version.
	10	*/
	11
1da177e4 LT	12	#include <linux/sysctl.h>
	13	#include <linux/proc_fs.h>
	14	#include <linux/init.h>
	15	#include <asm/uaccess.h>
	16
	17	static const char frv_cache_wback[] = "wback";
	18	static const char frv_cache_wthru[] = "wthru";
	19
	20	static void frv_change_dcache_mode(unsigned long newmode)
	21	{
	22	unsigned long flags, hsr0;
	23
	24	local_irq_save(flags);
	25
	26	hsr0 = __get_HSR(0);
	27	hsr0 &= ~HSR0_DCE;
	28	__set_HSR(0, hsr0);
	29
	30	asm volatile(" dcef @(gr0,gr0),#1 \n"
	31	" membar \n"
	32	: : : "memory"
	33	);
	34
	35	hsr0 = (hsr0 & ~HSR0_CBM) \| newmode;
	36	__set_HSR(0, hsr0);
	37	hsr0 \|= HSR0_DCE;
	38	__set_HSR(0, hsr0);
	39
	40	local_irq_restore(flags);
	41
	42	//printk("HSR0 now %08lx\n", hsr0);
	43	}
	44
	45	/*****************************************************************************/
	46	/*
	47	* handle requests to dynamically switch the write caching mode delivered by /proc
	48	*/
fc244475 JB	49	static int procctl_frv_cachemode(ctl_table *table, int write,
	50	void __user buffer, size_t lenp,
	51	loff_t *ppos)
1da177e4 LT	52	{
	53	unsigned long hsr0;
	54	char buff[8];
	55	int len;
	56
	57	len = *lenp;
	58
	59	if (write) {
	60	/* potential state change */
	61	if (len <= 1 \|\| len > sizeof(buff) - 1)
	62	return -EINVAL;
	63
	64	if (copy_from_user(buff, buffer, len) != 0)
	65	return -EFAULT;
	66
	67	if (buff[len - 1] == '\n')
	68	buff[len - 1] = '\0';
	69	else
	70	buff[len] = '\0';
	71
	72	if (strcmp(buff, frv_cache_wback) == 0) {
	73	/* switch dcache into write-back mode */
	74	frv_change_dcache_mode(HSR0_CBM_COPY_BACK);
	75	return 0;
	76	}
	77
	78	if (strcmp(buff, frv_cache_wthru) == 0) {
	79	/* switch dcache into write-through mode */
	80	frv_change_dcache_mode(HSR0_CBM_WRITE_THRU);
	81	return 0;
	82	}
	83
	84	return -EINVAL;
	85	}
	86
	87	/* read the state */
fc244475	88	if (*ppos > 0) {
1da177e4 LT	89	*lenp = 0;
	90	return 0;
	91	}
	92
	93	hsr0 = __get_HSR(0);
	94	switch (hsr0 & HSR0_CBM) {
	95	case HSR0_CBM_WRITE_THRU:
	96	memcpy(buff, frv_cache_wthru, sizeof(frv_cache_wthru) - 1);
	97	buff[sizeof(frv_cache_wthru) - 1] = '\n';
	98	len = sizeof(frv_cache_wthru);
	99	break;
	100	default:
	101	memcpy(buff, frv_cache_wback, sizeof(frv_cache_wback) - 1);
	102	buff[sizeof(frv_cache_wback) - 1] = '\n';
	103	len = sizeof(frv_cache_wback);
	104	break;
	105	}
	106
	107	if (len > *lenp)
	108	len = *lenp;
	109
	110	if (copy_to_user(buffer, buff, len) != 0)
	111	return -EFAULT;
	112
	113	*lenp = len;
fc244475	114	*ppos = len;
1da177e4 LT	115	return 0;
	116
	117	} /* end procctl_frv_cachemode() */
	118
	119	/*****************************************************************************/
	120	/*
	121	* permit the mm_struct the nominated process is using have its MMU context ID pinned
	122	*/
	123	#ifdef CONFIG_MMU
fc244475 JB	124	static int procctl_frv_pin_cxnr(ctl_table *table, int write,
	125	void __user buffer, size_t lenp,
	126	loff_t *ppos)
1da177e4 LT	127	{
	128	pid_t pid;
	129	char buff[16], *p;
	130	int len;
	131
	132	len = *lenp;
	133
	134	if (write) {
	135	/* potential state change */
	136	if (len <= 1 \|\| len > sizeof(buff) - 1)
	137	return -EINVAL;
	138
	139	if (copy_from_user(buff, buffer, len) != 0)
	140	return -EFAULT;
	141
	142	if (buff[len - 1] == '\n')
	143	buff[len - 1] = '\0';
	144	else
	145	buff[len] = '\0';
	146
	147	pid = simple_strtoul(buff, &p, 10);
	148	if (*p)
	149	return -EINVAL;
	150
	151	return cxn_pin_by_pid(pid);
	152	}
	153
	154	/* read the currently pinned CXN */
fc244475	155	if (*ppos > 0) {
1da177e4 LT	156	*lenp = 0;
	157	return 0;
	158	}
	159
	160	len = snprintf(buff, sizeof(buff), "%d\n", cxn_pinned);
	161	if (len > *lenp)
	162	len = *lenp;
	163
	164	if (copy_to_user(buffer, buff, len) != 0)
	165	return -EFAULT;
	166
	167	*lenp = len;
fc244475	168	*ppos = len;
1da177e4 LT	169	return 0;
	170
	171	} /* end procctl_frv_pin_cxnr() */
	172	#endif
	173
	174	/*
	175	* FR-V specific sysctls
	176	*/
	177	static struct ctl_table frv_table[] =
	178	{
317ed68c	179	{
317ed68c EB	180	.procname = "cache-mode",
	181	.data = NULL,
	182	.maxlen = 0,
	183	.mode = 0644,
6d456111	184	.proc_handler = procctl_frv_cachemode,
317ed68c	185	},
1da177e4	186	#ifdef CONFIG_MMU
317ed68c	187	{
317ed68c EB	188	.procname = "pin-cxnr",
	189	.data = NULL,
	190	.maxlen = 0,
	191	.mode = 0644,
6d456111	192	.proc_handler = procctl_frv_pin_cxnr
317ed68c	193	},
1da177e4	194	#endif
317ed68c	195	{}
1da177e4 LT	196	};
	197
	198	/*
	199	* Use a temporary sysctl number. Horrid, but will be cleaned up in 2.6
	200	* when all the PM interfaces exist nicely.
	201	*/
1da177e4 LT	202	static struct ctl_table frv_dir_table[] =
1da177e4 LT	203	{
317ed68c	204	{
317ed68c EB	205	.procname = "frv",
	206	.mode = 0555,
	207	.child = frv_table
	208	},
	209	{}
1da177e4 LT	210	};
	211
	212	/*
	213	* Initialize power interface
	214	*/
	215	static int __init frv_sysctl_init(void)
	216	{
0b4d4147	217	register_sysctl_table(frv_dir_table);
1da177e4 LT	218	return 0;
	219	}
	220
	221	__initcall(frv_sysctl_init);