1 .global _longjmp
2 .global longjmp
3 .type _longjmp,@function
4 .type longjmp,@function
5_longjmp:
6longjmp:
7 # 0) move old return address into the link register
8 ld 0, 0*8(3)
9 mtlr 0
10 # 1) restore cr
11 ld 0, 1*8(3)
12 mtcr 0
13 # 2) restore SP
14 ld 1, 2*8(3)
15 # 3) restore TOC into both r2 and the caller's stack.
16 # Which location is required depends on whether setjmp was called
17 # locally or non-locally, but it's always safe to restore to both.
18 ld 2, 3*8(3)
19 std 2, 24(1)
20 # 4) restore r14-r31
21 ld 14, 4*8(3)
22 ld 15, 5*8(3)
23 ld 16, 6*8(3)
24 ld 17, 7*8(3)
25 ld 18, 8*8(3)
26 ld 19, 9*8(3)
27 ld 20, 10*8(3)
28 ld 21, 11*8(3)
29 ld 22, 12*8(3)
30 ld 23, 13*8(3)
31 ld 24, 14*8(3)
32 ld 25, 15*8(3)
33 ld 26, 16*8(3)
34 ld 27, 17*8(3)
35 ld 28, 18*8(3)
36 ld 29, 19*8(3)
37 ld 30, 20*8(3)
38 ld 31, 21*8(3)
39 # 5) restore floating point registers f14-f31
40 lfd 14, 22*8(3)
41 lfd 15, 23*8(3)
42 lfd 16, 24*8(3)
43 lfd 17, 25*8(3)
44 lfd 18, 26*8(3)
45 lfd 19, 27*8(3)
46 lfd 20, 28*8(3)
47 lfd 21, 29*8(3)
48 lfd 22, 30*8(3)
49 lfd 23, 31*8(3)
50 lfd 24, 32*8(3)
51 lfd 25, 33*8(3)
52 lfd 26, 34*8(3)
53 lfd 27, 35*8(3)
54 lfd 28, 36*8(3)
55 lfd 29, 37*8(3)
56 lfd 30, 38*8(3)
57 lfd 31, 39*8(3)
58
59 # 6) restore vector registers v20-v31
60 addi 3, 3, 40*8
61 lvx 20, 0, 3 ; addi 3, 3, 16
62 lvx 21, 0, 3 ; addi 3, 3, 16
63 lvx 22, 0, 3 ; addi 3, 3, 16
64 lvx 23, 0, 3 ; addi 3, 3, 16
65 lvx 24, 0, 3 ; addi 3, 3, 16
66 lvx 25, 0, 3 ; addi 3, 3, 16
67 lvx 26, 0, 3 ; addi 3, 3, 16
68 lvx 27, 0, 3 ; addi 3, 3, 16
69 lvx 28, 0, 3 ; addi 3, 3, 16
70 lvx 29, 0, 3 ; addi 3, 3, 16
71 lvx 30, 0, 3 ; addi 3, 3, 16
72 lvx 31, 0, 3
73
74 # 7) return r4 ? r4 : 1
75 mr 3, 4
76 cmpwi cr7, 4, 0
77 bne cr7, 1f
78 li 3, 1
791:
80 blr
81