[linux-block.git] / arch / s390 / kernel / diag.c

// SPDX-License-Identifier: GPL-2.0
/*
 * Implementation of s390 diagnose codes
 *
 * Copyright IBM Corp. 2007
 * Author(s): Michael Holzheu <holzheu@de.ibm.com>
 */

#include <linux/export.h>
#include <linux/init.h>
#include <linux/cpu.h>
#include <linux/seq_file.h>
#include <linux/debugfs.h>
#include <asm/diag.h>
#include <asm/trace/diag.h>

struct diag_stat {
	unsigned int counter[NR_DIAG_STAT];
};

static DEFINE_PER_CPU(struct diag_stat, diag_stat);

struct diag_desc {
	int code;
	char *name;
};

static const struct diag_desc diag_map[NR_DIAG_STAT] = {
	[DIAG_STAT_X008] = { .code = 0x008, .name = "Console Function" },
	[DIAG_STAT_X00C] = { .code = 0x00c, .name = "Pseudo Timer" },
	[DIAG_STAT_X010] = { .code = 0x010, .name = "Release Pages" },
	[DIAG_STAT_X014] = { .code = 0x014, .name = "Spool File Services" },
	[DIAG_STAT_X044] = { .code = 0x044, .name = "Voluntary Timeslice End" },
	[DIAG_STAT_X064] = { .code = 0x064, .name = "NSS Manipulation" },
	[DIAG_STAT_X09C] = { .code = 0x09c, .name = "Relinquish Timeslice" },
	[DIAG_STAT_X0DC] = { .code = 0x0dc, .name = "Appldata Control" },
	[DIAG_STAT_X204] = { .code = 0x204, .name = "Logical-CPU Utilization" },
	[DIAG_STAT_X210] = { .code = 0x210, .name = "Device Information" },
	[DIAG_STAT_X224] = { .code = 0x224, .name = "EBCDIC-Name Table" },
	[DIAG_STAT_X250] = { .code = 0x250, .name = "Block I/O" },
	[DIAG_STAT_X258] = { .code = 0x258, .name = "Page-Reference Services" },
	[DIAG_STAT_X26C] = { .code = 0x26c, .name = "Certain System Information" },
	[DIAG_STAT_X288] = { .code = 0x288, .name = "Time Bomb" },
	[DIAG_STAT_X2C4] = { .code = 0x2c4, .name = "FTP Services" },
	[DIAG_STAT_X2FC] = { .code = 0x2fc, .name = "Guest Performance Data" },
	[DIAG_STAT_X304] = { .code = 0x304, .name = "Partition-Resource Service" },
	[DIAG_STAT_X308] = { .code = 0x308, .name = "List-Directed IPL" },
	[DIAG_STAT_X500] = { .code = 0x500, .name = "Virtio Service" },
};

static int show_diag_stat(struct seq_file *m, void *v)
{
	struct diag_stat *stat;
	unsigned long n = (unsigned long) v - 1;
	int cpu, prec, tmp;

	get_online_cpus();
	if (n == 0) {
		seq_puts(m, "         ");

		for_each_online_cpu(cpu) {
			prec = 10;
			for (tmp = 10; cpu >= tmp; tmp *= 10)
				prec--;
			seq_printf(m, "%*s%d", prec, "CPU", cpu);
		}
		seq_putc(m, '\n');
	} else if (n <= NR_DIAG_STAT) {
		seq_printf(m, "diag %03x:", diag_map[n-1].code);
		for_each_online_cpu(cpu) {
			stat = &per_cpu(diag_stat, cpu);
			seq_printf(m, " %10u", stat->counter[n-1]);
		}
		seq_printf(m, "    %s\n", diag_map[n-1].name);
	}
	put_online_cpus();
	return 0;
}

static void *show_diag_stat_start(struct seq_file *m, loff_t *pos)
{
	return *pos <= nr_cpu_ids ? (void *)((unsigned long) *pos + 1) : NULL;
}

static void *show_diag_stat_next(struct seq_file *m, void *v, loff_t *pos)
{
	++*pos;
	return show_diag_stat_start(m, pos);
}

static void show_diag_stat_stop(struct seq_file *m, void *v)
{
}

static const struct seq_operations show_diag_stat_sops = {
	.start	= show_diag_stat_start,
	.next	= show_diag_stat_next,
	.stop	= show_diag_stat_stop,
	.show	= show_diag_stat,
};

static int show_diag_stat_open(struct inode *inode, struct file *file)
{
	return seq_open(file, &show_diag_stat_sops);
}

static const struct file_operations show_diag_stat_fops = {
	.open		= show_diag_stat_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= seq_release,
};


static int __init show_diag_stat_init(void)
{
	debugfs_create_file("diag_stat", 0400, NULL, NULL,
			    &show_diag_stat_fops);
	return 0;
}

device_initcall(show_diag_stat_init);

void diag_stat_inc(enum diag_stat_enum nr)
{
	this_cpu_inc(diag_stat.counter[nr]);
	trace_s390_diagnose(diag_map[nr].code);
}
EXPORT_SYMBOL(diag_stat_inc);

void diag_stat_inc_norecursion(enum diag_stat_enum nr)
{
	this_cpu_inc(diag_stat.counter[nr]);
	trace_s390_diagnose_norecursion(diag_map[nr].code);
}
EXPORT_SYMBOL(diag_stat_inc_norecursion);

/*
 * Diagnose 14: Input spool file manipulation
 */
static inline int __diag14(unsigned long rx, unsigned long ry1,
			   unsigned long subcode)
{
	register unsigned long _ry1 asm("2") = ry1;
	register unsigned long _ry2 asm("3") = subcode;
	int rc = 0;

	asm volatile(
		"   sam31\n"
		"   diag    %2,2,0x14\n"
		"   sam64\n"
		"   ipm     %0\n"
		"   srl     %0,28\n"
		: "=d" (rc), "+d" (_ry2)
		: "d" (rx), "d" (_ry1)
		: "cc");

	return rc;
}

int diag14(unsigned long rx, unsigned long ry1, unsigned long subcode)
{
	diag_stat_inc(DIAG_STAT_X014);
	return __diag14(rx, ry1, subcode);
}
EXPORT_SYMBOL(diag14);

static inline int __diag204(unsigned long *subcode, unsigned long size, void *addr)
{
	register unsigned long _subcode asm("0") = *subcode;
	register unsigned long _size asm("1") = size;

	asm volatile(
		"	diag	%2,%0,0x204\n"
		"0:	nopr	%%r7\n"
		EX_TABLE(0b,0b)
		: "+d" (_subcode), "+d" (_size) : "d" (addr) : "memory");
	*subcode = _subcode;
	return _size;
}

int diag204(unsigned long subcode, unsigned long size, void *addr)
{
	diag_stat_inc(DIAG_STAT_X204);
	size = __diag204(&subcode, size, addr);
	if (subcode)
		return -1;
	return size;
}
EXPORT_SYMBOL(diag204);

/*
 * Diagnose 210: Get information about a virtual device
 */
int diag210(struct diag210 *addr)
{
	/*
	 * diag 210 needs its data below the 2GB border, so we
	 * use a static data area to be sure
	 */
	static struct diag210 diag210_tmp;
	static DEFINE_SPINLOCK(diag210_lock);
	unsigned long flags;
	int ccode;

	spin_lock_irqsave(&diag210_lock, flags);
	diag210_tmp = *addr;

	diag_stat_inc(DIAG_STAT_X210);
	asm volatile(
		"	lhi	%0,-1\n"
		"	sam31\n"
		"	diag	%1,0,0x210\n"
		"0:	ipm	%0\n"
		"	srl	%0,28\n"
		"1:	sam64\n"
		EX_TABLE(0b, 1b)
		: "=&d" (ccode) : "a" (&diag210_tmp) : "cc", "memory");

	*addr = diag210_tmp;
	spin_unlock_irqrestore(&diag210_lock, flags);

	return ccode;
}
EXPORT_SYMBOL(diag210);

int diag224(void *ptr)
{
	int rc = -EOPNOTSUPP;

	diag_stat_inc(DIAG_STAT_X224);
	asm volatile(
		"	diag	%1,%2,0x224\n"
		"0:	lhi	%0,0x0\n"
		"1:\n"
		EX_TABLE(0b,1b)
		: "+d" (rc) :"d" (0), "d" (ptr) : "memory");
	return rc;
}
EXPORT_SYMBOL(diag224);

/*
 * Diagnose 26C: Access Certain System Information
 */
static inline int __diag26c(void *req, void *resp, enum diag26c_sc subcode)
{
	register unsigned long _req asm("2") = (addr_t) req;
	register unsigned long _resp asm("3") = (addr_t) resp;
	register unsigned long _subcode asm("4") = subcode;
	register unsigned long _rc asm("5") = -EOPNOTSUPP;

	asm volatile(
		"	sam31\n"
		"	diag	%[rx],%[ry],0x26c\n"
		"0:	sam64\n"
		EX_TABLE(0b,0b)
		: "+d" (_rc)
		: [rx] "d" (_req), "d" (_resp), [ry] "d" (_subcode)
		: "cc", "memory");
	return _rc;
}

int diag26c(void *req, void *resp, enum diag26c_sc subcode)
{
	diag_stat_inc(DIAG_STAT_X26C);
	return __diag26c(req, resp, subcode);
}
EXPORT_SYMBOL(diag26c);
Commit	Line	Data
b2441318	1	// SPDX-License-Identifier: GPL-2.0
0a87c5cf MH	2	/*
	3	* Implementation of s390 diagnose codes
	4	*
	5	* Copyright IBM Corp. 2007
	6	* Author(s): Michael Holzheu <holzheu@de.ibm.com>
	7	*/
	8
3994a52b PG	9	#include <linux/export.h>
3994a52b PG	10	#include <linux/init.h>
1ec2772e MS	11	#include <linux/cpu.h>
	12	#include <linux/seq_file.h>
	13	#include <linux/debugfs.h>
0a87c5cf	14	#include <asm/diag.h>
b5a6b71b	15	#include <asm/trace/diag.h>
0a87c5cf	16
b5a6b71b MS	17	struct diag_stat {
	18	unsigned int counter[NR_DIAG_STAT];
	19	};
	20
	21	static DEFINE_PER_CPU(struct diag_stat, diag_stat);
1ec2772e MS	22
	23	struct diag_desc {
	24	int code;
	25	char *name;
	26	};
	27
	28	static const struct diag_desc diag_map[NR_DIAG_STAT] = {
	29	[DIAG_STAT_X008] = { .code = 0x008, .name = "Console Function" },
	30	[DIAG_STAT_X00C] = { .code = 0x00c, .name = "Pseudo Timer" },
	31	[DIAG_STAT_X010] = { .code = 0x010, .name = "Release Pages" },
	32	[DIAG_STAT_X014] = { .code = 0x014, .name = "Spool File Services" },
	33	[DIAG_STAT_X044] = { .code = 0x044, .name = "Voluntary Timeslice End" },
	34	[DIAG_STAT_X064] = { .code = 0x064, .name = "NSS Manipulation" },
	35	[DIAG_STAT_X09C] = { .code = 0x09c, .name = "Relinquish Timeslice" },
	36	[DIAG_STAT_X0DC] = { .code = 0x0dc, .name = "Appldata Control" },
	37	[DIAG_STAT_X204] = { .code = 0x204, .name = "Logical-CPU Utilization" },
	38	[DIAG_STAT_X210] = { .code = 0x210, .name = "Device Information" },
	39	[DIAG_STAT_X224] = { .code = 0x224, .name = "EBCDIC-Name Table" },
	40	[DIAG_STAT_X250] = { .code = 0x250, .name = "Block I/O" },
	41	[DIAG_STAT_X258] = { .code = 0x258, .name = "Page-Reference Services" },
1b030478	42	[DIAG_STAT_X26C] = { .code = 0x26c, .name = "Certain System Information" },
1ec2772e MS	43	[DIAG_STAT_X288] = { .code = 0x288, .name = "Time Bomb" },
	44	[DIAG_STAT_X2C4] = { .code = 0x2c4, .name = "FTP Services" },
	45	[DIAG_STAT_X2FC] = { .code = 0x2fc, .name = "Guest Performance Data" },
	46	[DIAG_STAT_X304] = { .code = 0x304, .name = "Partition-Resource Service" },
	47	[DIAG_STAT_X308] = { .code = 0x308, .name = "List-Directed IPL" },
	48	[DIAG_STAT_X500] = { .code = 0x500, .name = "Virtio Service" },
	49	};
	50
	51	static int show_diag_stat(struct seq_file m, void v)
	52	{
	53	struct diag_stat *stat;
	54	unsigned long n = (unsigned long) v - 1;
	55	int cpu, prec, tmp;
	56
	57	get_online_cpus();
	58	if (n == 0) {
	59	seq_puts(m, " ");
	60
	61	for_each_online_cpu(cpu) {
	62	prec = 10;
	63	for (tmp = 10; cpu >= tmp; tmp *= 10)
	64	prec--;
	65	seq_printf(m, "%*s%d", prec, "CPU", cpu);
	66	}
	67	seq_putc(m, '\n');
	68	} else if (n <= NR_DIAG_STAT) {
	69	seq_printf(m, "diag %03x:", diag_map[n-1].code);
	70	for_each_online_cpu(cpu) {
	71	stat = &per_cpu(diag_stat, cpu);
	72	seq_printf(m, " %10u", stat->counter[n-1]);
	73	}
	74	seq_printf(m, " %s\n", diag_map[n-1].name);
	75	}
	76	put_online_cpus();
	77	return 0;
	78	}
	79
	80	static void show_diag_stat_start(struct seq_file m, loff_t *pos)
	81	{
	82	return pos <= nr_cpu_ids ? (void )((unsigned long) *pos + 1) : NULL;
	83	}
	84
	85	static void show_diag_stat_next(struct seq_file m, void v, loff_t pos)
	86	{
	87	++*pos;
	88	return show_diag_stat_start(m, pos);
	89	}
	90
	91	static void show_diag_stat_stop(struct seq_file m, void v)
	92	{
	93	}
	94
	95	static const struct seq_operations show_diag_stat_sops = {
	96	.start = show_diag_stat_start,
	97	.next = show_diag_stat_next,
	98	.stop = show_diag_stat_stop,
	99	.show = show_diag_stat,
	100	};
	101
	102	static int show_diag_stat_open(struct inode inode, struct file file)
	103	{
	104	return seq_open(file, &show_diag_stat_sops);
	105	}
	106
107	static const struct file_operations show_diag_stat_fops = {
108	.open = show_diag_stat_open,
109	.read = seq_read,
110	.llseek = seq_lseek,
111	.release = seq_release,
112	};
113
114
115	static int __init show_diag_stat_init(void)
116	{
117	debugfs_create_file("diag_stat", 0400, NULL, NULL,
118	&show_diag_stat_fops);
119	return 0;
120	}
121
122	device_initcall(show_diag_stat_init);
123
b5a6b71b MS	124	void diag_stat_inc(enum diag_stat_enum nr)
	125	{
	126	this_cpu_inc(diag_stat.counter[nr]);
230ccb37	127	trace_s390_diagnose(diag_map[nr].code);
b5a6b71b MS	128	}
	129	EXPORT_SYMBOL(diag_stat_inc);
	130
	131	void diag_stat_inc_norecursion(enum diag_stat_enum nr)
	132	{
	133	this_cpu_inc(diag_stat.counter[nr]);
230ccb37	134	trace_s390_diagnose_norecursion(diag_map[nr].code);
b5a6b71b MS	135	}
	136	EXPORT_SYMBOL(diag_stat_inc_norecursion);
	137
0a87c5cf MH	138	/*
	139	* Diagnose 14: Input spool file manipulation
	140	*/
1ec2772e MS	141	static inline int __diag14(unsigned long rx, unsigned long ry1,
1ec2772e MS	142	unsigned long subcode)
0a87c5cf MH	143	{
	144	register unsigned long _ry1 asm("2") = ry1;
	145	register unsigned long _ry2 asm("3") = subcode;
	146	int rc = 0;
	147
	148	asm volatile(
0a87c5cf MH	149	" sam31\n"
	150	" diag %2,2,0x14\n"
	151	" sam64\n"
0a87c5cf MH	152	" ipm %0\n"
	153	" srl %0,28\n"
	154	: "=d" (rc), "+d" (_ry2)
	155	: "d" (rx), "d" (_ry1)
	156	: "cc");
	157
	158	return rc;
	159	}
1ec2772e MS	160
	161	int diag14(unsigned long rx, unsigned long ry1, unsigned long subcode)
	162	{
	163	diag_stat_inc(DIAG_STAT_X014);
	164	return __diag14(rx, ry1, subcode);
	165	}
0a87c5cf MH	166	EXPORT_SYMBOL(diag14);
0a87c5cf MH	167
221bb8a4	168	static inline int __diag204(unsigned long subcode, unsigned long size, void addr)
e65f30e0	169	{
221bb8a4	170	register unsigned long _subcode asm("0") = *subcode;
e65f30e0 JF	171	register unsigned long _size asm("1") = size;
	172
	173	asm volatile(
	174	" diag %2,%0,0x204\n"
221bb8a4	175	"0: nopr %%r7\n"
e65f30e0 JF	176	EX_TABLE(0b,0b)
e65f30e0 JF	177	: "+d" (_subcode), "+d" (_size) : "d" (addr) : "memory");
221bb8a4	178	*subcode = _subcode;
e65f30e0 JF	179	return _size;
	180	}
	181
	182	int diag204(unsigned long subcode, unsigned long size, void *addr)
	183	{
	184	diag_stat_inc(DIAG_STAT_X204);
221bb8a4 LT	185	size = __diag204(&subcode, size, addr);
	186	if (subcode)
	187	return -1;
	188	return size;
e65f30e0 JF	189	}
	190	EXPORT_SYMBOL(diag204);
	191
0a87c5cf MH	192	/*
	193	* Diagnose 210: Get information about a virtual device
	194	*/
	195	int diag210(struct diag210 *addr)
	196	{
	197	/*
	198	* diag 210 needs its data below the 2GB border, so we
	199	* use a static data area to be sure
	200	*/
	201	static struct diag210 diag210_tmp;
	202	static DEFINE_SPINLOCK(diag210_lock);
	203	unsigned long flags;
	204	int ccode;
	205
	206	spin_lock_irqsave(&diag210_lock, flags);
	207	diag210_tmp = *addr;
	208
1ec2772e	209	diag_stat_inc(DIAG_STAT_X210);
0a87c5cf MH	210	asm volatile(
	211	" lhi %0,-1\n"
	212	" sam31\n"
	213	" diag %1,0,0x210\n"
	214	"0: ipm %0\n"
	215	" srl %0,28\n"
	216	"1: sam64\n"
	217	EX_TABLE(0b, 1b)
	218	: "=&d" (ccode) : "a" (&diag210_tmp) : "cc", "memory");
0a87c5cf MH	219
	220	*addr = diag210_tmp;
	221	spin_unlock_irqrestore(&diag210_lock, flags);
	222
	223	return ccode;
	224	}
	225	EXPORT_SYMBOL(diag210);
022bd2d1 JF	226
	227	int diag224(void *ptr)
	228	{
	229	int rc = -EOPNOTSUPP;
	230
	231	diag_stat_inc(DIAG_STAT_X224);
	232	asm volatile(
	233	" diag %1,%2,0x224\n"
	234	"0: lhi %0,0x0\n"
	235	"1:\n"
	236	EX_TABLE(0b,1b)
	237	: "+d" (rc) :"d" (0), "d" (ptr) : "memory");
	238	return rc;
	239	}
	240	EXPORT_SYMBOL(diag224);
1b030478 JW	241
	242	/*
	243	* Diagnose 26C: Access Certain System Information
	244	*/
	245	static inline int __diag26c(void req, void resp, enum diag26c_sc subcode)
	246	{
	247	register unsigned long _req asm("2") = (addr_t) req;
	248	register unsigned long _resp asm("3") = (addr_t) resp;
	249	register unsigned long _subcode asm("4") = subcode;
	250	register unsigned long _rc asm("5") = -EOPNOTSUPP;
	251
	252	asm volatile(
	253	" sam31\n"
	254	" diag %[rx],%[ry],0x26c\n"
	255	"0: sam64\n"
	256	EX_TABLE(0b,0b)
	257	: "+d" (_rc)
	258	: [rx] "d" (_req), "d" (_resp), [ry] "d" (_subcode)
	259	: "cc", "memory");
	260	return _rc;
	261	}
	262
	263	int diag26c(void req, void resp, enum diag26c_sc subcode)
	264	{
	265	diag_stat_inc(DIAG_STAT_X26C);
	266	return __diag26c(req, resp, subcode);
	267	}
	268	EXPORT_SYMBOL(diag26c);