perf probe: Fix memory leak when synthesizing SDT probes
[linux-2.6-microblaze.git] / lib / iov_iter.c
1 // SPDX-License-Identifier: GPL-2.0-only
2 #include <crypto/hash.h>
3 #include <linux/export.h>
4 #include <linux/bvec.h>
5 #include <linux/fault-inject-usercopy.h>
6 #include <linux/uio.h>
7 #include <linux/pagemap.h>
8 #include <linux/slab.h>
9 #include <linux/vmalloc.h>
10 #include <linux/splice.h>
11 #include <linux/compat.h>
12 #include <net/checksum.h>
13 #include <linux/scatterlist.h>
14 #include <linux/instrumented.h>
15
16 #define PIPE_PARANOIA /* for now */
17
18 #define iterate_iovec(i, n, __v, __p, skip, STEP) {     \
19         size_t left;                                    \
20         size_t wanted = n;                              \
21         __p = i->iov;                                   \
22         __v.iov_len = min(n, __p->iov_len - skip);      \
23         if (likely(__v.iov_len)) {                      \
24                 __v.iov_base = __p->iov_base + skip;    \
25                 left = (STEP);                          \
26                 __v.iov_len -= left;                    \
27                 skip += __v.iov_len;                    \
28                 n -= __v.iov_len;                       \
29         } else {                                        \
30                 left = 0;                               \
31         }                                               \
32         while (unlikely(!left && n)) {                  \
33                 __p++;                                  \
34                 __v.iov_len = min(n, __p->iov_len);     \
35                 if (unlikely(!__v.iov_len))             \
36                         continue;                       \
37                 __v.iov_base = __p->iov_base;           \
38                 left = (STEP);                          \
39                 __v.iov_len -= left;                    \
40                 skip = __v.iov_len;                     \
41                 n -= __v.iov_len;                       \
42         }                                               \
43         n = wanted - n;                                 \
44 }
45
46 #define iterate_kvec(i, n, __v, __p, skip, STEP) {      \
47         size_t wanted = n;                              \
48         __p = i->kvec;                                  \
49         __v.iov_len = min(n, __p->iov_len - skip);      \
50         if (likely(__v.iov_len)) {                      \
51                 __v.iov_base = __p->iov_base + skip;    \
52                 (void)(STEP);                           \
53                 skip += __v.iov_len;                    \
54                 n -= __v.iov_len;                       \
55         }                                               \
56         while (unlikely(n)) {                           \
57                 __p++;                                  \
58                 __v.iov_len = min(n, __p->iov_len);     \
59                 if (unlikely(!__v.iov_len))             \
60                         continue;                       \
61                 __v.iov_base = __p->iov_base;           \
62                 (void)(STEP);                           \
63                 skip = __v.iov_len;                     \
64                 n -= __v.iov_len;                       \
65         }                                               \
66         n = wanted;                                     \
67 }
68
69 #define iterate_bvec(i, n, __v, __bi, skip, STEP) {     \
70         struct bvec_iter __start;                       \
71         __start.bi_size = n;                            \
72         __start.bi_bvec_done = skip;                    \
73         __start.bi_idx = 0;                             \
74         for_each_bvec(__v, i->bvec, __bi, __start) {    \
75                 if (!__v.bv_len)                        \
76                         continue;                       \
77                 (void)(STEP);                           \
78         }                                               \
79 }
80
81 #define iterate_all_kinds(i, n, v, I, B, K) {                   \
82         if (likely(n)) {                                        \
83                 size_t skip = i->iov_offset;                    \
84                 if (unlikely(i->type & ITER_BVEC)) {            \
85                         struct bio_vec v;                       \
86                         struct bvec_iter __bi;                  \
87                         iterate_bvec(i, n, v, __bi, skip, (B))  \
88                 } else if (unlikely(i->type & ITER_KVEC)) {     \
89                         const struct kvec *kvec;                \
90                         struct kvec v;                          \
91                         iterate_kvec(i, n, v, kvec, skip, (K))  \
92                 } else if (unlikely(i->type & ITER_DISCARD)) {  \
93                 } else {                                        \
94                         const struct iovec *iov;                \
95                         struct iovec v;                         \
96                         iterate_iovec(i, n, v, iov, skip, (I))  \
97                 }                                               \
98         }                                                       \
99 }
100
101 #define iterate_and_advance(i, n, v, I, B, K) {                 \
102         if (unlikely(i->count < n))                             \
103                 n = i->count;                                   \
104         if (i->count) {                                         \
105                 size_t skip = i->iov_offset;                    \
106                 if (unlikely(i->type & ITER_BVEC)) {            \
107                         const struct bio_vec *bvec = i->bvec;   \
108                         struct bio_vec v;                       \
109                         struct bvec_iter __bi;                  \
110                         iterate_bvec(i, n, v, __bi, skip, (B))  \
111                         i->bvec = __bvec_iter_bvec(i->bvec, __bi);      \
112                         i->nr_segs -= i->bvec - bvec;           \
113                         skip = __bi.bi_bvec_done;               \
114                 } else if (unlikely(i->type & ITER_KVEC)) {     \
115                         const struct kvec *kvec;                \
116                         struct kvec v;                          \
117                         iterate_kvec(i, n, v, kvec, skip, (K))  \
118                         if (skip == kvec->iov_len) {            \
119                                 kvec++;                         \
120                                 skip = 0;                       \
121                         }                                       \
122                         i->nr_segs -= kvec - i->kvec;           \
123                         i->kvec = kvec;                         \
124                 } else if (unlikely(i->type & ITER_DISCARD)) {  \
125                         skip += n;                              \
126                 } else {                                        \
127                         const struct iovec *iov;                \
128                         struct iovec v;                         \
129                         iterate_iovec(i, n, v, iov, skip, (I))  \
130                         if (skip == iov->iov_len) {             \
131                                 iov++;                          \
132                                 skip = 0;                       \
133                         }                                       \
134                         i->nr_segs -= iov - i->iov;             \
135                         i->iov = iov;                           \
136                 }                                               \
137                 i->count -= n;                                  \
138                 i->iov_offset = skip;                           \
139         }                                                       \
140 }
141
142 static int copyout(void __user *to, const void *from, size_t n)
143 {
144         if (should_fail_usercopy())
145                 return n;
146         if (access_ok(to, n)) {
147                 instrument_copy_to_user(to, from, n);
148                 n = raw_copy_to_user(to, from, n);
149         }
150         return n;
151 }
152
153 static int copyin(void *to, const void __user *from, size_t n)
154 {
155         if (should_fail_usercopy())
156                 return n;
157         if (access_ok(from, n)) {
158                 instrument_copy_from_user(to, from, n);
159                 n = raw_copy_from_user(to, from, n);
160         }
161         return n;
162 }
163
164 static size_t copy_page_to_iter_iovec(struct page *page, size_t offset, size_t bytes,
165                          struct iov_iter *i)
166 {
167         size_t skip, copy, left, wanted;
168         const struct iovec *iov;
169         char __user *buf;
170         void *kaddr, *from;
171
172         if (unlikely(bytes > i->count))
173                 bytes = i->count;
174
175         if (unlikely(!bytes))
176                 return 0;
177
178         might_fault();
179         wanted = bytes;
180         iov = i->iov;
181         skip = i->iov_offset;
182         buf = iov->iov_base + skip;
183         copy = min(bytes, iov->iov_len - skip);
184
185         if (IS_ENABLED(CONFIG_HIGHMEM) && !fault_in_pages_writeable(buf, copy)) {
186                 kaddr = kmap_atomic(page);
187                 from = kaddr + offset;
188
189                 /* first chunk, usually the only one */
190                 left = copyout(buf, from, copy);
191                 copy -= left;
192                 skip += copy;
193                 from += copy;
194                 bytes -= copy;
195
196                 while (unlikely(!left && bytes)) {
197                         iov++;
198                         buf = iov->iov_base;
199                         copy = min(bytes, iov->iov_len);
200                         left = copyout(buf, from, copy);
201                         copy -= left;
202                         skip = copy;
203                         from += copy;
204                         bytes -= copy;
205                 }
206                 if (likely(!bytes)) {
207                         kunmap_atomic(kaddr);
208                         goto done;
209                 }
210                 offset = from - kaddr;
211                 buf += copy;
212                 kunmap_atomic(kaddr);
213                 copy = min(bytes, iov->iov_len - skip);
214         }
215         /* Too bad - revert to non-atomic kmap */
216
217         kaddr = kmap(page);
218         from = kaddr + offset;
219         left = copyout(buf, from, copy);
220         copy -= left;
221         skip += copy;
222         from += copy;
223         bytes -= copy;
224         while (unlikely(!left && bytes)) {
225                 iov++;
226                 buf = iov->iov_base;
227                 copy = min(bytes, iov->iov_len);
228                 left = copyout(buf, from, copy);
229                 copy -= left;
230                 skip = copy;
231                 from += copy;
232                 bytes -= copy;
233         }
234         kunmap(page);
235
236 done:
237         if (skip == iov->iov_len) {
238                 iov++;
239                 skip = 0;
240         }
241         i->count -= wanted - bytes;
242         i->nr_segs -= iov - i->iov;
243         i->iov = iov;
244         i->iov_offset = skip;
245         return wanted - bytes;
246 }
247
248 static size_t copy_page_from_iter_iovec(struct page *page, size_t offset, size_t bytes,
249                          struct iov_iter *i)
250 {
251         size_t skip, copy, left, wanted;
252         const struct iovec *iov;
253         char __user *buf;
254         void *kaddr, *to;
255
256         if (unlikely(bytes > i->count))
257                 bytes = i->count;
258
259         if (unlikely(!bytes))
260                 return 0;
261
262         might_fault();
263         wanted = bytes;
264         iov = i->iov;
265         skip = i->iov_offset;
266         buf = iov->iov_base + skip;
267         copy = min(bytes, iov->iov_len - skip);
268
269         if (IS_ENABLED(CONFIG_HIGHMEM) && !fault_in_pages_readable(buf, copy)) {
270                 kaddr = kmap_atomic(page);
271                 to = kaddr + offset;
272
273                 /* first chunk, usually the only one */
274                 left = copyin(to, buf, copy);
275                 copy -= left;
276                 skip += copy;
277                 to += copy;
278                 bytes -= copy;
279
280                 while (unlikely(!left && bytes)) {
281                         iov++;
282                         buf = iov->iov_base;
283                         copy = min(bytes, iov->iov_len);
284                         left = copyin(to, buf, copy);
285                         copy -= left;
286                         skip = copy;
287                         to += copy;
288                         bytes -= copy;
289                 }
290                 if (likely(!bytes)) {
291                         kunmap_atomic(kaddr);
292                         goto done;
293                 }
294                 offset = to - kaddr;
295                 buf += copy;
296                 kunmap_atomic(kaddr);
297                 copy = min(bytes, iov->iov_len - skip);
298         }
299         /* Too bad - revert to non-atomic kmap */
300
301         kaddr = kmap(page);
302         to = kaddr + offset;
303         left = copyin(to, buf, copy);
304         copy -= left;
305         skip += copy;
306         to += copy;
307         bytes -= copy;
308         while (unlikely(!left && bytes)) {
309                 iov++;
310                 buf = iov->iov_base;
311                 copy = min(bytes, iov->iov_len);
312                 left = copyin(to, buf, copy);
313                 copy -= left;
314                 skip = copy;
315                 to += copy;
316                 bytes -= copy;
317         }
318         kunmap(page);
319
320 done:
321         if (skip == iov->iov_len) {
322                 iov++;
323                 skip = 0;
324         }
325         i->count -= wanted - bytes;
326         i->nr_segs -= iov - i->iov;
327         i->iov = iov;
328         i->iov_offset = skip;
329         return wanted - bytes;
330 }
331
332 #ifdef PIPE_PARANOIA
333 static bool sanity(const struct iov_iter *i)
334 {
335         struct pipe_inode_info *pipe = i->pipe;
336         unsigned int p_head = pipe->head;
337         unsigned int p_tail = pipe->tail;
338         unsigned int p_mask = pipe->ring_size - 1;
339         unsigned int p_occupancy = pipe_occupancy(p_head, p_tail);
340         unsigned int i_head = i->head;
341         unsigned int idx;
342
343         if (i->iov_offset) {
344                 struct pipe_buffer *p;
345                 if (unlikely(p_occupancy == 0))
346                         goto Bad;       // pipe must be non-empty
347                 if (unlikely(i_head != p_head - 1))
348                         goto Bad;       // must be at the last buffer...
349
350                 p = &pipe->bufs[i_head & p_mask];
351                 if (unlikely(p->offset + p->len != i->iov_offset))
352                         goto Bad;       // ... at the end of segment
353         } else {
354                 if (i_head != p_head)
355                         goto Bad;       // must be right after the last buffer
356         }
357         return true;
358 Bad:
359         printk(KERN_ERR "idx = %d, offset = %zd\n", i_head, i->iov_offset);
360         printk(KERN_ERR "head = %d, tail = %d, buffers = %d\n",
361                         p_head, p_tail, pipe->ring_size);
362         for (idx = 0; idx < pipe->ring_size; idx++)
363                 printk(KERN_ERR "[%p %p %d %d]\n",
364                         pipe->bufs[idx].ops,
365                         pipe->bufs[idx].page,
366                         pipe->bufs[idx].offset,
367                         pipe->bufs[idx].len);
368         WARN_ON(1);
369         return false;
370 }
371 #else
372 #define sanity(i) true
373 #endif
374
375 static size_t copy_page_to_iter_pipe(struct page *page, size_t offset, size_t bytes,
376                          struct iov_iter *i)
377 {
378         struct pipe_inode_info *pipe = i->pipe;
379         struct pipe_buffer *buf;
380         unsigned int p_tail = pipe->tail;
381         unsigned int p_mask = pipe->ring_size - 1;
382         unsigned int i_head = i->head;
383         size_t off;
384
385         if (unlikely(bytes > i->count))
386                 bytes = i->count;
387
388         if (unlikely(!bytes))
389                 return 0;
390
391         if (!sanity(i))
392                 return 0;
393
394         off = i->iov_offset;
395         buf = &pipe->bufs[i_head & p_mask];
396         if (off) {
397                 if (offset == off && buf->page == page) {
398                         /* merge with the last one */
399                         buf->len += bytes;
400                         i->iov_offset += bytes;
401                         goto out;
402                 }
403                 i_head++;
404                 buf = &pipe->bufs[i_head & p_mask];
405         }
406         if (pipe_full(i_head, p_tail, pipe->max_usage))
407                 return 0;
408
409         buf->ops = &page_cache_pipe_buf_ops;
410         get_page(page);
411         buf->page = page;
412         buf->offset = offset;
413         buf->len = bytes;
414
415         pipe->head = i_head + 1;
416         i->iov_offset = offset + bytes;
417         i->head = i_head;
418 out:
419         i->count -= bytes;
420         return bytes;
421 }
422
423 /*
424  * Fault in one or more iovecs of the given iov_iter, to a maximum length of
425  * bytes.  For each iovec, fault in each page that constitutes the iovec.
426  *
427  * Return 0 on success, or non-zero if the memory could not be accessed (i.e.
428  * because it is an invalid address).
429  */
430 int iov_iter_fault_in_readable(struct iov_iter *i, size_t bytes)
431 {
432         size_t skip = i->iov_offset;
433         const struct iovec *iov;
434         int err;
435         struct iovec v;
436
437         if (!(i->type & (ITER_BVEC|ITER_KVEC))) {
438                 iterate_iovec(i, bytes, v, iov, skip, ({
439                         err = fault_in_pages_readable(v.iov_base, v.iov_len);
440                         if (unlikely(err))
441                         return err;
442                 0;}))
443         }
444         return 0;
445 }
446 EXPORT_SYMBOL(iov_iter_fault_in_readable);
447
448 void iov_iter_init(struct iov_iter *i, unsigned int direction,
449                         const struct iovec *iov, unsigned long nr_segs,
450                         size_t count)
451 {
452         WARN_ON(direction & ~(READ | WRITE));
453         direction &= READ | WRITE;
454
455         /* It will get better.  Eventually... */
456         if (uaccess_kernel()) {
457                 i->type = ITER_KVEC | direction;
458                 i->kvec = (struct kvec *)iov;
459         } else {
460                 i->type = ITER_IOVEC | direction;
461                 i->iov = iov;
462         }
463         i->nr_segs = nr_segs;
464         i->iov_offset = 0;
465         i->count = count;
466 }
467 EXPORT_SYMBOL(iov_iter_init);
468
469 static void memcpy_from_page(char *to, struct page *page, size_t offset, size_t len)
470 {
471         char *from = kmap_atomic(page);
472         memcpy(to, from + offset, len);
473         kunmap_atomic(from);
474 }
475
476 static void memcpy_to_page(struct page *page, size_t offset, const char *from, size_t len)
477 {
478         char *to = kmap_atomic(page);
479         memcpy(to + offset, from, len);
480         kunmap_atomic(to);
481 }
482
483 static void memzero_page(struct page *page, size_t offset, size_t len)
484 {
485         char *addr = kmap_atomic(page);
486         memset(addr + offset, 0, len);
487         kunmap_atomic(addr);
488 }
489
490 static inline bool allocated(struct pipe_buffer *buf)
491 {
492         return buf->ops == &default_pipe_buf_ops;
493 }
494
495 static inline void data_start(const struct iov_iter *i,
496                               unsigned int *iter_headp, size_t *offp)
497 {
498         unsigned int p_mask = i->pipe->ring_size - 1;
499         unsigned int iter_head = i->head;
500         size_t off = i->iov_offset;
501
502         if (off && (!allocated(&i->pipe->bufs[iter_head & p_mask]) ||
503                     off == PAGE_SIZE)) {
504                 iter_head++;
505                 off = 0;
506         }
507         *iter_headp = iter_head;
508         *offp = off;
509 }
510
511 static size_t push_pipe(struct iov_iter *i, size_t size,
512                         int *iter_headp, size_t *offp)
513 {
514         struct pipe_inode_info *pipe = i->pipe;
515         unsigned int p_tail = pipe->tail;
516         unsigned int p_mask = pipe->ring_size - 1;
517         unsigned int iter_head;
518         size_t off;
519         ssize_t left;
520
521         if (unlikely(size > i->count))
522                 size = i->count;
523         if (unlikely(!size))
524                 return 0;
525
526         left = size;
527         data_start(i, &iter_head, &off);
528         *iter_headp = iter_head;
529         *offp = off;
530         if (off) {
531                 left -= PAGE_SIZE - off;
532                 if (left <= 0) {
533                         pipe->bufs[iter_head & p_mask].len += size;
534                         return size;
535                 }
536                 pipe->bufs[iter_head & p_mask].len = PAGE_SIZE;
537                 iter_head++;
538         }
539         while (!pipe_full(iter_head, p_tail, pipe->max_usage)) {
540                 struct pipe_buffer *buf = &pipe->bufs[iter_head & p_mask];
541                 struct page *page = alloc_page(GFP_USER);
542                 if (!page)
543                         break;
544
545                 buf->ops = &default_pipe_buf_ops;
546                 buf->page = page;
547                 buf->offset = 0;
548                 buf->len = min_t(ssize_t, left, PAGE_SIZE);
549                 left -= buf->len;
550                 iter_head++;
551                 pipe->head = iter_head;
552
553                 if (left == 0)
554                         return size;
555         }
556         return size - left;
557 }
558
559 static size_t copy_pipe_to_iter(const void *addr, size_t bytes,
560                                 struct iov_iter *i)
561 {
562         struct pipe_inode_info *pipe = i->pipe;
563         unsigned int p_mask = pipe->ring_size - 1;
564         unsigned int i_head;
565         size_t n, off;
566
567         if (!sanity(i))
568                 return 0;
569
570         bytes = n = push_pipe(i, bytes, &i_head, &off);
571         if (unlikely(!n))
572                 return 0;
573         do {
574                 size_t chunk = min_t(size_t, n, PAGE_SIZE - off);
575                 memcpy_to_page(pipe->bufs[i_head & p_mask].page, off, addr, chunk);
576                 i->head = i_head;
577                 i->iov_offset = off + chunk;
578                 n -= chunk;
579                 addr += chunk;
580                 off = 0;
581                 i_head++;
582         } while (n);
583         i->count -= bytes;
584         return bytes;
585 }
586
587 static __wsum csum_and_memcpy(void *to, const void *from, size_t len,
588                               __wsum sum, size_t off)
589 {
590         __wsum next = csum_partial_copy_nocheck(from, to, len);
591         return csum_block_add(sum, next, off);
592 }
593
594 static size_t csum_and_copy_to_pipe_iter(const void *addr, size_t bytes,
595                                 __wsum *csum, struct iov_iter *i)
596 {
597         struct pipe_inode_info *pipe = i->pipe;
598         unsigned int p_mask = pipe->ring_size - 1;
599         unsigned int i_head;
600         size_t n, r;
601         size_t off = 0;
602         __wsum sum = *csum;
603
604         if (!sanity(i))
605                 return 0;
606
607         bytes = n = push_pipe(i, bytes, &i_head, &r);
608         if (unlikely(!n))
609                 return 0;
610         do {
611                 size_t chunk = min_t(size_t, n, PAGE_SIZE - r);
612                 char *p = kmap_atomic(pipe->bufs[i_head & p_mask].page);
613                 sum = csum_and_memcpy(p + r, addr, chunk, sum, off);
614                 kunmap_atomic(p);
615                 i->head = i_head;
616                 i->iov_offset = r + chunk;
617                 n -= chunk;
618                 off += chunk;
619                 addr += chunk;
620                 r = 0;
621                 i_head++;
622         } while (n);
623         i->count -= bytes;
624         *csum = sum;
625         return bytes;
626 }
627
628 size_t _copy_to_iter(const void *addr, size_t bytes, struct iov_iter *i)
629 {
630         const char *from = addr;
631         if (unlikely(iov_iter_is_pipe(i)))
632                 return copy_pipe_to_iter(addr, bytes, i);
633         if (iter_is_iovec(i))
634                 might_fault();
635         iterate_and_advance(i, bytes, v,
636                 copyout(v.iov_base, (from += v.iov_len) - v.iov_len, v.iov_len),
637                 memcpy_to_page(v.bv_page, v.bv_offset,
638                                (from += v.bv_len) - v.bv_len, v.bv_len),
639                 memcpy(v.iov_base, (from += v.iov_len) - v.iov_len, v.iov_len)
640         )
641
642         return bytes;
643 }
644 EXPORT_SYMBOL(_copy_to_iter);
645
646 #ifdef CONFIG_ARCH_HAS_COPY_MC
647 static int copyout_mc(void __user *to, const void *from, size_t n)
648 {
649         if (access_ok(to, n)) {
650                 instrument_copy_to_user(to, from, n);
651                 n = copy_mc_to_user((__force void *) to, from, n);
652         }
653         return n;
654 }
655
656 static unsigned long copy_mc_to_page(struct page *page, size_t offset,
657                 const char *from, size_t len)
658 {
659         unsigned long ret;
660         char *to;
661
662         to = kmap_atomic(page);
663         ret = copy_mc_to_kernel(to + offset, from, len);
664         kunmap_atomic(to);
665
666         return ret;
667 }
668
669 static size_t copy_mc_pipe_to_iter(const void *addr, size_t bytes,
670                                 struct iov_iter *i)
671 {
672         struct pipe_inode_info *pipe = i->pipe;
673         unsigned int p_mask = pipe->ring_size - 1;
674         unsigned int i_head;
675         size_t n, off, xfer = 0;
676
677         if (!sanity(i))
678                 return 0;
679
680         bytes = n = push_pipe(i, bytes, &i_head, &off);
681         if (unlikely(!n))
682                 return 0;
683         do {
684                 size_t chunk = min_t(size_t, n, PAGE_SIZE - off);
685                 unsigned long rem;
686
687                 rem = copy_mc_to_page(pipe->bufs[i_head & p_mask].page,
688                                             off, addr, chunk);
689                 i->head = i_head;
690                 i->iov_offset = off + chunk - rem;
691                 xfer += chunk - rem;
692                 if (rem)
693                         break;
694                 n -= chunk;
695                 addr += chunk;
696                 off = 0;
697                 i_head++;
698         } while (n);
699         i->count -= xfer;
700         return xfer;
701 }
702
703 /**
704  * _copy_mc_to_iter - copy to iter with source memory error exception handling
705  * @addr: source kernel address
706  * @bytes: total transfer length
707  * @iter: destination iterator
708  *
709  * The pmem driver deploys this for the dax operation
710  * (dax_copy_to_iter()) for dax reads (bypass page-cache and the
711  * block-layer). Upon #MC read(2) aborts and returns EIO or the bytes
712  * successfully copied.
713  *
714  * The main differences between this and typical _copy_to_iter().
715  *
716  * * Typical tail/residue handling after a fault retries the copy
717  *   byte-by-byte until the fault happens again. Re-triggering machine
718  *   checks is potentially fatal so the implementation uses source
719  *   alignment and poison alignment assumptions to avoid re-triggering
720  *   hardware exceptions.
721  *
722  * * ITER_KVEC, ITER_PIPE, and ITER_BVEC can return short copies.
723  *   Compare to copy_to_iter() where only ITER_IOVEC attempts might return
724  *   a short copy.
725  */
726 size_t _copy_mc_to_iter(const void *addr, size_t bytes, struct iov_iter *i)
727 {
728         const char *from = addr;
729         unsigned long rem, curr_addr, s_addr = (unsigned long) addr;
730
731         if (unlikely(iov_iter_is_pipe(i)))
732                 return copy_mc_pipe_to_iter(addr, bytes, i);
733         if (iter_is_iovec(i))
734                 might_fault();
735         iterate_and_advance(i, bytes, v,
736                 copyout_mc(v.iov_base, (from += v.iov_len) - v.iov_len,
737                            v.iov_len),
738                 ({
739                 rem = copy_mc_to_page(v.bv_page, v.bv_offset,
740                                       (from += v.bv_len) - v.bv_len, v.bv_len);
741                 if (rem) {
742                         curr_addr = (unsigned long) from;
743                         bytes = curr_addr - s_addr - rem;
744                         return bytes;
745                 }
746                 }),
747                 ({
748                 rem = copy_mc_to_kernel(v.iov_base, (from += v.iov_len)
749                                         - v.iov_len, v.iov_len);
750                 if (rem) {
751                         curr_addr = (unsigned long) from;
752                         bytes = curr_addr - s_addr - rem;
753                         return bytes;
754                 }
755                 })
756         )
757
758         return bytes;
759 }
760 EXPORT_SYMBOL_GPL(_copy_mc_to_iter);
761 #endif /* CONFIG_ARCH_HAS_COPY_MC */
762
763 size_t _copy_from_iter(void *addr, size_t bytes, struct iov_iter *i)
764 {
765         char *to = addr;
766         if (unlikely(iov_iter_is_pipe(i))) {
767                 WARN_ON(1);
768                 return 0;
769         }
770         if (iter_is_iovec(i))
771                 might_fault();
772         iterate_and_advance(i, bytes, v,
773                 copyin((to += v.iov_len) - v.iov_len, v.iov_base, v.iov_len),
774                 memcpy_from_page((to += v.bv_len) - v.bv_len, v.bv_page,
775                                  v.bv_offset, v.bv_len),
776                 memcpy((to += v.iov_len) - v.iov_len, v.iov_base, v.iov_len)
777         )
778
779         return bytes;
780 }
781 EXPORT_SYMBOL(_copy_from_iter);
782
783 bool _copy_from_iter_full(void *addr, size_t bytes, struct iov_iter *i)
784 {
785         char *to = addr;
786         if (unlikely(iov_iter_is_pipe(i))) {
787                 WARN_ON(1);
788                 return false;
789         }
790         if (unlikely(i->count < bytes))
791                 return false;
792
793         if (iter_is_iovec(i))
794                 might_fault();
795         iterate_all_kinds(i, bytes, v, ({
796                 if (copyin((to += v.iov_len) - v.iov_len,
797                                       v.iov_base, v.iov_len))
798                         return false;
799                 0;}),
800                 memcpy_from_page((to += v.bv_len) - v.bv_len, v.bv_page,
801                                  v.bv_offset, v.bv_len),
802                 memcpy((to += v.iov_len) - v.iov_len, v.iov_base, v.iov_len)
803         )
804
805         iov_iter_advance(i, bytes);
806         return true;
807 }
808 EXPORT_SYMBOL(_copy_from_iter_full);
809
810 size_t _copy_from_iter_nocache(void *addr, size_t bytes, struct iov_iter *i)
811 {
812         char *to = addr;
813         if (unlikely(iov_iter_is_pipe(i))) {
814                 WARN_ON(1);
815                 return 0;
816         }
817         iterate_and_advance(i, bytes, v,
818                 __copy_from_user_inatomic_nocache((to += v.iov_len) - v.iov_len,
819                                          v.iov_base, v.iov_len),
820                 memcpy_from_page((to += v.bv_len) - v.bv_len, v.bv_page,
821                                  v.bv_offset, v.bv_len),
822                 memcpy((to += v.iov_len) - v.iov_len, v.iov_base, v.iov_len)
823         )
824
825         return bytes;
826 }
827 EXPORT_SYMBOL(_copy_from_iter_nocache);
828
829 #ifdef CONFIG_ARCH_HAS_UACCESS_FLUSHCACHE
830 /**
831  * _copy_from_iter_flushcache - write destination through cpu cache
832  * @addr: destination kernel address
833  * @bytes: total transfer length
834  * @iter: source iterator
835  *
836  * The pmem driver arranges for filesystem-dax to use this facility via
837  * dax_copy_from_iter() for ensuring that writes to persistent memory
838  * are flushed through the CPU cache. It is differentiated from
839  * _copy_from_iter_nocache() in that guarantees all data is flushed for
840  * all iterator types. The _copy_from_iter_nocache() only attempts to
841  * bypass the cache for the ITER_IOVEC case, and on some archs may use
842  * instructions that strand dirty-data in the cache.
843  */
844 size_t _copy_from_iter_flushcache(void *addr, size_t bytes, struct iov_iter *i)
845 {
846         char *to = addr;
847         if (unlikely(iov_iter_is_pipe(i))) {
848                 WARN_ON(1);
849                 return 0;
850         }
851         iterate_and_advance(i, bytes, v,
852                 __copy_from_user_flushcache((to += v.iov_len) - v.iov_len,
853                                          v.iov_base, v.iov_len),
854                 memcpy_page_flushcache((to += v.bv_len) - v.bv_len, v.bv_page,
855                                  v.bv_offset, v.bv_len),
856                 memcpy_flushcache((to += v.iov_len) - v.iov_len, v.iov_base,
857                         v.iov_len)
858         )
859
860         return bytes;
861 }
862 EXPORT_SYMBOL_GPL(_copy_from_iter_flushcache);
863 #endif
864
865 bool _copy_from_iter_full_nocache(void *addr, size_t bytes, struct iov_iter *i)
866 {
867         char *to = addr;
868         if (unlikely(iov_iter_is_pipe(i))) {
869                 WARN_ON(1);
870                 return false;
871         }
872         if (unlikely(i->count < bytes))
873                 return false;
874         iterate_all_kinds(i, bytes, v, ({
875                 if (__copy_from_user_inatomic_nocache((to += v.iov_len) - v.iov_len,
876                                              v.iov_base, v.iov_len))
877                         return false;
878                 0;}),
879                 memcpy_from_page((to += v.bv_len) - v.bv_len, v.bv_page,
880                                  v.bv_offset, v.bv_len),
881                 memcpy((to += v.iov_len) - v.iov_len, v.iov_base, v.iov_len)
882         )
883
884         iov_iter_advance(i, bytes);
885         return true;
886 }
887 EXPORT_SYMBOL(_copy_from_iter_full_nocache);
888
889 static inline bool page_copy_sane(struct page *page, size_t offset, size_t n)
890 {
891         struct page *head;
892         size_t v = n + offset;
893
894         /*
895          * The general case needs to access the page order in order
896          * to compute the page size.
897          * However, we mostly deal with order-0 pages and thus can
898          * avoid a possible cache line miss for requests that fit all
899          * page orders.
900          */
901         if (n <= v && v <= PAGE_SIZE)
902                 return true;
903
904         head = compound_head(page);
905         v += (page - head) << PAGE_SHIFT;
906
907         if (likely(n <= v && v <= (page_size(head))))
908                 return true;
909         WARN_ON(1);
910         return false;
911 }
912
913 size_t copy_page_to_iter(struct page *page, size_t offset, size_t bytes,
914                          struct iov_iter *i)
915 {
916         if (unlikely(!page_copy_sane(page, offset, bytes)))
917                 return 0;
918         if (i->type & (ITER_BVEC|ITER_KVEC)) {
919                 void *kaddr = kmap_atomic(page);
920                 size_t wanted = copy_to_iter(kaddr + offset, bytes, i);
921                 kunmap_atomic(kaddr);
922                 return wanted;
923         } else if (unlikely(iov_iter_is_discard(i)))
924                 return bytes;
925         else if (likely(!iov_iter_is_pipe(i)))
926                 return copy_page_to_iter_iovec(page, offset, bytes, i);
927         else
928                 return copy_page_to_iter_pipe(page, offset, bytes, i);
929 }
930 EXPORT_SYMBOL(copy_page_to_iter);
931
932 size_t copy_page_from_iter(struct page *page, size_t offset, size_t bytes,
933                          struct iov_iter *i)
934 {
935         if (unlikely(!page_copy_sane(page, offset, bytes)))
936                 return 0;
937         if (unlikely(iov_iter_is_pipe(i) || iov_iter_is_discard(i))) {
938                 WARN_ON(1);
939                 return 0;
940         }
941         if (i->type & (ITER_BVEC|ITER_KVEC)) {
942                 void *kaddr = kmap_atomic(page);
943                 size_t wanted = _copy_from_iter(kaddr + offset, bytes, i);
944                 kunmap_atomic(kaddr);
945                 return wanted;
946         } else
947                 return copy_page_from_iter_iovec(page, offset, bytes, i);
948 }
949 EXPORT_SYMBOL(copy_page_from_iter);
950
951 static size_t pipe_zero(size_t bytes, struct iov_iter *i)
952 {
953         struct pipe_inode_info *pipe = i->pipe;
954         unsigned int p_mask = pipe->ring_size - 1;
955         unsigned int i_head;
956         size_t n, off;
957
958         if (!sanity(i))
959                 return 0;
960
961         bytes = n = push_pipe(i, bytes, &i_head, &off);
962         if (unlikely(!n))
963                 return 0;
964
965         do {
966                 size_t chunk = min_t(size_t, n, PAGE_SIZE - off);
967                 memzero_page(pipe->bufs[i_head & p_mask].page, off, chunk);
968                 i->head = i_head;
969                 i->iov_offset = off + chunk;
970                 n -= chunk;
971                 off = 0;
972                 i_head++;
973         } while (n);
974         i->count -= bytes;
975         return bytes;
976 }
977
978 size_t iov_iter_zero(size_t bytes, struct iov_iter *i)
979 {
980         if (unlikely(iov_iter_is_pipe(i)))
981                 return pipe_zero(bytes, i);
982         iterate_and_advance(i, bytes, v,
983                 clear_user(v.iov_base, v.iov_len),
984                 memzero_page(v.bv_page, v.bv_offset, v.bv_len),
985                 memset(v.iov_base, 0, v.iov_len)
986         )
987
988         return bytes;
989 }
990 EXPORT_SYMBOL(iov_iter_zero);
991
992 size_t iov_iter_copy_from_user_atomic(struct page *page,
993                 struct iov_iter *i, unsigned long offset, size_t bytes)
994 {
995         char *kaddr = kmap_atomic(page), *p = kaddr + offset;
996         if (unlikely(!page_copy_sane(page, offset, bytes))) {
997                 kunmap_atomic(kaddr);
998                 return 0;
999         }
1000         if (unlikely(iov_iter_is_pipe(i) || iov_iter_is_discard(i))) {
1001                 kunmap_atomic(kaddr);
1002                 WARN_ON(1);
1003                 return 0;
1004         }
1005         iterate_all_kinds(i, bytes, v,
1006                 copyin((p += v.iov_len) - v.iov_len, v.iov_base, v.iov_len),
1007                 memcpy_from_page((p += v.bv_len) - v.bv_len, v.bv_page,
1008                                  v.bv_offset, v.bv_len),
1009                 memcpy((p += v.iov_len) - v.iov_len, v.iov_base, v.iov_len)
1010         )
1011         kunmap_atomic(kaddr);
1012         return bytes;
1013 }
1014 EXPORT_SYMBOL(iov_iter_copy_from_user_atomic);
1015
1016 static inline void pipe_truncate(struct iov_iter *i)
1017 {
1018         struct pipe_inode_info *pipe = i->pipe;
1019         unsigned int p_tail = pipe->tail;
1020         unsigned int p_head = pipe->head;
1021         unsigned int p_mask = pipe->ring_size - 1;
1022
1023         if (!pipe_empty(p_head, p_tail)) {
1024                 struct pipe_buffer *buf;
1025                 unsigned int i_head = i->head;
1026                 size_t off = i->iov_offset;
1027
1028                 if (off) {
1029                         buf = &pipe->bufs[i_head & p_mask];
1030                         buf->len = off - buf->offset;
1031                         i_head++;
1032                 }
1033                 while (p_head != i_head) {
1034                         p_head--;
1035                         pipe_buf_release(pipe, &pipe->bufs[p_head & p_mask]);
1036                 }
1037
1038                 pipe->head = p_head;
1039         }
1040 }
1041
1042 static void pipe_advance(struct iov_iter *i, size_t size)
1043 {
1044         struct pipe_inode_info *pipe = i->pipe;
1045         if (unlikely(i->count < size))
1046                 size = i->count;
1047         if (size) {
1048                 struct pipe_buffer *buf;
1049                 unsigned int p_mask = pipe->ring_size - 1;
1050                 unsigned int i_head = i->head;
1051                 size_t off = i->iov_offset, left = size;
1052
1053                 if (off) /* make it relative to the beginning of buffer */
1054                         left += off - pipe->bufs[i_head & p_mask].offset;
1055                 while (1) {
1056                         buf = &pipe->bufs[i_head & p_mask];
1057                         if (left <= buf->len)
1058                                 break;
1059                         left -= buf->len;
1060                         i_head++;
1061                 }
1062                 i->head = i_head;
1063                 i->iov_offset = buf->offset + left;
1064         }
1065         i->count -= size;
1066         /* ... and discard everything past that point */
1067         pipe_truncate(i);
1068 }
1069
1070 void iov_iter_advance(struct iov_iter *i, size_t size)
1071 {
1072         if (unlikely(iov_iter_is_pipe(i))) {
1073                 pipe_advance(i, size);
1074                 return;
1075         }
1076         if (unlikely(iov_iter_is_discard(i))) {
1077                 i->count -= size;
1078                 return;
1079         }
1080         iterate_and_advance(i, size, v, 0, 0, 0)
1081 }
1082 EXPORT_SYMBOL(iov_iter_advance);
1083
1084 void iov_iter_revert(struct iov_iter *i, size_t unroll)
1085 {
1086         if (!unroll)
1087                 return;
1088         if (WARN_ON(unroll > MAX_RW_COUNT))
1089                 return;
1090         i->count += unroll;
1091         if (unlikely(iov_iter_is_pipe(i))) {
1092                 struct pipe_inode_info *pipe = i->pipe;
1093                 unsigned int p_mask = pipe->ring_size - 1;
1094                 unsigned int i_head = i->head;
1095                 size_t off = i->iov_offset;
1096                 while (1) {
1097                         struct pipe_buffer *b = &pipe->bufs[i_head & p_mask];
1098                         size_t n = off - b->offset;
1099                         if (unroll < n) {
1100                                 off -= unroll;
1101                                 break;
1102                         }
1103                         unroll -= n;
1104                         if (!unroll && i_head == i->start_head) {
1105                                 off = 0;
1106                                 break;
1107                         }
1108                         i_head--;
1109                         b = &pipe->bufs[i_head & p_mask];
1110                         off = b->offset + b->len;
1111                 }
1112                 i->iov_offset = off;
1113                 i->head = i_head;
1114                 pipe_truncate(i);
1115                 return;
1116         }
1117         if (unlikely(iov_iter_is_discard(i)))
1118                 return;
1119         if (unroll <= i->iov_offset) {
1120                 i->iov_offset -= unroll;
1121                 return;
1122         }
1123         unroll -= i->iov_offset;
1124         if (iov_iter_is_bvec(i)) {
1125                 const struct bio_vec *bvec = i->bvec;
1126                 while (1) {
1127                         size_t n = (--bvec)->bv_len;
1128                         i->nr_segs++;
1129                         if (unroll <= n) {
1130                                 i->bvec = bvec;
1131                                 i->iov_offset = n - unroll;
1132                                 return;
1133                         }
1134                         unroll -= n;
1135                 }
1136         } else { /* same logics for iovec and kvec */
1137                 const struct iovec *iov = i->iov;
1138                 while (1) {
1139                         size_t n = (--iov)->iov_len;
1140                         i->nr_segs++;
1141                         if (unroll <= n) {
1142                                 i->iov = iov;
1143                                 i->iov_offset = n - unroll;
1144                                 return;
1145                         }
1146                         unroll -= n;
1147                 }
1148         }
1149 }
1150 EXPORT_SYMBOL(iov_iter_revert);
1151
1152 /*
1153  * Return the count of just the current iov_iter segment.
1154  */
1155 size_t iov_iter_single_seg_count(const struct iov_iter *i)
1156 {
1157         if (unlikely(iov_iter_is_pipe(i)))
1158                 return i->count;        // it is a silly place, anyway
1159         if (i->nr_segs == 1)
1160                 return i->count;
1161         if (unlikely(iov_iter_is_discard(i)))
1162                 return i->count;
1163         else if (iov_iter_is_bvec(i))
1164                 return min(i->count, i->bvec->bv_len - i->iov_offset);
1165         else
1166                 return min(i->count, i->iov->iov_len - i->iov_offset);
1167 }
1168 EXPORT_SYMBOL(iov_iter_single_seg_count);
1169
1170 void iov_iter_kvec(struct iov_iter *i, unsigned int direction,
1171                         const struct kvec *kvec, unsigned long nr_segs,
1172                         size_t count)
1173 {
1174         WARN_ON(direction & ~(READ | WRITE));
1175         i->type = ITER_KVEC | (direction & (READ | WRITE));
1176         i->kvec = kvec;
1177         i->nr_segs = nr_segs;
1178         i->iov_offset = 0;
1179         i->count = count;
1180 }
1181 EXPORT_SYMBOL(iov_iter_kvec);
1182
1183 void iov_iter_bvec(struct iov_iter *i, unsigned int direction,
1184                         const struct bio_vec *bvec, unsigned long nr_segs,
1185                         size_t count)
1186 {
1187         WARN_ON(direction & ~(READ | WRITE));
1188         i->type = ITER_BVEC | (direction & (READ | WRITE));
1189         i->bvec = bvec;
1190         i->nr_segs = nr_segs;
1191         i->iov_offset = 0;
1192         i->count = count;
1193 }
1194 EXPORT_SYMBOL(iov_iter_bvec);
1195
1196 void iov_iter_pipe(struct iov_iter *i, unsigned int direction,
1197                         struct pipe_inode_info *pipe,
1198                         size_t count)
1199 {
1200         BUG_ON(direction != READ);
1201         WARN_ON(pipe_full(pipe->head, pipe->tail, pipe->ring_size));
1202         i->type = ITER_PIPE | READ;
1203         i->pipe = pipe;
1204         i->head = pipe->head;
1205         i->iov_offset = 0;
1206         i->count = count;
1207         i->start_head = i->head;
1208 }
1209 EXPORT_SYMBOL(iov_iter_pipe);
1210
1211 /**
1212  * iov_iter_discard - Initialise an I/O iterator that discards data
1213  * @i: The iterator to initialise.
1214  * @direction: The direction of the transfer.
1215  * @count: The size of the I/O buffer in bytes.
1216  *
1217  * Set up an I/O iterator that just discards everything that's written to it.
1218  * It's only available as a READ iterator.
1219  */
1220 void iov_iter_discard(struct iov_iter *i, unsigned int direction, size_t count)
1221 {
1222         BUG_ON(direction != READ);
1223         i->type = ITER_DISCARD | READ;
1224         i->count = count;
1225         i->iov_offset = 0;
1226 }
1227 EXPORT_SYMBOL(iov_iter_discard);
1228
1229 unsigned long iov_iter_alignment(const struct iov_iter *i)
1230 {
1231         unsigned long res = 0;
1232         size_t size = i->count;
1233
1234         if (unlikely(iov_iter_is_pipe(i))) {
1235                 unsigned int p_mask = i->pipe->ring_size - 1;
1236
1237                 if (size && i->iov_offset && allocated(&i->pipe->bufs[i->head & p_mask]))
1238                         return size | i->iov_offset;
1239                 return size;
1240         }
1241         iterate_all_kinds(i, size, v,
1242                 (res |= (unsigned long)v.iov_base | v.iov_len, 0),
1243                 res |= v.bv_offset | v.bv_len,
1244                 res |= (unsigned long)v.iov_base | v.iov_len
1245         )
1246         return res;
1247 }
1248 EXPORT_SYMBOL(iov_iter_alignment);
1249
1250 unsigned long iov_iter_gap_alignment(const struct iov_iter *i)
1251 {
1252         unsigned long res = 0;
1253         size_t size = i->count;
1254
1255         if (unlikely(iov_iter_is_pipe(i) || iov_iter_is_discard(i))) {
1256                 WARN_ON(1);
1257                 return ~0U;
1258         }
1259
1260         iterate_all_kinds(i, size, v,
1261                 (res |= (!res ? 0 : (unsigned long)v.iov_base) |
1262                         (size != v.iov_len ? size : 0), 0),
1263                 (res |= (!res ? 0 : (unsigned long)v.bv_offset) |
1264                         (size != v.bv_len ? size : 0)),
1265                 (res |= (!res ? 0 : (unsigned long)v.iov_base) |
1266                         (size != v.iov_len ? size : 0))
1267                 );
1268         return res;
1269 }
1270 EXPORT_SYMBOL(iov_iter_gap_alignment);
1271
1272 static inline ssize_t __pipe_get_pages(struct iov_iter *i,
1273                                 size_t maxsize,
1274                                 struct page **pages,
1275                                 int iter_head,
1276                                 size_t *start)
1277 {
1278         struct pipe_inode_info *pipe = i->pipe;
1279         unsigned int p_mask = pipe->ring_size - 1;
1280         ssize_t n = push_pipe(i, maxsize, &iter_head, start);
1281         if (!n)
1282                 return -EFAULT;
1283
1284         maxsize = n;
1285         n += *start;
1286         while (n > 0) {
1287                 get_page(*pages++ = pipe->bufs[iter_head & p_mask].page);
1288                 iter_head++;
1289                 n -= PAGE_SIZE;
1290         }
1291
1292         return maxsize;
1293 }
1294
1295 static ssize_t pipe_get_pages(struct iov_iter *i,
1296                    struct page **pages, size_t maxsize, unsigned maxpages,
1297                    size_t *start)
1298 {
1299         unsigned int iter_head, npages;
1300         size_t capacity;
1301
1302         if (!maxsize)
1303                 return 0;
1304
1305         if (!sanity(i))
1306                 return -EFAULT;
1307
1308         data_start(i, &iter_head, start);
1309         /* Amount of free space: some of this one + all after this one */
1310         npages = pipe_space_for_user(iter_head, i->pipe->tail, i->pipe);
1311         capacity = min(npages, maxpages) * PAGE_SIZE - *start;
1312
1313         return __pipe_get_pages(i, min(maxsize, capacity), pages, iter_head, start);
1314 }
1315
1316 ssize_t iov_iter_get_pages(struct iov_iter *i,
1317                    struct page **pages, size_t maxsize, unsigned maxpages,
1318                    size_t *start)
1319 {
1320         if (maxsize > i->count)
1321                 maxsize = i->count;
1322
1323         if (unlikely(iov_iter_is_pipe(i)))
1324                 return pipe_get_pages(i, pages, maxsize, maxpages, start);
1325         if (unlikely(iov_iter_is_discard(i)))
1326                 return -EFAULT;
1327
1328         iterate_all_kinds(i, maxsize, v, ({
1329                 unsigned long addr = (unsigned long)v.iov_base;
1330                 size_t len = v.iov_len + (*start = addr & (PAGE_SIZE - 1));
1331                 int n;
1332                 int res;
1333
1334                 if (len > maxpages * PAGE_SIZE)
1335                         len = maxpages * PAGE_SIZE;
1336                 addr &= ~(PAGE_SIZE - 1);
1337                 n = DIV_ROUND_UP(len, PAGE_SIZE);
1338                 res = get_user_pages_fast(addr, n,
1339                                 iov_iter_rw(i) != WRITE ?  FOLL_WRITE : 0,
1340                                 pages);
1341                 if (unlikely(res < 0))
1342                         return res;
1343                 return (res == n ? len : res * PAGE_SIZE) - *start;
1344         0;}),({
1345                 /* can't be more than PAGE_SIZE */
1346                 *start = v.bv_offset;
1347                 get_page(*pages = v.bv_page);
1348                 return v.bv_len;
1349         }),({
1350                 return -EFAULT;
1351         })
1352         )
1353         return 0;
1354 }
1355 EXPORT_SYMBOL(iov_iter_get_pages);
1356
1357 static struct page **get_pages_array(size_t n)
1358 {
1359         return kvmalloc_array(n, sizeof(struct page *), GFP_KERNEL);
1360 }
1361
1362 static ssize_t pipe_get_pages_alloc(struct iov_iter *i,
1363                    struct page ***pages, size_t maxsize,
1364                    size_t *start)
1365 {
1366         struct page **p;
1367         unsigned int iter_head, npages;
1368         ssize_t n;
1369
1370         if (!maxsize)
1371                 return 0;
1372
1373         if (!sanity(i))
1374                 return -EFAULT;
1375
1376         data_start(i, &iter_head, start);
1377         /* Amount of free space: some of this one + all after this one */
1378         npages = pipe_space_for_user(iter_head, i->pipe->tail, i->pipe);
1379         n = npages * PAGE_SIZE - *start;
1380         if (maxsize > n)
1381                 maxsize = n;
1382         else
1383                 npages = DIV_ROUND_UP(maxsize + *start, PAGE_SIZE);
1384         p = get_pages_array(npages);
1385         if (!p)
1386                 return -ENOMEM;
1387         n = __pipe_get_pages(i, maxsize, p, iter_head, start);
1388         if (n > 0)
1389                 *pages = p;
1390         else
1391                 kvfree(p);
1392         return n;
1393 }
1394
1395 ssize_t iov_iter_get_pages_alloc(struct iov_iter *i,
1396                    struct page ***pages, size_t maxsize,
1397                    size_t *start)
1398 {
1399         struct page **p;
1400
1401         if (maxsize > i->count)
1402                 maxsize = i->count;
1403
1404         if (unlikely(iov_iter_is_pipe(i)))
1405                 return pipe_get_pages_alloc(i, pages, maxsize, start);
1406         if (unlikely(iov_iter_is_discard(i)))
1407                 return -EFAULT;
1408
1409         iterate_all_kinds(i, maxsize, v, ({
1410                 unsigned long addr = (unsigned long)v.iov_base;
1411                 size_t len = v.iov_len + (*start = addr & (PAGE_SIZE - 1));
1412                 int n;
1413                 int res;
1414
1415                 addr &= ~(PAGE_SIZE - 1);
1416                 n = DIV_ROUND_UP(len, PAGE_SIZE);
1417                 p = get_pages_array(n);
1418                 if (!p)
1419                         return -ENOMEM;
1420                 res = get_user_pages_fast(addr, n,
1421                                 iov_iter_rw(i) != WRITE ?  FOLL_WRITE : 0, p);
1422                 if (unlikely(res < 0)) {
1423                         kvfree(p);
1424                         return res;
1425                 }
1426                 *pages = p;
1427                 return (res == n ? len : res * PAGE_SIZE) - *start;
1428         0;}),({
1429                 /* can't be more than PAGE_SIZE */
1430                 *start = v.bv_offset;
1431                 *pages = p = get_pages_array(1);
1432                 if (!p)
1433                         return -ENOMEM;
1434                 get_page(*p = v.bv_page);
1435                 return v.bv_len;
1436         }),({
1437                 return -EFAULT;
1438         })
1439         )
1440         return 0;
1441 }
1442 EXPORT_SYMBOL(iov_iter_get_pages_alloc);
1443
1444 size_t csum_and_copy_from_iter(void *addr, size_t bytes, __wsum *csum,
1445                                struct iov_iter *i)
1446 {
1447         char *to = addr;
1448         __wsum sum, next;
1449         size_t off = 0;
1450         sum = *csum;
1451         if (unlikely(iov_iter_is_pipe(i) || iov_iter_is_discard(i))) {
1452                 WARN_ON(1);
1453                 return 0;
1454         }
1455         iterate_and_advance(i, bytes, v, ({
1456                 next = csum_and_copy_from_user(v.iov_base,
1457                                                (to += v.iov_len) - v.iov_len,
1458                                                v.iov_len);
1459                 if (next) {
1460                         sum = csum_block_add(sum, next, off);
1461                         off += v.iov_len;
1462                 }
1463                 next ? 0 : v.iov_len;
1464         }), ({
1465                 char *p = kmap_atomic(v.bv_page);
1466                 sum = csum_and_memcpy((to += v.bv_len) - v.bv_len,
1467                                       p + v.bv_offset, v.bv_len,
1468                                       sum, off);
1469                 kunmap_atomic(p);
1470                 off += v.bv_len;
1471         }),({
1472                 sum = csum_and_memcpy((to += v.iov_len) - v.iov_len,
1473                                       v.iov_base, v.iov_len,
1474                                       sum, off);
1475                 off += v.iov_len;
1476         })
1477         )
1478         *csum = sum;
1479         return bytes;
1480 }
1481 EXPORT_SYMBOL(csum_and_copy_from_iter);
1482
1483 bool csum_and_copy_from_iter_full(void *addr, size_t bytes, __wsum *csum,
1484                                struct iov_iter *i)
1485 {
1486         char *to = addr;
1487         __wsum sum, next;
1488         size_t off = 0;
1489         sum = *csum;
1490         if (unlikely(iov_iter_is_pipe(i) || iov_iter_is_discard(i))) {
1491                 WARN_ON(1);
1492                 return false;
1493         }
1494         if (unlikely(i->count < bytes))
1495                 return false;
1496         iterate_all_kinds(i, bytes, v, ({
1497                 next = csum_and_copy_from_user(v.iov_base,
1498                                                (to += v.iov_len) - v.iov_len,
1499                                                v.iov_len);
1500                 if (!next)
1501                         return false;
1502                 sum = csum_block_add(sum, next, off);
1503                 off += v.iov_len;
1504                 0;
1505         }), ({
1506                 char *p = kmap_atomic(v.bv_page);
1507                 sum = csum_and_memcpy((to += v.bv_len) - v.bv_len,
1508                                       p + v.bv_offset, v.bv_len,
1509                                       sum, off);
1510                 kunmap_atomic(p);
1511                 off += v.bv_len;
1512         }),({
1513                 sum = csum_and_memcpy((to += v.iov_len) - v.iov_len,
1514                                       v.iov_base, v.iov_len,
1515                                       sum, off);
1516                 off += v.iov_len;
1517         })
1518         )
1519         *csum = sum;
1520         iov_iter_advance(i, bytes);
1521         return true;
1522 }
1523 EXPORT_SYMBOL(csum_and_copy_from_iter_full);
1524
1525 size_t csum_and_copy_to_iter(const void *addr, size_t bytes, void *csump,
1526                              struct iov_iter *i)
1527 {
1528         const char *from = addr;
1529         __wsum *csum = csump;
1530         __wsum sum, next;
1531         size_t off = 0;
1532
1533         if (unlikely(iov_iter_is_pipe(i)))
1534                 return csum_and_copy_to_pipe_iter(addr, bytes, csum, i);
1535
1536         sum = *csum;
1537         if (unlikely(iov_iter_is_discard(i))) {
1538                 WARN_ON(1);     /* for now */
1539                 return 0;
1540         }
1541         iterate_and_advance(i, bytes, v, ({
1542                 next = csum_and_copy_to_user((from += v.iov_len) - v.iov_len,
1543                                              v.iov_base,
1544                                              v.iov_len);
1545                 if (next) {
1546                         sum = csum_block_add(sum, next, off);
1547                         off += v.iov_len;
1548                 }
1549                 next ? 0 : v.iov_len;
1550         }), ({
1551                 char *p = kmap_atomic(v.bv_page);
1552                 sum = csum_and_memcpy(p + v.bv_offset,
1553                                       (from += v.bv_len) - v.bv_len,
1554                                       v.bv_len, sum, off);
1555                 kunmap_atomic(p);
1556                 off += v.bv_len;
1557         }),({
1558                 sum = csum_and_memcpy(v.iov_base,
1559                                      (from += v.iov_len) - v.iov_len,
1560                                      v.iov_len, sum, off);
1561                 off += v.iov_len;
1562         })
1563         )
1564         *csum = sum;
1565         return bytes;
1566 }
1567 EXPORT_SYMBOL(csum_and_copy_to_iter);
1568
1569 size_t hash_and_copy_to_iter(const void *addr, size_t bytes, void *hashp,
1570                 struct iov_iter *i)
1571 {
1572 #ifdef CONFIG_CRYPTO_HASH
1573         struct ahash_request *hash = hashp;
1574         struct scatterlist sg;
1575         size_t copied;
1576
1577         copied = copy_to_iter(addr, bytes, i);
1578         sg_init_one(&sg, addr, copied);
1579         ahash_request_set_crypt(hash, &sg, NULL, copied);
1580         crypto_ahash_update(hash);
1581         return copied;
1582 #else
1583         return 0;
1584 #endif
1585 }
1586 EXPORT_SYMBOL(hash_and_copy_to_iter);
1587
1588 int iov_iter_npages(const struct iov_iter *i, int maxpages)
1589 {
1590         size_t size = i->count;
1591         int npages = 0;
1592
1593         if (!size)
1594                 return 0;
1595         if (unlikely(iov_iter_is_discard(i)))
1596                 return 0;
1597
1598         if (unlikely(iov_iter_is_pipe(i))) {
1599                 struct pipe_inode_info *pipe = i->pipe;
1600                 unsigned int iter_head;
1601                 size_t off;
1602
1603                 if (!sanity(i))
1604                         return 0;
1605
1606                 data_start(i, &iter_head, &off);
1607                 /* some of this one + all after this one */
1608                 npages = pipe_space_for_user(iter_head, pipe->tail, pipe);
1609                 if (npages >= maxpages)
1610                         return maxpages;
1611         } else iterate_all_kinds(i, size, v, ({
1612                 unsigned long p = (unsigned long)v.iov_base;
1613                 npages += DIV_ROUND_UP(p + v.iov_len, PAGE_SIZE)
1614                         - p / PAGE_SIZE;
1615                 if (npages >= maxpages)
1616                         return maxpages;
1617         0;}),({
1618                 npages++;
1619                 if (npages >= maxpages)
1620                         return maxpages;
1621         }),({
1622                 unsigned long p = (unsigned long)v.iov_base;
1623                 npages += DIV_ROUND_UP(p + v.iov_len, PAGE_SIZE)
1624                         - p / PAGE_SIZE;
1625                 if (npages >= maxpages)
1626                         return maxpages;
1627         })
1628         )
1629         return npages;
1630 }
1631 EXPORT_SYMBOL(iov_iter_npages);
1632
1633 const void *dup_iter(struct iov_iter *new, struct iov_iter *old, gfp_t flags)
1634 {
1635         *new = *old;
1636         if (unlikely(iov_iter_is_pipe(new))) {
1637                 WARN_ON(1);
1638                 return NULL;
1639         }
1640         if (unlikely(iov_iter_is_discard(new)))
1641                 return NULL;
1642         if (iov_iter_is_bvec(new))
1643                 return new->bvec = kmemdup(new->bvec,
1644                                     new->nr_segs * sizeof(struct bio_vec),
1645                                     flags);
1646         else
1647                 /* iovec and kvec have identical layout */
1648                 return new->iov = kmemdup(new->iov,
1649                                    new->nr_segs * sizeof(struct iovec),
1650                                    flags);
1651 }
1652 EXPORT_SYMBOL(dup_iter);
1653
1654 static int copy_compat_iovec_from_user(struct iovec *iov,
1655                 const struct iovec __user *uvec, unsigned long nr_segs)
1656 {
1657         const struct compat_iovec __user *uiov =
1658                 (const struct compat_iovec __user *)uvec;
1659         int ret = -EFAULT, i;
1660
1661         if (!user_access_begin(uvec, nr_segs * sizeof(*uvec)))
1662                 return -EFAULT;
1663
1664         for (i = 0; i < nr_segs; i++) {
1665                 compat_uptr_t buf;
1666                 compat_ssize_t len;
1667
1668                 unsafe_get_user(len, &uiov[i].iov_len, uaccess_end);
1669                 unsafe_get_user(buf, &uiov[i].iov_base, uaccess_end);
1670
1671                 /* check for compat_size_t not fitting in compat_ssize_t .. */
1672                 if (len < 0) {
1673                         ret = -EINVAL;
1674                         goto uaccess_end;
1675                 }
1676                 iov[i].iov_base = compat_ptr(buf);
1677                 iov[i].iov_len = len;
1678         }
1679
1680         ret = 0;
1681 uaccess_end:
1682         user_access_end();
1683         return ret;
1684 }
1685
1686 static int copy_iovec_from_user(struct iovec *iov,
1687                 const struct iovec __user *uvec, unsigned long nr_segs)
1688 {
1689         unsigned long seg;
1690
1691         if (copy_from_user(iov, uvec, nr_segs * sizeof(*uvec)))
1692                 return -EFAULT;
1693         for (seg = 0; seg < nr_segs; seg++) {
1694                 if ((ssize_t)iov[seg].iov_len < 0)
1695                         return -EINVAL;
1696         }
1697
1698         return 0;
1699 }
1700
1701 struct iovec *iovec_from_user(const struct iovec __user *uvec,
1702                 unsigned long nr_segs, unsigned long fast_segs,
1703                 struct iovec *fast_iov, bool compat)
1704 {
1705         struct iovec *iov = fast_iov;
1706         int ret;
1707
1708         /*
1709          * SuS says "The readv() function *may* fail if the iovcnt argument was
1710          * less than or equal to 0, or greater than {IOV_MAX}.  Linux has
1711          * traditionally returned zero for zero segments, so...
1712          */
1713         if (nr_segs == 0)
1714                 return iov;
1715         if (nr_segs > UIO_MAXIOV)
1716                 return ERR_PTR(-EINVAL);
1717         if (nr_segs > fast_segs) {
1718                 iov = kmalloc_array(nr_segs, sizeof(struct iovec), GFP_KERNEL);
1719                 if (!iov)
1720                         return ERR_PTR(-ENOMEM);
1721         }
1722
1723         if (compat)
1724                 ret = copy_compat_iovec_from_user(iov, uvec, nr_segs);
1725         else
1726                 ret = copy_iovec_from_user(iov, uvec, nr_segs);
1727         if (ret) {
1728                 if (iov != fast_iov)
1729                         kfree(iov);
1730                 return ERR_PTR(ret);
1731         }
1732
1733         return iov;
1734 }
1735
1736 ssize_t __import_iovec(int type, const struct iovec __user *uvec,
1737                  unsigned nr_segs, unsigned fast_segs, struct iovec **iovp,
1738                  struct iov_iter *i, bool compat)
1739 {
1740         ssize_t total_len = 0;
1741         unsigned long seg;
1742         struct iovec *iov;
1743
1744         iov = iovec_from_user(uvec, nr_segs, fast_segs, *iovp, compat);
1745         if (IS_ERR(iov)) {
1746                 *iovp = NULL;
1747                 return PTR_ERR(iov);
1748         }
1749
1750         /*
1751          * According to the Single Unix Specification we should return EINVAL if
1752          * an element length is < 0 when cast to ssize_t or if the total length
1753          * would overflow the ssize_t return value of the system call.
1754          *
1755          * Linux caps all read/write calls to MAX_RW_COUNT, and avoids the
1756          * overflow case.
1757          */
1758         for (seg = 0; seg < nr_segs; seg++) {
1759                 ssize_t len = (ssize_t)iov[seg].iov_len;
1760
1761                 if (!access_ok(iov[seg].iov_base, len)) {
1762                         if (iov != *iovp)
1763                                 kfree(iov);
1764                         *iovp = NULL;
1765                         return -EFAULT;
1766                 }
1767
1768                 if (len > MAX_RW_COUNT - total_len) {
1769                         len = MAX_RW_COUNT - total_len;
1770                         iov[seg].iov_len = len;
1771                 }
1772                 total_len += len;
1773         }
1774
1775         iov_iter_init(i, type, iov, nr_segs, total_len);
1776         if (iov == *iovp)
1777                 *iovp = NULL;
1778         else
1779                 *iovp = iov;
1780         return total_len;
1781 }
1782
1783 /**
1784  * import_iovec() - Copy an array of &struct iovec from userspace
1785  *     into the kernel, check that it is valid, and initialize a new
1786  *     &struct iov_iter iterator to access it.
1787  *
1788  * @type: One of %READ or %WRITE.
1789  * @uvec: Pointer to the userspace array.
1790  * @nr_segs: Number of elements in userspace array.
1791  * @fast_segs: Number of elements in @iov.
1792  * @iovp: (input and output parameter) Pointer to pointer to (usually small
1793  *     on-stack) kernel array.
1794  * @i: Pointer to iterator that will be initialized on success.
1795  *
1796  * If the array pointed to by *@iov is large enough to hold all @nr_segs,
1797  * then this function places %NULL in *@iov on return. Otherwise, a new
1798  * array will be allocated and the result placed in *@iov. This means that
1799  * the caller may call kfree() on *@iov regardless of whether the small
1800  * on-stack array was used or not (and regardless of whether this function
1801  * returns an error or not).
1802  *
1803  * Return: Negative error code on error, bytes imported on success
1804  */
1805 ssize_t import_iovec(int type, const struct iovec __user *uvec,
1806                  unsigned nr_segs, unsigned fast_segs,
1807                  struct iovec **iovp, struct iov_iter *i)
1808 {
1809         return __import_iovec(type, uvec, nr_segs, fast_segs, iovp, i,
1810                               in_compat_syscall());
1811 }
1812 EXPORT_SYMBOL(import_iovec);
1813
1814 int import_single_range(int rw, void __user *buf, size_t len,
1815                  struct iovec *iov, struct iov_iter *i)
1816 {
1817         if (len > MAX_RW_COUNT)
1818                 len = MAX_RW_COUNT;
1819         if (unlikely(!access_ok(buf, len)))
1820                 return -EFAULT;
1821
1822         iov->iov_base = buf;
1823         iov->iov_len = len;
1824         iov_iter_init(i, rw, iov, 1, len);
1825         return 0;
1826 }
1827 EXPORT_SYMBOL(import_single_range);
1828
1829 int iov_iter_for_each_range(struct iov_iter *i, size_t bytes,
1830                             int (*f)(struct kvec *vec, void *context),
1831                             void *context)
1832 {
1833         struct kvec w;
1834         int err = -EINVAL;
1835         if (!bytes)
1836                 return 0;
1837
1838         iterate_all_kinds(i, bytes, v, -EINVAL, ({
1839                 w.iov_base = kmap(v.bv_page) + v.bv_offset;
1840                 w.iov_len = v.bv_len;
1841                 err = f(&w, context);
1842                 kunmap(v.bv_page);
1843                 err;}), ({
1844                 w = v;
1845                 err = f(&w, context);})
1846         )
1847         return err;
1848 }
1849 EXPORT_SYMBOL(iov_iter_for_each_range);