12224d848SSeongJae Park // SPDX-License-Identifier: GPL-2.0 22224d848SSeongJae Park /* 32224d848SSeongJae Park * Data Access Monitor 42224d848SSeongJae Park * 52224d848SSeongJae Park * Author: SeongJae Park <sjpark@amazon.de> 62224d848SSeongJae Park */ 72224d848SSeongJae Park 82224d848SSeongJae Park #define pr_fmt(fmt) "damon: " fmt 92224d848SSeongJae Park 102224d848SSeongJae Park #include <linux/damon.h> 112224d848SSeongJae Park #include <linux/delay.h> 122224d848SSeongJae Park #include <linux/kthread.h> 13ee801b7dSSeongJae Park #include <linux/mm.h> 142224d848SSeongJae Park #include <linux/slab.h> 1538683e00SSeongJae Park #include <linux/string.h> 162224d848SSeongJae Park 172fcb9362SSeongJae Park #define CREATE_TRACE_POINTS 182fcb9362SSeongJae Park #include <trace/events/damon.h> 192fcb9362SSeongJae Park 2017ccae8bSSeongJae Park #ifdef CONFIG_DAMON_KUNIT_TEST 2117ccae8bSSeongJae Park #undef DAMON_MIN_REGION 2217ccae8bSSeongJae Park #define DAMON_MIN_REGION 1 2317ccae8bSSeongJae Park #endif 2417ccae8bSSeongJae Park 252224d848SSeongJae Park static DEFINE_MUTEX(damon_lock); 262224d848SSeongJae Park static int nr_running_ctxs; 278b9b0d33SSeongJae Park static bool running_exclusive_ctxs; 282224d848SSeongJae Park 299f7b053aSSeongJae Park static DEFINE_MUTEX(damon_ops_lock); 309f7b053aSSeongJae Park static struct damon_operations damon_registered_ops[NR_DAMON_OPS]; 319f7b053aSSeongJae Park 32*a1870944SDawei Li static struct kmem_cache *damon_region_cache __ro_after_init; 33*a1870944SDawei Li 349f7b053aSSeongJae Park /* Should be called under damon_ops_lock with id smaller than NR_DAMON_OPS */ 35152e5617SSeongJae Park static bool __damon_is_registered_ops(enum damon_ops_id id) 369f7b053aSSeongJae Park { 379f7b053aSSeongJae Park struct damon_operations empty_ops = {}; 389f7b053aSSeongJae Park 399f7b053aSSeongJae Park if (!memcmp(&empty_ops, &damon_registered_ops[id], sizeof(empty_ops))) 409f7b053aSSeongJae Park return false; 419f7b053aSSeongJae Park return true; 429f7b053aSSeongJae Park } 439f7b053aSSeongJae Park 449f7b053aSSeongJae Park /** 45152e5617SSeongJae Park * damon_is_registered_ops() - Check if a given damon_operations is registered. 46152e5617SSeongJae Park * @id: Id of the damon_operations to check if registered. 47152e5617SSeongJae Park * 48152e5617SSeongJae Park * Return: true if the ops is set, false otherwise. 49152e5617SSeongJae Park */ 50152e5617SSeongJae Park bool damon_is_registered_ops(enum damon_ops_id id) 51152e5617SSeongJae Park { 52152e5617SSeongJae Park bool registered; 53152e5617SSeongJae Park 54152e5617SSeongJae Park if (id >= NR_DAMON_OPS) 55152e5617SSeongJae Park return false; 56152e5617SSeongJae Park mutex_lock(&damon_ops_lock); 57152e5617SSeongJae Park registered = __damon_is_registered_ops(id); 58152e5617SSeongJae Park mutex_unlock(&damon_ops_lock); 59152e5617SSeongJae Park return registered; 60152e5617SSeongJae Park } 61152e5617SSeongJae Park 62152e5617SSeongJae Park /** 639f7b053aSSeongJae Park * damon_register_ops() - Register a monitoring operations set to DAMON. 649f7b053aSSeongJae Park * @ops: monitoring operations set to register. 659f7b053aSSeongJae Park * 669f7b053aSSeongJae Park * This function registers a monitoring operations set of valid &struct 679f7b053aSSeongJae Park * damon_operations->id so that others can find and use them later. 689f7b053aSSeongJae Park * 699f7b053aSSeongJae Park * Return: 0 on success, negative error code otherwise. 709f7b053aSSeongJae Park */ 719f7b053aSSeongJae Park int damon_register_ops(struct damon_operations *ops) 729f7b053aSSeongJae Park { 739f7b053aSSeongJae Park int err = 0; 749f7b053aSSeongJae Park 759f7b053aSSeongJae Park if (ops->id >= NR_DAMON_OPS) 769f7b053aSSeongJae Park return -EINVAL; 779f7b053aSSeongJae Park mutex_lock(&damon_ops_lock); 789f7b053aSSeongJae Park /* Fail for already registered ops */ 79152e5617SSeongJae Park if (__damon_is_registered_ops(ops->id)) { 809f7b053aSSeongJae Park err = -EINVAL; 819f7b053aSSeongJae Park goto out; 829f7b053aSSeongJae Park } 839f7b053aSSeongJae Park damon_registered_ops[ops->id] = *ops; 849f7b053aSSeongJae Park out: 859f7b053aSSeongJae Park mutex_unlock(&damon_ops_lock); 869f7b053aSSeongJae Park return err; 879f7b053aSSeongJae Park } 889f7b053aSSeongJae Park 899f7b053aSSeongJae Park /** 909f7b053aSSeongJae Park * damon_select_ops() - Select a monitoring operations to use with the context. 919f7b053aSSeongJae Park * @ctx: monitoring context to use the operations. 929f7b053aSSeongJae Park * @id: id of the registered monitoring operations to select. 939f7b053aSSeongJae Park * 949f7b053aSSeongJae Park * This function finds registered monitoring operations set of @id and make 959f7b053aSSeongJae Park * @ctx to use it. 969f7b053aSSeongJae Park * 979f7b053aSSeongJae Park * Return: 0 on success, negative error code otherwise. 989f7b053aSSeongJae Park */ 999f7b053aSSeongJae Park int damon_select_ops(struct damon_ctx *ctx, enum damon_ops_id id) 1009f7b053aSSeongJae Park { 1019f7b053aSSeongJae Park int err = 0; 1029f7b053aSSeongJae Park 1039f7b053aSSeongJae Park if (id >= NR_DAMON_OPS) 1049f7b053aSSeongJae Park return -EINVAL; 1059f7b053aSSeongJae Park 1069f7b053aSSeongJae Park mutex_lock(&damon_ops_lock); 107152e5617SSeongJae Park if (!__damon_is_registered_ops(id)) 1089f7b053aSSeongJae Park err = -EINVAL; 1099f7b053aSSeongJae Park else 1109f7b053aSSeongJae Park ctx->ops = damon_registered_ops[id]; 1119f7b053aSSeongJae Park mutex_unlock(&damon_ops_lock); 1129f7b053aSSeongJae Park return err; 1139f7b053aSSeongJae Park } 1149f7b053aSSeongJae Park 115f23b8eeeSSeongJae Park /* 116f23b8eeeSSeongJae Park * Construct a damon_region struct 117f23b8eeeSSeongJae Park * 118f23b8eeeSSeongJae Park * Returns the pointer to the new struct if success, or NULL otherwise 119f23b8eeeSSeongJae Park */ 120f23b8eeeSSeongJae Park struct damon_region *damon_new_region(unsigned long start, unsigned long end) 121f23b8eeeSSeongJae Park { 122f23b8eeeSSeongJae Park struct damon_region *region; 123f23b8eeeSSeongJae Park 124*a1870944SDawei Li region = kmem_cache_alloc(damon_region_cache, GFP_KERNEL); 125f23b8eeeSSeongJae Park if (!region) 126f23b8eeeSSeongJae Park return NULL; 127f23b8eeeSSeongJae Park 128f23b8eeeSSeongJae Park region->ar.start = start; 129f23b8eeeSSeongJae Park region->ar.end = end; 130f23b8eeeSSeongJae Park region->nr_accesses = 0; 131f23b8eeeSSeongJae Park INIT_LIST_HEAD(®ion->list); 132f23b8eeeSSeongJae Park 133fda504faSSeongJae Park region->age = 0; 134fda504faSSeongJae Park region->last_nr_accesses = 0; 135fda504faSSeongJae Park 136f23b8eeeSSeongJae Park return region; 137f23b8eeeSSeongJae Park } 138f23b8eeeSSeongJae Park 139f23b8eeeSSeongJae Park void damon_add_region(struct damon_region *r, struct damon_target *t) 140f23b8eeeSSeongJae Park { 141f23b8eeeSSeongJae Park list_add_tail(&r->list, &t->regions_list); 142b9a6ac4eSSeongJae Park t->nr_regions++; 143f23b8eeeSSeongJae Park } 144f23b8eeeSSeongJae Park 145b9a6ac4eSSeongJae Park static void damon_del_region(struct damon_region *r, struct damon_target *t) 146f23b8eeeSSeongJae Park { 147f23b8eeeSSeongJae Park list_del(&r->list); 148b9a6ac4eSSeongJae Park t->nr_regions--; 149f23b8eeeSSeongJae Park } 150f23b8eeeSSeongJae Park 151f23b8eeeSSeongJae Park static void damon_free_region(struct damon_region *r) 152f23b8eeeSSeongJae Park { 153*a1870944SDawei Li kmem_cache_free(damon_region_cache, r); 154f23b8eeeSSeongJae Park } 155f23b8eeeSSeongJae Park 156b9a6ac4eSSeongJae Park void damon_destroy_region(struct damon_region *r, struct damon_target *t) 157f23b8eeeSSeongJae Park { 158b9a6ac4eSSeongJae Park damon_del_region(r, t); 159f23b8eeeSSeongJae Park damon_free_region(r); 160f23b8eeeSSeongJae Park } 161f23b8eeeSSeongJae Park 162d0723bc0SSeongJae Park /* 163d0723bc0SSeongJae Park * Check whether a region is intersecting an address range 164d0723bc0SSeongJae Park * 165d0723bc0SSeongJae Park * Returns true if it is. 166d0723bc0SSeongJae Park */ 167d0723bc0SSeongJae Park static bool damon_intersect(struct damon_region *r, 168d0723bc0SSeongJae Park struct damon_addr_range *re) 169d0723bc0SSeongJae Park { 170d0723bc0SSeongJae Park return !(r->ar.end <= re->start || re->end <= r->ar.start); 171d0723bc0SSeongJae Park } 172d0723bc0SSeongJae Park 173d0723bc0SSeongJae Park /* 1749c950c22SSeongJae Park * Fill holes in regions with new regions. 1759c950c22SSeongJae Park */ 1769c950c22SSeongJae Park static int damon_fill_regions_holes(struct damon_region *first, 1779c950c22SSeongJae Park struct damon_region *last, struct damon_target *t) 1789c950c22SSeongJae Park { 1799c950c22SSeongJae Park struct damon_region *r = first; 1809c950c22SSeongJae Park 1819c950c22SSeongJae Park damon_for_each_region_from(r, t) { 1829c950c22SSeongJae Park struct damon_region *next, *newr; 1839c950c22SSeongJae Park 1849c950c22SSeongJae Park if (r == last) 1859c950c22SSeongJae Park break; 1869c950c22SSeongJae Park next = damon_next_region(r); 1879c950c22SSeongJae Park if (r->ar.end != next->ar.start) { 1889c950c22SSeongJae Park newr = damon_new_region(r->ar.end, next->ar.start); 1899c950c22SSeongJae Park if (!newr) 1909c950c22SSeongJae Park return -ENOMEM; 1919c950c22SSeongJae Park damon_insert_region(newr, r, next, t); 1929c950c22SSeongJae Park } 1939c950c22SSeongJae Park } 1949c950c22SSeongJae Park return 0; 1959c950c22SSeongJae Park } 1969c950c22SSeongJae Park 1979c950c22SSeongJae Park /* 198d0723bc0SSeongJae Park * damon_set_regions() - Set regions of a target for given address ranges. 199d0723bc0SSeongJae Park * @t: the given target. 200d0723bc0SSeongJae Park * @ranges: array of new monitoring target ranges. 201d0723bc0SSeongJae Park * @nr_ranges: length of @ranges. 202d0723bc0SSeongJae Park * 203d0723bc0SSeongJae Park * This function adds new regions to, or modify existing regions of a 204d0723bc0SSeongJae Park * monitoring target to fit in specific ranges. 205d0723bc0SSeongJae Park * 206d0723bc0SSeongJae Park * Return: 0 if success, or negative error code otherwise. 207d0723bc0SSeongJae Park */ 208d0723bc0SSeongJae Park int damon_set_regions(struct damon_target *t, struct damon_addr_range *ranges, 209d0723bc0SSeongJae Park unsigned int nr_ranges) 210d0723bc0SSeongJae Park { 211d0723bc0SSeongJae Park struct damon_region *r, *next; 212d0723bc0SSeongJae Park unsigned int i; 2139c950c22SSeongJae Park int err; 214d0723bc0SSeongJae Park 215d0723bc0SSeongJae Park /* Remove regions which are not in the new ranges */ 216d0723bc0SSeongJae Park damon_for_each_region_safe(r, next, t) { 217d0723bc0SSeongJae Park for (i = 0; i < nr_ranges; i++) { 218d0723bc0SSeongJae Park if (damon_intersect(r, &ranges[i])) 219d0723bc0SSeongJae Park break; 220d0723bc0SSeongJae Park } 221d0723bc0SSeongJae Park if (i == nr_ranges) 222d0723bc0SSeongJae Park damon_destroy_region(r, t); 223d0723bc0SSeongJae Park } 224d0723bc0SSeongJae Park 22536001cbaSKaixu Xia r = damon_first_region(t); 226d0723bc0SSeongJae Park /* Add new regions or resize existing regions to fit in the ranges */ 227d0723bc0SSeongJae Park for (i = 0; i < nr_ranges; i++) { 228d0723bc0SSeongJae Park struct damon_region *first = NULL, *last, *newr; 229d0723bc0SSeongJae Park struct damon_addr_range *range; 230d0723bc0SSeongJae Park 231d0723bc0SSeongJae Park range = &ranges[i]; 232d0723bc0SSeongJae Park /* Get the first/last regions intersecting with the range */ 23336001cbaSKaixu Xia damon_for_each_region_from(r, t) { 234d0723bc0SSeongJae Park if (damon_intersect(r, range)) { 235d0723bc0SSeongJae Park if (!first) 236d0723bc0SSeongJae Park first = r; 237d0723bc0SSeongJae Park last = r; 238d0723bc0SSeongJae Park } 239d0723bc0SSeongJae Park if (r->ar.start >= range->end) 240d0723bc0SSeongJae Park break; 241d0723bc0SSeongJae Park } 242d0723bc0SSeongJae Park if (!first) { 243d0723bc0SSeongJae Park /* no region intersects with this range */ 244d0723bc0SSeongJae Park newr = damon_new_region( 245d0723bc0SSeongJae Park ALIGN_DOWN(range->start, 246d0723bc0SSeongJae Park DAMON_MIN_REGION), 247d0723bc0SSeongJae Park ALIGN(range->end, DAMON_MIN_REGION)); 248d0723bc0SSeongJae Park if (!newr) 249d0723bc0SSeongJae Park return -ENOMEM; 250d0723bc0SSeongJae Park damon_insert_region(newr, damon_prev_region(r), r, t); 251d0723bc0SSeongJae Park } else { 252d0723bc0SSeongJae Park /* resize intersecting regions to fit in this range */ 253d0723bc0SSeongJae Park first->ar.start = ALIGN_DOWN(range->start, 254d0723bc0SSeongJae Park DAMON_MIN_REGION); 255d0723bc0SSeongJae Park last->ar.end = ALIGN(range->end, DAMON_MIN_REGION); 2569c950c22SSeongJae Park 2579c950c22SSeongJae Park /* fill possible holes in the range */ 2589c950c22SSeongJae Park err = damon_fill_regions_holes(first, last, t); 2599c950c22SSeongJae Park if (err) 2609c950c22SSeongJae Park return err; 261d0723bc0SSeongJae Park } 262d0723bc0SSeongJae Park } 263d0723bc0SSeongJae Park return 0; 264d0723bc0SSeongJae Park } 265d0723bc0SSeongJae Park 266f5a79d7cSYajun Deng struct damos *damon_new_scheme(struct damos_access_pattern *pattern, 267ee801b7dSSeongJae Park enum damos_action action, struct damos_quota *quota, 268ee801b7dSSeongJae Park struct damos_watermarks *wmarks) 2691f366e42SSeongJae Park { 2701f366e42SSeongJae Park struct damos *scheme; 2711f366e42SSeongJae Park 2721f366e42SSeongJae Park scheme = kmalloc(sizeof(*scheme), GFP_KERNEL); 2731f366e42SSeongJae Park if (!scheme) 2741f366e42SSeongJae Park return NULL; 275f5a79d7cSYajun Deng scheme->pattern.min_sz_region = pattern->min_sz_region; 276f5a79d7cSYajun Deng scheme->pattern.max_sz_region = pattern->max_sz_region; 277f5a79d7cSYajun Deng scheme->pattern.min_nr_accesses = pattern->min_nr_accesses; 278f5a79d7cSYajun Deng scheme->pattern.max_nr_accesses = pattern->max_nr_accesses; 279f5a79d7cSYajun Deng scheme->pattern.min_age_region = pattern->min_age_region; 280f5a79d7cSYajun Deng scheme->pattern.max_age_region = pattern->max_age_region; 2811f366e42SSeongJae Park scheme->action = action; 2820e92c2eeSSeongJae Park scheme->stat = (struct damos_stat){}; 2831f366e42SSeongJae Park INIT_LIST_HEAD(&scheme->list); 2841f366e42SSeongJae Park 2851cd24303SSeongJae Park scheme->quota.ms = quota->ms; 2862b8a248dSSeongJae Park scheme->quota.sz = quota->sz; 2872b8a248dSSeongJae Park scheme->quota.reset_interval = quota->reset_interval; 28838683e00SSeongJae Park scheme->quota.weight_sz = quota->weight_sz; 28938683e00SSeongJae Park scheme->quota.weight_nr_accesses = quota->weight_nr_accesses; 29038683e00SSeongJae Park scheme->quota.weight_age = quota->weight_age; 2911cd24303SSeongJae Park scheme->quota.total_charged_sz = 0; 2921cd24303SSeongJae Park scheme->quota.total_charged_ns = 0; 2931cd24303SSeongJae Park scheme->quota.esz = 0; 2942b8a248dSSeongJae Park scheme->quota.charged_sz = 0; 2952b8a248dSSeongJae Park scheme->quota.charged_from = 0; 29650585192SSeongJae Park scheme->quota.charge_target_from = NULL; 29750585192SSeongJae Park scheme->quota.charge_addr_from = 0; 2982b8a248dSSeongJae Park 299ee801b7dSSeongJae Park scheme->wmarks.metric = wmarks->metric; 300ee801b7dSSeongJae Park scheme->wmarks.interval = wmarks->interval; 301ee801b7dSSeongJae Park scheme->wmarks.high = wmarks->high; 302ee801b7dSSeongJae Park scheme->wmarks.mid = wmarks->mid; 303ee801b7dSSeongJae Park scheme->wmarks.low = wmarks->low; 304ee801b7dSSeongJae Park scheme->wmarks.activated = true; 305ee801b7dSSeongJae Park 3061f366e42SSeongJae Park return scheme; 3071f366e42SSeongJae Park } 3081f366e42SSeongJae Park 3091f366e42SSeongJae Park void damon_add_scheme(struct damon_ctx *ctx, struct damos *s) 3101f366e42SSeongJae Park { 3111f366e42SSeongJae Park list_add_tail(&s->list, &ctx->schemes); 3121f366e42SSeongJae Park } 3131f366e42SSeongJae Park 3141f366e42SSeongJae Park static void damon_del_scheme(struct damos *s) 3151f366e42SSeongJae Park { 3161f366e42SSeongJae Park list_del(&s->list); 3171f366e42SSeongJae Park } 3181f366e42SSeongJae Park 3191f366e42SSeongJae Park static void damon_free_scheme(struct damos *s) 3201f366e42SSeongJae Park { 3211f366e42SSeongJae Park kfree(s); 3221f366e42SSeongJae Park } 3231f366e42SSeongJae Park 3241f366e42SSeongJae Park void damon_destroy_scheme(struct damos *s) 3251f366e42SSeongJae Park { 3261f366e42SSeongJae Park damon_del_scheme(s); 3271f366e42SSeongJae Park damon_free_scheme(s); 3281f366e42SSeongJae Park } 3291f366e42SSeongJae Park 330f23b8eeeSSeongJae Park /* 331f23b8eeeSSeongJae Park * Construct a damon_target struct 332f23b8eeeSSeongJae Park * 333f23b8eeeSSeongJae Park * Returns the pointer to the new struct if success, or NULL otherwise 334f23b8eeeSSeongJae Park */ 3351971bd63SSeongJae Park struct damon_target *damon_new_target(void) 336f23b8eeeSSeongJae Park { 337f23b8eeeSSeongJae Park struct damon_target *t; 338f23b8eeeSSeongJae Park 339f23b8eeeSSeongJae Park t = kmalloc(sizeof(*t), GFP_KERNEL); 340f23b8eeeSSeongJae Park if (!t) 341f23b8eeeSSeongJae Park return NULL; 342f23b8eeeSSeongJae Park 3431971bd63SSeongJae Park t->pid = NULL; 344b9a6ac4eSSeongJae Park t->nr_regions = 0; 345f23b8eeeSSeongJae Park INIT_LIST_HEAD(&t->regions_list); 346f23b8eeeSSeongJae Park 347f23b8eeeSSeongJae Park return t; 348f23b8eeeSSeongJae Park } 349f23b8eeeSSeongJae Park 350f23b8eeeSSeongJae Park void damon_add_target(struct damon_ctx *ctx, struct damon_target *t) 351f23b8eeeSSeongJae Park { 352b9a6ac4eSSeongJae Park list_add_tail(&t->list, &ctx->adaptive_targets); 353f23b8eeeSSeongJae Park } 354f23b8eeeSSeongJae Park 355b5ca3e83SXin Hao bool damon_targets_empty(struct damon_ctx *ctx) 356b5ca3e83SXin Hao { 357b5ca3e83SXin Hao return list_empty(&ctx->adaptive_targets); 358b5ca3e83SXin Hao } 359b5ca3e83SXin Hao 360f23b8eeeSSeongJae Park static void damon_del_target(struct damon_target *t) 361f23b8eeeSSeongJae Park { 362f23b8eeeSSeongJae Park list_del(&t->list); 363f23b8eeeSSeongJae Park } 364f23b8eeeSSeongJae Park 365f23b8eeeSSeongJae Park void damon_free_target(struct damon_target *t) 366f23b8eeeSSeongJae Park { 367f23b8eeeSSeongJae Park struct damon_region *r, *next; 368f23b8eeeSSeongJae Park 369f23b8eeeSSeongJae Park damon_for_each_region_safe(r, next, t) 370f23b8eeeSSeongJae Park damon_free_region(r); 371f23b8eeeSSeongJae Park kfree(t); 372f23b8eeeSSeongJae Park } 373f23b8eeeSSeongJae Park 374f23b8eeeSSeongJae Park void damon_destroy_target(struct damon_target *t) 375f23b8eeeSSeongJae Park { 376f23b8eeeSSeongJae Park damon_del_target(t); 377f23b8eeeSSeongJae Park damon_free_target(t); 378f23b8eeeSSeongJae Park } 379f23b8eeeSSeongJae Park 380b9a6ac4eSSeongJae Park unsigned int damon_nr_regions(struct damon_target *t) 381b9a6ac4eSSeongJae Park { 382b9a6ac4eSSeongJae Park return t->nr_regions; 383b9a6ac4eSSeongJae Park } 384b9a6ac4eSSeongJae Park 3852224d848SSeongJae Park struct damon_ctx *damon_new_ctx(void) 3862224d848SSeongJae Park { 3872224d848SSeongJae Park struct damon_ctx *ctx; 3882224d848SSeongJae Park 3892224d848SSeongJae Park ctx = kzalloc(sizeof(*ctx), GFP_KERNEL); 3902224d848SSeongJae Park if (!ctx) 3912224d848SSeongJae Park return NULL; 3922224d848SSeongJae Park 3932224d848SSeongJae Park ctx->sample_interval = 5 * 1000; 3942224d848SSeongJae Park ctx->aggr_interval = 100 * 1000; 395f7d911c3SSeongJae Park ctx->ops_update_interval = 60 * 1000 * 1000; 3962224d848SSeongJae Park 3972224d848SSeongJae Park ktime_get_coarse_ts64(&ctx->last_aggregation); 398f7d911c3SSeongJae Park ctx->last_ops_update = ctx->last_aggregation; 3992224d848SSeongJae Park 4002224d848SSeongJae Park mutex_init(&ctx->kdamond_lock); 4012224d848SSeongJae Park 402b9a6ac4eSSeongJae Park ctx->min_nr_regions = 10; 403b9a6ac4eSSeongJae Park ctx->max_nr_regions = 1000; 404b9a6ac4eSSeongJae Park 405b9a6ac4eSSeongJae Park INIT_LIST_HEAD(&ctx->adaptive_targets); 4061f366e42SSeongJae Park INIT_LIST_HEAD(&ctx->schemes); 4072224d848SSeongJae Park 4082224d848SSeongJae Park return ctx; 4092224d848SSeongJae Park } 4102224d848SSeongJae Park 411f23b8eeeSSeongJae Park static void damon_destroy_targets(struct damon_ctx *ctx) 412f23b8eeeSSeongJae Park { 413f23b8eeeSSeongJae Park struct damon_target *t, *next_t; 414f23b8eeeSSeongJae Park 415f7d911c3SSeongJae Park if (ctx->ops.cleanup) { 416f7d911c3SSeongJae Park ctx->ops.cleanup(ctx); 417f23b8eeeSSeongJae Park return; 418f23b8eeeSSeongJae Park } 419f23b8eeeSSeongJae Park 420f23b8eeeSSeongJae Park damon_for_each_target_safe(t, next_t, ctx) 421f23b8eeeSSeongJae Park damon_destroy_target(t); 422f23b8eeeSSeongJae Park } 423f23b8eeeSSeongJae Park 4242224d848SSeongJae Park void damon_destroy_ctx(struct damon_ctx *ctx) 4252224d848SSeongJae Park { 4261f366e42SSeongJae Park struct damos *s, *next_s; 4271f366e42SSeongJae Park 428f23b8eeeSSeongJae Park damon_destroy_targets(ctx); 4291f366e42SSeongJae Park 4301f366e42SSeongJae Park damon_for_each_scheme_safe(s, next_s, ctx) 4311f366e42SSeongJae Park damon_destroy_scheme(s); 4321f366e42SSeongJae Park 4332224d848SSeongJae Park kfree(ctx); 4342224d848SSeongJae Park } 4352224d848SSeongJae Park 4362224d848SSeongJae Park /** 4372224d848SSeongJae Park * damon_set_attrs() - Set attributes for the monitoring. 4382224d848SSeongJae Park * @ctx: monitoring context 4392224d848SSeongJae Park * @sample_int: time interval between samplings 4402224d848SSeongJae Park * @aggr_int: time interval between aggregations 441f7d911c3SSeongJae Park * @ops_upd_int: time interval between monitoring operations updates 442b9a6ac4eSSeongJae Park * @min_nr_reg: minimal number of regions 443b9a6ac4eSSeongJae Park * @max_nr_reg: maximum number of regions 4442224d848SSeongJae Park * 4452224d848SSeongJae Park * This function should not be called while the kdamond is running. 4462224d848SSeongJae Park * Every time interval is in micro-seconds. 4472224d848SSeongJae Park * 4482224d848SSeongJae Park * Return: 0 on success, negative error code otherwise. 4492224d848SSeongJae Park */ 4502224d848SSeongJae Park int damon_set_attrs(struct damon_ctx *ctx, unsigned long sample_int, 451f7d911c3SSeongJae Park unsigned long aggr_int, unsigned long ops_upd_int, 452b9a6ac4eSSeongJae Park unsigned long min_nr_reg, unsigned long max_nr_reg) 4532224d848SSeongJae Park { 4541afaf5cbSSeongJae Park if (min_nr_reg < 3) 455b9a6ac4eSSeongJae Park return -EINVAL; 4561afaf5cbSSeongJae Park if (min_nr_reg > max_nr_reg) 457b9a6ac4eSSeongJae Park return -EINVAL; 458b9a6ac4eSSeongJae Park 4592224d848SSeongJae Park ctx->sample_interval = sample_int; 4602224d848SSeongJae Park ctx->aggr_interval = aggr_int; 461f7d911c3SSeongJae Park ctx->ops_update_interval = ops_upd_int; 462b9a6ac4eSSeongJae Park ctx->min_nr_regions = min_nr_reg; 463b9a6ac4eSSeongJae Park ctx->max_nr_regions = max_nr_reg; 4642224d848SSeongJae Park 4652224d848SSeongJae Park return 0; 4662224d848SSeongJae Park } 4672224d848SSeongJae Park 4684bc05954SSeongJae Park /** 4691f366e42SSeongJae Park * damon_set_schemes() - Set data access monitoring based operation schemes. 4701f366e42SSeongJae Park * @ctx: monitoring context 4711f366e42SSeongJae Park * @schemes: array of the schemes 4721f366e42SSeongJae Park * @nr_schemes: number of entries in @schemes 4731f366e42SSeongJae Park * 4741f366e42SSeongJae Park * This function should not be called while the kdamond of the context is 4751f366e42SSeongJae Park * running. 4761f366e42SSeongJae Park * 4771f366e42SSeongJae Park * Return: 0 if success, or negative error code otherwise. 4781f366e42SSeongJae Park */ 4791f366e42SSeongJae Park int damon_set_schemes(struct damon_ctx *ctx, struct damos **schemes, 4801f366e42SSeongJae Park ssize_t nr_schemes) 4811f366e42SSeongJae Park { 4821f366e42SSeongJae Park struct damos *s, *next; 4831f366e42SSeongJae Park ssize_t i; 4841f366e42SSeongJae Park 4851f366e42SSeongJae Park damon_for_each_scheme_safe(s, next, ctx) 4861f366e42SSeongJae Park damon_destroy_scheme(s); 4871f366e42SSeongJae Park for (i = 0; i < nr_schemes; i++) 4881f366e42SSeongJae Park damon_add_scheme(ctx, schemes[i]); 4891f366e42SSeongJae Park return 0; 4901f366e42SSeongJae Park } 4911f366e42SSeongJae Park 4921f366e42SSeongJae Park /** 4934bc05954SSeongJae Park * damon_nr_running_ctxs() - Return number of currently running contexts. 4944bc05954SSeongJae Park */ 4954bc05954SSeongJae Park int damon_nr_running_ctxs(void) 4964bc05954SSeongJae Park { 4974bc05954SSeongJae Park int nr_ctxs; 4984bc05954SSeongJae Park 4994bc05954SSeongJae Park mutex_lock(&damon_lock); 5004bc05954SSeongJae Park nr_ctxs = nr_running_ctxs; 5014bc05954SSeongJae Park mutex_unlock(&damon_lock); 5024bc05954SSeongJae Park 5034bc05954SSeongJae Park return nr_ctxs; 5044bc05954SSeongJae Park } 5054bc05954SSeongJae Park 506b9a6ac4eSSeongJae Park /* Returns the size upper limit for each monitoring region */ 507b9a6ac4eSSeongJae Park static unsigned long damon_region_sz_limit(struct damon_ctx *ctx) 508b9a6ac4eSSeongJae Park { 509b9a6ac4eSSeongJae Park struct damon_target *t; 510b9a6ac4eSSeongJae Park struct damon_region *r; 511b9a6ac4eSSeongJae Park unsigned long sz = 0; 512b9a6ac4eSSeongJae Park 513b9a6ac4eSSeongJae Park damon_for_each_target(t, ctx) { 514b9a6ac4eSSeongJae Park damon_for_each_region(r, t) 515b9a6ac4eSSeongJae Park sz += r->ar.end - r->ar.start; 516b9a6ac4eSSeongJae Park } 517b9a6ac4eSSeongJae Park 518b9a6ac4eSSeongJae Park if (ctx->min_nr_regions) 519b9a6ac4eSSeongJae Park sz /= ctx->min_nr_regions; 520b9a6ac4eSSeongJae Park if (sz < DAMON_MIN_REGION) 521b9a6ac4eSSeongJae Park sz = DAMON_MIN_REGION; 522b9a6ac4eSSeongJae Park 523b9a6ac4eSSeongJae Park return sz; 524b9a6ac4eSSeongJae Park } 525b9a6ac4eSSeongJae Park 5262224d848SSeongJae Park static int kdamond_fn(void *data); 5272224d848SSeongJae Park 5282224d848SSeongJae Park /* 5292224d848SSeongJae Park * __damon_start() - Starts monitoring with given context. 5302224d848SSeongJae Park * @ctx: monitoring context 5312224d848SSeongJae Park * 5322224d848SSeongJae Park * This function should be called while damon_lock is hold. 5332224d848SSeongJae Park * 5342224d848SSeongJae Park * Return: 0 on success, negative error code otherwise. 5352224d848SSeongJae Park */ 5362224d848SSeongJae Park static int __damon_start(struct damon_ctx *ctx) 5372224d848SSeongJae Park { 5382224d848SSeongJae Park int err = -EBUSY; 5392224d848SSeongJae Park 5402224d848SSeongJae Park mutex_lock(&ctx->kdamond_lock); 5412224d848SSeongJae Park if (!ctx->kdamond) { 5422224d848SSeongJae Park err = 0; 5432224d848SSeongJae Park ctx->kdamond = kthread_run(kdamond_fn, ctx, "kdamond.%d", 5442224d848SSeongJae Park nr_running_ctxs); 5452224d848SSeongJae Park if (IS_ERR(ctx->kdamond)) { 5462224d848SSeongJae Park err = PTR_ERR(ctx->kdamond); 5477ec1992bSColin Ian King ctx->kdamond = NULL; 5482224d848SSeongJae Park } 5492224d848SSeongJae Park } 5502224d848SSeongJae Park mutex_unlock(&ctx->kdamond_lock); 5512224d848SSeongJae Park 5522224d848SSeongJae Park return err; 5532224d848SSeongJae Park } 5542224d848SSeongJae Park 5552224d848SSeongJae Park /** 5562224d848SSeongJae Park * damon_start() - Starts the monitorings for a given group of contexts. 5572224d848SSeongJae Park * @ctxs: an array of the pointers for contexts to start monitoring 5582224d848SSeongJae Park * @nr_ctxs: size of @ctxs 5598b9b0d33SSeongJae Park * @exclusive: exclusiveness of this contexts group 5602224d848SSeongJae Park * 5612224d848SSeongJae Park * This function starts a group of monitoring threads for a group of monitoring 5622224d848SSeongJae Park * contexts. One thread per each context is created and run in parallel. The 5638b9b0d33SSeongJae Park * caller should handle synchronization between the threads by itself. If 5648b9b0d33SSeongJae Park * @exclusive is true and a group of threads that created by other 5658b9b0d33SSeongJae Park * 'damon_start()' call is currently running, this function does nothing but 5668b9b0d33SSeongJae Park * returns -EBUSY. 5672224d848SSeongJae Park * 5682224d848SSeongJae Park * Return: 0 on success, negative error code otherwise. 5692224d848SSeongJae Park */ 5708b9b0d33SSeongJae Park int damon_start(struct damon_ctx **ctxs, int nr_ctxs, bool exclusive) 5712224d848SSeongJae Park { 5722224d848SSeongJae Park int i; 5732224d848SSeongJae Park int err = 0; 5742224d848SSeongJae Park 5752224d848SSeongJae Park mutex_lock(&damon_lock); 5768b9b0d33SSeongJae Park if ((exclusive && nr_running_ctxs) || 5778b9b0d33SSeongJae Park (!exclusive && running_exclusive_ctxs)) { 5782224d848SSeongJae Park mutex_unlock(&damon_lock); 5792224d848SSeongJae Park return -EBUSY; 5802224d848SSeongJae Park } 5812224d848SSeongJae Park 5822224d848SSeongJae Park for (i = 0; i < nr_ctxs; i++) { 5832224d848SSeongJae Park err = __damon_start(ctxs[i]); 5842224d848SSeongJae Park if (err) 5852224d848SSeongJae Park break; 5862224d848SSeongJae Park nr_running_ctxs++; 5872224d848SSeongJae Park } 5888b9b0d33SSeongJae Park if (exclusive && nr_running_ctxs) 5898b9b0d33SSeongJae Park running_exclusive_ctxs = true; 5902224d848SSeongJae Park mutex_unlock(&damon_lock); 5912224d848SSeongJae Park 5922224d848SSeongJae Park return err; 5932224d848SSeongJae Park } 5942224d848SSeongJae Park 5952224d848SSeongJae Park /* 5968b9b0d33SSeongJae Park * __damon_stop() - Stops monitoring of a given context. 5972224d848SSeongJae Park * @ctx: monitoring context 5982224d848SSeongJae Park * 5992224d848SSeongJae Park * Return: 0 on success, negative error code otherwise. 6002224d848SSeongJae Park */ 6012224d848SSeongJae Park static int __damon_stop(struct damon_ctx *ctx) 6022224d848SSeongJae Park { 6030f91d133SChangbin Du struct task_struct *tsk; 6040f91d133SChangbin Du 6052224d848SSeongJae Park mutex_lock(&ctx->kdamond_lock); 6060f91d133SChangbin Du tsk = ctx->kdamond; 6070f91d133SChangbin Du if (tsk) { 6080f91d133SChangbin Du get_task_struct(tsk); 6092224d848SSeongJae Park mutex_unlock(&ctx->kdamond_lock); 6100f91d133SChangbin Du kthread_stop(tsk); 6110f91d133SChangbin Du put_task_struct(tsk); 6122224d848SSeongJae Park return 0; 6132224d848SSeongJae Park } 6142224d848SSeongJae Park mutex_unlock(&ctx->kdamond_lock); 6152224d848SSeongJae Park 6162224d848SSeongJae Park return -EPERM; 6172224d848SSeongJae Park } 6182224d848SSeongJae Park 6192224d848SSeongJae Park /** 6202224d848SSeongJae Park * damon_stop() - Stops the monitorings for a given group of contexts. 6212224d848SSeongJae Park * @ctxs: an array of the pointers for contexts to stop monitoring 6222224d848SSeongJae Park * @nr_ctxs: size of @ctxs 6232224d848SSeongJae Park * 6242224d848SSeongJae Park * Return: 0 on success, negative error code otherwise. 6252224d848SSeongJae Park */ 6262224d848SSeongJae Park int damon_stop(struct damon_ctx **ctxs, int nr_ctxs) 6272224d848SSeongJae Park { 6282224d848SSeongJae Park int i, err = 0; 6292224d848SSeongJae Park 6302224d848SSeongJae Park for (i = 0; i < nr_ctxs; i++) { 6312224d848SSeongJae Park /* nr_running_ctxs is decremented in kdamond_fn */ 6322224d848SSeongJae Park err = __damon_stop(ctxs[i]); 6332224d848SSeongJae Park if (err) 6348b9b0d33SSeongJae Park break; 6352224d848SSeongJae Park } 6362224d848SSeongJae Park return err; 6372224d848SSeongJae Park } 6382224d848SSeongJae Park 6392224d848SSeongJae Park /* 6402224d848SSeongJae Park * damon_check_reset_time_interval() - Check if a time interval is elapsed. 6412224d848SSeongJae Park * @baseline: the time to check whether the interval has elapsed since 6422224d848SSeongJae Park * @interval: the time interval (microseconds) 6432224d848SSeongJae Park * 6442224d848SSeongJae Park * See whether the given time interval has passed since the given baseline 6452224d848SSeongJae Park * time. If so, it also updates the baseline to current time for next check. 6462224d848SSeongJae Park * 6472224d848SSeongJae Park * Return: true if the time interval has passed, or false otherwise. 6482224d848SSeongJae Park */ 6492224d848SSeongJae Park static bool damon_check_reset_time_interval(struct timespec64 *baseline, 6502224d848SSeongJae Park unsigned long interval) 6512224d848SSeongJae Park { 6522224d848SSeongJae Park struct timespec64 now; 6532224d848SSeongJae Park 6542224d848SSeongJae Park ktime_get_coarse_ts64(&now); 6552224d848SSeongJae Park if ((timespec64_to_ns(&now) - timespec64_to_ns(baseline)) < 6562224d848SSeongJae Park interval * 1000) 6572224d848SSeongJae Park return false; 6582224d848SSeongJae Park *baseline = now; 6592224d848SSeongJae Park return true; 6602224d848SSeongJae Park } 6612224d848SSeongJae Park 6622224d848SSeongJae Park /* 6632224d848SSeongJae Park * Check whether it is time to flush the aggregated information 6642224d848SSeongJae Park */ 6652224d848SSeongJae Park static bool kdamond_aggregate_interval_passed(struct damon_ctx *ctx) 6662224d848SSeongJae Park { 6672224d848SSeongJae Park return damon_check_reset_time_interval(&ctx->last_aggregation, 6682224d848SSeongJae Park ctx->aggr_interval); 6692224d848SSeongJae Park } 6702224d848SSeongJae Park 6712224d848SSeongJae Park /* 672f23b8eeeSSeongJae Park * Reset the aggregated monitoring results ('nr_accesses' of each region). 673f23b8eeeSSeongJae Park */ 674f23b8eeeSSeongJae Park static void kdamond_reset_aggregated(struct damon_ctx *c) 675f23b8eeeSSeongJae Park { 676f23b8eeeSSeongJae Park struct damon_target *t; 67776fd0285SSeongJae Park unsigned int ti = 0; /* target's index */ 678f23b8eeeSSeongJae Park 679f23b8eeeSSeongJae Park damon_for_each_target(t, c) { 680f23b8eeeSSeongJae Park struct damon_region *r; 681f23b8eeeSSeongJae Park 6822fcb9362SSeongJae Park damon_for_each_region(r, t) { 68376fd0285SSeongJae Park trace_damon_aggregated(t, ti, r, damon_nr_regions(t)); 684fda504faSSeongJae Park r->last_nr_accesses = r->nr_accesses; 685f23b8eeeSSeongJae Park r->nr_accesses = 0; 686f23b8eeeSSeongJae Park } 68776fd0285SSeongJae Park ti++; 688f23b8eeeSSeongJae Park } 6892fcb9362SSeongJae Park } 690f23b8eeeSSeongJae Park 6914ed98243SKaixu Xia static void damon_split_region_at(struct damon_target *t, 6924ed98243SKaixu Xia struct damon_region *r, unsigned long sz_r); 6932b8a248dSSeongJae Park 69438683e00SSeongJae Park static bool __damos_valid_target(struct damon_region *r, struct damos *s) 69538683e00SSeongJae Park { 69638683e00SSeongJae Park unsigned long sz; 69738683e00SSeongJae Park 69838683e00SSeongJae Park sz = r->ar.end - r->ar.start; 699f5a79d7cSYajun Deng return s->pattern.min_sz_region <= sz && 700f5a79d7cSYajun Deng sz <= s->pattern.max_sz_region && 701f5a79d7cSYajun Deng s->pattern.min_nr_accesses <= r->nr_accesses && 702f5a79d7cSYajun Deng r->nr_accesses <= s->pattern.max_nr_accesses && 703f5a79d7cSYajun Deng s->pattern.min_age_region <= r->age && 704f5a79d7cSYajun Deng r->age <= s->pattern.max_age_region; 70538683e00SSeongJae Park } 70638683e00SSeongJae Park 70738683e00SSeongJae Park static bool damos_valid_target(struct damon_ctx *c, struct damon_target *t, 70838683e00SSeongJae Park struct damon_region *r, struct damos *s) 70938683e00SSeongJae Park { 71038683e00SSeongJae Park bool ret = __damos_valid_target(r, s); 71138683e00SSeongJae Park 712f7d911c3SSeongJae Park if (!ret || !s->quota.esz || !c->ops.get_scheme_score) 71338683e00SSeongJae Park return ret; 71438683e00SSeongJae Park 715f7d911c3SSeongJae Park return c->ops.get_scheme_score(c, t, r, s) >= s->quota.min_score; 71638683e00SSeongJae Park } 71738683e00SSeongJae Park 7181f366e42SSeongJae Park static void damon_do_apply_schemes(struct damon_ctx *c, 7191f366e42SSeongJae Park struct damon_target *t, 7201f366e42SSeongJae Park struct damon_region *r) 7211f366e42SSeongJae Park { 7221f366e42SSeongJae Park struct damos *s; 7231f366e42SSeongJae Park 7241f366e42SSeongJae Park damon_for_each_scheme(s, c) { 7252b8a248dSSeongJae Park struct damos_quota *quota = &s->quota; 7262b8a248dSSeongJae Park unsigned long sz = r->ar.end - r->ar.start; 7271cd24303SSeongJae Park struct timespec64 begin, end; 7280e92c2eeSSeongJae Park unsigned long sz_applied = 0; 7292b8a248dSSeongJae Park 730ee801b7dSSeongJae Park if (!s->wmarks.activated) 731ee801b7dSSeongJae Park continue; 732ee801b7dSSeongJae Park 7332b8a248dSSeongJae Park /* Check the quota */ 7341cd24303SSeongJae Park if (quota->esz && quota->charged_sz >= quota->esz) 7352b8a248dSSeongJae Park continue; 7362b8a248dSSeongJae Park 73750585192SSeongJae Park /* Skip previously charged regions */ 73850585192SSeongJae Park if (quota->charge_target_from) { 73950585192SSeongJae Park if (t != quota->charge_target_from) 74050585192SSeongJae Park continue; 74150585192SSeongJae Park if (r == damon_last_region(t)) { 74250585192SSeongJae Park quota->charge_target_from = NULL; 74350585192SSeongJae Park quota->charge_addr_from = 0; 74450585192SSeongJae Park continue; 74550585192SSeongJae Park } 74650585192SSeongJae Park if (quota->charge_addr_from && 74750585192SSeongJae Park r->ar.end <= quota->charge_addr_from) 74850585192SSeongJae Park continue; 74950585192SSeongJae Park 75050585192SSeongJae Park if (quota->charge_addr_from && r->ar.start < 75150585192SSeongJae Park quota->charge_addr_from) { 75250585192SSeongJae Park sz = ALIGN_DOWN(quota->charge_addr_from - 75350585192SSeongJae Park r->ar.start, DAMON_MIN_REGION); 75450585192SSeongJae Park if (!sz) { 75550585192SSeongJae Park if (r->ar.end - r->ar.start <= 75650585192SSeongJae Park DAMON_MIN_REGION) 75750585192SSeongJae Park continue; 75850585192SSeongJae Park sz = DAMON_MIN_REGION; 75950585192SSeongJae Park } 7604ed98243SKaixu Xia damon_split_region_at(t, r, sz); 76150585192SSeongJae Park r = damon_next_region(r); 76250585192SSeongJae Park sz = r->ar.end - r->ar.start; 76350585192SSeongJae Park } 76450585192SSeongJae Park quota->charge_target_from = NULL; 76550585192SSeongJae Park quota->charge_addr_from = 0; 76650585192SSeongJae Park } 76750585192SSeongJae Park 76838683e00SSeongJae Park if (!damos_valid_target(c, t, r, s)) 7691f366e42SSeongJae Park continue; 7702b8a248dSSeongJae Park 7712b8a248dSSeongJae Park /* Apply the scheme */ 772f7d911c3SSeongJae Park if (c->ops.apply_scheme) { 7731cd24303SSeongJae Park if (quota->esz && 7741cd24303SSeongJae Park quota->charged_sz + sz > quota->esz) { 7751cd24303SSeongJae Park sz = ALIGN_DOWN(quota->esz - quota->charged_sz, 7762b8a248dSSeongJae Park DAMON_MIN_REGION); 7772b8a248dSSeongJae Park if (!sz) 7782b8a248dSSeongJae Park goto update_stat; 7794ed98243SKaixu Xia damon_split_region_at(t, r, sz); 7802b8a248dSSeongJae Park } 7811cd24303SSeongJae Park ktime_get_coarse_ts64(&begin); 782f7d911c3SSeongJae Park sz_applied = c->ops.apply_scheme(c, t, r, s); 7831cd24303SSeongJae Park ktime_get_coarse_ts64(&end); 7841cd24303SSeongJae Park quota->total_charged_ns += timespec64_to_ns(&end) - 7851cd24303SSeongJae Park timespec64_to_ns(&begin); 7862b8a248dSSeongJae Park quota->charged_sz += sz; 7871cd24303SSeongJae Park if (quota->esz && quota->charged_sz >= quota->esz) { 78850585192SSeongJae Park quota->charge_target_from = t; 78950585192SSeongJae Park quota->charge_addr_from = r->ar.end + 1; 79050585192SSeongJae Park } 7912b8a248dSSeongJae Park } 7922f0b548cSSeongJae Park if (s->action != DAMOS_STAT) 7931f366e42SSeongJae Park r->age = 0; 7942b8a248dSSeongJae Park 7952b8a248dSSeongJae Park update_stat: 7960e92c2eeSSeongJae Park s->stat.nr_tried++; 7970e92c2eeSSeongJae Park s->stat.sz_tried += sz; 7980e92c2eeSSeongJae Park if (sz_applied) 7990e92c2eeSSeongJae Park s->stat.nr_applied++; 8000e92c2eeSSeongJae Park s->stat.sz_applied += sz_applied; 8011f366e42SSeongJae Park } 8021f366e42SSeongJae Park } 8031f366e42SSeongJae Park 8041cd24303SSeongJae Park /* Shouldn't be called if quota->ms and quota->sz are zero */ 8051cd24303SSeongJae Park static void damos_set_effective_quota(struct damos_quota *quota) 8061cd24303SSeongJae Park { 8071cd24303SSeongJae Park unsigned long throughput; 8081cd24303SSeongJae Park unsigned long esz; 8091cd24303SSeongJae Park 8101cd24303SSeongJae Park if (!quota->ms) { 8111cd24303SSeongJae Park quota->esz = quota->sz; 8121cd24303SSeongJae Park return; 8131cd24303SSeongJae Park } 8141cd24303SSeongJae Park 8151cd24303SSeongJae Park if (quota->total_charged_ns) 8161cd24303SSeongJae Park throughput = quota->total_charged_sz * 1000000 / 8171cd24303SSeongJae Park quota->total_charged_ns; 8181cd24303SSeongJae Park else 8191cd24303SSeongJae Park throughput = PAGE_SIZE * 1024; 8201cd24303SSeongJae Park esz = throughput * quota->ms; 8211cd24303SSeongJae Park 8221cd24303SSeongJae Park if (quota->sz && quota->sz < esz) 8231cd24303SSeongJae Park esz = quota->sz; 8241cd24303SSeongJae Park quota->esz = esz; 8251cd24303SSeongJae Park } 8261cd24303SSeongJae Park 8271f366e42SSeongJae Park static void kdamond_apply_schemes(struct damon_ctx *c) 8281f366e42SSeongJae Park { 8291f366e42SSeongJae Park struct damon_target *t; 8302b8a248dSSeongJae Park struct damon_region *r, *next_r; 8312b8a248dSSeongJae Park struct damos *s; 8322b8a248dSSeongJae Park 8332b8a248dSSeongJae Park damon_for_each_scheme(s, c) { 8342b8a248dSSeongJae Park struct damos_quota *quota = &s->quota; 83538683e00SSeongJae Park unsigned long cumulated_sz; 83638683e00SSeongJae Park unsigned int score, max_score = 0; 8372b8a248dSSeongJae Park 838ee801b7dSSeongJae Park if (!s->wmarks.activated) 839ee801b7dSSeongJae Park continue; 840ee801b7dSSeongJae Park 8411cd24303SSeongJae Park if (!quota->ms && !quota->sz) 8422b8a248dSSeongJae Park continue; 8432b8a248dSSeongJae Park 8442b8a248dSSeongJae Park /* New charge window starts */ 8452b8a248dSSeongJae Park if (time_after_eq(jiffies, quota->charged_from + 8462b8a248dSSeongJae Park msecs_to_jiffies( 8472b8a248dSSeongJae Park quota->reset_interval))) { 8486268eac3SSeongJae Park if (quota->esz && quota->charged_sz >= quota->esz) 8496268eac3SSeongJae Park s->stat.qt_exceeds++; 8501cd24303SSeongJae Park quota->total_charged_sz += quota->charged_sz; 8512b8a248dSSeongJae Park quota->charged_from = jiffies; 8522b8a248dSSeongJae Park quota->charged_sz = 0; 8531cd24303SSeongJae Park damos_set_effective_quota(quota); 8542b8a248dSSeongJae Park } 85538683e00SSeongJae Park 856f7d911c3SSeongJae Park if (!c->ops.get_scheme_score) 85738683e00SSeongJae Park continue; 85838683e00SSeongJae Park 85938683e00SSeongJae Park /* Fill up the score histogram */ 86038683e00SSeongJae Park memset(quota->histogram, 0, sizeof(quota->histogram)); 86138683e00SSeongJae Park damon_for_each_target(t, c) { 86238683e00SSeongJae Park damon_for_each_region(r, t) { 86338683e00SSeongJae Park if (!__damos_valid_target(r, s)) 86438683e00SSeongJae Park continue; 865f7d911c3SSeongJae Park score = c->ops.get_scheme_score( 86638683e00SSeongJae Park c, t, r, s); 86738683e00SSeongJae Park quota->histogram[score] += 86838683e00SSeongJae Park r->ar.end - r->ar.start; 86938683e00SSeongJae Park if (score > max_score) 87038683e00SSeongJae Park max_score = score; 87138683e00SSeongJae Park } 87238683e00SSeongJae Park } 87338683e00SSeongJae Park 87438683e00SSeongJae Park /* Set the min score limit */ 87538683e00SSeongJae Park for (cumulated_sz = 0, score = max_score; ; score--) { 87638683e00SSeongJae Park cumulated_sz += quota->histogram[score]; 87738683e00SSeongJae Park if (cumulated_sz >= quota->esz || !score) 87838683e00SSeongJae Park break; 87938683e00SSeongJae Park } 88038683e00SSeongJae Park quota->min_score = score; 8812b8a248dSSeongJae Park } 8821f366e42SSeongJae Park 8831f366e42SSeongJae Park damon_for_each_target(t, c) { 8842b8a248dSSeongJae Park damon_for_each_region_safe(r, next_r, t) 8851f366e42SSeongJae Park damon_do_apply_schemes(c, t, r); 8861f366e42SSeongJae Park } 8871f366e42SSeongJae Park } 8881f366e42SSeongJae Park 88988f86dcfSSeongJae Park static inline unsigned long sz_damon_region(struct damon_region *r) 89088f86dcfSSeongJae Park { 89188f86dcfSSeongJae Park return r->ar.end - r->ar.start; 89288f86dcfSSeongJae Park } 893b9a6ac4eSSeongJae Park 894b9a6ac4eSSeongJae Park /* 895b9a6ac4eSSeongJae Park * Merge two adjacent regions into one region 896b9a6ac4eSSeongJae Park */ 897b9a6ac4eSSeongJae Park static void damon_merge_two_regions(struct damon_target *t, 898b9a6ac4eSSeongJae Park struct damon_region *l, struct damon_region *r) 899b9a6ac4eSSeongJae Park { 900b9a6ac4eSSeongJae Park unsigned long sz_l = sz_damon_region(l), sz_r = sz_damon_region(r); 901b9a6ac4eSSeongJae Park 902b9a6ac4eSSeongJae Park l->nr_accesses = (l->nr_accesses * sz_l + r->nr_accesses * sz_r) / 903b9a6ac4eSSeongJae Park (sz_l + sz_r); 904fda504faSSeongJae Park l->age = (l->age * sz_l + r->age * sz_r) / (sz_l + sz_r); 905b9a6ac4eSSeongJae Park l->ar.end = r->ar.end; 906b9a6ac4eSSeongJae Park damon_destroy_region(r, t); 907b9a6ac4eSSeongJae Park } 908b9a6ac4eSSeongJae Park 909b9a6ac4eSSeongJae Park /* 910b9a6ac4eSSeongJae Park * Merge adjacent regions having similar access frequencies 911b9a6ac4eSSeongJae Park * 912b9a6ac4eSSeongJae Park * t target affected by this merge operation 913b9a6ac4eSSeongJae Park * thres '->nr_accesses' diff threshold for the merge 914b9a6ac4eSSeongJae Park * sz_limit size upper limit of each region 915b9a6ac4eSSeongJae Park */ 916b9a6ac4eSSeongJae Park static void damon_merge_regions_of(struct damon_target *t, unsigned int thres, 917b9a6ac4eSSeongJae Park unsigned long sz_limit) 918b9a6ac4eSSeongJae Park { 919b9a6ac4eSSeongJae Park struct damon_region *r, *prev = NULL, *next; 920b9a6ac4eSSeongJae Park 921b9a6ac4eSSeongJae Park damon_for_each_region_safe(r, next, t) { 922d720bbbdSXin Hao if (abs(r->nr_accesses - r->last_nr_accesses) > thres) 923fda504faSSeongJae Park r->age = 0; 924fda504faSSeongJae Park else 925fda504faSSeongJae Park r->age++; 926fda504faSSeongJae Park 927b9a6ac4eSSeongJae Park if (prev && prev->ar.end == r->ar.start && 928d720bbbdSXin Hao abs(prev->nr_accesses - r->nr_accesses) <= thres && 929b9a6ac4eSSeongJae Park sz_damon_region(prev) + sz_damon_region(r) <= sz_limit) 930b9a6ac4eSSeongJae Park damon_merge_two_regions(t, prev, r); 931b9a6ac4eSSeongJae Park else 932b9a6ac4eSSeongJae Park prev = r; 933b9a6ac4eSSeongJae Park } 934b9a6ac4eSSeongJae Park } 935b9a6ac4eSSeongJae Park 936b9a6ac4eSSeongJae Park /* 937b9a6ac4eSSeongJae Park * Merge adjacent regions having similar access frequencies 938b9a6ac4eSSeongJae Park * 939b9a6ac4eSSeongJae Park * threshold '->nr_accesses' diff threshold for the merge 940b9a6ac4eSSeongJae Park * sz_limit size upper limit of each region 941b9a6ac4eSSeongJae Park * 942b9a6ac4eSSeongJae Park * This function merges monitoring target regions which are adjacent and their 943b9a6ac4eSSeongJae Park * access frequencies are similar. This is for minimizing the monitoring 944b9a6ac4eSSeongJae Park * overhead under the dynamically changeable access pattern. If a merge was 945b9a6ac4eSSeongJae Park * unnecessarily made, later 'kdamond_split_regions()' will revert it. 946b9a6ac4eSSeongJae Park */ 947b9a6ac4eSSeongJae Park static void kdamond_merge_regions(struct damon_ctx *c, unsigned int threshold, 948b9a6ac4eSSeongJae Park unsigned long sz_limit) 949b9a6ac4eSSeongJae Park { 950b9a6ac4eSSeongJae Park struct damon_target *t; 951b9a6ac4eSSeongJae Park 952b9a6ac4eSSeongJae Park damon_for_each_target(t, c) 953b9a6ac4eSSeongJae Park damon_merge_regions_of(t, threshold, sz_limit); 954b9a6ac4eSSeongJae Park } 955b9a6ac4eSSeongJae Park 956b9a6ac4eSSeongJae Park /* 957b9a6ac4eSSeongJae Park * Split a region in two 958b9a6ac4eSSeongJae Park * 959b9a6ac4eSSeongJae Park * r the region to be split 960b9a6ac4eSSeongJae Park * sz_r size of the first sub-region that will be made 961b9a6ac4eSSeongJae Park */ 9624ed98243SKaixu Xia static void damon_split_region_at(struct damon_target *t, 9634ed98243SKaixu Xia struct damon_region *r, unsigned long sz_r) 964b9a6ac4eSSeongJae Park { 965b9a6ac4eSSeongJae Park struct damon_region *new; 966b9a6ac4eSSeongJae Park 967b9a6ac4eSSeongJae Park new = damon_new_region(r->ar.start + sz_r, r->ar.end); 968b9a6ac4eSSeongJae Park if (!new) 969b9a6ac4eSSeongJae Park return; 970b9a6ac4eSSeongJae Park 971b9a6ac4eSSeongJae Park r->ar.end = new->ar.start; 972b9a6ac4eSSeongJae Park 973fda504faSSeongJae Park new->age = r->age; 974fda504faSSeongJae Park new->last_nr_accesses = r->last_nr_accesses; 975fda504faSSeongJae Park 976b9a6ac4eSSeongJae Park damon_insert_region(new, r, damon_next_region(r), t); 977b9a6ac4eSSeongJae Park } 978b9a6ac4eSSeongJae Park 979b9a6ac4eSSeongJae Park /* Split every region in the given target into 'nr_subs' regions */ 9804ed98243SKaixu Xia static void damon_split_regions_of(struct damon_target *t, int nr_subs) 981b9a6ac4eSSeongJae Park { 982b9a6ac4eSSeongJae Park struct damon_region *r, *next; 983b9a6ac4eSSeongJae Park unsigned long sz_region, sz_sub = 0; 984b9a6ac4eSSeongJae Park int i; 985b9a6ac4eSSeongJae Park 986b9a6ac4eSSeongJae Park damon_for_each_region_safe(r, next, t) { 987b9a6ac4eSSeongJae Park sz_region = r->ar.end - r->ar.start; 988b9a6ac4eSSeongJae Park 989b9a6ac4eSSeongJae Park for (i = 0; i < nr_subs - 1 && 990b9a6ac4eSSeongJae Park sz_region > 2 * DAMON_MIN_REGION; i++) { 991b9a6ac4eSSeongJae Park /* 992b9a6ac4eSSeongJae Park * Randomly select size of left sub-region to be at 993b9a6ac4eSSeongJae Park * least 10 percent and at most 90% of original region 994b9a6ac4eSSeongJae Park */ 995b9a6ac4eSSeongJae Park sz_sub = ALIGN_DOWN(damon_rand(1, 10) * 996b9a6ac4eSSeongJae Park sz_region / 10, DAMON_MIN_REGION); 997b9a6ac4eSSeongJae Park /* Do not allow blank region */ 998b9a6ac4eSSeongJae Park if (sz_sub == 0 || sz_sub >= sz_region) 999b9a6ac4eSSeongJae Park continue; 1000b9a6ac4eSSeongJae Park 10014ed98243SKaixu Xia damon_split_region_at(t, r, sz_sub); 1002b9a6ac4eSSeongJae Park sz_region = sz_sub; 1003b9a6ac4eSSeongJae Park } 1004b9a6ac4eSSeongJae Park } 1005b9a6ac4eSSeongJae Park } 1006b9a6ac4eSSeongJae Park 1007b9a6ac4eSSeongJae Park /* 1008b9a6ac4eSSeongJae Park * Split every target region into randomly-sized small regions 1009b9a6ac4eSSeongJae Park * 1010b9a6ac4eSSeongJae Park * This function splits every target region into random-sized small regions if 1011b9a6ac4eSSeongJae Park * current total number of the regions is equal or smaller than half of the 1012b9a6ac4eSSeongJae Park * user-specified maximum number of regions. This is for maximizing the 1013b9a6ac4eSSeongJae Park * monitoring accuracy under the dynamically changeable access patterns. If a 1014b9a6ac4eSSeongJae Park * split was unnecessarily made, later 'kdamond_merge_regions()' will revert 1015b9a6ac4eSSeongJae Park * it. 1016b9a6ac4eSSeongJae Park */ 1017b9a6ac4eSSeongJae Park static void kdamond_split_regions(struct damon_ctx *ctx) 1018b9a6ac4eSSeongJae Park { 1019b9a6ac4eSSeongJae Park struct damon_target *t; 1020b9a6ac4eSSeongJae Park unsigned int nr_regions = 0; 1021b9a6ac4eSSeongJae Park static unsigned int last_nr_regions; 1022b9a6ac4eSSeongJae Park int nr_subregions = 2; 1023b9a6ac4eSSeongJae Park 1024b9a6ac4eSSeongJae Park damon_for_each_target(t, ctx) 1025b9a6ac4eSSeongJae Park nr_regions += damon_nr_regions(t); 1026b9a6ac4eSSeongJae Park 1027b9a6ac4eSSeongJae Park if (nr_regions > ctx->max_nr_regions / 2) 1028b9a6ac4eSSeongJae Park return; 1029b9a6ac4eSSeongJae Park 1030b9a6ac4eSSeongJae Park /* Maybe the middle of the region has different access frequency */ 1031b9a6ac4eSSeongJae Park if (last_nr_regions == nr_regions && 1032b9a6ac4eSSeongJae Park nr_regions < ctx->max_nr_regions / 3) 1033b9a6ac4eSSeongJae Park nr_subregions = 3; 1034b9a6ac4eSSeongJae Park 1035b9a6ac4eSSeongJae Park damon_for_each_target(t, ctx) 10364ed98243SKaixu Xia damon_split_regions_of(t, nr_subregions); 1037b9a6ac4eSSeongJae Park 1038b9a6ac4eSSeongJae Park last_nr_regions = nr_regions; 1039b9a6ac4eSSeongJae Park } 1040b9a6ac4eSSeongJae Park 1041f23b8eeeSSeongJae Park /* 1042f7d911c3SSeongJae Park * Check whether it is time to check and apply the operations-related data 1043f7d911c3SSeongJae Park * structures. 10442224d848SSeongJae Park * 10452224d848SSeongJae Park * Returns true if it is. 10462224d848SSeongJae Park */ 1047f7d911c3SSeongJae Park static bool kdamond_need_update_operations(struct damon_ctx *ctx) 10482224d848SSeongJae Park { 1049f7d911c3SSeongJae Park return damon_check_reset_time_interval(&ctx->last_ops_update, 1050f7d911c3SSeongJae Park ctx->ops_update_interval); 10512224d848SSeongJae Park } 10522224d848SSeongJae Park 10532224d848SSeongJae Park /* 10542224d848SSeongJae Park * Check whether current monitoring should be stopped 10552224d848SSeongJae Park * 10562224d848SSeongJae Park * The monitoring is stopped when either the user requested to stop, or all 10572224d848SSeongJae Park * monitoring targets are invalid. 10582224d848SSeongJae Park * 10592224d848SSeongJae Park * Returns true if need to stop current monitoring. 10602224d848SSeongJae Park */ 10612224d848SSeongJae Park static bool kdamond_need_stop(struct damon_ctx *ctx) 10622224d848SSeongJae Park { 1063f23b8eeeSSeongJae Park struct damon_target *t; 10642224d848SSeongJae Park 10650f91d133SChangbin Du if (kthread_should_stop()) 10662224d848SSeongJae Park return true; 10672224d848SSeongJae Park 1068f7d911c3SSeongJae Park if (!ctx->ops.target_valid) 10692224d848SSeongJae Park return false; 10702224d848SSeongJae Park 1071f23b8eeeSSeongJae Park damon_for_each_target(t, ctx) { 1072f7d911c3SSeongJae Park if (ctx->ops.target_valid(t)) 1073f23b8eeeSSeongJae Park return false; 1074f23b8eeeSSeongJae Park } 1075f23b8eeeSSeongJae Park 1076f23b8eeeSSeongJae Park return true; 10772224d848SSeongJae Park } 10782224d848SSeongJae Park 1079ee801b7dSSeongJae Park static unsigned long damos_wmark_metric_value(enum damos_wmark_metric metric) 1080ee801b7dSSeongJae Park { 1081ee801b7dSSeongJae Park struct sysinfo i; 1082ee801b7dSSeongJae Park 1083ee801b7dSSeongJae Park switch (metric) { 1084ee801b7dSSeongJae Park case DAMOS_WMARK_FREE_MEM_RATE: 1085ee801b7dSSeongJae Park si_meminfo(&i); 1086ee801b7dSSeongJae Park return i.freeram * 1000 / i.totalram; 1087ee801b7dSSeongJae Park default: 1088ee801b7dSSeongJae Park break; 1089ee801b7dSSeongJae Park } 1090ee801b7dSSeongJae Park return -EINVAL; 1091ee801b7dSSeongJae Park } 1092ee801b7dSSeongJae Park 1093ee801b7dSSeongJae Park /* 1094ee801b7dSSeongJae Park * Returns zero if the scheme is active. Else, returns time to wait for next 1095ee801b7dSSeongJae Park * watermark check in micro-seconds. 1096ee801b7dSSeongJae Park */ 1097ee801b7dSSeongJae Park static unsigned long damos_wmark_wait_us(struct damos *scheme) 1098ee801b7dSSeongJae Park { 1099ee801b7dSSeongJae Park unsigned long metric; 1100ee801b7dSSeongJae Park 1101ee801b7dSSeongJae Park if (scheme->wmarks.metric == DAMOS_WMARK_NONE) 1102ee801b7dSSeongJae Park return 0; 1103ee801b7dSSeongJae Park 1104ee801b7dSSeongJae Park metric = damos_wmark_metric_value(scheme->wmarks.metric); 1105ee801b7dSSeongJae Park /* higher than high watermark or lower than low watermark */ 1106ee801b7dSSeongJae Park if (metric > scheme->wmarks.high || scheme->wmarks.low > metric) { 1107ee801b7dSSeongJae Park if (scheme->wmarks.activated) 110801078655SColin Ian King pr_debug("deactivate a scheme (%d) for %s wmark\n", 1109ee801b7dSSeongJae Park scheme->action, 1110ee801b7dSSeongJae Park metric > scheme->wmarks.high ? 1111ee801b7dSSeongJae Park "high" : "low"); 1112ee801b7dSSeongJae Park scheme->wmarks.activated = false; 1113ee801b7dSSeongJae Park return scheme->wmarks.interval; 1114ee801b7dSSeongJae Park } 1115ee801b7dSSeongJae Park 1116ee801b7dSSeongJae Park /* inactive and higher than middle watermark */ 1117ee801b7dSSeongJae Park if ((scheme->wmarks.high >= metric && metric >= scheme->wmarks.mid) && 1118ee801b7dSSeongJae Park !scheme->wmarks.activated) 1119ee801b7dSSeongJae Park return scheme->wmarks.interval; 1120ee801b7dSSeongJae Park 1121ee801b7dSSeongJae Park if (!scheme->wmarks.activated) 1122ee801b7dSSeongJae Park pr_debug("activate a scheme (%d)\n", scheme->action); 1123ee801b7dSSeongJae Park scheme->wmarks.activated = true; 1124ee801b7dSSeongJae Park return 0; 1125ee801b7dSSeongJae Park } 1126ee801b7dSSeongJae Park 1127ee801b7dSSeongJae Park static void kdamond_usleep(unsigned long usecs) 1128ee801b7dSSeongJae Park { 11294de46a30SSeongJae Park /* See Documentation/timers/timers-howto.rst for the thresholds */ 11304de46a30SSeongJae Park if (usecs > 20 * USEC_PER_MSEC) 113170e92748SSeongJae Park schedule_timeout_idle(usecs_to_jiffies(usecs)); 1132ee801b7dSSeongJae Park else 113370e92748SSeongJae Park usleep_idle_range(usecs, usecs + 1); 1134ee801b7dSSeongJae Park } 1135ee801b7dSSeongJae Park 1136ee801b7dSSeongJae Park /* Returns negative error code if it's not activated but should return */ 1137ee801b7dSSeongJae Park static int kdamond_wait_activation(struct damon_ctx *ctx) 1138ee801b7dSSeongJae Park { 1139ee801b7dSSeongJae Park struct damos *s; 1140ee801b7dSSeongJae Park unsigned long wait_time; 1141ee801b7dSSeongJae Park unsigned long min_wait_time = 0; 114278049e94SJonghyeon Kim bool init_wait_time = false; 1143ee801b7dSSeongJae Park 1144ee801b7dSSeongJae Park while (!kdamond_need_stop(ctx)) { 1145ee801b7dSSeongJae Park damon_for_each_scheme(s, ctx) { 1146ee801b7dSSeongJae Park wait_time = damos_wmark_wait_us(s); 114778049e94SJonghyeon Kim if (!init_wait_time || wait_time < min_wait_time) { 114878049e94SJonghyeon Kim init_wait_time = true; 1149ee801b7dSSeongJae Park min_wait_time = wait_time; 1150ee801b7dSSeongJae Park } 115178049e94SJonghyeon Kim } 1152ee801b7dSSeongJae Park if (!min_wait_time) 1153ee801b7dSSeongJae Park return 0; 1154ee801b7dSSeongJae Park 1155ee801b7dSSeongJae Park kdamond_usleep(min_wait_time); 11566e74d2bfSSeongJae Park 11576e74d2bfSSeongJae Park if (ctx->callback.after_wmarks_check && 11586e74d2bfSSeongJae Park ctx->callback.after_wmarks_check(ctx)) 11596e74d2bfSSeongJae Park break; 1160ee801b7dSSeongJae Park } 1161ee801b7dSSeongJae Park return -EBUSY; 1162ee801b7dSSeongJae Park } 1163ee801b7dSSeongJae Park 11642224d848SSeongJae Park /* 11652224d848SSeongJae Park * The monitoring daemon that runs as a kernel thread 11662224d848SSeongJae Park */ 11672224d848SSeongJae Park static int kdamond_fn(void *data) 11682224d848SSeongJae Park { 1169cef4493fSYu Zhe struct damon_ctx *ctx = data; 1170f23b8eeeSSeongJae Park struct damon_target *t; 1171f23b8eeeSSeongJae Park struct damon_region *r, *next; 1172b9a6ac4eSSeongJae Park unsigned int max_nr_accesses = 0; 1173b9a6ac4eSSeongJae Park unsigned long sz_limit = 0; 11740f91d133SChangbin Du bool done = false; 11752224d848SSeongJae Park 117642e4cef5SChangbin Du pr_debug("kdamond (%d) starts\n", current->pid); 11772224d848SSeongJae Park 1178f7d911c3SSeongJae Park if (ctx->ops.init) 1179f7d911c3SSeongJae Park ctx->ops.init(ctx); 11802224d848SSeongJae Park if (ctx->callback.before_start && ctx->callback.before_start(ctx)) 11810f91d133SChangbin Du done = true; 11822224d848SSeongJae Park 1183b9a6ac4eSSeongJae Park sz_limit = damon_region_sz_limit(ctx); 1184b9a6ac4eSSeongJae Park 11850f91d133SChangbin Du while (!kdamond_need_stop(ctx) && !done) { 11866e74d2bfSSeongJae Park if (kdamond_wait_activation(ctx)) { 11876e74d2bfSSeongJae Park done = true; 1188ee801b7dSSeongJae Park continue; 11896e74d2bfSSeongJae Park } 1190ee801b7dSSeongJae Park 1191f7d911c3SSeongJae Park if (ctx->ops.prepare_access_checks) 1192f7d911c3SSeongJae Park ctx->ops.prepare_access_checks(ctx); 11932224d848SSeongJae Park if (ctx->callback.after_sampling && 1194abacd635SSeongJae Park ctx->callback.after_sampling(ctx)) { 11950f91d133SChangbin Du done = true; 1196abacd635SSeongJae Park continue; 1197abacd635SSeongJae Park } 11982224d848SSeongJae Park 119970e92748SSeongJae Park kdamond_usleep(ctx->sample_interval); 12002224d848SSeongJae Park 1201f7d911c3SSeongJae Park if (ctx->ops.check_accesses) 1202f7d911c3SSeongJae Park max_nr_accesses = ctx->ops.check_accesses(ctx); 12032224d848SSeongJae Park 12042224d848SSeongJae Park if (kdamond_aggregate_interval_passed(ctx)) { 1205b9a6ac4eSSeongJae Park kdamond_merge_regions(ctx, 1206b9a6ac4eSSeongJae Park max_nr_accesses / 10, 1207b9a6ac4eSSeongJae Park sz_limit); 12082224d848SSeongJae Park if (ctx->callback.after_aggregation && 1209abacd635SSeongJae Park ctx->callback.after_aggregation(ctx)) { 12100f91d133SChangbin Du done = true; 1211abacd635SSeongJae Park continue; 1212abacd635SSeongJae Park } 12131f366e42SSeongJae Park kdamond_apply_schemes(ctx); 1214f23b8eeeSSeongJae Park kdamond_reset_aggregated(ctx); 1215b9a6ac4eSSeongJae Park kdamond_split_regions(ctx); 1216f7d911c3SSeongJae Park if (ctx->ops.reset_aggregated) 1217f7d911c3SSeongJae Park ctx->ops.reset_aggregated(ctx); 12182224d848SSeongJae Park } 12192224d848SSeongJae Park 1220f7d911c3SSeongJae Park if (kdamond_need_update_operations(ctx)) { 1221f7d911c3SSeongJae Park if (ctx->ops.update) 1222f7d911c3SSeongJae Park ctx->ops.update(ctx); 1223b9a6ac4eSSeongJae Park sz_limit = damon_region_sz_limit(ctx); 12242224d848SSeongJae Park } 12252224d848SSeongJae Park } 1226f23b8eeeSSeongJae Park damon_for_each_target(t, ctx) { 1227f23b8eeeSSeongJae Park damon_for_each_region_safe(r, next, t) 1228b9a6ac4eSSeongJae Park damon_destroy_region(r, t); 1229f23b8eeeSSeongJae Park } 12302224d848SSeongJae Park 12310f91d133SChangbin Du if (ctx->callback.before_terminate) 12320f91d133SChangbin Du ctx->callback.before_terminate(ctx); 1233f7d911c3SSeongJae Park if (ctx->ops.cleanup) 1234f7d911c3SSeongJae Park ctx->ops.cleanup(ctx); 12352224d848SSeongJae Park 123642e4cef5SChangbin Du pr_debug("kdamond (%d) finishes\n", current->pid); 12372224d848SSeongJae Park mutex_lock(&ctx->kdamond_lock); 12382224d848SSeongJae Park ctx->kdamond = NULL; 12392224d848SSeongJae Park mutex_unlock(&ctx->kdamond_lock); 12402224d848SSeongJae Park 12412224d848SSeongJae Park mutex_lock(&damon_lock); 12422224d848SSeongJae Park nr_running_ctxs--; 12438b9b0d33SSeongJae Park if (!nr_running_ctxs && running_exclusive_ctxs) 12448b9b0d33SSeongJae Park running_exclusive_ctxs = false; 12452224d848SSeongJae Park mutex_unlock(&damon_lock); 12462224d848SSeongJae Park 12475f7fe2b9SChangbin Du return 0; 12482224d848SSeongJae Park } 124917ccae8bSSeongJae Park 12500d83b2d8SXin Hao /* 12510d83b2d8SXin Hao * struct damon_system_ram_region - System RAM resource address region of 12520d83b2d8SXin Hao * [@start, @end). 12530d83b2d8SXin Hao * @start: Start address of the region (inclusive). 12540d83b2d8SXin Hao * @end: End address of the region (exclusive). 12550d83b2d8SXin Hao */ 12560d83b2d8SXin Hao struct damon_system_ram_region { 12570d83b2d8SXin Hao unsigned long start; 12580d83b2d8SXin Hao unsigned long end; 12590d83b2d8SXin Hao }; 12600d83b2d8SXin Hao 12610d83b2d8SXin Hao static int walk_system_ram(struct resource *res, void *arg) 12620d83b2d8SXin Hao { 12630d83b2d8SXin Hao struct damon_system_ram_region *a = arg; 12640d83b2d8SXin Hao 12650d83b2d8SXin Hao if (a->end - a->start < resource_size(res)) { 12660d83b2d8SXin Hao a->start = res->start; 12670d83b2d8SXin Hao a->end = res->end; 12680d83b2d8SXin Hao } 12690d83b2d8SXin Hao return 0; 12700d83b2d8SXin Hao } 12710d83b2d8SXin Hao 12720d83b2d8SXin Hao /* 12730d83b2d8SXin Hao * Find biggest 'System RAM' resource and store its start and end address in 12740d83b2d8SXin Hao * @start and @end, respectively. If no System RAM is found, returns false. 12750d83b2d8SXin Hao */ 12760d83b2d8SXin Hao bool damon_find_biggest_system_ram(unsigned long *start, unsigned long *end) 12770d83b2d8SXin Hao 12780d83b2d8SXin Hao { 12790d83b2d8SXin Hao struct damon_system_ram_region arg = {}; 12800d83b2d8SXin Hao 12810d83b2d8SXin Hao walk_system_ram_res(0, ULONG_MAX, &arg, walk_system_ram); 12820d83b2d8SXin Hao if (arg.end <= arg.start) 12830d83b2d8SXin Hao return false; 12840d83b2d8SXin Hao 12850d83b2d8SXin Hao *start = arg.start; 12860d83b2d8SXin Hao *end = arg.end; 12870d83b2d8SXin Hao return true; 12880d83b2d8SXin Hao } 12890d83b2d8SXin Hao 1290*a1870944SDawei Li static int __init damon_init(void) 1291*a1870944SDawei Li { 1292*a1870944SDawei Li damon_region_cache = KMEM_CACHE(damon_region, 0); 1293*a1870944SDawei Li if (unlikely(!damon_region_cache)) { 1294*a1870944SDawei Li pr_err("creating damon_region_cache fails\n"); 1295*a1870944SDawei Li return -ENOMEM; 1296*a1870944SDawei Li } 1297*a1870944SDawei Li 1298*a1870944SDawei Li return 0; 1299*a1870944SDawei Li } 1300*a1870944SDawei Li 1301*a1870944SDawei Li subsys_initcall(damon_init); 1302*a1870944SDawei Li 130317ccae8bSSeongJae Park #include "core-test.h" 1304