1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
|
/*
* Copyright 2009-2012 Freescale Semiconductor, Inc.
* Scott Wood <scottwood@freescale.com>
* Dave Liu <daveliu@freescale.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 <asm/reg.h>
#include <asm/page.h>
#include <asm/ppc_asm.h>
#include <asm/asm-offsets.h>
.section .text
/******** L1 Cache ********/
/* flush L1 d-cache */
_GLOBAL(flush_dcache_L1)
mfspr r3,SPRN_L1CFG0
rlwinm r5,r3,9,3 /* Extract cache block size */
twlgti r5,1 /* Only 32 and 64 byte cache blocks
* are currently defined.
*/
li r4,32
subfic r6,r5,2 /* r6 = log2(1KiB / cache block size) -
* log2(number of ways)
*/
slw r5,r4,r5 /* r5 = cache block size */
rlwinm r7,r3,0,0xff /* Extract number of KiB in the cache */
mulli r7,r7,13 /* An 8-way cache will require 13
* loads per set.
*/
slw r7,r7,r6
/* save off HID0 and set DCFA */
mfspr r8,SPRN_HID0
ori r9,r8,HID0_DCFA@l
mtspr SPRN_HID0,r9
isync
LOAD_REG_IMMEDIATE(r4, KERNELBASE)
mtctr r7
1: lwz r3,0(r4) /* Load... */
add r4,r4,r5
bdnz 1b
msync
LOAD_REG_IMMEDIATE(r4, KERNELBASE)
mtctr r7
1: dcbf 0,r4 /* ...and flush. */
add r4,r4,r5
bdnz 1b
/* restore HID0 */
mtspr SPRN_HID0,r8
isync
blr
#define PVR_E6500 0x8040
/* Flush L1 d-cache, invalidate and disable d-cache and i-cache */
_GLOBAL(__flush_disable_L1)
/* L1 Data Cache of e6500 contains no modified data, no flush is required */
mfspr r3, SPRN_PVR
rlwinm r4, r3, 16, 0xffff
lis r5, 0
ori r5, r5, PVR_E6500@l
cmpw r4, r5
beq 2f
mflr r10
bl flush_dcache_L1 /* Flush L1 d-cache */
mtlr r10
2: msync
mfspr r4, SPRN_L1CSR0 /* Invalidate and disable d-cache */
li r5, 2
rlwimi r4, r5, 0, 3
msync
isync
mtspr SPRN_L1CSR0, r4
isync
msync
1: mfspr r4, SPRN_L1CSR0 /* Wait for the invalidate to finish */
andi. r4, r4, 2
bne 1b
msync
mfspr r4, SPRN_L1CSR1 /* Invalidate and disable i-cache */
li r5, 2
rlwimi r4, r5, 0, 3
msync
isync
mtspr SPRN_L1CSR1, r4
isync
msync
blr
/******** Backside L2 Cache ********/
#define SVR_P2040 0x821000
need_L2_cache:
/* skip L2 cache on P2040/P2040E as they have no L2 cache */
mfspr r3, SPRN_SVR
/* shift right by 8 bits and clear E bit of SVR */
rlwinm r4, r3, 24, ~0x800
lis r3, SVR_P2040@h
ori r3, r3, SVR_P2040@l
cmpw r4, r3
beq 1f
/* If L2 cache is disabled, skip it */
mfspr r3, SPRN_L2CSR0
andis. r3, r3, L2CSR0_L2E@h
beq 1f
li r3, 0
blr
1:
li r3, 1
blr
/* flush backside L2 cache */
_GLOBAL(flush_backside_L2_cache)
mflr r10
bl need_L2_cache
mtlr r10
cmpwi r3, 0
bne 2f
__flush_backside_L2_cache:
/* Flush the L2 cache */
mfspr r3, SPRN_L2CSR0
ori r3, r3, L2CSR0_L2FL@l
msync
isync
mtspr SPRN_L2CSR0,r3
isync
1:
mfspr r3,SPRN_L2CSR0
andi. r3, r3, L2CSR0_L2FL@l
bne 1b
2:
blr
/* flush and disable backside L2 cache */
_GLOBAL(disable_backside_L2_cache)
mflr r10
bl need_L2_cache
mtlr r10
cmpwi r3, 0
bne 1f
mflr r10
bl __flush_backside_L2_cache
mtlr r10
/* disable L2 cache */
li r3, 0
msync
isync
mtspr SPRN_L2CSR0, r3
isync
1:
blr
/******** Cluster Backside L2 Cache ********/
cluster_need_L2_cache:
/* if L2 cache is disabled, skip it */
lwz r4, 0(r3)
andis. r4, r4, L2CSR0_L2E@h
beq 1f
li r5, 0
blr
1:
li r5, 1
blr
/*
* Flush cluster shared backside L2 cache
* r3 = virtual address of cluster L2 controller
*/
_GLOBAL(cluster_flush_backside_L2_cache)
mflr r10
bl cluster_need_L2_cache
mtlr r10
cmpwi r5, 0
bne 2f
__cluster_flush_backside_L2_cache:
/* flush the L2 cache */
lwz r4, 0(r3)
ori r4, r4, L2CSR0_L2FL@l
msync
isync
stw r4, 0(r3)
isync
1:
lwz r4, 0(r3)
andi. r4, r4, L2CSR0_L2FL@l
bne 1b
2:
blr
/*
* Flush and invalidate cluster shared backside L2 cache
* r3 = virtual address of cluster L2 controller
*/
_GLOBAL(cluster_flush_invalidate_L2_cache)
mflr r11
bl cluster_flush_backside_L2_cache
mtlr r11
/* clear backside L2 Cache Lock */
lwz r4, 0(r3)
oris r4, r4, L2CSR0_L2LFC@l
msync
isync
stw r4, 0(r3)
isync
1:
lwz r4, 0(r3)
andis. r4, r4, L2CSR0_L2LFC@l
bne 1b
/* invalidate backside L2 cache */
lwz r4, 0(r3)
oris r4, r4, L2CSR0_L2FI@h
msync
isync
stw r4, 0(r3)
isync
1:
lwz r4, 0(r3)
andis. r4, r4, L2CSR0_L2FI@h
bne 1b
blr
/*
* Disable cluster shared backside L2 cache
* r3 = virtual address of cluster L2 controller
*/
_GLOBAL(cluster_disable_L2_cache)
/* disable L2 cache */
li r4, 0
msync
isync
stw r4, 0(r3)
isync
blr
/*
* Invalidate and enable cluster shared L2 cache
* r3 = virtual address of cluster L2 controller
*/
_GLOBAL(cluster_invalidate_enable_L2)
lis r4, (L2CSR0_L2FI|L2CSR0_L2LFC)@h
ori r4, r4, (L2CSR0_L2FI|L2CSR0_L2LFC)@l
msync
isync
stw r4, 0(r3)
isync
/* wait for the invalidate to finish */
1: lwz r5, 0(r3)
cmp 0, r5, r4
bne 1b
/* enable cluster L2 cache */
lwz r4, 0(r3)
oris r4, r4, (L2CSR0_L2E|L2CSR0_L2PE)@h
msync
isync
stw r4, 0(r3)
isync
blr
/******** Platform Cache ********/
#define L2CTL_L2E 0x80000000
#define L2CTL_L2I 0x40000000
/* r3 = virtual address of L2 controller, WIMG = 01xx */
_GLOBAL(flush_disable_L2)
/* It's a write-through cache, so only invalidation is needed. */
mbar
isync
lwz r4, 0(r3)
li r5, 1
rlwimi r4, r5, 30, L2CTL_L2E | L2CTL_L2I
stw r4, 0(r3)
/* Wait for the invalidate to finish */
1: lwz r4, 0(r3)
andis. r4, r4, L2CTL_L2I@h
bne 1b
mbar
blr
/* r3 = virtual address of L2 controller, WIMG = 01xx */
_GLOBAL(invalidate_enable_L2)
mbar
isync
lwz r4, 0(r3)
li r5, 3
rlwimi r4, r5, 30, L2CTL_L2E | L2CTL_L2I
stw r4, 0(r3)
/* Wait for the invalidate to finish */
1: lwz r4, 0(r3)
andis. r4, r4, L2CTL_L2I@h
bne 1b
mbar
blr
_GLOBAL(__flush_caches_e500v2)
mflr r0
bl flush_dcache_L1
mtlr r0
blr
_GLOBAL(__flush_caches_e500mc)
_GLOBAL(__flush_caches_e5500)
mflr r0
bl flush_dcache_L1
bl flush_backside_L2_cache
mtlr r0
blr
/* L1 Data Cache of e6500 contains no modified data, no flush is required */
_GLOBAL(__flush_caches_e6500)
blr
|