6468 lines · 178.8 KB · C
RawDownload
/* *  linux/mm/page_alloc.c * *  Manages the free list, the system allocates free pages here. *  Note that kmalloc() lives in slab.c * *  Copyright (C) 1991, 1992, 1993, 1994  Linus Torvalds *  Swap reorganised 29.12.95, Stephen Tweedie *  Support of BIGMEM added by Gerhard Wichert, Siemens AG, July 1999 *  Reshaped it to be a zoned allocator, Ingo Molnar, Red Hat, 1999 *  Discontiguous memory support, Kanoj Sarcar, SGI, Nov 1999 *  Zone balancing, Kanoj Sarcar, SGI, Jan 2000 *  Per cpu hot/cold page lists, bulk allocation, Martin J. Bligh, Sept 2002 *          (lots of bits borrowed from Ingo Molnar & Andrew Morton) */ #include <linux/stddef.h>#include <linux/mm.h>#include <linux/swap.h>#include <linux/interrupt.h>#include <linux/pagemap.h>#include <linux/jiffies.h>#include <linux/bootmem.h>#include <linux/memblock.h>#include <linux/compiler.h>#include <linux/kernel.h>#include <linux/kmemcheck.h>#include <linux/module.h>#include <linux/suspend.h>#include <linux/pagevec.h>#include <linux/blkdev.h>#include <linux/slab.h>#include <linux/ratelimit.h>#include <linux/oom.h>#include <linux/notifier.h>#include <linux/topology.h>#include <linux/sysctl.h>#include <linux/cpu.h>#include <linux/cpuset.h>#include <linux/memory_hotplug.h>#include <linux/nodemask.h>#include <linux/vmalloc.h>#include <linux/vmstat.h>#include <linux/mempolicy.h>#include <linux/stop_machine.h>#include <linux/sort.h>#include <linux/pfn.h>#include <linux/backing-dev.h>#include <linux/fault-inject.h>#include <linux/page-isolation.h>#include <linux/page_cgroup.h>#include <linux/debugobjects.h>#include <linux/kmemleak.h>#include <linux/compaction.h>#include <trace/events/kmem.h>#include <linux/ftrace_event.h>#include <linux/memcontrol.h>#include <linux/prefetch.h>#include <linux/mm_inline.h>#include <linux/migrate.h>#include <linux/page-debug-flags.h>#include <linux/hugetlb.h>#include <linux/sched/rt.h> #include <asm/sections.h>#include <asm/tlbflush.h>#include <asm/div64.h>#include "internal.h" /* prevent >1 _updater_ of zone percpu pageset ->high and ->batch fields */static DEFINE_MUTEX(pcp_batch_high_lock); #ifdef CONFIG_USE_PERCPU_NUMA_NODE_IDDEFINE_PER_CPU(int, numa_node);EXPORT_PER_CPU_SYMBOL(numa_node);#endif #ifdef CONFIG_HAVE_MEMORYLESS_NODES/* * N.B., Do NOT reference the '_numa_mem_' per cpu variable directly. * It will not be defined when CONFIG_HAVE_MEMORYLESS_NODES is not defined. * Use the accessor functions set_numa_mem(), numa_mem_id() and cpu_to_mem() * defined in <linux/topology.h>. */DEFINE_PER_CPU(int, _numa_mem_);		/* Kernel "local memory" node */EXPORT_PER_CPU_SYMBOL(_numa_mem_);#endif /* * Array of node states. */nodemask_t node_states[NR_NODE_STATES] __read_mostly = {	[N_POSSIBLE] = NODE_MASK_ALL,	[N_ONLINE] = { { [0] = 1UL } },#ifndef CONFIG_NUMA	[N_NORMAL_MEMORY] = { { [0] = 1UL } },#ifdef CONFIG_HIGHMEM	[N_HIGH_MEMORY] = { { [0] = 1UL } },#endif#ifdef CONFIG_MOVABLE_NODE	[N_MEMORY] = { { [0] = 1UL } },#endif	[N_CPU] = { { [0] = 1UL } },#endif	/* NUMA */};EXPORT_SYMBOL(node_states); /* Protect totalram_pages and zone->managed_pages */static DEFINE_SPINLOCK(managed_page_count_lock); unsigned long totalram_pages __read_mostly;unsigned long totalreserve_pages __read_mostly;/* * When calculating the number of globally allowed dirty pages, there * is a certain number of per-zone reserves that should not be * considered dirtyable memory.  This is the sum of those reserves * over all existing zones that contribute dirtyable memory. */unsigned long dirty_balance_reserve __read_mostly; int percpu_pagelist_fraction;gfp_t gfp_allowed_mask __read_mostly = GFP_BOOT_MASK; #ifdef CONFIG_PM_SLEEP/* * The following functions are used by the suspend/hibernate code to temporarily * change gfp_allowed_mask in order to avoid using I/O during memory allocations * while devices are suspended.  To avoid races with the suspend/hibernate code, * they should always be called with pm_mutex held (gfp_allowed_mask also should * only be modified with pm_mutex held, unless the suspend/hibernate code is * guaranteed not to run in parallel with that modification). */ static gfp_t saved_gfp_mask; void pm_restore_gfp_mask(void){	WARN_ON(!mutex_is_locked(&pm_mutex));	if (saved_gfp_mask) {		gfp_allowed_mask = saved_gfp_mask;		saved_gfp_mask = 0;	}} void pm_restrict_gfp_mask(void){	WARN_ON(!mutex_is_locked(&pm_mutex));	WARN_ON(saved_gfp_mask);	saved_gfp_mask = gfp_allowed_mask;	gfp_allowed_mask &= ~GFP_IOFS;} bool pm_suspended_storage(void){	if ((gfp_allowed_mask & GFP_IOFS) == GFP_IOFS)		return false;	return true;}#endif /* CONFIG_PM_SLEEP */ #ifdef CONFIG_HUGETLB_PAGE_SIZE_VARIABLEint pageblock_order __read_mostly;#endif static void __free_pages_ok(struct page *page, unsigned int order); /* * results with 256, 32 in the lowmem_reserve sysctl: *	1G machine -> (16M dma, 800M-16M normal, 1G-800M high) *	1G machine -> (16M dma, 784M normal, 224M high) *	NORMAL allocation will leave 784M/256 of ram reserved in the ZONE_DMA *	HIGHMEM allocation will leave 224M/32 of ram reserved in ZONE_NORMAL *	HIGHMEM allocation will (224M+784M)/256 of ram reserved in ZONE_DMA * * TBD: should special case ZONE_DMA32 machines here - in those we normally * don't need any ZONE_NORMAL reservation */int sysctl_lowmem_reserve_ratio[MAX_NR_ZONES-1] = {#ifdef CONFIG_ZONE_DMA	 256,#endif#ifdef CONFIG_ZONE_DMA32	 256,#endif#ifdef CONFIG_HIGHMEM	 32,#endif	 32,}; EXPORT_SYMBOL(totalram_pages); static char * const zone_names[MAX_NR_ZONES] = {#ifdef CONFIG_ZONE_DMA	 "DMA",#endif#ifdef CONFIG_ZONE_DMA32	 "DMA32",#endif	 "Normal",#ifdef CONFIG_HIGHMEM	 "HighMem",#endif	 "Movable",}; int min_free_kbytes = 1024;int user_min_free_kbytes; static unsigned long __meminitdata nr_kernel_pages;static unsigned long __meminitdata nr_all_pages;static unsigned long __meminitdata dma_reserve; #ifdef CONFIG_HAVE_MEMBLOCK_NODE_MAPstatic unsigned long __meminitdata arch_zone_lowest_possible_pfn[MAX_NR_ZONES];static unsigned long __meminitdata arch_zone_highest_possible_pfn[MAX_NR_ZONES];static unsigned long __initdata required_kernelcore;static unsigned long __initdata required_movablecore;static unsigned long __meminitdata zone_movable_pfn[MAX_NUMNODES]; /* movable_zone is the "real" zone pages in ZONE_MOVABLE are taken from */int movable_zone;EXPORT_SYMBOL(movable_zone);#endif /* CONFIG_HAVE_MEMBLOCK_NODE_MAP */ #if MAX_NUMNODES > 1int nr_node_ids __read_mostly = MAX_NUMNODES;int nr_online_nodes __read_mostly = 1;EXPORT_SYMBOL(nr_node_ids);EXPORT_SYMBOL(nr_online_nodes);#endif int page_group_by_mobility_disabled __read_mostly; void set_pageblock_migratetype(struct page *page, int migratetype){	if (unlikely(page_group_by_mobility_disabled &&		     migratetype < MIGRATE_PCPTYPES))		migratetype = MIGRATE_UNMOVABLE; 	set_pageblock_flags_group(page, (unsigned long)migratetype,					PB_migrate, PB_migrate_end);} bool oom_killer_disabled __read_mostly; #ifdef CONFIG_DEBUG_VMstatic int page_outside_zone_boundaries(struct zone *zone, struct page *page){	int ret = 0;	unsigned seq;	unsigned long pfn = page_to_pfn(page);	unsigned long sp, start_pfn; 	do {		seq = zone_span_seqbegin(zone);		start_pfn = zone->zone_start_pfn;		sp = zone->spanned_pages;		if (!zone_spans_pfn(zone, pfn))			ret = 1;	} while (zone_span_seqretry(zone, seq)); 	if (ret)		pr_err("page %lu outside zone [ %lu - %lu ]\n",			pfn, start_pfn, start_pfn + sp); 	return ret;} static int page_is_consistent(struct zone *zone, struct page *page){	if (!pfn_valid_within(page_to_pfn(page)))		return 0;	if (zone != page_zone(page))		return 0; 	return 1;}/* * Temporary debugging check for pages not lying within a given zone. */static int bad_range(struct zone *zone, struct page *page){	if (page_outside_zone_boundaries(zone, page))		return 1;	if (!page_is_consistent(zone, page))		return 1; 	return 0;}#elsestatic inline int bad_range(struct zone *zone, struct page *page){	return 0;}#endif static void bad_page(struct page *page){	static unsigned long resume;	static unsigned long nr_shown;	static unsigned long nr_unshown; 	/* Don't complain about poisoned pages */	if (PageHWPoison(page)) {		page_mapcount_reset(page); /* remove PageBuddy */		return;	} 	/*	 * Allow a burst of 60 reports, then keep quiet for that minute;	 * or allow a steady drip of one report per second.	 */	if (nr_shown == 60) {		if (time_before(jiffies, resume)) {			nr_unshown++;			goto out;		}		if (nr_unshown) {			printk(KERN_ALERT			      "BUG: Bad page state: %lu messages suppressed\n",				nr_unshown);			nr_unshown = 0;		}		nr_shown = 0;	}	if (nr_shown++ == 0)		resume = jiffies + 60 * HZ; 	printk(KERN_ALERT "BUG: Bad page state in process %s  pfn:%05lx\n",		current->comm, page_to_pfn(page));	dump_page(page); 	print_modules();	dump_stack();out:	/* Leave bad fields for debug, except PageBuddy could make trouble */	page_mapcount_reset(page); /* remove PageBuddy */	add_taint(TAINT_BAD_PAGE, LOCKDEP_NOW_UNRELIABLE);} /* * Higher-order pages are called "compound pages".  They are structured thusly: * * The first PAGE_SIZE page is called the "head page". * * The remaining PAGE_SIZE pages are called "tail pages". * * All pages have PG_compound set.  All tail pages have their ->first_page * pointing at the head page. * * The first tail page's ->lru.next holds the address of the compound page's * put_page() function.  Its ->lru.prev holds the order of allocation. * This usage means that zero-order pages may not be compound. */ static void free_compound_page(struct page *page){	__free_pages_ok(page, compound_order(page));} void prep_compound_page(struct page *page, unsigned long order){	int i;	int nr_pages = 1 << order; 	set_compound_page_dtor(page, free_compound_page);	set_compound_order(page, order);	__SetPageHead(page);	for (i = 1; i < nr_pages; i++) {		struct page *p = page + i;		__SetPageTail(p);		set_page_count(p, 0);		p->first_page = page;	}} /* update __split_huge_page_refcount if you change this function */static int destroy_compound_page(struct page *page, unsigned long order){	int i;	int nr_pages = 1 << order;	int bad = 0; 	if (unlikely(compound_order(page) != order)) {		bad_page(page);		bad++;	} 	__ClearPageHead(page); 	for (i = 1; i < nr_pages; i++) {		struct page *p = page + i; 		if (unlikely(!PageTail(p) || (p->first_page != page))) {			bad_page(page);			bad++;		}		__ClearPageTail(p);	} 	return bad;} static inline void prep_zero_page(struct page *page, int order, gfp_t gfp_flags){	int i; 	/*	 * clear_highpage() will use KM_USER0, so it's a bug to use __GFP_ZERO	 * and __GFP_HIGHMEM from hard or soft interrupt context.	 */	VM_BUG_ON((gfp_flags & __GFP_HIGHMEM) && in_interrupt());	for (i = 0; i < (1 << order); i++)		clear_highpage(page + i);} #ifdef CONFIG_DEBUG_PAGEALLOCunsigned int _debug_guardpage_minorder; static int __init debug_guardpage_minorder_setup(char *buf){	unsigned long res; 	if (kstrtoul(buf, 10, &res) < 0 ||  res > MAX_ORDER / 2) {		printk(KERN_ERR "Bad debug_guardpage_minorder value\n");		return 0;	}	_debug_guardpage_minorder = res;	printk(KERN_INFO "Setting debug_guardpage_minorder to %lu\n", res);	return 0;}__setup("debug_guardpage_minorder=", debug_guardpage_minorder_setup); static inline void set_page_guard_flag(struct page *page){	__set_bit(PAGE_DEBUG_FLAG_GUARD, &page->debug_flags);} static inline void clear_page_guard_flag(struct page *page){	__clear_bit(PAGE_DEBUG_FLAG_GUARD, &page->debug_flags);}#elsestatic inline void set_page_guard_flag(struct page *page) { }static inline void clear_page_guard_flag(struct page *page) { }#endif static inline void set_page_order(struct page *page, int order){	set_page_private(page, order);	__SetPageBuddy(page);} static inline void rmv_page_order(struct page *page){	__ClearPageBuddy(page);	set_page_private(page, 0);} /* * Locate the struct page for both the matching buddy in our * pair (buddy1) and the combined O(n+1) page they form (page). * * 1) Any buddy B1 will have an order O twin B2 which satisfies * the following equation: *     B2 = B1 ^ (1 << O) * For example, if the starting buddy (buddy2) is #8 its order * 1 buddy is #10: *     B2 = 8 ^ (1 << 1) = 8 ^ 2 = 10 * * 2) Any buddy B will have an order O+1 parent P which * satisfies the following equation: *     P = B & ~(1 << O) * * Assumption: *_mem_map is contiguous at least up to MAX_ORDER */static inline unsigned long__find_buddy_index(unsigned long page_idx, unsigned int order){	return page_idx ^ (1 << order);} /* * This function checks whether a page is free && is the buddy * we can do coalesce a page and its buddy if * (a) the buddy is not in a hole && * (b) the buddy is in the buddy system && * (c) a page and its buddy have the same order && * (d) a page and its buddy are in the same zone. * * For recording whether a page is in the buddy system, we set ->_mapcount * PAGE_BUDDY_MAPCOUNT_VALUE. * Setting, clearing, and testing _mapcount PAGE_BUDDY_MAPCOUNT_VALUE is * serialized by zone->lock. * * For recording page's order, we use page_private(page). */static inline int page_is_buddy(struct page *page, struct page *buddy,								int order)

Lines 1–500 of 6468.