osfmk/ppc/misc_asm.s

   1 /*
   2  * Copyright (c) 2000 Apple Computer, Inc. All rights reserved.
   3  *
   4  * @APPLE_LICENSE_HEADER_START@
   5  *
   6  * Copyright (c) 1999-2003 Apple Computer, Inc.  All Rights Reserved.
   7  *
   8  * This file contains Original Code and/or Modifications of Original Code
   9  * as defined in and that are subject to the Apple Public Source License
  10  * Version 2.0 (the 'License'). You may not use this file except in
  11  * compliance with the License. Please obtain a copy of the License at
  12  * http://www.opensource.apple.com/apsl/ and read it before using this
  13  * file.
  14  *
  15  * The Original Code and all software distributed under the License are
  16  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  17  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  18  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  19  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  20  * Please see the License for the specific language governing rights and
  21  * limitations under the License.
  22  *
  23  * @APPLE_LICENSE_HEADER_END@
  24  */
  25 /*
  26  * @OSF_COPYRIGHT@
  27  */
  28
  29 #include <mach_kdb.h>
  30 #include <mach_kgdb.h>
  31 #include <mach_debug.h>
  32 #include <assym.s>
  33 #include <ppc/asm.h>
  34 #include <ppc/proc_reg.h>
  35 #include <mach/ppc/vm_param.h>
  36
  37 /*
  38  * vm_offset_t getrpc(void) - Return address of the function
  39  *                            that called the current function
  40  */
  41
  42 /* By using this function, we force the caller to save its LR in a known
  43  * location, which we can pick up and return. See PowerPC ELF specs.
  44  */
  45 ENTRY(getrpc, TAG_NO_FRAME_USED)
  46         lwz     ARG0,   FM_BACKPTR(r1)          /* Load our backchain ptr */
  47         lwz     ARG0,   FM_LR_SAVE(ARG0)        /* Load previously saved LR */
  48         blr                                     /* And return */
  49
  50
  51 /* Mask and unmask interrupts at the processor level */
  52 ENTRY(interrupt_disable, TAG_NO_FRAME_USED)
  53         mfmsr   r0
  54         rlwinm  r0,r0,0,MSR_FP_BIT+1,MSR_FP_BIT-1       ; Force floating point off
  55         rlwinm  r0,r0,0,MSR_VEC_BIT+1,MSR_VEC_BIT-1     ; Force vectors off
  56         rlwinm  r0,     r0,     0,      MSR_EE_BIT+1,   MSR_EE_BIT-1
  57         mtmsr   r0
  58         isync
  59         blr
  60
  61 ENTRY(interrupt_enable, TAG_NO_FRAME_USED)
  62
  63         mfmsr   r0
  64         ori             r0,     r0,     MASK(MSR_EE)
  65         mtmsr   r0
  66         blr
  67
  68 #if     MACH_KDB
  69 /*
  70  * Kernel debugger versions of the spl*() functions.  This allows breakpoints
  71  * in the spl*() functions.
  72  */
  73
  74 /* Mask and unmask interrupts at the processor level */
  75 ENTRY(db_interrupt_disable, TAG_NO_FRAME_USED)
  76         mfmsr   r0
  77         rlwinm  r0,r0,0,MSR_FP_BIT+1,MSR_FP_BIT-1       ; Force floating point off
  78         rlwinm  r0,r0,0,MSR_VEC_BIT+1,MSR_VEC_BIT-1     ; Force vectors off
  79         rlwinm  r0,     r0,     0,      MSR_EE_BIT+1,   MSR_EE_BIT-1
  80         mtmsr   r0
  81         isync
  82         blr
  83
  84 ENTRY(db_interrupt_enable, TAG_NO_FRAME_USED)
  85         mfmsr   r0
  86         ori     r0,     r0,     MASK(MSR_EE)
  87         mtmsr   r0
  88         blr
  89 #endif  /* MACH_KDB */
  90
  91 /*
  92  *      General entry for all debuggers.  This gets us onto the debug stack and
  93  *      then back off at exit. We need to pass back R3 to caller.
  94  */
  95
  96 ENTRY(Call_Debugger, TAG_NO_FRAME_USED)
  97
  98                         mfmsr   r7                              ; Get the current MSR
  99                         rlwinm  r7,r7,0,MSR_FP_BIT+1,MSR_FP_BIT-1       ; Force floating point off
 100                         rlwinm  r7,r7,0,MSR_VEC_BIT+1,MSR_VEC_BIT-1     ; Force vectors off
 101                         mflr    r0                              ; Save the return
 102                         rlwinm  r7,r7,0,MSR_EE_BIT+1,MSR_EE_BIT-1       ; Turn off interruptions
 103                         mtmsr   r7                              ; Do it
 104                         isync
 105                         mfsprg  r8,0                    ; Get the per_proc block
 106                         stw             r0,FM_LR_SAVE(r1)       ; Save return on current stack
 107
 108                         lwz             r9,PP_DEBSTACKPTR(r8)   ; Get the debug stack
 109                         cmpwi   r9,0                    ; Are we already on it?
 110                         bne             cdNewDeb                ; No...
 111
 112                         mr              r9,r1                   ; We are already on the stack, so use the current value
 113                         subi    r9,r9,FM_REDZONE+FM_SIZE        ; Carve some extra space here
 114
 115 cdNewDeb:       li              r0,0                    ; Clear this out
 116                         stw             r1,FM_ARG0(r9)  ; Save the old stack pointer as if it were the first arg
 117
 118                         stw             r0,PP_DEBSTACKPTR(r8)   ; Mark debug stack as busy
 119
 120                         subi    r1,r9,FM_SIZE   ; Carve a new frame
 121                         stw             r0,FM_BACKPTR(r1)       ; Chain back
 122
 123                         bl              EXT(Call_DebuggerC)     ; Call the "C" phase of this
 124
 125                         mfmsr   r0                              ; Get the MSR just in case it was enabled
 126                         addi    r1,r1,FM_SIZE   ; Pop off first stack frame
 127                         rlwinm  r0,r0,0,MSR_EE_BIT+1,MSR_EE_BIT-1       ; Turn off interruptions enable bit
 128                         mtmsr   r0
 129
 130                         mfsprg  r8,0                    ; Get the per_proc block address
 131
 132                         lwz             r9,PP_DEBSTACK_TOP_SS(r8)       ; Get the top of the stack
 133                         cmplw   r1,r9                   ; Have we hit the bottom of the debug stack?
 134                         lwz             r1,FM_ARG0(r1)  ; Get previous stack frame
 135                         lwz             r0,FM_LR_SAVE(r1)       ; Get return address
 136                         mtlr    r0                              ; Set the return point
 137                         bnelr                                   ; Return if still on debug stack
 138
 139                         stw             r9,PP_DEBSTACKPTR(r8)   ; Mark debug stack as free
 140                         blr
 141
 142
 143 /* The following routines are for C-support. They are usually
 144  * inlined into the C using the specifications in proc_reg.h,
 145  * but if optimisation is switched off, the inlining doesn't work
 146  */
 147
 148 ENTRY(get_got, TAG_NO_FRAME_USED)
 149         mr      ARG0,   r2
 150         blr
 151
 152 ENTRY(mflr, TAG_NO_FRAME_USED)
 153         mflr    ARG0
 154         blr
 155
 156 ENTRY(mfpvr, TAG_NO_FRAME_USED)
 157         mfpvr   ARG0
 158         blr
 159
 160 ENTRY(mtmsr, TAG_NO_FRAME_USED)
 161         mtmsr   ARG0
 162         isync
 163         blr
 164
 165 ENTRY(mfmsr, TAG_NO_FRAME_USED)
 166         mfmsr   ARG0
 167         blr
 168
 169 ENTRY(mtsrin, TAG_NO_FRAME_USED)
 170         isync
 171         mtsrin  ARG0,   ARG1
 172         isync
 173         blr
 174
 175 ENTRY(mfsrin, TAG_NO_FRAME_USED)
 176         mfsrin  ARG0,   ARG0
 177         blr
 178
 179 ENTRY(mtsdr1, TAG_NO_FRAME_USED)
 180         mtsdr1  ARG0
 181         blr
 182
 183 ENTRY(mtdar, TAG_NO_FRAME_USED)
 184         mtdar   ARG0
 185         blr
 186
 187 ENTRY(mfdar, TAG_NO_FRAME_USED)
 188         mfdar   ARG0
 189         blr
 190
 191 ENTRY(mtdec, TAG_NO_FRAME_USED)
 192         mtdec   ARG0
 193         blr
 194
 195 /* Decrementer frequency and realtime|timebase processor registers
 196  * are different between ppc601 and ppc603/4, we define them all.
 197  */
 198
 199 ENTRY(isync_mfdec, TAG_NO_FRAME_USED)
 200         isync
 201         mfdec   ARG0
 202         blr
 203
 204
 205 ENTRY(mftb, TAG_NO_FRAME_USED)
 206         mftb    ARG0
 207         blr
 208
 209 ENTRY(mftbu, TAG_NO_FRAME_USED)
 210         mftbu   ARG0
 211         blr
 212
 213 ENTRY(mfrtcl, TAG_NO_FRAME_USED)
 214         mfspr   ARG0,   5
 215         blr
 216
 217 ENTRY(mfrtcu, TAG_NO_FRAME_USED)
 218         mfspr   ARG0,   4
 219         blr
 220
 221 ENTRY(tlbie, TAG_NO_FRAME_USED)
 222         tlbie   ARG0
 223         blr
 224
 225
 226 /*
 227  * Performance Monitor Register Support
 228  */
 229
 230 ENTRY(mfmmcr0, TAG_NO_FRAME_USED)
 231         mfspr   r3,mmcr0
 232         blr
 233
 234 ENTRY(mtmmcr0, TAG_NO_FRAME_USED)
 235         mtspr   mmcr0,r3
 236         blr
 237
 238 ENTRY(mfmmcr1, TAG_NO_FRAME_USED)
 239         mfspr   r3,mmcr1
 240         blr
 241
 242 ENTRY(mtmmcr1, TAG_NO_FRAME_USED)
 243         mtspr   mmcr1,r3
 244         blr
 245
 246 ENTRY(mfmmcr2, TAG_NO_FRAME_USED)
 247         mfspr   r3,mmcr2
 248         blr
 249
 250 ENTRY(mtmmcr2, TAG_NO_FRAME_USED)
 251         mtspr   mmcr2,r3
 252         blr
 253
 254 ENTRY(mfpmc1, TAG_NO_FRAME_USED)
 255         mfspr   r3,pmc1
 256         blr
 257
 258 ENTRY(mtpmc1, TAG_NO_FRAME_USED)
 259         mtspr   pmc1,r3
 260         blr
 261
 262 ENTRY(mfpmc2, TAG_NO_FRAME_USED)
 263         mfspr   r3,pmc2
 264         blr
 265
 266 ENTRY(mtpmc2, TAG_NO_FRAME_USED)
 267         mtspr   pmc2,r3
 268         blr
 269
 270 ENTRY(mfpmc3, TAG_NO_FRAME_USED)
 271         mfspr   r3,pmc3
 272         blr
 273
 274 ENTRY(mtpmc3, TAG_NO_FRAME_USED)
 275         mtspr   pmc3,r3
 276         blr
 277
 278 ENTRY(mfpmc4, TAG_NO_FRAME_USED)
 279         mfspr   r3,pmc4
 280         blr
 281
 282 ENTRY(mtpmc4, TAG_NO_FRAME_USED)
 283         mtspr   pmc4,r3
 284         blr
 285
 286 ENTRY(mfsia, TAG_NO_FRAME_USED)
 287         mfspr   r3,sia
 288         blr
 289
 290 ENTRY(mfsda, TAG_NO_FRAME_USED)
 291         mfspr   r3,sda
 292         blr
 293