mm: introduce idle page tracking

Knowing the portion of memory that is not used by a certain application or
memory cgroup (idle memory) can be useful for partitioning the system
efficiently, e.g.  by setting memory cgroup limits appropriately.
Currently, the only means to estimate the amount of idle memory provided
by the kernel is /proc/PID/{clear_refs,smaps}: the user can clear the
access bit for all pages mapped to a particular process by writing 1 to
clear_refs, wait for some time, and then count smaps:Referenced.  However,
this method has two serious shortcomings:

 - it does not count unmapped file pages
 - it affects the reclaimer logic

To overcome these drawbacks, this patch introduces two new page flags,
Idle and Young, and a new sysfs file, /sys/kernel/mm/page_idle/bitmap.
A page's Idle flag can only be set from userspace by setting bit in
/sys/kernel/mm/page_idle/bitmap at the offset corresponding to the page,
and it is cleared whenever the page is accessed either through page tables
(it is cleared in page_referenced() in this case) or using the read(2)
system call (mark_page_accessed()). Thus by setting the Idle flag for
pages of a particular workload, which can be found e.g.  by reading
/proc/PID/pagemap, waiting for some time to let the workload access its
working set, and then reading the bitmap file, one can estimate the amount
of pages that are not used by the workload.

The Young page flag is used to avoid interference with the memory
reclaimer.  A page's Young flag is set whenever the Access bit of a page
table entry pointing to the page is cleared by writing to the bitmap file.
If page_referenced() is called on a Young page, it will add 1 to its
return value, therefore concealing the fact that the Access bit was
cleared.

Note, since there is no room for extra page flags on 32 bit, this feature
uses extended page flags when compiled on 32 bit.

[akpm@linux-foundation.org: fix build]
[akpm@linux-foundation.org: kpageidle requires an MMU]
[akpm@linux-foundation.org: decouple from page-flags rework]
Signed-off-by: Vladimir Davydov <vdavydov@parallels.com>
Reviewed-by: Andres Lagar-Cavilla <andreslc@google.com>
Cc: Minchan Kim <minchan@kernel.org>
Cc: Raghavendra K T <raghavendra.kt@linux.vnet.ibm.com>
Cc: Johannes Weiner <hannes@cmpxchg.org>
Cc: Michal Hocko <mhocko@suse.cz>
Cc: Greg Thelen <gthelen@google.com>
Cc: Michel Lespinasse <walken@google.com>
Cc: David Rientjes <rientjes@google.com>
Cc: Pavel Emelyanov <xemul@parallels.com>
Cc: Cyrill Gorcunov <gorcunov@openvz.org>
Cc: Jonathan Corbet <corbet@lwn.net>
Signed-off-by: Andrew Morton <akpm@linux-foundation.org>
Signed-off-by: Linus Torvalds <torvalds@linux-foundation.org>

1 files changed, 232 insertions, 0 deletions

diff --git a/mm/page_idle.c b/mm/page_idle.c
new file mode 100644
index 000000000000..d5dd79041484
--- /dev/null
+++ b/mm/page_idle.c
@@ -0,0 +1,232 @@
+#include <linux/init.h>
+#include <linux/bootmem.h>
+#include <linux/fs.h>
+#include <linux/sysfs.h>
+#include <linux/kobject.h>
+#include <linux/mm.h>
+#include <linux/mmzone.h>
+#include <linux/pagemap.h>
+#include <linux/rmap.h>
+#include <linux/mmu_notifier.h>
+#include <linux/page_ext.h>
+#include <linux/page_idle.h>
+
+#define BITMAP_CHUNK_SIZE       sizeof(u64)
+#define BITMAP_CHUNK_BITS       (BITMAP_CHUNK_SIZE * BITS_PER_BYTE)
+
+/*
+ * Idle page tracking only considers user memory pages, for other types of
+ * pages the idle flag is always unset and an attempt to set it is silently
+ * ignored.
+ *
+ * We treat a page as a user memory page if it is on an LRU list, because it is
+ * always safe to pass such a page to rmap_walk(), which is essential for idle
+ * page tracking. With such an indicator of user pages we can skip isolated
+ * pages, but since there are not usually many of them, it will hardly affect
+ * the overall result.
+ *
+ * This function tries to get a user memory page by pfn as described above.
+ */
+static struct page *page_idle_get_page(unsigned long pfn)
+{
+        struct page *page;
+        struct zone *zone;
+
+        if (!pfn_valid(pfn))
+                return NULL;
+
+        page = pfn_to_page(pfn);
+        if (!page || !PageLRU(page) ||
+            !get_page_unless_zero(page))
+                return NULL;
+
+        zone = page_zone(page);
+        spin_lock_irq(&zone->lru_lock);
+        if (unlikely(!PageLRU(page))) {
+                put_page(page);
+                page = NULL;
+        }
+        spin_unlock_irq(&zone->lru_lock);
+        return page;
+}
+
+static int page_idle_clear_pte_refs_one(struct page *page,
+                                        struct vm_area_struct *vma,
+                                        unsigned long addr, void *arg)
+{
+        struct mm_struct *mm = vma->vm_mm;
+        spinlock_t *ptl;
+        pmd_t *pmd;
+        pte_t *pte;
+        bool referenced = false;
+
+        if (unlikely(PageTransHuge(page))) {
+                pmd = page_check_address_pmd(page, mm, addr,
+                                             PAGE_CHECK_ADDRESS_PMD_FLAG, &ptl);
+                if (pmd) {
+                        referenced = pmdp_clear_young_notify(vma, addr, pmd);
+                        spin_unlock(ptl);
+                }
+        } else {
+                pte = page_check_address(page, mm, addr, &ptl, 0);
+                if (pte) {
+                        referenced = ptep_clear_young_notify(vma, addr, pte);
+                        pte_unmap_unlock(pte, ptl);
+                }
+        }
+        if (referenced) {
+                clear_page_idle(page);
+                /*
+                 * We cleared the referenced bit in a mapping to this page. To
+                 * avoid interference with page reclaim, mark it young so that
+                 * page_referenced() will return > 0.
+                 */
+                set_page_young(page);
+        }
+        return SWAP_AGAIN;
+}
+
+static void page_idle_clear_pte_refs(struct page *page)
+{
+        /*
+         * Since rwc.arg is unused, rwc is effectively immutable, so we
+         * can make it static const to save some cycles and stack.
+         */
+        static const struct rmap_walk_control rwc = {
+                .rmap_one = page_idle_clear_pte_refs_one,
+                .anon_lock = page_lock_anon_vma_read,
+        };
+        bool need_lock;
+
+        if (!page_mapped(page) ||
+            !page_rmapping(page))
+                return;
+
+        need_lock = !PageAnon(page) || PageKsm(page);
+        if (need_lock && !trylock_page(page))
+                return;
+
+        rmap_walk(page, (struct rmap_walk_control *)&rwc);
+
+        if (need_lock)
+                unlock_page(page);
+}
+
+static ssize_t page_idle_bitmap_read(struct file *file, struct kobject *kobj,
+                                     struct bin_attribute *attr, char *buf,
+                                     loff_t pos, size_t count)
+{
+        u64 *out = (u64 *)buf;
+        struct page *page;
+        unsigned long pfn, end_pfn;
+        int bit;
+
+        if (pos % BITMAP_CHUNK_SIZE || count % BITMAP_CHUNK_SIZE)
+                return -EINVAL;
+
+        pfn = pos * BITS_PER_BYTE;
+        if (pfn >= max_pfn)
+                return 0;
+
+        end_pfn = pfn + count * BITS_PER_BYTE;
+        if (end_pfn > max_pfn)
+                end_pfn = ALIGN(max_pfn, BITMAP_CHUNK_BITS);
+
+        for (; pfn < end_pfn; pfn++) {
+                bit = pfn % BITMAP_CHUNK_BITS;
+                if (!bit)
+                        *out = 0ULL;
+                page = page_idle_get_page(pfn);
+                if (page) {
+                        if (page_is_idle(page)) {
+                                /*
+                                 * The page might have been referenced via a
+                                 * pte, in which case it is not idle. Clear
+                                 * refs and recheck.
+                                 */
+                                page_idle_clear_pte_refs(page);
+                                if (page_is_idle(page))
+                                        *out |= 1ULL << bit;
+                        }
+                        put_page(page);
+                }
+                if (bit == BITMAP_CHUNK_BITS - 1)
+                        out++;
+                cond_resched();
+        }
+        return (char *)out - buf;
+}
+
+static ssize_t page_idle_bitmap_write(struct file *file, struct kobject *kobj,
+                                      struct bin_attribute *attr, char *buf,
+                                      loff_t pos, size_t count)
+{
+        const u64 *in = (u64 *)buf;
+        struct page *page;
+        unsigned long pfn, end_pfn;
+        int bit;
+
+        if (pos % BITMAP_CHUNK_SIZE || count % BITMAP_CHUNK_SIZE)
+                return -EINVAL;
+
+        pfn = pos * BITS_PER_BYTE;
+        if (pfn >= max_pfn)
+                return -ENXIO;
+
+        end_pfn = pfn + count * BITS_PER_BYTE;
+        if (end_pfn > max_pfn)
+                end_pfn = ALIGN(max_pfn, BITMAP_CHUNK_BITS);
+
+        for (; pfn < end_pfn; pfn++) {
+                bit = pfn % BITMAP_CHUNK_BITS;
+                if ((*in >> bit) & 1) {
+                        page = page_idle_get_page(pfn);
+                        if (page) {
+                                page_idle_clear_pte_refs(page);
+                                set_page_idle(page);
+                                put_page(page);
+                        }
+                }
+                if (bit == BITMAP_CHUNK_BITS - 1)
+                        in++;
+                cond_resched();
+        }
+        return (char *)in - buf;
+}
+
+static struct bin_attribute page_idle_bitmap_attr =
+                __BIN_ATTR(bitmap, S_IRUSR | S_IWUSR,
+                           page_idle_bitmap_read, page_idle_bitmap_write, 0);
+
+static struct bin_attribute *page_idle_bin_attrs[] = {
+        &page_idle_bitmap_attr,
+        NULL,
+};
+
+static struct attribute_group page_idle_attr_group = {
+        .bin_attrs = page_idle_bin_attrs,
+        .name = "page_idle",
+};
+
+#ifndef CONFIG_64BIT
+static bool need_page_idle(void)
+{
+        return true;
+}
+struct page_ext_operations page_idle_ops = {
+        .need = need_page_idle,
+};
+#endif
+
+static int __init page_idle_init(void)
+{
+        int err;
+
+        err = sysfs_create_group(mm_kobj, &page_idle_attr_group);
+        if (err) {
+                pr_err("page_idle: register sysfs failed\n");
+                return err;
+        }
+        return 0;
+}
+subsys_initcall(page_idle_init);