lwp/process.alpha.S

   1 /* $Id$ */
   2
   3 /*
   4 ****************************************************************************
   5 *        Copyright IBM Corporation 1988, 1989 - All Rights Reserved        *
   6 *                                                                          *
   7 * Permission to use, copy, modify, and distribute this software and its    *
   8 * documentation for any purpose and without fee is hereby granted,         *
   9 * provided that the above copyright notice appear in all copies and        *
  10 * that both that copyright notice and this permission notice appear in     *
  11 * supporting documentation, and that the name of IBM not be used in        *
  12 * advertising or publicity pertaining to distribution of the software      *
  13 * without specific, written prior permission.                              *
  14 *                                                                          *
  15 * IBM DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL *
  16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL IBM *
  17 * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY      *
  18 * DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER  *
  19 * IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING   *
  20 * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.    *
  21 ****************************************************************************
  22 */
  23
  24 #include <config.h>
  25
  26 #undef RCSID
  27
  28 /* Code for DEC Alpha architecture */
  29 #ifdef  AFS_OSF_ENV
  30 #include <machine/asm.h>
  31 #include <machine/regdef.h>
  32 #define fs0     $f2
  33 #define fs1     $f3
  34 #define fs2     $f4
  35 #define fs3     $f5
  36 #define fs4     $f6
  37 #define fs5     $f7
  38 #define fs6     $f8
  39 #define fs7     $f9
  40 #elif AFS_LINUX_ENV
  41 #define v0      $0
  42 #define t0      $1
  43 #define t1      $2
  44 #define t2      $3
  45 #define t3      $4
  46 #define t4      $5
  47 #define t5      $6
  48 #define t6      $7
  49 #define t7      $8
  50
  51 #define s0      $9
  52 #define s1      $10
  53 #define s2      $11
  54 #define s3      $12
  55 #define s4      $13
  56 #define s5      $14
  57 #define s6      $15
  58
  59 #define fp      $15
  60 #define a0      $16
  61 #define a1      $17
  62 #define a2      $18
  63 #define a3      $19
  64 #define a4      $20
  65 #define a5      $21
  66 #define t8      $22
  67 #define t9      $23
  68 #define t10     $24
  69 #define t11     $25
  70 #define ra      $26
  71 #define pv      $27
  72 #define t12     $27
  73 #define at      $28
  74 #define gp      $29
  75 #define sp      $30
  76 #define zero    $31
  77
  78 #define fs0     $f2
  79 #define fs1     $f3
  80 #define fs2     $f4
  81 #define fs3     $f5
  82 #define fs4     $f6
  83 #define fs5     $f7
  84 #define fs6     $f8
  85 #define fs7     $f9
  86
  87 #define M_S0            0x00000200
  88 #define M_S1            0x00000400
  89 #define M_S2            0x00000800
  90 #define M_S3            0x00001000
  91 #define M_S4            0x00002000
  92 #define M_S5            0x00004000
  93 #define M_S6            0x00008000
  94
  95 #define  M_RA           0x04000000
  96
  97 #define END(proc)                                       \
  98                 .end    proc
  99
 100 #define NESTED(x, fsize, rpc)                           \
 101                 .globl  x       ;                       \
 102                 .ent    x,0     ;                       \
 103 x:                              ;                       \
 104                 .frame  sp,fsize, rpc
 105
 106
 107 #define LEAF(x)                                         \
 108                 .globl  x       ;                       \
 109                 .ent    x,0     ;                       \
 110 x:                              ;                       \
 111                 .frame  sp,0,ra
 112
 113 #define IMPORT(sym, size)                               \
 114                 .extern sym,size
 115 #elif defined(HAVE_MACHINE_ASM_H)       /* BSD */
 116 #include <machine/asm.h>
 117 #elif defined(HAVE_MACH_ALPHA_ASM_H)    /* OSF */
 118 #include <mach/alpha/asm.h>
 119 #endif
 120
 121 #define FRAMESIZE ((8*8)+8+(7*8))
 122 #define floats 0
 123 #define registers (floats+(8*8))
 124 #define returnaddr (FRAMESIZE-8)
 125 #define topstack 0
 126
 127 #if defined(AFS_OSF_ENV) || defined(AFS_LINUX_ENV)
 128         IMPORT(PRE_Block,4)
 129 #endif
 130 .align  4
 131 #if defined(AFS_OSF_ENV) || defined(AFS_LINUX_ENV)
 132 NESTED(savecontext,FRAMESIZE,ra)
 133 #else   /* OSF || LINUX */
 134 NESTED(savecontext,3,FRAMESIZE,ra,0x0400f700,0x000003fc)
 135 #endif  /* OSF */
 136         ldgp    gp,0(pv)
 137         lda     t0, 1(zero)
 138         stl     t0, PRE_Block
 139         lda     sp,-FRAMESIZE(sp)
 140 /* Save callee-saved registers. */
 141         stq     s0, (registers+0) (sp)
 142         stq     s1, (registers+8) (sp)
 143         stq     s2, (registers+16) (sp)
 144         stq     s3, (registers+24) (sp)
 145         stq     s4, (registers+32) (sp)
 146         stq     s5, (registers+40) (sp)
 147         stq     s6, (registers+48) (sp)
 148 /* Save return address */
 149         stq     ra, returnaddr(sp)
 150
 151 #if !defined(AFS_BSD_ENV)
 152         .mask   (M_S0|M_S1|M_S2|M_S3|M_S4|M_S5|M_S6|M_RA), -FRAMESIZE
 153 #endif
 154
 155 /* Save floating point registers */
 156         stt     fs0, (floats+0) (sp)
 157         stt     fs1, (floats+8) (sp)
 158         stt     fs2, (floats+16) (sp)
 159         stt     fs3, (floats+24) (sp)
 160         stt     fs4, (floats+32) (sp)
 161         stt     fs5, (floats+40) (sp)
 162         stt     fs6, (floats+48) (sp)
 163         stt     fs7, (floats+56) (sp)
 164
 165         .prologue       1
 166         stq     sp, topstack(a1)
 167         or      a0,zero,pv              /* call point in pv */
 168         beq     a2, samestack
 169         or      a2,zero,sp              /* switch stack */
 170 samestack:
 171         jsr     ra,(pv),0               /* off we go */
 172         END(savecontext)
 173
 174 #if defined(AFS_OSF_ENV) || defined(AFS_LINUX_ENV)
 175 LEAF(returnto)
 176 #else
 177 LEAF(returnto,1)
 178 #endif
 179         ldgp    gp,0(pv)
 180
 181         .prologue       1
 182         ldq     sp, topstack(a0)
 183 /* Restore callee-saved regs */
 184         ldq     s0, (registers+0) (sp)
 185         ldq     s1, (registers+8) (sp)
 186         ldq     s2, (registers+16) (sp)
 187         ldq     s3, (registers+24) (sp)
 188         ldq     s4, (registers+32) (sp)
 189         ldq     s5, (registers+40) (sp)
 190         ldq     s6, (registers+48) (sp)
 191 /* Return address */
 192         ldq     ra, returnaddr(sp)
 193 /* Floating point registers */
 194         ldt     fs0, (floats+0) (sp)
 195         ldt     fs1, (floats+8) (sp)
 196         ldt     fs2, (floats+16) (sp)
 197         ldt     fs3, (floats+24) (sp)
 198         ldt     fs4, (floats+32) (sp)
 199         ldt     fs5, (floats+40) (sp)
 200         ldt     fs6, (floats+48) (sp)
 201         ldt     fs7, (floats+56) (sp)
 202         lda     sp, FRAMESIZE(sp)
 203         stl     zero, PRE_Block
 204         RET
 205         END(returnto)