blob: def5dd2fbe6124401e392a0438a062acf0140f81 [file] [log] [blame]
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001/*
2 * linux/mm/vmstat.c
3 *
4 * Manages VM statistics
5 * Copyright (C) 1991, 1992, 1993, 1994 Linus Torvalds
Christoph Lameter2244b952006-06-30 01:55:33 -07006 *
7 * zoned VM statistics
8 * Copyright (C) 2006 Silicon Graphics, Inc.,
9 * Christoph Lameter <christoph@lameter.com>
Christoph Lameterf6ac2352006-06-30 01:55:32 -070010 */
Alexey Dobriyan8f32f7e2008-10-06 04:13:52 +040011#include <linux/fs.h>
Christoph Lameterf6ac2352006-06-30 01:55:32 -070012#include <linux/mm.h>
Alexey Dobriyan4e950f62007-07-30 02:36:13 +040013#include <linux/err.h>
Christoph Lameter2244b952006-06-30 01:55:33 -070014#include <linux/module.h>
Tejun Heo5a0e3ad2010-03-24 17:04:11 +090015#include <linux/slab.h>
Christoph Lameterdf9ecab2006-08-31 21:27:35 -070016#include <linux/cpu.h>
Adrian Bunkc748e132008-07-23 21:27:03 -070017#include <linux/vmstat.h>
Alexey Dobriyane8edc6e2007-05-21 01:22:52 +040018#include <linux/sched.h>
Mel Gormanf1a5ab12010-05-24 14:32:26 -070019#include <linux/math64.h>
Michael Rubin79da8262010-10-26 14:21:36 -070020#include <linux/writeback.h>
Namhyung Kim36deb0b2010-10-26 14:22:04 -070021#include <linux/compaction.h>
Lisa Du6e543d52013-09-11 14:22:36 -070022#include <linux/mm_inline.h>
23
24#include "internal.h"
Christoph Lameterf6ac2352006-06-30 01:55:32 -070025
Christoph Lameterf8891e52006-06-30 01:55:45 -070026#ifdef CONFIG_VM_EVENT_COUNTERS
27DEFINE_PER_CPU(struct vm_event_state, vm_event_states) = {{0}};
28EXPORT_PER_CPU_SYMBOL(vm_event_states);
29
Minchan Kim31f961a2010-08-09 17:18:59 -070030static void sum_vm_events(unsigned long *ret)
Christoph Lameterf8891e52006-06-30 01:55:45 -070031{
Christoph Lameter9eccf2a2008-02-04 22:29:22 -080032 int cpu;
Christoph Lameterf8891e52006-06-30 01:55:45 -070033 int i;
34
35 memset(ret, 0, NR_VM_EVENT_ITEMS * sizeof(unsigned long));
36
Minchan Kim31f961a2010-08-09 17:18:59 -070037 for_each_online_cpu(cpu) {
Christoph Lameterf8891e52006-06-30 01:55:45 -070038 struct vm_event_state *this = &per_cpu(vm_event_states, cpu);
39
Christoph Lameterf8891e52006-06-30 01:55:45 -070040 for (i = 0; i < NR_VM_EVENT_ITEMS; i++)
41 ret[i] += this->event[i];
42 }
43}
44
45/*
46 * Accumulate the vm event counters across all CPUs.
47 * The result is unavoidably approximate - it can change
48 * during and after execution of this function.
49*/
50void all_vm_events(unsigned long *ret)
51{
KOSAKI Motohirob5be1132008-05-12 14:02:06 -070052 get_online_cpus();
Minchan Kim31f961a2010-08-09 17:18:59 -070053 sum_vm_events(ret);
KOSAKI Motohirob5be1132008-05-12 14:02:06 -070054 put_online_cpus();
Christoph Lameterf8891e52006-06-30 01:55:45 -070055}
Heiko Carstens32dd66f2006-07-10 04:44:31 -070056EXPORT_SYMBOL_GPL(all_vm_events);
Christoph Lameterf8891e52006-06-30 01:55:45 -070057
Christoph Lameterf8891e52006-06-30 01:55:45 -070058/*
59 * Fold the foreign cpu events into our own.
60 *
61 * This is adding to the events on one processor
62 * but keeps the global counts constant.
63 */
64void vm_events_fold_cpu(int cpu)
65{
66 struct vm_event_state *fold_state = &per_cpu(vm_event_states, cpu);
67 int i;
68
69 for (i = 0; i < NR_VM_EVENT_ITEMS; i++) {
70 count_vm_events(i, fold_state->event[i]);
71 fold_state->event[i] = 0;
72 }
73}
Christoph Lameterf8891e52006-06-30 01:55:45 -070074
75#endif /* CONFIG_VM_EVENT_COUNTERS */
76
Christoph Lameter2244b952006-06-30 01:55:33 -070077/*
78 * Manage combined zone based / global counters
79 *
80 * vm_stat contains the global counters
81 */
Dimitri Sivanicha1cb2c62011-10-31 17:09:46 -070082atomic_long_t vm_stat[NR_VM_ZONE_STAT_ITEMS] __cacheline_aligned_in_smp;
Christoph Lameter2244b952006-06-30 01:55:33 -070083EXPORT_SYMBOL(vm_stat);
84
85#ifdef CONFIG_SMP
86
Mel Gormanb44129b2011-01-13 15:45:43 -080087int calculate_pressure_threshold(struct zone *zone)
Mel Gorman88f5acf2011-01-13 15:45:41 -080088{
89 int threshold;
90 int watermark_distance;
91
92 /*
93 * As vmstats are not up to date, there is drift between the estimated
94 * and real values. For high thresholds and a high number of CPUs, it
95 * is possible for the min watermark to be breached while the estimated
96 * value looks fine. The pressure threshold is a reduced value such
97 * that even the maximum amount of drift will not accidentally breach
98 * the min watermark
99 */
100 watermark_distance = low_wmark_pages(zone) - min_wmark_pages(zone);
101 threshold = max(1, (int)(watermark_distance / num_online_cpus()));
102
103 /*
104 * Maximum threshold is 125
105 */
106 threshold = min(125, threshold);
107
108 return threshold;
109}
110
Mel Gormanb44129b2011-01-13 15:45:43 -0800111int calculate_normal_threshold(struct zone *zone)
Christoph Lameterdf9ecab2006-08-31 21:27:35 -0700112{
113 int threshold;
114 int mem; /* memory in 128 MB units */
115
116 /*
117 * The threshold scales with the number of processors and the amount
118 * of memory per zone. More memory means that we can defer updates for
119 * longer, more processors could lead to more contention.
120 * fls() is used to have a cheap way of logarithmic scaling.
121 *
122 * Some sample thresholds:
123 *
124 * Threshold Processors (fls) Zonesize fls(mem+1)
125 * ------------------------------------------------------------------
126 * 8 1 1 0.9-1 GB 4
127 * 16 2 2 0.9-1 GB 4
128 * 20 2 2 1-2 GB 5
129 * 24 2 2 2-4 GB 6
130 * 28 2 2 4-8 GB 7
131 * 32 2 2 8-16 GB 8
132 * 4 2 2 <128M 1
133 * 30 4 3 2-4 GB 5
134 * 48 4 3 8-16 GB 8
135 * 32 8 4 1-2 GB 4
136 * 32 8 4 0.9-1GB 4
137 * 10 16 5 <128M 1
138 * 40 16 5 900M 4
139 * 70 64 7 2-4 GB 5
140 * 84 64 7 4-8 GB 6
141 * 108 512 9 4-8 GB 6
142 * 125 1024 10 8-16 GB 8
143 * 125 1024 10 16-32 GB 9
144 */
145
Jiang Liub40da042013-02-22 16:33:52 -0800146 mem = zone->managed_pages >> (27 - PAGE_SHIFT);
Christoph Lameterdf9ecab2006-08-31 21:27:35 -0700147
148 threshold = 2 * fls(num_online_cpus()) * (1 + fls(mem));
149
150 /*
151 * Maximum threshold is 125
152 */
153 threshold = min(125, threshold);
154
155 return threshold;
156}
Christoph Lameter2244b952006-06-30 01:55:33 -0700157
158/*
Christoph Lameterdf9ecab2006-08-31 21:27:35 -0700159 * Refresh the thresholds for each zone.
Christoph Lameter2244b952006-06-30 01:55:33 -0700160 */
KOSAKI Motohiroa6cccdc2011-05-24 17:11:33 -0700161void refresh_zone_stat_thresholds(void)
Christoph Lameter2244b952006-06-30 01:55:33 -0700162{
Christoph Lameterdf9ecab2006-08-31 21:27:35 -0700163 struct zone *zone;
164 int cpu;
165 int threshold;
166
KOSAKI Motohiroee99c712009-03-31 15:19:31 -0700167 for_each_populated_zone(zone) {
Christoph Lameteraa454842010-09-09 16:38:17 -0700168 unsigned long max_drift, tolerate_drift;
169
Mel Gormanb44129b2011-01-13 15:45:43 -0800170 threshold = calculate_normal_threshold(zone);
Christoph Lameterdf9ecab2006-08-31 21:27:35 -0700171
172 for_each_online_cpu(cpu)
Christoph Lameter99dcc3e2010-01-05 15:34:51 +0900173 per_cpu_ptr(zone->pageset, cpu)->stat_threshold
174 = threshold;
Christoph Lameteraa454842010-09-09 16:38:17 -0700175
176 /*
177 * Only set percpu_drift_mark if there is a danger that
178 * NR_FREE_PAGES reports the low watermark is ok when in fact
179 * the min watermark could be breached by an allocation
180 */
181 tolerate_drift = low_wmark_pages(zone) - min_wmark_pages(zone);
182 max_drift = num_online_cpus() * threshold;
183 if (max_drift > tolerate_drift)
184 zone->percpu_drift_mark = high_wmark_pages(zone) +
185 max_drift;
Christoph Lameterdf9ecab2006-08-31 21:27:35 -0700186 }
Christoph Lameter2244b952006-06-30 01:55:33 -0700187}
188
Mel Gormanb44129b2011-01-13 15:45:43 -0800189void set_pgdat_percpu_threshold(pg_data_t *pgdat,
190 int (*calculate_pressure)(struct zone *))
Mel Gorman88f5acf2011-01-13 15:45:41 -0800191{
192 struct zone *zone;
193 int cpu;
194 int threshold;
195 int i;
196
Mel Gorman88f5acf2011-01-13 15:45:41 -0800197 for (i = 0; i < pgdat->nr_zones; i++) {
198 zone = &pgdat->node_zones[i];
199 if (!zone->percpu_drift_mark)
200 continue;
201
Mel Gormanb44129b2011-01-13 15:45:43 -0800202 threshold = (*calculate_pressure)(zone);
203 for_each_possible_cpu(cpu)
Mel Gorman88f5acf2011-01-13 15:45:41 -0800204 per_cpu_ptr(zone->pageset, cpu)->stat_threshold
205 = threshold;
206 }
Mel Gorman88f5acf2011-01-13 15:45:41 -0800207}
208
Christoph Lameter2244b952006-06-30 01:55:33 -0700209/*
210 * For use when we know that interrupts are disabled.
211 */
212void __mod_zone_page_state(struct zone *zone, enum zone_stat_item item,
213 int delta)
214{
Christoph Lameter12938a92010-12-06 11:16:20 -0600215 struct per_cpu_pageset __percpu *pcp = zone->pageset;
216 s8 __percpu *p = pcp->vm_stat_diff + item;
Christoph Lameter2244b952006-06-30 01:55:33 -0700217 long x;
Christoph Lameter12938a92010-12-06 11:16:20 -0600218 long t;
Christoph Lameter2244b952006-06-30 01:55:33 -0700219
Christoph Lameter12938a92010-12-06 11:16:20 -0600220 x = delta + __this_cpu_read(*p);
Christoph Lameter2244b952006-06-30 01:55:33 -0700221
Christoph Lameter12938a92010-12-06 11:16:20 -0600222 t = __this_cpu_read(pcp->stat_threshold);
223
224 if (unlikely(x > t || x < -t)) {
Christoph Lameter2244b952006-06-30 01:55:33 -0700225 zone_page_state_add(x, zone, item);
226 x = 0;
227 }
Christoph Lameter12938a92010-12-06 11:16:20 -0600228 __this_cpu_write(*p, x);
Christoph Lameter2244b952006-06-30 01:55:33 -0700229}
230EXPORT_SYMBOL(__mod_zone_page_state);
231
232/*
Christoph Lameter2244b952006-06-30 01:55:33 -0700233 * Optimized increment and decrement functions.
234 *
235 * These are only for a single page and therefore can take a struct page *
236 * argument instead of struct zone *. This allows the inclusion of the code
237 * generated for page_zone(page) into the optimized functions.
238 *
239 * No overflow check is necessary and therefore the differential can be
240 * incremented or decremented in place which may allow the compilers to
241 * generate better code.
Christoph Lameter2244b952006-06-30 01:55:33 -0700242 * The increment or decrement is known and therefore one boundary check can
243 * be omitted.
244 *
Christoph Lameterdf9ecab2006-08-31 21:27:35 -0700245 * NOTE: These functions are very performance sensitive. Change only
246 * with care.
247 *
Christoph Lameter2244b952006-06-30 01:55:33 -0700248 * Some processors have inc/dec instructions that are atomic vs an interrupt.
249 * However, the code must first determine the differential location in a zone
250 * based on the processor number and then inc/dec the counter. There is no
251 * guarantee without disabling preemption that the processor will not change
252 * in between and therefore the atomicity vs. interrupt cannot be exploited
253 * in a useful way here.
254 */
Christoph Lameterc8785382007-02-10 01:43:01 -0800255void __inc_zone_state(struct zone *zone, enum zone_stat_item item)
Christoph Lameter2244b952006-06-30 01:55:33 -0700256{
Christoph Lameter12938a92010-12-06 11:16:20 -0600257 struct per_cpu_pageset __percpu *pcp = zone->pageset;
258 s8 __percpu *p = pcp->vm_stat_diff + item;
259 s8 v, t;
Christoph Lameter2244b952006-06-30 01:55:33 -0700260
Christoph Lameter908ee0f2010-12-06 11:40:02 -0600261 v = __this_cpu_inc_return(*p);
Christoph Lameter12938a92010-12-06 11:16:20 -0600262 t = __this_cpu_read(pcp->stat_threshold);
263 if (unlikely(v > t)) {
264 s8 overstep = t >> 1;
Christoph Lameter2244b952006-06-30 01:55:33 -0700265
Christoph Lameter12938a92010-12-06 11:16:20 -0600266 zone_page_state_add(v + overstep, zone, item);
267 __this_cpu_write(*p, -overstep);
Christoph Lameter2244b952006-06-30 01:55:33 -0700268 }
269}
Christoph Lameterca889e62006-06-30 01:55:44 -0700270
271void __inc_zone_page_state(struct page *page, enum zone_stat_item item)
272{
273 __inc_zone_state(page_zone(page), item);
274}
Christoph Lameter2244b952006-06-30 01:55:33 -0700275EXPORT_SYMBOL(__inc_zone_page_state);
276
Christoph Lameterc8785382007-02-10 01:43:01 -0800277void __dec_zone_state(struct zone *zone, enum zone_stat_item item)
Christoph Lameter2244b952006-06-30 01:55:33 -0700278{
Christoph Lameter12938a92010-12-06 11:16:20 -0600279 struct per_cpu_pageset __percpu *pcp = zone->pageset;
280 s8 __percpu *p = pcp->vm_stat_diff + item;
281 s8 v, t;
Christoph Lameter2244b952006-06-30 01:55:33 -0700282
Christoph Lameter908ee0f2010-12-06 11:40:02 -0600283 v = __this_cpu_dec_return(*p);
Christoph Lameter12938a92010-12-06 11:16:20 -0600284 t = __this_cpu_read(pcp->stat_threshold);
285 if (unlikely(v < - t)) {
286 s8 overstep = t >> 1;
Christoph Lameter2244b952006-06-30 01:55:33 -0700287
Christoph Lameter12938a92010-12-06 11:16:20 -0600288 zone_page_state_add(v - overstep, zone, item);
289 __this_cpu_write(*p, overstep);
Christoph Lameter2244b952006-06-30 01:55:33 -0700290 }
291}
Christoph Lameterc8785382007-02-10 01:43:01 -0800292
293void __dec_zone_page_state(struct page *page, enum zone_stat_item item)
294{
295 __dec_zone_state(page_zone(page), item);
296}
Christoph Lameter2244b952006-06-30 01:55:33 -0700297EXPORT_SYMBOL(__dec_zone_page_state);
298
Heiko Carstens41561532012-01-12 17:17:30 -0800299#ifdef CONFIG_HAVE_CMPXCHG_LOCAL
Christoph Lameter7c839122010-12-14 10:28:46 -0600300/*
301 * If we have cmpxchg_local support then we do not need to incur the overhead
302 * that comes with local_irq_save/restore if we use this_cpu_cmpxchg.
303 *
304 * mod_state() modifies the zone counter state through atomic per cpu
305 * operations.
306 *
307 * Overstep mode specifies how overstep should handled:
308 * 0 No overstepping
309 * 1 Overstepping half of threshold
310 * -1 Overstepping minus half of threshold
311*/
312static inline void mod_state(struct zone *zone,
313 enum zone_stat_item item, int delta, int overstep_mode)
314{
315 struct per_cpu_pageset __percpu *pcp = zone->pageset;
316 s8 __percpu *p = pcp->vm_stat_diff + item;
317 long o, n, t, z;
318
319 do {
320 z = 0; /* overflow to zone counters */
321
322 /*
323 * The fetching of the stat_threshold is racy. We may apply
324 * a counter threshold to the wrong the cpu if we get
Christoph Lameterd3bc2362011-04-14 15:21:58 -0700325 * rescheduled while executing here. However, the next
326 * counter update will apply the threshold again and
327 * therefore bring the counter under the threshold again.
328 *
329 * Most of the time the thresholds are the same anyways
330 * for all cpus in a zone.
Christoph Lameter7c839122010-12-14 10:28:46 -0600331 */
332 t = this_cpu_read(pcp->stat_threshold);
333
334 o = this_cpu_read(*p);
335 n = delta + o;
336
337 if (n > t || n < -t) {
338 int os = overstep_mode * (t >> 1) ;
339
340 /* Overflow must be added to zone counters */
341 z = n + os;
342 n = -os;
343 }
344 } while (this_cpu_cmpxchg(*p, o, n) != o);
345
346 if (z)
347 zone_page_state_add(z, zone, item);
348}
349
350void mod_zone_page_state(struct zone *zone, enum zone_stat_item item,
351 int delta)
352{
353 mod_state(zone, item, delta, 0);
354}
355EXPORT_SYMBOL(mod_zone_page_state);
356
357void inc_zone_state(struct zone *zone, enum zone_stat_item item)
358{
359 mod_state(zone, item, 1, 1);
360}
361
362void inc_zone_page_state(struct page *page, enum zone_stat_item item)
363{
364 mod_state(page_zone(page), item, 1, 1);
365}
366EXPORT_SYMBOL(inc_zone_page_state);
367
368void dec_zone_page_state(struct page *page, enum zone_stat_item item)
369{
370 mod_state(page_zone(page), item, -1, -1);
371}
372EXPORT_SYMBOL(dec_zone_page_state);
373#else
374/*
375 * Use interrupt disable to serialize counter updates
376 */
377void mod_zone_page_state(struct zone *zone, enum zone_stat_item item,
378 int delta)
379{
380 unsigned long flags;
381
382 local_irq_save(flags);
383 __mod_zone_page_state(zone, item, delta);
384 local_irq_restore(flags);
385}
386EXPORT_SYMBOL(mod_zone_page_state);
387
Christoph Lameterca889e62006-06-30 01:55:44 -0700388void inc_zone_state(struct zone *zone, enum zone_stat_item item)
389{
390 unsigned long flags;
391
392 local_irq_save(flags);
393 __inc_zone_state(zone, item);
394 local_irq_restore(flags);
395}
396
Christoph Lameter2244b952006-06-30 01:55:33 -0700397void inc_zone_page_state(struct page *page, enum zone_stat_item item)
398{
399 unsigned long flags;
400 struct zone *zone;
Christoph Lameter2244b952006-06-30 01:55:33 -0700401
402 zone = page_zone(page);
403 local_irq_save(flags);
Christoph Lameterca889e62006-06-30 01:55:44 -0700404 __inc_zone_state(zone, item);
Christoph Lameter2244b952006-06-30 01:55:33 -0700405 local_irq_restore(flags);
406}
407EXPORT_SYMBOL(inc_zone_page_state);
408
409void dec_zone_page_state(struct page *page, enum zone_stat_item item)
410{
411 unsigned long flags;
Christoph Lameter2244b952006-06-30 01:55:33 -0700412
Christoph Lameter2244b952006-06-30 01:55:33 -0700413 local_irq_save(flags);
Christoph Lametera302eb42006-08-31 21:27:34 -0700414 __dec_zone_page_state(page, item);
Christoph Lameter2244b952006-06-30 01:55:33 -0700415 local_irq_restore(flags);
416}
417EXPORT_SYMBOL(dec_zone_page_state);
Christoph Lameter7c839122010-12-14 10:28:46 -0600418#endif
Christoph Lameter2244b952006-06-30 01:55:33 -0700419
Christoph Lameter4edb0742013-09-11 14:21:31 -0700420static inline void fold_diff(int *diff)
421{
422 int i;
423
424 for (i = 0; i < NR_VM_ZONE_STAT_ITEMS; i++)
425 if (diff[i])
426 atomic_long_add(diff[i], &vm_stat[i]);
427}
428
Christoph Lameter2244b952006-06-30 01:55:33 -0700429/*
Christoph Lameter2bb921e2013-09-11 14:21:30 -0700430 * Update the zone counters for the current cpu.
Christoph Lametera7f75e22008-02-04 22:29:16 -0800431 *
Christoph Lameter4037d452007-05-09 02:35:14 -0700432 * Note that refresh_cpu_vm_stats strives to only access
433 * node local memory. The per cpu pagesets on remote zones are placed
434 * in the memory local to the processor using that pageset. So the
435 * loop over all zones will access a series of cachelines local to
436 * the processor.
437 *
438 * The call to zone_page_state_add updates the cachelines with the
439 * statistics in the remote zone struct as well as the global cachelines
440 * with the global counters. These could cause remote node cache line
441 * bouncing and will have to be only done when necessary.
Christoph Lameter2244b952006-06-30 01:55:33 -0700442 */
Christoph Lameterfbc2edb2013-09-11 14:21:32 -0700443static void refresh_cpu_vm_stats(void)
Christoph Lameter2244b952006-06-30 01:55:33 -0700444{
445 struct zone *zone;
446 int i;
Christoph Lametera7f75e22008-02-04 22:29:16 -0800447 int global_diff[NR_VM_ZONE_STAT_ITEMS] = { 0, };
Christoph Lameter2244b952006-06-30 01:55:33 -0700448
KOSAKI Motohiroee99c712009-03-31 15:19:31 -0700449 for_each_populated_zone(zone) {
Christoph Lameterfbc2edb2013-09-11 14:21:32 -0700450 struct per_cpu_pageset __percpu *p = zone->pageset;
Christoph Lameter2244b952006-06-30 01:55:33 -0700451
Christoph Lameterfbc2edb2013-09-11 14:21:32 -0700452 for (i = 0; i < NR_VM_ZONE_STAT_ITEMS; i++) {
453 int v;
Christoph Lameter2244b952006-06-30 01:55:33 -0700454
Christoph Lameterfbc2edb2013-09-11 14:21:32 -0700455 v = this_cpu_xchg(p->vm_stat_diff[i], 0);
456 if (v) {
Christoph Lametera7f75e22008-02-04 22:29:16 -0800457
Christoph Lametera7f75e22008-02-04 22:29:16 -0800458 atomic_long_add(v, &zone->vm_stat[i]);
459 global_diff[i] += v;
Christoph Lameter4037d452007-05-09 02:35:14 -0700460#ifdef CONFIG_NUMA
461 /* 3 seconds idle till flush */
Christoph Lameterfbc2edb2013-09-11 14:21:32 -0700462 __this_cpu_write(p->expire, 3);
Christoph Lameter4037d452007-05-09 02:35:14 -0700463#endif
Christoph Lameter2244b952006-06-30 01:55:33 -0700464 }
Christoph Lameterfbc2edb2013-09-11 14:21:32 -0700465 }
Dimitri Sivanich468fd622008-04-28 02:13:37 -0700466 cond_resched();
Christoph Lameter4037d452007-05-09 02:35:14 -0700467#ifdef CONFIG_NUMA
468 /*
469 * Deal with draining the remote pageset of this
470 * processor
471 *
472 * Check if there are pages remaining in this pageset
473 * if not then there is nothing to expire.
474 */
Christoph Lameterfbc2edb2013-09-11 14:21:32 -0700475 if (!__this_cpu_read(p->expire) ||
476 !__this_cpu_read(p->pcp.count))
Christoph Lameter4037d452007-05-09 02:35:14 -0700477 continue;
478
479 /*
480 * We never drain zones local to this processor.
481 */
482 if (zone_to_nid(zone) == numa_node_id()) {
Christoph Lameterfbc2edb2013-09-11 14:21:32 -0700483 __this_cpu_write(p->expire, 0);
Christoph Lameter4037d452007-05-09 02:35:14 -0700484 continue;
485 }
486
Christoph Lameterfbc2edb2013-09-11 14:21:32 -0700487
488 if (__this_cpu_dec_return(p->expire))
Christoph Lameter4037d452007-05-09 02:35:14 -0700489 continue;
490
Christoph Lameterfbc2edb2013-09-11 14:21:32 -0700491 if (__this_cpu_read(p->pcp.count))
492 drain_zone_pages(zone, __this_cpu_ptr(&p->pcp));
Christoph Lameter4037d452007-05-09 02:35:14 -0700493#endif
Christoph Lameter2244b952006-06-30 01:55:33 -0700494 }
Christoph Lameter4edb0742013-09-11 14:21:31 -0700495 fold_diff(global_diff);
Christoph Lameter2244b952006-06-30 01:55:33 -0700496}
497
Cody P Schafer40f4b1e2013-04-29 15:08:38 -0700498/*
Christoph Lameter2bb921e2013-09-11 14:21:30 -0700499 * Fold the data for an offline cpu into the global array.
500 * There cannot be any access by the offline cpu and therefore
501 * synchronization is simplified.
502 */
503void cpu_vm_stats_fold(int cpu)
504{
505 struct zone *zone;
506 int i;
507 int global_diff[NR_VM_ZONE_STAT_ITEMS] = { 0, };
508
509 for_each_populated_zone(zone) {
510 struct per_cpu_pageset *p;
511
512 p = per_cpu_ptr(zone->pageset, cpu);
513
514 for (i = 0; i < NR_VM_ZONE_STAT_ITEMS; i++)
515 if (p->vm_stat_diff[i]) {
516 int v;
517
518 v = p->vm_stat_diff[i];
519 p->vm_stat_diff[i] = 0;
520 atomic_long_add(v, &zone->vm_stat[i]);
521 global_diff[i] += v;
522 }
523 }
524
Christoph Lameter4edb0742013-09-11 14:21:31 -0700525 fold_diff(global_diff);
Christoph Lameter2bb921e2013-09-11 14:21:30 -0700526}
527
528/*
Cody P Schafer40f4b1e2013-04-29 15:08:38 -0700529 * this is only called if !populated_zone(zone), which implies no other users of
530 * pset->vm_stat_diff[] exsist.
531 */
Minchan Kim5a883812012-10-08 16:33:39 -0700532void drain_zonestat(struct zone *zone, struct per_cpu_pageset *pset)
533{
534 int i;
535
536 for (i = 0; i < NR_VM_ZONE_STAT_ITEMS; i++)
537 if (pset->vm_stat_diff[i]) {
538 int v = pset->vm_stat_diff[i];
539 pset->vm_stat_diff[i] = 0;
540 atomic_long_add(v, &zone->vm_stat[i]);
541 atomic_long_add(v, &vm_stat[i]);
542 }
543}
Christoph Lameter2244b952006-06-30 01:55:33 -0700544#endif
545
Christoph Lameterca889e62006-06-30 01:55:44 -0700546#ifdef CONFIG_NUMA
547/*
548 * zonelist = the list of zones passed to the allocator
549 * z = the zone from which the allocation occurred.
550 *
551 * Must be called with interrupts disabled.
Andi Kleen78afd562011-03-22 16:33:12 -0700552 *
553 * When __GFP_OTHER_NODE is set assume the node of the preferred
554 * zone is the local node. This is useful for daemons who allocate
555 * memory on behalf of other processes.
Christoph Lameterca889e62006-06-30 01:55:44 -0700556 */
Andi Kleen78afd562011-03-22 16:33:12 -0700557void zone_statistics(struct zone *preferred_zone, struct zone *z, gfp_t flags)
Christoph Lameterca889e62006-06-30 01:55:44 -0700558{
Mel Gorman18ea7e72008-04-28 02:12:14 -0700559 if (z->zone_pgdat == preferred_zone->zone_pgdat) {
Christoph Lameterca889e62006-06-30 01:55:44 -0700560 __inc_zone_state(z, NUMA_HIT);
561 } else {
562 __inc_zone_state(z, NUMA_MISS);
Mel Gorman18ea7e72008-04-28 02:12:14 -0700563 __inc_zone_state(preferred_zone, NUMA_FOREIGN);
Christoph Lameterca889e62006-06-30 01:55:44 -0700564 }
Andi Kleen78afd562011-03-22 16:33:12 -0700565 if (z->node == ((flags & __GFP_OTHER_NODE) ?
566 preferred_zone->node : numa_node_id()))
Christoph Lameterca889e62006-06-30 01:55:44 -0700567 __inc_zone_state(z, NUMA_LOCAL);
568 else
569 __inc_zone_state(z, NUMA_OTHER);
570}
571#endif
572
Mel Gormand7a57522010-05-24 14:32:25 -0700573#ifdef CONFIG_COMPACTION
Namhyung Kim36deb0b2010-10-26 14:22:04 -0700574
Mel Gormand7a57522010-05-24 14:32:25 -0700575struct contig_page_info {
576 unsigned long free_pages;
577 unsigned long free_blocks_total;
578 unsigned long free_blocks_suitable;
579};
580
581/*
582 * Calculate the number of free pages in a zone, how many contiguous
583 * pages are free and how many are large enough to satisfy an allocation of
584 * the target size. Note that this function makes no attempt to estimate
585 * how many suitable free blocks there *might* be if MOVABLE pages were
586 * migrated. Calculating that is possible, but expensive and can be
587 * figured out from userspace
588 */
589static void fill_contig_page_info(struct zone *zone,
590 unsigned int suitable_order,
591 struct contig_page_info *info)
592{
593 unsigned int order;
594
595 info->free_pages = 0;
596 info->free_blocks_total = 0;
597 info->free_blocks_suitable = 0;
598
599 for (order = 0; order < MAX_ORDER; order++) {
600 unsigned long blocks;
601
602 /* Count number of free blocks */
603 blocks = zone->free_area[order].nr_free;
604 info->free_blocks_total += blocks;
605
606 /* Count free base pages */
607 info->free_pages += blocks << order;
608
609 /* Count the suitable free blocks */
610 if (order >= suitable_order)
611 info->free_blocks_suitable += blocks <<
612 (order - suitable_order);
613 }
614}
Mel Gormanf1a5ab12010-05-24 14:32:26 -0700615
616/*
617 * A fragmentation index only makes sense if an allocation of a requested
618 * size would fail. If that is true, the fragmentation index indicates
619 * whether external fragmentation or a lack of memory was the problem.
620 * The value can be used to determine if page reclaim or compaction
621 * should be used
622 */
Mel Gorman56de7262010-05-24 14:32:30 -0700623static int __fragmentation_index(unsigned int order, struct contig_page_info *info)
Mel Gormanf1a5ab12010-05-24 14:32:26 -0700624{
625 unsigned long requested = 1UL << order;
626
627 if (!info->free_blocks_total)
628 return 0;
629
630 /* Fragmentation index only makes sense when a request would fail */
631 if (info->free_blocks_suitable)
632 return -1000;
633
634 /*
635 * Index is between 0 and 1 so return within 3 decimal places
636 *
637 * 0 => allocation would fail due to lack of memory
638 * 1 => allocation would fail due to fragmentation
639 */
640 return 1000 - div_u64( (1000+(div_u64(info->free_pages * 1000ULL, requested))), info->free_blocks_total);
641}
Mel Gorman56de7262010-05-24 14:32:30 -0700642
643/* Same as __fragmentation index but allocs contig_page_info on stack */
644int fragmentation_index(struct zone *zone, unsigned int order)
645{
646 struct contig_page_info info;
647
648 fill_contig_page_info(zone, order, &info);
649 return __fragmentation_index(order, &info);
650}
Mel Gormand7a57522010-05-24 14:32:25 -0700651#endif
652
653#if defined(CONFIG_PROC_FS) || defined(CONFIG_COMPACTION)
Alexey Dobriyan8f32f7e2008-10-06 04:13:52 +0400654#include <linux/proc_fs.h>
Christoph Lameterf6ac2352006-06-30 01:55:32 -0700655#include <linux/seq_file.h>
656
Mel Gorman467c9962007-10-16 01:26:02 -0700657static char * const migratetype_names[MIGRATE_TYPES] = {
658 "Unmovable",
659 "Reclaimable",
660 "Movable",
661 "Reserve",
Michal Nazarewicz47118af2011-12-29 13:09:50 +0100662#ifdef CONFIG_CMA
663 "CMA",
664#endif
Minchan Kim194159f2013-02-22 16:33:58 -0800665#ifdef CONFIG_MEMORY_ISOLATION
KOSAKI Motohiro91446b02008-04-15 14:34:42 -0700666 "Isolate",
Minchan Kim194159f2013-02-22 16:33:58 -0800667#endif
Mel Gorman467c9962007-10-16 01:26:02 -0700668};
669
Christoph Lameterf6ac2352006-06-30 01:55:32 -0700670static void *frag_start(struct seq_file *m, loff_t *pos)
671{
672 pg_data_t *pgdat;
673 loff_t node = *pos;
674 for (pgdat = first_online_pgdat();
675 pgdat && node;
676 pgdat = next_online_pgdat(pgdat))
677 --node;
678
679 return pgdat;
680}
681
682static void *frag_next(struct seq_file *m, void *arg, loff_t *pos)
683{
684 pg_data_t *pgdat = (pg_data_t *)arg;
685
686 (*pos)++;
687 return next_online_pgdat(pgdat);
688}
689
690static void frag_stop(struct seq_file *m, void *arg)
691{
692}
693
Mel Gorman467c9962007-10-16 01:26:02 -0700694/* Walk all the zones in a node and print using a callback */
695static void walk_zones_in_node(struct seq_file *m, pg_data_t *pgdat,
696 void (*print)(struct seq_file *m, pg_data_t *, struct zone *))
Christoph Lameterf6ac2352006-06-30 01:55:32 -0700697{
Christoph Lameterf6ac2352006-06-30 01:55:32 -0700698 struct zone *zone;
699 struct zone *node_zones = pgdat->node_zones;
700 unsigned long flags;
Christoph Lameterf6ac2352006-06-30 01:55:32 -0700701
702 for (zone = node_zones; zone - node_zones < MAX_NR_ZONES; ++zone) {
703 if (!populated_zone(zone))
704 continue;
705
706 spin_lock_irqsave(&zone->lock, flags);
Mel Gorman467c9962007-10-16 01:26:02 -0700707 print(m, pgdat, zone);
Christoph Lameterf6ac2352006-06-30 01:55:32 -0700708 spin_unlock_irqrestore(&zone->lock, flags);
Mel Gorman467c9962007-10-16 01:26:02 -0700709 }
710}
Mel Gormand7a57522010-05-24 14:32:25 -0700711#endif
Mel Gorman467c9962007-10-16 01:26:02 -0700712
David Rientjes0d6617c2011-09-14 16:21:05 -0700713#if defined(CONFIG_PROC_FS) || defined(CONFIG_SYSFS) || defined(CONFIG_NUMA)
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700714#ifdef CONFIG_ZONE_DMA
715#define TEXT_FOR_DMA(xx) xx "_dma",
716#else
717#define TEXT_FOR_DMA(xx)
718#endif
719
720#ifdef CONFIG_ZONE_DMA32
721#define TEXT_FOR_DMA32(xx) xx "_dma32",
722#else
723#define TEXT_FOR_DMA32(xx)
724#endif
725
726#ifdef CONFIG_HIGHMEM
727#define TEXT_FOR_HIGHMEM(xx) xx "_high",
728#else
729#define TEXT_FOR_HIGHMEM(xx)
730#endif
731
732#define TEXTS_FOR_ZONES(xx) TEXT_FOR_DMA(xx) TEXT_FOR_DMA32(xx) xx "_normal", \
733 TEXT_FOR_HIGHMEM(xx) xx "_movable",
734
735const char * const vmstat_text[] = {
736 /* Zoned VM counters */
737 "nr_free_pages",
Johannes Weiner81c0a2b2013-09-11 14:20:47 -0700738 "nr_alloc_batch",
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700739 "nr_inactive_anon",
740 "nr_active_anon",
741 "nr_inactive_file",
742 "nr_active_file",
743 "nr_unevictable",
744 "nr_mlock",
745 "nr_anon_pages",
746 "nr_mapped",
747 "nr_file_pages",
748 "nr_dirty",
749 "nr_writeback",
750 "nr_slab_reclaimable",
751 "nr_slab_unreclaimable",
752 "nr_page_table_pages",
753 "nr_kernel_stack",
754 "nr_unstable",
755 "nr_bounce",
756 "nr_vmscan_write",
Mel Gorman49ea7eb2011-10-31 17:07:59 -0700757 "nr_vmscan_immediate_reclaim",
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700758 "nr_writeback_temp",
759 "nr_isolated_anon",
760 "nr_isolated_file",
761 "nr_shmem",
762 "nr_dirtied",
763 "nr_written",
764
765#ifdef CONFIG_NUMA
766 "numa_hit",
767 "numa_miss",
768 "numa_foreign",
769 "numa_interleave",
770 "numa_local",
771 "numa_other",
772#endif
773 "nr_anon_transparent_hugepages",
Bartlomiej Zolnierkiewiczd1ce7492012-10-08 16:32:02 -0700774 "nr_free_cma",
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700775 "nr_dirty_threshold",
776 "nr_dirty_background_threshold",
777
778#ifdef CONFIG_VM_EVENT_COUNTERS
779 "pgpgin",
780 "pgpgout",
781 "pswpin",
782 "pswpout",
783
784 TEXTS_FOR_ZONES("pgalloc")
785
786 "pgfree",
787 "pgactivate",
788 "pgdeactivate",
789
790 "pgfault",
791 "pgmajfault",
792
793 TEXTS_FOR_ZONES("pgrefill")
Ying Han904249a2012-04-25 16:01:48 -0700794 TEXTS_FOR_ZONES("pgsteal_kswapd")
795 TEXTS_FOR_ZONES("pgsteal_direct")
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700796 TEXTS_FOR_ZONES("pgscan_kswapd")
797 TEXTS_FOR_ZONES("pgscan_direct")
Mel Gorman68243e72012-07-31 16:44:39 -0700798 "pgscan_direct_throttle",
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700799
800#ifdef CONFIG_NUMA
801 "zone_reclaim_failed",
802#endif
803 "pginodesteal",
804 "slabs_scanned",
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700805 "kswapd_inodesteal",
806 "kswapd_low_wmark_hit_quickly",
807 "kswapd_high_wmark_hit_quickly",
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700808 "pageoutrun",
809 "allocstall",
810
811 "pgrotated",
812
Mel Gorman03c5a6e2012-11-02 14:52:48 +0000813#ifdef CONFIG_NUMA_BALANCING
814 "numa_pte_updates",
Mel Gorman72403b42013-11-12 15:08:32 -0800815 "numa_huge_pte_updates",
Mel Gorman03c5a6e2012-11-02 14:52:48 +0000816 "numa_hint_faults",
817 "numa_hint_faults_local",
818 "numa_pages_migrated",
819#endif
Mel Gorman5647bc22012-10-19 10:46:20 +0100820#ifdef CONFIG_MIGRATION
821 "pgmigrate_success",
822 "pgmigrate_fail",
823#endif
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700824#ifdef CONFIG_COMPACTION
Mel Gorman397487d2012-10-19 12:00:10 +0100825 "compact_migrate_scanned",
826 "compact_free_scanned",
827 "compact_isolated",
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700828 "compact_stall",
829 "compact_fail",
830 "compact_success",
831#endif
832
833#ifdef CONFIG_HUGETLB_PAGE
834 "htlb_buddy_alloc_success",
835 "htlb_buddy_alloc_fail",
836#endif
837 "unevictable_pgs_culled",
838 "unevictable_pgs_scanned",
839 "unevictable_pgs_rescued",
840 "unevictable_pgs_mlocked",
841 "unevictable_pgs_munlocked",
842 "unevictable_pgs_cleared",
843 "unevictable_pgs_stranded",
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700844
845#ifdef CONFIG_TRANSPARENT_HUGEPAGE
846 "thp_fault_alloc",
847 "thp_fault_fallback",
848 "thp_collapse_alloc",
849 "thp_collapse_alloc_failed",
850 "thp_split",
Kirill A. Shutemovd8a8e1f2012-12-12 13:51:09 -0800851 "thp_zero_page_alloc",
852 "thp_zero_page_alloc_failed",
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700853#endif
Mel Gormanec659932014-01-21 14:33:16 -0800854#ifdef CONFIG_DEBUG_TLBFLUSH
Dave Hansen6df46862013-09-11 14:20:24 -0700855#ifdef CONFIG_SMP
Dave Hansen9824cf92013-09-11 14:20:23 -0700856 "nr_tlb_remote_flush",
857 "nr_tlb_remote_flush_received",
Mel Gormanec659932014-01-21 14:33:16 -0800858#endif /* CONFIG_SMP */
Dave Hansen9824cf92013-09-11 14:20:23 -0700859 "nr_tlb_local_flush_all",
860 "nr_tlb_local_flush_one",
Mel Gormanec659932014-01-21 14:33:16 -0800861#endif /* CONFIG_DEBUG_TLBFLUSH */
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700862
863#endif /* CONFIG_VM_EVENTS_COUNTERS */
864};
David Rientjes0d6617c2011-09-14 16:21:05 -0700865#endif /* CONFIG_PROC_FS || CONFIG_SYSFS || CONFIG_NUMA */
KOSAKI Motohirofa25c502011-05-24 17:11:28 -0700866
867
Mel Gormand7a57522010-05-24 14:32:25 -0700868#ifdef CONFIG_PROC_FS
Mel Gorman467c9962007-10-16 01:26:02 -0700869static void frag_show_print(struct seq_file *m, pg_data_t *pgdat,
870 struct zone *zone)
871{
872 int order;
873
874 seq_printf(m, "Node %d, zone %8s ", pgdat->node_id, zone->name);
875 for (order = 0; order < MAX_ORDER; ++order)
876 seq_printf(m, "%6lu ", zone->free_area[order].nr_free);
877 seq_putc(m, '\n');
878}
879
880/*
881 * This walks the free areas for each zone.
882 */
883static int frag_show(struct seq_file *m, void *arg)
884{
885 pg_data_t *pgdat = (pg_data_t *)arg;
886 walk_zones_in_node(m, pgdat, frag_show_print);
887 return 0;
888}
889
890static void pagetypeinfo_showfree_print(struct seq_file *m,
891 pg_data_t *pgdat, struct zone *zone)
892{
893 int order, mtype;
894
895 for (mtype = 0; mtype < MIGRATE_TYPES; mtype++) {
896 seq_printf(m, "Node %4d, zone %8s, type %12s ",
897 pgdat->node_id,
898 zone->name,
899 migratetype_names[mtype]);
900 for (order = 0; order < MAX_ORDER; ++order) {
901 unsigned long freecount = 0;
902 struct free_area *area;
903 struct list_head *curr;
904
905 area = &(zone->free_area[order]);
906
907 list_for_each(curr, &area->free_list[mtype])
908 freecount++;
909 seq_printf(m, "%6lu ", freecount);
910 }
Christoph Lameterf6ac2352006-06-30 01:55:32 -0700911 seq_putc(m, '\n');
912 }
Mel Gorman467c9962007-10-16 01:26:02 -0700913}
914
915/* Print out the free pages at each order for each migatetype */
916static int pagetypeinfo_showfree(struct seq_file *m, void *arg)
917{
918 int order;
919 pg_data_t *pgdat = (pg_data_t *)arg;
920
921 /* Print header */
922 seq_printf(m, "%-43s ", "Free pages count per migrate type at order");
923 for (order = 0; order < MAX_ORDER; ++order)
924 seq_printf(m, "%6d ", order);
925 seq_putc(m, '\n');
926
927 walk_zones_in_node(m, pgdat, pagetypeinfo_showfree_print);
928
929 return 0;
930}
931
932static void pagetypeinfo_showblockcount_print(struct seq_file *m,
933 pg_data_t *pgdat, struct zone *zone)
934{
935 int mtype;
936 unsigned long pfn;
937 unsigned long start_pfn = zone->zone_start_pfn;
Cody P Schafer108bcc92013-02-22 16:35:23 -0800938 unsigned long end_pfn = zone_end_pfn(zone);
Mel Gorman467c9962007-10-16 01:26:02 -0700939 unsigned long count[MIGRATE_TYPES] = { 0, };
940
941 for (pfn = start_pfn; pfn < end_pfn; pfn += pageblock_nr_pages) {
942 struct page *page;
943
944 if (!pfn_valid(pfn))
945 continue;
946
947 page = pfn_to_page(pfn);
Mel Gormaneb335752009-05-13 17:34:48 +0100948
949 /* Watch for unexpected holes punched in the memmap */
950 if (!memmap_valid_within(pfn, page, zone))
Mel Gormane80d6a22008-08-14 11:10:14 +0100951 continue;
Mel Gormaneb335752009-05-13 17:34:48 +0100952
Mel Gorman467c9962007-10-16 01:26:02 -0700953 mtype = get_pageblock_migratetype(page);
954
Mel Gormane80d6a22008-08-14 11:10:14 +0100955 if (mtype < MIGRATE_TYPES)
956 count[mtype]++;
Mel Gorman467c9962007-10-16 01:26:02 -0700957 }
958
959 /* Print counts */
960 seq_printf(m, "Node %d, zone %8s ", pgdat->node_id, zone->name);
961 for (mtype = 0; mtype < MIGRATE_TYPES; mtype++)
962 seq_printf(m, "%12lu ", count[mtype]);
963 seq_putc(m, '\n');
964}
965
966/* Print out the free pages at each order for each migratetype */
967static int pagetypeinfo_showblockcount(struct seq_file *m, void *arg)
968{
969 int mtype;
970 pg_data_t *pgdat = (pg_data_t *)arg;
971
972 seq_printf(m, "\n%-23s", "Number of blocks type ");
973 for (mtype = 0; mtype < MIGRATE_TYPES; mtype++)
974 seq_printf(m, "%12s ", migratetype_names[mtype]);
975 seq_putc(m, '\n');
976 walk_zones_in_node(m, pgdat, pagetypeinfo_showblockcount_print);
977
978 return 0;
979}
980
981/*
982 * This prints out statistics in relation to grouping pages by mobility.
983 * It is expensive to collect so do not constantly read the file.
984 */
985static int pagetypeinfo_show(struct seq_file *m, void *arg)
986{
987 pg_data_t *pgdat = (pg_data_t *)arg;
988
KOSAKI Motohiro41b25a32008-04-30 00:52:13 -0700989 /* check memoryless node */
Lai Jiangshana47b53c2012-12-12 13:51:37 -0800990 if (!node_state(pgdat->node_id, N_MEMORY))
KOSAKI Motohiro41b25a32008-04-30 00:52:13 -0700991 return 0;
992
Mel Gorman467c9962007-10-16 01:26:02 -0700993 seq_printf(m, "Page block order: %d\n", pageblock_order);
994 seq_printf(m, "Pages per block: %lu\n", pageblock_nr_pages);
995 seq_putc(m, '\n');
996 pagetypeinfo_showfree(m, pgdat);
997 pagetypeinfo_showblockcount(m, pgdat);
998
Christoph Lameterf6ac2352006-06-30 01:55:32 -0700999 return 0;
1000}
1001
Alexey Dobriyan8f32f7e2008-10-06 04:13:52 +04001002static const struct seq_operations fragmentation_op = {
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001003 .start = frag_start,
1004 .next = frag_next,
1005 .stop = frag_stop,
1006 .show = frag_show,
1007};
1008
Alexey Dobriyan8f32f7e2008-10-06 04:13:52 +04001009static int fragmentation_open(struct inode *inode, struct file *file)
1010{
1011 return seq_open(file, &fragmentation_op);
1012}
1013
1014static const struct file_operations fragmentation_file_operations = {
1015 .open = fragmentation_open,
1016 .read = seq_read,
1017 .llseek = seq_lseek,
1018 .release = seq_release,
1019};
1020
Alexey Dobriyan74e2e8e2008-10-06 04:15:36 +04001021static const struct seq_operations pagetypeinfo_op = {
Mel Gorman467c9962007-10-16 01:26:02 -07001022 .start = frag_start,
1023 .next = frag_next,
1024 .stop = frag_stop,
1025 .show = pagetypeinfo_show,
1026};
1027
Alexey Dobriyan74e2e8e2008-10-06 04:15:36 +04001028static int pagetypeinfo_open(struct inode *inode, struct file *file)
1029{
1030 return seq_open(file, &pagetypeinfo_op);
1031}
1032
1033static const struct file_operations pagetypeinfo_file_ops = {
1034 .open = pagetypeinfo_open,
1035 .read = seq_read,
1036 .llseek = seq_lseek,
1037 .release = seq_release,
1038};
1039
Mel Gorman467c9962007-10-16 01:26:02 -07001040static void zoneinfo_show_print(struct seq_file *m, pg_data_t *pgdat,
1041 struct zone *zone)
1042{
1043 int i;
1044 seq_printf(m, "Node %d, zone %8s", pgdat->node_id, zone->name);
1045 seq_printf(m,
1046 "\n pages free %lu"
1047 "\n min %lu"
1048 "\n low %lu"
1049 "\n high %lu"
Wu Fengguang08d9ae72009-06-16 15:32:30 -07001050 "\n scanned %lu"
Mel Gorman467c9962007-10-16 01:26:02 -07001051 "\n spanned %lu"
Jiang Liu9feedc92012-12-12 13:52:12 -08001052 "\n present %lu"
1053 "\n managed %lu",
Mel Gorman88f5acf2011-01-13 15:45:41 -08001054 zone_page_state(zone, NR_FREE_PAGES),
Mel Gorman41858962009-06-16 15:32:12 -07001055 min_wmark_pages(zone),
1056 low_wmark_pages(zone),
1057 high_wmark_pages(zone),
Mel Gorman467c9962007-10-16 01:26:02 -07001058 zone->pages_scanned,
Mel Gorman467c9962007-10-16 01:26:02 -07001059 zone->spanned_pages,
Jiang Liu9feedc92012-12-12 13:52:12 -08001060 zone->present_pages,
1061 zone->managed_pages);
Mel Gorman467c9962007-10-16 01:26:02 -07001062
1063 for (i = 0; i < NR_VM_ZONE_STAT_ITEMS; i++)
1064 seq_printf(m, "\n %-12s %lu", vmstat_text[i],
1065 zone_page_state(zone, i));
1066
1067 seq_printf(m,
1068 "\n protection: (%lu",
1069 zone->lowmem_reserve[0]);
1070 for (i = 1; i < ARRAY_SIZE(zone->lowmem_reserve); i++)
1071 seq_printf(m, ", %lu", zone->lowmem_reserve[i]);
1072 seq_printf(m,
1073 ")"
1074 "\n pagesets");
1075 for_each_online_cpu(i) {
1076 struct per_cpu_pageset *pageset;
Mel Gorman467c9962007-10-16 01:26:02 -07001077
Christoph Lameter99dcc3e2010-01-05 15:34:51 +09001078 pageset = per_cpu_ptr(zone->pageset, i);
Christoph Lameter3dfa5722008-02-04 22:29:19 -08001079 seq_printf(m,
1080 "\n cpu: %i"
1081 "\n count: %i"
1082 "\n high: %i"
1083 "\n batch: %i",
1084 i,
1085 pageset->pcp.count,
1086 pageset->pcp.high,
1087 pageset->pcp.batch);
Mel Gorman467c9962007-10-16 01:26:02 -07001088#ifdef CONFIG_SMP
1089 seq_printf(m, "\n vm stats threshold: %d",
1090 pageset->stat_threshold);
1091#endif
1092 }
1093 seq_printf(m,
1094 "\n all_unreclaimable: %u"
Rik van Riel556adec2008-10-18 20:26:34 -07001095 "\n start_pfn: %lu"
1096 "\n inactive_ratio: %u",
Lisa Du6e543d52013-09-11 14:22:36 -07001097 !zone_reclaimable(zone),
Rik van Riel556adec2008-10-18 20:26:34 -07001098 zone->zone_start_pfn,
1099 zone->inactive_ratio);
Mel Gorman467c9962007-10-16 01:26:02 -07001100 seq_putc(m, '\n');
1101}
1102
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001103/*
1104 * Output information about zones in @pgdat.
1105 */
1106static int zoneinfo_show(struct seq_file *m, void *arg)
1107{
Mel Gorman467c9962007-10-16 01:26:02 -07001108 pg_data_t *pgdat = (pg_data_t *)arg;
1109 walk_zones_in_node(m, pgdat, zoneinfo_show_print);
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001110 return 0;
1111}
1112
Alexey Dobriyan5c9fe622008-10-06 04:19:42 +04001113static const struct seq_operations zoneinfo_op = {
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001114 .start = frag_start, /* iterate over all zones. The same as in
1115 * fragmentation. */
1116 .next = frag_next,
1117 .stop = frag_stop,
1118 .show = zoneinfo_show,
1119};
1120
Alexey Dobriyan5c9fe622008-10-06 04:19:42 +04001121static int zoneinfo_open(struct inode *inode, struct file *file)
1122{
1123 return seq_open(file, &zoneinfo_op);
1124}
1125
1126static const struct file_operations proc_zoneinfo_file_operations = {
1127 .open = zoneinfo_open,
1128 .read = seq_read,
1129 .llseek = seq_lseek,
1130 .release = seq_release,
1131};
1132
Michael Rubin79da8262010-10-26 14:21:36 -07001133enum writeback_stat_item {
1134 NR_DIRTY_THRESHOLD,
1135 NR_DIRTY_BG_THRESHOLD,
1136 NR_VM_WRITEBACK_STAT_ITEMS,
1137};
1138
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001139static void *vmstat_start(struct seq_file *m, loff_t *pos)
1140{
Christoph Lameter2244b952006-06-30 01:55:33 -07001141 unsigned long *v;
Michael Rubin79da8262010-10-26 14:21:36 -07001142 int i, stat_items_size;
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001143
1144 if (*pos >= ARRAY_SIZE(vmstat_text))
1145 return NULL;
Michael Rubin79da8262010-10-26 14:21:36 -07001146 stat_items_size = NR_VM_ZONE_STAT_ITEMS * sizeof(unsigned long) +
1147 NR_VM_WRITEBACK_STAT_ITEMS * sizeof(unsigned long);
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001148
Christoph Lameterf8891e52006-06-30 01:55:45 -07001149#ifdef CONFIG_VM_EVENT_COUNTERS
Michael Rubin79da8262010-10-26 14:21:36 -07001150 stat_items_size += sizeof(struct vm_event_state);
Christoph Lameterf8891e52006-06-30 01:55:45 -07001151#endif
Michael Rubin79da8262010-10-26 14:21:36 -07001152
1153 v = kmalloc(stat_items_size, GFP_KERNEL);
Christoph Lameter2244b952006-06-30 01:55:33 -07001154 m->private = v;
1155 if (!v)
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001156 return ERR_PTR(-ENOMEM);
Christoph Lameter2244b952006-06-30 01:55:33 -07001157 for (i = 0; i < NR_VM_ZONE_STAT_ITEMS; i++)
1158 v[i] = global_page_state(i);
Michael Rubin79da8262010-10-26 14:21:36 -07001159 v += NR_VM_ZONE_STAT_ITEMS;
1160
1161 global_dirty_limits(v + NR_DIRTY_BG_THRESHOLD,
1162 v + NR_DIRTY_THRESHOLD);
1163 v += NR_VM_WRITEBACK_STAT_ITEMS;
1164
Christoph Lameterf8891e52006-06-30 01:55:45 -07001165#ifdef CONFIG_VM_EVENT_COUNTERS
Michael Rubin79da8262010-10-26 14:21:36 -07001166 all_vm_events(v);
1167 v[PGPGIN] /= 2; /* sectors -> kbytes */
1168 v[PGPGOUT] /= 2;
Christoph Lameterf8891e52006-06-30 01:55:45 -07001169#endif
Wu Fengguangff8b16d2010-11-04 01:56:49 +08001170 return (unsigned long *)m->private + *pos;
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001171}
1172
1173static void *vmstat_next(struct seq_file *m, void *arg, loff_t *pos)
1174{
1175 (*pos)++;
1176 if (*pos >= ARRAY_SIZE(vmstat_text))
1177 return NULL;
1178 return (unsigned long *)m->private + *pos;
1179}
1180
1181static int vmstat_show(struct seq_file *m, void *arg)
1182{
1183 unsigned long *l = arg;
1184 unsigned long off = l - (unsigned long *)m->private;
1185
1186 seq_printf(m, "%s %lu\n", vmstat_text[off], *l);
1187 return 0;
1188}
1189
1190static void vmstat_stop(struct seq_file *m, void *arg)
1191{
1192 kfree(m->private);
1193 m->private = NULL;
1194}
1195
Alexey Dobriyanb6aa44a2008-10-06 04:17:48 +04001196static const struct seq_operations vmstat_op = {
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001197 .start = vmstat_start,
1198 .next = vmstat_next,
1199 .stop = vmstat_stop,
1200 .show = vmstat_show,
1201};
1202
Alexey Dobriyanb6aa44a2008-10-06 04:17:48 +04001203static int vmstat_open(struct inode *inode, struct file *file)
1204{
1205 return seq_open(file, &vmstat_op);
1206}
1207
1208static const struct file_operations proc_vmstat_file_operations = {
1209 .open = vmstat_open,
1210 .read = seq_read,
1211 .llseek = seq_lseek,
1212 .release = seq_release,
1213};
Christoph Lameterf6ac2352006-06-30 01:55:32 -07001214#endif /* CONFIG_PROC_FS */
1215
Christoph Lameterdf9ecab2006-08-31 21:27:35 -07001216#ifdef CONFIG_SMP
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001217static DEFINE_PER_CPU(struct delayed_work, vmstat_work);
Christoph Lameter77461ab2007-05-09 02:35:13 -07001218int sysctl_stat_interval __read_mostly = HZ;
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001219
1220static void vmstat_update(struct work_struct *w)
1221{
Christoph Lameterfbc2edb2013-09-11 14:21:32 -07001222 refresh_cpu_vm_stats();
Christoph Lameter77461ab2007-05-09 02:35:13 -07001223 schedule_delayed_work(&__get_cpu_var(vmstat_work),
Anton Blanchard98f4ebb2009-04-02 16:56:39 -07001224 round_jiffies_relative(sysctl_stat_interval));
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001225}
1226
Paul Gortmaker0db06282013-06-19 14:53:51 -04001227static void start_cpu_timer(int cpu)
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001228{
Tejun Heo1871e522009-10-29 22:34:13 +09001229 struct delayed_work *work = &per_cpu(vmstat_work, cpu);
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001230
Tejun Heo203b42f2012-08-21 13:18:23 -07001231 INIT_DEFERRABLE_WORK(work, vmstat_update);
Tejun Heo1871e522009-10-29 22:34:13 +09001232 schedule_delayed_work_on(cpu, work, __round_jiffies_relative(HZ, cpu));
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001233}
1234
Toshi Kani807a1bd2013-11-12 15:08:13 -08001235static void vmstat_cpu_dead(int node)
1236{
1237 int cpu;
1238
1239 get_online_cpus();
1240 for_each_online_cpu(cpu)
1241 if (cpu_to_node(cpu) == node)
1242 goto end;
1243
1244 node_clear_state(node, N_CPU);
1245end:
1246 put_online_cpus();
1247}
1248
Christoph Lameterdf9ecab2006-08-31 21:27:35 -07001249/*
1250 * Use the cpu notifier to insure that the thresholds are recalculated
1251 * when necessary.
1252 */
Paul Gortmaker0db06282013-06-19 14:53:51 -04001253static int vmstat_cpuup_callback(struct notifier_block *nfb,
Christoph Lameterdf9ecab2006-08-31 21:27:35 -07001254 unsigned long action,
1255 void *hcpu)
1256{
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001257 long cpu = (long)hcpu;
1258
Christoph Lameterdf9ecab2006-08-31 21:27:35 -07001259 switch (action) {
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001260 case CPU_ONLINE:
1261 case CPU_ONLINE_FROZEN:
KAMEZAWA Hiroyuki5ee28a42010-09-09 16:38:14 -07001262 refresh_zone_stat_thresholds();
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001263 start_cpu_timer(cpu);
Christoph Lameterad596922010-01-05 15:34:51 +09001264 node_set_state(cpu_to_node(cpu), N_CPU);
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001265 break;
1266 case CPU_DOWN_PREPARE:
1267 case CPU_DOWN_PREPARE_FROZEN:
Tejun Heoafe2c512010-12-14 16:21:17 +01001268 cancel_delayed_work_sync(&per_cpu(vmstat_work, cpu));
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001269 per_cpu(vmstat_work, cpu).work.func = NULL;
1270 break;
1271 case CPU_DOWN_FAILED:
1272 case CPU_DOWN_FAILED_FROZEN:
1273 start_cpu_timer(cpu);
1274 break;
Andy Whitcroftce421c72006-12-06 20:33:08 -08001275 case CPU_DEAD:
Rafael J. Wysocki8bb78442007-05-09 02:35:10 -07001276 case CPU_DEAD_FROZEN:
Andy Whitcroftce421c72006-12-06 20:33:08 -08001277 refresh_zone_stat_thresholds();
Toshi Kani807a1bd2013-11-12 15:08:13 -08001278 vmstat_cpu_dead(cpu_to_node(cpu));
Andy Whitcroftce421c72006-12-06 20:33:08 -08001279 break;
1280 default:
1281 break;
Christoph Lameterdf9ecab2006-08-31 21:27:35 -07001282 }
1283 return NOTIFY_OK;
1284}
1285
Paul Gortmaker0db06282013-06-19 14:53:51 -04001286static struct notifier_block vmstat_notifier =
Christoph Lameterdf9ecab2006-08-31 21:27:35 -07001287 { &vmstat_cpuup_callback, NULL, 0 };
Alexey Dobriyan8f32f7e2008-10-06 04:13:52 +04001288#endif
Christoph Lameterdf9ecab2006-08-31 21:27:35 -07001289
Adrian Bunke2fc88d2007-10-16 01:26:27 -07001290static int __init setup_vmstat(void)
Christoph Lameterdf9ecab2006-08-31 21:27:35 -07001291{
Alexey Dobriyan8f32f7e2008-10-06 04:13:52 +04001292#ifdef CONFIG_SMP
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001293 int cpu;
1294
Christoph Lameterdf9ecab2006-08-31 21:27:35 -07001295 register_cpu_notifier(&vmstat_notifier);
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001296
Toshi Kanid7e0b372013-11-12 15:08:12 -08001297 get_online_cpus();
1298 for_each_online_cpu(cpu) {
Christoph Lameterd1187ed2007-05-09 02:35:12 -07001299 start_cpu_timer(cpu);
Toshi Kanid7e0b372013-11-12 15:08:12 -08001300 node_set_state(cpu_to_node(cpu), N_CPU);
1301 }
1302 put_online_cpus();
Alexey Dobriyan8f32f7e2008-10-06 04:13:52 +04001303#endif
1304#ifdef CONFIG_PROC_FS
1305 proc_create("buddyinfo", S_IRUGO, NULL, &fragmentation_file_operations);
Alexey Dobriyan74e2e8e2008-10-06 04:15:36 +04001306 proc_create("pagetypeinfo", S_IRUGO, NULL, &pagetypeinfo_file_ops);
Alexey Dobriyanb6aa44a2008-10-06 04:17:48 +04001307 proc_create("vmstat", S_IRUGO, NULL, &proc_vmstat_file_operations);
Alexey Dobriyan5c9fe622008-10-06 04:19:42 +04001308 proc_create("zoneinfo", S_IRUGO, NULL, &proc_zoneinfo_file_operations);
Alexey Dobriyan8f32f7e2008-10-06 04:13:52 +04001309#endif
Christoph Lameterdf9ecab2006-08-31 21:27:35 -07001310 return 0;
1311}
1312module_init(setup_vmstat)
Mel Gormand7a57522010-05-24 14:32:25 -07001313
1314#if defined(CONFIG_DEBUG_FS) && defined(CONFIG_COMPACTION)
1315#include <linux/debugfs.h>
1316
Mel Gormand7a57522010-05-24 14:32:25 -07001317
1318/*
1319 * Return an index indicating how much of the available free memory is
1320 * unusable for an allocation of the requested size.
1321 */
1322static int unusable_free_index(unsigned int order,
1323 struct contig_page_info *info)
1324{
1325 /* No free memory is interpreted as all free memory is unusable */
1326 if (info->free_pages == 0)
1327 return 1000;
1328
1329 /*
1330 * Index should be a value between 0 and 1. Return a value to 3
1331 * decimal places.
1332 *
1333 * 0 => no fragmentation
1334 * 1 => high fragmentation
1335 */
1336 return div_u64((info->free_pages - (info->free_blocks_suitable << order)) * 1000ULL, info->free_pages);
1337
1338}
1339
1340static void unusable_show_print(struct seq_file *m,
1341 pg_data_t *pgdat, struct zone *zone)
1342{
1343 unsigned int order;
1344 int index;
1345 struct contig_page_info info;
1346
1347 seq_printf(m, "Node %d, zone %8s ",
1348 pgdat->node_id,
1349 zone->name);
1350 for (order = 0; order < MAX_ORDER; ++order) {
1351 fill_contig_page_info(zone, order, &info);
1352 index = unusable_free_index(order, &info);
1353 seq_printf(m, "%d.%03d ", index / 1000, index % 1000);
1354 }
1355
1356 seq_putc(m, '\n');
1357}
1358
1359/*
1360 * Display unusable free space index
1361 *
1362 * The unusable free space index measures how much of the available free
1363 * memory cannot be used to satisfy an allocation of a given size and is a
1364 * value between 0 and 1. The higher the value, the more of free memory is
1365 * unusable and by implication, the worse the external fragmentation is. This
1366 * can be expressed as a percentage by multiplying by 100.
1367 */
1368static int unusable_show(struct seq_file *m, void *arg)
1369{
1370 pg_data_t *pgdat = (pg_data_t *)arg;
1371
1372 /* check memoryless node */
Lai Jiangshana47b53c2012-12-12 13:51:37 -08001373 if (!node_state(pgdat->node_id, N_MEMORY))
Mel Gormand7a57522010-05-24 14:32:25 -07001374 return 0;
1375
1376 walk_zones_in_node(m, pgdat, unusable_show_print);
1377
1378 return 0;
1379}
1380
1381static const struct seq_operations unusable_op = {
1382 .start = frag_start,
1383 .next = frag_next,
1384 .stop = frag_stop,
1385 .show = unusable_show,
1386};
1387
1388static int unusable_open(struct inode *inode, struct file *file)
1389{
1390 return seq_open(file, &unusable_op);
1391}
1392
1393static const struct file_operations unusable_file_ops = {
1394 .open = unusable_open,
1395 .read = seq_read,
1396 .llseek = seq_lseek,
1397 .release = seq_release,
1398};
1399
Mel Gormanf1a5ab12010-05-24 14:32:26 -07001400static void extfrag_show_print(struct seq_file *m,
1401 pg_data_t *pgdat, struct zone *zone)
1402{
1403 unsigned int order;
1404 int index;
1405
1406 /* Alloc on stack as interrupts are disabled for zone walk */
1407 struct contig_page_info info;
1408
1409 seq_printf(m, "Node %d, zone %8s ",
1410 pgdat->node_id,
1411 zone->name);
1412 for (order = 0; order < MAX_ORDER; ++order) {
1413 fill_contig_page_info(zone, order, &info);
Mel Gorman56de7262010-05-24 14:32:30 -07001414 index = __fragmentation_index(order, &info);
Mel Gormanf1a5ab12010-05-24 14:32:26 -07001415 seq_printf(m, "%d.%03d ", index / 1000, index % 1000);
1416 }
1417
1418 seq_putc(m, '\n');
1419}
1420
1421/*
1422 * Display fragmentation index for orders that allocations would fail for
1423 */
1424static int extfrag_show(struct seq_file *m, void *arg)
1425{
1426 pg_data_t *pgdat = (pg_data_t *)arg;
1427
1428 walk_zones_in_node(m, pgdat, extfrag_show_print);
1429
1430 return 0;
1431}
1432
1433static const struct seq_operations extfrag_op = {
1434 .start = frag_start,
1435 .next = frag_next,
1436 .stop = frag_stop,
1437 .show = extfrag_show,
1438};
1439
1440static int extfrag_open(struct inode *inode, struct file *file)
1441{
1442 return seq_open(file, &extfrag_op);
1443}
1444
1445static const struct file_operations extfrag_file_ops = {
1446 .open = extfrag_open,
1447 .read = seq_read,
1448 .llseek = seq_lseek,
1449 .release = seq_release,
1450};
1451
Mel Gormand7a57522010-05-24 14:32:25 -07001452static int __init extfrag_debug_init(void)
1453{
Sasikantha babubde8bd82012-05-29 15:06:22 -07001454 struct dentry *extfrag_debug_root;
1455
Mel Gormand7a57522010-05-24 14:32:25 -07001456 extfrag_debug_root = debugfs_create_dir("extfrag", NULL);
1457 if (!extfrag_debug_root)
1458 return -ENOMEM;
1459
1460 if (!debugfs_create_file("unusable_index", 0444,
1461 extfrag_debug_root, NULL, &unusable_file_ops))
Sasikantha babubde8bd82012-05-29 15:06:22 -07001462 goto fail;
Mel Gormand7a57522010-05-24 14:32:25 -07001463
Mel Gormanf1a5ab12010-05-24 14:32:26 -07001464 if (!debugfs_create_file("extfrag_index", 0444,
1465 extfrag_debug_root, NULL, &extfrag_file_ops))
Sasikantha babubde8bd82012-05-29 15:06:22 -07001466 goto fail;
Mel Gormanf1a5ab12010-05-24 14:32:26 -07001467
Mel Gormand7a57522010-05-24 14:32:25 -07001468 return 0;
Sasikantha babubde8bd82012-05-29 15:06:22 -07001469fail:
1470 debugfs_remove_recursive(extfrag_debug_root);
1471 return -ENOMEM;
Mel Gormand7a57522010-05-24 14:32:25 -07001472}
1473
1474module_init(extfrag_debug_init);
1475#endif