]> git.saurik.com Git - apple/xnu.git/blobdiff - osfmk/kdp/ml/ppc/kdp_machdep.c
xnu-1456.1.26.tar.gz
[apple/xnu.git] / osfmk / kdp / ml / ppc / kdp_machdep.c
index 9f5dc4c9c86abaf0a91192ee566e0b24a3a4d4cb..e1e89331d793621d6581be8584b4f9efab39edda 100644 (file)
@@ -1,14 +1,19 @@
 /*
- * Copyright (c) 2000-2004 Apple Computer, Inc. All rights reserved.
+ * Copyright (c) 2000-2006 Apple Computer, Inc. All rights reserved.
  *
- * @APPLE_LICENSE_HEADER_START@
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
  * 
  * This file contains Original Code and/or Modifications of Original Code
  * as defined in and that are subject to the Apple Public Source License
  * Version 2.0 (the 'License'). You may not use this file except in
- * compliance with the License. Please obtain a copy of the License at
- * http://www.opensource.apple.com/apsl/ and read it before using this
- * file.
+ * compliance with the License. The rights granted to you under the License
+ * may not be used to create, or enable the creation or redistribution of,
+ * unlawful or unlicensed copies of an Apple operating system, or to
+ * circumvent, violate, or enable the circumvention or violation of, any
+ * terms of an Apple operating system software license agreement.
+ * 
+ * Please obtain a copy of the License at
+ * http://www.opensource.apple.com/apsl/ and read it before using this file.
  * 
  * The Original Code and all software distributed under the License are
  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
@@ -18,7 +23,7 @@
  * Please see the License for the specific language governing rights and
  * limitations under the License.
  * 
- * @APPLE_LICENSE_HEADER_END@
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
  */
  
 #include <mach/mach_types.h>
 #include <ppc/proc_reg.h>
 #include <kdp/kdp_internal.h>
 #include <ppc/savearea.h>
+#include <ppc/misc_protos.h>
 #include <kern/debug.h>
 #include <IOKit/IOPlatformExpert.h>
 
+#include <kern/thread.h>
+#include <ppc/thread.h>
+#include <vm/vm_map.h>
+#include <ppc/pmap.h>
+
 #define KDP_TEST_HARNESS 0
 #if KDP_TEST_HARNESS
 #define dprintf(x) kprintf x
 
 void print_saved_state(void *);
 void kdp_call(void);
-void kdp_trap( unsigned int, struct savearea   *saved_state);
 int kdp_getc(void);
 boolean_t kdp_call_kdb(void);
 
+extern pmap_t kdp_pmap;
+
+int
+machine_trace_thread(thread_t thread, char *tracepos, char *tracebound, int nframes, boolean_t user_p);
+
+int
+machine_trace_thread64(thread_t thread, char *tracepos, char *tracebound, int nframes, boolean_t user_p);
+
+unsigned
+machine_read64(addr64_t srcaddr, caddr_t dstaddr, uint32_t len);
+
 void
 kdp_exception(
     unsigned char      *pkt,
@@ -91,7 +112,7 @@ kdp_exception_ack(
     kdp_exception_ack_t        aligned_pkt;
     kdp_exception_ack_t        *rq = (kdp_exception_ack_t *)&aligned_pkt;
 
-    if (len < sizeof (*rq))
+    if ((size_t)len < sizeof (*rq))
        return(FALSE);
        
     bcopy((char *)pkt, (char *)rq, sizeof(*rq));
@@ -212,7 +233,7 @@ kdp_getintegerstate64(
 
 kdp_error_t
 kdp_machine_read_regs(
-    unsigned int cpu,
+    __unused unsigned int cpu,
     unsigned int flavor,
     char *data,
     int *size
@@ -344,10 +365,10 @@ kdp_setintegerstate64(
 
 kdp_error_t
 kdp_machine_write_regs(
-    unsigned int cpu,
+    __unused unsigned int cpu,
     unsigned int flavor,
     char *data,
-    int *size
+    __unused int *size
 )
 {
     switch (flavor) {
@@ -411,9 +432,10 @@ kdp_panic(
     while(1) {}
 }
 
+extern void halt_all_cpus(boolean_t);
 
 void
-kdp_reboot(void)
+kdp_machine_reboot(void)
 {
        printf("Attempting system restart...");
        /* Call the platform specific restart*/
@@ -438,8 +460,6 @@ kdp_intr_enbl(int s)
 void
 kdp_us_spin(int usec)
 {
-    extern void delay(int);
-
     delay(usec/100);
 }
 
@@ -457,7 +477,7 @@ void print_saved_state(void *state)
 }
 
 void
-kdp_call()
+kdp_call(void)
 {
        Debugger("inline call to debugger(machine_startup)");
 }
@@ -519,7 +539,7 @@ int kdp_trap_codes[] = {
 };
 
 int
-kdp_getc()
+kdp_getc(void)
 {
        return(cnmaygetc());
 }
@@ -539,7 +559,6 @@ kdp_trap(
 {
        unsigned int *fp;
        unsigned int sp;
-       struct savearea *state;
 
        if (kdp_noisy) {
                if (kdp_backtrace) {
@@ -587,35 +606,32 @@ kdp_call_kdb(
        return(TRUE);
 }
 
-void kdp_print_registers(struct savearea *state)
+static void kdp_print_registers(struct savearea *state)
 {
        int i;
        for (i=0; i<32; i++) {
                if ((i % 8) == 0)
                        printf("\n%4d :",i);
-                       printf(" %08x",*(&state->save_r0+i));
+                       printf(" %08llx",*(&state->save_r0+i));
        }
        printf("\n");
        printf("cr        = 0x%08x\t\t",state->save_cr);
-       printf("xer       = 0x%08x\n",state->save_xer);
-       printf("lr        = 0x%08x\t\t",state->save_lr);
-       printf("ctr       = 0x%08x\n",state->save_ctr);
-       printf("srr0(iar) = 0x%08x\t\t",state->save_srr0);
-       printf("srr1(msr) = 0x%08B\n",state->save_srr1,
-               "\x10\x11""EE\x12PR\x13""FP\x14ME\x15""FE0\x16SE\x18"
-               "FE1\x19""AL\x1a""EP\x1bIT\x1c""DT");
+       printf("xer       = 0x%08llx\n",state->save_xer);
+       printf("lr        = 0x%08llx\t\t",state->save_lr);
+       printf("ctr       = 0x%08llx\n",state->save_ctr);
+       printf("srr0(iar) = 0x%08llx\t\t",state->save_srr0);
+       printf("srr1(msr) = 0x%08llx\n",state->save_srr1);
        printf("\n");
 }
 
+void kdp_print_backtrace(unsigned, struct savearea *);
+
 void
 kdp_print_backtrace(
     unsigned int                exception,
     struct savearea     *saved_state)
 {
-       extern void kdp_print_registers(struct savearea *);
-       extern void print_backtrace(struct savearea *);
-
-       disableDebugOuput = FALSE;
+       disable_debug_output = FALSE;
        debug_mode = TRUE;
        printf("re-entering kdp:\n");
        printf("vector=%x, \n", exception/4);
@@ -625,7 +641,187 @@ kdp_print_backtrace(
        while(1);
 }
 
-unsigned int kdp_ml_get_breakinsn(void)
+void
+kdp_machine_get_breakinsn(
+                                                 uint8_t *bytes,
+                                                 uint32_t *size
+)
+{
+       *(uint32_t *)bytes = 0x7fe00008;
+       *size = sizeof(uint32_t);
+}
+
+#define LR_OFFSET 8
+#define LR_OFFSET64 16
+
+int
+machine_trace_thread(thread_t thread, char *tracepos, char *tracebound, int nframes, boolean_t user_p)
+{
+       uint32_t *tracebuf = (uint32_t *)tracepos;
+       uint32_t fence = 0;
+       uint32_t stackptr = 0;
+       uint32_t stacklimit = 0xb0000000;
+       int framecount = 0;
+       uint32_t init_srr0 = 0;
+       uint32_t prevsp = 0;
+       uint32_t framesize = 2 * sizeof(vm_offset_t);
+       
+       if (user_p) {
+               /* Examine the user savearea */
+               init_srr0 = thread->machine.upcb->save_srr0;
+               stackptr = thread->machine.upcb->save_r1;
+               /* This bound isn't useful, but it doesn't hinder us */
+               stacklimit = 0xffffffff;
+               kdp_pmap = thread->task->map->pmap;
+       }
+       else {
+               stackptr = thread->machine.pcb->save_r1;
+               init_srr0 = thread->machine.pcb->save_srr0;
+       }
+       /* Fill in the "current" program counter */
+       *tracebuf++ = init_srr0;
+
+       for (framecount = 0; framecount < nframes; framecount++) {
+/* Bounds check */
+               if ((uint32_t) (tracebound - ((char *)tracebuf)) < (4 * framesize)) {
+                       tracebuf--;
+                       break;
+               }
+
+               *tracebuf++ = stackptr;
+/* Invalid frame, or hit fence */
+               if (!stackptr || (stackptr == fence)) {
+                       break;
+               }
+/* Stack grows downward */             
+               if (stackptr < prevsp) {
+                       break;
+               }
+/* Unaligned frame */          
+               if (stackptr & 0x000000F) {
+                       break;
+               }
+               if (stackptr > stacklimit) {
+                       break;
+               }
+/* Assume there's a saved link register, and read it */
+               if (kdp_machine_vm_read((caddr_t) (stackptr + LR_OFFSET), (caddr_t) tracebuf, sizeof(caddr_t)) != sizeof(caddr_t)) {
+                       break;
+               }
+
+               tracebuf++;
+               prevsp = stackptr;
+/* Next frame */
+               if (kdp_machine_vm_read((caddr_t) stackptr, (caddr_t) &stackptr, sizeof(caddr_t)) != sizeof(caddr_t)) {
+                       *tracebuf++ = 0;
+                       break;
+               }
+       }
+/* Reset the target pmap */
+       kdp_pmap = NULL;
+       return (uint32_t) (((char *) tracebuf) - tracepos);
+}
+
+/* Routine to encapsulate the 64-bit address read hack*/
+unsigned
+machine_read64(addr64_t srcaddr, caddr_t dstaddr, uint32_t len)
+{
+       unsigned retval;
+       
+       retval = kdp_machine_vm_read(srcaddr, dstaddr, len);
+       return retval;
+}
+
+int
+machine_trace_thread64(thread_t thread, char *tracepos, char *tracebound, int nframes, boolean_t user_p)
+{
+       uint64_t *tracebuf = (uint64_t *)tracepos;
+       uint32_t fence = 0;
+       addr64_t stackptr = 0;
+       uint64_t stacklimit = 0xb0000000;
+       int framecount = 0;
+       addr64_t init_srr0 = 0;
+       addr64_t prevsp = 0;
+       unsigned framesize = 2 * sizeof(addr64_t);
+       
+       if (user_p) {
+               init_srr0 = thread->machine.upcb->save_srr0;
+               stackptr = thread->machine.upcb->save_r1;
+               stacklimit = 0xffffffffffffffffULL;
+               kdp_pmap = thread->task->map->pmap;
+       }
+       else {
+               stackptr = thread->machine.pcb->save_r1;
+               init_srr0 = thread->machine.pcb->save_srr0;
+       }
+       
+       *tracebuf++ = init_srr0;
+
+       for (framecount = 0; framecount < nframes; framecount++) {
+
+               if ((uint32_t)(tracebound - ((char *)tracebuf)) < (4 * framesize)) {
+                       tracebuf--;
+                       break;
+               }
+
+               *tracebuf++ = stackptr;
+
+               if (!stackptr || (stackptr == fence)){
+                       break;
+               }
+               if (stackptr < prevsp) {
+                       break;
+               }
+               if (stackptr & 0x000000F) {
+                       break;
+               }
+               if (stackptr > stacklimit) {
+                       break;
+               }
+
+               if (machine_read64(stackptr+LR_OFFSET64, (caddr_t) tracebuf, sizeof(addr64_t)) != sizeof(addr64_t)) {
+                       break;
+               }
+               tracebuf++;
+               
+               prevsp = stackptr;
+               if (machine_read64(stackptr, (caddr_t) &stackptr, sizeof(addr64_t)) != sizeof(addr64_t)) {
+                       *tracebuf++ = 0;
+                       break;
+               }
+       }
+
+       kdp_pmap = NULL;
+       return (uint32_t) (((char *) tracebuf) - tracepos);
+}
+
+
+void
+kdp_ml_enter_debugger(void)
+{
+       __asm__ __volatile__("tw 4,r3,r3");
+}
+
+int
+kdp_machine_ioport_read(kdp_readioport_req_t *rq, caddr_t data, uint16_t lcpu)
+{
+    return 0;
+}
+
+int
+kdp_machine_ioport_write(kdp_writeioport_req_t *rq, caddr_t data, uint16_t lcpu)
+{
+    return 0;
+}
+
+int
+kdp_machine_msr64_read(kdp_readmsr64_req_t *rq, caddr_t data, uint16_t lcpu)
+{
+    return 0;
+}
+
+int
+kdp_machine_msr64_write(kdp_writemsr64_req_t *rq, __unused caddr_t data, uint16_t lcpu)
 {
-  return 0x7fe00008;
+    return 0;
 }