sys/arm/arm/gdb_machdep.c

   1 /*-
   2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
   3  *
   4  * Copyright (c) 2006 Olivier Houchard
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  *
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
  18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20  * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT,
  21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27  */
  28
  29 #include <sys/cdefs.h>
  30 __FBSDID("$FreeBSD$");
  31
  32 #include <sys/param.h>
  33 #include <sys/systm.h>
  34 #include <sys/kdb.h>
  35 #include <sys/kernel.h>
  36 #include <sys/proc.h>
  37 #include <sys/signal.h>
  38
  39 #include <machine/gdb_machdep.h>
  40 #include <machine/db_machdep.h>
  41 #include <machine/vmparam.h>
  42 #include <machine/pcb.h>
  43 #include <machine/trap.h>
  44 #include <machine/frame.h>
  45 #include <machine/endian.h>
  46
  47 #include <gdb/gdb.h>
  48
  49 static register_t stacktest;
  50
  51 void *
  52 gdb_cpu_getreg(int regnum, size_t *regsz)
  53 {
  54
  55         *regsz = gdb_cpu_regsz(regnum);
  56
  57         if (kdb_thread == curthread) {
  58                 if (regnum < 13)
  59                         return (&kdb_frame->tf_r0 + regnum);
  60                 if (regnum == 13)
  61                         return (&kdb_frame->tf_svc_sp);
  62                 if (regnum == 14)
  63                         return (&kdb_frame->tf_svc_lr);
  64                 if (regnum == 15)
  65                         return (&kdb_frame->tf_pc);
  66                 if (regnum == 25)
  67                         return (&kdb_frame->tf_spsr);
  68         }
  69
  70         switch (regnum) {
  71         case 4:  return (&kdb_thrctx->pcb_regs.sf_r4);
  72         case 5:  return (&kdb_thrctx->pcb_regs.sf_r5);
  73         case 6:  return (&kdb_thrctx->pcb_regs.sf_r6);
  74         case 7:  return (&kdb_thrctx->pcb_regs.sf_r7);
  75         case 8:  return (&kdb_thrctx->pcb_regs.sf_r8);
  76         case 9:  return (&kdb_thrctx->pcb_regs.sf_r9);
  77         case 10:  return (&kdb_thrctx->pcb_regs.sf_r10);
  78         case 11:  return (&kdb_thrctx->pcb_regs.sf_r11);
  79         case 12:  return (&kdb_thrctx->pcb_regs.sf_r12);
  80         case 13:  stacktest = kdb_thrctx->pcb_regs.sf_sp + 5 * 4;
  81                   return (&stacktest);
  82         case 15:
  83                   /*
  84                    * On context switch, the PC is not put in the PCB, but
  85                    * we can retrieve it from the stack.
  86                    */
  87                   if (kdb_thrctx->pcb_regs.sf_sp > KERNBASE) {
  88                           kdb_thrctx->pcb_regs.sf_pc = *(register_t *)
  89                               (kdb_thrctx->pcb_regs.sf_sp + 4 * 4);
  90                           return (&kdb_thrctx->pcb_regs.sf_pc);
  91                   }
  92         }
  93
  94         return (NULL);
  95 }
  96
  97 void
  98 gdb_cpu_setreg(int regnum, void *val)
  99 {
 100         if (kdb_thread != curthread)
 101                 return;
 102
 103         switch (regnum) {
 104         case GDB_REG_PC:
 105                 kdb_frame->tf_pc = *(register_t *)val;
 106                 break;
 107         case GDB_REG_SP:
 108                 kdb_frame->tf_svc_sp = *(register_t *)val;
 109                 break;
 110         case GDB_REG_LR:
 111                 kdb_frame->tf_svc_lr = *(register_t *)val;
 112                 break;
 113         default:
 114                 /* Write to the general purpose registers r0-r12. */
 115                 if (regnum >= 0 && regnum <= 12) {
 116                         *(&kdb_frame->tf_r0 + regnum) = *(register_t *)val;
 117                 }
 118                 break;
 119         }
 120 }
 121
 122 int
 123 gdb_cpu_signal(int type, int code)
 124 {
 125
 126         switch (type) {
 127         case T_BREAKPOINT: return (SIGTRAP);
 128         }
 129         return (SIGEMT);
 130 }