2 * This file is subject to the terms and conditions of the GNU General Public
3 * License. See the file "COPYING" in the main directory of this archive
6 * Copyright (C) 2003, 04, 05 Ralf Baechle (ralf@linux-mips.org)
7 * Copyright (C) 2007 Maciej W. Rozycki
8 * Copyright (C) 2008 Thiemo Seufer
10 #include <linux/init.h>
11 #include <linux/kernel.h>
12 #include <linux/sched.h>
13 #include <linux/smp.h>
15 #include <linux/module.h>
16 #include <linux/proc_fs.h>
19 #include <asm/cacheops.h>
23 #include <asm/pgtable.h>
24 #include <asm/prefetch.h>
25 #include <asm/system.h>
26 #include <asm/bootinfo.h>
27 #include <asm/mipsregs.h>
28 #include <asm/mmu_context.h>
32 #ifdef CONFIG_SIBYTE_DMA_PAGEOPS
33 #include <asm/sibyte/sb1250.h>
34 #include <asm/sibyte/sb1250_regs.h>
35 #include <asm/sibyte/sb1250_dma.h>
40 /* Registers used in the assembled routines. */
53 /* Handle labels (which must be positive integers). */
55 label_clear_nopref = 1,
59 label_copy_pref_store,
62 UASM_L_LA(_clear_nopref)
63 UASM_L_LA(_clear_pref)
64 UASM_L_LA(_copy_nopref)
65 UASM_L_LA(_copy_pref_both)
66 UASM_L_LA(_copy_pref_store)
68 /* We need one branch and therefore one relocation per target label. */
69 static struct uasm_label __cpuinitdata labels[5];
70 static struct uasm_reloc __cpuinitdata relocs[5];
72 #define cpu_is_r4600_v1_x() ((read_c0_prid() & 0xfffffff0) == 0x00002010)
73 #define cpu_is_r4600_v2_x() ((read_c0_prid() & 0xfffffff0) == 0x00002020)
78 * R4000 128 bytes S-cache: 0x058 bytes
79 * R4600 v1.7: 0x05c bytes
80 * R4600 v2.0: 0x060 bytes
81 * With prefetching, 16 word strides 0x120 bytes
84 static u32 clear_page_array[0x120 / 4];
86 #ifdef CONFIG_SIBYTE_DMA_PAGEOPS
87 void clear_page_cpu(void *page) __attribute__((alias("clear_page_array")));
89 void clear_page(void *page) __attribute__((alias("clear_page_array")));
92 EXPORT_SYMBOL(clear_page);
97 * R4000 128 bytes S-cache: 0x11c bytes
98 * R4600 v1.7: 0x080 bytes
99 * R4600 v2.0: 0x07c bytes
100 * With prefetching, 16 word strides 0x540 bytes
102 static u32 copy_page_array[0x540 / 4];
104 #ifdef CONFIG_SIBYTE_DMA_PAGEOPS
106 copy_page_cpu(void *to, void *from) __attribute__((alias("copy_page_array")));
108 void copy_page(void *to, void *from) __attribute__((alias("copy_page_array")));
111 EXPORT_SYMBOL(copy_page);
114 static int pref_bias_clear_store __cpuinitdata;
115 static int pref_bias_copy_load __cpuinitdata;
116 static int pref_bias_copy_store __cpuinitdata;
118 static u32 pref_src_mode __cpuinitdata;
119 static u32 pref_dst_mode __cpuinitdata;
121 static int clear_word_size __cpuinitdata;
122 static int copy_word_size __cpuinitdata;
124 static int half_clear_loop_size __cpuinitdata;
125 static int half_copy_loop_size __cpuinitdata;
127 static int cache_line_size __cpuinitdata;
128 #define cache_line_mask() (cache_line_size - 1)
130 static inline void __cpuinit
131 pg_addiu(u32 **buf, unsigned int reg1, unsigned int reg2, unsigned int off)
133 if (cpu_has_64bit_gp_regs && DADDI_WAR && r4k_daddiu_bug()) {
135 uasm_i_lui(buf, T9, uasm_rel_hi(off));
136 uasm_i_addiu(buf, T9, T9, uasm_rel_lo(off));
138 uasm_i_addiu(buf, T9, ZERO, off);
139 uasm_i_daddu(buf, reg1, reg2, T9);
142 uasm_i_lui(buf, T9, uasm_rel_hi(off));
143 uasm_i_addiu(buf, T9, T9, uasm_rel_lo(off));
144 UASM_i_ADDU(buf, reg1, reg2, T9);
146 UASM_i_ADDIU(buf, reg1, reg2, off);
150 static void __cpuinit set_prefetch_parameters(void)
152 if (cpu_has_64bit_gp_regs || cpu_has_64bit_zero_reg)
157 if (cpu_has_64bit_gp_regs)
163 * The pref's used here are using "streaming" hints, which cause the
164 * copied data to be kicked out of the cache sooner. A page copy often
165 * ends up copying a lot more data than is commonly used, so this seems
166 * to make sense in terms of reducing cache pollution, but I've no real
167 * performance data to back this up.
169 if (cpu_has_prefetch) {
171 * XXX: Most prefetch bias values in here are based on
174 cache_line_size = cpu_dcache_line_size();
175 switch (current_cpu_type()) {
178 /* These processors only support the Pref_Load. */
179 pref_bias_copy_load = 256;
184 * As a workaround for erratum G105 which make the
185 * PrepareForStore hint unusable we fall back to
186 * StoreRetained on the RM9000. Once it is known which
187 * versions of the RM9000 we'll be able to condition-
195 * Those values have been experimentally tuned for an
198 pref_bias_clear_store = 512;
199 pref_bias_copy_load = 256;
200 pref_bias_copy_store = 256;
201 pref_src_mode = Pref_LoadStreamed;
202 pref_dst_mode = Pref_StoreStreamed;
207 pref_bias_clear_store = 128;
208 pref_bias_copy_load = 128;
209 pref_bias_copy_store = 128;
211 * SB1 pass1 Pref_LoadStreamed/Pref_StoreStreamed
214 if (current_cpu_type() == CPU_SB1 &&
215 (current_cpu_data.processor_id & 0xff) < 0x02) {
216 pref_src_mode = Pref_Load;
217 pref_dst_mode = Pref_Store;
219 pref_src_mode = Pref_LoadStreamed;
220 pref_dst_mode = Pref_StoreStreamed;
225 pref_bias_clear_store = 128;
226 pref_bias_copy_load = 256;
227 pref_bias_copy_store = 128;
228 pref_src_mode = Pref_LoadStreamed;
229 pref_dst_mode = Pref_PrepareForStore;
233 if (cpu_has_cache_cdex_s)
234 cache_line_size = cpu_scache_line_size();
235 else if (cpu_has_cache_cdex_p)
236 cache_line_size = cpu_dcache_line_size();
239 * Too much unrolling will overflow the available space in
240 * clear_space_array / copy_page_array.
242 half_clear_loop_size = min(16 * clear_word_size,
243 max(cache_line_size >> 1,
244 4 * clear_word_size));
245 half_copy_loop_size = min(16 * copy_word_size,
246 max(cache_line_size >> 1,
247 4 * copy_word_size));
250 static void __cpuinit build_clear_store(u32 **buf, int off)
252 if (cpu_has_64bit_gp_regs || cpu_has_64bit_zero_reg) {
253 uasm_i_sd(buf, ZERO, off, A0);
255 uasm_i_sw(buf, ZERO, off, A0);
259 static inline void __cpuinit build_clear_pref(u32 **buf, int off)
261 if (off & cache_line_mask())
264 if (pref_bias_clear_store) {
265 uasm_i_pref(buf, pref_dst_mode, pref_bias_clear_store + off,
267 } else if (cache_line_size == (half_clear_loop_size << 1)) {
268 if (cpu_has_cache_cdex_s) {
269 uasm_i_cache(buf, Create_Dirty_Excl_SD, off, A0);
270 } else if (cpu_has_cache_cdex_p) {
271 if (R4600_V1_HIT_CACHEOP_WAR && cpu_is_r4600_v1_x()) {
278 if (R4600_V2_HIT_CACHEOP_WAR && cpu_is_r4600_v2_x())
279 uasm_i_lw(buf, ZERO, ZERO, AT);
281 uasm_i_cache(buf, Create_Dirty_Excl_D, off, A0);
286 void __cpuinit build_clear_page(void)
289 u32 *buf = (u32 *)&clear_page_array;
290 struct uasm_label *l = labels;
291 struct uasm_reloc *r = relocs;
294 memset(labels, 0, sizeof(labels));
295 memset(relocs, 0, sizeof(relocs));
297 set_prefetch_parameters();
300 * This algorithm makes the following assumptions:
301 * - The prefetch bias is a multiple of 2 words.
302 * - The prefetch bias is less than one page.
304 BUG_ON(pref_bias_clear_store % (2 * clear_word_size));
305 BUG_ON(PAGE_SIZE < pref_bias_clear_store);
307 off = PAGE_SIZE - pref_bias_clear_store;
308 if (off > 0xffff || !pref_bias_clear_store)
309 pg_addiu(&buf, A2, A0, off);
311 uasm_i_ori(&buf, A2, A0, off);
313 if (R4600_V2_HIT_CACHEOP_WAR && cpu_is_r4600_v2_x())
314 uasm_i_lui(&buf, AT, 0xa000);
316 off = cache_line_size ? min(8, pref_bias_clear_store / cache_line_size)
317 * cache_line_size : 0;
319 build_clear_pref(&buf, -off);
320 off -= cache_line_size;
322 uasm_l_clear_pref(&l, buf);
324 build_clear_pref(&buf, off);
325 build_clear_store(&buf, off);
326 off += clear_word_size;
327 } while (off < half_clear_loop_size);
328 pg_addiu(&buf, A0, A0, 2 * off);
331 build_clear_pref(&buf, off);
332 if (off == -clear_word_size)
333 uasm_il_bne(&buf, &r, A0, A2, label_clear_pref);
334 build_clear_store(&buf, off);
335 off += clear_word_size;
338 if (pref_bias_clear_store) {
339 pg_addiu(&buf, A2, A0, pref_bias_clear_store);
340 uasm_l_clear_nopref(&l, buf);
343 build_clear_store(&buf, off);
344 off += clear_word_size;
345 } while (off < half_clear_loop_size);
346 pg_addiu(&buf, A0, A0, 2 * off);
349 if (off == -clear_word_size)
350 uasm_il_bne(&buf, &r, A0, A2,
352 build_clear_store(&buf, off);
353 off += clear_word_size;
360 BUG_ON(buf > clear_page_array + ARRAY_SIZE(clear_page_array));
362 uasm_resolve_relocs(relocs, labels);
364 pr_debug("Synthesized clear page handler (%u instructions).\n",
365 (u32)(buf - clear_page_array));
367 pr_debug("\t.set push\n");
368 pr_debug("\t.set noreorder\n");
369 for (i = 0; i < (buf - clear_page_array); i++)
370 pr_debug("\t.word 0x%08x\n", clear_page_array[i]);
371 pr_debug("\t.set pop\n");
374 static void __cpuinit build_copy_load(u32 **buf, int reg, int off)
376 if (cpu_has_64bit_gp_regs) {
377 uasm_i_ld(buf, reg, off, A1);
379 uasm_i_lw(buf, reg, off, A1);
383 static void __cpuinit build_copy_store(u32 **buf, int reg, int off)
385 if (cpu_has_64bit_gp_regs) {
386 uasm_i_sd(buf, reg, off, A0);
388 uasm_i_sw(buf, reg, off, A0);
392 static inline void build_copy_load_pref(u32 **buf, int off)
394 if (off & cache_line_mask())
397 if (pref_bias_copy_load)
398 uasm_i_pref(buf, pref_src_mode, pref_bias_copy_load + off, A1);
401 static inline void build_copy_store_pref(u32 **buf, int off)
403 if (off & cache_line_mask())
406 if (pref_bias_copy_store) {
407 uasm_i_pref(buf, pref_dst_mode, pref_bias_copy_store + off,
409 } else if (cache_line_size == (half_copy_loop_size << 1)) {
410 if (cpu_has_cache_cdex_s) {
411 uasm_i_cache(buf, Create_Dirty_Excl_SD, off, A0);
412 } else if (cpu_has_cache_cdex_p) {
413 if (R4600_V1_HIT_CACHEOP_WAR && cpu_is_r4600_v1_x()) {
420 if (R4600_V2_HIT_CACHEOP_WAR && cpu_is_r4600_v2_x())
421 uasm_i_lw(buf, ZERO, ZERO, AT);
423 uasm_i_cache(buf, Create_Dirty_Excl_D, off, A0);
428 void __cpuinit build_copy_page(void)
431 u32 *buf = (u32 *)©_page_array;
432 struct uasm_label *l = labels;
433 struct uasm_reloc *r = relocs;
436 memset(labels, 0, sizeof(labels));
437 memset(relocs, 0, sizeof(relocs));
439 set_prefetch_parameters();
442 * This algorithm makes the following assumptions:
443 * - All prefetch biases are multiples of 8 words.
444 * - The prefetch biases are less than one page.
445 * - The store prefetch bias isn't greater than the load
448 BUG_ON(pref_bias_copy_load % (8 * copy_word_size));
449 BUG_ON(pref_bias_copy_store % (8 * copy_word_size));
450 BUG_ON(PAGE_SIZE < pref_bias_copy_load);
451 BUG_ON(pref_bias_copy_store > pref_bias_copy_load);
453 off = PAGE_SIZE - pref_bias_copy_load;
454 if (off > 0xffff || !pref_bias_copy_load)
455 pg_addiu(&buf, A2, A0, off);
457 uasm_i_ori(&buf, A2, A0, off);
459 if (R4600_V2_HIT_CACHEOP_WAR && cpu_is_r4600_v2_x())
460 uasm_i_lui(&buf, AT, 0xa000);
462 off = cache_line_size ? min(8, pref_bias_copy_load / cache_line_size) *
465 build_copy_load_pref(&buf, -off);
466 off -= cache_line_size;
468 off = cache_line_size ? min(8, pref_bias_copy_store / cache_line_size) *
471 build_copy_store_pref(&buf, -off);
472 off -= cache_line_size;
474 uasm_l_copy_pref_both(&l, buf);
476 build_copy_load_pref(&buf, off);
477 build_copy_load(&buf, T0, off);
478 build_copy_load_pref(&buf, off + copy_word_size);
479 build_copy_load(&buf, T1, off + copy_word_size);
480 build_copy_load_pref(&buf, off + 2 * copy_word_size);
481 build_copy_load(&buf, T2, off + 2 * copy_word_size);
482 build_copy_load_pref(&buf, off + 3 * copy_word_size);
483 build_copy_load(&buf, T3, off + 3 * copy_word_size);
484 build_copy_store_pref(&buf, off);
485 build_copy_store(&buf, T0, off);
486 build_copy_store_pref(&buf, off + copy_word_size);
487 build_copy_store(&buf, T1, off + copy_word_size);
488 build_copy_store_pref(&buf, off + 2 * copy_word_size);
489 build_copy_store(&buf, T2, off + 2 * copy_word_size);
490 build_copy_store_pref(&buf, off + 3 * copy_word_size);
491 build_copy_store(&buf, T3, off + 3 * copy_word_size);
492 off += 4 * copy_word_size;
493 } while (off < half_copy_loop_size);
494 pg_addiu(&buf, A1, A1, 2 * off);
495 pg_addiu(&buf, A0, A0, 2 * off);
498 build_copy_load_pref(&buf, off);
499 build_copy_load(&buf, T0, off);
500 build_copy_load_pref(&buf, off + copy_word_size);
501 build_copy_load(&buf, T1, off + copy_word_size);
502 build_copy_load_pref(&buf, off + 2 * copy_word_size);
503 build_copy_load(&buf, T2, off + 2 * copy_word_size);
504 build_copy_load_pref(&buf, off + 3 * copy_word_size);
505 build_copy_load(&buf, T3, off + 3 * copy_word_size);
506 build_copy_store_pref(&buf, off);
507 build_copy_store(&buf, T0, off);
508 build_copy_store_pref(&buf, off + copy_word_size);
509 build_copy_store(&buf, T1, off + copy_word_size);
510 build_copy_store_pref(&buf, off + 2 * copy_word_size);
511 build_copy_store(&buf, T2, off + 2 * copy_word_size);
512 build_copy_store_pref(&buf, off + 3 * copy_word_size);
513 if (off == -(4 * copy_word_size))
514 uasm_il_bne(&buf, &r, A2, A0, label_copy_pref_both);
515 build_copy_store(&buf, T3, off + 3 * copy_word_size);
516 off += 4 * copy_word_size;
519 if (pref_bias_copy_load - pref_bias_copy_store) {
520 pg_addiu(&buf, A2, A0,
521 pref_bias_copy_load - pref_bias_copy_store);
522 uasm_l_copy_pref_store(&l, buf);
525 build_copy_load(&buf, T0, off);
526 build_copy_load(&buf, T1, off + copy_word_size);
527 build_copy_load(&buf, T2, off + 2 * copy_word_size);
528 build_copy_load(&buf, T3, off + 3 * copy_word_size);
529 build_copy_store_pref(&buf, off);
530 build_copy_store(&buf, T0, off);
531 build_copy_store_pref(&buf, off + copy_word_size);
532 build_copy_store(&buf, T1, off + copy_word_size);
533 build_copy_store_pref(&buf, off + 2 * copy_word_size);
534 build_copy_store(&buf, T2, off + 2 * copy_word_size);
535 build_copy_store_pref(&buf, off + 3 * copy_word_size);
536 build_copy_store(&buf, T3, off + 3 * copy_word_size);
537 off += 4 * copy_word_size;
538 } while (off < half_copy_loop_size);
539 pg_addiu(&buf, A1, A1, 2 * off);
540 pg_addiu(&buf, A0, A0, 2 * off);
543 build_copy_load(&buf, T0, off);
544 build_copy_load(&buf, T1, off + copy_word_size);
545 build_copy_load(&buf, T2, off + 2 * copy_word_size);
546 build_copy_load(&buf, T3, off + 3 * copy_word_size);
547 build_copy_store_pref(&buf, off);
548 build_copy_store(&buf, T0, off);
549 build_copy_store_pref(&buf, off + copy_word_size);
550 build_copy_store(&buf, T1, off + copy_word_size);
551 build_copy_store_pref(&buf, off + 2 * copy_word_size);
552 build_copy_store(&buf, T2, off + 2 * copy_word_size);
553 build_copy_store_pref(&buf, off + 3 * copy_word_size);
554 if (off == -(4 * copy_word_size))
555 uasm_il_bne(&buf, &r, A2, A0,
556 label_copy_pref_store);
557 build_copy_store(&buf, T3, off + 3 * copy_word_size);
558 off += 4 * copy_word_size;
562 if (pref_bias_copy_store) {
563 pg_addiu(&buf, A2, A0, pref_bias_copy_store);
564 uasm_l_copy_nopref(&l, buf);
567 build_copy_load(&buf, T0, off);
568 build_copy_load(&buf, T1, off + copy_word_size);
569 build_copy_load(&buf, T2, off + 2 * copy_word_size);
570 build_copy_load(&buf, T3, off + 3 * copy_word_size);
571 build_copy_store(&buf, T0, off);
572 build_copy_store(&buf, T1, off + copy_word_size);
573 build_copy_store(&buf, T2, off + 2 * copy_word_size);
574 build_copy_store(&buf, T3, off + 3 * copy_word_size);
575 off += 4 * copy_word_size;
576 } while (off < half_copy_loop_size);
577 pg_addiu(&buf, A1, A1, 2 * off);
578 pg_addiu(&buf, A0, A0, 2 * off);
581 build_copy_load(&buf, T0, off);
582 build_copy_load(&buf, T1, off + copy_word_size);
583 build_copy_load(&buf, T2, off + 2 * copy_word_size);
584 build_copy_load(&buf, T3, off + 3 * copy_word_size);
585 build_copy_store(&buf, T0, off);
586 build_copy_store(&buf, T1, off + copy_word_size);
587 build_copy_store(&buf, T2, off + 2 * copy_word_size);
588 if (off == -(4 * copy_word_size))
589 uasm_il_bne(&buf, &r, A2, A0,
591 build_copy_store(&buf, T3, off + 3 * copy_word_size);
592 off += 4 * copy_word_size;
599 BUG_ON(buf > copy_page_array + ARRAY_SIZE(copy_page_array));
601 uasm_resolve_relocs(relocs, labels);
603 pr_debug("Synthesized copy page handler (%u instructions).\n",
604 (u32)(buf - copy_page_array));
606 pr_debug("\t.set push\n");
607 pr_debug("\t.set noreorder\n");
608 for (i = 0; i < (buf - copy_page_array); i++)
609 pr_debug("\t.word 0x%08x\n", copy_page_array[i]);
610 pr_debug("\t.set pop\n");
613 #ifdef CONFIG_SIBYTE_DMA_PAGEOPS
616 * Pad descriptors to cacheline, since each is exclusively owned by a
624 } ____cacheline_aligned_in_smp page_descr[DM_NUM_CHANNELS];
626 void sb1_dma_init(void)
630 for (i = 0; i < DM_NUM_CHANNELS; i++) {
631 const u64 base_val = CPHYSADDR((unsigned long)&page_descr[i]) |
632 V_DM_DSCR_BASE_RINGSZ(1);
633 void *base_reg = IOADDR(A_DM_REGISTER(i, R_DM_DSCR_BASE));
635 __raw_writeq(base_val, base_reg);
636 __raw_writeq(base_val | M_DM_DSCR_BASE_RESET, base_reg);
637 __raw_writeq(base_val | M_DM_DSCR_BASE_ENABL, base_reg);
641 void clear_page(void *page)
643 u64 to_phys = CPHYSADDR((unsigned long)page);
644 unsigned int cpu = smp_processor_id();
646 /* if the page is not in KSEG0, use old way */
647 if ((long)KSEGX((unsigned long)page) != (long)CKSEG0)
648 return clear_page_cpu(page);
650 page_descr[cpu].dscr_a = to_phys | M_DM_DSCRA_ZERO_MEM |
651 M_DM_DSCRA_L2C_DEST | M_DM_DSCRA_INTERRUPT;
652 page_descr[cpu].dscr_b = V_DM_DSCRB_SRC_LENGTH(PAGE_SIZE);
653 __raw_writeq(1, IOADDR(A_DM_REGISTER(cpu, R_DM_DSCR_COUNT)));
656 * Don't really want to do it this way, but there's no
657 * reliable way to delay completion detection.
659 while (!(__raw_readq(IOADDR(A_DM_REGISTER(cpu, R_DM_DSCR_BASE_DEBUG)))
660 & M_DM_DSCR_BASE_INTERRUPT))
662 __raw_readq(IOADDR(A_DM_REGISTER(cpu, R_DM_DSCR_BASE)));
665 void copy_page(void *to, void *from)
667 u64 from_phys = CPHYSADDR((unsigned long)from);
668 u64 to_phys = CPHYSADDR((unsigned long)to);
669 unsigned int cpu = smp_processor_id();
671 /* if any page is not in KSEG0, use old way */
672 if ((long)KSEGX((unsigned long)to) != (long)CKSEG0
673 || (long)KSEGX((unsigned long)from) != (long)CKSEG0)
674 return copy_page_cpu(to, from);
676 page_descr[cpu].dscr_a = to_phys | M_DM_DSCRA_L2C_DEST |
677 M_DM_DSCRA_INTERRUPT;
678 page_descr[cpu].dscr_b = from_phys | V_DM_DSCRB_SRC_LENGTH(PAGE_SIZE);
679 __raw_writeq(1, IOADDR(A_DM_REGISTER(cpu, R_DM_DSCR_COUNT)));
682 * Don't really want to do it this way, but there's no
683 * reliable way to delay completion detection.
685 while (!(__raw_readq(IOADDR(A_DM_REGISTER(cpu, R_DM_DSCR_BASE_DEBUG)))
686 & M_DM_DSCR_BASE_INTERRUPT))
688 __raw_readq(IOADDR(A_DM_REGISTER(cpu, R_DM_DSCR_BASE)));
691 #endif /* CONFIG_SIBYTE_DMA_PAGEOPS */