hurd/hurdioctl.c

   1 /* ioctl commands which must be done in the C library.
   2    Copyright (C) 1994,95,96,97,99,2001,2002,2009
   3         Free Software Foundation, Inc.
   4    This file is part of the GNU C Library.
   5
   6    The GNU C 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    The GNU C 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 the GNU C Library; if not, write to the Free
  18    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  19    02111-1307 USA.  */
  20
  21 #include <hurd.h>
  22 #include <hurd/fd.h>
  23 #include <sys/ioctl.h>
  24 #include <hurd/ioctl.h>
  25 #include <string.h>
  26
  27
  28 /* Symbol set of ioctl handler lists.  If there are user-registered
  29    handlers, one of these lists will contain them.  The other lists are
  30    handlers built into the library.  */
  31 symbol_set_define (_hurd_ioctl_handler_lists)
  32
  33 /* Look up REQUEST in the set of handlers.  */
  34 ioctl_handler_t
  35 _hurd_lookup_ioctl_handler (int request)
  36 {
  37   void *const *ptr;
  38   const struct ioctl_handler *h;
  39
  40   /* Mask off the type bits, so that we see requests in a single group as a
  41      contiguous block of values.  */
  42   request = _IOC_NOTYPE (request);
  43
  44   for (ptr = symbol_set_first_element (_hurd_ioctl_handler_lists);
  45        !symbol_set_end_p (_hurd_ioctl_handler_lists, ptr);
  46        ++ptr)
  47     for (h = *ptr; h != NULL; h = h->next)
  48       if (request >= h->first_request && request <= h->last_request)
  49         return h->handler;
  50
  51   return NULL;
  52 }
  53 \f
  54 #include <fcntl.h>
  55
  56 /* Find out how many bytes may be read from FD without blocking.  */
  57
  58 static int
  59 fioctl (int fd,
  60         int request,
  61         int *arg)
  62 {
  63   error_t err;
  64
  65   *(volatile int *) arg = *arg;
  66
  67   switch (request)
  68     {
  69     default:
  70       err = ENOTTY;
  71       break;
  72
  73     case FIONREAD:
  74       {
  75         mach_msg_type_number_t navail;
  76         err = HURD_DPORT_USE (fd, __io_readable (port, &navail));
  77         if (!err)
  78           *arg = (int) navail;
  79       }
  80       break;
  81
  82     case FIONBIO:
  83       err = HURD_DPORT_USE (fd, (*arg ?
  84                                  __io_set_some_openmodes :
  85                                  __io_clear_some_openmodes)
  86                             (port, O_NONBLOCK));
  87       break;
  88
  89     case FIOASYNC:
  90       err = HURD_DPORT_USE (fd, (*arg ?
  91                                  __io_set_some_openmodes :
  92                                  __io_clear_some_openmodes)
  93                             (port, O_ASYNC));
  94       break;
  95
  96     case FIOSETOWN:
  97       err = HURD_DPORT_USE (fd, __io_mod_owner (port, *arg));
  98       break;
  99
 100     case FIOGETOWN:
 101       err = HURD_DPORT_USE (fd, __io_get_owner (port, arg));
 102       break;
 103     }
 104
 105   return err ? __hurd_dfail (fd, err) : 0;
 106 }
 107
 108 _HURD_HANDLE_IOCTLS (fioctl, FIOGETOWN, FIONREAD);
 109
 110
 111 static int
 112 fioclex (int fd,
 113          int request)
 114 {
 115   int flag;
 116
 117   switch (request)
 118     {
 119     default:
 120       return __hurd_fail (ENOTTY);
 121     case FIOCLEX:
 122       flag = FD_CLOEXEC;
 123       break;
 124     case FIONCLEX:
 125       flag = 0;
 126       break;
 127     }
 128
 129   return __fcntl (fd, F_SETFD, flag);
 130 }
 131 _HURD_HANDLE_IOCTLS (fioclex, FIOCLEX, FIONCLEX);
 132 \f
 133 #include <hurd/term.h>
 134 #include <hurd/tioctl.h>
 135
 136 /* Install a new CTTYID port, atomically updating the dtable appropriately.
 137    This consumes the send right passed in.  */
 138
 139 void
 140 _hurd_locked_install_cttyid (mach_port_t cttyid)
 141 {
 142   mach_port_t old;
 143   struct hurd_port *const port = &_hurd_ports[INIT_PORT_CTTYID];
 144   struct hurd_userlink ulink;
 145   int i;
 146
 147   /* Install the new cttyid port, and preserve it with a ulink.
 148      We unroll the _hurd_port_set + _hurd_port_get here so that
 149      there is no window where the cell is unlocked and CTTYID could
 150      be changed by another thread.  (We also delay the deallocation
 151      of the old port until the end, to minimize the duration of the
 152      critical section.)
 153
 154      It is important that changing the cttyid port is only ever done by
 155      holding the dtable lock continuously while updating the port cell and
 156      re-ctty'ing the dtable; dtable.c assumes we do this.  Otherwise, the
 157      pgrp-change notification code in dtable.c has to worry about racing
 158      against us here in odd situations.  The one exception to this is
 159      setsid, which holds the dtable lock while changing the pgrp and
 160      clearing the cttyid port, and then unlocks the dtable lock to allow
 161
 162
 163   */
 164
 165   __spin_lock (&port->lock);
 166   old = _hurd_userlink_clear (&port->users) ? port->port : MACH_PORT_NULL;
 167   port->port = cttyid;
 168   cttyid = _hurd_port_locked_get (port, &ulink);
 169
 170   for (i = 0; i < _hurd_dtablesize; ++i)
 171     {
 172       struct hurd_fd *const d = _hurd_dtable[i];
 173       mach_port_t newctty = MACH_PORT_NULL;
 174
 175       if (d == NULL)
 176         /* Nothing to do for an unused descriptor cell.  */
 177         continue;
 178
 179       if (cttyid != MACH_PORT_NULL)
 180         /* We do have some controlling tty.  */
 181         HURD_PORT_USE (&d->port,
 182                        ({ mach_port_t id;
 183                           /* Get the io object's cttyid port.  */
 184                           if (! __term_getctty (port, &id))
 185                             {
 186                               if (id == cttyid /* Is it ours?  */
 187                                   /* Get the ctty io port.  */
 188                                   && __term_open_ctty (port,
 189                                                        _hurd_pid, _hurd_pgrp,
 190                                                        &newctty))
 191                                 /* XXX it is our ctty but the call failed? */
 192                                 newctty = MACH_PORT_NULL;
 193                               __mach_port_deallocate (__mach_task_self (), id);
 194                             }
 195                           0;
 196                         }));
 197
 198       /* Install the new ctty port.  */
 199       _hurd_port_set (&d->ctty, newctty);
 200     }
 201
 202   __mutex_unlock (&_hurd_dtable_lock);
 203
 204   if (old != MACH_PORT_NULL)
 205     __mach_port_deallocate (__mach_task_self (), old);
 206   _hurd_port_free (port, &ulink, cttyid);
 207 }
 208
 209 static void
 210 install_ctty (mach_port_t cttyid)
 211 {
 212   HURD_CRITICAL_BEGIN;
 213   __mutex_lock (&_hurd_dtable_lock);
 214   _hurd_locked_install_cttyid (cttyid);
 215   HURD_CRITICAL_END;
 216 }
 217
 218
 219 /* Called when we have received a message saying to use a new ctty ID port.  */
 220
 221 error_t
 222 _hurd_setcttyid (mach_port_t cttyid)
 223 {
 224   error_t err;
 225
 226   if (cttyid != MACH_PORT_NULL)
 227     {
 228       /* Give the new send right a user reference.
 229          This is a good way to check that it is valid.  */
 230       if (err = __mach_port_mod_refs (__mach_task_self (), cttyid,
 231                                       MACH_PORT_RIGHT_SEND, 1))
 232         return err;
 233     }
 234
 235   /* Install the port, consuming the reference we just created.  */
 236   install_ctty (cttyid);
 237
 238   return 0;
 239 }
 240
 241
 242 /* Make FD be the controlling terminal.
 243    This function is called for `ioctl (fd, TCIOSCTTY)'.  */
 244
 245 static int
 246 tiocsctty (int fd,
 247            int request)         /* Always TIOCSCTTY.  */
 248 {
 249   mach_port_t cttyid;
 250   error_t err;
 251
 252   /* Get FD's cttyid port, unless it is already ours.  */
 253   err = HURD_DPORT_USE (fd, ctty != MACH_PORT_NULL ? EADDRINUSE :
 254                         __term_getctty (port, &cttyid));
 255   if (err == EADDRINUSE)
 256     /* FD is already the ctty.  Nothing to do.  */
 257     return 0;
 258   else if (err)
 259     return __hurd_fail (err);
 260
 261   /* Change the terminal's pgrp to ours.  */
 262   err = HURD_DPORT_USE (fd, __tioctl_tiocspgrp (port, _hurd_pgrp));
 263   if (err)
 264     return __hurd_fail (err);
 265
 266   /* Make it our own.  */
 267   install_ctty (cttyid);
 268
 269   return 0;
 270 }
 271 _HURD_HANDLE_IOCTL (tiocsctty, TIOCSCTTY);
 272
 273 /* Dissociate from the controlling terminal.  */
 274
 275 static int
 276 tiocnotty (int fd,
 277            int request)         /* Always TIOCNOTTY.  */
 278 {
 279   mach_port_t fd_cttyid;
 280   error_t err;
 281
 282   if (err = HURD_DPORT_USE (fd, __term_getctty (port, &fd_cttyid)))
 283     return __hurd_fail (err);
 284
 285   if (__USEPORT (CTTYID, port != fd_cttyid))
 286     err = EINVAL;
 287
 288   __mach_port_deallocate (__mach_task_self (), fd_cttyid);
 289
 290   if (err)
 291     return __hurd_fail (err);
 292
 293   /* Clear our cttyid port.  */
 294   install_ctty (MACH_PORT_NULL);
 295
 296   return 0;
 297 }
 298 _HURD_HANDLE_IOCTL (tiocnotty, TIOCNOTTY);
 299 \f
 300 #include <hurd/pfinet.h>
 301 #include <net/if.h>
 302 #include <netinet/in.h>
 303
 304 /* Fill in the buffer IFC->IFC_BUF of length IFC->IFC_LEN with a list
 305    of ifr structures, one for each network interface.  */
 306 static int
 307 siocgifconf (int fd, int request, struct ifconf *ifc)
 308 {
 309   error_t err;
 310   size_t data_len = ifc->ifc_len;
 311   char *data = ifc->ifc_buf;
 312
 313   if (data_len <= 0)
 314     return 0;
 315
 316   err = HURD_DPORT_USE (fd, __pfinet_siocgifconf (port, ifc->ifc_len,
 317                                                   &data, &data_len));
 318   if (data_len < ifc->ifc_len)
 319     ifc->ifc_len = data_len;
 320   if (data != ifc->ifc_buf)
 321     {
 322       memcpy (ifc->ifc_buf, data, ifc->ifc_len);
 323       __vm_deallocate (__mach_task_self (), (vm_address_t) data, data_len);
 324     }
 325   return err ? __hurd_dfail (fd, err) : 0;
 326 }
 327 _HURD_HANDLE_IOCTL (siocgifconf, SIOCGIFCONF);