1/*
2 * File:         arch/blackfin/mach-common/cplbinfo.c
3 * Based on:
4 * Author:       Sonic Zhang <sonic.zhang@analog.com>
5 *
6 * Created:      Jan. 2005
7 * Description:  Display CPLB status
8 *
9 * Modified:
10 *               Copyright 2004-2006 Analog Devices Inc.
11 *
12 * Bugs:         Enter bugs at http://blackfin.uclinux.org/
13 *
14 * This program is free software; you can redistribute it and/or modify
15 * it under the terms of the GNU General Public License as published by
16 * the Free Software Foundation; either version 2 of the License, or
17 * (at your option) any later version.
18 *
19 * This program is distributed in the hope that it will be useful,
20 * but WITHOUT ANY WARRANTY; without even the implied warranty of
21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22 * GNU General Public License for more details.
23 *
24 * You should have received a copy of the GNU General Public License
25 * along with this program; if not, see the file COPYING, or write
26 * to the Free Software Foundation, Inc.,
27 * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
28 */
29
30#include <linux/module.h>
31#include <linux/kernel.h>
32#include <linux/init.h>
33#include <linux/proc_fs.h>
34
35#include <asm/current.h>
36#include <asm/uaccess.h>
37#include <asm/system.h>
38
39#include <asm/cplb.h>
40#include <asm/blackfin.h>
41
42#define CPLB_I 1
43#define CPLB_D 2
44
45#define SYNC_SYS    SSYNC()
46#define SYNC_CORE   CSYNC()
47
48#define CPLB_BIT_PAGESIZE 0x30000
49
50static int page_size_table[4] = {
51	0x00000400,		/* 1K */
52	0x00001000,		/* 4K */
53	0x00100000,		/* 1M */
54	0x00400000		/* 4M */
55};
56
57static char page_size_string_table[][4] = { "1K", "4K", "1M", "4M" };
58
59static int cplb_find_entry(unsigned long *cplb_addr,
60			   unsigned long *cplb_data, unsigned long addr,
61			   unsigned long data)
62{
63	int ii;
64
65	for (ii = 0; ii < 16; ii++)
66		if (addr >= cplb_addr[ii] && addr < cplb_addr[ii] +
67		    page_size_table[(cplb_data[ii] & CPLB_BIT_PAGESIZE) >> 16]
68			&& (cplb_data[ii] == data))
69			return ii;
70
71	return -1;
72}
73
74static char *cplb_print_entry(char *buf, int type)
75{
76	unsigned long *p_addr = dpdt_table;
77	unsigned long *p_data = dpdt_table + 1;
78	unsigned long *p_icount = dpdt_swapcount_table;
79	unsigned long *p_ocount = dpdt_swapcount_table + 1;
80	unsigned long *cplb_addr = (unsigned long *)DCPLB_ADDR0;
81	unsigned long *cplb_data = (unsigned long *)DCPLB_DATA0;
82	int entry = 0, used_cplb = 0;
83
84	if (type == CPLB_I) {
85		buf += sprintf(buf, "Instruction CPLB entry:\n");
86		p_addr = ipdt_table;
87		p_data = ipdt_table + 1;
88		p_icount = ipdt_swapcount_table;
89		p_ocount = ipdt_swapcount_table + 1;
90		cplb_addr = (unsigned long *)ICPLB_ADDR0;
91		cplb_data = (unsigned long *)ICPLB_DATA0;
92	} else
93		buf += sprintf(buf, "Data CPLB entry:\n");
94
95	buf += sprintf(buf, "Address\t\tData\tSize\tValid\tLocked\tSwapin\
96\tiCount\toCount\n");
97
98	while (*p_addr != 0xffffffff) {
99		entry = cplb_find_entry(cplb_addr, cplb_data, *p_addr, *p_data);
100		if (entry >= 0)
101			used_cplb |= 1 << entry;
102
103		buf +=
104		    sprintf(buf,
105			    "0x%08lx\t0x%05lx\t%s\t%c\t%c\t%2d\t%ld\t%ld\n",
106			    *p_addr, *p_data,
107			    page_size_string_table[(*p_data & 0x30000) >> 16],
108			    (*p_data & CPLB_VALID) ? 'Y' : 'N',
109			    (*p_data & CPLB_LOCK) ? 'Y' : 'N', entry, *p_icount,
110			    *p_ocount);
111
112		p_addr += 2;
113		p_data += 2;
114		p_icount += 2;
115		p_ocount += 2;
116	}
117
118	if (used_cplb != 0xffff) {
119		buf += sprintf(buf, "Unused/mismatched CPLBs:\n");
120
121		for (entry = 0; entry < 16; entry++)
122			if (0 == ((1 << entry) & used_cplb)) {
123				int flags = cplb_data[entry];
124				buf +=
125				    sprintf(buf,
126					    "%2d: 0x%08lx\t0x%05x\t%s\t%c\t%c\n",
127					    entry, cplb_addr[entry], flags,
128					    page_size_string_table[(flags &
129								    0x30000) >>
130								   16],
131					    (flags & CPLB_VALID) ? 'Y' : 'N',
132					    (flags & CPLB_LOCK) ? 'Y' : 'N');
133			}
134	}
135
136	buf += sprintf(buf, "\n");
137
138	return buf;
139}
140
141static int cplbinfo_proc_output(char *buf)
142{
143	char *p;
144
145	p = buf;
146
147	p += sprintf(p,
148		     "------------------ CPLB Information ------------------\n\n");
149
150	if (bfin_read_IMEM_CONTROL() & ENICPLB)
151		p = cplb_print_entry(p, CPLB_I);
152	else
153		p += sprintf(p, "Instruction CPLB is disabled.\n\n");
154
155	if (bfin_read_DMEM_CONTROL() & ENDCPLB)
156		p = cplb_print_entry(p, CPLB_D);
157	else
158		p += sprintf(p, "Data CPLB is disabled.\n");
159
160	return p - buf;
161}
162
163static int cplbinfo_read_proc(char *page, char **start, off_t off,
164			      int count, int *eof, void *data)
165{
166	int len;
167
168	len = cplbinfo_proc_output(page);
169	if (len <= off + count)
170		*eof = 1;
171	*start = page + off;
172	len -= off;
173	if (len > count)
174		len = count;
175	if (len < 0)
176		len = 0;
177	return len;
178}
179
180static int cplbinfo_write_proc(struct file *file, const char __user *buffer,
181			       unsigned long count, void *data)
182{
183	printk(KERN_INFO "Reset the CPLB swap in/out counts.\n");
184	memset(ipdt_swapcount_table, 0, MAX_SWITCH_I_CPLBS * sizeof(unsigned long));
185	memset(dpdt_swapcount_table, 0, MAX_SWITCH_D_CPLBS * sizeof(unsigned long));
186
187	return count;
188}
189
190static int __init cplbinfo_init(void)
191{
192	struct proc_dir_entry *entry;
193
194	if ((entry = create_proc_entry("cplbinfo", 0, NULL)) == NULL) {
195		return -ENOMEM;
196	}
197
198	entry->read_proc = cplbinfo_read_proc;
199	entry->write_proc = cplbinfo_write_proc;
200	entry->data = NULL;
201
202	return 0;
203}
204
205static void __exit cplbinfo_exit(void)
206{
207	remove_proc_entry("cplbinfo", NULL);
208}
209
210module_init(cplbinfo_init);
211module_exit(cplbinfo_exit);
212