1 /* mm/ashmem.c
2 *
3 * Anonymous Shared Memory Subsystem, ashmem
4 *
5 * Copyright (C) 2008 Google, Inc.
6 *
7 * Robert Love <rlove@google.com>
8 *
9 * This software is licensed under the terms of the GNU General Public
10 * License version 2, as published by the Free Software Foundation, and
11 * may be copied, distributed, and modified under those terms.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 */
18
19 #define pr_fmt(fmt) "ashmem: " fmt
20
21 #include <linux/module.h>
22 #include <linux/file.h>
23 #include <linux/fs.h>
24 #include <linux/falloc.h>
25 #include <linux/miscdevice.h>
26 #include <linux/security.h>
27 #include <linux/mm.h>
28 #include <linux/mman.h>
29 #include <linux/uaccess.h>
30 #include <linux/personality.h>
31 #include <linux/bitops.h>
32 #include <linux/mutex.h>
33 #include <linux/shmem_fs.h>
34 #include "ashmem.h"
35
36 #define ASHMEM_NAME_PREFIX "dev/ashmem/"
37 #define ASHMEM_NAME_PREFIX_LEN (sizeof(ASHMEM_NAME_PREFIX) - 1)
38 #define ASHMEM_FULL_NAME_LEN (ASHMEM_NAME_LEN + ASHMEM_NAME_PREFIX_LEN)
39
40 /**
41 * struct ashmem_area - The anonymous shared memory area
42 * @name: The optional name in /proc/pid/maps
43 * @unpinned_list: The list of all ashmem areas
44 * @file: The shmem-based backing file
45 * @size: The size of the mapping, in bytes
46 * @prot_masks: The allowed protection bits, as vm_flags
47 *
48 * The lifecycle of this structure is from our parent file's open() until
49 * its release(). It is also protected by 'ashmem_mutex'
50 *
51 * Warning: Mappings do NOT pin this structure; It dies on close()
52 */
53 struct ashmem_area {
54 char name[ASHMEM_FULL_NAME_LEN];
55 struct list_head unpinned_list;
56 struct file *file;
57 size_t size;
58 unsigned long prot_mask;
59 };
60
61 /**
62 * struct ashmem_range - A range of unpinned/evictable pages
63 * @lru: The entry in the LRU list
64 * @unpinned: The entry in its area's unpinned list
65 * @asma: The associated anonymous shared memory area.
66 * @pgstart: The starting page (inclusive)
67 * @pgend: The ending page (inclusive)
68 * @purged: The purge status (ASHMEM_NOT or ASHMEM_WAS_PURGED)
69 *
70 * The lifecycle of this structure is from unpin to pin.
71 * It is protected by 'ashmem_mutex'
72 */
73 struct ashmem_range {
74 struct list_head lru;
75 struct list_head unpinned;
76 struct ashmem_area *asma;
77 size_t pgstart;
78 size_t pgend;
79 unsigned int purged;
80 };
81
82 /* LRU list of unpinned pages, protected by ashmem_mutex */
83 static LIST_HEAD(ashmem_lru_list);
84
85 /**
86 * long lru_count - The count of pages on our LRU list.
87 *
88 * This is protected by ashmem_mutex.
89 */
90 static unsigned long lru_count;
91
92 /**
93 * ashmem_mutex - protects the list of and each individual ashmem_area
94 *
95 * Lock Ordering: ashmex_mutex -> i_mutex -> i_alloc_sem
96 */
97 static DEFINE_MUTEX(ashmem_mutex);
98
99 static struct kmem_cache *ashmem_area_cachep __read_mostly;
100 static struct kmem_cache *ashmem_range_cachep __read_mostly;
101
102 #define range_size(range) \
103 ((range)->pgend - (range)->pgstart + 1)
104
105 #define range_on_lru(range) \
106 ((range)->purged == ASHMEM_NOT_PURGED)
107
108 #define page_range_subsumes_range(range, start, end) \
109 (((range)->pgstart >= (start)) && ((range)->pgend <= (end)))
110
111 #define page_range_subsumed_by_range(range, start, end) \
112 (((range)->pgstart <= (start)) && ((range)->pgend >= (end)))
113
114 #define page_in_range(range, page) \
115 (((range)->pgstart <= (page)) && ((range)->pgend >= (page)))
116
117 #define page_range_in_range(range, start, end) \
118 (page_in_range(range, start) || page_in_range(range, end) || \
119 page_range_subsumes_range(range, start, end))
120
121 #define range_before_page(range, page) \
122 ((range)->pgend < (page))
123
124 #define PROT_MASK (PROT_EXEC | PROT_READ | PROT_WRITE)
125
126 /**
127 * lru_add() - Adds a range of memory to the LRU list
128 * @range: The memory range being added.
129 *
130 * The range is first added to the end (tail) of the LRU list.
131 * After this, the size of the range is added to @lru_count
132 */
lru_add(struct ashmem_range * range)133 static inline void lru_add(struct ashmem_range *range)
134 {
135 list_add_tail(&range->lru, &ashmem_lru_list);
136 lru_count += range_size(range);
137 }
138
139 /**
140 * lru_del() - Removes a range of memory from the LRU list
141 * @range: The memory range being removed
142 *
143 * The range is first deleted from the LRU list.
144 * After this, the size of the range is removed from @lru_count
145 */
lru_del(struct ashmem_range * range)146 static inline void lru_del(struct ashmem_range *range)
147 {
148 list_del(&range->lru);
149 lru_count -= range_size(range);
150 }
151
152 /**
153 * range_alloc() - Allocates and initializes a new ashmem_range structure
154 * @asma: The associated ashmem_area
155 * @prev_range: The previous ashmem_range in the sorted asma->unpinned list
156 * @purged: Initial purge status (ASMEM_NOT_PURGED or ASHMEM_WAS_PURGED)
157 * @start: The starting page (inclusive)
158 * @end: The ending page (inclusive)
159 *
160 * This function is protected by ashmem_mutex.
161 *
162 * Return: 0 if successful, or -ENOMEM if there is an error
163 */
range_alloc(struct ashmem_area * asma,struct ashmem_range * prev_range,unsigned int purged,size_t start,size_t end)164 static int range_alloc(struct ashmem_area *asma,
165 struct ashmem_range *prev_range, unsigned int purged,
166 size_t start, size_t end)
167 {
168 struct ashmem_range *range;
169
170 range = kmem_cache_zalloc(ashmem_range_cachep, GFP_KERNEL);
171 if (unlikely(!range))
172 return -ENOMEM;
173
174 range->asma = asma;
175 range->pgstart = start;
176 range->pgend = end;
177 range->purged = purged;
178
179 list_add_tail(&range->unpinned, &prev_range->unpinned);
180
181 if (range_on_lru(range))
182 lru_add(range);
183
184 return 0;
185 }
186
187 /**
188 * range_del() - Deletes and dealloctes an ashmem_range structure
189 * @range: The associated ashmem_range that has previously been allocated
190 */
range_del(struct ashmem_range * range)191 static void range_del(struct ashmem_range *range)
192 {
193 list_del(&range->unpinned);
194 if (range_on_lru(range))
195 lru_del(range);
196 kmem_cache_free(ashmem_range_cachep, range);
197 }
198
199 /**
200 * range_shrink() - Shrinks an ashmem_range
201 * @range: The associated ashmem_range being shrunk
202 * @start: The starting byte of the new range
203 * @end: The ending byte of the new range
204 *
205 * This does not modify the data inside the existing range in any way - It
206 * simply shrinks the boundaries of the range.
207 *
208 * Theoretically, with a little tweaking, this could eventually be changed
209 * to range_resize, and expand the lru_count if the new range is larger.
210 */
range_shrink(struct ashmem_range * range,size_t start,size_t end)211 static inline void range_shrink(struct ashmem_range *range,
212 size_t start, size_t end)
213 {
214 size_t pre = range_size(range);
215
216 range->pgstart = start;
217 range->pgend = end;
218
219 if (range_on_lru(range))
220 lru_count -= pre - range_size(range);
221 }
222
223 /**
224 * ashmem_open() - Opens an Anonymous Shared Memory structure
225 * @inode: The backing file's index node(?)
226 * @file: The backing file
227 *
228 * Please note that the ashmem_area is not returned by this function - It is
229 * instead written to "file->private_data".
230 *
231 * Return: 0 if successful, or another code if unsuccessful.
232 */
ashmem_open(struct inode * inode,struct file * file)233 static int ashmem_open(struct inode *inode, struct file *file)
234 {
235 struct ashmem_area *asma;
236 int ret;
237
238 ret = generic_file_open(inode, file);
239 if (unlikely(ret))
240 return ret;
241
242 asma = kmem_cache_zalloc(ashmem_area_cachep, GFP_KERNEL);
243 if (unlikely(!asma))
244 return -ENOMEM;
245
246 INIT_LIST_HEAD(&asma->unpinned_list);
247 memcpy(asma->name, ASHMEM_NAME_PREFIX, ASHMEM_NAME_PREFIX_LEN);
248 asma->prot_mask = PROT_MASK;
249 file->private_data = asma;
250
251 return 0;
252 }
253
254 /**
255 * ashmem_release() - Releases an Anonymous Shared Memory structure
256 * @ignored: The backing file's Index Node(?) - It is ignored here.
257 * @file: The backing file
258 *
259 * Return: 0 if successful. If it is anything else, go have a coffee and
260 * try again.
261 */
ashmem_release(struct inode * ignored,struct file * file)262 static int ashmem_release(struct inode *ignored, struct file *file)
263 {
264 struct ashmem_area *asma = file->private_data;
265 struct ashmem_range *range, *next;
266
267 mutex_lock(&ashmem_mutex);
268 list_for_each_entry_safe(range, next, &asma->unpinned_list, unpinned)
269 range_del(range);
270 mutex_unlock(&ashmem_mutex);
271
272 if (asma->file)
273 fput(asma->file);
274 kmem_cache_free(ashmem_area_cachep, asma);
275
276 return 0;
277 }
278
279 /**
280 * ashmem_read() - Reads a set of bytes from an Ashmem-enabled file
281 * @file: The associated backing file.
282 * @buf: The buffer of data being written to
283 * @len: The number of bytes being read
284 * @pos: The position of the first byte to read.
285 *
286 * Return: 0 if successful, or another return code if not.
287 */
ashmem_read(struct file * file,char __user * buf,size_t len,loff_t * pos)288 static ssize_t ashmem_read(struct file *file, char __user *buf,
289 size_t len, loff_t *pos)
290 {
291 struct ashmem_area *asma = file->private_data;
292 int ret = 0;
293
294 mutex_lock(&ashmem_mutex);
295
296 /* If size is not set, or set to 0, always return EOF. */
297 if (asma->size == 0)
298 goto out_unlock;
299
300 if (!asma->file) {
301 ret = -EBADF;
302 goto out_unlock;
303 }
304
305 mutex_unlock(&ashmem_mutex);
306
307 /*
308 * asma and asma->file are used outside the lock here. We assume
309 * once asma->file is set it will never be changed, and will not
310 * be destroyed until all references to the file are dropped and
311 * ashmem_release is called.
312 */
313 ret = asma->file->f_op->read(asma->file, buf, len, pos);
314 if (ret >= 0) {
315 /** Update backing file pos, since f_ops->read() doesn't */
316 asma->file->f_pos = *pos;
317 }
318 return ret;
319
320 out_unlock:
321 mutex_unlock(&ashmem_mutex);
322 return ret;
323 }
324
ashmem_llseek(struct file * file,loff_t offset,int origin)325 static loff_t ashmem_llseek(struct file *file, loff_t offset, int origin)
326 {
327 struct ashmem_area *asma = file->private_data;
328 int ret;
329
330 mutex_lock(&ashmem_mutex);
331
332 if (asma->size == 0) {
333 ret = -EINVAL;
334 goto out;
335 }
336
337 if (!asma->file) {
338 ret = -EBADF;
339 goto out;
340 }
341
342 ret = vfs_llseek(asma->file, offset, origin);
343 if (ret < 0)
344 goto out;
345
346 /** Copy f_pos from backing file, since f_ops->llseek() sets it */
347 file->f_pos = asma->file->f_pos;
348
349 out:
350 mutex_unlock(&ashmem_mutex);
351 return ret;
352 }
353
calc_vm_may_flags(unsigned long prot)354 static inline vm_flags_t calc_vm_may_flags(unsigned long prot)
355 {
356 return _calc_vm_trans(prot, PROT_READ, VM_MAYREAD) |
357 _calc_vm_trans(prot, PROT_WRITE, VM_MAYWRITE) |
358 _calc_vm_trans(prot, PROT_EXEC, VM_MAYEXEC);
359 }
360
ashmem_mmap(struct file * file,struct vm_area_struct * vma)361 static int ashmem_mmap(struct file *file, struct vm_area_struct *vma)
362 {
363 struct ashmem_area *asma = file->private_data;
364 int ret = 0;
365
366 mutex_lock(&ashmem_mutex);
367
368 /* user needs to SET_SIZE before mapping */
369 if (unlikely(!asma->size)) {
370 ret = -EINVAL;
371 goto out;
372 }
373
374 /* requested protection bits must match our allowed protection mask */
375 if (unlikely((vma->vm_flags & ~calc_vm_prot_bits(asma->prot_mask)) &
376 calc_vm_prot_bits(PROT_MASK))) {
377 ret = -EPERM;
378 goto out;
379 }
380 vma->vm_flags &= ~calc_vm_may_flags(~asma->prot_mask);
381
382 if (!asma->file) {
383 char *name = ASHMEM_NAME_DEF;
384 struct file *vmfile;
385
386 if (asma->name[ASHMEM_NAME_PREFIX_LEN] != '\0')
387 name = asma->name;
388
389 /* ... and allocate the backing shmem file */
390 vmfile = shmem_file_setup(name, asma->size, vma->vm_flags);
391 if (unlikely(IS_ERR(vmfile))) {
392 ret = PTR_ERR(vmfile);
393 goto out;
394 }
395 vmfile->f_mode |= FMODE_LSEEK;
396 asma->file = vmfile;
397 }
398 get_file(asma->file);
399
400 if (vma->vm_flags & VM_SHARED)
401 shmem_set_file(vma, asma->file);
402 else {
403 if (vma->vm_file)
404 fput(vma->vm_file);
405 vma->vm_file = asma->file;
406 }
407
408 out:
409 mutex_unlock(&ashmem_mutex);
410 return ret;
411 }
412
413 /*
414 * ashmem_shrink - our cache shrinker, called from mm/vmscan.c :: shrink_slab
415 *
416 * 'nr_to_scan' is the number of objects to scan for freeing.
417 *
418 * 'gfp_mask' is the mask of the allocation that got us into this mess.
419 *
420 * Return value is the number of objects freed or -1 if we cannot
421 * proceed without risk of deadlock (due to gfp_mask).
422 *
423 * We approximate LRU via least-recently-unpinned, jettisoning unpinned partial
424 * chunks of ashmem regions LRU-wise one-at-a-time until we hit 'nr_to_scan'
425 * pages freed.
426 */
427 static unsigned long
ashmem_shrink_scan(struct shrinker * shrink,struct shrink_control * sc)428 ashmem_shrink_scan(struct shrinker *shrink, struct shrink_control *sc)
429 {
430 struct ashmem_range *range, *next;
431 unsigned long freed = 0;
432
433 /* We might recurse into filesystem code, so bail out if necessary */
434 if (!(sc->gfp_mask & __GFP_FS))
435 return SHRINK_STOP;
436
437 if (!mutex_trylock(&ashmem_mutex))
438 return -1;
439
440 list_for_each_entry_safe(range, next, &ashmem_lru_list, lru) {
441 loff_t start = range->pgstart * PAGE_SIZE;
442 loff_t end = (range->pgend + 1) * PAGE_SIZE;
443
444 range->asma->file->f_op->fallocate(range->asma->file,
445 FALLOC_FL_PUNCH_HOLE | FALLOC_FL_KEEP_SIZE,
446 start, end - start);
447 range->purged = ASHMEM_WAS_PURGED;
448 lru_del(range);
449
450 freed += range_size(range);
451 if (--sc->nr_to_scan <= 0)
452 break;
453 }
454 mutex_unlock(&ashmem_mutex);
455 return freed;
456 }
457
458 static unsigned long
ashmem_shrink_count(struct shrinker * shrink,struct shrink_control * sc)459 ashmem_shrink_count(struct shrinker *shrink, struct shrink_control *sc)
460 {
461 /*
462 * note that lru_count is count of pages on the lru, not a count of
463 * objects on the list. This means the scan function needs to return the
464 * number of pages freed, not the number of objects scanned.
465 */
466 return lru_count;
467 }
468
469 static struct shrinker ashmem_shrinker = {
470 .count_objects = ashmem_shrink_count,
471 .scan_objects = ashmem_shrink_scan,
472 /*
473 * XXX (dchinner): I wish people would comment on why they need on
474 * significant changes to the default value here
475 */
476 .seeks = DEFAULT_SEEKS * 4,
477 };
478
set_prot_mask(struct ashmem_area * asma,unsigned long prot)479 static int set_prot_mask(struct ashmem_area *asma, unsigned long prot)
480 {
481 int ret = 0;
482
483 mutex_lock(&ashmem_mutex);
484
485 /* the user can only remove, not add, protection bits */
486 if (unlikely((asma->prot_mask & prot) != prot)) {
487 ret = -EINVAL;
488 goto out;
489 }
490
491 /* does the application expect PROT_READ to imply PROT_EXEC? */
492 if ((prot & PROT_READ) && (current->personality & READ_IMPLIES_EXEC))
493 prot |= PROT_EXEC;
494
495 asma->prot_mask = prot;
496
497 out:
498 mutex_unlock(&ashmem_mutex);
499 return ret;
500 }
501
set_name(struct ashmem_area * asma,void __user * name)502 static int set_name(struct ashmem_area *asma, void __user *name)
503 {
504 int len;
505 int ret = 0;
506 char local_name[ASHMEM_NAME_LEN];
507
508 /*
509 * Holding the ashmem_mutex while doing a copy_from_user might cause
510 * an data abort which would try to access mmap_sem. If another
511 * thread has invoked ashmem_mmap then it will be holding the
512 * semaphore and will be waiting for ashmem_mutex, there by leading to
513 * deadlock. We'll release the mutex and take the name to a local
514 * variable that does not need protection and later copy the local
515 * variable to the structure member with lock held.
516 */
517 len = strncpy_from_user(local_name, name, ASHMEM_NAME_LEN);
518 if (len < 0)
519 return len;
520 if (len == ASHMEM_NAME_LEN)
521 local_name[ASHMEM_NAME_LEN - 1] = '\0';
522 mutex_lock(&ashmem_mutex);
523 /* cannot change an existing mapping's name */
524 if (unlikely(asma->file))
525 ret = -EINVAL;
526 else
527 strcpy(asma->name + ASHMEM_NAME_PREFIX_LEN, local_name);
528
529 mutex_unlock(&ashmem_mutex);
530 return ret;
531 }
532
get_name(struct ashmem_area * asma,void __user * name)533 static int get_name(struct ashmem_area *asma, void __user *name)
534 {
535 int ret = 0;
536 size_t len;
537 /*
538 * Have a local variable to which we'll copy the content
539 * from asma with the lock held. Later we can copy this to the user
540 * space safely without holding any locks. So even if we proceed to
541 * wait for mmap_sem, it won't lead to deadlock.
542 */
543 char local_name[ASHMEM_NAME_LEN];
544
545 mutex_lock(&ashmem_mutex);
546 if (asma->name[ASHMEM_NAME_PREFIX_LEN] != '\0') {
547
548 /*
549 * Copying only `len', instead of ASHMEM_NAME_LEN, bytes
550 * prevents us from revealing one user's stack to another.
551 */
552 len = strlen(asma->name + ASHMEM_NAME_PREFIX_LEN) + 1;
553 memcpy(local_name, asma->name + ASHMEM_NAME_PREFIX_LEN, len);
554 } else {
555 len = sizeof(ASHMEM_NAME_DEF);
556 memcpy(local_name, ASHMEM_NAME_DEF, len);
557 }
558 mutex_unlock(&ashmem_mutex);
559
560 /*
561 * Now we are just copying from the stack variable to userland
562 * No lock held
563 */
564 if (unlikely(copy_to_user(name, local_name, len)))
565 ret = -EFAULT;
566 return ret;
567 }
568
569 /*
570 * ashmem_pin - pin the given ashmem region, returning whether it was
571 * previously purged (ASHMEM_WAS_PURGED) or not (ASHMEM_NOT_PURGED).
572 *
573 * Caller must hold ashmem_mutex.
574 */
ashmem_pin(struct ashmem_area * asma,size_t pgstart,size_t pgend)575 static int ashmem_pin(struct ashmem_area *asma, size_t pgstart, size_t pgend)
576 {
577 struct ashmem_range *range, *next;
578 int ret = ASHMEM_NOT_PURGED;
579
580 list_for_each_entry_safe(range, next, &asma->unpinned_list, unpinned) {
581 /* moved past last applicable page; we can short circuit */
582 if (range_before_page(range, pgstart))
583 break;
584
585 /*
586 * The user can ask us to pin pages that span multiple ranges,
587 * or to pin pages that aren't even unpinned, so this is messy.
588 *
589 * Four cases:
590 * 1. The requested range subsumes an existing range, so we
591 * just remove the entire matching range.
592 * 2. The requested range overlaps the start of an existing
593 * range, so we just update that range.
594 * 3. The requested range overlaps the end of an existing
595 * range, so we just update that range.
596 * 4. The requested range punches a hole in an existing range,
597 * so we have to update one side of the range and then
598 * create a new range for the other side.
599 */
600 if (page_range_in_range(range, pgstart, pgend)) {
601 ret |= range->purged;
602
603 /* Case #1: Easy. Just nuke the whole thing. */
604 if (page_range_subsumes_range(range, pgstart, pgend)) {
605 range_del(range);
606 continue;
607 }
608
609 /* Case #2: We overlap from the start, so adjust it */
610 if (range->pgstart >= pgstart) {
611 range_shrink(range, pgend + 1, range->pgend);
612 continue;
613 }
614
615 /* Case #3: We overlap from the rear, so adjust it */
616 if (range->pgend <= pgend) {
617 range_shrink(range, range->pgstart, pgstart-1);
618 continue;
619 }
620
621 /*
622 * Case #4: We eat a chunk out of the middle. A bit
623 * more complicated, we allocate a new range for the
624 * second half and adjust the first chunk's endpoint.
625 */
626 range_alloc(asma, range, range->purged,
627 pgend + 1, range->pgend);
628 range_shrink(range, range->pgstart, pgstart - 1);
629 break;
630 }
631 }
632
633 return ret;
634 }
635
636 /*
637 * ashmem_unpin - unpin the given range of pages. Returns zero on success.
638 *
639 * Caller must hold ashmem_mutex.
640 */
ashmem_unpin(struct ashmem_area * asma,size_t pgstart,size_t pgend)641 static int ashmem_unpin(struct ashmem_area *asma, size_t pgstart, size_t pgend)
642 {
643 struct ashmem_range *range, *next;
644 unsigned int purged = ASHMEM_NOT_PURGED;
645
646 restart:
647 list_for_each_entry_safe(range, next, &asma->unpinned_list, unpinned) {
648 /* short circuit: this is our insertion point */
649 if (range_before_page(range, pgstart))
650 break;
651
652 /*
653 * The user can ask us to unpin pages that are already entirely
654 * or partially pinned. We handle those two cases here.
655 */
656 if (page_range_subsumed_by_range(range, pgstart, pgend))
657 return 0;
658 if (page_range_in_range(range, pgstart, pgend)) {
659 pgstart = min_t(size_t, range->pgstart, pgstart),
660 pgend = max_t(size_t, range->pgend, pgend);
661 purged |= range->purged;
662 range_del(range);
663 goto restart;
664 }
665 }
666
667 return range_alloc(asma, range, purged, pgstart, pgend);
668 }
669
670 /*
671 * ashmem_get_pin_status - Returns ASHMEM_IS_UNPINNED if _any_ pages in the
672 * given interval are unpinned and ASHMEM_IS_PINNED otherwise.
673 *
674 * Caller must hold ashmem_mutex.
675 */
ashmem_get_pin_status(struct ashmem_area * asma,size_t pgstart,size_t pgend)676 static int ashmem_get_pin_status(struct ashmem_area *asma, size_t pgstart,
677 size_t pgend)
678 {
679 struct ashmem_range *range;
680 int ret = ASHMEM_IS_PINNED;
681
682 list_for_each_entry(range, &asma->unpinned_list, unpinned) {
683 if (range_before_page(range, pgstart))
684 break;
685 if (page_range_in_range(range, pgstart, pgend)) {
686 ret = ASHMEM_IS_UNPINNED;
687 break;
688 }
689 }
690
691 return ret;
692 }
693
ashmem_pin_unpin(struct ashmem_area * asma,unsigned long cmd,void __user * p)694 static int ashmem_pin_unpin(struct ashmem_area *asma, unsigned long cmd,
695 void __user *p)
696 {
697 struct ashmem_pin pin;
698 size_t pgstart, pgend;
699 int ret = -EINVAL;
700
701 if (unlikely(!asma->file))
702 return -EINVAL;
703
704 if (unlikely(copy_from_user(&pin, p, sizeof(pin))))
705 return -EFAULT;
706
707 /* per custom, you can pass zero for len to mean "everything onward" */
708 if (!pin.len)
709 pin.len = PAGE_ALIGN(asma->size) - pin.offset;
710
711 if (unlikely((pin.offset | pin.len) & ~PAGE_MASK))
712 return -EINVAL;
713
714 if (unlikely(((__u32) -1) - pin.offset < pin.len))
715 return -EINVAL;
716
717 if (unlikely(PAGE_ALIGN(asma->size) < pin.offset + pin.len))
718 return -EINVAL;
719
720 pgstart = pin.offset / PAGE_SIZE;
721 pgend = pgstart + (pin.len / PAGE_SIZE) - 1;
722
723 mutex_lock(&ashmem_mutex);
724
725 switch (cmd) {
726 case ASHMEM_PIN:
727 ret = ashmem_pin(asma, pgstart, pgend);
728 break;
729 case ASHMEM_UNPIN:
730 ret = ashmem_unpin(asma, pgstart, pgend);
731 break;
732 case ASHMEM_GET_PIN_STATUS:
733 ret = ashmem_get_pin_status(asma, pgstart, pgend);
734 break;
735 }
736
737 mutex_unlock(&ashmem_mutex);
738
739 return ret;
740 }
741
ashmem_ioctl(struct file * file,unsigned int cmd,unsigned long arg)742 static long ashmem_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
743 {
744 struct ashmem_area *asma = file->private_data;
745 long ret = -ENOTTY;
746
747 switch (cmd) {
748 case ASHMEM_SET_NAME:
749 ret = set_name(asma, (void __user *) arg);
750 break;
751 case ASHMEM_GET_NAME:
752 ret = get_name(asma, (void __user *) arg);
753 break;
754 case ASHMEM_SET_SIZE:
755 ret = -EINVAL;
756 mutex_lock(&ashmem_mutex);
757 if (!asma->file) {
758 ret = 0;
759 asma->size = (size_t) arg;
760 }
761 mutex_unlock(&ashmem_mutex);
762 break;
763 case ASHMEM_GET_SIZE:
764 ret = asma->size;
765 break;
766 case ASHMEM_SET_PROT_MASK:
767 ret = set_prot_mask(asma, arg);
768 break;
769 case ASHMEM_GET_PROT_MASK:
770 ret = asma->prot_mask;
771 break;
772 case ASHMEM_PIN:
773 case ASHMEM_UNPIN:
774 case ASHMEM_GET_PIN_STATUS:
775 ret = ashmem_pin_unpin(asma, cmd, (void __user *) arg);
776 break;
777 case ASHMEM_PURGE_ALL_CACHES:
778 ret = -EPERM;
779 if (capable(CAP_SYS_ADMIN)) {
780 struct shrink_control sc = {
781 .gfp_mask = GFP_KERNEL,
782 .nr_to_scan = LONG_MAX,
783 };
784 ret = ashmem_shrink_count(&ashmem_shrinker, &sc);
785 nodes_setall(sc.nodes_to_scan);
786 ashmem_shrink_scan(&ashmem_shrinker, &sc);
787 }
788 break;
789 }
790
791 return ret;
792 }
793
794 /* support of 32bit userspace on 64bit platforms */
795 #ifdef CONFIG_COMPAT
compat_ashmem_ioctl(struct file * file,unsigned int cmd,unsigned long arg)796 static long compat_ashmem_ioctl(struct file *file, unsigned int cmd,
797 unsigned long arg)
798 {
799
800 switch (cmd) {
801 case COMPAT_ASHMEM_SET_SIZE:
802 cmd = ASHMEM_SET_SIZE;
803 break;
804 case COMPAT_ASHMEM_SET_PROT_MASK:
805 cmd = ASHMEM_SET_PROT_MASK;
806 break;
807 }
808 return ashmem_ioctl(file, cmd, arg);
809 }
810 #endif
811
812 static const struct file_operations ashmem_fops = {
813 .owner = THIS_MODULE,
814 .open = ashmem_open,
815 .release = ashmem_release,
816 .read = ashmem_read,
817 .llseek = ashmem_llseek,
818 .mmap = ashmem_mmap,
819 .unlocked_ioctl = ashmem_ioctl,
820 #ifdef CONFIG_COMPAT
821 .compat_ioctl = compat_ashmem_ioctl,
822 #endif
823 };
824
825 static struct miscdevice ashmem_misc = {
826 .minor = MISC_DYNAMIC_MINOR,
827 .name = "ashmem",
828 .fops = &ashmem_fops,
829 };
830
ashmem_init(void)831 static int __init ashmem_init(void)
832 {
833 int ret;
834
835 ashmem_area_cachep = kmem_cache_create("ashmem_area_cache",
836 sizeof(struct ashmem_area),
837 0, 0, NULL);
838 if (unlikely(!ashmem_area_cachep)) {
839 pr_err("failed to create slab cache\n");
840 return -ENOMEM;
841 }
842
843 ashmem_range_cachep = kmem_cache_create("ashmem_range_cache",
844 sizeof(struct ashmem_range),
845 0, 0, NULL);
846 if (unlikely(!ashmem_range_cachep)) {
847 pr_err("failed to create slab cache\n");
848 return -ENOMEM;
849 }
850
851 ret = misc_register(&ashmem_misc);
852 if (unlikely(ret)) {
853 pr_err("failed to register misc device!\n");
854 return ret;
855 }
856
857 register_shrinker(&ashmem_shrinker);
858
859 pr_info("initialized\n");
860
861 return 0;
862 }
863
ashmem_exit(void)864 static void __exit ashmem_exit(void)
865 {
866 int ret;
867
868 unregister_shrinker(&ashmem_shrinker);
869
870 ret = misc_deregister(&ashmem_misc);
871 if (unlikely(ret))
872 pr_err("failed to unregister misc device!\n");
873
874 kmem_cache_destroy(ashmem_range_cachep);
875 kmem_cache_destroy(ashmem_area_cachep);
876
877 pr_info("unloaded\n");
878 }
879
880 module_init(ashmem_init);
881 module_exit(ashmem_exit);
882
883 MODULE_LICENSE("GPL");
884