10caa8cdfSGreg Kroah-Hartman // SPDX-License-Identifier: GPL-2.0
21da177e4SLinus Torvalds /*
31da177e4SLinus Torvalds  * Data gathering module for Linux-VM Monitor Stream, Stage 1.
41da177e4SLinus Torvalds  * Collects data related to memory management.
51da177e4SLinus Torvalds  *
6a53c8fabSHeiko Carstens  * Copyright IBM Corp. 2003, 2006
71da177e4SLinus Torvalds  *
85b5dd21aSGerald Schaefer  * Author: Gerald Schaefer <gerald.schaefer@de.ibm.com>
91da177e4SLinus Torvalds  */
101da177e4SLinus Torvalds 
111da177e4SLinus Torvalds #include <linux/module.h>
121da177e4SLinus Torvalds #include <linux/init.h>
131da177e4SLinus Torvalds #include <linux/errno.h>
141da177e4SLinus Torvalds #include <linux/kernel_stat.h>
151da177e4SLinus Torvalds #include <linux/pagemap.h>
161da177e4SLinus Torvalds #include <linux/swap.h>
17f1a85820SJeff Mahoney #include <linux/slab.h>
18*b378a982SHeiko Carstens #include <linux/io.h>
191da177e4SLinus Torvalds 
201da177e4SLinus Torvalds #include "appldata.h"
211da177e4SLinus Torvalds 
221da177e4SLinus Torvalds 
231da177e4SLinus Torvalds #define P2K(x) ((x) << (PAGE_SHIFT - 10))	/* Converts #Pages to KB */
241da177e4SLinus Torvalds 
251da177e4SLinus Torvalds /*
261da177e4SLinus Torvalds  * Memory data
271da177e4SLinus Torvalds  *
281da177e4SLinus Torvalds  * This is accessed as binary data by z/VM. If changes to it can't be avoided,
291da177e4SLinus Torvalds  * the structure version (product ID, see appldata_base.c) needs to be changed
301da177e4SLinus Torvalds  * as well and all documentation and z/VM applications using it must be
311da177e4SLinus Torvalds  * updated.
321da177e4SLinus Torvalds  */
33a94f0fb1SSebastian Ott struct appldata_mem_data {
341da177e4SLinus Torvalds 	u64 timestamp;
351da177e4SLinus Torvalds 	u32 sync_count_1;       /* after VM collected the record data, */
361da177e4SLinus Torvalds 	u32 sync_count_2;	/* sync_count_1 and sync_count_2 should be the
371da177e4SLinus Torvalds 				   same. If not, the record has been updated on
381da177e4SLinus Torvalds 				   the Linux side while VM was collecting the
391da177e4SLinus Torvalds 				   (possibly corrupt) data */
401da177e4SLinus Torvalds 
411da177e4SLinus Torvalds 	u64 pgpgin;		/* data read from disk  */
421da177e4SLinus Torvalds 	u64 pgpgout;		/* data written to disk */
431da177e4SLinus Torvalds 	u64 pswpin;		/* pages swapped in  */
441da177e4SLinus Torvalds 	u64 pswpout;		/* pages swapped out */
451da177e4SLinus Torvalds 
461da177e4SLinus Torvalds 	u64 sharedram;		/* sharedram is currently set to 0 */
471da177e4SLinus Torvalds 
481da177e4SLinus Torvalds 	u64 totalram;		/* total main memory size */
491da177e4SLinus Torvalds 	u64 freeram;		/* free main memory size  */
501da177e4SLinus Torvalds 	u64 totalhigh;		/* total high memory size */
511da177e4SLinus Torvalds 	u64 freehigh;		/* free high memory size  */
521da177e4SLinus Torvalds 
531da177e4SLinus Torvalds 	u64 bufferram;		/* memory reserved for buffers, free cache */
541da177e4SLinus Torvalds 	u64 cached;		/* size of (used) cache, w/o buffers */
551da177e4SLinus Torvalds 	u64 totalswap;		/* total swap space size */
561da177e4SLinus Torvalds 	u64 freeswap;		/* free swap space */
571da177e4SLinus Torvalds 
581da177e4SLinus Torvalds // New in 2.6 -->
591da177e4SLinus Torvalds 	u64 pgalloc;		/* page allocations */
601da177e4SLinus Torvalds 	u64 pgfault;		/* page faults (major+minor) */
611da177e4SLinus Torvalds 	u64 pgmajfault;		/* page faults (major only) */
621da177e4SLinus Torvalds // <-- New in 2.6
631da177e4SLinus Torvalds 
64a94f0fb1SSebastian Ott } __packed;
651da177e4SLinus Torvalds 
661da177e4SLinus Torvalds 
671da177e4SLinus Torvalds /*
681da177e4SLinus Torvalds  * appldata_get_mem_data()
691da177e4SLinus Torvalds  *
701da177e4SLinus Torvalds  * gather memory data
711da177e4SLinus Torvalds  */
appldata_get_mem_data(void * data)721da177e4SLinus Torvalds static void appldata_get_mem_data(void *data)
731da177e4SLinus Torvalds {
741da177e4SLinus Torvalds 	/*
751da177e4SLinus Torvalds 	 * don't put large structures on the stack, we are
76b1ad171eSGerald Schaefer 	 * serialized through the appldata_ops_mutex and can use static
771da177e4SLinus Torvalds 	 */
781da177e4SLinus Torvalds 	static struct sysinfo val;
79f8891e5eSChristoph Lameter 	unsigned long ev[NR_VM_EVENT_ITEMS];
801da177e4SLinus Torvalds 	struct appldata_mem_data *mem_data;
811da177e4SLinus Torvalds 
821da177e4SLinus Torvalds 	mem_data = data;
831da177e4SLinus Torvalds 	mem_data->sync_count_1++;
841da177e4SLinus Torvalds 
85f8891e5eSChristoph Lameter 	all_vm_events(ev);
86f8891e5eSChristoph Lameter 	mem_data->pgpgin     = ev[PGPGIN] >> 1;
87f8891e5eSChristoph Lameter 	mem_data->pgpgout    = ev[PGPGOUT] >> 1;
88f8891e5eSChristoph Lameter 	mem_data->pswpin     = ev[PSWPIN];
89f8891e5eSChristoph Lameter 	mem_data->pswpout    = ev[PSWPOUT];
90bb81e605SAl Viro 	mem_data->pgalloc    = ev[PGALLOC_NORMAL];
91bb81e605SAl Viro 	mem_data->pgalloc    += ev[PGALLOC_DMA];
92f8891e5eSChristoph Lameter 	mem_data->pgfault    = ev[PGFAULT];
93f8891e5eSChristoph Lameter 	mem_data->pgmajfault = ev[PGMAJFAULT];
941da177e4SLinus Torvalds 
951da177e4SLinus Torvalds 	si_meminfo(&val);
961da177e4SLinus Torvalds 	mem_data->sharedram = val.sharedram;
971da177e4SLinus Torvalds 	mem_data->totalram  = P2K(val.totalram);
981da177e4SLinus Torvalds 	mem_data->freeram   = P2K(val.freeram);
991da177e4SLinus Torvalds 	mem_data->totalhigh = P2K(val.totalhigh);
1001da177e4SLinus Torvalds 	mem_data->freehigh  = P2K(val.freehigh);
1011da177e4SLinus Torvalds 	mem_data->bufferram = P2K(val.bufferram);
10211fb9989SMel Gorman 	mem_data->cached    = P2K(global_node_page_state(NR_FILE_PAGES)
103347ce434SChristoph Lameter 				- val.bufferram);
1041da177e4SLinus Torvalds 
1051da177e4SLinus Torvalds 	si_swapinfo(&val);
1061da177e4SLinus Torvalds 	mem_data->totalswap = P2K(val.totalswap);
1071da177e4SLinus Torvalds 	mem_data->freeswap  = P2K(val.freeswap);
1081da177e4SLinus Torvalds 
1091aae0560SHeiko Carstens 	mem_data->timestamp = get_tod_clock();
1101da177e4SLinus Torvalds 	mem_data->sync_count_2++;
1111da177e4SLinus Torvalds }
1121da177e4SLinus Torvalds 
1131da177e4SLinus Torvalds 
1141da177e4SLinus Torvalds static struct appldata_ops ops = {
1151da177e4SLinus Torvalds 	.name      = "mem",
1161da177e4SLinus Torvalds 	.record_nr = APPLDATA_RECORD_MEM_ID,
1171da177e4SLinus Torvalds 	.size	   = sizeof(struct appldata_mem_data),
1181da177e4SLinus Torvalds 	.callback  = &appldata_get_mem_data,
1191da177e4SLinus Torvalds 	.owner     = THIS_MODULE,
1205b5dd21aSGerald Schaefer 	.mod_lvl   = {0xF0, 0xF0},		/* EBCDIC "00" */
1211da177e4SLinus Torvalds };
1221da177e4SLinus Torvalds 
1231da177e4SLinus Torvalds 
1241da177e4SLinus Torvalds /*
1251da177e4SLinus Torvalds  * appldata_mem_init()
1261da177e4SLinus Torvalds  *
1271da177e4SLinus Torvalds  * init_data, register ops
1281da177e4SLinus Torvalds  */
appldata_mem_init(void)1291da177e4SLinus Torvalds static int __init appldata_mem_init(void)
1301da177e4SLinus Torvalds {
131a94f0fb1SSebastian Ott 	int ret;
132a94f0fb1SSebastian Ott 
133a94f0fb1SSebastian Ott 	ops.data = kzalloc(sizeof(struct appldata_mem_data), GFP_KERNEL);
134a94f0fb1SSebastian Ott 	if (!ops.data)
135a94f0fb1SSebastian Ott 		return -ENOMEM;
136a94f0fb1SSebastian Ott 
137a94f0fb1SSebastian Ott 	ret = appldata_register_ops(&ops);
138a94f0fb1SSebastian Ott 	if (ret)
139a94f0fb1SSebastian Ott 		kfree(ops.data);
140a94f0fb1SSebastian Ott 
141a94f0fb1SSebastian Ott 	return ret;
1421da177e4SLinus Torvalds }
1431da177e4SLinus Torvalds 
1441da177e4SLinus Torvalds /*
1451da177e4SLinus Torvalds  * appldata_mem_exit()
1461da177e4SLinus Torvalds  *
1471da177e4SLinus Torvalds  * unregister ops
1481da177e4SLinus Torvalds  */
appldata_mem_exit(void)1491da177e4SLinus Torvalds static void __exit appldata_mem_exit(void)
1501da177e4SLinus Torvalds {
1511da177e4SLinus Torvalds 	appldata_unregister_ops(&ops);
152a94f0fb1SSebastian Ott 	kfree(ops.data);
1531da177e4SLinus Torvalds }
1541da177e4SLinus Torvalds 
1551da177e4SLinus Torvalds 
1561da177e4SLinus Torvalds module_init(appldata_mem_init);
1571da177e4SLinus Torvalds module_exit(appldata_mem_exit);
1581da177e4SLinus Torvalds 
1591da177e4SLinus Torvalds MODULE_LICENSE("GPL");
1601da177e4SLinus Torvalds MODULE_AUTHOR("Gerald Schaefer");
1611da177e4SLinus Torvalds MODULE_DESCRIPTION("Linux-VM Monitor Stream, MEMORY statistics");
162