sysdeps/mach/hurd/kill.c

   1 /* Copyright (C) 1991, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
   2 This file is part of the GNU C Library.
   3
   4 The GNU C Library is free software; you can redistribute it and/or
   5 modify it under the terms of the GNU Library General Public License as
   6 published by the Free Software Foundation; either version 2 of the
   7 License, or (at your option) any later version.
   8
   9 The GNU C Library is distributed in the hope that it will be useful,
  10 but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12 Library General Public License for more details.
  13
  14 You should have received a copy of the GNU Library General Public
  15 License along with the GNU C Library; see the file COPYING.LIB.  If
  16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
  17 Cambridge, MA 02139, USA.  */
  18
  19 #include <errno.h>
  20 #include <sys/types.h>
  21 #include <signal.h>
  22 #include <hurd.h>
  23 #include <hurd/port.h>
  24 #include <hurd/signal.h>
  25 #include <hurd/msg.h>
  26
  27 /* Send signal SIG to process number PID.  If PID is zero,
  28    send SIG to all processes in the current process's process group.
  29    If PID is < -1, send SIG to all processes in process group - PID.  */
  30 int
  31 __kill (pid_t pid, int sig)
  32 {
  33   int delivered = 0;            /* Set when we deliver any signal.  */
  34   error_t err;
  35   mach_port_t proc;
  36   struct hurd_userlink ulink;
  37
  38   inline void kill_pid (pid_t pid) /* Kill one PID.  */
  39     {
  40
  41
  42       /* SIGKILL is not delivered as a normal signal.
  43          Sending SIGKILL to a process means to terminate its task.  */
  44       if (sig == SIGKILL)
  45         /* Fetch the process's task port and terminate the task.  We
  46            loop in case the process execs and changes its task port.
  47            If the old task port dies after we fetch it but before we
  48            send the RPC, we get MACH_SEND_INVALID_DEST; if it dies
  49            after we send the RPC request but before it is serviced, we
  50            get MIG_SERVER_DIED.  */
  51         do
  52           {
  53             task_t refport;
  54             err = __proc_pid2task (proc, pid, &refport);
  55             if (!err)
  56               {
  57                 err = __task_terminate (refport);
  58                 __mach_port_deallocate (__mach_task_self (), refport);
  59               }
  60           } while (err == MACH_SEND_INVALID_DEST ||
  61                    err == MIG_SERVER_DIED);
  62       else
  63         {
  64           error_t taskerr;
  65           error_t kill_port (mach_port_t msgport, mach_port_t refport)
  66             {
  67               if (msgport != MACH_PORT_NULL)
  68                 /* Send a signal message to his message port.  */
  69                 return __msg_sig_post (msgport, sig, refport);
  70
  71               /* The process has no message port.  Perhaps try direct
  72                  frobnication of the task.  */
  73
  74               if (taskerr)
  75                 /* If we could not get the task port, we can do nothing.  */
  76                 return taskerr;
  77
  78               /* For user convenience in the case of a task that has
  79                  not registered any message port with the proc server,
  80                  translate a few signals to direct task operations.  */
  81               switch (sig)
  82                 {
  83                   /* The only signals that really make sense for an
  84                      unregistered task are kill, suspend, and continue.  */
  85                 case SIGSTOP:
  86                 case SIGTSTP:
  87                   return __task_suspend (refport);
  88                 case SIGCONT:
  89                   return __task_resume (refport);
  90                 case SIGQUIT:
  91                 case SIGINT:
  92                   return __task_terminate (refport);
  93                 default:
  94                   /* We have full permission to send signals, but there is
  95                      no meaningful way to express this signal.  */
  96                   return EPERM;
  97                 }
  98             }
  99           err = HURD_MSGPORT_RPC (__proc_getmsgport (proc, pid, &msgport),
 100                                   (taskerr = __proc_pid2task (proc, pid,
 101                                                               &refport)) ?
 102                                   __proc_getsidport (proc, &refport) : 0, 1,
 103                                   kill_port (msgport, refport));
 104         }
 105       if (! err)
 106         delivered = 1;
 107     }
 108
 109   proc = _hurd_port_get (&_hurd_ports[INIT_PORT_PROC], &ulink);
 110
 111   if (pid <= 0)
 112     {
 113       /* Send SIG to each process in pgrp (- PID).  */
 114       pid_t pidbuf[10], *pids = pidbuf;
 115       mach_msg_type_number_t i, npids = sizeof (pidbuf) / sizeof (pidbuf[0]);
 116
 117       err = __proc_getpgrppids (proc, - pid, &pids, &npids);
 118       if (!err)
 119         {
 120           for (i = 0; i < npids; ++i)
 121             {
 122               kill_pid (pids[i]);
 123               if (err == ESRCH)
 124                 /* The process died already.  Ignore it.  */
 125                 err = 0;
 126             }
 127           if (pids != pidbuf)
 128             __vm_deallocate (__mach_task_self (),
 129                              (vm_address_t) pids, npids * sizeof (pids[0]));
 130         }
 131     }
 132   else
 133     kill_pid (pid);
 134
 135   _hurd_port_free (&_hurd_ports[INIT_PORT_PROC], &ulink, proc);
 136
 137   /* If we delivered no signals, but ERR is clear, this must mean that
 138      every kill_pid call failed with ESRCH, meaning all the processes in
 139      the pgrp died between proc_getpgrppids and kill_pid; in that case we
 140      fail with ESRCH.  */
 141   return delivered ? 0 : __hurd_fail (err ?: ESRCH);
 142 }
 143
 144 weak_alias (__kill, kill)