1 /* SPDX-License-Identifier: GPL-2.0 */ !! 1 /* linux/arch/sparc/lib/memset.S: Sparc optimized memset, bzero and clear_user code
2 /* !! 2 * Copyright (C) 1991,1996 Free Software Foundation
3 * linux/arch/alpha/lib/memset.S !! 3 * Copyright (C) 1996,1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
>> 4 * Copyright (C) 1996 David S. Miller (davem@caip.rutgers.edu)
4 * 5 *
5 * This is an efficient (and small) implementa !! 6 * Calls to memset returns initial %o0. Calls to bzero returns 0, if ok, and
6 * function for the alpha. !! 7 * number of bytes not yet set if exception occurs and we were called as
7 * !! 8 * clear_user.
8 * (C) Copyright 1996 Linus Torvalds <<
9 * <<
10 * This routine is "moral-ware": you are free <<
11 * the only obligation I put on you is a moral <<
12 * to the routine, please send me your improve <<
13 * <<
14 * The scheduling comments are according to th <<
15 * hand, so they might well be incorrect, plea <<
16 */ 9 */
17 #include <linux/export.h> <<
18 .set noat <<
19 .set noreorder <<
20 .text <<
21 .globl memset <<
22 .globl __memset <<
23 .globl ___memset <<
24 .globl __memset16 <<
25 .globl __constant_c_memset <<
26 <<
27 .ent ___memset <<
28 .align 5 <<
29 ___memset: <<
30 .frame $30,0,$26,0 <<
31 .prologue 0 <<
32 <<
33 and $17,255,$1 /* E1 */ <<
34 insbl $17,1,$17 /* .. E0 */ <<
35 bis $17,$1,$17 /* E0 (p-c lat <<
36 sll $17,16,$1 /* E1 (p-c lat <<
37 <<
38 bis $17,$1,$17 /* E0 (p-c lat <<
39 sll $17,32,$1 /* E1 (p-c lat <<
40 bis $17,$1,$17 /* E0 (p-c lat <<
41 ldq_u $31,0($30) /* .. E1 */ <<
42 <<
43 .align 5 <<
44 __constant_c_memset: <<
45 addq $18,$16,$6 /* E0 */ <<
46 bis $16,$16,$0 /* .. E1 */ <<
47 xor $16,$6,$1 /* E0 */ <<
48 ble $18,end /* .. E1 */ <<
49 <<
50 bic $1,7,$1 /* E0 */ <<
51 beq $1,within_one_quad /* .. E1 (note <<
52 and $16,7,$3 /* E0 */ <<
53 beq $3,aligned /* .. E1 (note <<
54 <<
55 ldq_u $4,0($16) /* E0 */ <<
56 bis $16,$16,$5 /* .. E1 */ <<
57 insql $17,$16,$2 /* E0 */ <<
58 subq $3,8,$3 /* .. E1 */ <<
59 <<
60 addq $18,$3,$18 /* E0 $18 is <<
61 mskql $4,$16,$4 /* .. E1 (and <<
62 subq $16,$3,$16 /* E0 $16 is <<
63 bis $2,$4,$1 /* .. E1 */ <<
64 <<
65 bis $31,$31,$31 /* E0 */ <<
66 ldq_u $31,0($30) /* .. E1 */ <<
67 stq_u $1,0($5) /* E0 */ <<
68 bis $31,$31,$31 /* .. E1 */ <<
69 <<
70 .align 4 <<
71 aligned: <<
72 sra $18,3,$3 /* E0 */ <<
73 and $18,7,$18 /* .. E1 */ <<
74 bis $16,$16,$5 /* E0 */ <<
75 beq $3,no_quad /* .. E1 */ <<
76 <<
77 .align 3 <<
78 loop: <<
79 stq $17,0($5) /* E0 */ <<
80 subq $3,1,$3 /* .. E1 */ <<
81 addq $5,8,$5 /* E0 */ <<
82 bne $3,loop /* .. E1 */ <<
83 <<
84 no_quad: <<
85 bis $31,$31,$31 /* E0 */ <<
86 beq $18,end /* .. E1 */ <<
87 ldq $7,0($5) /* E0 */ <<
88 mskqh $7,$6,$2 /* .. E1 (and <<
89 <<
90 insqh $17,$6,$4 /* E0 */ <<
91 bis $2,$4,$1 /* .. E1 */ <<
92 stq $1,0($5) /* E0 */ <<
93 ret $31,($26),1 /* .. E1 */ <<
94 <<
95 .align 3 <<
96 within_one_quad: <<
97 ldq_u $1,0($16) /* E0 */ <<
98 insql $17,$16,$2 /* E1 */ <<
99 mskql $1,$16,$4 /* E0 (after l <<
100 bis $2,$4,$2 /* E0 */ <<
101 <<
102 mskql $2,$6,$4 /* E0 */ <<
103 mskqh $1,$6,$2 /* .. E1 */ <<
104 bis $2,$4,$1 /* E0 */ <<
105 stq_u $1,0($16) /* E0 */ <<
106 <<
107 end: <<
108 ret $31,($26),1 /* E1 */ <<
109 .end ___memset <<
110 EXPORT_SYMBOL(___memset) <<
111 EXPORT_SYMBOL(__constant_c_memset) <<
112 <<
113 .align 5 <<
114 .ent __memset16 <<
115 __memset16: <<
116 .prologue 0 <<
117 <<
118 inswl $17,0,$1 /* E0 */ <<
119 inswl $17,2,$2 /* E0 */ <<
120 inswl $17,4,$3 /* E0 */ <<
121 or $1,$2,$1 /* .. E1 */ <<
122 inswl $17,6,$4 /* E0 */ <<
123 or $1,$3,$1 /* .. E1 */ <<
124 or $1,$4,$17 /* E0 */ <<
125 br __constant_c_memset /* .. E1 */ <<
126 10
127 .end __memset16 !! 11 #include <asm/ptrace.h>
128 EXPORT_SYMBOL(__memset16) !! 12 #include <asm/export.h>
129 13
130 memset = ___memset !! 14 /* Work around cpp -rob */
131 __memset = ___memset !! 15 #define ALLOC #alloc
>> 16 #define EXECINSTR #execinstr
>> 17 #define EX(x,y,a,b) \
>> 18 98: x,y; \
>> 19 .section .fixup,ALLOC,EXECINSTR; \
>> 20 .align 4; \
>> 21 99: ba 30f; \
>> 22 a, b, %o0; \
>> 23 .section __ex_table,ALLOC; \
>> 24 .align 4; \
>> 25 .word 98b, 99b; \
>> 26 .text; \
>> 27 .align 4
>> 28
>> 29 #define EXT(start,end,handler) \
>> 30 .section __ex_table,ALLOC; \
>> 31 .align 4; \
>> 32 .word start, 0, end, handler; \
>> 33 .text; \
>> 34 .align 4
>> 35
>> 36 /* Please don't change these macros, unless you change the logic
>> 37 * in the .fixup section below as well.
>> 38 * Store 64 bytes at (BASE + OFFSET) using value SOURCE. */
>> 39 #define ZERO_BIG_BLOCK(base, offset, source) \
>> 40 std source, [base + offset + 0x00]; \
>> 41 std source, [base + offset + 0x08]; \
>> 42 std source, [base + offset + 0x10]; \
>> 43 std source, [base + offset + 0x18]; \
>> 44 std source, [base + offset + 0x20]; \
>> 45 std source, [base + offset + 0x28]; \
>> 46 std source, [base + offset + 0x30]; \
>> 47 std source, [base + offset + 0x38];
>> 48
>> 49 #define ZERO_LAST_BLOCKS(base, offset, source) \
>> 50 std source, [base - offset - 0x38]; \
>> 51 std source, [base - offset - 0x30]; \
>> 52 std source, [base - offset - 0x28]; \
>> 53 std source, [base - offset - 0x20]; \
>> 54 std source, [base - offset - 0x18]; \
>> 55 std source, [base - offset - 0x10]; \
>> 56 std source, [base - offset - 0x08]; \
>> 57 std source, [base - offset - 0x00];
>> 58
>> 59 .text
>> 60 .align 4
>> 61
>> 62 .globl __bzero_begin
>> 63 __bzero_begin:
>> 64
>> 65 .globl __bzero
>> 66 .type __bzero,#function
>> 67 .globl memset
>> 68 EXPORT_SYMBOL(__bzero)
132 EXPORT_SYMBOL(memset) 69 EXPORT_SYMBOL(memset)
133 EXPORT_SYMBOL(__memset) !! 70 .globl __memset_start, __memset_end
>> 71 __memset_start:
>> 72 memset:
>> 73 mov %o0, %g1
>> 74 mov 1, %g4
>> 75 and %o1, 0xff, %g3
>> 76 sll %g3, 8, %g2
>> 77 or %g3, %g2, %g3
>> 78 sll %g3, 16, %g2
>> 79 or %g3, %g2, %g3
>> 80 b 1f
>> 81 mov %o2, %o1
>> 82 3:
>> 83 cmp %o2, 3
>> 84 be 2f
>> 85 EX(stb %g3, [%o0], sub %o1, 0)
>> 86
>> 87 cmp %o2, 2
>> 88 be 2f
>> 89 EX(stb %g3, [%o0 + 0x01], sub %o1, 1)
>> 90
>> 91 EX(stb %g3, [%o0 + 0x02], sub %o1, 2)
>> 92 2:
>> 93 sub %o2, 4, %o2
>> 94 add %o1, %o2, %o1
>> 95 b 4f
>> 96 sub %o0, %o2, %o0
>> 97
>> 98 __bzero:
>> 99 clr %g4
>> 100 mov %g0, %g3
>> 101 1:
>> 102 cmp %o1, 7
>> 103 bleu 7f
>> 104 andcc %o0, 3, %o2
>> 105
>> 106 bne 3b
>> 107 4:
>> 108 andcc %o0, 4, %g0
>> 109
>> 110 be 2f
>> 111 mov %g3, %g2
>> 112
>> 113 EX(st %g3, [%o0], sub %o1, 0)
>> 114 sub %o1, 4, %o1
>> 115 add %o0, 4, %o0
>> 116 2:
>> 117 andcc %o1, 0xffffff80, %o3 ! Now everything is 8 aligned and o1 is len to run
>> 118 be 9f
>> 119 andcc %o1, 0x78, %o2
>> 120 10:
>> 121 ZERO_BIG_BLOCK(%o0, 0x00, %g2)
>> 122 subcc %o3, 128, %o3
>> 123 ZERO_BIG_BLOCK(%o0, 0x40, %g2)
>> 124 11:
>> 125 EXT(10b, 11b, 20f)
>> 126 bne 10b
>> 127 add %o0, 128, %o0
>> 128
>> 129 orcc %o2, %g0, %g0
>> 130 9:
>> 131 be 13f
>> 132 andcc %o1, 7, %o1
>> 133
>> 134 srl %o2, 1, %o3
>> 135 set 13f, %o4
>> 136 sub %o4, %o3, %o4
>> 137 jmp %o4
>> 138 add %o0, %o2, %o0
>> 139
>> 140 12:
>> 141 ZERO_LAST_BLOCKS(%o0, 0x48, %g2)
>> 142 ZERO_LAST_BLOCKS(%o0, 0x08, %g2)
>> 143 13:
>> 144 be 8f
>> 145 andcc %o1, 4, %g0
>> 146
>> 147 be 1f
>> 148 andcc %o1, 2, %g0
>> 149
>> 150 EX(st %g3, [%o0], and %o1, 7)
>> 151 add %o0, 4, %o0
>> 152 1:
>> 153 be 1f
>> 154 andcc %o1, 1, %g0
>> 155
>> 156 EX(sth %g3, [%o0], and %o1, 3)
>> 157 add %o0, 2, %o0
>> 158 1:
>> 159 bne,a 8f
>> 160 EX(stb %g3, [%o0], and %o1, 1)
>> 161 8:
>> 162 b 0f
>> 163 nop
>> 164 7:
>> 165 be 13b
>> 166 orcc %o1, 0, %g0
>> 167
>> 168 be 0f
>> 169 8:
>> 170 add %o0, 1, %o0
>> 171 subcc %o1, 1, %o1
>> 172 bne 8b
>> 173 EX(stb %g3, [%o0 - 1], add %o1, 1)
>> 174 0:
>> 175 andcc %g4, 1, %g0
>> 176 be 5f
>> 177 nop
>> 178 retl
>> 179 mov %g1, %o0
>> 180 5:
>> 181 retl
>> 182 clr %o0
>> 183 __memset_end:
>> 184
>> 185 .section .fixup,#alloc,#execinstr
>> 186 .align 4
>> 187 20:
>> 188 cmp %g2, 8
>> 189 bleu 1f
>> 190 and %o1, 0x7f, %o1
>> 191 sub %g2, 9, %g2
>> 192 add %o3, 64, %o3
>> 193 1:
>> 194 sll %g2, 3, %g2
>> 195 add %o3, %o1, %o0
>> 196 b 30f
>> 197 sub %o0, %g2, %o0
>> 198 21:
>> 199 mov 8, %o0
>> 200 and %o1, 7, %o1
>> 201 sub %o0, %g2, %o0
>> 202 sll %o0, 3, %o0
>> 203 b 30f
>> 204 add %o0, %o1, %o0
>> 205 30:
>> 206 /* %o4 is faulting address, %o5 is %pc where fault occurred */
>> 207 save %sp, -104, %sp
>> 208 mov %i5, %o0
>> 209 mov %i7, %o1
>> 210 call lookup_fault
>> 211 mov %i4, %o2
>> 212 ret
>> 213 restore
>> 214
>> 215 .globl __bzero_end
>> 216 __bzero_end:
Linux® is a registered trademark of Linus Torvalds in the United States and other countries.
TOMOYO® is a registered trademark of NTT DATA CORPORATION.