Home | History | Annotate | Line # | Download | only in sys
cerror.S revision 1.7
      1  1.7      uwe /*	$NetBSD: cerror.S,v 1.7 2004/05/28 23:39:09 uwe Exp $	*/
      2  1.1  msaitoh 
      3  1.1  msaitoh /*-
      4  1.1  msaitoh  * Copyright (c) 1990 The Regents of the University of California.
      5  1.1  msaitoh  * All rights reserved.
      6  1.1  msaitoh  *
      7  1.1  msaitoh  * This code is derived from software contributed to Berkeley by
      8  1.1  msaitoh  * William Jolitz.
      9  1.1  msaitoh  *
     10  1.1  msaitoh  * Redistribution and use in source and binary forms, with or without
     11  1.1  msaitoh  * modification, are permitted provided that the following conditions
     12  1.1  msaitoh  * are met:
     13  1.1  msaitoh  * 1. Redistributions of source code must retain the above copyright
     14  1.1  msaitoh  *    notice, this list of conditions and the following disclaimer.
     15  1.1  msaitoh  * 2. Redistributions in binary form must reproduce the above copyright
     16  1.1  msaitoh  *    notice, this list of conditions and the following disclaimer in the
     17  1.1  msaitoh  *    documentation and/or other materials provided with the distribution.
     18  1.6      agc  * 3. Neither the name of the University nor the names of its contributors
     19  1.1  msaitoh  *    may be used to endorse or promote products derived from this software
     20  1.1  msaitoh  *    without specific prior written permission.
     21  1.1  msaitoh  *
     22  1.1  msaitoh  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     23  1.1  msaitoh  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     24  1.1  msaitoh  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     25  1.1  msaitoh  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     26  1.1  msaitoh  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     27  1.1  msaitoh  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     28  1.1  msaitoh  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     29  1.1  msaitoh  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     30  1.1  msaitoh  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     31  1.1  msaitoh  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     32  1.1  msaitoh  * SUCH DAMAGE.
     33  1.1  msaitoh  *
     34  1.1  msaitoh  *	from: @(#)cerror.s	5.1 (Berkeley) 4/23/90
     35  1.1  msaitoh  */
     36  1.1  msaitoh 
     37  1.1  msaitoh #include <machine/asm.h>
     38  1.1  msaitoh #if defined(SYSLIBC_SCCS) && !defined(lint)
     39  1.7      uwe 	RCSID("$NetBSD: cerror.S,v 1.7 2004/05/28 23:39:09 uwe Exp $")
     40  1.1  msaitoh #endif /* SYSLIBC_SCCS and not lint */
     41  1.1  msaitoh 
     42  1.1  msaitoh #include "SYS.h"
     43  1.1  msaitoh 
     44  1.7      uwe #ifdef _REENTRANT
     45  1.7      uwe 
     46  1.7      uwe 
     47  1.7      uwe 	.globl	_C_LABEL(__errno)
     48  1.7      uwe 
     49  1.7      uwe 	.align	2
     50  1.7      uwe cerror:
     51  1.7      uwe 	mov.l	L__errno, r1
     52  1.7      uwe 	sts.l   pr, @-sp
     53  1.7      uwe #ifdef PIC
     54  1.7      uwe 1:	bsrf	r1
     55  1.7      uwe #else
     56  1.7      uwe 	jsr	@r1
     57  1.7      uwe #endif
     58  1.7      uwe 	 mov.l	r0, @-sp	! save error code
     59  1.7      uwe 	mov.l	@sp+, r2	! restore error code
     60  1.7      uwe 	lds.l   @sp+, pr
     61  1.7      uwe 	mov.l	r2, @r0
     62  1.7      uwe 	mov	#-1, r1
     63  1.7      uwe 	rts
     64  1.7      uwe 	 mov	#-1, r0
     65  1.7      uwe 
     66  1.4  msaitoh 	.align	2
     67  1.7      uwe L__errno:
     68  1.7      uwe #ifdef PIC
     69  1.7      uwe 	.long	_C_LABEL(__errno) - (1b + 4)
     70  1.7      uwe #else
     71  1.7      uwe 	.long	_C_LABEL(__errno)
     72  1.7      uwe #endif
     73  1.7      uwe 
     74  1.7      uwe #else /* !_REENTRANT */
     75  1.7      uwe 
     76  1.4  msaitoh 
     77  1.3  msaitoh 	.globl	_C_LABEL(errno)
     78  1.7      uwe 
     79  1.7      uwe 	.align	2
     80  1.1  msaitoh cerror:
     81  1.5   marcus #ifdef PIC
     82  1.5   marcus 	mov	r0, r2
     83  1.5   marcus 	mova	L_GOT, r0
     84  1.5   marcus 	mov.l	L_GOT, r1
     85  1.5   marcus 	add	r0, r1
     86  1.5   marcus 	mov.l	L_errno, r0
     87  1.5   marcus 	mov.l	@(r0, r1), r1
     88  1.5   marcus 	mov.l	r2, @r1
     89  1.5   marcus #else
     90  1.1  msaitoh 	mov.l	L_errno, r1
     91  1.4  msaitoh 	mov.l	r0, @r1
     92  1.5   marcus #endif
     93  1.7      uwe 	mov	#-1, r0
     94  1.2  msaitoh 	rts
     95  1.7      uwe 	 mov	#-1, r1
     96  1.1  msaitoh 
     97  1.4  msaitoh 	.align	2
     98  1.5   marcus #ifdef PIC
     99  1.5   marcus L_GOT:		.long	_GLOBAL_OFFSET_TABLE_
    100  1.5   marcus L_errno:	.long	_C_LABEL(errno)@GOT
    101  1.5   marcus #else
    102  1.3  msaitoh L_errno:	.long	_C_LABEL(errno)
    103  1.5   marcus #endif
    104  1.7      uwe 
    105  1.7      uwe #endif /* !_REENTRANT */
    106