drivers/android/binder_alloc.c

   1 /* binder_alloc.c
   2  *
   3  * Android IPC Subsystem
   4  *
   5  * Copyright (C) 2007-2017 Google, Inc.
   6  *
   7  * This software is licensed under the terms of the GNU General Public
   8  * License version 2, as published by the Free Software Foundation, and
   9  * may be copied, distributed, and modified under those terms.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  */
  17
  18 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  19
  20 #include <asm/cacheflush.h>
  21 #include <linux/list.h>
  22 #include <linux/sched/mm.h>
  23 #include <linux/module.h>
  24 #include <linux/rtmutex.h>
  25 #include <linux/rbtree.h>
  26 #include <linux/seq_file.h>
  27 #include <linux/vmalloc.h>
  28 #include <linux/slab.h>
  29 #include <linux/sched.h>
  30 #include <linux/list_lru.h>
  31 #include "binder_alloc.h"
  32 #include "binder_trace.h"
  33
  34 struct list_lru binder_alloc_lru;
  35
  36 static DEFINE_MUTEX(binder_alloc_mmap_lock);
  37
  38 enum {
  39         BINDER_DEBUG_OPEN_CLOSE             = 1U << 1,
  40         BINDER_DEBUG_BUFFER_ALLOC           = 1U << 2,
  41         BINDER_DEBUG_BUFFER_ALLOC_ASYNC     = 1U << 3,
  42 };
  43 static uint32_t binder_alloc_debug_mask;
  44
  45 module_param_named(debug_mask, binder_alloc_debug_mask,
  46                    uint, 0644);
  47
  48 #define binder_alloc_debug(mask, x...) \
  49         do { \
  50                 if (binder_alloc_debug_mask & mask) \
  51                         pr_info(x); \
  52         } while (0)
  53
  54 static struct binder_buffer *binder_buffer_next(struct binder_buffer *buffer)
  55 {
  56         return list_entry(buffer->entry.next, struct binder_buffer, entry);
  57 }
  58
  59 static struct binder_buffer *binder_buffer_prev(struct binder_buffer *buffer)
  60 {
  61         return list_entry(buffer->entry.prev, struct binder_buffer, entry);
  62 }
  63
  64 static size_t binder_alloc_buffer_size(struct binder_alloc *alloc,
  65                                        struct binder_buffer *buffer)
  66 {
  67         if (list_is_last(&buffer->entry, &alloc->buffers))
  68                 return (u8 *)alloc->buffer +
  69                         alloc->buffer_size - (u8 *)buffer->data;
  70         return (u8 *)binder_buffer_next(buffer)->data - (u8 *)buffer->data;
  71 }
  72
  73 static void binder_insert_free_buffer(struct binder_alloc *alloc,
  74                                       struct binder_buffer *new_buffer)
  75 {
  76         struct rb_node **p = &alloc->free_buffers.rb_node;
  77         struct rb_node *parent = NULL;
  78         struct binder_buffer *buffer;
  79         size_t buffer_size;
  80         size_t new_buffer_size;
  81
  82         BUG_ON(!new_buffer->free);
  83
  84         new_buffer_size = binder_alloc_buffer_size(alloc, new_buffer);
  85
  86         binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
  87                      "%d: add free buffer, size %zd, at %pK\n",
  88                       alloc->pid, new_buffer_size, new_buffer);
  89
  90         while (*p) {
  91                 parent = *p;
  92                 buffer = rb_entry(parent, struct binder_buffer, rb_node);
  93                 BUG_ON(!buffer->free);
  94
  95                 buffer_size = binder_alloc_buffer_size(alloc, buffer);
  96
  97                 if (new_buffer_size < buffer_size)
  98                         p = &parent->rb_left;
  99                 else
 100                         p = &parent->rb_right;
 101         }
 102         rb_link_node(&new_buffer->rb_node, parent, p);
 103         rb_insert_color(&new_buffer->rb_node, &alloc->free_buffers);
 104 }
 105
 106 static void binder_insert_allocated_buffer_locked(
 107                 struct binder_alloc *alloc, struct binder_buffer *new_buffer)
 108 {
 109         struct rb_node **p = &alloc->allocated_buffers.rb_node;
 110         struct rb_node *parent = NULL;
 111         struct binder_buffer *buffer;
 112
 113         BUG_ON(new_buffer->free);
 114
 115         while (*p) {
 116                 parent = *p;
 117                 buffer = rb_entry(parent, struct binder_buffer, rb_node);
 118                 BUG_ON(buffer->free);
 119
 120                 if (new_buffer->data < buffer->data)
 121                         p = &parent->rb_left;
 122                 else if (new_buffer->data > buffer->data)
 123                         p = &parent->rb_right;
 124                 else
 125                         BUG();
 126         }
 127         rb_link_node(&new_buffer->rb_node, parent, p);
 128         rb_insert_color(&new_buffer->rb_node, &alloc->allocated_buffers);
 129 }
 130
 131 static struct binder_buffer *binder_alloc_prepare_to_free_locked(
 132                 struct binder_alloc *alloc,
 133                 uintptr_t user_ptr)
 134 {
 135         struct rb_node *n = alloc->allocated_buffers.rb_node;
 136         struct binder_buffer *buffer;
 137         void *kern_ptr;
 138
 139         kern_ptr = (void *)(user_ptr - alloc->user_buffer_offset);
 140
 141         while (n) {
 142                 buffer = rb_entry(n, struct binder_buffer, rb_node);
 143                 BUG_ON(buffer->free);
 144
 145                 if (kern_ptr < buffer->data)
 146                         n = n->rb_left;
 147                 else if (kern_ptr > buffer->data)
 148                         n = n->rb_right;
 149                 else {
 150                         /*
 151                          * Guard against user threads attempting to
 152                          * free the buffer twice
 153                          */
 154                         if (buffer->free_in_progress) {
 155                                 pr_err("%d:%d FREE_BUFFER u%016llx user freed buffer twice\n",
 156                                        alloc->pid, current->pid, (u64)user_ptr);
 157                                 return NULL;
 158                         }
 159                         buffer->free_in_progress = 1;
 160                         return buffer;
 161                 }
 162         }
 163         return NULL;
 164 }
 165
 166 /**
 167  * binder_alloc_buffer_lookup() - get buffer given user ptr
 168  * @alloc:      binder_alloc for this proc
 169  * @user_ptr:   User pointer to buffer data
 170  *
 171  * Validate userspace pointer to buffer data and return buffer corresponding to
 172  * that user pointer. Search the rb tree for buffer that matches user data
 173  * pointer.
 174  *
 175  * Return:      Pointer to buffer or NULL
 176  */
 177 struct binder_buffer *binder_alloc_prepare_to_free(struct binder_alloc *alloc,
 178                                                    uintptr_t user_ptr)
 179 {
 180         struct binder_buffer *buffer;
 181
 182         mutex_lock(&alloc->mutex);
 183         buffer = binder_alloc_prepare_to_free_locked(alloc, user_ptr);
 184         mutex_unlock(&alloc->mutex);
 185         return buffer;
 186 }
 187
 188 static int binder_update_page_range(struct binder_alloc *alloc, int allocate,
 189                                     void *start, void *end)
 190 {
 191         void *page_addr;
 192         unsigned long user_page_addr;
 193         struct binder_lru_page *page;
 194         struct vm_area_struct *vma = NULL;
 195         struct mm_struct *mm = NULL;
 196         bool need_mm = false;
 197
 198         binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 199                      "%d: %s pages %pK-%pK\n", alloc->pid,
 200                      allocate ? "allocate" : "free", start, end);
 201
 202         if (end <= start)
 203                 return 0;
 204
 205         trace_binder_update_page_range(alloc, allocate, start, end);
 206
 207         if (allocate == 0)
 208                 goto free_range;
 209
 210         for (page_addr = start; page_addr < end; page_addr += PAGE_SIZE) {
 211                 page = &alloc->pages[(page_addr - alloc->buffer) / PAGE_SIZE];
 212                 if (!page->page_ptr) {
 213                         need_mm = true;
 214                         break;
 215                 }
 216         }
 217
 218         if (need_mm && mmget_not_zero(alloc->vma_vm_mm))
 219                 mm = alloc->vma_vm_mm;
 220
 221         if (mm) {
 222                 down_read(&mm->mmap_sem);
 223                 vma = alloc->vma;
 224         }
 225
 226         if (!vma && need_mm) {
 227                 pr_err("%d: binder_alloc_buf failed to map pages in userspace, no vma\n",
 228                         alloc->pid);
 229                 goto err_no_vma;
 230         }
 231
 232         for (page_addr = start; page_addr < end; page_addr += PAGE_SIZE) {
 233                 int ret;
 234                 bool on_lru;
 235                 size_t index;
 236
 237                 index = (page_addr - alloc->buffer) / PAGE_SIZE;
 238                 page = &alloc->pages[index];
 239
 240                 if (page->page_ptr) {
 241                         trace_binder_alloc_lru_start(alloc, index);
 242
 243                         on_lru = list_lru_del(&binder_alloc_lru, &page->lru);
 244                         WARN_ON(!on_lru);
 245
 246                         trace_binder_alloc_lru_end(alloc, index);
 247                         continue;
 248                 }
 249
 250                 if (WARN_ON(!vma))
 251                         goto err_page_ptr_cleared;
 252
 253                 trace_binder_alloc_page_start(alloc, index);
 254                 page->page_ptr = alloc_page(GFP_KERNEL |
 255                                             __GFP_HIGHMEM |
 256                                             __GFP_ZERO);
 257                 if (!page->page_ptr) {
 258                         pr_err("%d: binder_alloc_buf failed for page at %pK\n",
 259                                 alloc->pid, page_addr);
 260                         goto err_alloc_page_failed;
 261                 }
 262                 page->alloc = alloc;
 263                 INIT_LIST_HEAD(&page->lru);
 264
 265                 ret = map_kernel_range_noflush((unsigned long)page_addr,
 266                                                PAGE_SIZE, PAGE_KERNEL,
 267                                                &page->page_ptr);
 268                 flush_cache_vmap((unsigned long)page_addr,
 269                                 (unsigned long)page_addr + PAGE_SIZE);
 270                 if (ret != 1) {
 271                         pr_err("%d: binder_alloc_buf failed to map page at %pK in kernel\n",
 272                                alloc->pid, page_addr);
 273                         goto err_map_kernel_failed;
 274                 }
 275                 user_page_addr =
 276                         (uintptr_t)page_addr + alloc->user_buffer_offset;
 277                 ret = vm_insert_page(vma, user_page_addr, page[0].page_ptr);
 278                 if (ret) {
 279                         pr_err("%d: binder_alloc_buf failed to map page at %lx in userspace\n",
 280                                alloc->pid, user_page_addr);
 281                         goto err_vm_insert_page_failed;
 282                 }
 283
 284                 if (index + 1 > alloc->pages_high)
 285                         alloc->pages_high = index + 1;
 286
 287                 trace_binder_alloc_page_end(alloc, index);
 288                 /* vm_insert_page does not seem to increment the refcount */
 289         }
 290         if (mm) {
 291                 up_read(&mm->mmap_sem);
 292                 mmput(mm);
 293         }
 294         return 0;
 295
 296 free_range:
 297         for (page_addr = end - PAGE_SIZE; page_addr >= start;
 298              page_addr -= PAGE_SIZE) {
 299                 bool ret;
 300                 size_t index;
 301
 302                 index = (page_addr - alloc->buffer) / PAGE_SIZE;
 303                 page = &alloc->pages[index];
 304
 305                 trace_binder_free_lru_start(alloc, index);
 306
 307                 ret = list_lru_add(&binder_alloc_lru, &page->lru);
 308                 WARN_ON(!ret);
 309
 310                 trace_binder_free_lru_end(alloc, index);
 311                 continue;
 312
 313 err_vm_insert_page_failed:
 314                 unmap_kernel_range((unsigned long)page_addr, PAGE_SIZE);
 315 err_map_kernel_failed:
 316                 __free_page(page->page_ptr);
 317                 page->page_ptr = NULL;
 318 err_alloc_page_failed:
 319 err_page_ptr_cleared:
 320                 ;
 321         }
 322 err_no_vma:
 323         if (mm) {
 324                 up_read(&mm->mmap_sem);
 325                 mmput(mm);
 326         }
 327         return vma ? -ENOMEM : -ESRCH;
 328 }
 329
 330 static struct binder_buffer *binder_alloc_new_buf_locked(
 331                                 struct binder_alloc *alloc,
 332                                 size_t data_size,
 333                                 size_t offsets_size,
 334                                 size_t extra_buffers_size,
 335                                 int is_async)
 336 {
 337         struct rb_node *n = alloc->free_buffers.rb_node;
 338         struct binder_buffer *buffer;
 339         size_t buffer_size;
 340         struct rb_node *best_fit = NULL;
 341         void *has_page_addr;
 342         void *end_page_addr;
 343         size_t size, data_offsets_size;
 344         int ret;
 345
 346         if (alloc->vma == NULL) {
 347                 pr_err("%d: binder_alloc_buf, no vma\n",
 348                        alloc->pid);
 349                 return ERR_PTR(-ESRCH);
 350         }
 351
 352         data_offsets_size = ALIGN(data_size, sizeof(void *)) +
 353                 ALIGN(offsets_size, sizeof(void *));
 354
 355         if (data_offsets_size < data_size || data_offsets_size < offsets_size) {
 356                 binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 357                                 "%d: got transaction with invalid size %zd-%zd\n",
 358                                 alloc->pid, data_size, offsets_size);
 359                 return ERR_PTR(-EINVAL);
 360         }
 361         size = data_offsets_size + ALIGN(extra_buffers_size, sizeof(void *));
 362         if (size < data_offsets_size || size < extra_buffers_size) {
 363                 binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 364                                 "%d: got transaction with invalid extra_buffers_size %zd\n",
 365                                 alloc->pid, extra_buffers_size);
 366                 return ERR_PTR(-EINVAL);
 367         }
 368         if (is_async &&
 369             alloc->free_async_space < size + sizeof(struct binder_buffer)) {
 370                 binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 371                              "%d: binder_alloc_buf size %zd failed, no async space left\n",
 372                               alloc->pid, size);
 373                 return ERR_PTR(-ENOSPC);
 374         }
 375
 376         /* Pad 0-size buffers so they get assigned unique addresses */
 377         size = max(size, sizeof(void *));
 378
 379         while (n) {
 380                 buffer = rb_entry(n, struct binder_buffer, rb_node);
 381                 BUG_ON(!buffer->free);
 382                 buffer_size = binder_alloc_buffer_size(alloc, buffer);
 383
 384                 if (size < buffer_size) {
 385                         best_fit = n;
 386                         n = n->rb_left;
 387                 } else if (size > buffer_size)
 388                         n = n->rb_right;
 389                 else {
 390                         best_fit = n;
 391                         break;
 392                 }
 393         }
 394         if (best_fit == NULL) {
 395                 size_t allocated_buffers = 0;
 396                 size_t largest_alloc_size = 0;
 397                 size_t total_alloc_size = 0;
 398                 size_t free_buffers = 0;
 399                 size_t largest_free_size = 0;
 400                 size_t total_free_size = 0;
 401
 402                 for (n = rb_first(&alloc->allocated_buffers); n != NULL;
 403                      n = rb_next(n)) {
 404                         buffer = rb_entry(n, struct binder_buffer, rb_node);
 405                         buffer_size = binder_alloc_buffer_size(alloc, buffer);
 406                         allocated_buffers++;
 407                         total_alloc_size += buffer_size;
 408                         if (buffer_size > largest_alloc_size)
 409                                 largest_alloc_size = buffer_size;
 410                 }
 411                 for (n = rb_first(&alloc->free_buffers); n != NULL;
 412                      n = rb_next(n)) {
 413                         buffer = rb_entry(n, struct binder_buffer, rb_node);
 414                         buffer_size = binder_alloc_buffer_size(alloc, buffer);
 415                         free_buffers++;
 416                         total_free_size += buffer_size;
 417                         if (buffer_size > largest_free_size)
 418                                 largest_free_size = buffer_size;
 419                 }
 420                 pr_err("%d: binder_alloc_buf size %zd failed, no address space\n",
 421                         alloc->pid, size);
 422                 pr_err("allocated: %zd (num: %zd largest: %zd), free: %zd (num: %zd largest: %zd)\n",
 423                        total_alloc_size, allocated_buffers, largest_alloc_size,
 424                        total_free_size, free_buffers, largest_free_size);
 425                 return ERR_PTR(-ENOSPC);
 426         }
 427         if (n == NULL) {
 428                 buffer = rb_entry(best_fit, struct binder_buffer, rb_node);
 429                 buffer_size = binder_alloc_buffer_size(alloc, buffer);
 430         }
 431
 432         binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 433                      "%d: binder_alloc_buf size %zd got buffer %pK size %zd\n",
 434                       alloc->pid, size, buffer, buffer_size);
 435
 436         has_page_addr =
 437                 (void *)(((uintptr_t)buffer->data + buffer_size) & PAGE_MASK);
 438         WARN_ON(n && buffer_size != size);
 439         end_page_addr =
 440                 (void *)PAGE_ALIGN((uintptr_t)buffer->data + size);
 441         if (end_page_addr > has_page_addr)
 442                 end_page_addr = has_page_addr;
 443         ret = binder_update_page_range(alloc, 1,
 444             (void *)PAGE_ALIGN((uintptr_t)buffer->data), end_page_addr);
 445         if (ret)
 446                 return ERR_PTR(ret);
 447
 448         if (buffer_size != size) {
 449                 struct binder_buffer *new_buffer;
 450
 451                 new_buffer = kzalloc(sizeof(*buffer), GFP_KERNEL);
 452                 if (!new_buffer) {
 453                         pr_err("%s: %d failed to alloc new buffer struct\n",
 454                                __func__, alloc->pid);
 455                         goto err_alloc_buf_struct_failed;
 456                 }
 457                 new_buffer->data = (u8 *)buffer->data + size;
 458                 list_add(&new_buffer->entry, &buffer->entry);
 459                 new_buffer->free = 1;
 460                 binder_insert_free_buffer(alloc, new_buffer);
 461         }
 462
 463         rb_erase(best_fit, &alloc->free_buffers);
 464         buffer->free = 0;
 465         buffer->free_in_progress = 0;
 466         binder_insert_allocated_buffer_locked(alloc, buffer);
 467         binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 468                      "%d: binder_alloc_buf size %zd got %pK\n",
 469                       alloc->pid, size, buffer);
 470         buffer->data_size = data_size;
 471         buffer->offsets_size = offsets_size;
 472         buffer->async_transaction = is_async;
 473         buffer->extra_buffers_size = extra_buffers_size;
 474         if (is_async) {
 475                 alloc->free_async_space -= size + sizeof(struct binder_buffer);
 476                 binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC_ASYNC,
 477                              "%d: binder_alloc_buf size %zd async free %zd\n",
 478                               alloc->pid, size, alloc->free_async_space);
 479         }
 480         return buffer;
 481
 482 err_alloc_buf_struct_failed:
 483         binder_update_page_range(alloc, 0,
 484                                  (void *)PAGE_ALIGN((uintptr_t)buffer->data),
 485                                  end_page_addr);
 486         return ERR_PTR(-ENOMEM);
 487 }
 488
 489 /**
 490  * binder_alloc_new_buf() - Allocate a new binder buffer
 491  * @alloc:              binder_alloc for this proc
 492  * @data_size:          size of user data buffer
 493  * @offsets_size:       user specified buffer offset
 494  * @extra_buffers_size: size of extra space for meta-data (eg, security context)
 495  * @is_async:           buffer for async transaction
 496  *
 497  * Allocate a new buffer given the requested sizes. Returns
 498  * the kernel version of the buffer pointer. The size allocated
 499  * is the sum of the three given sizes (each rounded up to
 500  * pointer-sized boundary)
 501  *
 502  * Return:      The allocated buffer or %NULL if error
 503  */
 504 struct binder_buffer *binder_alloc_new_buf(struct binder_alloc *alloc,
 505                                            size_t data_size,
 506                                            size_t offsets_size,
 507                                            size_t extra_buffers_size,
 508                                            int is_async)
 509 {
 510         struct binder_buffer *buffer;
 511
 512         mutex_lock(&alloc->mutex);
 513         buffer = binder_alloc_new_buf_locked(alloc, data_size, offsets_size,
 514                                              extra_buffers_size, is_async);
 515         mutex_unlock(&alloc->mutex);
 516         return buffer;
 517 }
 518
 519 static void *buffer_start_page(struct binder_buffer *buffer)
 520 {
 521         return (void *)((uintptr_t)buffer->data & PAGE_MASK);
 522 }
 523
 524 static void *prev_buffer_end_page(struct binder_buffer *buffer)
 525 {
 526         return (void *)(((uintptr_t)(buffer->data) - 1) & PAGE_MASK);
 527 }
 528
 529 static void binder_delete_free_buffer(struct binder_alloc *alloc,
 530                                       struct binder_buffer *buffer)
 531 {
 532         struct binder_buffer *prev, *next = NULL;
 533         bool to_free = true;
 534         BUG_ON(alloc->buffers.next == &buffer->entry);
 535         prev = binder_buffer_prev(buffer);
 536         BUG_ON(!prev->free);
 537         if (prev_buffer_end_page(prev) == buffer_start_page(buffer)) {
 538                 to_free = false;
 539                 binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 540                                    "%d: merge free, buffer %pK share page with %pK\n",
 541                                    alloc->pid, buffer->data, prev->data);
 542         }
 543
 544         if (!list_is_last(&buffer->entry, &alloc->buffers)) {
 545                 next = binder_buffer_next(buffer);
 546                 if (buffer_start_page(next) == buffer_start_page(buffer)) {
 547                         to_free = false;
 548                         binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 549                                            "%d: merge free, buffer %pK share page with %pK\n",
 550                                            alloc->pid,
 551                                            buffer->data,
 552                                            next->data);
 553                 }
 554         }
 555
 556         if (PAGE_ALIGNED(buffer->data)) {
 557                 binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 558                                    "%d: merge free, buffer start %pK is page aligned\n",
 559                                    alloc->pid, buffer->data);
 560                 to_free = false;
 561         }
 562
 563         if (to_free) {
 564                 binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 565                                    "%d: merge free, buffer %pK do not share page with %pK or %pK\n",
 566                                    alloc->pid, buffer->data,
 567                                    prev->data, next ? next->data : NULL);
 568                 binder_update_page_range(alloc, 0, buffer_start_page(buffer),
 569                                          buffer_start_page(buffer) + PAGE_SIZE);
 570         }
 571         list_del(&buffer->entry);
 572         kfree(buffer);
 573 }
 574
 575 static void binder_free_buf_locked(struct binder_alloc *alloc,
 576                                    struct binder_buffer *buffer)
 577 {
 578         size_t size, buffer_size;
 579
 580         buffer_size = binder_alloc_buffer_size(alloc, buffer);
 581
 582         size = ALIGN(buffer->data_size, sizeof(void *)) +
 583                 ALIGN(buffer->offsets_size, sizeof(void *)) +
 584                 ALIGN(buffer->extra_buffers_size, sizeof(void *));
 585
 586         binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 587                      "%d: binder_free_buf %pK size %zd buffer_size %zd\n",
 588                       alloc->pid, buffer, size, buffer_size);
 589
 590         BUG_ON(buffer->free);
 591         BUG_ON(size > buffer_size);
 592         BUG_ON(buffer->transaction != NULL);
 593         BUG_ON(buffer->data < alloc->buffer);
 594         BUG_ON(buffer->data > alloc->buffer + alloc->buffer_size);
 595
 596         if (buffer->async_transaction) {
 597                 alloc->free_async_space += size + sizeof(struct binder_buffer);
 598
 599                 binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC_ASYNC,
 600                              "%d: binder_free_buf size %zd async free %zd\n",
 601                               alloc->pid, size, alloc->free_async_space);
 602         }
 603
 604         binder_update_page_range(alloc, 0,
 605                 (void *)PAGE_ALIGN((uintptr_t)buffer->data),
 606                 (void *)(((uintptr_t)buffer->data + buffer_size) & PAGE_MASK));
 607
 608         rb_erase(&buffer->rb_node, &alloc->allocated_buffers);
 609         buffer->free = 1;
 610         if (!list_is_last(&buffer->entry, &alloc->buffers)) {
 611                 struct binder_buffer *next = binder_buffer_next(buffer);
 612
 613                 if (next->free) {
 614                         rb_erase(&next->rb_node, &alloc->free_buffers);
 615                         binder_delete_free_buffer(alloc, next);
 616                 }
 617         }
 618         if (alloc->buffers.next != &buffer->entry) {
 619                 struct binder_buffer *prev = binder_buffer_prev(buffer);
 620
 621                 if (prev->free) {
 622                         binder_delete_free_buffer(alloc, buffer);
 623                         rb_erase(&prev->rb_node, &alloc->free_buffers);
 624                         buffer = prev;
 625                 }
 626         }
 627         binder_insert_free_buffer(alloc, buffer);
 628 }
 629
 630 /**
 631  * binder_alloc_free_buf() - free a binder buffer
 632  * @alloc:      binder_alloc for this proc
 633  * @buffer:     kernel pointer to buffer
 634  *
 635  * Free the buffer allocated via binder_alloc_new_buffer()
 636  */
 637 void binder_alloc_free_buf(struct binder_alloc *alloc,
 638                             struct binder_buffer *buffer)
 639 {
 640         mutex_lock(&alloc->mutex);
 641         binder_free_buf_locked(alloc, buffer);
 642         mutex_unlock(&alloc->mutex);
 643 }
 644
 645 /**
 646  * binder_alloc_mmap_handler() - map virtual address space for proc
 647  * @alloc:      alloc structure for this proc
 648  * @vma:        vma passed to mmap()
 649  *
 650  * Called by binder_mmap() to initialize the space specified in
 651  * vma for allocating binder buffers
 652  *
 653  * Return:
 654  *      0 = success
 655  *      -EBUSY = address space already mapped
 656  *      -ENOMEM = failed to map memory to given address space
 657  */
 658 int binder_alloc_mmap_handler(struct binder_alloc *alloc,
 659                               struct vm_area_struct *vma)
 660 {
 661         int ret;
 662         struct vm_struct *area;
 663         const char *failure_string;
 664         struct binder_buffer *buffer;
 665
 666         mutex_lock(&binder_alloc_mmap_lock);
 667         if (alloc->buffer) {
 668                 ret = -EBUSY;
 669                 failure_string = "already mapped";
 670                 goto err_already_mapped;
 671         }
 672
 673         area = get_vm_area(vma->vm_end - vma->vm_start, VM_ALLOC);
 674         if (area == NULL) {
 675                 ret = -ENOMEM;
 676                 failure_string = "get_vm_area";
 677                 goto err_get_vm_area_failed;
 678         }
 679         alloc->buffer = area->addr;
 680         alloc->user_buffer_offset =
 681                 vma->vm_start - (uintptr_t)alloc->buffer;
 682         mutex_unlock(&binder_alloc_mmap_lock);
 683
 684 #ifdef CONFIG_CPU_CACHE_VIPT
 685         if (cache_is_vipt_aliasing()) {
 686                 while (CACHE_COLOUR(
 687                                 (vma->vm_start ^ (uint32_t)alloc->buffer))) {
 688                         pr_info("%s: %d %lx-%lx maps %pK bad alignment\n",
 689                                 __func__, alloc->pid, vma->vm_start,
 690                                 vma->vm_end, alloc->buffer);
 691                         vma->vm_start += PAGE_SIZE;
 692                 }
 693         }
 694 #endif
 695         alloc->pages = kzalloc(sizeof(alloc->pages[0]) *
 696                                    ((vma->vm_end - vma->vm_start) / PAGE_SIZE),
 697                                GFP_KERNEL);
 698         if (alloc->pages == NULL) {
 699                 ret = -ENOMEM;
 700                 failure_string = "alloc page array";
 701                 goto err_alloc_pages_failed;
 702         }
 703         alloc->buffer_size = vma->vm_end - vma->vm_start;
 704
 705         buffer = kzalloc(sizeof(*buffer), GFP_KERNEL);
 706         if (!buffer) {
 707                 ret = -ENOMEM;
 708                 failure_string = "alloc buffer struct";
 709                 goto err_alloc_buf_struct_failed;
 710         }
 711
 712         buffer->data = alloc->buffer;
 713         list_add(&buffer->entry, &alloc->buffers);
 714         buffer->free = 1;
 715         binder_insert_free_buffer(alloc, buffer);
 716         alloc->free_async_space = alloc->buffer_size / 2;
 717         barrier();
 718         alloc->vma = vma;
 719         alloc->vma_vm_mm = vma->vm_mm;
 720         mmgrab(alloc->vma_vm_mm);
 721
 722         return 0;
 723
 724 err_alloc_buf_struct_failed:
 725         kfree(alloc->pages);
 726         alloc->pages = NULL;
 727 err_alloc_pages_failed:
 728         mutex_lock(&binder_alloc_mmap_lock);
 729         vfree(alloc->buffer);
 730         alloc->buffer = NULL;
 731 err_get_vm_area_failed:
 732 err_already_mapped:
 733         mutex_unlock(&binder_alloc_mmap_lock);
 734         pr_err("%s: %d %lx-%lx %s failed %d\n", __func__,
 735                alloc->pid, vma->vm_start, vma->vm_end, failure_string, ret);
 736         return ret;
 737 }
 738
 739
 740 void binder_alloc_deferred_release(struct binder_alloc *alloc)
 741 {
 742         struct rb_node *n;
 743         int buffers, page_count;
 744         struct binder_buffer *buffer;
 745
 746         BUG_ON(alloc->vma);
 747
 748         buffers = 0;
 749         mutex_lock(&alloc->mutex);
 750         while ((n = rb_first(&alloc->allocated_buffers))) {
 751                 buffer = rb_entry(n, struct binder_buffer, rb_node);
 752
 753                 /* Transaction should already have been freed */
 754                 BUG_ON(buffer->transaction);
 755
 756                 binder_free_buf_locked(alloc, buffer);
 757                 buffers++;
 758         }
 759
 760         while (!list_empty(&alloc->buffers)) {
 761                 buffer = list_first_entry(&alloc->buffers,
 762                                           struct binder_buffer, entry);
 763                 WARN_ON(!buffer->free);
 764
 765                 list_del(&buffer->entry);
 766                 WARN_ON_ONCE(!list_empty(&alloc->buffers));
 767                 kfree(buffer);
 768         }
 769
 770         page_count = 0;
 771         if (alloc->pages) {
 772                 int i;
 773
 774                 for (i = 0; i < alloc->buffer_size / PAGE_SIZE; i++) {
 775                         void *page_addr;
 776                         bool on_lru;
 777
 778                         if (!alloc->pages[i].page_ptr)
 779                                 continue;
 780
 781                         on_lru = list_lru_del(&binder_alloc_lru,
 782                                               &alloc->pages[i].lru);
 783                         page_addr = alloc->buffer + i * PAGE_SIZE;
 784                         binder_alloc_debug(BINDER_DEBUG_BUFFER_ALLOC,
 785                                      "%s: %d: page %d at %pK %s\n",
 786                                      __func__, alloc->pid, i, page_addr,
 787                                      on_lru ? "on lru" : "active");
 788                         unmap_kernel_range((unsigned long)page_addr, PAGE_SIZE);
 789                         __free_page(alloc->pages[i].page_ptr);
 790                         page_count++;
 791                 }
 792                 kfree(alloc->pages);
 793                 vfree(alloc->buffer);
 794         }
 795         mutex_unlock(&alloc->mutex);
 796         if (alloc->vma_vm_mm)
 797                 mmdrop(alloc->vma_vm_mm);
 798
 799         binder_alloc_debug(BINDER_DEBUG_OPEN_CLOSE,
 800                      "%s: %d buffers %d, pages %d\n",
 801                      __func__, alloc->pid, buffers, page_count);
 802 }
 803
 804 static void print_binder_buffer(struct seq_file *m, const char *prefix,
 805                                 struct binder_buffer *buffer)
 806 {
 807         seq_printf(m, "%s %d: %pK size %zd:%zd:%zd %s\n",
 808                    prefix, buffer->debug_id, buffer->data,
 809                    buffer->data_size, buffer->offsets_size,
 810                    buffer->extra_buffers_size,
 811                    buffer->transaction ? "active" : "delivered");
 812 }
 813
 814 /**
 815  * binder_alloc_print_allocated() - print buffer info
 816  * @m:     seq_file for output via seq_printf()
 817  * @alloc: binder_alloc for this proc
 818  *
 819  * Prints information about every buffer associated with
 820  * the binder_alloc state to the given seq_file
 821  */
 822 void binder_alloc_print_allocated(struct seq_file *m,
 823                                   struct binder_alloc *alloc)
 824 {
 825         struct rb_node *n;
 826
 827         mutex_lock(&alloc->mutex);
 828         for (n = rb_first(&alloc->allocated_buffers); n != NULL; n = rb_next(n))
 829                 print_binder_buffer(m, "  buffer",
 830                                     rb_entry(n, struct binder_buffer, rb_node));
 831         mutex_unlock(&alloc->mutex);
 832 }
 833
 834 /**
 835  * binder_alloc_print_pages() - print page usage
 836  * @m:     seq_file for output via seq_printf()
 837  * @alloc: binder_alloc for this proc
 838  */
 839 void binder_alloc_print_pages(struct seq_file *m,
 840                               struct binder_alloc *alloc)
 841 {
 842         struct binder_lru_page *page;
 843         int i;
 844         int active = 0;
 845         int lru = 0;
 846         int free = 0;
 847
 848         mutex_lock(&alloc->mutex);
 849         for (i = 0; i < alloc->buffer_size / PAGE_SIZE; i++) {
 850                 page = &alloc->pages[i];
 851                 if (!page->page_ptr)
 852                         free++;
 853                 else if (list_empty(&page->lru))
 854                         active++;
 855                 else
 856                         lru++;
 857         }
 858         mutex_unlock(&alloc->mutex);
 859         seq_printf(m, "  pages: %d:%d:%d\n", active, lru, free);
 860         seq_printf(m, "  pages high watermark: %zu\n", alloc->pages_high);
 861 }
 862
 863 /**
 864  * binder_alloc_get_allocated_count() - return count of buffers
 865  * @alloc: binder_alloc for this proc
 866  *
 867  * Return: count of allocated buffers
 868  */
 869 int binder_alloc_get_allocated_count(struct binder_alloc *alloc)
 870 {
 871         struct rb_node *n;
 872         int count = 0;
 873
 874         mutex_lock(&alloc->mutex);
 875         for (n = rb_first(&alloc->allocated_buffers); n != NULL; n = rb_next(n))
 876                 count++;
 877         mutex_unlock(&alloc->mutex);
 878         return count;
 879 }
 880
 881
 882 /**
 883  * binder_alloc_vma_close() - invalidate address space
 884  * @alloc: binder_alloc for this proc
 885  *
 886  * Called from binder_vma_close() when releasing address space.
 887  * Clears alloc->vma to prevent new incoming transactions from
 888  * allocating more buffers.
 889  */
 890 void binder_alloc_vma_close(struct binder_alloc *alloc)
 891 {
 892         WRITE_ONCE(alloc->vma, NULL);
 893 }
 894
 895 /**
 896  * binder_alloc_free_page() - shrinker callback to free pages
 897  * @item:   item to free
 898  * @lock:   lock protecting the item
 899  * @cb_arg: callback argument
 900  *
 901  * Called from list_lru_walk() in binder_shrink_scan() to free
 902  * up pages when the system is under memory pressure.
 903  */
 904 enum lru_status binder_alloc_free_page(struct list_head *item,
 905                                        struct list_lru_one *lru,
 906                                        spinlock_t *lock,
 907                                        void *cb_arg)
 908 {
 909         struct mm_struct *mm = NULL;
 910         struct binder_lru_page *page = container_of(item,
 911                                                     struct binder_lru_page,
 912                                                     lru);
 913         struct binder_alloc *alloc;
 914         uintptr_t page_addr;
 915         size_t index;
 916         struct vm_area_struct *vma;
 917
 918         alloc = page->alloc;
 919         if (!mutex_trylock(&alloc->mutex))
 920                 goto err_get_alloc_mutex_failed;
 921
 922         if (!page->page_ptr)
 923                 goto err_page_already_freed;
 924
 925         index = page - alloc->pages;
 926         page_addr = (uintptr_t)alloc->buffer + index * PAGE_SIZE;
 927         vma = alloc->vma;
 928         if (vma) {
 929                 if (!mmget_not_zero(alloc->vma_vm_mm))
 930                         goto err_mmget;
 931                 mm = alloc->vma_vm_mm;
 932                 if (!down_write_trylock(&mm->mmap_sem))
 933                         goto err_down_write_mmap_sem_failed;
 934         }
 935
 936         list_lru_isolate(lru, item);
 937         spin_unlock(lock);
 938
 939         if (vma) {
 940                 trace_binder_unmap_user_start(alloc, index);
 941
 942                 zap_page_range(vma,
 943                                page_addr + alloc->user_buffer_offset,
 944                                PAGE_SIZE);
 945
 946                 trace_binder_unmap_user_end(alloc, index);
 947
 948                 up_write(&mm->mmap_sem);
 949                 mmput(mm);
 950         }
 951
 952         trace_binder_unmap_kernel_start(alloc, index);
 953
 954         unmap_kernel_range(page_addr, PAGE_SIZE);
 955         __free_page(page->page_ptr);
 956         page->page_ptr = NULL;
 957
 958         trace_binder_unmap_kernel_end(alloc, index);
 959
 960         spin_lock(lock);
 961         mutex_unlock(&alloc->mutex);
 962         return LRU_REMOVED_RETRY;
 963
 964 err_down_write_mmap_sem_failed:
 965         mmput_async(mm);
 966 err_mmget:
 967 err_page_already_freed:
 968         mutex_unlock(&alloc->mutex);
 969 err_get_alloc_mutex_failed:
 970         return LRU_SKIP;
 971 }
 972
 973 static unsigned long
 974 binder_shrink_count(struct shrinker *shrink, struct shrink_control *sc)
 975 {
 976         unsigned long ret = list_lru_count(&binder_alloc_lru);
 977         return ret;
 978 }
 979
 980 static unsigned long
 981 binder_shrink_scan(struct shrinker *shrink, struct shrink_control *sc)
 982 {
 983         unsigned long ret;
 984
 985         ret = list_lru_walk(&binder_alloc_lru, binder_alloc_free_page,
 986                             NULL, sc->nr_to_scan);
 987         return ret;
 988 }
 989
 990 static struct shrinker binder_shrinker = {
 991         .count_objects = binder_shrink_count,
 992         .scan_objects = binder_shrink_scan,
 993         .seeks = DEFAULT_SEEKS,
 994 };
 995
 996 /**
 997  * binder_alloc_init() - called by binder_open() for per-proc initialization
 998  * @alloc: binder_alloc for this proc
 999  *
1000  * Called from binder_open() to initialize binder_alloc fields for
1001  * new binder proc
1002  */
1003 void binder_alloc_init(struct binder_alloc *alloc)
1004 {
1005         alloc->pid = current->group_leader->pid;
1006         mutex_init(&alloc->mutex);
1007         INIT_LIST_HEAD(&alloc->buffers);
1008 }
1009
1010 int binder_alloc_shrinker_init(void)
1011 {
1012         int ret = list_lru_init(&binder_alloc_lru);
1013
1014         if (ret == 0) {
1015                 ret = register_shrinker(&binder_shrinker);
1016                 if (ret)
1017                         list_lru_destroy(&binder_alloc_lru);
1018         }
1019         return ret;
1020 }