reiserfs: truncate blocks not used by a write
[sfrench/cifs-2.6.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         int ret = -ENOENT;
781
782         mutex_lock(&inode->i_mutex);
783
784         if (inode->i_pipe) {
785                 ret = 0;
786                 inode->i_pipe->readers++;
787         }
788
789         mutex_unlock(&inode->i_mutex);
790
791         return ret;
792 }
793
794 static int
795 pipe_write_open(struct inode *inode, struct file *filp)
796 {
797         int ret = -ENOENT;
798
799         mutex_lock(&inode->i_mutex);
800
801         if (inode->i_pipe) {
802                 ret = 0;
803                 inode->i_pipe->writers++;
804         }
805
806         mutex_unlock(&inode->i_mutex);
807
808         return ret;
809 }
810
811 static int
812 pipe_rdwr_open(struct inode *inode, struct file *filp)
813 {
814         int ret = -ENOENT;
815
816         mutex_lock(&inode->i_mutex);
817
818         if (inode->i_pipe) {
819                 ret = 0;
820                 if (filp->f_mode & FMODE_READ)
821                         inode->i_pipe->readers++;
822                 if (filp->f_mode & FMODE_WRITE)
823                         inode->i_pipe->writers++;
824         }
825
826         mutex_unlock(&inode->i_mutex);
827
828         return ret;
829 }
830
831 /*
832  * The file_operations structs are not static because they
833  * are also used in linux/fs/fifo.c to do operations on FIFOs.
834  *
835  * Pipes reuse fifos' file_operations structs.
836  */
837 const struct file_operations read_pipefifo_fops = {
838         .llseek         = no_llseek,
839         .read           = do_sync_read,
840         .aio_read       = pipe_read,
841         .write          = bad_pipe_w,
842         .poll           = pipe_poll,
843         .unlocked_ioctl = pipe_ioctl,
844         .open           = pipe_read_open,
845         .release        = pipe_read_release,
846         .fasync         = pipe_read_fasync,
847 };
848
849 const struct file_operations write_pipefifo_fops = {
850         .llseek         = no_llseek,
851         .read           = bad_pipe_r,
852         .write          = do_sync_write,
853         .aio_write      = pipe_write,
854         .poll           = pipe_poll,
855         .unlocked_ioctl = pipe_ioctl,
856         .open           = pipe_write_open,
857         .release        = pipe_write_release,
858         .fasync         = pipe_write_fasync,
859 };
860
861 const struct file_operations rdwr_pipefifo_fops = {
862         .llseek         = no_llseek,
863         .read           = do_sync_read,
864         .aio_read       = pipe_read,
865         .write          = do_sync_write,
866         .aio_write      = pipe_write,
867         .poll           = pipe_poll,
868         .unlocked_ioctl = pipe_ioctl,
869         .open           = pipe_rdwr_open,
870         .release        = pipe_rdwr_release,
871         .fasync         = pipe_rdwr_fasync,
872 };
873
874 struct pipe_inode_info * alloc_pipe_info(struct inode *inode)
875 {
876         struct pipe_inode_info *pipe;
877
878         pipe = kzalloc(sizeof(struct pipe_inode_info), GFP_KERNEL);
879         if (pipe) {
880                 init_waitqueue_head(&pipe->wait);
881                 pipe->r_counter = pipe->w_counter = 1;
882                 pipe->inode = inode;
883         }
884
885         return pipe;
886 }
887
888 void __free_pipe_info(struct pipe_inode_info *pipe)
889 {
890         int i;
891
892         for (i = 0; i < PIPE_BUFFERS; i++) {
893                 struct pipe_buffer *buf = pipe->bufs + i;
894                 if (buf->ops)
895                         buf->ops->release(pipe, buf);
896         }
897         if (pipe->tmp_page)
898                 __free_page(pipe->tmp_page);
899         kfree(pipe);
900 }
901
902 void free_pipe_info(struct inode *inode)
903 {
904         __free_pipe_info(inode->i_pipe);
905         inode->i_pipe = NULL;
906 }
907
908 static struct vfsmount *pipe_mnt __read_mostly;
909
910 /*
911  * pipefs_dname() is called from d_path().
912  */
913 static char *pipefs_dname(struct dentry *dentry, char *buffer, int buflen)
914 {
915         return dynamic_dname(dentry, buffer, buflen, "pipe:[%lu]",
916                                 dentry->d_inode->i_ino);
917 }
918
919 static const struct dentry_operations pipefs_dentry_operations = {
920         .d_dname        = pipefs_dname,
921 };
922
923 static struct inode * get_pipe_inode(void)
924 {
925         struct inode *inode = new_inode(pipe_mnt->mnt_sb);
926         struct pipe_inode_info *pipe;
927
928         if (!inode)
929                 goto fail_inode;
930
931         pipe = alloc_pipe_info(inode);
932         if (!pipe)
933                 goto fail_iput;
934         inode->i_pipe = pipe;
935
936         pipe->readers = pipe->writers = 1;
937         inode->i_fop = &rdwr_pipefifo_fops;
938
939         /*
940          * Mark the inode dirty from the very beginning,
941          * that way it will never be moved to the dirty
942          * list because "mark_inode_dirty()" will think
943          * that it already _is_ on the dirty list.
944          */
945         inode->i_state = I_DIRTY;
946         inode->i_mode = S_IFIFO | S_IRUSR | S_IWUSR;
947         inode->i_uid = current_fsuid();
948         inode->i_gid = current_fsgid();
949         inode->i_atime = inode->i_mtime = inode->i_ctime = CURRENT_TIME;
950
951         return inode;
952
953 fail_iput:
954         iput(inode);
955
956 fail_inode:
957         return NULL;
958 }
959
960 struct file *create_write_pipe(int flags)
961 {
962         int err;
963         struct inode *inode;
964         struct file *f;
965         struct path path;
966         struct qstr name = { .name = "" };
967
968         err = -ENFILE;
969         inode = get_pipe_inode();
970         if (!inode)
971                 goto err;
972
973         err = -ENOMEM;
974         path.dentry = d_alloc(pipe_mnt->mnt_sb->s_root, &name);
975         if (!path.dentry)
976                 goto err_inode;
977         path.mnt = mntget(pipe_mnt);
978
979         path.dentry->d_op = &pipefs_dentry_operations;
980         d_instantiate(path.dentry, inode);
981
982         err = -ENFILE;
983         f = alloc_file(&path, FMODE_WRITE, &write_pipefifo_fops);
984         if (!f)
985                 goto err_dentry;
986         f->f_mapping = inode->i_mapping;
987
988         f->f_flags = O_WRONLY | (flags & O_NONBLOCK);
989         f->f_version = 0;
990
991         return f;
992
993  err_dentry:
994         free_pipe_info(inode);
995         path_put(&path);
996         return ERR_PTR(err);
997
998  err_inode:
999         free_pipe_info(inode);
1000         iput(inode);
1001  err:
1002         return ERR_PTR(err);
1003 }
1004
1005 void free_write_pipe(struct file *f)
1006 {
1007         free_pipe_info(f->f_dentry->d_inode);
1008         path_put(&f->f_path);
1009         put_filp(f);
1010 }
1011
1012 struct file *create_read_pipe(struct file *wrf, int flags)
1013 {
1014         /* Grab pipe from the writer */
1015         struct file *f = alloc_file(&wrf->f_path, FMODE_READ,
1016                                     &read_pipefifo_fops);
1017         if (!f)
1018                 return ERR_PTR(-ENFILE);
1019
1020         path_get(&wrf->f_path);
1021         f->f_flags = O_RDONLY | (flags & O_NONBLOCK);
1022
1023         return f;
1024 }
1025
1026 int do_pipe_flags(int *fd, int flags)
1027 {
1028         struct file *fw, *fr;
1029         int error;
1030         int fdw, fdr;
1031
1032         if (flags & ~(O_CLOEXEC | O_NONBLOCK))
1033                 return -EINVAL;
1034
1035         fw = create_write_pipe(flags);
1036         if (IS_ERR(fw))
1037                 return PTR_ERR(fw);
1038         fr = create_read_pipe(fw, flags);
1039         error = PTR_ERR(fr);
1040         if (IS_ERR(fr))
1041                 goto err_write_pipe;
1042
1043         error = get_unused_fd_flags(flags);
1044         if (error < 0)
1045                 goto err_read_pipe;
1046         fdr = error;
1047
1048         error = get_unused_fd_flags(flags);
1049         if (error < 0)
1050                 goto err_fdr;
1051         fdw = error;
1052
1053         audit_fd_pair(fdr, fdw);
1054         fd_install(fdr, fr);
1055         fd_install(fdw, fw);
1056         fd[0] = fdr;
1057         fd[1] = fdw;
1058
1059         return 0;
1060
1061  err_fdr:
1062         put_unused_fd(fdr);
1063  err_read_pipe:
1064         path_put(&fr->f_path);
1065         put_filp(fr);
1066  err_write_pipe:
1067         free_write_pipe(fw);
1068         return error;
1069 }
1070
1071 /*
1072  * sys_pipe() is the normal C calling standard for creating
1073  * a pipe. It's not the way Unix traditionally does this, though.
1074  */
1075 SYSCALL_DEFINE2(pipe2, int __user *, fildes, int, flags)
1076 {
1077         int fd[2];
1078         int error;
1079
1080         error = do_pipe_flags(fd, flags);
1081         if (!error) {
1082                 if (copy_to_user(fildes, fd, sizeof(fd))) {
1083                         sys_close(fd[0]);
1084                         sys_close(fd[1]);
1085                         error = -EFAULT;
1086                 }
1087         }
1088         return error;
1089 }
1090
1091 SYSCALL_DEFINE1(pipe, int __user *, fildes)
1092 {
1093         return sys_pipe2(fildes, 0);
1094 }
1095
1096 /*
1097  * pipefs should _never_ be mounted by userland - too much of security hassle,
1098  * no real gain from having the whole whorehouse mounted. So we don't need
1099  * any operations on the root directory. However, we need a non-trivial
1100  * d_name - pipe: will go nicely and kill the special-casing in procfs.
1101  */
1102 static int pipefs_get_sb(struct file_system_type *fs_type,
1103                          int flags, const char *dev_name, void *data,
1104                          struct vfsmount *mnt)
1105 {
1106         return get_sb_pseudo(fs_type, "pipe:", NULL, PIPEFS_MAGIC, mnt);
1107 }
1108
1109 static struct file_system_type pipe_fs_type = {
1110         .name           = "pipefs",
1111         .get_sb         = pipefs_get_sb,
1112         .kill_sb        = kill_anon_super,
1113 };
1114
1115 static int __init init_pipe_fs(void)
1116 {
1117         int err = register_filesystem(&pipe_fs_type);
1118
1119         if (!err) {
1120                 pipe_mnt = kern_mount(&pipe_fs_type);
1121                 if (IS_ERR(pipe_mnt)) {
1122                         err = PTR_ERR(pipe_mnt);
1123                         unregister_filesystem(&pipe_fs_type);
1124                 }
1125         }
1126         return err;
1127 }
1128
1129 static void __exit exit_pipe_fs(void)
1130 {
1131         unregister_filesystem(&pipe_fs_type);
1132         mntput(pipe_mnt);
1133 }
1134
1135 fs_initcall(init_pipe_fs);
1136 module_exit(exit_pipe_fs);