sbrk.S revision 1.7 1 1.7 kleink /* $NetBSD: sbrk.S,v 1.7 2000/06/23 15:40:38 kleink Exp $ */
2 1.1 thorpej
3 1.1 thorpej #include "SYS.h"
4 1.1 thorpej
5 1.5 kleink .globl _C_LABEL(__curbrk)
6 1.6 kleink .globl _C_LABEL(_end)
7 1.1 thorpej
8 1.7 kleink #ifdef WEAK_ALIAS
9 1.7 kleink WEAK_ALIAS(sbrk, _sbrk)
10 1.7 kleink #endif
11 1.7 kleink
12 1.1 thorpej .data
13 1.5 kleink _C_LABEL(__curbrk):
14 1.6 kleink .long _C_LABEL(_end)
15 1.1 thorpej .text
16 1.1 thorpej
17 1.7 kleink #ifdef WEAK_ALIAS
18 1.7 kleink ENTRY(_sbrk)
19 1.7 kleink #else
20 1.1 thorpej ENTRY(sbrk)
21 1.7 kleink #endif
22 1.1 thorpej #ifdef PIC
23 1.4 tsubai mflr 10
24 1.4 tsubai bl _GLOBAL_OFFSET_TABLE_@local-4
25 1.4 tsubai mflr 5
26 1.4 tsubai mtlr 10
27 1.5 kleink lwz 5,_C_LABEL(__curbrk)@got(5)
28 1.4 tsubai lwz 6,0(5)
29 1.1 thorpej #else
30 1.5 kleink lis 5,_C_LABEL(__curbrk)@ha
31 1.5 kleink lwz 6,_C_LABEL(__curbrk)@l(5) # r6 = old break
32 1.4 tsubai #endif
33 1.1 thorpej add 3,3,6
34 1.1 thorpej mr 7,3 # r7 = new break
35 1.1 thorpej li 0,SYS_break
36 1.1 thorpej sc # break(new_break)
37 1.1 thorpej bso 1f
38 1.1 thorpej mr 3,6 # set return value
39 1.4 tsubai #ifdef PIC
40 1.4 tsubai stw 7,0(5)
41 1.4 tsubai #else
42 1.5 kleink stw 7,_C_LABEL(__curbrk)@l(5) # record new break
43 1.4 tsubai #endif
44 1.1 thorpej blr
45 1.1 thorpej 1:
46 1.5 kleink b PIC_PLT(_C_LABEL(__cerror))
47