Home | History | Annotate | Line # | Download | only in mips
      1 /*-
      2  * Copyright (c) 2011 The NetBSD Foundation, Inc.
      3  * All rights reserved.
      4  *
      5  * This code is derived from software contributed to The NetBSD Foundation
      6  * by Matt Thomas of 3am Software Foundry.
      7  *
      8  * Redistribution and use in source and binary forms, with or without
      9  * modification, are permitted provided that the following conditions
     10  * are met:
     11  * 1. Redistributions of source code must retain the above copyright
     12  *    notice, this list of conditions and the following disclaimer.
     13  * 2. Redistributions in binary form must reproduce the above copyright
     14  *    notice, this list of conditions and the following disclaimer in the
     15  *    documentation and/or other materials provided with the distribution.
     16  *
     17  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     18  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     19  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     20  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     21  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     22  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     23  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     24  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     25  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     26  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     27  * POSSIBILITY OF SUCH DAMAGE.
     28  */
     29 
     30 #ifdef __mips_n32
     31 /*
     32  * Treat N32 as N64
     33  */
     34 #undef _MIPS_SZPTR
     35 #define _MIPS_SZPTR 64
     36 #endif
     37 
     38 #include <mips/asm.h>
     39 
     40 RCSID("$NetBSD: cache_r4k_subr.S,v 1.3 2017/04/27 19:40:55 skrll Exp $")
     41 
     42 #include <mips/cache_r4k.h>
     43 
     44 #ifndef LINE_SHIFT
     45 #error LINE_SHIFT undefined
     46 #endif
     47 
     48 #ifdef __mips_o32
     49 	.set	mips32
     50 #else
     51 	.set	mips3
     52 #endif
     53 
     54 #define	LINE_SIZE		(1 << LINE_SHIFT)
     55 
     56 #ifdef __STDC__
     57 #define	_CONCAT3(a,b,c)		a ## _ ## b ## _ ## c
     58 #define	_CONCAT4(a,b,c,d)	a ## _ ## b ## _ ## c ## _ ## d
     59 #else
     60 #define	_CONCAT3(a,b,c)		a/**/_/**/b/**/_/**/c
     61 #define	_CONCAT4(a,b,c,d)	a/**/_/**/b/**/_/**/c/**/_/**/d
     62 #endif
     63 
     64 #define	_OPNAME(a,b,c)		_CONCAT3(a,b,c)
     65 #define	_OPNAME32(a,b,c)	_CONCAT4(a,b,32lines,c)
     66 
     67 #ifndef OPNAME
     68 #define OPNAME is not defined!
     69 #endif
     70 #ifndef OPNAME32
     71 #define OPNAME32 is not defined!
     72 #endif
     73 
     74 STATIC_LEAF_NOPROFILE(OPNAME(doop))
     75 	.set	push
     76 	.set	noreorder
     77 	/*
     78 	 * Jump in the table to do from 0 to 32 cache ops
     79 	 * t9 = first op @ 31*LINE_SIZE(a0)
     80 	 * a0 = starting va (may be unaligned)
     81 	 * a1 = size in bytes (may be unaligned)
     82 	 */
     83 	and	v1, a0, LINE_SIZE - 1		# get offset in cache line
     84 	xor	a0, v1				# align start to cache line
     85 	PTR_ADDU a1, v1				# add offset to size
     86 	PTR_ADDU a1, LINE_SIZE - 1		# size is now rounded
     87 	PTR_SRL	t0, a1, LINE_SHIFT		# get # of cache lines
     88 
     89 	beqz	t0, 3f				# bail if t0 is 0 (no lines)
     90 	 PTR_SRL v0, t0, 5			# v0 = # of (32x lines)
     91 	beqz	v0, 2f				# must have < 32 sets
     92 	 nop					# delay slot
     93 	/*
     94 	 * We have 1 more sets of 32 cache lines to deal with.  The number of
     95 	 * sets is in v0.  Keep calling the 32op routines until we run out of
     96 	 * sets.  We have to save ra since the jalr will overwrite it.
     97 	 */
     98 	move	ta0, ra				# save return address
     99 1:
    100 	jalr	t9				# do 32 cache ops (31..0)
    101 	 PTR_ADDU v0, -1			# decrement 32x set count
    102 	bnez	v0, 1b				# do next 32x set if > 0
    103 	 PTR_ADDU a0, 32*LINE_SIZE		# adjust address by 32 lines
    104 	/*
    105 	 * Now we have < 32 sets so need to remove the number of 32x line sets
    106 	 * from the of lines we have left to do.
    107 	 */
    108 	andi	t0, 31				# t0 = # of lines left
    109 	beqz	t0, 3f				# no more to do?
    110 	 move	ra, ta0				# restore return address
    111 2:
    112 	PTR_SLL	t0, INT_SCALESHIFT		# shift to instruction index
    113 	PTR_ADDU t9, 32 << INT_SCALESHIFT	# point to end of table
    114 	PTR_SUBU t9, t0				# backup N cacheops
    115 	jr	t9				# and do them.
    116 	 nop
    117 3:
    118 	jr	ra
    119 	 nop
    120 	.set	pop
    121 END(OPNAME(doop))
    122 
    123 #ifdef WANT_ICACHE_OPS
    124 LEAF_NOPROFILE(OPNAME(icache_index_inv))
    125 	PTR_LA	t9, OPNAME32(icache_index_inv)	# get address of first op
    126 	b	OPNAME(doop)
    127 END(OPNAME(icache_index_inv))
    128 
    129 LEAF_NOPROFILE(OPNAME(icache_hit_inv))
    130 	PTR_LA	t9, OPNAME32(icache_hit_inv)	# get address of first op
    131 	b	OPNAME(doop)
    132 END(OPNAME(icache_hit_inv))
    133 #endif /* WANT_ICACHE_OPS */
    134 
    135 #ifdef WANT_PDCACHE_OPS
    136 LEAF_NOPROFILE(OPNAME(pdcache_index_wb_inv))
    137 	PTR_LA	t9, OPNAME32(pdcache_index_wb_inv) # get address of first op
    138 	b	OPNAME(doop)
    139 END(OPNAME(pdcache_index_wb_inv))
    140 
    141 LEAF_NOPROFILE(OPNAME(pdcache_hit_inv))
    142 	PTR_LA	t9, OPNAME32(pdcache_hit_inv)	# get address of first op
    143 	b	OPNAME(doop)
    144 END(OPNAME(pdcache_hit_inv))
    145 
    146 LEAF_NOPROFILE(OPNAME(pdcache_hit_wb_inv))
    147 	PTR_LA	t9, OPNAME32(pdcache_hit_wb_inv) # get address of first op
    148 	b	OPNAME(doop)
    149 END(OPNAME(pdcache_hit_wb_inv))
    150 
    151 LEAF_NOPROFILE(OPNAME(pdcache_hit_wb))
    152 	PTR_LA	t9, OPNAME32(pdcache_hit_wb)	# get address of first op
    153 	b	OPNAME(doop)
    154 END(OPNAME(pdcache_hit_wb))
    155 #endif /* WANT_PDCACHE_OPS */
    156 
    157 #ifdef WANT_SDCACHE_OPS
    158 LEAF_NOPROFILE(OPNAME(sdcache_index_wb_inv))
    159 	PTR_LA	t9, OPNAME32(sdcache_index_wb_inv) # get address of first op
    160 	b	OPNAME(doop)
    161 END(OPNAME(sdcache_index_wb_inv))
    162 
    163 LEAF_NOPROFILE(OPNAME(sdcache_hit_inv))
    164 	PTR_LA	t9, OPNAME32(sdcache_hit_inv)	# get address of first op
    165 	b	OPNAME(doop)
    166 END(OPNAME(sdcache_hit_inv))
    167 
    168 LEAF_NOPROFILE(OPNAME(sdcache_hit_wb_inv))
    169 	PTR_LA	t9, OPNAME32(sdcache_hit_wb_inv) # get address of first op
    170 	b	OPNAME(doop)
    171 END(OPNAME(sdcache_hit_wb_inv))
    172 
    173 LEAF_NOPROFILE(OPNAME(sdcache_hit_wb))
    174 	PTR_LA	t9, OPNAME32(sdcache_hit_wb)	# get address of first op
    175 	b	OPNAME(doop)
    176 END(OPNAME(sdcache_hit_wb))
    177 #endif /* WANT_SDCACHE_OPS */
    178 
    179 /*
    180  * Macro to emit 32 cache instruction with the right op and offset in the
    181  * proper order.
    182  */
    183 	.macro	emitops	name, op, start=31
    184 	.ifeq	\start - 31
    185 	.p2align 4
    186 STATIC_LEAF_NOPROFILE(\name)
    187 	.endif
    188 	cache	\op, (\start*LINE_SIZE)(a0)
    189 	.ifgt	\start
    190 	emitops	\name, \op, "(\start-1)"
    191 	.else
    192 	j	ra
    193 	 sync
    194 END(\name)
    195 	.endif
    196 	.endm
    197 
    198 	.set	noreorder
    199 #ifdef WANT_ICACHE_OPS
    200 	emitops	OPNAME32(icache_index_inv), CACHE_R4K_I|CACHEOP_R4K_INDEX_INV
    201 	emitops	OPNAME32(icache_hit_inv), CACHE_R4K_I|CACHEOP_R4K_HIT_INV
    202 #endif
    203 
    204 #ifdef WANT_PDCACHE_OPS
    205 	emitops	OPNAME32(pdcache_index_wb_inv), CACHE_R4K_D|CACHEOP_R4K_INDEX_WB_INV
    206 	emitops	OPNAME32(pdcache_hit_inv), CACHE_R4K_D|CACHEOP_R4K_HIT_INV
    207 	emitops	OPNAME32(pdcache_hit_wb_inv), CACHE_R4K_D|CACHEOP_R4K_HIT_WB_INV
    208 	emitops	OPNAME32(pdcache_hit_wb), CACHE_R4K_D|CACHEOP_R4K_HIT_WB
    209 #endif
    210 
    211 #ifdef WANT_SDCACHE_OPS
    212 	emitops	OPNAME32(sdcache_index_wb_inv), CACHE_R4K_SD|CACHEOP_R4K_INDEX_WB_INV
    213 	emitops	OPNAME32(sdcache_hit_inv), CACHE_R4K_SD|CACHEOP_R4K_HIT_INV
    214 	emitops	OPNAME32(sdcache_hit_wb_inv), CACHE_R4K_SD|CACHEOP_R4K_HIT_WB_INV
    215 	emitops	OPNAME32(sdcache_hit_wb), CACHE_R4K_SD|CACHEOP_R4K_HIT_WB
    216 #endif
    217