lib/libc/powerpc64/gen/setjmp.S

   1 /*-
   2  * Copyright (c) 2002 Peter Grehan.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  */
  26 /*      $NetBSD: setjmp.S,v 1.3 1998/10/03 12:30:38 tsubai Exp $        */
  27
  28 #include <machine/asm.h>
  29 __FBSDID("$FreeBSD$");
  30
  31 #include <sys/syscall.h>
  32
  33 /*
  34  * C library -- setjmp, longjmp
  35  *
  36  *      longjmp(a,v)
  37  * will generate a "return(v?v:1)" from the last call to
  38  *      setjmp(a)
  39  * by restoring registers from the stack.
  40  * The previous signal state is restored.
  41  *
  42  * jmpbuf layout:
  43  *     +------------+
  44  *     |   unused   |
  45  *     +------------+
  46  *     | sig state  |
  47  *     |            |
  48  *     | (4 words)  |
  49  *     |            |
  50  *     +------------+
  51  *     | saved regs |
  52  *     |    ...     |
  53  */
  54
  55 ENTRY(setjmp)
  56         mr      %r6,%r3
  57         li      %r3,1                   /* SIG_BLOCK, but doesn't matter */
  58                                         /*            since set == NULL  */
  59         li      %r4,0                   /* set = NULL */
  60         mr      %r5,%r6                 /* &oset */
  61         addi    %r5,%r5,4
  62         li      %r0, SYS_sigprocmask    /*sigprocmask(SIG_BLOCK, NULL, &oset)*/
  63         sc                              /*assume no error       XXX */
  64         mflr    %r11                    /* r11 <- link reg */
  65         mfcr    %r12                    /* r12 <- condition reg */
  66         mr      %r10,%r1                /* r10 <- stackptr */
  67         mr      %r9,%r2                 /*  r9 <- global ptr */
  68
  69         std     %r9,40 + 0*8(%r6)
  70         std     %r10,40 + 1*8(%r6)
  71         std     %r11,40 + 2*8(%r6)
  72         std     %r12,40 + 3*8(%r6)
  73         std     %r13,40 + 4*8(%r6)
  74         std     %r14,40 + 5*8(%r6)
  75         std     %r15,40 + 6*8(%r6)
  76         std     %r16,40 + 7*8(%r6)
  77         std     %r17,40 + 8*8(%r6)
  78         std     %r18,40 + 9*8(%r6)
  79         std     %r19,40 + 10*8(%r6)
  80         std     %r20,40 + 11*8(%r6)
  81         std     %r21,40 + 12*8(%r6)
  82         std     %r22,40 + 13*8(%r6)
  83         std     %r23,40 + 14*8(%r6)
  84         std     %r24,40 + 15*8(%r6)
  85         std     %r25,40 + 16*8(%r6)
  86         std     %r26,40 + 17*8(%r6)
  87         std     %r27,40 + 18*8(%r6)
  88         std     %r28,40 + 19*8(%r6)
  89         std     %r29,40 + 20*8(%r6)
  90         std     %r30,40 + 21*8(%r6)
  91         std     %r31,40 + 22*8(%r6)
  92
  93         li      %r3,0                   /* return (0) */
  94         blr
  95
  96         WEAK_REFERENCE(__longjmp, longjmp)
  97 ENTRY(__longjmp)
  98         ld      %r9,40 + 0*8(%r3)
  99         ld      %r10,40 + 1*8(%r3)
 100         ld      %r11,40 + 2*8(%r3)
 101         ld      %r12,40 + 3*8(%r3)
 102         ld      %r14,40 + 5*8(%r3)
 103         ld      %r15,40 + 6*8(%r3)
 104         ld      %r16,40 + 7*8(%r3)
 105         ld      %r17,40 + 8*8(%r3)
 106         ld      %r18,40 + 9*8(%r3)
 107         ld      %r19,40 + 10*8(%r3)
 108         ld      %r20,40 + 11*8(%r3)
 109         ld      %r21,40 + 12*8(%r3)
 110         ld      %r22,40 + 13*8(%r3)
 111         ld      %r23,40 + 14*8(%r3)
 112         ld      %r24,40 + 15*8(%r3)
 113         ld      %r25,40 + 16*8(%r3)
 114         ld      %r26,40 + 17*8(%r3)
 115         ld      %r27,40 + 18*8(%r3)
 116         ld      %r28,40 + 19*8(%r3)
 117         ld      %r29,40 + 20*8(%r3)
 118         ld      %r30,40 + 21*8(%r3)
 119         ld      %r31,40 + 22*8(%r3)
 120         mr      %r6,%r4                 /* save val param */
 121         mtlr    %r11                    /* r11 -> link reg */
 122         mtcr    %r12                    /* r12 -> condition reg */
 123         mr      %r2,%r9                 /* r9  -> global ptr */
 124         mr      %r1,%r10                /* r10 -> stackptr */
 125         mr      %r4,%r3
 126         li      %r3,3                   /* SIG_SETMASK */
 127         addi    %r4,%r4,4               /* &set */
 128         li      %r5,0                   /* oset = NULL */
 129         li      %r0,SYS_sigprocmask     /* sigprocmask(SIG_SET, &set, NULL) */
 130         sc                              /* assume no error       XXX */
 131         or.     %r3,%r6,%r6
 132         bnelr
 133         li      %r3,1
 134         blr
 135
 136         .section .note.GNU-stack,"",%progbits