1 /*
2 * sc-ip22.c: Indy cache management functions.
3 *
4 * Copyright (C) 1997, 2001 Ralf Baechle (ralf@gnu.org),
5 * derived from r4xx0.c by David S. Miller (davem@davemloft.net).
6 */
7 #include <linux/init.h>
8 #include <linux/kernel.h>
9 #include <linux/sched.h>
10 #include <linux/mm.h>
11
12 #include <asm/bcache.h>
13 #include <asm/page.h>
14 #include <asm/pgtable.h>
15 #include <asm/bootinfo.h>
16 #include <asm/sgi/ip22.h>
17 #include <asm/sgi/mc.h>
18
19 /* Secondary cache size in bytes, if present. */
20 static unsigned long scache_size;
21
22 #undef DEBUG_CACHE
23
24 #define SC_SIZE 0x00080000
25 #define SC_LINE 32
26 #define CI_MASK (SC_SIZE - SC_LINE)
27 #define SC_INDEX(n) ((n) & CI_MASK)
28
indy_sc_wipe(unsigned long first,unsigned long last)29 static inline void indy_sc_wipe(unsigned long first, unsigned long last)
30 {
31 unsigned long tmp;
32
33 __asm__ __volatile__(
34 " .set push # indy_sc_wipe \n"
35 " .set noreorder \n"
36 " .set mips3 \n"
37 " .set noat \n"
38 " mfc0 %2, $12 \n"
39 " li $1, 0x80 # Go 64 bit \n"
40 " mtc0 $1, $12 \n"
41 " \n"
42 " # \n"
43 " # Open code a dli $1, 0x9000000080000000 \n"
44 " # \n"
45 " # Required because binutils 2.25 will happily accept \n"
46 " # 64 bit instructions in .set mips3 mode but puke on \n"
47 " # 64 bit constants when generating 32 bit ELF \n"
48 " # \n"
49 " lui $1,0x9000 \n"
50 " dsll $1,$1,0x10 \n"
51 " ori $1,$1,0x8000 \n"
52 " dsll $1,$1,0x10 \n"
53 " \n"
54 " or %0, $1 # first line to flush \n"
55 " or %1, $1 # last line to flush \n"
56 " .set at \n"
57 " \n"
58 "1: sw $0, 0(%0) \n"
59 " bne %0, %1, 1b \n"
60 " daddu %0, 32 \n"
61 " \n"
62 " mtc0 %2, $12 # Back to 32 bit \n"
63 " nop # pipeline hazard \n"
64 " nop \n"
65 " nop \n"
66 " nop \n"
67 " .set pop \n"
68 : "=r" (first), "=r" (last), "=&r" (tmp)
69 : "0" (first), "1" (last));
70 }
71
indy_sc_wback_invalidate(unsigned long addr,unsigned long size)72 static void indy_sc_wback_invalidate(unsigned long addr, unsigned long size)
73 {
74 unsigned long first_line, last_line;
75 unsigned long flags;
76
77 #ifdef DEBUG_CACHE
78 printk("indy_sc_wback_invalidate[%08lx,%08lx]", addr, size);
79 #endif
80
81 /* Catch bad driver code */
82 BUG_ON(size == 0);
83
84 /* Which lines to flush? */
85 first_line = SC_INDEX(addr);
86 last_line = SC_INDEX(addr + size - 1);
87
88 local_irq_save(flags);
89 if (first_line <= last_line) {
90 indy_sc_wipe(first_line, last_line);
91 goto out;
92 }
93
94 indy_sc_wipe(first_line, SC_SIZE - SC_LINE);
95 indy_sc_wipe(0, last_line);
96 out:
97 local_irq_restore(flags);
98 }
99
indy_sc_enable(void)100 static void indy_sc_enable(void)
101 {
102 unsigned long addr, tmp1, tmp2;
103
104 /* This is really cool... */
105 #ifdef DEBUG_CACHE
106 printk("Enabling R4600 SCACHE\n");
107 #endif
108 __asm__ __volatile__(
109 ".set\tpush\n\t"
110 ".set\tnoreorder\n\t"
111 ".set\tmips3\n\t"
112 "mfc0\t%2, $12\n\t"
113 "nop; nop; nop; nop;\n\t"
114 "li\t%1, 0x80\n\t"
115 "mtc0\t%1, $12\n\t"
116 "nop; nop; nop; nop;\n\t"
117 "li\t%0, 0x1\n\t"
118 "dsll\t%0, 31\n\t"
119 "lui\t%1, 0x9000\n\t"
120 "dsll32\t%1, 0\n\t"
121 "or\t%0, %1, %0\n\t"
122 "sb\t$0, 0(%0)\n\t"
123 "mtc0\t$0, $12\n\t"
124 "nop; nop; nop; nop;\n\t"
125 "mtc0\t%2, $12\n\t"
126 "nop; nop; nop; nop;\n\t"
127 ".set\tpop"
128 : "=r" (tmp1), "=r" (tmp2), "=r" (addr));
129 }
130
indy_sc_disable(void)131 static void indy_sc_disable(void)
132 {
133 unsigned long tmp1, tmp2, tmp3;
134
135 #ifdef DEBUG_CACHE
136 printk("Disabling R4600 SCACHE\n");
137 #endif
138 __asm__ __volatile__(
139 ".set\tpush\n\t"
140 ".set\tnoreorder\n\t"
141 ".set\tmips3\n\t"
142 "li\t%0, 0x1\n\t"
143 "dsll\t%0, 31\n\t"
144 "lui\t%1, 0x9000\n\t"
145 "dsll32\t%1, 0\n\t"
146 "or\t%0, %1, %0\n\t"
147 "mfc0\t%2, $12\n\t"
148 "nop; nop; nop; nop\n\t"
149 "li\t%1, 0x80\n\t"
150 "mtc0\t%1, $12\n\t"
151 "nop; nop; nop; nop\n\t"
152 "sh\t$0, 0(%0)\n\t"
153 "mtc0\t$0, $12\n\t"
154 "nop; nop; nop; nop\n\t"
155 "mtc0\t%2, $12\n\t"
156 "nop; nop; nop; nop\n\t"
157 ".set\tpop"
158 : "=r" (tmp1), "=r" (tmp2), "=r" (tmp3));
159 }
160
indy_sc_probe(void)161 static inline int __init indy_sc_probe(void)
162 {
163 unsigned int size = ip22_eeprom_read(&sgimc->eeprom, 17);
164 if (size == 0)
165 return 0;
166
167 size <<= PAGE_SHIFT;
168 printk(KERN_INFO "R4600/R5000 SCACHE size %dK, linesize 32 bytes.\n",
169 size >> 10);
170 scache_size = size;
171
172 return 1;
173 }
174
175 /* XXX Check with wje if the Indy caches can differentiate between
176 writeback + invalidate and just invalidate. */
177 static struct bcache_ops indy_sc_ops = {
178 .bc_enable = indy_sc_enable,
179 .bc_disable = indy_sc_disable,
180 .bc_wback_inv = indy_sc_wback_invalidate,
181 .bc_inv = indy_sc_wback_invalidate
182 };
183
indy_sc_init(void)184 void indy_sc_init(void)
185 {
186 if (indy_sc_probe()) {
187 indy_sc_enable();
188 bcops = &indy_sc_ops;
189 }
190 }
191