arch/powerpc/platforms/powernv/memtrace.c - arm/linux - Git at Google

 /*
  * Copyright (C) IBM Corporation, 2014, 2017
  * Anton Blanchard, Rashmica Gupta.
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
  * the Free Software Foundation; either version 2 of the License, or
  * (at your option) any later version.
  */

 #define pr_fmt(fmt) "memtrace: " fmt

 #include <linux/bitops.h>
 #include <linux/string.h>
 #include <linux/memblock.h>
 #include <linux/init.h>
 #include <linux/moduleparam.h>
 #include <linux/fs.h>
 #include <linux/debugfs.h>
 #include <linux/slab.h>
 #include <linux/memory.h>
 #include <linux/memory_hotplug.h>
 #include <asm/machdep.h>
 #include <asm/debugfs.h>

 /* This enables us to keep track of the memory removed from each node. */
 struct memtrace_entry {
 	void *mem;
 	u64 start;
 	u64 size;
 	u32 nid;
 	struct dentry *dir;
 	char name[16];
 };

 static u64 memtrace_size;

 static struct memtrace_entry *memtrace_array;
 static unsigned int memtrace_array_nr;


 static ssize_t memtrace_read(struct file *filp, char __user *ubuf,
 			     size_t count, loff_t *ppos)
 {
 	struct memtrace_entry *ent = filp->private_data;

 	return simple_read_from_buffer(ubuf, count, ppos, ent->mem, ent->size);
 }

 static bool valid_memtrace_range(struct memtrace_entry *dev,
 				 unsigned long start, unsigned long size)
 {
 	if ((start >= dev->start) &&
 	    ((start + size) <= (dev->start + dev->size)))
 		return true;

 	return false;
 }

 static int memtrace_mmap(struct file *filp, struct vm_area_struct *vma)
 {
 	unsigned long size = vma->vm_end - vma->vm_start;
 	struct memtrace_entry *dev = filp->private_data;

 	if (!valid_memtrace_range(dev, vma->vm_pgoff << PAGE_SHIFT, size))
 		return -EINVAL;

 	vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);

 	if (remap_pfn_range(vma, vma->vm_start,
 			    vma->vm_pgoff + (dev->start >> PAGE_SHIFT),
 			    size, vma->vm_page_prot))
 		return -EAGAIN;

 	return 0;
 }

 static const struct file_operations memtrace_fops = {
 	.llseek = default_llseek,
 	.read	= memtrace_read,
 	.mmap	= memtrace_mmap,
 	.open	= simple_open,
 };

 static void flush_memory_region(u64 base, u64 size)
 {
 	unsigned long line_size = ppc64_caches.l1d.size;
 	u64 end = base + size;
 	u64 addr;

 	base = round_down(base, line_size);
 	end = round_up(end, line_size);

 	for (addr = base; addr < end; addr += line_size)
 		asm volatile("dcbf 0,%0" : "=r" (addr) :: "memory");
 }

 static int check_memblock_online(struct memory_block *mem, void *arg)
 {
 	if (mem->state != MEM_ONLINE)
 		return -1;

 	return 0;
 }

 static int change_memblock_state(struct memory_block *mem, void *arg)
 {
 	unsigned long state = (unsigned long)arg;

 	mem->state = state;

 	return 0;
 }

 static bool memtrace_offline_pages(u32 nid, u64 start_pfn, u64 nr_pages)
 {
 	u64 end_pfn = start_pfn + nr_pages - 1;

 	if (walk_memory_range(start_pfn, end_pfn, NULL,
 	    check_memblock_online))
 		return false;

 	walk_memory_range(start_pfn, end_pfn, (void *)MEM_GOING_OFFLINE,
 			  change_memblock_state);

 	if (offline_pages(start_pfn, nr_pages)) {
 		walk_memory_range(start_pfn, end_pfn, (void *)MEM_ONLINE,
 				  change_memblock_state);
 		return false;
 	}

 	walk_memory_range(start_pfn, end_pfn, (void *)MEM_OFFLINE,
 			  change_memblock_state);

 	/* RCU grace period? */
 	flush_memory_region((u64)__va(start_pfn << PAGE_SHIFT),
 			    nr_pages << PAGE_SHIFT);

 	lock_device_hotplug();
 	remove_memory(nid, start_pfn << PAGE_SHIFT, nr_pages << PAGE_SHIFT);
 	unlock_device_hotplug();

 	return true;
 }

 static u64 memtrace_alloc_node(u32 nid, u64 size)
 {
 	u64 start_pfn, end_pfn, nr_pages;
 	u64 base_pfn;

 	if (!NODE_DATA(nid) || !node_spanned_pages(nid))
 		return 0;

 	start_pfn = node_start_pfn(nid);
 	end_pfn = node_end_pfn(nid);
 	nr_pages = size >> PAGE_SHIFT;

 	/* Trace memory needs to be aligned to the size */
 	end_pfn = round_down(end_pfn - nr_pages, nr_pages);

 	for (base_pfn = end_pfn; base_pfn > start_pfn; base_pfn -= nr_pages) {
 		if (memtrace_offline_pages(nid, base_pfn, nr_pages) == true)
 			return base_pfn << PAGE_SHIFT;
 	}

 	return 0;
 }

 static int memtrace_init_regions_runtime(u64 size)
 {
 	u32 nid;
 	u64 m;

 	memtrace_array = kcalloc(num_online_nodes(),
 				sizeof(struct memtrace_entry), GFP_KERNEL);
 	if (!memtrace_array) {
 		pr_err("Failed to allocate memtrace_array\n");
 		return -EINVAL;
 	}

 	for_each_online_node(nid) {
 		m = memtrace_alloc_node(nid, size);

 		/*
 		 * A node might not have any local memory, so warn but
 		 * continue on.
 		 */
 		if (!m) {
 			pr_err("Failed to allocate trace memory on node %d\n", nid);
 			continue;
 		}

 		pr_info("Allocated trace memory on node %d at 0x%016llx\n", nid, m);

 		memtrace_array[memtrace_array_nr].start = m;
 		memtrace_array[memtrace_array_nr].size = size;
 		memtrace_array[memtrace_array_nr].nid = nid;
 		memtrace_array_nr++;
 	}

 	return 0;
 }

 static struct dentry *memtrace_debugfs_dir;

 static int memtrace_init_debugfs(void)
 {
 	int ret = 0;
 	int i;

 	for (i = 0; i < memtrace_array_nr; i++) {
 		struct dentry *dir;
 		struct memtrace_entry *ent = &memtrace_array[i];

 		ent->mem = ioremap(ent->start, ent->size);
 		/* Warn but continue on */
 		if (!ent->mem) {
 			pr_err("Failed to map trace memory at 0x%llx\n",
 				 ent->start);
 			ret = -1;
 			continue;
 		}

 		snprintf(ent->name, 16, "%08x", ent->nid);
 		dir = debugfs_create_dir(ent->name, memtrace_debugfs_dir);
 		if (!dir)
 			return -1;

 		ent->dir = dir;
 		debugfs_create_file("trace", 0400, dir, ent, &memtrace_fops);
 		debugfs_create_x64("start", 0400, dir, &ent->start);
 		debugfs_create_x64("size", 0400, dir, &ent->size);
 	}

 	return ret;
 }

 static int memtrace_enable_set(void *data, u64 val)
 {
 	if (memtrace_size)
 		return -EINVAL;

 	if (!val)
 		return -EINVAL;

 	/* Make sure size is aligned to a memory block */
 	if (val & (memory_block_size_bytes() - 1))
 		return -EINVAL;

 	if (memtrace_init_regions_runtime(val))
 		return -EINVAL;

 	if (memtrace_init_debugfs())
 		return -EINVAL;

 	memtrace_size = val;

 	return 0;
 }

 static int memtrace_enable_get(void *data, u64 *val)
 {
 	*val = memtrace_size;
 	return 0;
 }

 DEFINE_SIMPLE_ATTRIBUTE(memtrace_init_fops, memtrace_enable_get,
 					memtrace_enable_set, "0x%016llx\n");

 static int memtrace_init(void)
 {
 	memtrace_debugfs_dir = debugfs_create_dir("memtrace",
 						  powerpc_debugfs_root);
 	if (!memtrace_debugfs_dir)
 		return -1;

 	debugfs_create_file("enable", 0600, memtrace_debugfs_dir,
 			    NULL, &memtrace_init_fops);

 	return 0;
 }
 machine_device_initcall(powernv, memtrace_init);
	/*
	* Copyright (C) IBM Corporation, 2014, 2017
	* Anton Blanchard, Rashmica Gupta.
	*
	* This program is free software; you can redistribute it and/or modify
	* it under the terms of the GNU General Public License as published by
	* the Free Software Foundation; either version 2 of the License, or
	* (at your option) any later version.
	*/

	#define pr_fmt(fmt) "memtrace: " fmt

	#include <linux/bitops.h>
	#include <linux/string.h>
	#include <linux/memblock.h>
	#include <linux/init.h>
	#include <linux/moduleparam.h>
	#include <linux/fs.h>
	#include <linux/debugfs.h>
	#include <linux/slab.h>
	#include <linux/memory.h>
	#include <linux/memory_hotplug.h>
	#include <asm/machdep.h>
	#include <asm/debugfs.h>

	/* This enables us to keep track of the memory removed from each node. */
	struct memtrace_entry {
	void *mem;
	u64 start;
	u64 size;
	u32 nid;
	struct dentry *dir;
	char name[16];
	};

	static u64 memtrace_size;

	static struct memtrace_entry *memtrace_array;
	static unsigned int memtrace_array_nr;


	static ssize_t memtrace_read(struct file filp, char __user ubuf,
	size_t count, loff_t *ppos)
	{
	struct memtrace_entry *ent = filp->private_data;

	return simple_read_from_buffer(ubuf, count, ppos, ent->mem, ent->size);
	}

	static bool valid_memtrace_range(struct memtrace_entry *dev,
	unsigned long start, unsigned long size)
	{
	if ((start >= dev->start) &&
	((start + size) <= (dev->start + dev->size)))
	return true;

	return false;
	}

	static int memtrace_mmap(struct file filp, struct vm_area_struct vma)
	{
	unsigned long size = vma->vm_end - vma->vm_start;
	struct memtrace_entry *dev = filp->private_data;

	if (!valid_memtrace_range(dev, vma->vm_pgoff << PAGE_SHIFT, size))
	return -EINVAL;

	vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);

	if (remap_pfn_range(vma, vma->vm_start,
	vma->vm_pgoff + (dev->start >> PAGE_SHIFT),
	size, vma->vm_page_prot))
	return -EAGAIN;

	return 0;
	}

	static const struct file_operations memtrace_fops = {
	.llseek = default_llseek,
	.read = memtrace_read,
	.mmap = memtrace_mmap,
	.open = simple_open,
	};

	static void flush_memory_region(u64 base, u64 size)
	{
	unsigned long line_size = ppc64_caches.l1d.size;
	u64 end = base + size;
	u64 addr;

	base = round_down(base, line_size);
	end = round_up(end, line_size);

	for (addr = base; addr < end; addr += line_size)
	asm volatile("dcbf 0,%0" : "=r" (addr) :: "memory");
	}

	static int check_memblock_online(struct memory_block mem, void arg)
	{
	if (mem->state != MEM_ONLINE)
	return -1;

	return 0;
	}

	static int change_memblock_state(struct memory_block mem, void arg)
	{
	unsigned long state = (unsigned long)arg;

	mem->state = state;

	return 0;
	}

	static bool memtrace_offline_pages(u32 nid, u64 start_pfn, u64 nr_pages)
	{
	u64 end_pfn = start_pfn + nr_pages - 1;

	if (walk_memory_range(start_pfn, end_pfn, NULL,
	check_memblock_online))
	return false;

	walk_memory_range(start_pfn, end_pfn, (void *)MEM_GOING_OFFLINE,
	change_memblock_state);

	if (offline_pages(start_pfn, nr_pages)) {
	walk_memory_range(start_pfn, end_pfn, (void *)MEM_ONLINE,
	change_memblock_state);
	return false;
	}

	walk_memory_range(start_pfn, end_pfn, (void *)MEM_OFFLINE,
	change_memblock_state);

	/* RCU grace period? */
	flush_memory_region((u64)__va(start_pfn << PAGE_SHIFT),
	nr_pages << PAGE_SHIFT);

	lock_device_hotplug();
	remove_memory(nid, start_pfn << PAGE_SHIFT, nr_pages << PAGE_SHIFT);
	unlock_device_hotplug();

	return true;
	}

	static u64 memtrace_alloc_node(u32 nid, u64 size)
	{
	u64 start_pfn, end_pfn, nr_pages;
	u64 base_pfn;

	if (!NODE_DATA(nid) \|\| !node_spanned_pages(nid))
	return 0;

	start_pfn = node_start_pfn(nid);
	end_pfn = node_end_pfn(nid);
	nr_pages = size >> PAGE_SHIFT;

	/* Trace memory needs to be aligned to the size */
	end_pfn = round_down(end_pfn - nr_pages, nr_pages);

	for (base_pfn = end_pfn; base_pfn > start_pfn; base_pfn -= nr_pages) {
	if (memtrace_offline_pages(nid, base_pfn, nr_pages) == true)
	return base_pfn << PAGE_SHIFT;
	}

	return 0;
	}

	static int memtrace_init_regions_runtime(u64 size)
	{
	u32 nid;
	u64 m;

	memtrace_array = kcalloc(num_online_nodes(),
	sizeof(struct memtrace_entry), GFP_KERNEL);
	if (!memtrace_array) {
	pr_err("Failed to allocate memtrace_array\n");
	return -EINVAL;
	}

	for_each_online_node(nid) {
	m = memtrace_alloc_node(nid, size);

	/*
	* A node might not have any local memory, so warn but
	* continue on.
	*/
	if (!m) {
	pr_err("Failed to allocate trace memory on node %d\n", nid);
	continue;
	}

	pr_info("Allocated trace memory on node %d at 0x%016llx\n", nid, m);

	memtrace_array[memtrace_array_nr].start = m;
	memtrace_array[memtrace_array_nr].size = size;
	memtrace_array[memtrace_array_nr].nid = nid;
	memtrace_array_nr++;
	}

	return 0;
	}

	static struct dentry *memtrace_debugfs_dir;

	static int memtrace_init_debugfs(void)
	{
	int ret = 0;
	int i;

	for (i = 0; i < memtrace_array_nr; i++) {
	struct dentry *dir;
	struct memtrace_entry *ent = &memtrace_array[i];

	ent->mem = ioremap(ent->start, ent->size);
	/* Warn but continue on */
	if (!ent->mem) {
	pr_err("Failed to map trace memory at 0x%llx\n",
	ent->start);
	ret = -1;
	continue;
	}

	snprintf(ent->name, 16, "%08x", ent->nid);
	dir = debugfs_create_dir(ent->name, memtrace_debugfs_dir);
	if (!dir)
	return -1;

	ent->dir = dir;
	debugfs_create_file("trace", 0400, dir, ent, &memtrace_fops);
	debugfs_create_x64("start", 0400, dir, &ent->start);
	debugfs_create_x64("size", 0400, dir, &ent->size);
	}

	return ret;
	}

	static int memtrace_enable_set(void *data, u64 val)
	{
	if (memtrace_size)
	return -EINVAL;

	if (!val)
	return -EINVAL;

	/* Make sure size is aligned to a memory block */
	if (val & (memory_block_size_bytes() - 1))
	return -EINVAL;

	if (memtrace_init_regions_runtime(val))
	return -EINVAL;

	if (memtrace_init_debugfs())
	return -EINVAL;

	memtrace_size = val;

	return 0;
	}

	static int memtrace_enable_get(void data, u64 val)
	{
	*val = memtrace_size;
	return 0;
	}

	DEFINE_SIMPLE_ATTRIBUTE(memtrace_init_fops, memtrace_enable_get,
	memtrace_enable_set, "0x%016llx\n");

	static int memtrace_init(void)
	{
	memtrace_debugfs_dir = debugfs_create_dir("memtrace",
	powerpc_debugfs_root);
	if (!memtrace_debugfs_dir)
	return -1;

	debugfs_create_file("enable", 0600, memtrace_debugfs_dir,
	NULL, &memtrace_init_fops);

	return 0;
	}
	machine_device_initcall(powernv, memtrace_init);