xref: /openbmc/linux/arch/sh/mm/cache.c (revision 2fa5ebe3)
1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  * arch/sh/mm/cache.c
4  *
5  * Copyright (C) 1999, 2000, 2002  Niibe Yutaka
6  * Copyright (C) 2002 - 2010  Paul Mundt
7  */
8 #include <linux/mm.h>
9 #include <linux/init.h>
10 #include <linux/mutex.h>
11 #include <linux/fs.h>
12 #include <linux/smp.h>
13 #include <linux/highmem.h>
14 #include <linux/module.h>
15 #include <asm/mmu_context.h>
16 #include <asm/cacheflush.h>
17 
18 void (*local_flush_cache_all)(void *args) = cache_noop;
19 void (*local_flush_cache_mm)(void *args) = cache_noop;
20 void (*local_flush_cache_dup_mm)(void *args) = cache_noop;
21 void (*local_flush_cache_page)(void *args) = cache_noop;
22 void (*local_flush_cache_range)(void *args) = cache_noop;
23 void (*local_flush_dcache_page)(void *args) = cache_noop;
24 void (*local_flush_icache_range)(void *args) = cache_noop;
25 void (*local_flush_icache_page)(void *args) = cache_noop;
26 void (*local_flush_cache_sigtramp)(void *args) = cache_noop;
27 
28 void (*__flush_wback_region)(void *start, int size);
29 EXPORT_SYMBOL(__flush_wback_region);
30 void (*__flush_purge_region)(void *start, int size);
31 EXPORT_SYMBOL(__flush_purge_region);
32 void (*__flush_invalidate_region)(void *start, int size);
33 EXPORT_SYMBOL(__flush_invalidate_region);
34 
35 static inline void noop__flush_region(void *start, int size)
36 {
37 }
38 
39 static inline void cacheop_on_each_cpu(void (*func) (void *info), void *info,
40                                    int wait)
41 {
42 	preempt_disable();
43 
44 	/* Needing IPI for cross-core flush is SHX3-specific. */
45 #ifdef CONFIG_CPU_SHX3
46 	/*
47 	 * It's possible that this gets called early on when IRQs are
48 	 * still disabled due to ioremapping by the boot CPU, so don't
49 	 * even attempt IPIs unless there are other CPUs online.
50 	 */
51 	if (num_online_cpus() > 1)
52 		smp_call_function(func, info, wait);
53 #endif
54 
55 	func(info);
56 
57 	preempt_enable();
58 }
59 
60 void copy_to_user_page(struct vm_area_struct *vma, struct page *page,
61 		       unsigned long vaddr, void *dst, const void *src,
62 		       unsigned long len)
63 {
64 	if (boot_cpu_data.dcache.n_aliases && page_mapcount(page) &&
65 	    test_bit(PG_dcache_clean, &page->flags)) {
66 		void *vto = kmap_coherent(page, vaddr) + (vaddr & ~PAGE_MASK);
67 		memcpy(vto, src, len);
68 		kunmap_coherent(vto);
69 	} else {
70 		memcpy(dst, src, len);
71 		if (boot_cpu_data.dcache.n_aliases)
72 			clear_bit(PG_dcache_clean, &page->flags);
73 	}
74 
75 	if (vma->vm_flags & VM_EXEC)
76 		flush_cache_page(vma, vaddr, page_to_pfn(page));
77 }
78 
79 void copy_from_user_page(struct vm_area_struct *vma, struct page *page,
80 			 unsigned long vaddr, void *dst, const void *src,
81 			 unsigned long len)
82 {
83 	if (boot_cpu_data.dcache.n_aliases && page_mapcount(page) &&
84 	    test_bit(PG_dcache_clean, &page->flags)) {
85 		void *vfrom = kmap_coherent(page, vaddr) + (vaddr & ~PAGE_MASK);
86 		memcpy(dst, vfrom, len);
87 		kunmap_coherent(vfrom);
88 	} else {
89 		memcpy(dst, src, len);
90 		if (boot_cpu_data.dcache.n_aliases)
91 			clear_bit(PG_dcache_clean, &page->flags);
92 	}
93 }
94 
95 void copy_user_highpage(struct page *to, struct page *from,
96 			unsigned long vaddr, struct vm_area_struct *vma)
97 {
98 	void *vfrom, *vto;
99 
100 	vto = kmap_atomic(to);
101 
102 	if (boot_cpu_data.dcache.n_aliases && page_mapcount(from) &&
103 	    test_bit(PG_dcache_clean, &from->flags)) {
104 		vfrom = kmap_coherent(from, vaddr);
105 		copy_page(vto, vfrom);
106 		kunmap_coherent(vfrom);
107 	} else {
108 		vfrom = kmap_atomic(from);
109 		copy_page(vto, vfrom);
110 		kunmap_atomic(vfrom);
111 	}
112 
113 	if (pages_do_alias((unsigned long)vto, vaddr & PAGE_MASK) ||
114 	    (vma->vm_flags & VM_EXEC))
115 		__flush_purge_region(vto, PAGE_SIZE);
116 
117 	kunmap_atomic(vto);
118 	/* Make sure this page is cleared on other CPU's too before using it */
119 	smp_wmb();
120 }
121 EXPORT_SYMBOL(copy_user_highpage);
122 
123 void clear_user_highpage(struct page *page, unsigned long vaddr)
124 {
125 	void *kaddr = kmap_atomic(page);
126 
127 	clear_page(kaddr);
128 
129 	if (pages_do_alias((unsigned long)kaddr, vaddr & PAGE_MASK))
130 		__flush_purge_region(kaddr, PAGE_SIZE);
131 
132 	kunmap_atomic(kaddr);
133 }
134 EXPORT_SYMBOL(clear_user_highpage);
135 
136 void __update_cache(struct vm_area_struct *vma,
137 		    unsigned long address, pte_t pte)
138 {
139 	struct page *page;
140 	unsigned long pfn = pte_pfn(pte);
141 
142 	if (!boot_cpu_data.dcache.n_aliases)
143 		return;
144 
145 	page = pfn_to_page(pfn);
146 	if (pfn_valid(pfn)) {
147 		int dirty = !test_and_set_bit(PG_dcache_clean, &page->flags);
148 		if (dirty)
149 			__flush_purge_region(page_address(page), PAGE_SIZE);
150 	}
151 }
152 
153 void __flush_anon_page(struct page *page, unsigned long vmaddr)
154 {
155 	unsigned long addr = (unsigned long) page_address(page);
156 
157 	if (pages_do_alias(addr, vmaddr)) {
158 		if (boot_cpu_data.dcache.n_aliases && page_mapcount(page) &&
159 		    test_bit(PG_dcache_clean, &page->flags)) {
160 			void *kaddr;
161 
162 			kaddr = kmap_coherent(page, vmaddr);
163 			/* XXX.. For now kunmap_coherent() does a purge */
164 			/* __flush_purge_region((void *)kaddr, PAGE_SIZE); */
165 			kunmap_coherent(kaddr);
166 		} else
167 			__flush_purge_region((void *)addr, PAGE_SIZE);
168 	}
169 }
170 
171 void flush_cache_all(void)
172 {
173 	cacheop_on_each_cpu(local_flush_cache_all, NULL, 1);
174 }
175 EXPORT_SYMBOL(flush_cache_all);
176 
177 void flush_cache_mm(struct mm_struct *mm)
178 {
179 	if (boot_cpu_data.dcache.n_aliases == 0)
180 		return;
181 
182 	cacheop_on_each_cpu(local_flush_cache_mm, mm, 1);
183 }
184 
185 void flush_cache_dup_mm(struct mm_struct *mm)
186 {
187 	if (boot_cpu_data.dcache.n_aliases == 0)
188 		return;
189 
190 	cacheop_on_each_cpu(local_flush_cache_dup_mm, mm, 1);
191 }
192 
193 void flush_cache_page(struct vm_area_struct *vma, unsigned long addr,
194 		      unsigned long pfn)
195 {
196 	struct flusher_data data;
197 
198 	data.vma = vma;
199 	data.addr1 = addr;
200 	data.addr2 = pfn;
201 
202 	cacheop_on_each_cpu(local_flush_cache_page, (void *)&data, 1);
203 }
204 
205 void flush_cache_range(struct vm_area_struct *vma, unsigned long start,
206 		       unsigned long end)
207 {
208 	struct flusher_data data;
209 
210 	data.vma = vma;
211 	data.addr1 = start;
212 	data.addr2 = end;
213 
214 	cacheop_on_each_cpu(local_flush_cache_range, (void *)&data, 1);
215 }
216 EXPORT_SYMBOL(flush_cache_range);
217 
218 void flush_dcache_page(struct page *page)
219 {
220 	cacheop_on_each_cpu(local_flush_dcache_page, page, 1);
221 }
222 EXPORT_SYMBOL(flush_dcache_page);
223 
224 void flush_icache_range(unsigned long start, unsigned long end)
225 {
226 	struct flusher_data data;
227 
228 	data.vma = NULL;
229 	data.addr1 = start;
230 	data.addr2 = end;
231 
232 	cacheop_on_each_cpu(local_flush_icache_range, (void *)&data, 1);
233 }
234 EXPORT_SYMBOL(flush_icache_range);
235 
236 void flush_icache_page(struct vm_area_struct *vma, struct page *page)
237 {
238 	/* Nothing uses the VMA, so just pass the struct page along */
239 	cacheop_on_each_cpu(local_flush_icache_page, page, 1);
240 }
241 
242 void flush_cache_sigtramp(unsigned long address)
243 {
244 	cacheop_on_each_cpu(local_flush_cache_sigtramp, (void *)address, 1);
245 }
246 
247 static void compute_alias(struct cache_info *c)
248 {
249 #ifdef CONFIG_MMU
250 	c->alias_mask = ((c->sets - 1) << c->entry_shift) & ~(PAGE_SIZE - 1);
251 #else
252 	c->alias_mask = 0;
253 #endif
254 	c->n_aliases = c->alias_mask ? (c->alias_mask >> PAGE_SHIFT) + 1 : 0;
255 }
256 
257 static void __init emit_cache_params(void)
258 {
259 	printk(KERN_NOTICE "I-cache : n_ways=%d n_sets=%d way_incr=%d\n",
260 		boot_cpu_data.icache.ways,
261 		boot_cpu_data.icache.sets,
262 		boot_cpu_data.icache.way_incr);
263 	printk(KERN_NOTICE "I-cache : entry_mask=0x%08x alias_mask=0x%08x n_aliases=%d\n",
264 		boot_cpu_data.icache.entry_mask,
265 		boot_cpu_data.icache.alias_mask,
266 		boot_cpu_data.icache.n_aliases);
267 	printk(KERN_NOTICE "D-cache : n_ways=%d n_sets=%d way_incr=%d\n",
268 		boot_cpu_data.dcache.ways,
269 		boot_cpu_data.dcache.sets,
270 		boot_cpu_data.dcache.way_incr);
271 	printk(KERN_NOTICE "D-cache : entry_mask=0x%08x alias_mask=0x%08x n_aliases=%d\n",
272 		boot_cpu_data.dcache.entry_mask,
273 		boot_cpu_data.dcache.alias_mask,
274 		boot_cpu_data.dcache.n_aliases);
275 
276 	/*
277 	 * Emit Secondary Cache parameters if the CPU has a probed L2.
278 	 */
279 	if (boot_cpu_data.flags & CPU_HAS_L2_CACHE) {
280 		printk(KERN_NOTICE "S-cache : n_ways=%d n_sets=%d way_incr=%d\n",
281 			boot_cpu_data.scache.ways,
282 			boot_cpu_data.scache.sets,
283 			boot_cpu_data.scache.way_incr);
284 		printk(KERN_NOTICE "S-cache : entry_mask=0x%08x alias_mask=0x%08x n_aliases=%d\n",
285 			boot_cpu_data.scache.entry_mask,
286 			boot_cpu_data.scache.alias_mask,
287 			boot_cpu_data.scache.n_aliases);
288 	}
289 }
290 
291 void __init cpu_cache_init(void)
292 {
293 	unsigned int cache_disabled = 0;
294 
295 #ifdef SH_CCR
296 	cache_disabled = !(__raw_readl(SH_CCR) & CCR_CACHE_ENABLE);
297 #endif
298 
299 	compute_alias(&boot_cpu_data.icache);
300 	compute_alias(&boot_cpu_data.dcache);
301 	compute_alias(&boot_cpu_data.scache);
302 
303 	__flush_wback_region		= noop__flush_region;
304 	__flush_purge_region		= noop__flush_region;
305 	__flush_invalidate_region	= noop__flush_region;
306 
307 	/*
308 	 * No flushing is necessary in the disabled cache case so we can
309 	 * just keep the noop functions in local_flush_..() and __flush_..()
310 	 */
311 	if (unlikely(cache_disabled))
312 		goto skip;
313 
314 	if (boot_cpu_data.type == CPU_J2) {
315 		extern void __weak j2_cache_init(void);
316 
317 		j2_cache_init();
318 	} else if (boot_cpu_data.family == CPU_FAMILY_SH2) {
319 		extern void __weak sh2_cache_init(void);
320 
321 		sh2_cache_init();
322 	}
323 
324 	if (boot_cpu_data.family == CPU_FAMILY_SH2A) {
325 		extern void __weak sh2a_cache_init(void);
326 
327 		sh2a_cache_init();
328 	}
329 
330 	if (boot_cpu_data.family == CPU_FAMILY_SH3) {
331 		extern void __weak sh3_cache_init(void);
332 
333 		sh3_cache_init();
334 
335 		if ((boot_cpu_data.type == CPU_SH7705) &&
336 		    (boot_cpu_data.dcache.sets == 512)) {
337 			extern void __weak sh7705_cache_init(void);
338 
339 			sh7705_cache_init();
340 		}
341 	}
342 
343 	if ((boot_cpu_data.family == CPU_FAMILY_SH4) ||
344 	    (boot_cpu_data.family == CPU_FAMILY_SH4A) ||
345 	    (boot_cpu_data.family == CPU_FAMILY_SH4AL_DSP)) {
346 		extern void __weak sh4_cache_init(void);
347 
348 		sh4_cache_init();
349 
350 		if ((boot_cpu_data.type == CPU_SH7786) ||
351 		    (boot_cpu_data.type == CPU_SHX3)) {
352 			extern void __weak shx3_cache_init(void);
353 
354 			shx3_cache_init();
355 		}
356 	}
357 
358 skip:
359 	emit_cache_params();
360 }
361