server/procfs.c

   1 /*
   2  * Server-side /proc support for Solaris
   3  *
   4  * Copyright (C) 2007 Alexandre Julliard
   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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "config.h"
  22
  23 #include <assert.h>
  24 #include <errno.h>
  25 #include <fcntl.h>
  26 #include <stdio.h>
  27 #include <signal.h>
  28 #include <stdarg.h>
  29 #include <sys/types.h>
  30 #include <unistd.h>
  31
  32 #include "ntstatus.h"
  33 #define WIN32_NO_STATUS
  34 #include "winternl.h"
  35
  36 #include "file.h"
  37 #include "process.h"
  38 #include "thread.h"
  39
  40 #ifdef USE_PROCFS
  41
  42 #include <procfs.h>
  43
  44 static int open_proc_as( struct process *process, int flags )
  45 {
  46     char buffer[32];
  47     int fd;
  48
  49     if (process->unix_pid == -1)
  50     {
  51         set_error( STATUS_ACCESS_DENIED );
  52         return -1;
  53     }
  54
  55     sprintf( buffer, "/proc/%u/as", process->unix_pid );
  56     if ((fd = open( buffer, flags )) == -1)
  57     {
  58         if (errno == ENOENT)  /* probably got killed */
  59         {
  60             process->unix_pid = -1;
  61             set_error( STATUS_ACCESS_DENIED );
  62         }
  63         else file_set_error();
  64     }
  65     return fd;
  66 }
  67
  68 static int open_proc_lwpctl( struct thread *thread )
  69 {
  70     char buffer[48];
  71     int fd;
  72
  73     if (thread->unix_pid == -1) return -1;
  74
  75     sprintf( buffer, "/proc/%u/lwp/%u/lwpctl", thread->unix_pid, thread->unix_tid );
  76     if ((fd = open( buffer, O_WRONLY )) == -1)
  77     {
  78         if (errno == ENOENT)  /* probably got killed */
  79             thread->unix_pid = thread->unix_tid = -1;
  80         else
  81             file_set_error();
  82     }
  83     return fd;
  84 }
  85
  86
  87 /* handle a SIGCHLD signal */
  88 void sigchld_callback(void)
  89 {
  90     assert( 0 );  /* should only be called when using ptrace */
  91 }
  92
  93 /* initialize the process tracing mechanism */
  94 void init_tracing_mechanism(void)
  95 {
  96     /* no initialization needed */
  97 }
  98
  99 /* initialize the per-process tracing mechanism */
 100 void init_process_tracing( struct process *process )
 101 {
 102     /* setup is done on-demand */
 103 }
 104
 105 /* terminate the per-process tracing mechanism */
 106 void finish_process_tracing( struct process *process )
 107 {
 108 }
 109
 110 /* send a Unix signal to a specific thread */
 111 int send_thread_signal( struct thread *thread, int sig )
 112 {
 113     int fd = open_proc_lwpctl( thread );
 114     long kill[2];
 115     ssize_t ret;
 116
 117     if (fd == -1) return 0;
 118
 119     kill[0] = PCKILL;
 120     kill[1] = sig;
 121     ret = write( fd, kill, sizeof(kill) );
 122     close( fd );
 123     return (ret == sizeof(kill));
 124 }
 125
 126 /* read data from a process memory space */
 127 int read_process_memory( struct process *process, client_ptr_t ptr, size_t size, char *dest )
 128 {
 129     ssize_t ret;
 130     int fd;
 131
 132     if ((off_t)ptr != ptr)
 133     {
 134         set_error( STATUS_ACCESS_DENIED );
 135         return 0;
 136     }
 137
 138     if ((fd = open_proc_as( process, O_RDONLY )) == -1) return 0;
 139
 140     ret = pread( fd, dest, size, (off_t)ptr );
 141     close( fd );
 142     if (ret == size) return 1;
 143
 144     if (ret == -1) file_set_error();
 145     else set_error( STATUS_ACCESS_VIOLATION );
 146     return 0;
 147 }
 148
 149 /* write data to a process memory space */
 150 int write_process_memory( struct process *process, client_ptr_t ptr, size_t size, const char *src )
 151 {
 152     ssize_t ret;
 153     int fd;
 154
 155     if ((off_t)ptr != ptr)
 156     {
 157         set_error( STATUS_ACCESS_DENIED );
 158         return 0;
 159     }
 160
 161     if ((fd = open_proc_as( process, O_RDONLY )) == -1) return 0;
 162
 163     ret = pwrite( fd, src, size, (off_t)ptr );
 164     close( fd );
 165     if (ret == size) return 1;
 166
 167     if (ret == -1) file_set_error();
 168     else set_error( STATUS_ACCESS_VIOLATION );
 169     return 0;
 170 }
 171
 172 /* retrieve an LDT selector entry */
 173 void get_selector_entry( struct thread *thread, int entry, unsigned int *base,
 174                          unsigned int *limit, unsigned char *flags )
 175 {
 176     ssize_t ret;
 177     off_t pos = thread->process->ldt_copy;
 178     int fd;
 179
 180     if (!pos)
 181     {
 182         set_error( STATUS_ACCESS_DENIED );
 183         return;
 184     }
 185     if ((fd = open_proc_as( thread->process, O_RDONLY )) == -1) return;
 186
 187     ret = pread( fd, base, sizeof(*base), pos + entry*sizeof(int) );
 188     if (ret != sizeof(*base)) goto error;
 189     ret = pread( fd, limit, sizeof(*limit), pos + (8192 + entry)*sizeof(int) );
 190     if (ret != sizeof(*limit)) goto error;
 191     ret = pread( fd, flags, sizeof(*flags), pos + 2*8192*sizeof(int) + entry );
 192     if (ret != sizeof(*flags)) goto error;
 193     close( fd );
 194     return;
 195
 196 error:
 197     if (ret == -1) file_set_error();
 198     else set_error( STATUS_ACCESS_VIOLATION );
 199     close( fd );
 200 }
 201
 202 /* retrieve the thread registers */
 203 void get_thread_context( struct thread *thread, context_t *context, unsigned int flags )
 204 {
 205     /* FIXME: get debug registers */
 206 }
 207
 208 /* set the thread registers */
 209 void set_thread_context( struct thread *thread, const context_t *context, unsigned int flags )
 210 {
 211     /* FIXME: set debug registers */
 212 }
 213
 214 #endif /* USE_PROCFS */