mm/process_vm_access.c

   1 /*
   2  * linux/mm/process_vm_access.c
   3  *
   4  * Copyright (C) 2010-2011 Christopher Yeoh <cyeoh@au1.ibm.com>, IBM Corp.
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU General Public License
   8  * as published by the Free Software Foundation; either version
   9  * 2 of the License, or (at your option) any later version.
  10  */
  11
  12 #include <linux/mm.h>
  13 #include <linux/uio.h>
  14 #include <linux/sched.h>
  15 #include <linux/highmem.h>
  16 #include <linux/ptrace.h>
  17 #include <linux/slab.h>
  18 #include <linux/syscalls.h>
  19
  20 #ifdef CONFIG_COMPAT
  21 #include <linux/compat.h>
  22 #endif
  23
  24 /**
  25  * process_vm_rw_pages - read/write pages from task specified
  26  * @task: task to read/write from
  27  * @mm: mm for task
  28  * @process_pages: struct pages area that can store at least
  29  *  nr_pages_to_copy struct page pointers
  30  * @pa: address of page in task to start copying from/to
  31  * @start_offset: offset in page to start copying from/to
  32  * @len: number of bytes to copy
  33  * @lvec: iovec array specifying where to copy to/from
  34  * @lvec_cnt: number of elements in iovec array
  35  * @lvec_current: index in iovec array we are up to
  36  * @lvec_offset: offset in bytes from current iovec iov_base we are up to
  37  * @vm_write: 0 means copy from, 1 means copy to
  38  * @nr_pages_to_copy: number of pages to copy
  39  * @bytes_copied: returns number of bytes successfully copied
  40  * Returns 0 on success, error code otherwise
  41  */
  42 static int process_vm_rw_pages(struct task_struct *task,
  43                                struct mm_struct *mm,
  44                                struct page **process_pages,
  45                                unsigned long pa,
  46                                unsigned long start_offset,
  47                                unsigned long len,
  48                                const struct iovec *lvec,
  49                                unsigned long lvec_cnt,
  50                                unsigned long *lvec_current,
  51                                size_t *lvec_offset,
  52                                int vm_write,
  53                                unsigned int nr_pages_to_copy,
  54                                ssize_t *bytes_copied)
  55 {
  56         int pages_pinned;
  57         void *target_kaddr;
  58         int pgs_copied = 0;
  59         int j;
  60         int ret;
  61         ssize_t bytes_to_copy;
  62         ssize_t rc = 0;
  63
  64         *bytes_copied = 0;
  65
  66         /* Get the pages we're interested in */
  67         down_read(&mm->mmap_sem);
  68         pages_pinned = get_user_pages(task, mm, pa,
  69                                       nr_pages_to_copy,
  70                                       vm_write, 0, process_pages, NULL);
  71         up_read(&mm->mmap_sem);
  72
  73         if (pages_pinned != nr_pages_to_copy) {
  74                 rc = -EFAULT;
  75                 goto end;
  76         }
  77
  78         /* Do the copy for each page */
  79         for (pgs_copied = 0;
  80              (pgs_copied < nr_pages_to_copy) && (*lvec_current < lvec_cnt);
  81              pgs_copied++) {
  82                 /* Make sure we have a non zero length iovec */
  83                 while (*lvec_current < lvec_cnt
  84                        && lvec[*lvec_current].iov_len == 0)
  85                         (*lvec_current)++;
  86                 if (*lvec_current == lvec_cnt)
  87                         break;
  88
  89                 /*
  90                  * Will copy smallest of:
  91                  * - bytes remaining in page
  92                  * - bytes remaining in destination iovec
  93                  */
  94                 bytes_to_copy = min_t(ssize_t, PAGE_SIZE - start_offset,
  95                                       len - *bytes_copied);
  96                 bytes_to_copy = min_t(ssize_t, bytes_to_copy,
  97                                       lvec[*lvec_current].iov_len
  98                                       - *lvec_offset);
  99
 100                 target_kaddr = kmap(process_pages[pgs_copied]) + start_offset;
 101
 102                 if (vm_write)
 103                         ret = copy_from_user(target_kaddr,
 104                                              lvec[*lvec_current].iov_base
 105                                              + *lvec_offset,
 106                                              bytes_to_copy);
 107                 else
 108                         ret = copy_to_user(lvec[*lvec_current].iov_base
 109                                            + *lvec_offset,
 110                                            target_kaddr, bytes_to_copy);
 111                 kunmap(process_pages[pgs_copied]);
 112                 if (ret) {
 113                         *bytes_copied += bytes_to_copy - ret;
 114                         pgs_copied++;
 115                         rc = -EFAULT;
 116                         goto end;
 117                 }
 118                 *bytes_copied += bytes_to_copy;
 119                 *lvec_offset += bytes_to_copy;
 120                 if (*lvec_offset == lvec[*lvec_current].iov_len) {
 121                         /*
 122                          * Need to copy remaining part of page into the
 123                          * next iovec if there are any bytes left in page
 124                          */
 125                         (*lvec_current)++;
 126                         *lvec_offset = 0;
 127                         start_offset = (start_offset + bytes_to_copy)
 128                                 % PAGE_SIZE;
 129                         if (start_offset)
 130                                 pgs_copied--;
 131                 } else {
 132                         start_offset = 0;
 133                 }
 134         }
 135
 136 end:
 137         if (vm_write) {
 138                 for (j = 0; j < pages_pinned; j++) {
 139                         if (j < pgs_copied)
 140                                 set_page_dirty_lock(process_pages[j]);
 141                         put_page(process_pages[j]);
 142                 }
 143         } else {
 144                 for (j = 0; j < pages_pinned; j++)
 145                         put_page(process_pages[j]);
 146         }
 147
 148         return rc;
 149 }
 150
 151 /* Maximum number of pages kmalloc'd to hold struct page's during copy */
 152 #define PVM_MAX_KMALLOC_PAGES (PAGE_SIZE * 2)
 153
 154 /**
 155  * process_vm_rw_single_vec - read/write pages from task specified
 156  * @addr: start memory address of target process
 157  * @len: size of area to copy to/from
 158  * @lvec: iovec array specifying where to copy to/from locally
 159  * @lvec_cnt: number of elements in iovec array
 160  * @lvec_current: index in iovec array we are up to
 161  * @lvec_offset: offset in bytes from current iovec iov_base we are up to
 162  * @process_pages: struct pages area that can store at least
 163  *  nr_pages_to_copy struct page pointers
 164  * @mm: mm for task
 165  * @task: task to read/write from
 166  * @vm_write: 0 means copy from, 1 means copy to
 167  * @bytes_copied: returns number of bytes successfully copied
 168  * Returns 0 on success or on failure error code
 169  */
 170 static int process_vm_rw_single_vec(unsigned long addr,
 171                                     unsigned long len,
 172                                     const struct iovec *lvec,
 173                                     unsigned long lvec_cnt,
 174                                     unsigned long *lvec_current,
 175                                     size_t *lvec_offset,
 176                                     struct page **process_pages,
 177                                     struct mm_struct *mm,
 178                                     struct task_struct *task,
 179                                     int vm_write,
 180                                     ssize_t *bytes_copied)
 181 {
 182         unsigned long pa = addr & PAGE_MASK;
 183         unsigned long start_offset = addr - pa;
 184         unsigned long nr_pages;
 185         ssize_t bytes_copied_loop;
 186         ssize_t rc = 0;
 187         unsigned long nr_pages_copied = 0;
 188         unsigned long nr_pages_to_copy;
 189         unsigned long max_pages_per_loop = PVM_MAX_KMALLOC_PAGES
 190                 / sizeof(struct pages *);
 191
 192         *bytes_copied = 0;
 193
 194         /* Work out address and page range required */
 195         if (len == 0)
 196                 return 0;
 197         nr_pages = (addr + len - 1) / PAGE_SIZE - addr / PAGE_SIZE + 1;
 198
 199         while ((nr_pages_copied < nr_pages) && (*lvec_current < lvec_cnt)) {
 200                 nr_pages_to_copy = min(nr_pages - nr_pages_copied,
 201                                        max_pages_per_loop);
 202
 203                 rc = process_vm_rw_pages(task, mm, process_pages, pa,
 204                                          start_offset, len,
 205                                          lvec, lvec_cnt,
 206                                          lvec_current, lvec_offset,
 207                                          vm_write, nr_pages_to_copy,
 208                                          &bytes_copied_loop);
 209                 start_offset = 0;
 210                 *bytes_copied += bytes_copied_loop;
 211
 212                 if (rc < 0) {
 213                         return rc;
 214                 } else {
 215                         len -= bytes_copied_loop;
 216                         nr_pages_copied += nr_pages_to_copy;
 217                         pa += nr_pages_to_copy * PAGE_SIZE;
 218                 }
 219         }
 220
 221         return rc;
 222 }
 223
 224 /* Maximum number of entries for process pages array
 225    which lives on stack */
 226 #define PVM_MAX_PP_ARRAY_COUNT 16
 227
 228 /**
 229  * process_vm_rw_core - core of reading/writing pages from task specified
 230  * @pid: PID of process to read/write from/to
 231  * @lvec: iovec array specifying where to copy to/from locally
 232  * @liovcnt: size of lvec array
 233  * @rvec: iovec array specifying where to copy to/from in the other process
 234  * @riovcnt: size of rvec array
 235  * @flags: currently unused
 236  * @vm_write: 0 if reading from other process, 1 if writing to other process
 237  * Returns the number of bytes read/written or error code. May
 238  *  return less bytes than expected if an error occurs during the copying
 239  *  process.
 240  */
 241 static ssize_t process_vm_rw_core(pid_t pid, const struct iovec *lvec,
 242                                   unsigned long liovcnt,
 243                                   const struct iovec *rvec,
 244                                   unsigned long riovcnt,
 245                                   unsigned long flags, int vm_write)
 246 {
 247         struct task_struct *task;
 248         struct page *pp_stack[PVM_MAX_PP_ARRAY_COUNT];
 249         struct page **process_pages = pp_stack;
 250         struct mm_struct *mm;
 251         unsigned long i;
 252         ssize_t rc = 0;
 253         ssize_t bytes_copied_loop;
 254         ssize_t bytes_copied = 0;
 255         unsigned long nr_pages = 0;
 256         unsigned long nr_pages_iov;
 257         unsigned long iov_l_curr_idx = 0;
 258         size_t iov_l_curr_offset = 0;
 259         ssize_t iov_len;
 260
 261         /*
 262          * Work out how many pages of struct pages we're going to need
 263          * when eventually calling get_user_pages
 264          */
 265         for (i = 0; i < riovcnt; i++) {
 266                 iov_len = rvec[i].iov_len;
 267                 if (iov_len > 0) {
 268                         nr_pages_iov = ((unsigned long)rvec[i].iov_base
 269                                         + iov_len)
 270                                 / PAGE_SIZE - (unsigned long)rvec[i].iov_base
 271                                 / PAGE_SIZE + 1;
 272                         nr_pages = max(nr_pages, nr_pages_iov);
 273                 }
 274         }
 275
 276         if (nr_pages == 0)
 277                 return 0;
 278
 279         if (nr_pages > PVM_MAX_PP_ARRAY_COUNT) {
 280                 /* For reliability don't try to kmalloc more than
 281                    2 pages worth */
 282                 process_pages = kmalloc(min_t(size_t, PVM_MAX_KMALLOC_PAGES,
 283                                               sizeof(struct pages *)*nr_pages),
 284                                         GFP_KERNEL);
 285
 286                 if (!process_pages)
 287                         return -ENOMEM;
 288         }
 289
 290         /* Get process information */
 291         rcu_read_lock();
 292         task = find_task_by_vpid(pid);
 293         if (task)
 294                 get_task_struct(task);
 295         rcu_read_unlock();
 296         if (!task) {
 297                 rc = -ESRCH;
 298                 goto free_proc_pages;
 299         }
 300
 301         mm = mm_access(task, PTRACE_MODE_ATTACH);
 302         if (!mm || IS_ERR(mm)) {
 303                 rc = IS_ERR(mm) ? PTR_ERR(mm) : -ESRCH;
 304                 /*
 305                  * Explicitly map EACCES to EPERM as EPERM is a more a
 306                  * appropriate error code for process_vw_readv/writev
 307                  */
 308                 if (rc == -EACCES)
 309                         rc = -EPERM;
 310                 goto put_task_struct;
 311         }
 312
 313         for (i = 0; i < riovcnt && iov_l_curr_idx < liovcnt; i++) {
 314                 rc = process_vm_rw_single_vec(
 315                         (unsigned long)rvec[i].iov_base, rvec[i].iov_len,
 316                         lvec, liovcnt, &iov_l_curr_idx, &iov_l_curr_offset,
 317                         process_pages, mm, task, vm_write, &bytes_copied_loop);
 318                 bytes_copied += bytes_copied_loop;
 319                 if (rc != 0) {
 320                         /* If we have managed to copy any data at all then
 321                            we return the number of bytes copied. Otherwise
 322                            we return the error code */
 323                         if (bytes_copied)
 324                                 rc = bytes_copied;
 325                         goto put_mm;
 326                 }
 327         }
 328
 329         rc = bytes_copied;
 330 put_mm:
 331         mmput(mm);
 332
 333 put_task_struct:
 334         put_task_struct(task);
 335
 336 free_proc_pages:
 337         if (process_pages != pp_stack)
 338                 kfree(process_pages);
 339         return rc;
 340 }
 341
 342 /**
 343  * process_vm_rw - check iovecs before calling core routine
 344  * @pid: PID of process to read/write from/to
 345  * @lvec: iovec array specifying where to copy to/from locally
 346  * @liovcnt: size of lvec array
 347  * @rvec: iovec array specifying where to copy to/from in the other process
 348  * @riovcnt: size of rvec array
 349  * @flags: currently unused
 350  * @vm_write: 0 if reading from other process, 1 if writing to other process
 351  * Returns the number of bytes read/written or error code. May
 352  *  return less bytes than expected if an error occurs during the copying
 353  *  process.
 354  */
 355 static ssize_t process_vm_rw(pid_t pid,
 356                              const struct iovec __user *lvec,
 357                              unsigned long liovcnt,
 358                              const struct iovec __user *rvec,
 359                              unsigned long riovcnt,
 360                              unsigned long flags, int vm_write)
 361 {
 362         struct iovec iovstack_l[UIO_FASTIOV];
 363         struct iovec iovstack_r[UIO_FASTIOV];
 364         struct iovec *iov_l = iovstack_l;
 365         struct iovec *iov_r = iovstack_r;
 366         ssize_t rc;
 367
 368         if (flags != 0)
 369                 return -EINVAL;
 370
 371         /* Check iovecs */
 372         if (vm_write)
 373                 rc = rw_copy_check_uvector(WRITE, lvec, liovcnt, UIO_FASTIOV,
 374                                            iovstack_l, &iov_l, 1);
 375         else
 376                 rc = rw_copy_check_uvector(READ, lvec, liovcnt, UIO_FASTIOV,
 377                                            iovstack_l, &iov_l, 1);
 378         if (rc <= 0)
 379                 goto free_iovecs;
 380
 381         rc = rw_copy_check_uvector(READ, rvec, riovcnt, UIO_FASTIOV,
 382                                    iovstack_r, &iov_r, 0);
 383         if (rc <= 0)
 384                 goto free_iovecs;
 385
 386         rc = process_vm_rw_core(pid, iov_l, liovcnt, iov_r, riovcnt, flags,
 387                                 vm_write);
 388
 389 free_iovecs:
 390         if (iov_r != iovstack_r)
 391                 kfree(iov_r);
 392         if (iov_l != iovstack_l)
 393                 kfree(iov_l);
 394
 395         return rc;
 396 }
 397
 398 SYSCALL_DEFINE6(process_vm_readv, pid_t, pid, const struct iovec __user *, lvec,
 399                 unsigned long, liovcnt, const struct iovec __user *, rvec,
 400                 unsigned long, riovcnt, unsigned long, flags)
 401 {
 402         return process_vm_rw(pid, lvec, liovcnt, rvec, riovcnt, flags, 0);
 403 }
 404
 405 SYSCALL_DEFINE6(process_vm_writev, pid_t, pid,
 406                 const struct iovec __user *, lvec,
 407                 unsigned long, liovcnt, const struct iovec __user *, rvec,
 408                 unsigned long, riovcnt, unsigned long, flags)
 409 {
 410         return process_vm_rw(pid, lvec, liovcnt, rvec, riovcnt, flags, 1);
 411 }
 412
 413 #ifdef CONFIG_COMPAT
 414
 415 asmlinkage ssize_t
 416 compat_process_vm_rw(compat_pid_t pid,
 417                      const struct compat_iovec __user *lvec,
 418                      unsigned long liovcnt,
 419                      const struct compat_iovec __user *rvec,
 420                      unsigned long riovcnt,
 421                      unsigned long flags, int vm_write)
 422 {
 423         struct iovec iovstack_l[UIO_FASTIOV];
 424         struct iovec iovstack_r[UIO_FASTIOV];
 425         struct iovec *iov_l = iovstack_l;
 426         struct iovec *iov_r = iovstack_r;
 427         ssize_t rc = -EFAULT;
 428
 429         if (flags != 0)
 430                 return -EINVAL;
 431
 432         if (!access_ok(VERIFY_READ, lvec, liovcnt * sizeof(*lvec)))
 433                 goto out;
 434
 435         if (!access_ok(VERIFY_READ, rvec, riovcnt * sizeof(*rvec)))
 436                 goto out;
 437
 438         if (vm_write)
 439                 rc = compat_rw_copy_check_uvector(WRITE, lvec, liovcnt,
 440                                                   UIO_FASTIOV, iovstack_l,
 441                                                   &iov_l, 1);
 442         else
 443                 rc = compat_rw_copy_check_uvector(READ, lvec, liovcnt,
 444                                                   UIO_FASTIOV, iovstack_l,
 445                                                   &iov_l, 1);
 446         if (rc <= 0)
 447                 goto free_iovecs;
 448         rc = compat_rw_copy_check_uvector(READ, rvec, riovcnt,
 449                                           UIO_FASTIOV, iovstack_r,
 450                                           &iov_r, 0);
 451         if (rc <= 0)
 452                 goto free_iovecs;
 453
 454         rc = process_vm_rw_core(pid, iov_l, liovcnt, iov_r, riovcnt, flags,
 455                            vm_write);
 456
 457 free_iovecs:
 458         if (iov_r != iovstack_r)
 459                 kfree(iov_r);
 460         if (iov_l != iovstack_l)
 461                 kfree(iov_l);
 462
 463 out:
 464         return rc;
 465 }
 466
 467 asmlinkage ssize_t
 468 compat_sys_process_vm_readv(compat_pid_t pid,
 469                             const struct compat_iovec __user *lvec,
 470                             unsigned long liovcnt,
 471                             const struct compat_iovec __user *rvec,
 472                             unsigned long riovcnt,
 473                             unsigned long flags)
 474 {
 475         return compat_process_vm_rw(pid, lvec, liovcnt, rvec,
 476                                     riovcnt, flags, 0);
 477 }
 478
 479 asmlinkage ssize_t
 480 compat_sys_process_vm_writev(compat_pid_t pid,
 481                              const struct compat_iovec __user *lvec,
 482                              unsigned long liovcnt,
 483                              const struct compat_iovec __user *rvec,
 484                              unsigned long riovcnt,
 485                              unsigned long flags)
 486 {
 487         return compat_process_vm_rw(pid, lvec, liovcnt, rvec,
 488                                     riovcnt, flags, 1);
 489 }
 490
 491 #endif