[linux-2.6-block.git] / drivers / s390 / char / sclp_early.c

/*
 * SCLP early driver
 *
 * Copyright IBM Corp. 2013
 */

#define KMSG_COMPONENT "sclp_early"
#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt

#include <asm/ctl_reg.h>
#include <asm/sclp.h>
#include <asm/ipl.h>
#include "sclp_sdias.h"
#include "sclp.h"

#define SCLP_CMDW_READ_SCP_INFO		0x00020001
#define SCLP_CMDW_READ_SCP_INFO_FORCED	0x00120001

struct read_info_sccb {
	struct	sccb_header header;	/* 0-7 */
	u16	rnmax;			/* 8-9 */
	u8	rnsize;			/* 10 */
	u8	_reserved0[16 - 11];	/* 11-15 */
	u16	ncpurl;			/* 16-17 */
	u16	cpuoff;			/* 18-19 */
	u8	_reserved7[24 - 20];	/* 20-23 */
	u8	loadparm[8];		/* 24-31 */
	u8	_reserved1[48 - 32];	/* 32-47 */
	u64	facilities;		/* 48-55 */
	u8	_reserved2a[76 - 56];	/* 56-75 */
	u32	ibc;			/* 76-79 */
	u8	_reserved2b[84 - 80];	/* 80-83 */
	u8	fac84;			/* 84 */
	u8	fac85;			/* 85 */
	u8	_reserved3[91 - 86];	/* 86-90 */
	u8	flags;			/* 91 */
	u8	_reserved4[100 - 92];	/* 92-99 */
	u32	rnsize2;		/* 100-103 */
	u64	rnmax2;			/* 104-111 */
	u8	_reserved5[120 - 112];	/* 112-119 */
	u16	hcpua;			/* 120-121 */
	u8	_reserved6[4096 - 122];	/* 122-4095 */
} __packed __aligned(PAGE_SIZE);

static char sccb_early[PAGE_SIZE] __aligned(PAGE_SIZE) __initdata;
static unsigned int sclp_con_has_vt220 __initdata;
static unsigned int sclp_con_has_linemode __initdata;
static unsigned long sclp_hsa_size;
static unsigned int sclp_max_cpu;
static struct sclp_ipl_info sclp_ipl_info;
static unsigned char sclp_siif;
static u32 sclp_ibc;

u64 sclp_facilities;
u8 sclp_fac84;
unsigned long long sclp_rzm;
unsigned long long sclp_rnmax;

static int __init sclp_cmd_sync_early(sclp_cmdw_t cmd, void *sccb)
{
	int rc;

	__ctl_set_bit(0, 9);
	rc = sclp_service_call(cmd, sccb);
	if (rc)
		goto out;
	__load_psw_mask(PSW_DEFAULT_KEY | PSW_MASK_BASE | PSW_MASK_EA |
			PSW_MASK_BA | PSW_MASK_EXT | PSW_MASK_WAIT);
	local_irq_disable();
out:
	/* Contents of the sccb might have changed. */
	barrier();
	__ctl_clear_bit(0, 9);
	return rc;
}

static int __init sclp_read_info_early(struct read_info_sccb *sccb)
{
	int rc, i;
	sclp_cmdw_t commands[] = {SCLP_CMDW_READ_SCP_INFO_FORCED,
				  SCLP_CMDW_READ_SCP_INFO};

	for (i = 0; i < ARRAY_SIZE(commands); i++) {
		do {
			memset(sccb, 0, sizeof(*sccb));
			sccb->header.length = sizeof(*sccb);
			sccb->header.function_code = 0x80;
			sccb->header.control_mask[2] = 0x80;
			rc = sclp_cmd_sync_early(commands[i], sccb);
		} while (rc == -EBUSY);

		if (rc)
			break;
		if (sccb->header.response_code == 0x10)
			return 0;
		if (sccb->header.response_code != 0x1f0)
			break;
	}
	return -EIO;
}

static void __init sclp_facilities_detect(struct read_info_sccb *sccb)
{
	struct sclp_cpu_entry *cpue;
	u16 boot_cpu_address, cpu;

	if (sclp_read_info_early(sccb))
		return;

	sclp_facilities = sccb->facilities;
	sclp_fac84 = sccb->fac84;
	if (sccb->fac85 & 0x02)
		S390_lowcore.machine_flags |= MACHINE_FLAG_ESOP;
	sclp_rnmax = sccb->rnmax ? sccb->rnmax : sccb->rnmax2;
	sclp_rzm = sccb->rnsize ? sccb->rnsize : sccb->rnsize2;
	sclp_rzm <<= 20;
	sclp_ibc = sccb->ibc;

	if (!sccb->hcpua) {
		if (MACHINE_IS_VM)
			sclp_max_cpu = 64;
		else
			sclp_max_cpu = sccb->ncpurl;
	} else {
		sclp_max_cpu = sccb->hcpua + 1;
	}

	boot_cpu_address = stap();
	cpue = (void *)sccb + sccb->cpuoff;
	for (cpu = 0; cpu < sccb->ncpurl; cpue++, cpu++) {
		if (boot_cpu_address != cpue->address)
			continue;
		sclp_siif = cpue->siif;
		break;
	}

	/* Save IPL information */
	sclp_ipl_info.is_valid = 1;
	if (sccb->flags & 0x2)
		sclp_ipl_info.has_dump = 1;
	memcpy(&sclp_ipl_info.loadparm, &sccb->loadparm, LOADPARM_LEN);
}

bool __init sclp_has_linemode(void)
{
	return !!sclp_con_has_linemode;
}

bool __init sclp_has_vt220(void)
{
	return !!sclp_con_has_vt220;
}

unsigned long long sclp_get_rnmax(void)
{
	return sclp_rnmax;
}

unsigned long long sclp_get_rzm(void)
{
	return sclp_rzm;
}

unsigned int sclp_get_max_cpu(void)
{
	return sclp_max_cpu;
}

int sclp_has_siif(void)
{
	return sclp_siif;
}
EXPORT_SYMBOL(sclp_has_siif);

unsigned int sclp_get_ibc(void)
{
	return sclp_ibc;
}
EXPORT_SYMBOL(sclp_get_ibc);

/*
 * This function will be called after sclp_facilities_detect(), which gets
 * called from early.c code. The sclp_facilities_detect() function retrieves
 * and saves the IPL information.
 */
void __init sclp_get_ipl_info(struct sclp_ipl_info *info)
{
	*info = sclp_ipl_info;
}

static int __init sclp_cmd_early(sclp_cmdw_t cmd, void *sccb)
{
	int rc;

	do {
		rc = sclp_cmd_sync_early(cmd, sccb);
	} while (rc == -EBUSY);

	if (rc)
		return -EIO;
	if (((struct sccb_header *) sccb)->response_code != 0x0020)
		return -EIO;
	return 0;
}

static void __init sccb_init_eq_size(struct sdias_sccb *sccb)
{
	memset(sccb, 0, sizeof(*sccb));

	sccb->hdr.length = sizeof(*sccb);
	sccb->evbuf.hdr.length = sizeof(struct sdias_evbuf);
	sccb->evbuf.hdr.type = EVTYP_SDIAS;
	sccb->evbuf.event_qual = SDIAS_EQ_SIZE;
	sccb->evbuf.data_id = SDIAS_DI_FCP_DUMP;
	sccb->evbuf.event_id = 4712;
	sccb->evbuf.dbs = 1;
}

static int __init sclp_set_event_mask(struct init_sccb *sccb,
				      unsigned long receive_mask,
				      unsigned long send_mask)
{
	memset(sccb, 0, sizeof(*sccb));
	sccb->header.length = sizeof(*sccb);
	sccb->mask_length = sizeof(sccb_mask_t);
	sccb->receive_mask = receive_mask;
	sccb->send_mask = send_mask;
	return sclp_cmd_early(SCLP_CMDW_WRITE_EVENT_MASK, sccb);
}

static long __init sclp_hsa_size_init(struct sdias_sccb *sccb)
{
	sccb_init_eq_size(sccb);
	if (sclp_cmd_early(SCLP_CMDW_WRITE_EVENT_DATA, sccb))
		return -EIO;
	if (sccb->evbuf.blk_cnt == 0)
		return 0;
	return (sccb->evbuf.blk_cnt - 1) * PAGE_SIZE;
}

static long __init sclp_hsa_copy_wait(struct sccb_header *sccb)
{
	memset(sccb, 0, PAGE_SIZE);
	sccb->length = PAGE_SIZE;
	if (sclp_cmd_early(SCLP_CMDW_READ_EVENT_DATA, sccb))
		return -EIO;
	if (((struct sdias_sccb *) sccb)->evbuf.blk_cnt == 0)
		return 0;
	return (((struct sdias_sccb *) sccb)->evbuf.blk_cnt - 1) * PAGE_SIZE;
}

unsigned long sclp_get_hsa_size(void)
{
	return sclp_hsa_size;
}

static void __init sclp_hsa_size_detect(void *sccb)
{
	long size;

	/* First try synchronous interface (LPAR) */
	if (sclp_set_event_mask(sccb, 0, 0x40000010))
		return;
	size = sclp_hsa_size_init(sccb);
	if (size < 0)
		return;
	if (size != 0)
		goto out;
	/* Then try asynchronous interface (z/VM) */
	if (sclp_set_event_mask(sccb, 0x00000010, 0x40000010))
		return;
	size = sclp_hsa_size_init(sccb);
	if (size < 0)
		return;
	size = sclp_hsa_copy_wait(sccb);
	if (size < 0)
		return;
out:
	sclp_hsa_size = size;
}

static unsigned int __init sclp_con_check_linemode(struct init_sccb *sccb)
{
	if (!(sccb->sclp_send_mask & EVTYP_OPCMD_MASK))
		return 0;
	if (!(sccb->sclp_receive_mask & (EVTYP_MSG_MASK | EVTYP_PMSGCMD_MASK)))
		return 0;
	return 1;
}

static void __init sclp_console_detect(struct init_sccb *sccb)
{
	if (sccb->header.response_code != 0x20)
		return;

	if (sccb->sclp_send_mask & EVTYP_VT220MSG_MASK)
		sclp_con_has_vt220 = 1;

	if (sclp_con_check_linemode(sccb))
		sclp_con_has_linemode = 1;
}

void __init sclp_early_detect(void)
{
	void *sccb = &sccb_early;

	sclp_facilities_detect(sccb);
	sclp_hsa_size_detect(sccb);

	/* Turn off SCLP event notifications.  Also save remote masks in the
	 * sccb.  These are sufficient to detect sclp console capabilities.
	 */
	sclp_set_event_mask(sccb, 0, 0);
	sclp_console_detect(sccb);
}
Commit	Line	Data
e657d8fe MH	1	/*
	2	* SCLP early driver
	3	*
	4	* Copyright IBM Corp. 2013
	5	*/
	6
	7	#define KMSG_COMPONENT "sclp_early"
	8	#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
	9
acf6a004	10	#include <asm/ctl_reg.h>
e657d8fe MH	11	#include <asm/sclp.h>
	12	#include <asm/ipl.h>
	13	#include "sclp_sdias.h"
	14	#include "sclp.h"
	15
acf6a004 MH	16	#define SCLP_CMDW_READ_SCP_INFO 0x00020001
	17	#define SCLP_CMDW_READ_SCP_INFO_FORCED 0x00120001
	18
	19	struct read_info_sccb {
	20	struct sccb_header header; /* 0-7 */
	21	u16 rnmax; /* 8-9 */
	22	u8 rnsize; /* 10 */
cf813db0 HC	23	u8 _reserved0[16 - 11]; /* 11-15 */
cf813db0 HC	24	u16 ncpurl; /* 16-17 */
217a4406 HC	25	u16 cpuoff; /* 18-19 */
217a4406 HC	26	u8 _reserved7[24 - 20]; /* 20-23 */
acf6a004 MH	27	u8 loadparm[8]; /* 24-31 */
	28	u8 _reserved1[48 - 32]; /* 32-47 */
	29	u64 facilities; /* 48-55 */
570126d3 MM	30	u8 _reserved2a[76 - 56]; /* 56-75 */
	31	u32 ibc; /* 76-79 */
	32	u8 _reserved2b[84 - 80]; /* 80-83 */
acf6a004 MH	33	u8 fac84; /* 84 */
	34	u8 fac85; /* 85 */
	35	u8 _reserved3[91 - 86]; /* 86-90 */
	36	u8 flags; /* 91 */
	37	u8 _reserved4[100 - 92]; /* 92-99 */
	38	u32 rnsize2; /* 100-103 */
	39	u64 rnmax2; /* 104-111 */
cf813db0 HC	40	u8 _reserved5[120 - 112]; /* 112-119 */
	41	u16 hcpua; /* 120-121 */
	42	u8 _reserved6[4096 - 122]; /* 122-4095 */
acf6a004 MH	43	} __packed __aligned(PAGE_SIZE);
acf6a004 MH	44
56e57a84	45	static char sccb_early[PAGE_SIZE] __aligned(PAGE_SIZE) __initdata;
52733e01 HB	46	static unsigned int sclp_con_has_vt220 __initdata;
52733e01 HB	47	static unsigned int sclp_con_has_linemode __initdata;
e657d8fe	48	static unsigned long sclp_hsa_size;
cf813db0	49	static unsigned int sclp_max_cpu;
333cce91	50	static struct sclp_ipl_info sclp_ipl_info;
217a4406	51	static unsigned char sclp_siif;
570126d3	52	static u32 sclp_ibc;
e657d8fe	53
acf6a004 MH	54	u64 sclp_facilities;
	55	u8 sclp_fac84;
	56	unsigned long long sclp_rzm;
	57	unsigned long long sclp_rnmax;
	58
	59	static int __init sclp_cmd_sync_early(sclp_cmdw_t cmd, void *sccb)
	60	{
	61	int rc;
	62
	63	__ctl_set_bit(0, 9);
	64	rc = sclp_service_call(cmd, sccb);
	65	if (rc)
	66	goto out;
	67	__load_psw_mask(PSW_DEFAULT_KEY \| PSW_MASK_BASE \| PSW_MASK_EA \|
	68	PSW_MASK_BA \| PSW_MASK_EXT \| PSW_MASK_WAIT);
	69	local_irq_disable();
	70	out:
	71	/* Contents of the sccb might have changed. */
	72	barrier();
	73	__ctl_clear_bit(0, 9);
	74	return rc;
	75	}
	76
56e57a84	77	static int __init sclp_read_info_early(struct read_info_sccb *sccb)
acf6a004	78	{
333cce91	79	int rc, i;
acf6a004 MH	80	sclp_cmdw_t commands[] = {SCLP_CMDW_READ_SCP_INFO_FORCED,
	81	SCLP_CMDW_READ_SCP_INFO};
	82
acf6a004 MH	83	for (i = 0; i < ARRAY_SIZE(commands); i++) {
	84	do {
	85	memset(sccb, 0, sizeof(*sccb));
	86	sccb->header.length = sizeof(*sccb);
	87	sccb->header.function_code = 0x80;
	88	sccb->header.control_mask[2] = 0x80;
	89	rc = sclp_cmd_sync_early(commands[i], sccb);
	90	} while (rc == -EBUSY);
	91
	92	if (rc)
	93	break;
333cce91 HB	94	if (sccb->header.response_code == 0x10)
333cce91 HB	95	return 0;
acf6a004 MH	96	if (sccb->header.response_code != 0x1f0)
	97	break;
	98	}
333cce91	99	return -EIO;
acf6a004 MH	100	}
acf6a004 MH	101
5d5de1a0	102	static void __init sclp_facilities_detect(struct read_info_sccb *sccb)
acf6a004	103	{
217a4406 HC	104	struct sclp_cpu_entry *cpue;
	105	u16 boot_cpu_address, cpu;
	106
56e57a84	107	if (sclp_read_info_early(sccb))
acf6a004 MH	108	return;
acf6a004 MH	109
acf6a004 MH	110	sclp_facilities = sccb->facilities;
	111	sclp_fac84 = sccb->fac84;
	112	if (sccb->fac85 & 0x02)
	113	S390_lowcore.machine_flags \|= MACHINE_FLAG_ESOP;
	114	sclp_rnmax = sccb->rnmax ? sccb->rnmax : sccb->rnmax2;
	115	sclp_rzm = sccb->rnsize ? sccb->rnsize : sccb->rnsize2;
	116	sclp_rzm <<= 20;
570126d3	117	sclp_ibc = sccb->ibc;
333cce91	118
cf813db0 HC	119	if (!sccb->hcpua) {
	120	if (MACHINE_IS_VM)
	121	sclp_max_cpu = 64;
	122	else
	123	sclp_max_cpu = sccb->ncpurl;
	124	} else {
	125	sclp_max_cpu = sccb->hcpua + 1;
	126	}
	127
217a4406 HC	128	boot_cpu_address = stap();
	129	cpue = (void *)sccb + sccb->cpuoff;
	130	for (cpu = 0; cpu < sccb->ncpurl; cpue++, cpu++) {
	131	if (boot_cpu_address != cpue->address)
	132	continue;
	133	sclp_siif = cpue->siif;
	134	break;
	135	}
	136
333cce91 HB	137	/* Save IPL information */
	138	sclp_ipl_info.is_valid = 1;
	139	if (sccb->flags & 0x2)
	140	sclp_ipl_info.has_dump = 1;
	141	memcpy(&sclp_ipl_info.loadparm, &sccb->loadparm, LOADPARM_LEN);
acf6a004 MH	142	}
	143
	144	bool __init sclp_has_linemode(void)
	145	{
52733e01	146	return !!sclp_con_has_linemode;
acf6a004 MH	147	}
	148
	149	bool __init sclp_has_vt220(void)
	150	{
52733e01	151	return !!sclp_con_has_vt220;
acf6a004 MH	152	}
	153
	154	unsigned long long sclp_get_rnmax(void)
	155	{
	156	return sclp_rnmax;
	157	}
	158
	159	unsigned long long sclp_get_rzm(void)
	160	{
	161	return sclp_rzm;
	162	}
	163
cf813db0 HC	164	unsigned int sclp_get_max_cpu(void)
	165	{
	166	return sclp_max_cpu;
	167	}
	168
217a4406 HC	169	int sclp_has_siif(void)
	170	{
	171	return sclp_siif;
	172	}
	173	EXPORT_SYMBOL(sclp_has_siif);
	174
570126d3 MM	175	unsigned int sclp_get_ibc(void)
	176	{
	177	return sclp_ibc;
	178	}
	179	EXPORT_SYMBOL(sclp_get_ibc);
	180
acf6a004 MH	181	/*
acf6a004 MH	182	* This function will be called after sclp_facilities_detect(), which gets
333cce91 HB	183	* called from early.c code. The sclp_facilities_detect() function retrieves
333cce91 HB	184	* and saves the IPL information.
acf6a004 MH	185	*/
	186	void __init sclp_get_ipl_info(struct sclp_ipl_info *info)
	187	{
333cce91	188	*info = sclp_ipl_info;
acf6a004 MH	189	}
acf6a004 MH	190
e657d8fe MH	191	static int __init sclp_cmd_early(sclp_cmdw_t cmd, void *sccb)
	192	{
	193	int rc;
	194
	195	do {
	196	rc = sclp_cmd_sync_early(cmd, sccb);
	197	} while (rc == -EBUSY);
	198
	199	if (rc)
	200	return -EIO;
	201	if (((struct sccb_header *) sccb)->response_code != 0x0020)
	202	return -EIO;
	203	return 0;
	204	}
	205
	206	static void __init sccb_init_eq_size(struct sdias_sccb *sccb)
	207	{
	208	memset(sccb, 0, sizeof(*sccb));
	209
	210	sccb->hdr.length = sizeof(*sccb);
	211	sccb->evbuf.hdr.length = sizeof(struct sdias_evbuf);
	212	sccb->evbuf.hdr.type = EVTYP_SDIAS;
	213	sccb->evbuf.event_qual = SDIAS_EQ_SIZE;
	214	sccb->evbuf.data_id = SDIAS_DI_FCP_DUMP;
	215	sccb->evbuf.event_id = 4712;
	216	sccb->evbuf.dbs = 1;
	217	}
	218
5d5de1a0 HB	219	static int __init sclp_set_event_mask(struct init_sccb *sccb,
5d5de1a0 HB	220	unsigned long receive_mask,
e657d8fe MH	221	unsigned long send_mask)
e657d8fe MH	222	{
e657d8fe MH	223	memset(sccb, 0, sizeof(*sccb));
	224	sccb->header.length = sizeof(*sccb);
	225	sccb->mask_length = sizeof(sccb_mask_t);
	226	sccb->receive_mask = receive_mask;
	227	sccb->send_mask = send_mask;
	228	return sclp_cmd_early(SCLP_CMDW_WRITE_EVENT_MASK, sccb);
	229	}
	230
5d5de1a0	231	static long __init sclp_hsa_size_init(struct sdias_sccb *sccb)
e657d8fe	232	{
e657d8fe MH	233	sccb_init_eq_size(sccb);
	234	if (sclp_cmd_early(SCLP_CMDW_WRITE_EVENT_DATA, sccb))
	235	return -EIO;
9499934f MH	236	if (sccb->evbuf.blk_cnt == 0)
	237	return 0;
	238	return (sccb->evbuf.blk_cnt - 1) * PAGE_SIZE;
e657d8fe MH	239	}
e657d8fe MH	240
5d5de1a0	241	static long __init sclp_hsa_copy_wait(struct sccb_header *sccb)
e657d8fe	242	{
e657d8fe MH	243	memset(sccb, 0, PAGE_SIZE);
	244	sccb->length = PAGE_SIZE;
	245	if (sclp_cmd_early(SCLP_CMDW_READ_EVENT_DATA, sccb))
	246	return -EIO;
9499934f MH	247	if (((struct sdias_sccb *) sccb)->evbuf.blk_cnt == 0)
9499934f MH	248	return 0;
e657d8fe MH	249	return (((struct sdias_sccb ) sccb)->evbuf.blk_cnt - 1) PAGE_SIZE;
	250	}
	251
	252	unsigned long sclp_get_hsa_size(void)
	253	{
	254	return sclp_hsa_size;
	255	}
	256
5d5de1a0	257	static void __init sclp_hsa_size_detect(void *sccb)
e657d8fe MH	258	{
	259	long size;
	260
	261	/* First try synchronous interface (LPAR) */
5d5de1a0	262	if (sclp_set_event_mask(sccb, 0, 0x40000010))
e657d8fe	263	return;
5d5de1a0	264	size = sclp_hsa_size_init(sccb);
e657d8fe MH	265	if (size < 0)
	266	return;
	267	if (size != 0)
	268	goto out;
	269	/* Then try asynchronous interface (z/VM) */
5d5de1a0	270	if (sclp_set_event_mask(sccb, 0x00000010, 0x40000010))
e657d8fe	271	return;
5d5de1a0	272	size = sclp_hsa_size_init(sccb);
e657d8fe MH	273	if (size < 0)
e657d8fe MH	274	return;
5d5de1a0	275	size = sclp_hsa_copy_wait(sccb);
e657d8fe MH	276	if (size < 0)
	277	return;
	278	out:
e657d8fe MH	279	sclp_hsa_size = size;
e657d8fe MH	280	}
7b50da53	281
52733e01 HB	282	static unsigned int __init sclp_con_check_linemode(struct init_sccb *sccb)
52733e01 HB	283	{
ea61a579	284	if (!(sccb->sclp_send_mask & EVTYP_OPCMD_MASK))
52733e01 HB	285	return 0;
	286	if (!(sccb->sclp_receive_mask & (EVTYP_MSG_MASK \| EVTYP_PMSGCMD_MASK)))
	287	return 0;
	288	return 1;
	289	}
	290
	291	static void __init sclp_console_detect(struct init_sccb *sccb)
	292	{
	293	if (sccb->header.response_code != 0x20)
	294	return;
	295
	296	if (sccb->sclp_send_mask & EVTYP_VT220MSG_MASK)
	297	sclp_con_has_vt220 = 1;
	298
	299	if (sclp_con_check_linemode(sccb))
	300	sclp_con_has_linemode = 1;
	301	}
	302
7b50da53 MH	303	void __init sclp_early_detect(void)
7b50da53 MH	304	{
5d5de1a0 HB	305	void *sccb = &sccb_early;
	306
	307	sclp_facilities_detect(sccb);
	308	sclp_hsa_size_detect(sccb);
52733e01 HB	309
	310	/* Turn off SCLP event notifications. Also save remote masks in the
	311	* sccb. These are sufficient to detect sclp console capabilities.
	312	*/
5d5de1a0	313	sclp_set_event_mask(sccb, 0, 0);
52733e01	314	sclp_console_detect(sccb);
7b50da53	315	}