hc
2024-12-19 9370bb92b2d16684ee45cf24e879c93c509162da
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
/* SPDX-License-Identifier: GPL-2.0+ WITH GCC-exception-2.0
 
   Copyright (C) 1994, 1995, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
   2004, 2005, 2006
   Free Software Foundation, Inc.
*/
 
!! libgcc routines for the Renesas / SuperH SH CPUs.
!! Contributed by Steve Chamberlain.
!! sac@cygnus.com
 
!! ashiftrt_r4_x, ___ashrsi3, ___ashlsi3, ___lshrsi3 routines
!! recoded in assembly by Toshiyasu Morita
!! tm@netcom.com
 
/* SH2 optimizations for ___ashrsi3, ___ashlsi3, ___lshrsi3 and
   ELF local label prefixes by J"orn Rennecke
   amylaar@cygnus.com  */
 
!
! __ashrsi3
!
! Entry:
!
! r4: Value to shift
! r5: Shifts
!
! Exit:
!
! r0: Result
!
! Destroys:
!
! (none)
!
! __ashrsi3_r0
!
! Entry:
!
! r4: Value to shift
! r0: Shifts
!
! Exit:
!
! r0: Result
!
! Destroys:
!
! (none)
 
   .global    __ashrsi3
   .global    __ashrsi3_r0
   
   .align    2
__ashrsi3:
   mov    r5,r0
   .align    2
__ashrsi3_r0:
   and    #31,r0
   mov.l    r4,@-r15
   mov    r0,r4
   mova    ashrsi3_table,r0
   mov.b    @(r0,r4),r4
   add    r4,r0
   jmp    @r0
   mov.l    @r15+,r0
 
   .align    2
ashrsi3_table:
   .byte        ashrsi3_0-ashrsi3_table
   .byte        ashrsi3_1-ashrsi3_table
   .byte        ashrsi3_2-ashrsi3_table
   .byte        ashrsi3_3-ashrsi3_table
   .byte        ashrsi3_4-ashrsi3_table
   .byte        ashrsi3_5-ashrsi3_table
   .byte        ashrsi3_6-ashrsi3_table
   .byte        ashrsi3_7-ashrsi3_table
   .byte        ashrsi3_8-ashrsi3_table
   .byte        ashrsi3_9-ashrsi3_table
   .byte        ashrsi3_10-ashrsi3_table
   .byte        ashrsi3_11-ashrsi3_table
   .byte        ashrsi3_12-ashrsi3_table
   .byte        ashrsi3_13-ashrsi3_table
   .byte        ashrsi3_14-ashrsi3_table
   .byte        ashrsi3_15-ashrsi3_table
   .byte        ashrsi3_16-ashrsi3_table
   .byte        ashrsi3_17-ashrsi3_table
   .byte        ashrsi3_18-ashrsi3_table
   .byte        ashrsi3_19-ashrsi3_table
   .byte        ashrsi3_20-ashrsi3_table
   .byte        ashrsi3_21-ashrsi3_table
   .byte        ashrsi3_22-ashrsi3_table
   .byte        ashrsi3_23-ashrsi3_table
   .byte        ashrsi3_24-ashrsi3_table
   .byte        ashrsi3_25-ashrsi3_table
   .byte        ashrsi3_26-ashrsi3_table
   .byte        ashrsi3_27-ashrsi3_table
   .byte        ashrsi3_28-ashrsi3_table
   .byte        ashrsi3_29-ashrsi3_table
   .byte        ashrsi3_30-ashrsi3_table
   .byte        ashrsi3_31-ashrsi3_table
 
ashrsi3_31:
   rotcl    r0
   rts
   subc    r0,r0
 
ashrsi3_30:
   shar    r0
ashrsi3_29:
   shar    r0
ashrsi3_28:
   shar    r0
ashrsi3_27:
   shar    r0
ashrsi3_26:
   shar    r0
ashrsi3_25:
   shar    r0
ashrsi3_24:
   shlr16    r0
   shlr8    r0
   rts
   exts.b    r0,r0
 
ashrsi3_23:
   shar    r0
ashrsi3_22:
   shar    r0
ashrsi3_21:
   shar    r0
ashrsi3_20:
   shar    r0
ashrsi3_19:
   shar    r0
ashrsi3_18:
   shar    r0
ashrsi3_17:
   shar    r0
ashrsi3_16:
   shlr16    r0
   rts
   exts.w    r0,r0
 
ashrsi3_15:
   shar    r0
ashrsi3_14:
   shar    r0
ashrsi3_13:
   shar    r0
ashrsi3_12:
   shar    r0
ashrsi3_11:
   shar    r0
ashrsi3_10:
   shar    r0
ashrsi3_9:
   shar    r0
ashrsi3_8:
   shar    r0
ashrsi3_7:
   shar    r0
ashrsi3_6:
   shar    r0
ashrsi3_5:
   shar    r0
ashrsi3_4:
   shar    r0
ashrsi3_3:
   shar    r0
ashrsi3_2:
   shar    r0
ashrsi3_1:
   rts
   shar    r0
 
ashrsi3_0:
   rts
   nop