server/context_sparc.c

   1 /*
   2  * Sparc register context support
   3  *
   4  * Copyright (C) 2000 Ulrich Weigand
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include "config.h"
  22
  23 #ifdef __sparc__
  24
  25 #include <assert.h>
  26 #include <errno.h>
  27 #include <sys/types.h>
  28 #ifdef HAVE_SYS_REG_H
  29 # include <sys/reg.h>
  30 #endif
  31 #include <stdarg.h>
  32 #include <unistd.h>
  33 #ifdef HAVE_SYS_PTRACE_H
  34 # include <sys/ptrace.h>
  35 #endif
  36
  37 #include "windef.h"
  38 #include "winbase.h"
  39
  40 #include "file.h"
  41 #include "thread.h"
  42 #include "request.h"
  43
  44
  45 #if defined(__sun) || defined(__sun__)
  46
  47 /* retrieve a thread context */
  48 static void get_thread_context( struct thread *thread, unsigned int flags, CONTEXT *context )
  49 {
  50     int pid = get_ptrace_pid(thread);
  51     if (flags & CONTEXT_FULL)
  52     {
  53         struct regs regs;
  54         if (ptrace( PTRACE_GETREGS, pid, 0, (int) &regs ) == -1) goto error;
  55         if (flags & CONTEXT_INTEGER)
  56         {
  57             context->g0 = 0;
  58             context->g1 = regs.r_g1;
  59             context->g2 = regs.r_g2;
  60             context->g3 = regs.r_g3;
  61             context->g4 = regs.r_g4;
  62             context->g5 = regs.r_g5;
  63             context->g6 = regs.r_g6;
  64             context->g7 = regs.r_g7;
  65
  66             context->o0 = regs.r_o0;
  67             context->o1 = regs.r_o1;
  68             context->o2 = regs.r_o2;
  69             context->o3 = regs.r_o3;
  70             context->o4 = regs.r_o4;
  71             context->o5 = regs.r_o5;
  72             context->o6 = regs.r_o6;
  73             context->o7 = regs.r_o7;
  74
  75             /* FIXME: local and in registers */
  76         }
  77         if (flags & CONTEXT_CONTROL)
  78         {
  79             context->psr = regs.r_psr;
  80             context->pc  = regs.r_pc;
  81             context->npc = regs.r_npc;
  82             context->y   = regs.r_y;
  83             context->wim = 0;  /* FIXME */
  84             context->tbr = 0;  /* FIXME */
  85         }
  86     }
  87     if (flags & CONTEXT_FLOATING_POINT)
  88     {
  89         /* FIXME */
  90     }
  91     return;
  92  error:
  93     file_set_error();
  94 }
  95
  96
  97 /* set a thread context */
  98 static void set_thread_context( struct thread *thread, unsigned int flags, const CONTEXT *context )
  99 {
 100     /* FIXME */
 101 }
 102
 103 #else  /* __sun__ */
 104 #error You must implement get/set_thread_context for your platform
 105 #endif  /* __sun__ */
 106
 107
 108 /* copy a context structure according to the flags */
 109 static void copy_context( CONTEXT *to, const CONTEXT *from, int flags )
 110 {
 111     if (flags & CONTEXT_CONTROL)
 112     {
 113         to->psr    = from->psr;
 114         to->pc     = from->pc;
 115         to->npc    = from->npc;
 116         to->y      = from->y;
 117         to->wim    = from->wim;
 118         to->tbr    = from->tbr;
 119     }
 120     if (flags & CONTEXT_INTEGER)
 121     {
 122         to->g0 = from->g0;
 123         to->g1 = from->g1;
 124         to->g2 = from->g2;
 125         to->g3 = from->g3;
 126         to->g4 = from->g4;
 127         to->g5 = from->g5;
 128         to->g6 = from->g6;
 129         to->g7 = from->g7;
 130         to->o0 = from->o0;
 131         to->o1 = from->o1;
 132         to->o2 = from->o2;
 133         to->o3 = from->o3;
 134         to->o4 = from->o4;
 135         to->o5 = from->o5;
 136         to->o6 = from->o6;
 137         to->o7 = from->o7;
 138         to->l0 = from->l0;
 139         to->l1 = from->l1;
 140         to->l2 = from->l2;
 141         to->l3 = from->l3;
 142         to->l4 = from->l4;
 143         to->l5 = from->l5;
 144         to->l6 = from->l6;
 145         to->l7 = from->l7;
 146         to->i0 = from->i0;
 147         to->i1 = from->i1;
 148         to->i2 = from->i2;
 149         to->i3 = from->i3;
 150         to->i4 = from->i4;
 151         to->i5 = from->i5;
 152         to->i6 = from->i6;
 153         to->i7 = from->i7;
 154     }
 155     if (flags & CONTEXT_FLOATING_POINT)
 156     {
 157         /* FIXME */
 158     }
 159 }
 160
 161 /* retrieve the current instruction pointer of a thread */
 162 void *get_thread_ip( struct thread *thread )
 163 {
 164     CONTEXT context;
 165     context.pc = 0;
 166     if (suspend_for_ptrace( thread ))
 167     {
 168         get_thread_context( thread, CONTEXT_CONTROL, &context );
 169         resume_after_ptrace( thread );
 170     }
 171     return (void *)context.pc;
 172 }
 173
 174 /* determine if we should continue the thread in single-step mode */
 175 int get_thread_single_step( struct thread *thread )
 176 {
 177     return 0;  /* FIXME */
 178 }
 179
 180 /* send a signal to a specific thread */
 181 int tkill( int pid, int sig )
 182 {
 183     /* FIXME: should do something here */
 184     errno = ENOSYS;
 185     return -1;
 186 }
 187
 188 /* retrieve the current context of a thread */
 189 DECL_HANDLER(get_thread_context)
 190 {
 191     struct thread *thread;
 192     void *data;
 193     int flags = req->flags & ~CONTEXT_SPARC;  /* get rid of CPU id */
 194
 195     if (get_reply_max_size() < sizeof(CONTEXT))
 196     {
 197         set_error( STATUS_INVALID_PARAMETER );
 198         return;
 199     }
 200     if (!(thread = get_thread_from_handle( req->handle, THREAD_GET_CONTEXT ))) return;
 201
 202     if ((data = set_reply_data_size( sizeof(CONTEXT) )))
 203     {
 204         if (thread->context)  /* thread is inside an exception event */
 205         {
 206             copy_context( data, thread->context, flags );
 207             flags = 0;
 208         }
 209         if (flags && suspend_for_ptrace( thread ))
 210         {
 211             get_thread_context( thread, flags, data );
 212             resume_after_ptrace( thread );
 213         }
 214     }
 215     release_object( thread );
 216 }
 217
 218
 219 /* set the current context of a thread */
 220 DECL_HANDLER(set_thread_context)
 221 {
 222     struct thread *thread;
 223     int flags = req->flags & ~CONTEXT_SPARC;  /* get rid of CPU id */
 224
 225     if (get_req_data_size() < sizeof(CONTEXT))
 226     {
 227         set_error( STATUS_INVALID_PARAMETER );
 228         return;
 229     }
 230     if ((thread = get_thread_from_handle( req->handle, THREAD_SET_CONTEXT )))
 231     {
 232         if (thread->context)  /* thread is inside an exception event */
 233         {
 234             copy_context( thread->context, get_req_data(), flags );
 235             flags = 0;
 236         }
 237         if (flags && suspend_for_ptrace( thread ))
 238         {
 239             set_thread_context( thread, flags, get_req_data() );
 240             resume_after_ptrace( thread );
 241         }
 242         release_object( thread );
 243     }
 244 }
 245
 246 #endif  /* __sparc__ */