[Blackfin] arch: add implicit icplb for the bootrom so we can use the utility functio...
[linux-2.6] / arch / blackfin / kernel / cplb-mpu / cplbmgr.c
1 /*
2  *               Blackfin CPLB exception handling.
3  *               Copyright 2004-2007 Analog Devices Inc.
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 2 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, see the file COPYING, or write
17  * to the Free Software Foundation, Inc.,
18  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
19  */
20 #include <linux/module.h>
21 #include <linux/mm.h>
22
23 #include <asm/blackfin.h>
24 #include <asm/cplbinit.h>
25 #include <asm/mmu_context.h>
26
27 #ifdef CONFIG_BFIN_ICACHE
28
29 #define FAULT_RW        (1 << 16)
30 #define FAULT_USERSUPV  (1 << 17)
31
32 int page_mask_nelts;
33 int page_mask_order;
34 unsigned long *current_rwx_mask;
35
36 int nr_dcplb_miss, nr_icplb_miss, nr_icplb_supv_miss, nr_dcplb_prot;
37 int nr_cplb_flush;
38
39 static inline void disable_dcplb(void)
40 {
41         unsigned long ctrl;
42         SSYNC();
43         ctrl = bfin_read_DMEM_CONTROL();
44         ctrl &= ~ENDCPLB;
45         bfin_write_DMEM_CONTROL(ctrl);
46         SSYNC();
47 }
48
49 static inline void enable_dcplb(void)
50 {
51         unsigned long ctrl;
52         SSYNC();
53         ctrl = bfin_read_DMEM_CONTROL();
54         ctrl |= ENDCPLB;
55         bfin_write_DMEM_CONTROL(ctrl);
56         SSYNC();
57 }
58
59 static inline void disable_icplb(void)
60 {
61         unsigned long ctrl;
62         SSYNC();
63         ctrl = bfin_read_IMEM_CONTROL();
64         ctrl &= ~ENICPLB;
65         bfin_write_IMEM_CONTROL(ctrl);
66         SSYNC();
67 }
68
69 static inline void enable_icplb(void)
70 {
71         unsigned long ctrl;
72         SSYNC();
73         ctrl = bfin_read_IMEM_CONTROL();
74         ctrl |= ENICPLB;
75         bfin_write_IMEM_CONTROL(ctrl);
76         SSYNC();
77 }
78
79 /*
80  * Given the contents of the status register, return the index of the
81  * CPLB that caused the fault.
82  */
83 static inline int faulting_cplb_index(int status)
84 {
85         int signbits = __builtin_bfin_norm_fr1x32(status & 0xFFFF);
86         return 30 - signbits;
87 }
88
89 /*
90  * Given the contents of the status register and the DCPLB_DATA contents,
91  * return true if a write access should be permitted.
92  */
93 static inline int write_permitted(int status, unsigned long data)
94 {
95         if (status & FAULT_USERSUPV)
96                 return !!(data & CPLB_SUPV_WR);
97         else
98                 return !!(data & CPLB_USER_WR);
99 }
100
101 /* Counters to implement round-robin replacement.  */
102 static int icplb_rr_index, dcplb_rr_index;
103
104 /*
105  * Find an ICPLB entry to be evicted and return its index.
106  */
107 static int evict_one_icplb(void)
108 {
109         int i;
110         for (i = first_switched_icplb; i < MAX_CPLBS; i++)
111                 if ((icplb_tbl[i].data & CPLB_VALID) == 0)
112                         return i;
113         i = first_switched_icplb + icplb_rr_index;
114         if (i >= MAX_CPLBS) {
115                 i -= MAX_CPLBS - first_switched_icplb;
116                 icplb_rr_index -= MAX_CPLBS - first_switched_icplb;
117         }
118         icplb_rr_index++;
119         return i;
120 }
121
122 static int evict_one_dcplb(void)
123 {
124         int i;
125         for (i = first_switched_dcplb; i < MAX_CPLBS; i++)
126                 if ((dcplb_tbl[i].data & CPLB_VALID) == 0)
127                         return i;
128         i = first_switched_dcplb + dcplb_rr_index;
129         if (i >= MAX_CPLBS) {
130                 i -= MAX_CPLBS - first_switched_dcplb;
131                 dcplb_rr_index -= MAX_CPLBS - first_switched_dcplb;
132         }
133         dcplb_rr_index++;
134         return i;
135 }
136
137 static noinline int dcplb_miss(void)
138 {
139         unsigned long addr = bfin_read_DCPLB_FAULT_ADDR();
140         int status = bfin_read_DCPLB_STATUS();
141         unsigned long *mask;
142         int idx;
143         unsigned long d_data;
144
145         nr_dcplb_miss++;
146
147         d_data = CPLB_SUPV_WR | CPLB_VALID | CPLB_DIRTY | PAGE_SIZE_4KB;
148 #ifdef CONFIG_BFIN_DCACHE
149         if (addr < _ramend - DMA_UNCACHED_REGION ||
150             (reserved_mem_dcache_on && addr >= _ramend &&
151              addr < physical_mem_end)) {
152                 d_data |= CPLB_L1_CHBL | ANOMALY_05000158_WORKAROUND;
153 #ifdef CONFIG_BFIN_WT
154                 d_data |= CPLB_L1_AOW | CPLB_WT;
155 #endif
156         }
157 #endif
158         if (addr >= physical_mem_end) {
159                 if (addr >= ASYNC_BANK0_BASE && addr < ASYNC_BANK3_BASE + ASYNC_BANK3_SIZE
160                     && (status & FAULT_USERSUPV)) {
161                         addr &= ~0x3fffff;
162                         d_data &= ~PAGE_SIZE_4KB;
163                         d_data |= PAGE_SIZE_4MB;
164                 } else if (addr >= BOOT_ROM_START && addr < BOOT_ROM_START + BOOT_ROM_LENGTH
165                     && (status & (FAULT_RW | FAULT_USERSUPV)) == FAULT_USERSUPV) {
166                         addr &= ~(1 * 1024 * 1024 - 1);
167                         d_data &= ~PAGE_SIZE_4KB;
168                         d_data |= PAGE_SIZE_1MB;
169                 } else
170                         return CPLB_PROT_VIOL;
171         } else if (addr >= _ramend) {
172             d_data |= CPLB_USER_RD | CPLB_USER_WR;
173         } else {
174                 mask = current_rwx_mask;
175                 if (mask) {
176                         int page = addr >> PAGE_SHIFT;
177                         int offs = page >> 5;
178                         int bit = 1 << (page & 31);
179
180                         if (mask[offs] & bit)
181                                 d_data |= CPLB_USER_RD;
182
183                         mask += page_mask_nelts;
184                         if (mask[offs] & bit)
185                                 d_data |= CPLB_USER_WR;
186                 }
187         }
188         idx = evict_one_dcplb();
189
190         addr &= PAGE_MASK;
191         dcplb_tbl[idx].addr = addr;
192         dcplb_tbl[idx].data = d_data;
193
194         disable_dcplb();
195         bfin_write32(DCPLB_DATA0 + idx * 4, d_data);
196         bfin_write32(DCPLB_ADDR0 + idx * 4, addr);
197         enable_dcplb();
198
199         return 0;
200 }
201
202 static noinline int icplb_miss(void)
203 {
204         unsigned long addr = bfin_read_ICPLB_FAULT_ADDR();
205         int status = bfin_read_ICPLB_STATUS();
206         int idx;
207         unsigned long i_data;
208
209         nr_icplb_miss++;
210
211         /* If inside the uncached DMA region, fault.  */
212         if (addr >= _ramend - DMA_UNCACHED_REGION && addr < _ramend)
213                 return CPLB_PROT_VIOL;
214
215         if (status & FAULT_USERSUPV)
216                 nr_icplb_supv_miss++;
217
218         /*
219          * First, try to find a CPLB that matches this address.  If we
220          * find one, then the fact that we're in the miss handler means
221          * that the instruction crosses a page boundary.
222          */
223         for (idx = first_switched_icplb; idx < MAX_CPLBS; idx++) {
224                 if (icplb_tbl[idx].data & CPLB_VALID) {
225                         unsigned long this_addr = icplb_tbl[idx].addr;
226                         if (this_addr <= addr && this_addr + PAGE_SIZE > addr) {
227                                 addr += PAGE_SIZE;
228                                 break;
229                         }
230                 }
231         }
232
233         i_data = CPLB_VALID | CPLB_PORTPRIO | PAGE_SIZE_4KB;
234
235 #ifdef CONFIG_BFIN_ICACHE
236         /*
237          * Normal RAM, and possibly the reserved memory area, are
238          * cacheable.
239          */
240         if (addr < _ramend ||
241             (addr < physical_mem_end && reserved_mem_icache_on))
242                 i_data |= CPLB_L1_CHBL | ANOMALY_05000158_WORKAROUND;
243 #endif
244
245         if (addr >= physical_mem_end) {
246                 if (addr >= BOOT_ROM_START && addr < BOOT_ROM_START + BOOT_ROM_LENGTH
247                     && (status & FAULT_USERSUPV)) {
248                         addr &= ~(1 * 1024 * 1024 - 1);
249                         i_data &= ~PAGE_SIZE_4KB;
250                         i_data |= PAGE_SIZE_1MB;
251                 } else
252                     return CPLB_PROT_VIOL;
253         } else if (addr >= _ramend) {
254                 i_data |= CPLB_USER_RD;
255         } else {
256                 /*
257                  * Two cases to distinguish - a supervisor access must
258                  * necessarily be for a module page; we grant it
259                  * unconditionally (could do better here in the future).
260                  * Otherwise, check the x bitmap of the current process.
261                  */
262                 if (!(status & FAULT_USERSUPV)) {
263                         unsigned long *mask = current_rwx_mask;
264
265                         if (mask) {
266                                 int page = addr >> PAGE_SHIFT;
267                                 int offs = page >> 5;
268                                 int bit = 1 << (page & 31);
269
270                                 mask += 2 * page_mask_nelts;
271                                 if (mask[offs] & bit)
272                                         i_data |= CPLB_USER_RD;
273                         }
274                 }
275         }
276         idx = evict_one_icplb();
277         addr &= PAGE_MASK;
278         icplb_tbl[idx].addr = addr;
279         icplb_tbl[idx].data = i_data;
280
281         disable_icplb();
282         bfin_write32(ICPLB_DATA0 + idx * 4, i_data);
283         bfin_write32(ICPLB_ADDR0 + idx * 4, addr);
284         enable_icplb();
285
286         return 0;
287 }
288
289 static noinline int dcplb_protection_fault(void)
290 {
291         int status = bfin_read_DCPLB_STATUS();
292
293         nr_dcplb_prot++;
294
295         if (status & FAULT_RW) {
296                 int idx = faulting_cplb_index(status);
297                 unsigned long data = dcplb_tbl[idx].data;
298                 if (!(data & CPLB_WT) && !(data & CPLB_DIRTY) &&
299                     write_permitted(status, data)) {
300                         data |= CPLB_DIRTY;
301                         dcplb_tbl[idx].data = data;
302                         bfin_write32(DCPLB_DATA0 + idx * 4, data);
303                         return 0;
304                 }
305         }
306         return CPLB_PROT_VIOL;
307 }
308
309 int cplb_hdr(int seqstat, struct pt_regs *regs)
310 {
311         int cause = seqstat & 0x3f;
312         switch (cause) {
313         case 0x23:
314                 return dcplb_protection_fault();
315         case 0x2C:
316                 return icplb_miss();
317         case 0x26:
318                 return dcplb_miss();
319         default:
320                 return 1;
321         }
322 }
323
324 void flush_switched_cplbs(void)
325 {
326         int i;
327
328         nr_cplb_flush++;
329
330         disable_icplb();
331         for (i = first_switched_icplb; i < MAX_CPLBS; i++) {
332                 icplb_tbl[i].data = 0;
333                 bfin_write32(ICPLB_DATA0 + i * 4, 0);
334         }
335         enable_icplb();
336
337         disable_dcplb();
338         for (i = first_switched_dcplb; i < MAX_CPLBS; i++) {
339                 dcplb_tbl[i].data = 0;
340                 bfin_write32(DCPLB_DATA0 + i * 4, 0);
341         }
342         enable_dcplb();
343 }
344
345 void set_mask_dcplbs(unsigned long *masks)
346 {
347         int i;
348         unsigned long addr = (unsigned long)masks;
349         unsigned long d_data;
350         current_rwx_mask = masks;
351
352         if (!masks)
353                 return;
354
355         d_data = CPLB_SUPV_WR | CPLB_VALID | CPLB_DIRTY | PAGE_SIZE_4KB;
356 #ifdef CONFIG_BFIN_DCACHE
357         d_data |= CPLB_L1_CHBL;
358 #ifdef CONFIG_BFIN_WT
359         d_data |= CPLB_L1_AOW | CPLB_WT;
360 #endif
361 #endif
362
363         disable_dcplb();
364         for (i = first_mask_dcplb; i < first_switched_dcplb; i++) {
365                 dcplb_tbl[i].addr = addr;
366                 dcplb_tbl[i].data = d_data;
367                 bfin_write32(DCPLB_DATA0 + i * 4, d_data);
368                 bfin_write32(DCPLB_ADDR0 + i * 4, addr);
369                 addr += PAGE_SIZE;
370         }
371         enable_dcplb();
372 }
373
374 #endif