Merge branch 'x86-mce-for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git...
[pandora-kernel.git] / fs / pipe.c
1 /*
2  *  linux/fs/pipe.c
3  *
4  *  Copyright (C) 1991, 1992, 1999  Linus Torvalds
5  */
6
7 #include <linux/mm.h>
8 #include <linux/file.h>
9 #include <linux/poll.h>
10 #include <linux/slab.h>
11 #include <linux/module.h>
12 #include <linux/init.h>
13 #include <linux/fs.h>
14 #include <linux/mount.h>
15 #include <linux/pipe_fs_i.h>
16 #include <linux/uio.h>
17 #include <linux/highmem.h>
18 #include <linux/pagemap.h>
19 #include <linux/audit.h>
20 #include <linux/syscalls.h>
21
22 #include <asm/uaccess.h>
23 #include <asm/ioctls.h>
24
25 /*
26  * We use a start+len construction, which provides full use of the 
27  * allocated memory.
28  * -- Florian Coosmann (FGC)
29  * 
30  * Reads with count = 0 should always return 0.
31  * -- Julian Bradfield 1999-06-07.
32  *
33  * FIFOs and Pipes now generate SIGIO for both readers and writers.
34  * -- Jeremy Elson <jelson@circlemud.org> 2001-08-16
35  *
36  * pipe_read & write cleanup
37  * -- Manfred Spraul <manfred@colorfullife.com> 2002-05-09
38  */
39
40 static void pipe_lock_nested(struct pipe_inode_info *pipe, int subclass)
41 {
42         if (pipe->inode)
43                 mutex_lock_nested(&pipe->inode->i_mutex, subclass);
44 }
45
46 void pipe_lock(struct pipe_inode_info *pipe)
47 {
48         /*
49          * pipe_lock() nests non-pipe inode locks (for writing to a file)
50          */
51         pipe_lock_nested(pipe, I_MUTEX_PARENT);
52 }
53 EXPORT_SYMBOL(pipe_lock);
54
55 void pipe_unlock(struct pipe_inode_info *pipe)
56 {
57         if (pipe->inode)
58                 mutex_unlock(&pipe->inode->i_mutex);
59 }
60 EXPORT_SYMBOL(pipe_unlock);
61
62 void pipe_double_lock(struct pipe_inode_info *pipe1,
63                       struct pipe_inode_info *pipe2)
64 {
65         BUG_ON(pipe1 == pipe2);
66
67         if (pipe1 < pipe2) {
68                 pipe_lock_nested(pipe1, I_MUTEX_PARENT);
69                 pipe_lock_nested(pipe2, I_MUTEX_CHILD);
70         } else {
71                 pipe_lock_nested(pipe2, I_MUTEX_PARENT);
72                 pipe_lock_nested(pipe1, I_MUTEX_CHILD);
73         }
74 }
75
76 /* Drop the inode semaphore and wait for a pipe event, atomically */
77 void pipe_wait(struct pipe_inode_info *pipe)
78 {
79         DEFINE_WAIT(wait);
80
81         /*
82          * Pipes are system-local resources, so sleeping on them
83          * is considered a noninteractive wait:
84          */
85         prepare_to_wait(&pipe->wait, &wait, TASK_INTERRUPTIBLE);
86         pipe_unlock(pipe);
87         schedule();
88         finish_wait(&pipe->wait, &wait);
89         pipe_lock(pipe);
90 }
91
92 static int
93 pipe_iov_copy_from_user(void *to, struct iovec *iov, unsigned long len,
94                         int atomic)
95 {
96         unsigned long copy;
97
98         while (len > 0) {
99                 while (!iov->iov_len)
100                         iov++;
101                 copy = min_t(unsigned long, len, iov->iov_len);
102
103                 if (atomic) {
104                         if (__copy_from_user_inatomic(to, iov->iov_base, copy))
105                                 return -EFAULT;
106                 } else {
107                         if (copy_from_user(to, iov->iov_base, copy))
108                                 return -EFAULT;
109                 }
110                 to += copy;
111                 len -= copy;
112                 iov->iov_base += copy;
113                 iov->iov_len -= copy;
114         }
115         return 0;
116 }
117
118 static int
119 pipe_iov_copy_to_user(struct iovec *iov, const void *from, unsigned long len,
120                       int atomic)
121 {
122         unsigned long copy;
123
124         while (len > 0) {
125                 while (!iov->iov_len)
126                         iov++;
127                 copy = min_t(unsigned long, len, iov->iov_len);
128
129                 if (atomic) {
130                         if (__copy_to_user_inatomic(iov->iov_base, from, copy))
131                                 return -EFAULT;
132                 } else {
133                         if (copy_to_user(iov->iov_base, from, copy))
134                                 return -EFAULT;
135                 }
136                 from += copy;
137                 len -= copy;
138                 iov->iov_base += copy;
139                 iov->iov_len -= copy;
140         }
141         return 0;
142 }
143
144 /*
145  * Attempt to pre-fault in the user memory, so we can use atomic copies.
146  * Returns the number of bytes not faulted in.
147  */
148 static int iov_fault_in_pages_write(struct iovec *iov, unsigned long len)
149 {
150         while (!iov->iov_len)
151                 iov++;
152
153         while (len > 0) {
154                 unsigned long this_len;
155
156                 this_len = min_t(unsigned long, len, iov->iov_len);
157                 if (fault_in_pages_writeable(iov->iov_base, this_len))
158                         break;
159
160                 len -= this_len;
161                 iov++;
162         }
163
164         return len;
165 }
166
167 /*
168  * Pre-fault in the user memory, so we can use atomic copies.
169  */
170 static void iov_fault_in_pages_read(struct iovec *iov, unsigned long len)
171 {
172         while (!iov->iov_len)
173                 iov++;
174
175         while (len > 0) {
176                 unsigned long this_len;
177
178                 this_len = min_t(unsigned long, len, iov->iov_len);
179                 fault_in_pages_readable(iov->iov_base, this_len);
180                 len -= this_len;
181                 iov++;
182         }
183 }
184
185 static void anon_pipe_buf_release(struct pipe_inode_info *pipe,
186                                   struct pipe_buffer *buf)
187 {
188         struct page *page = buf->page;
189
190         /*
191          * If nobody else uses this page, and we don't already have a
192          * temporary page, let's keep track of it as a one-deep
193          * allocation cache. (Otherwise just release our reference to it)
194          */
195         if (page_count(page) == 1 && !pipe->tmp_page)
196                 pipe->tmp_page = page;
197         else
198                 page_cache_release(page);
199 }
200
201 /**
202  * generic_pipe_buf_map - virtually map a pipe buffer
203  * @pipe:       the pipe that the buffer belongs to
204  * @buf:        the buffer that should be mapped
205  * @atomic:     whether to use an atomic map
206  *
207  * Description:
208  *      This function returns a kernel virtual address mapping for the
209  *      pipe_buffer passed in @buf. If @atomic is set, an atomic map is provided
210  *      and the caller has to be careful not to fault before calling
211  *      the unmap function.
212  *
213  *      Note that this function occupies KM_USER0 if @atomic != 0.
214  */
215 void *generic_pipe_buf_map(struct pipe_inode_info *pipe,
216                            struct pipe_buffer *buf, int atomic)
217 {
218         if (atomic) {
219                 buf->flags |= PIPE_BUF_FLAG_ATOMIC;
220                 return kmap_atomic(buf->page, KM_USER0);
221         }
222
223         return kmap(buf->page);
224 }
225
226 /**
227  * generic_pipe_buf_unmap - unmap a previously mapped pipe buffer
228  * @pipe:       the pipe that the buffer belongs to
229  * @buf:        the buffer that should be unmapped
230  * @map_data:   the data that the mapping function returned
231  *
232  * Description:
233  *      This function undoes the mapping that ->map() provided.
234  */
235 void generic_pipe_buf_unmap(struct pipe_inode_info *pipe,
236                             struct pipe_buffer *buf, void *map_data)
237 {
238         if (buf->flags & PIPE_BUF_FLAG_ATOMIC) {
239                 buf->flags &= ~PIPE_BUF_FLAG_ATOMIC;
240                 kunmap_atomic(map_data, KM_USER0);
241         } else
242                 kunmap(buf->page);
243 }
244
245 /**
246  * generic_pipe_buf_steal - attempt to take ownership of a &pipe_buffer
247  * @pipe:       the pipe that the buffer belongs to
248  * @buf:        the buffer to attempt to steal
249  *
250  * Description:
251  *      This function attempts to steal the &struct page attached to
252  *      @buf. If successful, this function returns 0 and returns with
253  *      the page locked. The caller may then reuse the page for whatever
254  *      he wishes; the typical use is insertion into a different file
255  *      page cache.
256  */
257 int generic_pipe_buf_steal(struct pipe_inode_info *pipe,
258                            struct pipe_buffer *buf)
259 {
260         struct page *page = buf->page;
261
262         /*
263          * A reference of one is golden, that means that the owner of this
264          * page is the only one holding a reference to it. lock the page
265          * and return OK.
266          */
267         if (page_count(page) == 1) {
268                 lock_page(page);
269                 return 0;
270         }
271
272         return 1;
273 }
274
275 /**
276  * generic_pipe_buf_get - get a reference to a &struct pipe_buffer
277  * @pipe:       the pipe that the buffer belongs to
278  * @buf:        the buffer to get a reference to
279  *
280  * Description:
281  *      This function grabs an extra reference to @buf. It's used in
282  *      in the tee() system call, when we duplicate the buffers in one
283  *      pipe into another.
284  */
285 void generic_pipe_buf_get(struct pipe_inode_info *pipe, struct pipe_buffer *buf)
286 {
287         page_cache_get(buf->page);
288 }
289
290 /**
291  * generic_pipe_buf_confirm - verify contents of the pipe buffer
292  * @info:       the pipe that the buffer belongs to
293  * @buf:        the buffer to confirm
294  *
295  * Description:
296  *      This function does nothing, because the generic pipe code uses
297  *      pages that are always good when inserted into the pipe.
298  */
299 int generic_pipe_buf_confirm(struct pipe_inode_info *info,
300                              struct pipe_buffer *buf)
301 {
302         return 0;
303 }
304
305 /**
306  * generic_pipe_buf_release - put a reference to a &struct pipe_buffer
307  * @pipe:       the pipe that the buffer belongs to
308  * @buf:        the buffer to put a reference to
309  *
310  * Description:
311  *      This function releases a reference to @buf.
312  */
313 void generic_pipe_buf_release(struct pipe_inode_info *pipe,
314                               struct pipe_buffer *buf)
315 {
316         page_cache_release(buf->page);
317 }
318
319 static const struct pipe_buf_operations anon_pipe_buf_ops = {
320         .can_merge = 1,
321         .map = generic_pipe_buf_map,
322         .unmap = generic_pipe_buf_unmap,
323         .confirm = generic_pipe_buf_confirm,
324         .release = anon_pipe_buf_release,
325         .steal = generic_pipe_buf_steal,
326         .get = generic_pipe_buf_get,
327 };
328
329 static ssize_t
330 pipe_read(struct kiocb *iocb, const struct iovec *_iov,
331            unsigned long nr_segs, loff_t pos)
332 {
333         struct file *filp = iocb->ki_filp;
334         struct inode *inode = filp->f_path.dentry->d_inode;
335         struct pipe_inode_info *pipe;
336         int do_wakeup;
337         ssize_t ret;
338         struct iovec *iov = (struct iovec *)_iov;
339         size_t total_len;
340
341         total_len = iov_length(iov, nr_segs);
342         /* Null read succeeds. */
343         if (unlikely(total_len == 0))
344                 return 0;
345
346         do_wakeup = 0;
347         ret = 0;
348         mutex_lock(&inode->i_mutex);
349         pipe = inode->i_pipe;
350         for (;;) {
351                 int bufs = pipe->nrbufs;
352                 if (bufs) {
353                         int curbuf = pipe->curbuf;
354                         struct pipe_buffer *buf = pipe->bufs + curbuf;
355                         const struct pipe_buf_operations *ops = buf->ops;
356                         void *addr;
357                         size_t chars = buf->len;
358                         int error, atomic;
359
360                         if (chars > total_len)
361                                 chars = total_len;
362
363                         error = ops->confirm(pipe, buf);
364                         if (error) {
365                                 if (!ret)
366                                         error = ret;
367                                 break;
368                         }
369
370                         atomic = !iov_fault_in_pages_write(iov, chars);
371 redo:
372                         addr = ops->map(pipe, buf, atomic);
373                         error = pipe_iov_copy_to_user(iov, addr + buf->offset, chars, atomic);
374                         ops->unmap(pipe, buf, addr);
375                         if (unlikely(error)) {
376                                 /*
377                                  * Just retry with the slow path if we failed.
378                                  */
379                                 if (atomic) {
380                                         atomic = 0;
381                                         goto redo;
382                                 }
383                                 if (!ret)
384                                         ret = error;
385                                 break;
386                         }
387                         ret += chars;
388                         buf->offset += chars;
389                         buf->len -= chars;
390                         if (!buf->len) {
391                                 buf->ops = NULL;
392                                 ops->release(pipe, buf);
393                                 curbuf = (curbuf + 1) & (PIPE_BUFFERS-1);
394                                 pipe->curbuf = curbuf;
395                                 pipe->nrbufs = --bufs;
396                                 do_wakeup = 1;
397                         }
398                         total_len -= chars;
399                         if (!total_len)
400                                 break;  /* common path: read succeeded */
401                 }
402                 if (bufs)       /* More to do? */
403                         continue;
404                 if (!pipe->writers)
405                         break;
406                 if (!pipe->waiting_writers) {
407                         /* syscall merging: Usually we must not sleep
408                          * if O_NONBLOCK is set, or if we got some data.
409                          * But if a writer sleeps in kernel space, then
410                          * we can wait for that data without violating POSIX.
411                          */
412                         if (ret)
413                                 break;
414                         if (filp->f_flags & O_NONBLOCK) {
415                                 ret = -EAGAIN;
416                                 break;
417                         }
418                 }
419                 if (signal_pending(current)) {
420                         if (!ret)
421                                 ret = -ERESTARTSYS;
422                         break;
423                 }
424                 if (do_wakeup) {
425                         wake_up_interruptible_sync(&pipe->wait);
426                         kill_fasync(&pipe->fasync_writers, SIGIO, POLL_OUT);
427                 }
428                 pipe_wait(pipe);
429         }
430         mutex_unlock(&inode->i_mutex);
431
432         /* Signal writers asynchronously that there is more room. */
433         if (do_wakeup) {
434                 wake_up_interruptible_sync(&pipe->wait);
435                 kill_fasync(&pipe->fasync_writers, SIGIO, POLL_OUT);
436         }
437         if (ret > 0)
438                 file_accessed(filp);
439         return ret;
440 }
441
442 static ssize_t
443 pipe_write(struct kiocb *iocb, const struct iovec *_iov,
444             unsigned long nr_segs, loff_t ppos)
445 {
446         struct file *filp = iocb->ki_filp;
447         struct inode *inode = filp->f_path.dentry->d_inode;
448         struct pipe_inode_info *pipe;
449         ssize_t ret;
450         int do_wakeup;
451         struct iovec *iov = (struct iovec *)_iov;
452         size_t total_len;
453         ssize_t chars;
454
455         total_len = iov_length(iov, nr_segs);
456         /* Null write succeeds. */
457         if (unlikely(total_len == 0))
458                 return 0;
459
460         do_wakeup = 0;
461         ret = 0;
462         mutex_lock(&inode->i_mutex);
463         pipe = inode->i_pipe;
464
465         if (!pipe->readers) {
466                 send_sig(SIGPIPE, current, 0);
467                 ret = -EPIPE;
468                 goto out;
469         }
470
471         /* We try to merge small writes */
472         chars = total_len & (PAGE_SIZE-1); /* size of the last buffer */
473         if (pipe->nrbufs && chars != 0) {
474                 int lastbuf = (pipe->curbuf + pipe->nrbufs - 1) &
475                                                         (PIPE_BUFFERS-1);
476                 struct pipe_buffer *buf = pipe->bufs + lastbuf;
477                 const struct pipe_buf_operations *ops = buf->ops;
478                 int offset = buf->offset + buf->len;
479
480                 if (ops->can_merge && offset + chars <= PAGE_SIZE) {
481                         int error, atomic = 1;
482                         void *addr;
483
484                         error = ops->confirm(pipe, buf);
485                         if (error)
486                                 goto out;
487
488                         iov_fault_in_pages_read(iov, chars);
489 redo1:
490                         addr = ops->map(pipe, buf, atomic);
491                         error = pipe_iov_copy_from_user(offset + addr, iov,
492                                                         chars, atomic);
493                         ops->unmap(pipe, buf, addr);
494                         ret = error;
495                         do_wakeup = 1;
496                         if (error) {
497                                 if (atomic) {
498                                         atomic = 0;
499                                         goto redo1;
500                                 }
501                                 goto out;
502                         }
503                         buf->len += chars;
504                         total_len -= chars;
505                         ret = chars;
506                         if (!total_len)
507                                 goto out;
508                 }
509         }
510
511         for (;;) {
512                 int bufs;
513
514                 if (!pipe->readers) {
515                         send_sig(SIGPIPE, current, 0);
516                         if (!ret)
517                                 ret = -EPIPE;
518                         break;
519                 }
520                 bufs = pipe->nrbufs;
521                 if (bufs < PIPE_BUFFERS) {
522                         int newbuf = (pipe->curbuf + bufs) & (PIPE_BUFFERS-1);
523                         struct pipe_buffer *buf = pipe->bufs + newbuf;
524                         struct page *page = pipe->tmp_page;
525                         char *src;
526                         int error, atomic = 1;
527
528                         if (!page) {
529                                 page = alloc_page(GFP_HIGHUSER);
530                                 if (unlikely(!page)) {
531                                         ret = ret ? : -ENOMEM;
532                                         break;
533                                 }
534                                 pipe->tmp_page = page;
535                         }
536                         /* Always wake up, even if the copy fails. Otherwise
537                          * we lock up (O_NONBLOCK-)readers that sleep due to
538                          * syscall merging.
539                          * FIXME! Is this really true?
540                          */
541                         do_wakeup = 1;
542                         chars = PAGE_SIZE;
543                         if (chars > total_len)
544                                 chars = total_len;
545
546                         iov_fault_in_pages_read(iov, chars);
547 redo2:
548                         if (atomic)
549                                 src = kmap_atomic(page, KM_USER0);
550                         else
551                                 src = kmap(page);
552
553                         error = pipe_iov_copy_from_user(src, iov, chars,
554                                                         atomic);
555                         if (atomic)
556                                 kunmap_atomic(src, KM_USER0);
557                         else
558                                 kunmap(page);
559
560                         if (unlikely(error)) {
561                                 if (atomic) {
562                                         atomic = 0;
563                                         goto redo2;
564                                 }
565                                 if (!ret)
566                                         ret = error;
567                                 break;
568                         }
569                         ret += chars;
570
571                         /* Insert it into the buffer array */
572                         buf->page = page;
573                         buf->ops = &anon_pipe_buf_ops;
574                         buf->offset = 0;
575                         buf->len = chars;
576                         pipe->nrbufs = ++bufs;
577                         pipe->tmp_page = NULL;
578
579                         total_len -= chars;
580                         if (!total_len)
581                                 break;
582                 }
583                 if (bufs < PIPE_BUFFERS)
584                         continue;
585                 if (filp->f_flags & O_NONBLOCK) {
586                         if (!ret)
587                                 ret = -EAGAIN;
588                         break;
589                 }
590                 if (signal_pending(current)) {
591                         if (!ret)
592                                 ret = -ERESTARTSYS;
593                         break;
594                 }
595                 if (do_wakeup) {
596                         wake_up_interruptible_sync(&pipe->wait);
597                         kill_fasync(&pipe->fasync_readers, SIGIO, POLL_IN);
598                         do_wakeup = 0;
599                 }
600                 pipe->waiting_writers++;
601                 pipe_wait(pipe);
602                 pipe->waiting_writers--;
603         }
604 out:
605         mutex_unlock(&inode->i_mutex);
606         if (do_wakeup) {
607                 wake_up_interruptible_sync(&pipe->wait);
608                 kill_fasync(&pipe->fasync_readers, SIGIO, POLL_IN);
609         }
610         if (ret > 0)
611                 file_update_time(filp);
612         return ret;
613 }
614
615 static ssize_t
616 bad_pipe_r(struct file *filp, char __user *buf, size_t count, loff_t *ppos)
617 {
618         return -EBADF;
619 }
620
621 static ssize_t
622 bad_pipe_w(struct file *filp, const char __user *buf, size_t count,
623            loff_t *ppos)
624 {
625         return -EBADF;
626 }
627
628 static long pipe_ioctl(struct file *filp, unsigned int cmd, unsigned long arg)
629 {
630         struct inode *inode = filp->f_path.dentry->d_inode;
631         struct pipe_inode_info *pipe;
632         int count, buf, nrbufs;
633
634         switch (cmd) {
635                 case FIONREAD:
636                         mutex_lock(&inode->i_mutex);
637                         pipe = inode->i_pipe;
638                         count = 0;
639                         buf = pipe->curbuf;
640                         nrbufs = pipe->nrbufs;
641                         while (--nrbufs >= 0) {
642                                 count += pipe->bufs[buf].len;
643                                 buf = (buf+1) & (PIPE_BUFFERS-1);
644                         }
645                         mutex_unlock(&inode->i_mutex);
646
647                         return put_user(count, (int __user *)arg);
648                 default:
649                         return -EINVAL;
650         }
651 }
652
653 /* No kernel lock held - fine */
654 static unsigned int
655 pipe_poll(struct file *filp, poll_table *wait)
656 {
657         unsigned int mask;
658         struct inode *inode = filp->f_path.dentry->d_inode;
659         struct pipe_inode_info *pipe = inode->i_pipe;
660         int nrbufs;
661
662         poll_wait(filp, &pipe->wait, wait);
663
664         /* Reading only -- no need for acquiring the semaphore.  */
665         nrbufs = pipe->nrbufs;
666         mask = 0;
667         if (filp->f_mode & FMODE_READ) {
668                 mask = (nrbufs > 0) ? POLLIN | POLLRDNORM : 0;
669                 if (!pipe->writers && filp->f_version != pipe->w_counter)
670                         mask |= POLLHUP;
671         }
672
673         if (filp->f_mode & FMODE_WRITE) {
674                 mask |= (nrbufs < PIPE_BUFFERS) ? POLLOUT | POLLWRNORM : 0;
675                 /*
676                  * Most Unices do not set POLLERR for FIFOs but on Linux they
677                  * behave exactly like pipes for poll().
678                  */
679                 if (!pipe->readers)
680                         mask |= POLLERR;
681         }
682
683         return mask;
684 }
685
686 static int
687 pipe_release(struct inode *inode, int decr, int decw)
688 {
689         struct pipe_inode_info *pipe;
690
691         mutex_lock(&inode->i_mutex);
692         pipe = inode->i_pipe;
693         pipe->readers -= decr;
694         pipe->writers -= decw;
695
696         if (!pipe->readers && !pipe->writers) {
697                 free_pipe_info(inode);
698         } else {
699                 wake_up_interruptible_sync(&pipe->wait);
700                 kill_fasync(&pipe->fasync_readers, SIGIO, POLL_IN);
701                 kill_fasync(&pipe->fasync_writers, SIGIO, POLL_OUT);
702         }
703         mutex_unlock(&inode->i_mutex);
704
705         return 0;
706 }
707
708 static int
709 pipe_read_fasync(int fd, struct file *filp, int on)
710 {
711         struct inode *inode = filp->f_path.dentry->d_inode;
712         int retval;
713
714         mutex_lock(&inode->i_mutex);
715         retval = fasync_helper(fd, filp, on, &inode->i_pipe->fasync_readers);
716         mutex_unlock(&inode->i_mutex);
717
718         return retval;
719 }
720
721
722 static int
723 pipe_write_fasync(int fd, struct file *filp, int on)
724 {
725         struct inode *inode = filp->f_path.dentry->d_inode;
726         int retval;
727
728         mutex_lock(&inode->i_mutex);
729         retval = fasync_helper(fd, filp, on, &inode->i_pipe->fasync_writers);
730         mutex_unlock(&inode->i_mutex);
731
732         return retval;
733 }
734
735
736 static int
737 pipe_rdwr_fasync(int fd, struct file *filp, int on)
738 {
739         struct inode *inode = filp->f_path.dentry->d_inode;
740         struct pipe_inode_info *pipe = inode->i_pipe;
741         int retval;
742
743         mutex_lock(&inode->i_mutex);
744         retval = fasync_helper(fd, filp, on, &pipe->fasync_readers);
745         if (retval >= 0) {
746                 retval = fasync_helper(fd, filp, on, &pipe->fasync_writers);
747                 if (retval < 0) /* this can happen only if on == T */
748                         fasync_helper(-1, filp, 0, &pipe->fasync_readers);
749         }
750         mutex_unlock(&inode->i_mutex);
751         return retval;
752 }
753
754
755 static int
756 pipe_read_release(struct inode *inode, struct file *filp)
757 {
758         return pipe_release(inode, 1, 0);
759 }
760
761 static int
762 pipe_write_release(struct inode *inode, struct file *filp)
763 {
764         return pipe_release(inode, 0, 1);
765 }
766
767 static int
768 pipe_rdwr_release(struct inode *inode, struct file *filp)
769 {
770         int decr, decw;
771
772         decr = (filp->f_mode & FMODE_READ) != 0;
773         decw = (filp->f_mode & FMODE_WRITE) != 0;
774         return pipe_release(inode, decr, decw);
775 }
776
777 static int
778 pipe_read_open(struct inode *inode, struct file *filp)
779 {
780         /* We could have perhaps used atomic_t, but this and friends
781            below are the only places.  So it doesn't seem worthwhile.  */
782         mutex_lock(&inode->i_mutex);
783         inode->i_pipe->readers++;
784         mutex_unlock(&inode->i_mutex);
785
786         return 0;
787 }
788
789 static int
790 pipe_write_open(struct inode *inode, struct file *filp)
791 {
792         mutex_lock(&inode->i_mutex);
793         inode->i_pipe->writers++;
794         mutex_unlock(&inode->i_mutex);
795
796         return 0;
797 }
798
799 static int
800 pipe_rdwr_open(struct inode *inode, struct file *filp)
801 {
802         mutex_lock(&inode->i_mutex);
803         if (filp->f_mode & FMODE_READ)
804                 inode->i_pipe->readers++;
805         if (filp->f_mode & FMODE_WRITE)
806                 inode->i_pipe->writers++;
807         mutex_unlock(&inode->i_mutex);
808
809         return 0;
810 }
811
812 /*
813  * The file_operations structs are not static because they
814  * are also used in linux/fs/fifo.c to do operations on FIFOs.
815  *
816  * Pipes reuse fifos' file_operations structs.
817  */
818 const struct file_operations read_pipefifo_fops = {
819         .llseek         = no_llseek,
820         .read           = do_sync_read,
821         .aio_read       = pipe_read,
822         .write          = bad_pipe_w,
823         .poll           = pipe_poll,
824         .unlocked_ioctl = pipe_ioctl,
825         .open           = pipe_read_open,
826         .release        = pipe_read_release,
827         .fasync         = pipe_read_fasync,
828 };
829
830 const struct file_operations write_pipefifo_fops = {
831         .llseek         = no_llseek,
832         .read           = bad_pipe_r,
833         .write          = do_sync_write,
834         .aio_write      = pipe_write,
835         .poll           = pipe_poll,
836         .unlocked_ioctl = pipe_ioctl,
837         .open           = pipe_write_open,
838         .release        = pipe_write_release,
839         .fasync         = pipe_write_fasync,
840 };
841
842 const struct file_operations rdwr_pipefifo_fops = {
843         .llseek         = no_llseek,
844         .read           = do_sync_read,
845         .aio_read       = pipe_read,
846         .write          = do_sync_write,
847         .aio_write      = pipe_write,
848         .poll           = pipe_poll,
849         .unlocked_ioctl = pipe_ioctl,
850         .open           = pipe_rdwr_open,
851         .release        = pipe_rdwr_release,
852         .fasync         = pipe_rdwr_fasync,
853 };
854
855 struct pipe_inode_info * alloc_pipe_info(struct inode *inode)
856 {
857         struct pipe_inode_info *pipe;
858
859         pipe = kzalloc(sizeof(struct pipe_inode_info), GFP_KERNEL);
860         if (pipe) {
861                 init_waitqueue_head(&pipe->wait);
862                 pipe->r_counter = pipe->w_counter = 1;
863                 pipe->inode = inode;
864         }
865
866         return pipe;
867 }
868
869 void __free_pipe_info(struct pipe_inode_info *pipe)
870 {
871         int i;
872
873         for (i = 0; i < PIPE_BUFFERS; i++) {
874                 struct pipe_buffer *buf = pipe->bufs + i;
875                 if (buf->ops)
876                         buf->ops->release(pipe, buf);
877         }
878         if (pipe->tmp_page)
879                 __free_page(pipe->tmp_page);
880         kfree(pipe);
881 }
882
883 void free_pipe_info(struct inode *inode)
884 {
885         __free_pipe_info(inode->i_pipe);
886         inode->i_pipe = NULL;
887 }
888
889 static struct vfsmount *pipe_mnt __read_mostly;
890 static int pipefs_delete_dentry(struct dentry *dentry)
891 {
892         /*
893          * At creation time, we pretended this dentry was hashed
894          * (by clearing DCACHE_UNHASHED bit in d_flags)
895          * At delete time, we restore the truth : not hashed.
896          * (so that dput() can proceed correctly)
897          */
898         dentry->d_flags |= DCACHE_UNHASHED;
899         return 0;
900 }
901
902 /*
903  * pipefs_dname() is called from d_path().
904  */
905 static char *pipefs_dname(struct dentry *dentry, char *buffer, int buflen)
906 {
907         return dynamic_dname(dentry, buffer, buflen, "pipe:[%lu]",
908                                 dentry->d_inode->i_ino);
909 }
910
911 static const struct dentry_operations pipefs_dentry_operations = {
912         .d_delete       = pipefs_delete_dentry,
913         .d_dname        = pipefs_dname,
914 };
915
916 static struct inode * get_pipe_inode(void)
917 {
918         struct inode *inode = new_inode(pipe_mnt->mnt_sb);
919         struct pipe_inode_info *pipe;
920
921         if (!inode)
922                 goto fail_inode;
923
924         pipe = alloc_pipe_info(inode);
925         if (!pipe)
926                 goto fail_iput;
927         inode->i_pipe = pipe;
928
929         pipe->readers = pipe->writers = 1;
930         inode->i_fop = &rdwr_pipefifo_fops;
931
932         /*
933          * Mark the inode dirty from the very beginning,
934          * that way it will never be moved to the dirty
935          * list because "mark_inode_dirty()" will think
936          * that it already _is_ on the dirty list.
937          */
938         inode->i_state = I_DIRTY;
939         inode->i_mode = S_IFIFO | S_IRUSR | S_IWUSR;
940         inode->i_uid = current_fsuid();
941         inode->i_gid = current_fsgid();
942         inode->i_atime = inode->i_mtime = inode->i_ctime = CURRENT_TIME;
943
944         return inode;
945
946 fail_iput:
947         iput(inode);
948
949 fail_inode:
950         return NULL;
951 }
952
953 struct file *create_write_pipe(int flags)
954 {
955         int err;
956         struct inode *inode;
957         struct file *f;
958         struct dentry *dentry;
959         struct qstr name = { .name = "" };
960
961         err = -ENFILE;
962         inode = get_pipe_inode();
963         if (!inode)
964                 goto err;
965
966         err = -ENOMEM;
967         dentry = d_alloc(pipe_mnt->mnt_sb->s_root, &name);
968         if (!dentry)
969                 goto err_inode;
970
971         dentry->d_op = &pipefs_dentry_operations;
972         /*
973          * We dont want to publish this dentry into global dentry hash table.
974          * We pretend dentry is already hashed, by unsetting DCACHE_UNHASHED
975          * This permits a working /proc/$pid/fd/XXX on pipes
976          */
977         dentry->d_flags &= ~DCACHE_UNHASHED;
978         d_instantiate(dentry, inode);
979
980         err = -ENFILE;
981         f = alloc_file(pipe_mnt, dentry, FMODE_WRITE, &write_pipefifo_fops);
982         if (!f)
983                 goto err_dentry;
984         f->f_mapping = inode->i_mapping;
985
986         f->f_flags = O_WRONLY | (flags & O_NONBLOCK);
987         f->f_version = 0;
988
989         return f;
990
991  err_dentry:
992         free_pipe_info(inode);
993         dput(dentry);
994         return ERR_PTR(err);
995
996  err_inode:
997         free_pipe_info(inode);
998         iput(inode);
999  err:
1000         return ERR_PTR(err);
1001 }
1002
1003 void free_write_pipe(struct file *f)
1004 {
1005         free_pipe_info(f->f_dentry->d_inode);
1006         path_put(&f->f_path);
1007         put_filp(f);
1008 }
1009
1010 struct file *create_read_pipe(struct file *wrf, int flags)
1011 {
1012         struct file *f = get_empty_filp();
1013         if (!f)
1014                 return ERR_PTR(-ENFILE);
1015
1016         /* Grab pipe from the writer */
1017         f->f_path = wrf->f_path;
1018         path_get(&wrf->f_path);
1019         f->f_mapping = wrf->f_path.dentry->d_inode->i_mapping;
1020
1021         f->f_pos = 0;
1022         f->f_flags = O_RDONLY | (flags & O_NONBLOCK);
1023         f->f_op = &read_pipefifo_fops;
1024         f->f_mode = FMODE_READ;
1025         f->f_version = 0;
1026
1027         return f;
1028 }
1029
1030 int do_pipe_flags(int *fd, int flags)
1031 {
1032         struct file *fw, *fr;
1033         int error;
1034         int fdw, fdr;
1035
1036         if (flags & ~(O_CLOEXEC | O_NONBLOCK))
1037                 return -EINVAL;
1038
1039         fw = create_write_pipe(flags);
1040         if (IS_ERR(fw))
1041                 return PTR_ERR(fw);
1042         fr = create_read_pipe(fw, flags);
1043         error = PTR_ERR(fr);
1044         if (IS_ERR(fr))
1045                 goto err_write_pipe;
1046
1047         error = get_unused_fd_flags(flags);
1048         if (error < 0)
1049                 goto err_read_pipe;
1050         fdr = error;
1051
1052         error = get_unused_fd_flags(flags);
1053         if (error < 0)
1054                 goto err_fdr;
1055         fdw = error;
1056
1057         audit_fd_pair(fdr, fdw);
1058         fd_install(fdr, fr);
1059         fd_install(fdw, fw);
1060         fd[0] = fdr;
1061         fd[1] = fdw;
1062
1063         return 0;
1064
1065  err_fdr:
1066         put_unused_fd(fdr);
1067  err_read_pipe:
1068         path_put(&fr->f_path);
1069         put_filp(fr);
1070  err_write_pipe:
1071         free_write_pipe(fw);
1072         return error;
1073 }
1074
1075 /*
1076  * sys_pipe() is the normal C calling standard for creating
1077  * a pipe. It's not the way Unix traditionally does this, though.
1078  */
1079 SYSCALL_DEFINE2(pipe2, int __user *, fildes, int, flags)
1080 {
1081         int fd[2];
1082         int error;
1083
1084         error = do_pipe_flags(fd, flags);
1085         if (!error) {
1086                 if (copy_to_user(fildes, fd, sizeof(fd))) {
1087                         sys_close(fd[0]);
1088                         sys_close(fd[1]);
1089                         error = -EFAULT;
1090                 }
1091         }
1092         return error;
1093 }
1094
1095 SYSCALL_DEFINE1(pipe, int __user *, fildes)
1096 {
1097         return sys_pipe2(fildes, 0);
1098 }
1099
1100 /*
1101  * pipefs should _never_ be mounted by userland - too much of security hassle,
1102  * no real gain from having the whole whorehouse mounted. So we don't need
1103  * any operations on the root directory. However, we need a non-trivial
1104  * d_name - pipe: will go nicely and kill the special-casing in procfs.
1105  */
1106 static int pipefs_get_sb(struct file_system_type *fs_type,
1107                          int flags, const char *dev_name, void *data,
1108                          struct vfsmount *mnt)
1109 {
1110         return get_sb_pseudo(fs_type, "pipe:", NULL, PIPEFS_MAGIC, mnt);
1111 }
1112
1113 static struct file_system_type pipe_fs_type = {
1114         .name           = "pipefs",
1115         .get_sb         = pipefs_get_sb,
1116         .kill_sb        = kill_anon_super,
1117 };
1118
1119 static int __init init_pipe_fs(void)
1120 {
1121         int err = register_filesystem(&pipe_fs_type);
1122
1123         if (!err) {
1124                 pipe_mnt = kern_mount(&pipe_fs_type);
1125                 if (IS_ERR(pipe_mnt)) {
1126                         err = PTR_ERR(pipe_mnt);
1127                         unregister_filesystem(&pipe_fs_type);
1128                 }
1129         }
1130         return err;
1131 }
1132
1133 static void __exit exit_pipe_fs(void)
1134 {
1135         unregister_filesystem(&pipe_fs_type);
1136         mntput(pipe_mnt);
1137 }
1138
1139 fs_initcall(init_pipe_fs);
1140 module_exit(exit_pipe_fs);