newlib/libc/machine/spu/setjmp.S

   1 /*
   2 (C) Copyright IBM Corp. 2005, 2006
   3
   4 All rights reserved.
   5
   6 Redistribution and use in source and binary forms, with or without
   7 modification, are permitted provided that the following conditions are met:
   8
   9     * Redistributions of source code must retain the above copyright notice,
  10 this list of conditions and the following disclaimer.
  11     * Redistributions in binary form must reproduce the above copyright
  12 notice, this list of conditions and the following disclaimer in the
  13 documentation and/or other materials provided with the distribution.
  14     * Neither the name of IBM nor the names of its contributors may be
  15 used to endorse or promote products derived from this software without
  16 specific prior written permission.
  17
  18 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  19 AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  20 IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  21 ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  22 LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  23 CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  24 SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  25 INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  26 CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  27 ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  28 POSSIBILITY OF SUCH DAMAGE.
  29
  30 Author: Andreas Neukoetter (ti95neuk@de.ibm.com)
  31 */
  32
  33 /*
  34         int setjmp( jmp_buf env );
  35 */
  36         .text
  37         .align  2
  38         .global setjmp
  39         .type   setjmp, @function
  40 setjmp:
  41         stqd    $80, 2*16($3)
  42         stqd    $81, 3*16($3)
  43         stqd    $82, 4*16($3)
  44         stqd    $83, 5*16($3)
  45         stqd    $84, 6*16($3)
  46         stqd    $85, 7*16($3)
  47         stqd    $86, 8*16($3)
  48         stqd    $87, 9*16($3)
  49         stqd    $88, 10*16($3)
  50         stqd    $89, 11*16($3)
  51         stqd    $90, 12*16($3)
  52         stqd    $91, 13*16($3)
  53         stqd    $92, 14*16($3)
  54         stqd    $93, 15*16($3)
  55         stqd    $94, 16*16($3)
  56         stqd    $95, 17*16($3)
  57         stqd    $96, 18*16($3)
  58         stqd    $97, 19*16($3)
  59         stqd    $98, 20*16($3)
  60         stqd    $99, 21*16($3)
  61         stqd    $100, 22*16($3)
  62         stqd    $101, 23*16($3)
  63         stqd    $102, 24*16($3)
  64         stqd    $103, 25*16($3)
  65         stqd    $104, 26*16($3)
  66         stqd    $105, 27*16($3)
  67         stqd    $106, 28*16($3)
  68         stqd    $107, 29*16($3)
  69         stqd    $108, 30*16($3)
  70         stqd    $109, 31*16($3)
  71         stqd    $110, 32*16($3)
  72         stqd    $111, 33*16($3)
  73         stqd    $112, 34*16($3)
  74         stqd    $113, 35*16($3)
  75         stqd    $114, 36*16($3)
  76         stqd    $115, 37*16($3)
  77         stqd    $116, 38*16($3)
  78         stqd    $117, 39*16($3)
  79         stqd    $118, 40*16($3)
  80         stqd    $119, 41*16($3)
  81
  82         hbr     setjmp_ret, $0
  83         lnop                    # pipe1 bubble added for instruction fetch
  84
  85         stqd    $120, 42*16($3)
  86         stqd    $121, 43*16($3)
  87         stqd    $122, 44*16($3)
  88         stqd    $123, 45*16($3)
  89         stqd    $124, 46*16($3)
  90         stqd    $125, 47*16($3)
  91         stqd    $126, 48*16($3)
  92         stqd    $127, 49*16($3)
  93
  94         stqd    $0, 0*16($3)
  95         stqd    $1, 1*16($3)
  96
  97         il      $3, 0
  98
  99 setjmp_ret:
 100         bi      $0
 101         .size   setjmp, .-setjmp
 102
 103 /*
 104         int longjmp( jmp_buf env, int val );
 105 */
 106         .text
 107         .align  2
 108         .global longjmp
 109         .type   longjmp, @function
 110 longjmp:
 111         lr      $127, $1
 112
 113         lqd     $0, 0*16($3)
 114         lqd     $1, 1*16($3)
 115
 116         sf      $126, $127, $1
 117         rotqbyi $126, $126, 12
 118         fsmbi   $127, 0x0F00
 119         and     $126, $126, $127
 120         a       $1, $1, $126
 121
 122         # restore all the non-volatile registers
 123
 124         lqd     $80, 2*16($3)
 125         lqd     $81, 3*16($3)
 126         lqd     $82, 4*16($3)
 127         lqd     $83, 5*16($3)
 128         lqd     $84, 6*16($3)
 129         lqd     $85, 7*16($3)
 130         lqd     $86, 8*16($3)
 131         lqd     $87, 9*16($3)
 132         lqd     $88, 10*16($3)
 133         lqd     $89, 11*16($3)
 134         lqd     $90, 12*16($3)
 135         lqd     $91, 13*16($3)
 136         lqd     $92, 14*16($3)
 137         lqd     $93, 15*16($3)
 138         lqd     $94, 16*16($3)
 139         lqd     $95, 17*16($3)
 140         lqd     $96, 18*16($3)
 141         lqd     $97, 19*16($3)
 142         lqd     $98, 20*16($3)
 143         lqd     $99, 21*16($3)
 144         lqd     $100, 22*16($3)
 145         lqd     $101, 23*16($3)
 146         lqd     $102, 24*16($3)
 147         lqd     $103, 25*16($3)
 148         lqd     $104, 26*16($3)
 149         lqd     $105, 27*16($3)
 150         lqd     $106, 28*16($3)
 151         lqd     $107, 29*16($3)
 152         lqd     $108, 30*16($3)
 153         lqd     $109, 31*16($3)
 154
 155         hbr     longjmp_ret, $0
 156
 157         lqd     $110, 32*16($3)
 158         lqd     $111, 33*16($3)
 159         lqd     $112, 34*16($3)
 160         lqd     $113, 35*16($3)
 161         lqd     $114, 36*16($3)
 162         lqd     $115, 37*16($3)
 163         lqd     $116, 38*16($3)
 164         lqd     $117, 39*16($3)
 165         lqd     $118, 40*16($3)
 166         lqd     $119, 41*16($3)
 167         lqd     $120, 42*16($3)
 168         lqd     $121, 43*16($3)
 169         lqd     $122, 44*16($3)
 170         lqd     $123, 45*16($3)
 171         lqd     $124, 46*16($3)
 172         lqd     $125, 47*16($3)
 173
 174         ceqi    $5, $4, 0
 175         lqd     $126, 48*16($3)
 176         lqd     $127, 49*16($3)
 177
 178         sf      $3, $5, $4
 179
 180 longjmp_ret:
 181         bi      $0
 182         .size   longjmp, .-longjmp
 183