sys/vfs/fifofs/fifo_vnops.c

   1 /*
   2  * Copyright (c) 1990, 1993, 1995
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by the University of
  16  *      California, Berkeley and its contributors.
  17  * 4. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  *
  33  *      @(#)fifo_vnops.c        8.10 (Berkeley) 5/27/95
  34  * $FreeBSD: src/sys/miscfs/fifofs/fifo_vnops.c,v 1.45.2.4 2003/04/22 10:11:24 bde Exp $
  35  * $DragonFly: src/sys/vfs/fifofs/fifo_vnops.c,v 1.40 2007/08/13 17:31:56 dillon Exp $
  36  */
  37
  38 #include <sys/param.h>
  39 #include <sys/systm.h>
  40 #include <sys/unistd.h>
  41 #include <sys/kernel.h>
  42 #include <sys/lock.h>
  43 #include <sys/malloc.h>
  44 #include <sys/thread2.h>
  45 #include <sys/vnode.h>
  46 #include <sys/socket.h>
  47 #include <sys/socketvar.h>
  48 #include <sys/filio.h>
  49 #include <sys/fcntl.h>
  50 #include <sys/file.h>
  51 #include <sys/event.h>
  52 #include <sys/poll.h>
  53 #include <sys/un.h>
  54
  55 #include <sys/thread2.h>
  56
  57 #include "fifo.h"
  58
  59 /*
  60  * This structure is associated with the FIFO vnode and stores
  61  * the state associated with the FIFO.
  62  */
  63 struct fifoinfo {
  64         struct socket   *fi_readsock;
  65         struct socket   *fi_writesock;
  66         long            fi_readers;
  67         long            fi_writers;
  68 };
  69
  70 static int      fifo_badop (void);
  71 static int      fifo_print (struct vop_print_args *);
  72 static int      fifo_lookup (struct vop_old_lookup_args *);
  73 static int      fifo_open (struct vop_open_args *);
  74 static int      fifo_close (struct vop_close_args *);
  75 static int      fifo_read (struct vop_read_args *);
  76 static int      fifo_write (struct vop_write_args *);
  77 static int      fifo_ioctl (struct vop_ioctl_args *);
  78 static int      fifo_poll (struct vop_poll_args *);
  79 static int      fifo_kqfilter (struct vop_kqfilter_args *);
  80 static int      fifo_inactive (struct  vop_inactive_args *);
  81 static int      fifo_bmap (struct vop_bmap_args *);
  82 static int      fifo_pathconf (struct vop_pathconf_args *);
  83 static int      fifo_advlock (struct vop_advlock_args *);
  84
  85 static void     filt_fifordetach(struct knote *kn);
  86 static int      filt_fiforead(struct knote *kn, long hint);
  87 static void     filt_fifowdetach(struct knote *kn);
  88 static int      filt_fifowrite(struct knote *kn, long hint);
  89
  90 static struct filterops fiforead_filtops =
  91         { 1, NULL, filt_fifordetach, filt_fiforead };
  92 static struct filterops fifowrite_filtops =
  93         { 1, NULL, filt_fifowdetach, filt_fifowrite };
  94
  95 struct vop_ops fifo_vnode_vops = {
  96         .vop_default =          vop_defaultop,
  97         .vop_access =           (void *)vop_ebadf,
  98         .vop_advlock =          fifo_advlock,
  99         .vop_bmap =             fifo_bmap,
 100         .vop_close =            fifo_close,
 101         .vop_old_create =       (void *)fifo_badop,
 102         .vop_getattr =          (void *)vop_ebadf,
 103         .vop_inactive =         fifo_inactive,
 104         .vop_ioctl =            fifo_ioctl,
 105         .vop_kqfilter =         fifo_kqfilter,
 106         .vop_old_link =         (void *)fifo_badop,
 107         .vop_old_lookup =       fifo_lookup,
 108         .vop_old_mkdir =        (void *)fifo_badop,
 109         .vop_old_mknod =        (void *)fifo_badop,
 110         .vop_open =             fifo_open,
 111         .vop_pathconf =         fifo_pathconf,
 112         .vop_poll =             fifo_poll,
 113         .vop_print =            fifo_print,
 114         .vop_read =             fifo_read,
 115         .vop_readdir =          (void *)fifo_badop,
 116         .vop_readlink =         (void *)fifo_badop,
 117         .vop_reallocblks =      (void *)fifo_badop,
 118         .vop_reclaim =          (void *)vop_null,
 119         .vop_old_remove =       (void *)fifo_badop,
 120         .vop_old_rename =       (void *)fifo_badop,
 121         .vop_old_rmdir =        (void *)fifo_badop,
 122         .vop_setattr =          (void *)vop_ebadf,
 123         .vop_old_symlink =      (void *)fifo_badop,
 124         .vop_write =            fifo_write
 125 };
 126
 127 VNODEOP_SET(fifo_vnode_vops);
 128
 129 static MALLOC_DEFINE(M_FIFOINFO, "Fifo info", "Fifo info entries");
 130
 131 /*
 132  * fifo_vnoperate()
 133  */
 134 int
 135 fifo_vnoperate(struct vop_generic_args *ap)
 136 {
 137         return (VOCALL(&fifo_vnode_vops, ap));
 138 }
 139
 140 /*
 141  * Trivial lookup routine that always fails.
 142  *
 143  * fifo_lookup(struct vnode *a_dvp, struct vnode **a_vpp,
 144  *             struct componentname *a_cnp)
 145  */
 146 /* ARGSUSED */
 147 static int
 148 fifo_lookup(struct vop_old_lookup_args *ap)
 149 {
 150         *ap->a_vpp = NULL;
 151         return (ENOTDIR);
 152 }
 153
 154 /*
 155  * Open called to set up a new instance of a fifo or
 156  * to find an active instance of a fifo.
 157  *
 158  * fifo_open(struct vnode *a_vp, int a_mode, struct ucred *a_cred,
 159  *           struct file *a_fp)
 160  */
 161 /* ARGSUSED */
 162 static int
 163 fifo_open(struct vop_open_args *ap)
 164 {
 165         struct thread *td = curthread;
 166         struct vnode *vp = ap->a_vp;
 167         struct fifoinfo *fip;
 168         struct socket *rso, *wso;
 169         int error;
 170
 171         if ((fip = vp->v_fifoinfo) == NULL) {
 172                 MALLOC(fip, struct fifoinfo *, sizeof(*fip), M_FIFOINFO, M_WAITOK);
 173                 vp->v_fifoinfo = fip;
 174                 error = socreate(AF_LOCAL, &rso, SOCK_STREAM, 0, td);
 175                 if (error) {
 176                         kfree(fip, M_FIFOINFO);
 177                         vp->v_fifoinfo = NULL;
 178                         return (error);
 179                 }
 180                 fip->fi_readsock = rso;
 181                 error = socreate(AF_LOCAL, &wso, SOCK_STREAM, 0, td);
 182                 if (error) {
 183                         soclose(rso, FNONBLOCK);
 184                         kfree(fip, M_FIFOINFO);
 185                         vp->v_fifoinfo = NULL;
 186                         return (error);
 187                 }
 188                 fip->fi_writesock = wso;
 189                 error = unp_connect2(wso, rso);
 190                 if (error) {
 191                         soclose(wso, FNONBLOCK);
 192                         soclose(rso, FNONBLOCK);
 193                         kfree(fip, M_FIFOINFO);
 194                         vp->v_fifoinfo = NULL;
 195                         return (error);
 196                 }
 197                 fip->fi_readers = fip->fi_writers = 0;
 198                 wso->so_snd.ssb_lowat = PIPE_BUF;
 199                 rso->so_state |= SS_CANTRCVMORE;
 200         }
 201         if (ap->a_mode & FREAD) {
 202                 fip->fi_readers++;
 203                 if (fip->fi_readers == 1) {
 204                         fip->fi_writesock->so_state &= ~SS_CANTSENDMORE;
 205                         if (fip->fi_writers > 0) {
 206                                 wakeup((caddr_t)&fip->fi_writers);
 207                                 sowwakeup(fip->fi_writesock);
 208                         }
 209                 }
 210         }
 211         if (ap->a_mode & FWRITE) {
 212                 fip->fi_writers++;
 213                 if (fip->fi_writers == 1) {
 214                         fip->fi_readsock->so_state &= ~SS_CANTRCVMORE;
 215                         if (fip->fi_readers > 0) {
 216                                 wakeup((caddr_t)&fip->fi_readers);
 217                                 sorwakeup(fip->fi_writesock);
 218                         }
 219                 }
 220         }
 221         if ((ap->a_mode & FREAD) && (ap->a_mode & O_NONBLOCK) == 0) {
 222                 if (fip->fi_writers == 0) {
 223                         vn_unlock(vp);
 224                         error = tsleep((caddr_t)&fip->fi_readers,
 225                             PCATCH, "fifoor", 0);
 226                         vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
 227                         if (error)
 228                                 goto bad;
 229                         /*
 230                          * We must have got woken up because we had a writer.
 231                          * That (and not still having one) is the condition
 232                          * that we must wait for.
 233                          */
 234                 }
 235         }
 236         if (ap->a_mode & FWRITE) {
 237                 if (ap->a_mode & O_NONBLOCK) {
 238                         if (fip->fi_readers == 0) {
 239                                 error = ENXIO;
 240                                 goto bad;
 241                         }
 242                 } else {
 243                         if (fip->fi_readers == 0) {
 244                                 vn_unlock(vp);
 245                                 error = tsleep((caddr_t)&fip->fi_writers,
 246                                     PCATCH, "fifoow", 0);
 247                                 vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
 248                                 if (error)
 249                                         goto bad;
 250                                 /*
 251                                  * We must have got woken up because we had
 252                                  * a reader.  That (and not still having one)
 253                                  * is the condition that we must wait for.
 254                                  */
 255                         }
 256                 }
 257         }
 258         vp->v_flag |= VNOTSEEKABLE;
 259         return (vop_stdopen(ap));
 260 bad:
 261         vop_stdopen(ap);        /* bump opencount/writecount as appropriate */
 262         VOP_CLOSE(vp, ap->a_mode);
 263         return (error);
 264 }
 265
 266 /*
 267  * Vnode op for read
 268  *
 269  * fifo_read(struct vnode *a_vp, struct uio *a_uio, int a_ioflag,
 270  *           struct ucred *a_cred)
 271  */
 272 /* ARGSUSED */
 273 static int
 274 fifo_read(struct vop_read_args *ap)
 275 {
 276         struct uio *uio = ap->a_uio;
 277         struct socket *rso = ap->a_vp->v_fifoinfo->fi_readsock;
 278         int error, startresid;
 279         int flags;
 280
 281 #ifdef DIAGNOSTIC
 282         if (uio->uio_rw != UIO_READ)
 283                 panic("fifo_read mode");
 284 #endif
 285         if (uio->uio_resid == 0)
 286                 return (0);
 287         if (ap->a_ioflag & IO_NDELAY)
 288                 flags = MSG_FNONBLOCKING;
 289         else
 290                 flags = 0;
 291         startresid = uio->uio_resid;
 292         vn_unlock(ap->a_vp);
 293         error = soreceive(rso, NULL, uio, NULL, NULL, &flags);
 294         vn_lock(ap->a_vp, LK_EXCLUSIVE | LK_RETRY);
 295         return (error);
 296 }
 297
 298 /*
 299  * Vnode op for write
 300  *
 301  * fifo_write(struct vnode *a_vp, struct uio *a_uio, int a_ioflag,
 302  *            struct ucred *a_cred)
 303  */
 304 /* ARGSUSED */
 305 static int
 306 fifo_write(struct vop_write_args *ap)
 307 {
 308         struct socket *wso = ap->a_vp->v_fifoinfo->fi_writesock;
 309         struct thread *td = ap->a_uio->uio_td;
 310         int error;
 311         int flags;
 312
 313 #ifdef DIAGNOSTIC
 314         if (ap->a_uio->uio_rw != UIO_WRITE)
 315                 panic("fifo_write mode");
 316 #endif
 317         if (ap->a_ioflag & IO_NDELAY)
 318                 flags = MSG_FNONBLOCKING;
 319         else
 320                 flags = 0;
 321         vn_unlock(ap->a_vp);
 322         error = sosend(wso, NULL, ap->a_uio, 0, NULL, flags, td);
 323         vn_lock(ap->a_vp, LK_EXCLUSIVE | LK_RETRY);
 324         return (error);
 325 }
 326
 327 /*
 328  * Device ioctl operation.
 329  *
 330  * fifo_ioctl(struct vnode *a_vp, int a_command, caddr_t a_data, int a_fflag,
 331  *            struct ucred *a_cred, struct sysmsg *a_sysmsg)
 332  */
 333 /* ARGSUSED */
 334 static int
 335 fifo_ioctl(struct vop_ioctl_args *ap)
 336 {
 337         struct file filetmp;    /* Local */
 338         int error;
 339
 340         if (ap->a_fflag & FREAD) {
 341                 filetmp.f_data = ap->a_vp->v_fifoinfo->fi_readsock;
 342                 error = soo_ioctl(&filetmp, ap->a_command, ap->a_data,
 343                                   ap->a_cred, ap->a_sysmsg);
 344                 if (error)
 345                         return (error);
 346         }
 347         if (ap->a_fflag & FWRITE) {
 348                 filetmp.f_data = ap->a_vp->v_fifoinfo->fi_writesock;
 349                 error = soo_ioctl(&filetmp, ap->a_command, ap->a_data,
 350                                   ap->a_cred, ap->a_sysmsg);
 351                 if (error)
 352                         return (error);
 353         }
 354         return (0);
 355 }
 356
 357 /*
 358  * fifo_kqfilter(struct vnode *a_vp, struct knote *a_kn)
 359  */
 360 /* ARGSUSED */
 361 static int
 362 fifo_kqfilter(struct vop_kqfilter_args *ap)
 363 {
 364         struct fifoinfo *fi = ap->a_vp->v_fifoinfo;
 365         struct socket *so;
 366         struct signalsockbuf *ssb;
 367
 368         switch (ap->a_kn->kn_filter) {
 369         case EVFILT_READ:
 370                 ap->a_kn->kn_fop = &fiforead_filtops;
 371                 so = fi->fi_readsock;
 372                 ssb = &so->so_rcv;
 373                 break;
 374         case EVFILT_WRITE:
 375                 ap->a_kn->kn_fop = &fifowrite_filtops;
 376                 so = fi->fi_writesock;
 377                 ssb = &so->so_snd;
 378                 break;
 379         default:
 380                 return (1);
 381         }
 382
 383         ap->a_kn->kn_hook = (caddr_t)so;
 384
 385         ssb_insert_knote(ssb, ap->a_kn);
 386
 387         return (0);
 388 }
 389
 390 static void
 391 filt_fifordetach(struct knote *kn)
 392 {
 393         struct socket *so = (struct socket *)kn->kn_hook;
 394
 395         ssb_remove_knote(&so->so_rcv, kn);
 396 }
 397
 398 static int
 399 filt_fiforead(struct knote *kn, long hint)
 400 {
 401         struct socket *so = (struct socket *)kn->kn_hook;
 402
 403         kn->kn_data = so->so_rcv.ssb_cc;
 404         if (so->so_state & SS_CANTRCVMORE) {
 405                 kn->kn_flags |= EV_EOF;
 406                 return (1);
 407         }
 408         kn->kn_flags &= ~EV_EOF;
 409         return (kn->kn_data > 0);
 410 }
 411
 412 static void
 413 filt_fifowdetach(struct knote *kn)
 414 {
 415         struct socket *so = (struct socket *)kn->kn_hook;
 416
 417         ssb_remove_knote(&so->so_snd, kn);
 418 }
 419
 420 static int
 421 filt_fifowrite(struct knote *kn, long hint)
 422 {
 423         struct socket *so = (struct socket *)kn->kn_hook;
 424
 425         kn->kn_data = ssb_space(&so->so_snd);
 426         if (so->so_state & SS_CANTSENDMORE) {
 427                 kn->kn_flags |= EV_EOF;
 428                 return (1);
 429         }
 430         kn->kn_flags &= ~EV_EOF;
 431         return (kn->kn_data >= so->so_snd.ssb_lowat);
 432 }
 433
 434 /*
 435  * fifo_poll(struct vnode *a_vp, int a_events, struct ucred *a_cred)
 436  */
 437 /* ARGSUSED */
 438 static int
 439 fifo_poll(struct vop_poll_args *ap)
 440 {
 441         struct file filetmp;
 442         int events, revents = 0;
 443
 444         events = ap->a_events &
 445                 (POLLIN | POLLINIGNEOF | POLLPRI | POLLRDNORM | POLLRDBAND);
 446         if (events) {
 447                 /*
 448                  * If POLLIN or POLLRDNORM is requested and POLLINIGNEOF is
 449                  * not, then convert the first two to the last one.  This
 450                  * tells the socket poll function to ignore EOF so that we
 451                  * block if there is no writer (and no data).  Callers can
 452                  * set POLLINIGNEOF to get non-blocking behavior.
 453                  */
 454                 if (events & (POLLIN | POLLRDNORM) &&
 455                         !(events & POLLINIGNEOF)) {
 456                         events &= ~(POLLIN | POLLRDNORM);
 457                         events |= POLLINIGNEOF;
 458                 }
 459
 460                 filetmp.f_data = ap->a_vp->v_fifoinfo->fi_readsock;
 461                 if (filetmp.f_data)
 462                         revents |= soo_poll(&filetmp, events, ap->a_cred);
 463
 464                 /* Reverse the above conversion. */
 465                 if ((revents & POLLINIGNEOF) &&
 466                         !(ap->a_events & POLLINIGNEOF)) {
 467                         revents |= (ap->a_events & (POLLIN | POLLRDNORM));
 468                         revents &= ~POLLINIGNEOF;
 469                 }
 470         }
 471         events = ap->a_events & (POLLOUT | POLLWRNORM | POLLWRBAND);
 472         if (events) {
 473                 filetmp.f_data = ap->a_vp->v_fifoinfo->fi_writesock;
 474                 if (filetmp.f_data)
 475                         revents |= soo_poll(&filetmp, events, ap->a_cred);
 476         }
 477         return (revents);
 478 }
 479
 480 /*
 481  * fifo_inactive(struct vnode *a_vp)
 482  */
 483 static int
 484 fifo_inactive(struct vop_inactive_args *ap)
 485 {
 486         return (0);
 487 }
 488
 489 /*
 490  * This is a noop, simply returning what one has been given.
 491  *
 492  * fifo_bmap(struct vnode *a_vp, off_t a_loffset,
 493  *           off_t *a_doffsetp, int *a_runp, int *a_runb)
 494  */
 495 static int
 496 fifo_bmap(struct vop_bmap_args *ap)
 497 {
 498         if (ap->a_doffsetp != NULL)
 499                 *ap->a_doffsetp = ap->a_loffset;
 500         if (ap->a_runp != NULL)
 501                 *ap->a_runp = 0;
 502         if (ap->a_runb != NULL)
 503                 *ap->a_runb = 0;
 504         return (0);
 505 }
 506
 507 /*
 508  * Device close routine
 509  *
 510  * fifo_close(struct vnode *a_vp, int a_fflag)
 511  */
 512 /* ARGSUSED */
 513 static int
 514 fifo_close(struct vop_close_args *ap)
 515 {
 516         struct vnode *vp = ap->a_vp;
 517         struct fifoinfo *fip = vp->v_fifoinfo;
 518         int error1, error2;
 519
 520         if (ap->a_fflag & FREAD) {
 521                 fip->fi_readers--;
 522                 if (fip->fi_readers == 0)
 523                         socantsendmore(fip->fi_writesock);
 524         }
 525         if (ap->a_fflag & FWRITE) {
 526                 fip->fi_writers--;
 527                 if (fip->fi_writers == 0)
 528                         socantrcvmore(fip->fi_readsock);
 529         }
 530         if (vp->v_sysref.refcnt > 1) {
 531                 vop_stdclose(ap);
 532                 return (0);
 533         }
 534         error1 = soclose(fip->fi_readsock, FNONBLOCK);
 535         error2 = soclose(fip->fi_writesock, FNONBLOCK);
 536         FREE(fip, M_FIFOINFO);
 537         vp->v_fifoinfo = NULL;
 538         if (error1)
 539                 return (error1);
 540         vop_stdclose(ap);
 541         return (error2);
 542 }
 543
 544
 545 /*
 546  * Print out internal contents of a fifo vnode.
 547  */
 548 int
 549 fifo_printinfo(struct vnode *vp)
 550 {
 551         struct fifoinfo *fip = vp->v_fifoinfo;
 552
 553         kprintf(", fifo with %ld readers and %ld writers",
 554                 fip->fi_readers, fip->fi_writers);
 555         return (0);
 556 }
 557
 558 /*
 559  * Print out the contents of a fifo vnode.
 560  *
 561  * fifo_print(struct vnode *a_vp)
 562  */
 563 static int
 564 fifo_print(struct vop_print_args *ap)
 565 {
 566         kprintf("tag VT_NON");
 567         fifo_printinfo(ap->a_vp);
 568         kprintf("\n");
 569         return (0);
 570 }
 571
 572 /*
 573  * Return POSIX pathconf information applicable to fifo's.
 574  *
 575  * fifo_pathconf(struct vnode *a_vp, int a_name, int *a_retval)
 576  */
 577 int
 578 fifo_pathconf(struct vop_pathconf_args *ap)
 579 {
 580         switch (ap->a_name) {
 581         case _PC_LINK_MAX:
 582                 *ap->a_retval = LINK_MAX;
 583                 return (0);
 584         case _PC_PIPE_BUF:
 585                 *ap->a_retval = PIPE_BUF;
 586                 return (0);
 587         case _PC_CHOWN_RESTRICTED:
 588                 *ap->a_retval = 1;
 589                 return (0);
 590         default:
 591                 return (EINVAL);
 592         }
 593         /* NOTREACHED */
 594 }
 595
 596 /*
 597  * Fifo advisory byte-level locks.
 598  *
 599  * fifo_advlock(struct vnode *a_vp, caddr_t a_id, int a_op, struct flock *a_fl,
 600  *              int a_flags)
 601  */
 602 /* ARGSUSED */
 603 static int
 604 fifo_advlock(struct vop_advlock_args *ap)
 605 {
 606         return ((ap->a_flags & F_POSIX) ? EINVAL : EOPNOTSUPP);
 607 }
 608
 609 /*
 610  * Fifo bad operation
 611  */
 612 static int
 613 fifo_badop(void)
 614 {
 615         panic("fifo_badop called");
 616         /* NOTREACHED */
 617 }