1 /* 2 * Copyright (c) 1990, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * %sccs.include.redist.c% 6 * 7 * @(#)fifo_vnops.c 8.1 (Berkeley) 06/10/93 8 */ 9 10 #include <sys/param.h> 11 #include <sys/proc.h> 12 #include <sys/time.h> 13 #include <sys/namei.h> 14 #include <sys/vnode.h> 15 #include <sys/socket.h> 16 #include <sys/socketvar.h> 17 #include <sys/stat.h> 18 #include <sys/systm.h> 19 #include <sys/ioctl.h> 20 #include <sys/file.h> 21 #include <sys/errno.h> 22 #include <sys/malloc.h> 23 #include <miscfs/fifofs/fifo.h> 24 25 /* 26 * This structure is associated with the FIFO vnode and stores 27 * the state associated with the FIFO. 28 */ 29 struct fifoinfo { 30 struct socket *fi_readsock; 31 struct socket *fi_writesock; 32 long fi_readers; 33 long fi_writers; 34 }; 35 36 int (**fifo_vnodeop_p)(); 37 struct vnodeopv_entry_desc fifo_vnodeop_entries[] = { 38 { &vop_default_desc, vn_default_error }, 39 { &vop_lookup_desc, fifo_lookup }, /* lookup */ 40 { &vop_create_desc, fifo_create }, /* create */ 41 { &vop_mknod_desc, fifo_mknod }, /* mknod */ 42 { &vop_open_desc, fifo_open }, /* open */ 43 { &vop_close_desc, fifo_close }, /* close */ 44 { &vop_access_desc, fifo_access }, /* access */ 45 { &vop_getattr_desc, fifo_getattr }, /* getattr */ 46 { &vop_setattr_desc, fifo_setattr }, /* setattr */ 47 { &vop_read_desc, fifo_read }, /* read */ 48 { &vop_write_desc, fifo_write }, /* write */ 49 { &vop_ioctl_desc, fifo_ioctl }, /* ioctl */ 50 { &vop_select_desc, fifo_select }, /* select */ 51 { &vop_mmap_desc, fifo_mmap }, /* mmap */ 52 { &vop_fsync_desc, fifo_fsync }, /* fsync */ 53 { &vop_seek_desc, fifo_seek }, /* seek */ 54 { &vop_remove_desc, fifo_remove }, /* remove */ 55 { &vop_link_desc, fifo_link }, /* link */ 56 { &vop_rename_desc, fifo_rename }, /* rename */ 57 { &vop_mkdir_desc, fifo_mkdir }, /* mkdir */ 58 { &vop_rmdir_desc, fifo_rmdir }, /* rmdir */ 59 { &vop_symlink_desc, fifo_symlink }, /* symlink */ 60 { &vop_readdir_desc, fifo_readdir }, /* readdir */ 61 { &vop_readlink_desc, fifo_readlink }, /* readlink */ 62 { &vop_abortop_desc, fifo_abortop }, /* abortop */ 63 { &vop_inactive_desc, fifo_inactive }, /* inactive */ 64 { &vop_reclaim_desc, fifo_reclaim }, /* reclaim */ 65 { &vop_lock_desc, fifo_lock }, /* lock */ 66 { &vop_unlock_desc, fifo_unlock }, /* unlock */ 67 { &vop_bmap_desc, fifo_bmap }, /* bmap */ 68 { &vop_strategy_desc, fifo_strategy }, /* strategy */ 69 { &vop_print_desc, fifo_print }, /* print */ 70 { &vop_islocked_desc, fifo_islocked }, /* islocked */ 71 { &vop_pathconf_desc, fifo_pathconf }, /* pathconf */ 72 { &vop_advlock_desc, fifo_advlock }, /* advlock */ 73 { &vop_blkatoff_desc, fifo_blkatoff }, /* blkatoff */ 74 { &vop_valloc_desc, fifo_valloc }, /* valloc */ 75 { &vop_vfree_desc, fifo_vfree }, /* vfree */ 76 { &vop_truncate_desc, fifo_truncate }, /* truncate */ 77 { &vop_update_desc, fifo_update }, /* update */ 78 { &vop_bwrite_desc, fifo_bwrite }, /* bwrite */ 79 { (struct vnodeop_desc*)NULL, (int(*)())NULL } 80 }; 81 struct vnodeopv_desc fifo_vnodeop_opv_desc = 82 { &fifo_vnodeop_p, fifo_vnodeop_entries }; 83 84 /* 85 * Trivial lookup routine that always fails. 86 */ 87 /* ARGSUSED */ 88 fifo_lookup(ap) 89 struct vop_lookup_args /* { 90 struct vnode * a_dvp; 91 struct vnode ** a_vpp; 92 struct componentname * a_cnp; 93 } */ *ap; 94 { 95 96 *ap->a_vpp = NULL; 97 return (ENOTDIR); 98 } 99 100 /* 101 * Open called to set up a new instance of a fifo or 102 * to find an active instance of a fifo. 103 */ 104 /* ARGSUSED */ 105 fifo_open(ap) 106 struct vop_open_args /* { 107 struct vnode *a_vp; 108 int a_mode; 109 struct ucred *a_cred; 110 struct proc *a_p; 111 } */ *ap; 112 { 113 register struct vnode *vp = ap->a_vp; 114 register struct fifoinfo *fip; 115 struct socket *rso, *wso; 116 int error; 117 static char openstr[] = "fifo"; 118 119 if ((ap->a_mode & (FREAD|FWRITE)) == (FREAD|FWRITE)) 120 return (EINVAL); 121 if ((fip = vp->v_fifoinfo) == NULL) { 122 MALLOC(fip, struct fifoinfo *, sizeof(*fip), M_VNODE, M_WAITOK); 123 vp->v_fifoinfo = fip; 124 if (error = socreate(AF_UNIX, &rso, SOCK_STREAM, 0)) { 125 free(fip, M_VNODE); 126 vp->v_fifoinfo = NULL; 127 return (error); 128 } 129 fip->fi_readsock = rso; 130 if (error = socreate(AF_UNIX, &wso, SOCK_STREAM, 0)) { 131 (void)soclose(rso); 132 free(fip, M_VNODE); 133 vp->v_fifoinfo = NULL; 134 return (error); 135 } 136 fip->fi_writesock = wso; 137 if (error = unp_connect2(wso, rso)) { 138 (void)soclose(wso); 139 (void)soclose(rso); 140 free(fip, M_VNODE); 141 vp->v_fifoinfo = NULL; 142 return (error); 143 } 144 fip->fi_readers = fip->fi_writers = 0; 145 wso->so_state |= SS_CANTRCVMORE; 146 rso->so_state |= SS_CANTSENDMORE; 147 } 148 error = 0; 149 if (ap->a_mode & FREAD) { 150 fip->fi_readers++; 151 if (fip->fi_readers == 1) { 152 fip->fi_writesock->so_state &= ~SS_CANTSENDMORE; 153 if (fip->fi_writers > 0) 154 wakeup((caddr_t)&fip->fi_writers); 155 } 156 if (ap->a_mode & O_NONBLOCK) 157 return (0); 158 while (fip->fi_writers == 0) { 159 VOP_UNLOCK(vp); 160 error = tsleep((caddr_t)&fip->fi_readers, 161 PCATCH | PSOCK, openstr, 0); 162 VOP_LOCK(vp); 163 if (error) 164 break; 165 } 166 } else { 167 fip->fi_writers++; 168 if (fip->fi_readers == 0 && (ap->a_mode & O_NONBLOCK)) { 169 error = ENXIO; 170 } else { 171 if (fip->fi_writers == 1) { 172 fip->fi_readsock->so_state &= ~SS_CANTRCVMORE; 173 if (fip->fi_readers > 0) 174 wakeup((caddr_t)&fip->fi_readers); 175 } 176 while (fip->fi_readers == 0) { 177 VOP_UNLOCK(vp); 178 error = tsleep((caddr_t)&fip->fi_writers, 179 PCATCH | PSOCK, openstr, 0); 180 VOP_LOCK(vp); 181 if (error) 182 break; 183 } 184 } 185 } 186 if (error) 187 VOP_CLOSE(vp, ap->a_mode, ap->a_cred, ap->a_p); 188 return (error); 189 } 190 191 /* 192 * Vnode op for read 193 */ 194 /* ARGSUSED */ 195 fifo_read(ap) 196 struct vop_read_args /* { 197 struct vnode *a_vp; 198 struct uio *a_uio; 199 int a_ioflag; 200 struct ucred *a_cred; 201 } */ *ap; 202 { 203 register struct uio *uio = ap->a_uio; 204 register struct socket *rso = ap->a_vp->v_fifoinfo->fi_readsock; 205 int error, startresid; 206 207 #ifdef DIAGNOSTIC 208 if (uio->uio_rw != UIO_READ) 209 panic("fifo_read mode"); 210 #endif 211 if (uio->uio_resid == 0) 212 return (0); 213 if (ap->a_ioflag & IO_NDELAY) 214 rso->so_state |= SS_NBIO; 215 startresid = uio->uio_resid; 216 VOP_UNLOCK(ap->a_vp); 217 error = soreceive(rso, (struct mbuf **)0, uio, (int *)0, 218 (struct mbuf **)0, (struct mbuf **)0); 219 VOP_LOCK(ap->a_vp); 220 /* 221 * Clear EOF indication after first such return. 222 */ 223 if (uio->uio_resid == startresid) 224 rso->so_state &= ~SS_CANTRCVMORE; 225 if (ap->a_ioflag & IO_NDELAY) 226 rso->so_state &= ~SS_NBIO; 227 return (error); 228 } 229 230 /* 231 * Vnode op for write 232 */ 233 /* ARGSUSED */ 234 fifo_write(ap) 235 struct vop_write_args /* { 236 struct vnode *a_vp; 237 struct uio *a_uio; 238 int a_ioflag; 239 struct ucred *a_cred; 240 } */ *ap; 241 { 242 struct socket *wso = ap->a_vp->v_fifoinfo->fi_writesock; 243 int error; 244 245 #ifdef DIAGNOSTIC 246 if (ap->a_uio->uio_rw != UIO_WRITE) 247 panic("fifo_write mode"); 248 #endif 249 if (ap->a_ioflag & IO_NDELAY) 250 wso->so_state |= SS_NBIO; 251 VOP_UNLOCK(ap->a_vp); 252 error = sosend(wso, (struct mbuf *)0, ap->a_uio, 0, (struct mbuf *)0, 0); 253 VOP_LOCK(ap->a_vp); 254 if (ap->a_ioflag & IO_NDELAY) 255 wso->so_state &= ~SS_NBIO; 256 return (error); 257 } 258 259 /* 260 * Device ioctl operation. 261 */ 262 /* ARGSUSED */ 263 fifo_ioctl(ap) 264 struct vop_ioctl_args /* { 265 struct vnode *a_vp; 266 int a_command; 267 caddr_t a_data; 268 int a_fflag; 269 struct ucred *a_cred; 270 struct proc *a_p; 271 } */ *ap; 272 { 273 struct file filetmp; 274 int error; 275 276 if (ap->a_command == FIONBIO) 277 return (0); 278 if (ap->a_fflag & FREAD) 279 filetmp.f_data = (caddr_t)ap->a_vp->v_fifoinfo->fi_readsock; 280 else 281 filetmp.f_data = (caddr_t)ap->a_vp->v_fifoinfo->fi_writesock; 282 return (soo_ioctl(&filetmp, ap->a_command, ap->a_data, ap->a_p)); 283 } 284 285 /* ARGSUSED */ 286 fifo_select(ap) 287 struct vop_select_args /* { 288 struct vnode *a_vp; 289 int a_which; 290 int a_fflags; 291 struct ucred *a_cred; 292 struct proc *a_p; 293 } */ *ap; 294 { 295 struct file filetmp; 296 int error; 297 298 if (ap->a_fflags & FREAD) 299 filetmp.f_data = (caddr_t)ap->a_vp->v_fifoinfo->fi_readsock; 300 else 301 filetmp.f_data = (caddr_t)ap->a_vp->v_fifoinfo->fi_writesock; 302 return (soo_select(&filetmp, ap->a_which, ap->a_p)); 303 } 304 305 /* 306 * This is a noop, simply returning what one has been given. 307 */ 308 fifo_bmap(ap) 309 struct vop_bmap_args /* { 310 struct vnode *a_vp; 311 daddr_t a_bn; 312 struct vnode **a_vpp; 313 daddr_t *a_bnp; 314 } */ *ap; 315 { 316 317 if (ap->a_vpp != NULL) 318 *ap->a_vpp = ap->a_vp; 319 if (ap->a_bnp != NULL) 320 *ap->a_bnp = ap->a_bn; 321 return (0); 322 } 323 324 /* 325 * At the moment we do not do any locking. 326 */ 327 /* ARGSUSED */ 328 fifo_lock(ap) 329 struct vop_lock_args /* { 330 struct vnode *a_vp; 331 } */ *ap; 332 { 333 334 return (0); 335 } 336 337 /* ARGSUSED */ 338 fifo_unlock(ap) 339 struct vop_unlock_args /* { 340 struct vnode *a_vp; 341 } */ *ap; 342 { 343 344 return (0); 345 } 346 347 /* 348 * Device close routine 349 */ 350 /* ARGSUSED */ 351 fifo_close(ap) 352 struct vop_close_args /* { 353 struct vnode *a_vp; 354 int a_fflag; 355 struct ucred *a_cred; 356 struct proc *a_p; 357 } */ *ap; 358 { 359 register struct vnode *vp = ap->a_vp; 360 register struct fifoinfo *fip = vp->v_fifoinfo; 361 int error1, error2; 362 363 if (ap->a_fflag & FWRITE) { 364 fip->fi_writers--; 365 if (fip->fi_writers == 0) 366 socantrcvmore(fip->fi_readsock); 367 } else { 368 fip->fi_readers--; 369 if (fip->fi_readers == 0) 370 socantsendmore(fip->fi_writesock); 371 } 372 if (vp->v_usecount > 1) 373 return (0); 374 error1 = soclose(fip->fi_readsock); 375 error2 = soclose(fip->fi_writesock); 376 FREE(fip, M_VNODE); 377 vp->v_fifoinfo = NULL; 378 if (error1) 379 return (error1); 380 return (error2); 381 } 382 383 /* 384 * Print out the contents of a fifo vnode. 385 */ 386 fifo_print(ap) 387 struct vop_print_args /* { 388 struct vnode *a_vp; 389 } */ *ap; 390 { 391 392 printf("tag VT_NON"); 393 fifo_printinfo(ap->a_vp); 394 printf("\n"); 395 } 396 397 /* 398 * Print out internal contents of a fifo vnode. 399 */ 400 fifo_printinfo(vp) 401 struct vnode *vp; 402 { 403 register struct fifoinfo *fip = vp->v_fifoinfo; 404 405 printf(", fifo with %d readers and %d writers", 406 fip->fi_readers, fip->fi_writers); 407 } 408 409 /* 410 * Return POSIX pathconf information applicable to fifo's. 411 */ 412 fifo_pathconf(ap) 413 struct vop_pathconf_args /* { 414 struct vnode *a_vp; 415 int a_name; 416 int *a_retval; 417 } */ *ap; 418 { 419 420 switch (ap->a_name) { 421 case _PC_LINK_MAX: 422 *ap->a_retval = LINK_MAX; 423 return (0); 424 case _PC_PIPE_BUF: 425 *ap->a_retval = PIPE_BUF; 426 return (0); 427 case _PC_CHOWN_RESTRICTED: 428 *ap->a_retval = 1; 429 return (0); 430 default: 431 return (EINVAL); 432 } 433 /* NOTREACHED */ 434 } 435 436 /* 437 * Fifo failed operation 438 */ 439 fifo_ebadf() 440 { 441 442 return (EBADF); 443 } 444 445 /* 446 * Fifo advisory byte-level locks. 447 */ 448 /* ARGSUSED */ 449 fifo_advlock(ap) 450 struct vop_advlock_args /* { 451 struct vnode *a_vp; 452 caddr_t a_id; 453 int a_op; 454 struct flock *a_fl; 455 int a_flags; 456 } */ *ap; 457 { 458 459 return (EOPNOTSUPP); 460 } 461 462 /* 463 * Fifo bad operation 464 */ 465 fifo_badop() 466 { 467 468 panic("fifo_badop called"); 469 /* NOTREACHED */ 470 } 471