Home | History | Annotate | Line # | Download | only in sparc
rtld_start.S revision 1.3
      1  1.3       kim /*	$NetBSD: rtld_start.S,v 1.3 1999/03/01 03:39:39 kim Exp $	*/
      2  1.1  christos 
      3  1.1  christos /*-
      4  1.2        pk  * Copyright (c) 1999 The NetBSD Foundation, Inc.
      5  1.1  christos  * All rights reserved.
      6  1.1  christos  *
      7  1.1  christos  * This code is derived from software contributed to The NetBSD Foundation
      8  1.2        pk  * by Christos Zoulas & Paul Kranenburg.
      9  1.1  christos  *
     10  1.1  christos  * Redistribution and use in source and binary forms, with or without
     11  1.1  christos  * modification, are permitted provided that the following conditions
     12  1.1  christos  * are met:
     13  1.1  christos  * 1. Redistributions of source code must retain the above copyright
     14  1.1  christos  *    notice, this list of conditions and the following disclaimer.
     15  1.1  christos  * 2. Redistributions in binary form must reproduce the above copyright
     16  1.1  christos  *    notice, this list of conditions and the following disclaimer in the
     17  1.1  christos  *    documentation and/or other materials provided with the distribution.
     18  1.1  christos  * 3. All advertising materials mentioning features or use of this software
     19  1.1  christos  *    must display the following acknowledgement:
     20  1.1  christos  *        This product includes software developed by the NetBSD
     21  1.1  christos  *        Foundation, Inc. and its contributors.
     22  1.1  christos  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23  1.1  christos  *    contributors may be used to endorse or promote products derived
     24  1.1  christos  *    from this software without specific prior written permission.
     25  1.1  christos  *
     26  1.1  christos  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27  1.1  christos  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  1.1  christos  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  1.1  christos  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30  1.1  christos  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  1.1  christos  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  1.1  christos  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  1.1  christos  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  1.1  christos  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  1.1  christos  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  1.1  christos  * POSSIBILITY OF SUCH DAMAGE.
     37  1.1  christos  */
     38  1.1  christos 
     39  1.1  christos #include <machine/asm.h>
     40  1.1  christos 
     41  1.2        pk 	.section	".text"
     42  1.1  christos 	.align	8
     43  1.2        pk 	.global	_rtld_start
     44  1.1  christos 	.type	_rtld_start,@function
     45  1.1  christos _rtld_start:
     46  1.2        pk 	mov	0, %fp			! Erect a fence post for ourselves
     47  1.2        pk 	mov	%g1, %l1		! save ps_strings
     48  1.2        pk 	sub	%sp, 8, %sp		! Make room for return args
     49  1.1  christos 
     50  1.2        pk 	call	_rtld
     51  1.2        pk 	 add	%sp, 64, %o0		! &argc - 8
     52  1.2        pk 
     53  1.2        pk 	ld	[%sp + 64], %g3		! arg: cleanup
     54  1.2        pk 	ld	[%sp + 64 + 4], %g2	! arg: obj
     55  1.2        pk 	add	%sp, 8, %sp		! restore stack pointer
     56  1.2        pk 
     57  1.2        pk 	jmp	%o0
     58  1.2        pk 	 mov	%l1, %g1		! restore ps_strings
     59  1.2        pk 
     60  1.2        pk 
     61  1.2        pk 	.section	".text"
     62  1.1  christos 	.align	4
     63  1.2        pk 	.global	_rtld_bind_start
     64  1.1  christos 	.type	_rtld_bind_start,@function
     65  1.1  christos _rtld_bind_start:	# (obj, reloff)
     66  1.2        pk 	save	%sp, -96, %sp		! setup standard stack frame
     67  1.2        pk 	ld	[%i7 + 8], %o0		! obj id is in second PLT slot
     68  1.2        pk 	srl	%g1, 10, %o1		! offset is in high 22 bits
     69  1.2        pk 	call	_rtld_bind		! Call _rtld_bind(obj, offset)
     70  1.3       kim 	 sub	%o1, 12*4, %o1		! first 4 'pltrel' entries are missing!
     71  1.2        pk 
     72  1.2        pk 	mov	%o0, %g1		! return value == function address
     73  1.2        pk 	restore				! get rid of our context
     74  1.2        pk 	 jmp	%g1			! and the jmpslot context, then go.
     75  1.2        pk 	restore				!
     76  1.2        pk 
     77