Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * arch/alpha/boot/head.S | |
3 | * | |
4 | * initial bootloader stuff.. | |
5 | */ | |
6 | ||
1da177e4 LT |
7 | |
8 | .set noreorder | |
9 | .globl __start | |
10 | .ent __start | |
11 | __start: | |
12 | br $29,2f | |
13 | 2: ldgp $29,0($29) | |
14 | jsr $26,start_kernel | |
15 | call_pal PAL_halt | |
16 | .end __start | |
17 | ||
18 | .align 5 | |
19 | .globl wrent | |
20 | .ent wrent | |
21 | wrent: | |
22 | .prologue 0 | |
23 | call_pal PAL_wrent | |
24 | ret ($26) | |
25 | .end wrent | |
26 | ||
27 | .align 5 | |
28 | .globl wrkgp | |
29 | .ent wrkgp | |
30 | wrkgp: | |
31 | .prologue 0 | |
32 | call_pal PAL_wrkgp | |
33 | ret ($26) | |
34 | .end wrkgp | |
35 | ||
36 | .align 5 | |
37 | .globl switch_to_osf_pal | |
38 | .ent switch_to_osf_pal | |
39 | switch_to_osf_pal: | |
40 | subq $30,128,$30 | |
41 | .frame $30,128,$26 | |
42 | stq $26,0($30) | |
43 | stq $1,8($30) | |
44 | stq $2,16($30) | |
45 | stq $3,24($30) | |
46 | stq $4,32($30) | |
47 | stq $5,40($30) | |
48 | stq $6,48($30) | |
49 | stq $7,56($30) | |
50 | stq $8,64($30) | |
51 | stq $9,72($30) | |
52 | stq $10,80($30) | |
53 | stq $11,88($30) | |
54 | stq $12,96($30) | |
55 | stq $13,104($30) | |
56 | stq $14,112($30) | |
57 | stq $15,120($30) | |
58 | .prologue 0 | |
59 | ||
60 | stq $30,0($17) /* save KSP in PCB */ | |
61 | ||
62 | bis $30,$30,$20 /* a4 = KSP */ | |
63 | br $17,1f | |
64 | ||
65 | ldq $26,0($30) | |
66 | ldq $1,8($30) | |
67 | ldq $2,16($30) | |
68 | ldq $3,24($30) | |
69 | ldq $4,32($30) | |
70 | ldq $5,40($30) | |
71 | ldq $6,48($30) | |
72 | ldq $7,56($30) | |
73 | ldq $8,64($30) | |
74 | ldq $9,72($30) | |
75 | ldq $10,80($30) | |
76 | ldq $11,88($30) | |
77 | ldq $12,96($30) | |
78 | ldq $13,104($30) | |
79 | ldq $14,112($30) | |
80 | ldq $15,120($30) | |
81 | addq $30,128,$30 | |
82 | ret ($26) | |
83 | 1: call_pal PAL_swppal | |
84 | .end switch_to_osf_pal | |
85 | ||
86 | .align 3 | |
87 | .globl tbi | |
88 | .ent tbi | |
89 | tbi: | |
90 | .prologue 0 | |
91 | call_pal PAL_tbi | |
92 | ret ($26) | |
93 | .end tbi | |
94 | ||
95 | .align 3 | |
96 | .globl halt | |
97 | .ent halt | |
98 | halt: | |
99 | .prologue 0 | |
100 | call_pal PAL_halt | |
101 | .end halt | |
102 | ||
103 | /* $16 - new stack page */ | |
104 | .align 3 | |
105 | .globl move_stack | |
106 | .ent move_stack | |
107 | move_stack: | |
108 | .prologue 0 | |
109 | lda $0, 0x1fff($31) | |
110 | and $0, $30, $1 /* Stack offset */ | |
111 | or $1, $16, $16 /* New stack pointer */ | |
112 | mov $30, $1 | |
113 | mov $16, $2 | |
114 | 1: ldq $3, 0($1) /* Move the stack */ | |
115 | addq $1, 8, $1 | |
116 | stq $3, 0($2) | |
117 | and $0, $1, $4 | |
118 | addq $2, 8, $2 | |
119 | bne $4, 1b | |
120 | mov $16, $30 | |
121 | ret ($26) | |
122 | .end move_stack |