Message ID | 20201215115448.25633-6-sjpark@amazon.com (mailing list archive) |
---|---|
State | New, archived |
Headers | show |
Series | Introduce Data Access MONitor (DAMON) | expand |
On Tue, Dec 15, 2020 at 3:58 AM SeongJae Park <sjpark@amazon.com> wrote: > > From: SeongJae Park <sjpark@amazon.de> > > This commit introduces a reference implementation of the address space > specific low level primitives for the virtual address space, so that > users of DAMON can easily monitor the data accesses on virtual address > spaces of specific processes by simply configuring the implementation to > be used by DAMON. > > The low level primitives for the fundamental access monitoring are > defined in two parts: > > 1. Identification of the monitoring target address range for the address > space. > 2. Access check of specific address range in the target space. > > The reference implementation for the virtual address space does the > works as below. > > PTE Accessed-bit Based Access Check > ----------------------------------- > > The implementation uses PTE Accessed-bit for basic access checks. That > is, it clears the bit for next sampling target page and checks whether 'for the next' > it set again after one sampling period. This could disturb the reclaim 'it is set' > logic. DAMON uses ``PG_idle`` and ``PG_young`` page flags to solve the > conflict, as Idle page tracking does. > > VMA-based Target Address Range Construction > ------------------------------------------- > > Only small parts in the super-huge virtual address space of the > processes are mapped to physical memory and accessed. Thus, tracking > the unmapped address regions is just wasteful. However, because DAMON > can deal with some level of noise using the adaptive regions adjustment > mechanism, tracking every mapping is not strictly required but could > even incur a high overhead in some cases. That said, too huge unmapped > areas inside the monitoring target should be removed to not take the > time for the adaptive mechanism. > > For the reason, this implementation converts the complex mappings to > three distinct regions that cover every mapped area of the address > space. Also, the two gaps between the three regions are the two biggest > unmapped areas in the given address space. The two biggest unmapped > areas would be the gap between the heap and the uppermost mmap()-ed > region, and the gap between the lowermost mmap()-ed region and the stack > in most of the cases. Because these gaps are exceptionally huge in > usual address spacees, excluding these will be sufficient to make a *spaces > reasonable trade-off. Below shows this in detail:: > > <heap> > <BIG UNMAPPED REGION 1> > <uppermost mmap()-ed region> > (small mmap()-ed regions and munmap()-ed regions) > <lowermost mmap()-ed region> > <BIG UNMAPPED REGION 2> > <stack> > > Signed-off-by: SeongJae Park <sjpark@amazon.de> > Reviewed-by: Leonard Foerster <foersleo@amazon.de> > --- > include/linux/damon.h | 13 + > mm/damon/Kconfig | 9 + > mm/damon/Makefile | 1 + > mm/damon/vaddr.c | 579 ++++++++++++++++++++++++++++++++++++++++++ > 4 files changed, 602 insertions(+) > create mode 100644 mm/damon/vaddr.c > > diff --git a/include/linux/damon.h b/include/linux/damon.h > index f446f8433599..39b4d6d3ddee 100644 > --- a/include/linux/damon.h > +++ b/include/linux/damon.h > @@ -274,4 +274,17 @@ int damon_stop(struct damon_ctx **ctxs, int nr_ctxs); > > #endif /* CONFIG_DAMON */ > > +#ifdef CONFIG_DAMON_VADDR > + > +/* Monitoring primitives for virtual memory address spaces */ > +void damon_va_init_regions(struct damon_ctx *ctx); > +void damon_va_update_regions(struct damon_ctx *ctx); > +void damon_va_prepare_access_checks(struct damon_ctx *ctx); > +unsigned int damon_va_check_accesses(struct damon_ctx *ctx); > +bool damon_va_target_valid(void *t); > +void damon_va_cleanup(struct damon_ctx *ctx); > +void damon_va_set_primitives(struct damon_ctx *ctx); Any reason for these to be in the header? > + [snip] > + > +static bool damon_va_young(struct mm_struct *mm, unsigned long addr, > + unsigned long *page_sz) > +{ > + pte_t *pte = NULL; > + pmd_t *pmd = NULL; > + spinlock_t *ptl; > + bool young = false; > + > + if (follow_pte_pmd(mm, addr, NULL, &pte, &pmd, &ptl)) > + return false; > + > + *page_sz = PAGE_SIZE; > + if (pte) { > + young = pte_young(*pte); > + if (!young) > + young = !page_is_idle(pte_page(*pte)); > + pte_unmap_unlock(pte, ptl); > + return young; > + } > + > +#ifdef CONFIG_TRANSPARENT_HUGEPAGE > + young = pmd_young(*pmd); > + if (!young) > + young = !page_is_idle(pmd_page(*pmd)); > + spin_unlock(ptl); > + *page_sz = ((1UL) << HPAGE_PMD_SHIFT); > +#endif /* CONFIG_TRANSPARENT_HUGEPAGE */ > + > + return young; You need mmu_notifier_test_young() here. Hmm I remember mentioning this in some previous version as well. BTW have you tested this on a VM? The patch looks good overall.
On Wed, 23 Dec 2020 07:31:45 -0800 Shakeel Butt <shakeelb@google.com> wrote: > On Tue, Dec 15, 2020 at 3:58 AM SeongJae Park <sjpark@amazon.com> wrote: > > > > From: SeongJae Park <sjpark@amazon.de> > > > > This commit introduces a reference implementation of the address space > > specific low level primitives for the virtual address space, so that > > users of DAMON can easily monitor the data accesses on virtual address > > spaces of specific processes by simply configuring the implementation to > > be used by DAMON. > > > > The low level primitives for the fundamental access monitoring are > > defined in two parts: > > > > 1. Identification of the monitoring target address range for the address > > space. > > 2. Access check of specific address range in the target space. > > > > The reference implementation for the virtual address space does the > > works as below. > > > > PTE Accessed-bit Based Access Check > > ----------------------------------- > > > > The implementation uses PTE Accessed-bit for basic access checks. That > > is, it clears the bit for next sampling target page and checks whether > > 'for the next' > > > it set again after one sampling period. This could disturb the reclaim > > 'it is set' Good catch! Will fix in the next version. > > > logic. DAMON uses ``PG_idle`` and ``PG_young`` page flags to solve the > > conflict, as Idle page tracking does. > > > > VMA-based Target Address Range Construction > > ------------------------------------------- > > > > Only small parts in the super-huge virtual address space of the > > processes are mapped to physical memory and accessed. Thus, tracking > > the unmapped address regions is just wasteful. However, because DAMON > > can deal with some level of noise using the adaptive regions adjustment > > mechanism, tracking every mapping is not strictly required but could > > even incur a high overhead in some cases. That said, too huge unmapped > > areas inside the monitoring target should be removed to not take the > > time for the adaptive mechanism. > > > > For the reason, this implementation converts the complex mappings to > > three distinct regions that cover every mapped area of the address > > space. Also, the two gaps between the three regions are the two biggest > > unmapped areas in the given address space. The two biggest unmapped > > areas would be the gap between the heap and the uppermost mmap()-ed > > region, and the gap between the lowermost mmap()-ed region and the stack > > in most of the cases. Because these gaps are exceptionally huge in > > usual address spacees, excluding these will be sufficient to make a > > *spaces Good eye! Will fix in the next version. > > > reasonable trade-off. Below shows this in detail:: > > > > <heap> > > <BIG UNMAPPED REGION 1> > > <uppermost mmap()-ed region> > > (small mmap()-ed regions and munmap()-ed regions) > > <lowermost mmap()-ed region> > > <BIG UNMAPPED REGION 2> > > <stack> > > > > Signed-off-by: SeongJae Park <sjpark@amazon.de> > > Reviewed-by: Leonard Foerster <foersleo@amazon.de> > > --- > > include/linux/damon.h | 13 + > > mm/damon/Kconfig | 9 + > > mm/damon/Makefile | 1 + > > mm/damon/vaddr.c | 579 ++++++++++++++++++++++++++++++++++++++++++ > > 4 files changed, 602 insertions(+) > > create mode 100644 mm/damon/vaddr.c > > > > diff --git a/include/linux/damon.h b/include/linux/damon.h > > index f446f8433599..39b4d6d3ddee 100644 > > --- a/include/linux/damon.h > > +++ b/include/linux/damon.h > > @@ -274,4 +274,17 @@ int damon_stop(struct damon_ctx **ctxs, int nr_ctxs); > > > > #endif /* CONFIG_DAMON */ > > > > +#ifdef CONFIG_DAMON_VADDR > > + > > +/* Monitoring primitives for virtual memory address spaces */ > > +void damon_va_init_regions(struct damon_ctx *ctx); > > +void damon_va_update_regions(struct damon_ctx *ctx); > > +void damon_va_prepare_access_checks(struct damon_ctx *ctx); > > +unsigned int damon_va_check_accesses(struct damon_ctx *ctx); > > +bool damon_va_target_valid(void *t); > > +void damon_va_cleanup(struct damon_ctx *ctx); > > +void damon_va_set_primitives(struct damon_ctx *ctx); > > Any reason for these to be in the header? To let DAMON API users (in kernel space) and other primitives developers to use those. > > > + > [snip] > > + > > +static bool damon_va_young(struct mm_struct *mm, unsigned long addr, > > + unsigned long *page_sz) > > +{ > > + pte_t *pte = NULL; > > + pmd_t *pmd = NULL; > > + spinlock_t *ptl; > > + bool young = false; > > + > > + if (follow_pte_pmd(mm, addr, NULL, &pte, &pmd, &ptl)) > > + return false; > > + > > + *page_sz = PAGE_SIZE; > > + if (pte) { > > + young = pte_young(*pte); > > + if (!young) > > + young = !page_is_idle(pte_page(*pte)); > > + pte_unmap_unlock(pte, ptl); > > + return young; > > + } > > + > > +#ifdef CONFIG_TRANSPARENT_HUGEPAGE > > + young = pmd_young(*pmd); > > + if (!young) > > + young = !page_is_idle(pmd_page(*pmd)); > > + spin_unlock(ptl); > > + *page_sz = ((1UL) << HPAGE_PMD_SHIFT); > > +#endif /* CONFIG_TRANSPARENT_HUGEPAGE */ > > + > > + return young; > > You need mmu_notifier_test_young() here. Hmm I remember mentioning > this in some previous version as well. Your question and my answer was as below: > Don't you need mmu_notifier_clear_young() here? I think we don't need it here because we only read the Accessed bit and PG_Idle if Accessed bit was not set. I should notice that you mean 'test_young()' but didn't, sorry. I will add it in the next version. > > BTW have you tested this on a VM? Yes. Indeed, I'm testing this on a QEMU/KVM environment. You can get more detail at: https://damonitor.github.io/doc/html/latest/vm/damon/eval.html#setup > > The patch looks good overall. Thanks. I will fix above things in the next version. Thanks, SeongJae Park
On Wed, Dec 23, 2020 at 8:47 AM SeongJae Park <sjpark@amazon.com> wrote: > [snip] > > [snip] > > > + > > > +static bool damon_va_young(struct mm_struct *mm, unsigned long addr, > > > + unsigned long *page_sz) > > > +{ > > > + pte_t *pte = NULL; > > > + pmd_t *pmd = NULL; > > > + spinlock_t *ptl; > > > + bool young = false; > > > + > > > + if (follow_pte_pmd(mm, addr, NULL, &pte, &pmd, &ptl)) > > > + return false; > > > + > > > + *page_sz = PAGE_SIZE; > > > + if (pte) { > > > + young = pte_young(*pte); > > > + if (!young) > > > + young = !page_is_idle(pte_page(*pte)); > > > + pte_unmap_unlock(pte, ptl); > > > + return young; > > > + } > > > + > > > +#ifdef CONFIG_TRANSPARENT_HUGEPAGE > > > + young = pmd_young(*pmd); > > > + if (!young) > > > + young = !page_is_idle(pmd_page(*pmd)); > > > + spin_unlock(ptl); > > > + *page_sz = ((1UL) << HPAGE_PMD_SHIFT); > > > +#endif /* CONFIG_TRANSPARENT_HUGEPAGE */ > > > + > > > + return young; > > > > You need mmu_notifier_test_young() here. Hmm I remember mentioning > > this in some previous version as well. > > Your question and my answer was as below: > > > Don't you need mmu_notifier_clear_young() here? > > I think we don't need it here because we only read the Accessed bit and PG_Idle > if Accessed bit was not set. > > I should notice that you mean 'test_young()' but didn't, sorry. I will add it > in the next version. > I should have said mmu_notifier_test_young() instead of mmu_notifier_clear_young(). > > > > BTW have you tested this on a VM? > > Yes. Indeed, I'm testing this on a QEMU/KVM environment. You can get more > detail at: https://damonitor.github.io/doc/html/latest/vm/damon/eval.html#setup > Hmm without mmu_notifier_test_young() you should be missing the kvm mmu access updates. Can you please recheck if your eval is correctly seeing the memory accesses from the VM?
On Wed, 23 Dec 2020 14:54:02 -0800 Shakeel Butt <shakeelb@google.com> wrote: > On Wed, Dec 23, 2020 at 8:47 AM SeongJae Park <sjpark@amazon.com> wrote: > > > [snip] > > > [snip] > > > > + > > > > +static bool damon_va_young(struct mm_struct *mm, unsigned long addr, > > > > + unsigned long *page_sz) > > > > +{ > > > > + pte_t *pte = NULL; > > > > + pmd_t *pmd = NULL; > > > > + spinlock_t *ptl; > > > > + bool young = false; > > > > + > > > > + if (follow_pte_pmd(mm, addr, NULL, &pte, &pmd, &ptl)) > > > > + return false; > > > > + > > > > + *page_sz = PAGE_SIZE; > > > > + if (pte) { > > > > + young = pte_young(*pte); > > > > + if (!young) > > > > + young = !page_is_idle(pte_page(*pte)); > > > > + pte_unmap_unlock(pte, ptl); > > > > + return young; > > > > + } > > > > + > > > > +#ifdef CONFIG_TRANSPARENT_HUGEPAGE > > > > + young = pmd_young(*pmd); > > > > + if (!young) > > > > + young = !page_is_idle(pmd_page(*pmd)); > > > > + spin_unlock(ptl); > > > > + *page_sz = ((1UL) << HPAGE_PMD_SHIFT); > > > > +#endif /* CONFIG_TRANSPARENT_HUGEPAGE */ > > > > + > > > > + return young; > > > > > > You need mmu_notifier_test_young() here. Hmm I remember mentioning > > > this in some previous version as well. > > > > Your question and my answer was as below: > > > > > Don't you need mmu_notifier_clear_young() here? > > > > I think we don't need it here because we only read the Accessed bit and PG_Idle > > if Accessed bit was not set. > > > > I should notice that you mean 'test_young()' but didn't, sorry. I will add it > > in the next version. > > > > I should have said mmu_notifier_test_young() instead of > mmu_notifier_clear_young(). > > > > > > > BTW have you tested this on a VM? > > > > Yes. Indeed, I'm testing this on a QEMU/KVM environment. You can get more > > detail at: https://damonitor.github.io/doc/html/latest/vm/damon/eval.html#setup > > > > Hmm without mmu_notifier_test_young() you should be missing the kvm > mmu access updates. Can you please recheck if your eval is correctly > seeing the memory accesses from the VM? Seems I didn't clearly answered, sorry. My test setup installs the DAMON-enabled kernel in a guest VM and run it for workloads in the guest, rather than running DAMON in host to monitor accesses of VMs. The MMU notifier is for latter case, AFAIU, so my test setup didn't see the problem. If I'm missing something, please let me know. Thanks, SeongJae Park
On Thu, 24 Dec 2020 08:11:11 +0100 SeongJae Park <sjpark@amazon.com> wrote: > On Wed, 23 Dec 2020 14:54:02 -0800 Shakeel Butt <shakeelb@google.com> wrote: > > > On Wed, Dec 23, 2020 at 8:47 AM SeongJae Park <sjpark@amazon.com> wrote: > > > > > [snip] > > > > [snip] > > > > > + > > > > > +static bool damon_va_young(struct mm_struct *mm, unsigned long addr, > > > > > + unsigned long *page_sz) > > > > > +{ > > > > > + pte_t *pte = NULL; > > > > > + pmd_t *pmd = NULL; > > > > > + spinlock_t *ptl; > > > > > + bool young = false; > > > > > + > > > > > + if (follow_pte_pmd(mm, addr, NULL, &pte, &pmd, &ptl)) > > > > > + return false; > > > > > + > > > > > + *page_sz = PAGE_SIZE; > > > > > + if (pte) { > > > > > + young = pte_young(*pte); > > > > > + if (!young) > > > > > + young = !page_is_idle(pte_page(*pte)); > > > > > + pte_unmap_unlock(pte, ptl); > > > > > + return young; > > > > > + } > > > > > + > > > > > +#ifdef CONFIG_TRANSPARENT_HUGEPAGE > > > > > + young = pmd_young(*pmd); > > > > > + if (!young) > > > > > + young = !page_is_idle(pmd_page(*pmd)); > > > > > + spin_unlock(ptl); > > > > > + *page_sz = ((1UL) << HPAGE_PMD_SHIFT); > > > > > +#endif /* CONFIG_TRANSPARENT_HUGEPAGE */ > > > > > + > > > > > + return young; > > > > > > > > You need mmu_notifier_test_young() here. Hmm I remember mentioning > > > > this in some previous version as well. > > > > > > Your question and my answer was as below: > > > > > > > Don't you need mmu_notifier_clear_young() here? > > > > > > I think we don't need it here because we only read the Accessed bit and PG_Idle > > > if Accessed bit was not set. > > > > > > I should notice that you mean 'test_young()' but didn't, sorry. I will add it > > > in the next version. > > > > > > > I should have said mmu_notifier_test_young() instead of > > mmu_notifier_clear_young(). > > > > > > > > > > BTW have you tested this on a VM? > > > > > > Yes. Indeed, I'm testing this on a QEMU/KVM environment. You can get more > > > detail at: https://damonitor.github.io/doc/html/latest/vm/damon/eval.html#setup > > > > > > > Hmm without mmu_notifier_test_young() you should be missing the kvm > > mmu access updates. Can you please recheck if your eval is correctly > > seeing the memory accesses from the VM? > > Seems I didn't clearly answered, sorry. My test setup installs the > DAMON-enabled kernel in a guest VM and run it for workloads in the guest, > rather than running DAMON in host to monitor accesses of VMs. The MMU notifier > is for latter case, AFAIU, so my test setup didn't see the problem. Just FYI. I confirmed the mmu_notifier_test_young() added version works for the use case. I tested it by running a program accessing 200MB memory in a QEMU/KVM guest having 120GB memory and monitoring the qemu process' virtual address space from the host using DAMON. The 200MB memory region was clearly identifiable. Thanks, SeongJae Park
On Wed, Jan 27, 2021 at 8:57 AM SeongJae Park <sjpark@amazon.com> wrote: > > On Thu, 24 Dec 2020 08:11:11 +0100 SeongJae Park <sjpark@amazon.com> wrote: > > > On Wed, 23 Dec 2020 14:54:02 -0800 Shakeel Butt <shakeelb@google.com> wrote: > > > > > On Wed, Dec 23, 2020 at 8:47 AM SeongJae Park <sjpark@amazon.com> wrote: > > > > > > > [snip] > > > > > [snip] > > > > > > + > > > > > > +static bool damon_va_young(struct mm_struct *mm, unsigned long addr, > > > > > > + unsigned long *page_sz) > > > > > > +{ > > > > > > + pte_t *pte = NULL; > > > > > > + pmd_t *pmd = NULL; > > > > > > + spinlock_t *ptl; > > > > > > + bool young = false; > > > > > > + > > > > > > + if (follow_pte_pmd(mm, addr, NULL, &pte, &pmd, &ptl)) > > > > > > + return false; > > > > > > + > > > > > > + *page_sz = PAGE_SIZE; > > > > > > + if (pte) { > > > > > > + young = pte_young(*pte); > > > > > > + if (!young) > > > > > > + young = !page_is_idle(pte_page(*pte)); > > > > > > + pte_unmap_unlock(pte, ptl); > > > > > > + return young; > > > > > > + } > > > > > > + > > > > > > +#ifdef CONFIG_TRANSPARENT_HUGEPAGE > > > > > > + young = pmd_young(*pmd); > > > > > > + if (!young) > > > > > > + young = !page_is_idle(pmd_page(*pmd)); > > > > > > + spin_unlock(ptl); > > > > > > + *page_sz = ((1UL) << HPAGE_PMD_SHIFT); > > > > > > +#endif /* CONFIG_TRANSPARENT_HUGEPAGE */ > > > > > > + > > > > > > + return young; > > > > > > > > > > You need mmu_notifier_test_young() here. Hmm I remember mentioning > > > > > this in some previous version as well. > > > > > > > > Your question and my answer was as below: > > > > > > > > > Don't you need mmu_notifier_clear_young() here? > > > > > > > > I think we don't need it here because we only read the Accessed bit and PG_Idle > > > > if Accessed bit was not set. > > > > > > > > I should notice that you mean 'test_young()' but didn't, sorry. I will add it > > > > in the next version. > > > > > > > > > > I should have said mmu_notifier_test_young() instead of > > > mmu_notifier_clear_young(). > > > > > > > > > > > > > BTW have you tested this on a VM? > > > > > > > > Yes. Indeed, I'm testing this on a QEMU/KVM environment. You can get more > > > > detail at: https://damonitor.github.io/doc/html/latest/vm/damon/eval.html#setup > > > > > > > > > > Hmm without mmu_notifier_test_young() you should be missing the kvm > > > mmu access updates. Can you please recheck if your eval is correctly > > > seeing the memory accesses from the VM? > > > > Seems I didn't clearly answered, sorry. My test setup installs the > > DAMON-enabled kernel in a guest VM and run it for workloads in the guest, > > rather than running DAMON in host to monitor accesses of VMs. The MMU notifier > > is for latter case, AFAIU, so my test setup didn't see the problem. > > Just FYI. I confirmed the mmu_notifier_test_young() added version works for > the use case. I tested it by running a program accessing 200MB memory in a > QEMU/KVM guest having 120GB memory and monitoring the qemu process' virtual > address space from the host using DAMON. The 200MB memory region was clearly > identifiable. > Thanks for confirming. I am still going over the whole series and will send out the emails in a couple of days. Shakeel
diff --git a/include/linux/damon.h b/include/linux/damon.h index f446f8433599..39b4d6d3ddee 100644 --- a/include/linux/damon.h +++ b/include/linux/damon.h @@ -274,4 +274,17 @@ int damon_stop(struct damon_ctx **ctxs, int nr_ctxs); #endif /* CONFIG_DAMON */ +#ifdef CONFIG_DAMON_VADDR + +/* Monitoring primitives for virtual memory address spaces */ +void damon_va_init_regions(struct damon_ctx *ctx); +void damon_va_update_regions(struct damon_ctx *ctx); +void damon_va_prepare_access_checks(struct damon_ctx *ctx); +unsigned int damon_va_check_accesses(struct damon_ctx *ctx); +bool damon_va_target_valid(void *t); +void damon_va_cleanup(struct damon_ctx *ctx); +void damon_va_set_primitives(struct damon_ctx *ctx); + +#endif /* CONFIG_DAMON_VADDR */ + #endif /* _DAMON_H */ diff --git a/mm/damon/Kconfig b/mm/damon/Kconfig index d00e99ac1a15..8ae080c52950 100644 --- a/mm/damon/Kconfig +++ b/mm/damon/Kconfig @@ -12,4 +12,13 @@ config DAMON See https://damonitor.github.io/doc/html/latest-damon/index.html for more information. +config DAMON_VADDR + bool "Data access monitoring primitives for virtual address spaces" + depends on DAMON && MMU + select PAGE_EXTENSION if !64BIT + select PAGE_IDLE_FLAG + help + This builds the default data access monitoring primitives for DAMON + that works for virtual address spaces. + endmenu diff --git a/mm/damon/Makefile b/mm/damon/Makefile index 4fd2edb4becf..6ebbd08aed67 100644 --- a/mm/damon/Makefile +++ b/mm/damon/Makefile @@ -1,3 +1,4 @@ # SPDX-License-Identifier: GPL-2.0 obj-$(CONFIG_DAMON) := core.o +obj-$(CONFIG_DAMON_VADDR) += vaddr.o diff --git a/mm/damon/vaddr.c b/mm/damon/vaddr.c new file mode 100644 index 000000000000..efc56ef843fe --- /dev/null +++ b/mm/damon/vaddr.c @@ -0,0 +1,579 @@ +// SPDX-License-Identifier: GPL-2.0 +/* + * DAMON Primitives for Virtual Address Spaces + * + * Author: SeongJae Park <sjpark@amazon.de> + */ + +#define pr_fmt(fmt) "damon-va: " fmt + +#include <linux/damon.h> +#include <linux/mm.h> +#include <linux/mmu_notifier.h> +#include <linux/page_idle.h> +#include <linux/random.h> +#include <linux/sched/mm.h> +#include <linux/slab.h> + +/* Get a random number in [l, r) */ +#define damon_rand(l, r) (l + prandom_u32_max(r - l)) + +/* + * 't->id' should be the pointer to the relevant 'struct pid' having reference + * count. Caller must put the returned task, unless it is NULL. + */ +#define damon_get_task_struct(t) \ + (get_pid_task((struct pid *)t->id, PIDTYPE_PID)) + +/* + * Get the mm_struct of the given target + * + * Caller _must_ put the mm_struct after use, unless it is NULL. + * + * Returns the mm_struct of the target on success, NULL on failure + */ +static struct mm_struct *damon_get_mm(struct damon_target *t) +{ + struct task_struct *task; + struct mm_struct *mm; + + task = damon_get_task_struct(t); + if (!task) + return NULL; + + mm = get_task_mm(task); + put_task_struct(task); + return mm; +} + +/* + * Functions for the initial monitoring target regions construction + */ + +/* + * Size-evenly split a region into 'nr_pieces' small regions + * + * Returns 0 on success, or negative error code otherwise. + */ +static int damon_va_evenly_split_region(struct damon_ctx *ctx, + struct damon_region *r, unsigned int nr_pieces) +{ + unsigned long sz_orig, sz_piece, orig_end; + struct damon_region *n = NULL, *next; + unsigned long start; + + if (!r || !nr_pieces) + return -EINVAL; + + orig_end = r->ar.end; + sz_orig = r->ar.end - r->ar.start; + sz_piece = ALIGN_DOWN(sz_orig / nr_pieces, DAMON_MIN_REGION); + + if (!sz_piece) + return -EINVAL; + + r->ar.end = r->ar.start + sz_piece; + next = damon_next_region(r); + for (start = r->ar.end; start + sz_piece <= orig_end; + start += sz_piece) { + n = damon_new_region(start, start + sz_piece); + if (!n) + return -ENOMEM; + damon_insert_region(n, r, next); + r = n; + } + /* complement last region for possible rounding error */ + if (n) + n->ar.end = orig_end; + + return 0; +} + +static unsigned long sz_range(struct damon_addr_range *r) +{ + return r->end - r->start; +} + +static void swap_ranges(struct damon_addr_range *r1, + struct damon_addr_range *r2) +{ + struct damon_addr_range tmp; + + tmp = *r1; + *r1 = *r2; + *r2 = tmp; +} + +/* + * Find three regions separated by two biggest unmapped regions + * + * vma the head vma of the target address space + * regions an array of three address ranges that results will be saved + * + * This function receives an address space and finds three regions in it which + * separated by the two biggest unmapped regions in the space. Please refer to + * below comments of '__damon_va_init_regions()' function to know why this is + * necessary. + * + * Returns 0 if success, or negative error code otherwise. + */ +static int __damon_va_three_regions(struct vm_area_struct *vma, + struct damon_addr_range regions[3]) +{ + struct damon_addr_range gap = {0}, first_gap = {0}, second_gap = {0}; + struct vm_area_struct *last_vma = NULL; + unsigned long start = 0; + struct rb_root rbroot; + + /* Find two biggest gaps so that first_gap > second_gap > others */ + for (; vma; vma = vma->vm_next) { + if (!last_vma) { + start = vma->vm_start; + goto next; + } + + if (vma->rb_subtree_gap <= sz_range(&second_gap)) { + rbroot.rb_node = &vma->vm_rb; + vma = rb_entry(rb_last(&rbroot), + struct vm_area_struct, vm_rb); + goto next; + } + + gap.start = last_vma->vm_end; + gap.end = vma->vm_start; + if (sz_range(&gap) > sz_range(&second_gap)) { + swap_ranges(&gap, &second_gap); + if (sz_range(&second_gap) > sz_range(&first_gap)) + swap_ranges(&second_gap, &first_gap); + } +next: + last_vma = vma; + } + + if (!sz_range(&second_gap) || !sz_range(&first_gap)) + return -EINVAL; + + /* Sort the two biggest gaps by address */ + if (first_gap.start > second_gap.start) + swap_ranges(&first_gap, &second_gap); + + /* Store the result */ + regions[0].start = ALIGN(start, DAMON_MIN_REGION); + regions[0].end = ALIGN(first_gap.start, DAMON_MIN_REGION); + regions[1].start = ALIGN(first_gap.end, DAMON_MIN_REGION); + regions[1].end = ALIGN(second_gap.start, DAMON_MIN_REGION); + regions[2].start = ALIGN(second_gap.end, DAMON_MIN_REGION); + regions[2].end = ALIGN(last_vma->vm_end, DAMON_MIN_REGION); + + return 0; +} + +/* + * Get the three regions in the given target (task) + * + * Returns 0 on success, negative error code otherwise. + */ +static int damon_va_three_regions(struct damon_target *t, + struct damon_addr_range regions[3]) +{ + struct mm_struct *mm; + int rc; + + mm = damon_get_mm(t); + if (!mm) + return -EINVAL; + + mmap_read_lock(mm); + rc = __damon_va_three_regions(mm->mmap, regions); + mmap_read_unlock(mm); + + mmput(mm); + return rc; +} + +/* + * Initialize the monitoring target regions for the given target (task) + * + * t the given target + * + * Because only a number of small portions of the entire address space + * is actually mapped to the memory and accessed, monitoring the unmapped + * regions is wasteful. That said, because we can deal with small noises, + * tracking every mapping is not strictly required but could even incur a high + * overhead if the mapping frequently changes or the number of mappings is + * high. The adaptive regions adjustment mechanism will further help to deal + * with the noise by simply identifying the unmapped areas as a region that + * has no access. Moreover, applying the real mappings that would have many + * unmapped areas inside will make the adaptive mechanism quite complex. That + * said, too huge unmapped areas inside the monitoring target should be removed + * to not take the time for the adaptive mechanism. + * + * For the reason, we convert the complex mappings to three distinct regions + * that cover every mapped area of the address space. Also the two gaps + * between the three regions are the two biggest unmapped areas in the given + * address space. In detail, this function first identifies the start and the + * end of the mappings and the two biggest unmapped areas of the address space. + * Then, it constructs the three regions as below: + * + * [mappings[0]->start, big_two_unmapped_areas[0]->start) + * [big_two_unmapped_areas[0]->end, big_two_unmapped_areas[1]->start) + * [big_two_unmapped_areas[1]->end, mappings[nr_mappings - 1]->end) + * + * As usual memory map of processes is as below, the gap between the heap and + * the uppermost mmap()-ed region, and the gap between the lowermost mmap()-ed + * region and the stack will be two biggest unmapped regions. Because these + * gaps are exceptionally huge areas in usual address space, excluding these + * two biggest unmapped regions will be sufficient to make a trade-off. + * + * <heap> + * <BIG UNMAPPED REGION 1> + * <uppermost mmap()-ed region> + * (other mmap()-ed regions and small unmapped regions) + * <lowermost mmap()-ed region> + * <BIG UNMAPPED REGION 2> + * <stack> + */ +static void __damon_va_init_regions(struct damon_ctx *c, + struct damon_target *t) +{ + struct damon_region *r; + struct damon_addr_range regions[3]; + unsigned long sz = 0, nr_pieces; + int i; + + if (damon_va_three_regions(t, regions)) { + pr_err("Failed to get three regions of target %lu\n", t->id); + return; + } + + for (i = 0; i < 3; i++) + sz += regions[i].end - regions[i].start; + if (c->min_nr_regions) + sz /= c->min_nr_regions; + if (sz < DAMON_MIN_REGION) + sz = DAMON_MIN_REGION; + + /* Set the initial three regions of the target */ + for (i = 0; i < 3; i++) { + r = damon_new_region(regions[i].start, regions[i].end); + if (!r) { + pr_err("%d'th init region creation failed\n", i); + return; + } + damon_add_region(r, t); + + nr_pieces = (regions[i].end - regions[i].start) / sz; + damon_va_evenly_split_region(c, r, nr_pieces); + } +} + +/* Initialize '->regions_list' of every target (task) */ +void damon_va_init_regions(struct damon_ctx *ctx) +{ + struct damon_target *t; + + damon_for_each_target(t, ctx) { + /* the user may set the target regions as they want */ + if (!damon_nr_regions(t)) + __damon_va_init_regions(ctx, t); + } +} + +/* + * Functions for the dynamic monitoring target regions update + */ + +/* + * Check whether a region is intersecting an address range + * + * Returns true if it is. + */ +static bool damon_intersect(struct damon_region *r, struct damon_addr_range *re) +{ + return !(r->ar.end <= re->start || re->end <= r->ar.start); +} + +/* + * Update damon regions for the three big regions of the given target + * + * t the given target + * bregions the three big regions of the target + */ +static void damon_va_apply_three_regions(struct damon_ctx *ctx, + struct damon_target *t, struct damon_addr_range bregions[3]) +{ + struct damon_region *r, *next; + unsigned int i = 0; + + /* Remove regions which are not in the three big regions now */ + damon_for_each_region_safe(r, next, t) { + for (i = 0; i < 3; i++) { + if (damon_intersect(r, &bregions[i])) + break; + } + if (i == 3) + damon_destroy_region(r); + } + + /* Adjust intersecting regions to fit with the three big regions */ + for (i = 0; i < 3; i++) { + struct damon_region *first = NULL, *last; + struct damon_region *newr; + struct damon_addr_range *br; + + br = &bregions[i]; + /* Get the first and last regions which intersects with br */ + damon_for_each_region(r, t) { + if (damon_intersect(r, br)) { + if (!first) + first = r; + last = r; + } + if (r->ar.start >= br->end) + break; + } + if (!first) { + /* no damon_region intersects with this big region */ + newr = damon_new_region( + ALIGN_DOWN(br->start, + DAMON_MIN_REGION), + ALIGN(br->end, DAMON_MIN_REGION)); + if (!newr) + continue; + damon_insert_region(newr, damon_prev_region(r), r); + } else { + first->ar.start = ALIGN_DOWN(br->start, + DAMON_MIN_REGION); + last->ar.end = ALIGN(br->end, DAMON_MIN_REGION); + } + } +} + +/* + * Update regions for current memory mappings + */ +void damon_va_update_regions(struct damon_ctx *ctx) +{ + struct damon_addr_range three_regions[3]; + struct damon_target *t; + + damon_for_each_target(t, ctx) { + if (damon_va_three_regions(t, three_regions)) + continue; + damon_va_apply_three_regions(ctx, t, three_regions); + } +} + +static void damon_ptep_mkold(pte_t *pte, struct mm_struct *mm, + unsigned long addr) +{ + bool referenced = false; + struct page *page = pte_page(*pte); + + if (pte_young(*pte)) { + referenced = true; + *pte = pte_mkold(*pte); + } + +#ifdef CONFIG_MMU_NOTIFIER + if (mmu_notifier_clear_young(mm, addr, addr + PAGE_SIZE)) + referenced = true; +#endif /* CONFIG_MMU_NOTIFIER */ + + if (referenced) + set_page_young(page); + + set_page_idle(page); +} + +static void damon_pmdp_mkold(pmd_t *pmd, struct mm_struct *mm, + unsigned long addr) +{ +#ifdef CONFIG_TRANSPARENT_HUGEPAGE + bool referenced = false; + struct page *page = pmd_page(*pmd); + + if (pmd_young(*pmd)) { + referenced = true; + *pmd = pmd_mkold(*pmd); + } + +#ifdef CONFIG_MMU_NOTIFIER + if (mmu_notifier_clear_young(mm, addr, + addr + ((1UL) << HPAGE_PMD_SHIFT))) + referenced = true; +#endif /* CONFIG_MMU_NOTIFIER */ + + if (referenced) + set_page_young(page); + + set_page_idle(page); +#endif /* CONFIG_TRANSPARENT_HUGEPAGE */ +} + +static void damon_va_mkold(struct mm_struct *mm, unsigned long addr) +{ + pte_t *pte = NULL; + pmd_t *pmd = NULL; + spinlock_t *ptl; + + if (follow_pte_pmd(mm, addr, NULL, &pte, &pmd, &ptl)) + return; + + if (pte) { + damon_ptep_mkold(pte, mm, addr); + pte_unmap_unlock(pte, ptl); + } else { + damon_pmdp_mkold(pmd, mm, addr); + spin_unlock(ptl); + } +} + +/* + * Functions for the access checking of the regions + */ + +static void damon_va_prepare_access_check(struct damon_ctx *ctx, + struct mm_struct *mm, struct damon_region *r) +{ + r->sampling_addr = damon_rand(r->ar.start, r->ar.end); + + damon_va_mkold(mm, r->sampling_addr); +} + +void damon_va_prepare_access_checks(struct damon_ctx *ctx) +{ + struct damon_target *t; + struct mm_struct *mm; + struct damon_region *r; + + damon_for_each_target(t, ctx) { + mm = damon_get_mm(t); + if (!mm) + continue; + damon_for_each_region(r, t) + damon_va_prepare_access_check(ctx, mm, r); + mmput(mm); + } +} + +static bool damon_va_young(struct mm_struct *mm, unsigned long addr, + unsigned long *page_sz) +{ + pte_t *pte = NULL; + pmd_t *pmd = NULL; + spinlock_t *ptl; + bool young = false; + + if (follow_pte_pmd(mm, addr, NULL, &pte, &pmd, &ptl)) + return false; + + *page_sz = PAGE_SIZE; + if (pte) { + young = pte_young(*pte); + if (!young) + young = !page_is_idle(pte_page(*pte)); + pte_unmap_unlock(pte, ptl); + return young; + } + +#ifdef CONFIG_TRANSPARENT_HUGEPAGE + young = pmd_young(*pmd); + if (!young) + young = !page_is_idle(pmd_page(*pmd)); + spin_unlock(ptl); + *page_sz = ((1UL) << HPAGE_PMD_SHIFT); +#endif /* CONFIG_TRANSPARENT_HUGEPAGE */ + + return young; +} + +/* + * Check whether the region was accessed after the last preparation + * + * mm 'mm_struct' for the given virtual address space + * r the region to be checked + */ +static void damon_va_check_access(struct damon_ctx *ctx, + struct mm_struct *mm, struct damon_region *r) +{ + static struct mm_struct *last_mm; + static unsigned long last_addr; + static unsigned long last_page_sz = PAGE_SIZE; + static bool last_accessed; + + /* If the region is in the last checked page, reuse the result */ + if (mm == last_mm && (ALIGN_DOWN(last_addr, last_page_sz) == + ALIGN_DOWN(r->sampling_addr, last_page_sz))) { + if (last_accessed) + r->nr_accesses++; + return; + } + + last_accessed = damon_va_young(mm, r->sampling_addr, &last_page_sz); + if (last_accessed) + r->nr_accesses++; + + last_mm = mm; + last_addr = r->sampling_addr; +} + +unsigned int damon_va_check_accesses(struct damon_ctx *ctx) +{ + struct damon_target *t; + struct mm_struct *mm; + struct damon_region *r; + unsigned int max_nr_accesses = 0; + + damon_for_each_target(t, ctx) { + mm = damon_get_mm(t); + if (!mm) + continue; + damon_for_each_region(r, t) { + damon_va_check_access(ctx, mm, r); + max_nr_accesses = max(r->nr_accesses, max_nr_accesses); + } + mmput(mm); + } + + return max_nr_accesses; +} + +/* + * Functions for the target validity check and cleanup + */ + +bool damon_va_target_valid(void *target) +{ + struct damon_target *t = target; + struct task_struct *task; + + task = damon_get_task_struct(t); + if (task) { + put_task_struct(task); + return true; + } + + return false; +} + +void damon_va_cleanup(struct damon_ctx *ctx) +{ + struct damon_target *t, *next; + + damon_for_each_target_safe(t, next, ctx) { + put_pid((struct pid *)t->id); + damon_destroy_target(t); + } +} + +void damon_va_set_primitives(struct damon_ctx *ctx) +{ + ctx->primitive.init_target_regions = damon_va_init_regions; + ctx->primitive.update_target_regions = damon_va_update_regions; + ctx->primitive.prepare_access_checks = damon_va_prepare_access_checks; + ctx->primitive.check_accesses = damon_va_check_accesses; + ctx->primitive.reset_aggregated = NULL; + ctx->primitive.target_valid = damon_va_target_valid; + ctx->primitive.cleanup = damon_va_cleanup; +}