When reclaiming for high-orders, kswapd is responsible for balancing a node but it should not reclaim excessively. It avoids excessive reclaim by considering if any zone in a node is balanced then the node is balanced. In the cases where there are imbalanced zone sizes (e.g. ZONE_DMA with both ZONE_DMA32 and ZONE_NORMAL), kswapd can go to sleep prematurely as just one small zone was balanced. This alters the sleep logic of kswapd slightly. It counts the number of pages that make up the balanced zones. If the total number of balanced pages is more than a quarter of the zone, kswapd will go back to sleep. This should keep a node balanced without reclaiming an excessive number of pages. Signed-off-by: Mel Gorman <mel@xxxxxxxxx> --- mm/vmscan.c | 30 ++++++++++++++++++++++-------- 1 files changed, 22 insertions(+), 8 deletions(-) diff --git a/mm/vmscan.c b/mm/vmscan.c index 8295c50..5680595 100644 --- a/mm/vmscan.c +++ b/mm/vmscan.c @@ -2117,13 +2117,27 @@ unsigned long try_to_free_mem_cgroup_pages(struct mem_cgroup *mem_cont, } #endif +/* + * pgdat_balanced is used when checking if a node is balanced for high-order + * allocations. Only zones that meet watermarks make up "balanced". + * The total of balanced pages must be at least 25% of the node for the + * node to be considered balanced. Forcing all zones to be balanced for high + * orders can cause excessive reclaim when there are imbalanced zones. + * Similarly, we do not want kswapd to go to sleep because ZONE_DMA happens + * to be balanced when ZONE_DMA32 is huge in comparison and unbalanced + */ +static bool pgdat_balanced(pg_data_t *pgdat, unsigned long balanced) +{ + return balanced > pgdat->node_present_pages / 4; +} + /* is kswapd sleeping prematurely? */ static bool sleeping_prematurely(pg_data_t *pgdat, int order, long remaining, int classzone_idx) { int i; + unsigned long balanced = 0; bool all_zones_ok = true; - bool any_zone_ok = false; /* If a direct reclaimer woke kswapd within HZ/10, it's premature */ if (remaining) @@ -2143,7 +2157,7 @@ static bool sleeping_prematurely(pg_data_t *pgdat, int order, long remaining, classzone_idx, 0)) all_zones_ok = false; else - any_zone_ok = true; + balanced += zone->present_pages; } /* @@ -2151,7 +2165,7 @@ static bool sleeping_prematurely(pg_data_t *pgdat, int order, long remaining, * kswapd to sleep. For order-0, all zones must be balanced */ if (order) - return !any_zone_ok; + return pgdat_balanced(pgdat, balanced); else return !all_zones_ok; } @@ -2181,7 +2195,7 @@ static unsigned long balance_pgdat(pg_data_t *pgdat, int order, int *classzone_idx) { int all_zones_ok; - int any_zone_ok; + unsigned long balanced; int priority; int i; int end_zone = 0; /* Inclusive. 0 = ZONE_DMA */ @@ -2215,7 +2229,7 @@ loop_again: disable_swap_token(); all_zones_ok = 1; - any_zone_ok = 0; + balanced = 0; /* * Scan in the highmem->dma direction for the highest @@ -2327,11 +2341,11 @@ loop_again: */ zone_clear_flag(zone, ZONE_CONGESTED); if (i <= *classzone_idx) - any_zone_ok = 1; + balanced += zone->present_pages; } } - if (all_zones_ok || (order && any_zone_ok)) + if (all_zones_ok || (order && pgdat_balanced(pgdat, balanced))) break; /* kswapd: all done */ /* * OK, kswapd is getting into trouble. Take a nap, then take @@ -2354,7 +2368,7 @@ loop_again: break; } out: - if (!(all_zones_ok || (order && any_zone_ok))) { + if (!(all_zones_ok || (order && pgdat_balanced(pgdat, balanced)))) { cond_resched(); try_to_freeze(); -- 1.7.1 -- To unsubscribe, send a message with 'unsubscribe linux-mm' in the body to majordomo@xxxxxxxxxx For more info on Linux MM, see: http://www.linux-mm.org/ . Fight unfair telecom policy in Canada: sign http://dissolvethecrtc.ca/ Don't email: <a href=mailto:"dont@xxxxxxxxx"> email@xxxxxxxxx </a>