xref: /openbmc/linux/drivers/s390/cio/chsc.c (revision 8ffdff6a)
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  *   S/390 common I/O routines -- channel subsystem call
4  *
5  *    Copyright IBM Corp. 1999,2012
6  *    Author(s): Ingo Adlung (adlung@de.ibm.com)
7  *		 Cornelia Huck (cornelia.huck@de.ibm.com)
8  *		 Arnd Bergmann (arndb@de.ibm.com)
9  */
10 
11 #define KMSG_COMPONENT "cio"
12 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
13 
14 #include <linux/module.h>
15 #include <linux/slab.h>
16 #include <linux/init.h>
17 #include <linux/device.h>
18 #include <linux/mutex.h>
19 #include <linux/pci.h>
20 
21 #include <asm/cio.h>
22 #include <asm/chpid.h>
23 #include <asm/chsc.h>
24 #include <asm/crw.h>
25 #include <asm/isc.h>
26 #include <asm/ebcdic.h>
27 #include <asm/ap.h>
28 
29 #include "css.h"
30 #include "cio.h"
31 #include "cio_debug.h"
32 #include "ioasm.h"
33 #include "chp.h"
34 #include "chsc.h"
35 
36 static void *sei_page;
37 static void *chsc_page;
38 static DEFINE_SPINLOCK(chsc_page_lock);
39 
40 #define SEI_VF_FLA	0xc0 /* VF flag for Full Link Address */
41 #define SEI_RS_CHPID	0x4  /* 4 in RS field indicates CHPID */
42 
43 /**
44  * chsc_error_from_response() - convert a chsc response to an error
45  * @response: chsc response code
46  *
47  * Returns an appropriate Linux error code for @response.
48  */
49 int chsc_error_from_response(int response)
50 {
51 	switch (response) {
52 	case 0x0001:
53 		return 0;
54 	case 0x0002:
55 	case 0x0003:
56 	case 0x0006:
57 	case 0x0007:
58 	case 0x0008:
59 	case 0x000a:
60 	case 0x0104:
61 		return -EINVAL;
62 	case 0x0004:
63 	case 0x0106:		/* "Wrong Channel Parm" for the op 0x003d */
64 		return -EOPNOTSUPP;
65 	case 0x000b:
66 	case 0x0107:		/* "Channel busy" for the op 0x003d */
67 		return -EBUSY;
68 	case 0x0100:
69 	case 0x0102:
70 		return -ENOMEM;
71 	case 0x0108:		/* "HW limit exceeded" for the op 0x003d */
72 		return -EUSERS;
73 	default:
74 		return -EIO;
75 	}
76 }
77 EXPORT_SYMBOL_GPL(chsc_error_from_response);
78 
79 struct chsc_ssd_area {
80 	struct chsc_header request;
81 	u16 :10;
82 	u16 ssid:2;
83 	u16 :4;
84 	u16 f_sch;	  /* first subchannel */
85 	u16 :16;
86 	u16 l_sch;	  /* last subchannel */
87 	u32 :32;
88 	struct chsc_header response;
89 	u32 :32;
90 	u8 sch_valid : 1;
91 	u8 dev_valid : 1;
92 	u8 st	     : 3; /* subchannel type */
93 	u8 zeroes    : 3;
94 	u8  unit_addr;	  /* unit address */
95 	u16 devno;	  /* device number */
96 	u8 path_mask;
97 	u8 fla_valid_mask;
98 	u16 sch;	  /* subchannel */
99 	u8 chpid[8];	  /* chpids 0-7 */
100 	u16 fla[8];	  /* full link addresses 0-7 */
101 } __packed __aligned(PAGE_SIZE);
102 
103 int chsc_get_ssd_info(struct subchannel_id schid, struct chsc_ssd_info *ssd)
104 {
105 	struct chsc_ssd_area *ssd_area;
106 	unsigned long flags;
107 	int ccode;
108 	int ret;
109 	int i;
110 	int mask;
111 
112 	spin_lock_irqsave(&chsc_page_lock, flags);
113 	memset(chsc_page, 0, PAGE_SIZE);
114 	ssd_area = chsc_page;
115 	ssd_area->request.length = 0x0010;
116 	ssd_area->request.code = 0x0004;
117 	ssd_area->ssid = schid.ssid;
118 	ssd_area->f_sch = schid.sch_no;
119 	ssd_area->l_sch = schid.sch_no;
120 
121 	ccode = chsc(ssd_area);
122 	/* Check response. */
123 	if (ccode > 0) {
124 		ret = (ccode == 3) ? -ENODEV : -EBUSY;
125 		goto out;
126 	}
127 	ret = chsc_error_from_response(ssd_area->response.code);
128 	if (ret != 0) {
129 		CIO_MSG_EVENT(2, "chsc: ssd failed for 0.%x.%04x (rc=%04x)\n",
130 			      schid.ssid, schid.sch_no,
131 			      ssd_area->response.code);
132 		goto out;
133 	}
134 	if (!ssd_area->sch_valid) {
135 		ret = -ENODEV;
136 		goto out;
137 	}
138 	/* Copy data */
139 	ret = 0;
140 	memset(ssd, 0, sizeof(struct chsc_ssd_info));
141 	if ((ssd_area->st != SUBCHANNEL_TYPE_IO) &&
142 	    (ssd_area->st != SUBCHANNEL_TYPE_MSG))
143 		goto out;
144 	ssd->path_mask = ssd_area->path_mask;
145 	ssd->fla_valid_mask = ssd_area->fla_valid_mask;
146 	for (i = 0; i < 8; i++) {
147 		mask = 0x80 >> i;
148 		if (ssd_area->path_mask & mask) {
149 			chp_id_init(&ssd->chpid[i]);
150 			ssd->chpid[i].id = ssd_area->chpid[i];
151 		}
152 		if (ssd_area->fla_valid_mask & mask)
153 			ssd->fla[i] = ssd_area->fla[i];
154 	}
155 out:
156 	spin_unlock_irqrestore(&chsc_page_lock, flags);
157 	return ret;
158 }
159 
160 /**
161  * chsc_ssqd() - store subchannel QDIO data (SSQD)
162  * @schid: id of the subchannel on which SSQD is performed
163  * @ssqd: request and response block for SSQD
164  *
165  * Returns 0 on success.
166  */
167 int chsc_ssqd(struct subchannel_id schid, struct chsc_ssqd_area *ssqd)
168 {
169 	memset(ssqd, 0, sizeof(*ssqd));
170 	ssqd->request.length = 0x0010;
171 	ssqd->request.code = 0x0024;
172 	ssqd->first_sch = schid.sch_no;
173 	ssqd->last_sch = schid.sch_no;
174 	ssqd->ssid = schid.ssid;
175 
176 	if (chsc(ssqd))
177 		return -EIO;
178 
179 	return chsc_error_from_response(ssqd->response.code);
180 }
181 EXPORT_SYMBOL_GPL(chsc_ssqd);
182 
183 /**
184  * chsc_sadc() - set adapter device controls (SADC)
185  * @schid: id of the subchannel on which SADC is performed
186  * @scssc: request and response block for SADC
187  * @summary_indicator_addr: summary indicator address
188  * @subchannel_indicator_addr: subchannel indicator address
189  * @isc: Interruption Subclass for this subchannel
190  *
191  * Returns 0 on success.
192  */
193 int chsc_sadc(struct subchannel_id schid, struct chsc_scssc_area *scssc,
194 	      u64 summary_indicator_addr, u64 subchannel_indicator_addr, u8 isc)
195 {
196 	memset(scssc, 0, sizeof(*scssc));
197 	scssc->request.length = 0x0fe0;
198 	scssc->request.code = 0x0021;
199 	scssc->operation_code = 0;
200 
201 	scssc->summary_indicator_addr = summary_indicator_addr;
202 	scssc->subchannel_indicator_addr = subchannel_indicator_addr;
203 
204 	scssc->ks = PAGE_DEFAULT_KEY >> 4;
205 	scssc->kc = PAGE_DEFAULT_KEY >> 4;
206 	scssc->isc = isc;
207 	scssc->schid = schid;
208 
209 	/* enable the time delay disablement facility */
210 	if (css_general_characteristics.aif_tdd)
211 		scssc->word_with_d_bit = 0x10000000;
212 
213 	if (chsc(scssc))
214 		return -EIO;
215 
216 	return chsc_error_from_response(scssc->response.code);
217 }
218 EXPORT_SYMBOL_GPL(chsc_sadc);
219 
220 static int s390_subchannel_remove_chpid(struct subchannel *sch, void *data)
221 {
222 	spin_lock_irq(sch->lock);
223 	if (sch->driver && sch->driver->chp_event)
224 		if (sch->driver->chp_event(sch, data, CHP_OFFLINE) != 0)
225 			goto out_unreg;
226 	spin_unlock_irq(sch->lock);
227 	return 0;
228 
229 out_unreg:
230 	sch->lpm = 0;
231 	spin_unlock_irq(sch->lock);
232 	css_schedule_eval(sch->schid);
233 	return 0;
234 }
235 
236 void chsc_chp_offline(struct chp_id chpid)
237 {
238 	struct channel_path *chp = chpid_to_chp(chpid);
239 	struct chp_link link;
240 	char dbf_txt[15];
241 
242 	sprintf(dbf_txt, "chpr%x.%02x", chpid.cssid, chpid.id);
243 	CIO_TRACE_EVENT(2, dbf_txt);
244 
245 	if (chp_get_status(chpid) <= 0)
246 		return;
247 	memset(&link, 0, sizeof(struct chp_link));
248 	link.chpid = chpid;
249 	/* Wait until previous actions have settled. */
250 	css_wait_for_slow_path();
251 
252 	mutex_lock(&chp->lock);
253 	chp_update_desc(chp);
254 	mutex_unlock(&chp->lock);
255 
256 	for_each_subchannel_staged(s390_subchannel_remove_chpid, NULL, &link);
257 }
258 
259 static int __s390_process_res_acc(struct subchannel *sch, void *data)
260 {
261 	spin_lock_irq(sch->lock);
262 	if (sch->driver && sch->driver->chp_event)
263 		sch->driver->chp_event(sch, data, CHP_ONLINE);
264 	spin_unlock_irq(sch->lock);
265 
266 	return 0;
267 }
268 
269 static void s390_process_res_acc(struct chp_link *link)
270 {
271 	char dbf_txt[15];
272 
273 	sprintf(dbf_txt, "accpr%x.%02x", link->chpid.cssid,
274 		link->chpid.id);
275 	CIO_TRACE_EVENT( 2, dbf_txt);
276 	if (link->fla != 0) {
277 		sprintf(dbf_txt, "fla%x", link->fla);
278 		CIO_TRACE_EVENT( 2, dbf_txt);
279 	}
280 	/* Wait until previous actions have settled. */
281 	css_wait_for_slow_path();
282 	/*
283 	 * I/O resources may have become accessible.
284 	 * Scan through all subchannels that may be concerned and
285 	 * do a validation on those.
286 	 * The more information we have (info), the less scanning
287 	 * will we have to do.
288 	 */
289 	for_each_subchannel_staged(__s390_process_res_acc, NULL, link);
290 	css_schedule_reprobe();
291 }
292 
293 static int process_fces_event(struct subchannel *sch, void *data)
294 {
295 	spin_lock_irq(sch->lock);
296 	if (sch->driver && sch->driver->chp_event)
297 		sch->driver->chp_event(sch, data, CHP_FCES_EVENT);
298 	spin_unlock_irq(sch->lock);
299 	return 0;
300 }
301 
302 struct chsc_sei_nt0_area {
303 	u8  flags;
304 	u8  vf;				/* validity flags */
305 	u8  rs;				/* reporting source */
306 	u8  cc;				/* content code */
307 	u16 fla;			/* full link address */
308 	u16 rsid;			/* reporting source id */
309 	u32 reserved1;
310 	u32 reserved2;
311 	/* ccdf has to be big enough for a link-incident record */
312 	u8  ccdf[PAGE_SIZE - 24 - 16];	/* content-code dependent field */
313 } __packed;
314 
315 struct chsc_sei_nt2_area {
316 	u8  flags;			/* p and v bit */
317 	u8  reserved1;
318 	u8  reserved2;
319 	u8  cc;				/* content code */
320 	u32 reserved3[13];
321 	u8  ccdf[PAGE_SIZE - 24 - 56];	/* content-code dependent field */
322 } __packed;
323 
324 #define CHSC_SEI_NT0	(1ULL << 63)
325 #define CHSC_SEI_NT2	(1ULL << 61)
326 
327 struct chsc_sei {
328 	struct chsc_header request;
329 	u32 reserved1;
330 	u64 ntsm;			/* notification type mask */
331 	struct chsc_header response;
332 	u32 :24;
333 	u8 nt;
334 	union {
335 		struct chsc_sei_nt0_area nt0_area;
336 		struct chsc_sei_nt2_area nt2_area;
337 		u8 nt_area[PAGE_SIZE - 24];
338 	} u;
339 } __packed __aligned(PAGE_SIZE);
340 
341 /*
342  * Link Incident Record as defined in SA22-7202, "ESCON I/O Interface"
343  */
344 
345 #define LIR_IQ_CLASS_INFO		0
346 #define LIR_IQ_CLASS_DEGRADED		1
347 #define LIR_IQ_CLASS_NOT_OPERATIONAL	2
348 
349 struct lir {
350 	struct {
351 		u32 null:1;
352 		u32 reserved:3;
353 		u32 class:2;
354 		u32 reserved2:2;
355 	} __packed iq;
356 	u32 ic:8;
357 	u32 reserved:16;
358 	struct node_descriptor incident_node;
359 	struct node_descriptor attached_node;
360 	u8 reserved2[32];
361 } __packed;
362 
363 #define PARAMS_LEN	10	/* PARAMS=xx,xxxxxx */
364 #define NODEID_LEN	35	/* NODEID=tttttt/mdl,mmm.ppssssssssssss,xxxx */
365 
366 /* Copy EBCIDC text, convert to ASCII and optionally add delimiter. */
367 static char *store_ebcdic(char *dest, const char *src, unsigned long len,
368 			  char delim)
369 {
370 	memcpy(dest, src, len);
371 	EBCASC(dest, len);
372 
373 	if (delim)
374 		dest[len++] = delim;
375 
376 	return dest + len;
377 }
378 
379 static void chsc_link_from_sei(struct chp_link *link,
380 				struct chsc_sei_nt0_area *sei_area)
381 {
382 	if ((sei_area->vf & SEI_VF_FLA) != 0) {
383 		link->fla	= sei_area->fla;
384 		link->fla_mask	= ((sei_area->vf & SEI_VF_FLA) == SEI_VF_FLA) ?
385 							0xffff : 0xff00;
386 	}
387 }
388 
389 /* Format node ID and parameters for output in LIR log message. */
390 static void format_node_data(char *params, char *id, struct node_descriptor *nd)
391 {
392 	memset(params, 0, PARAMS_LEN);
393 	memset(id, 0, NODEID_LEN);
394 
395 	if (nd->validity != ND_VALIDITY_VALID) {
396 		strncpy(params, "n/a", PARAMS_LEN - 1);
397 		strncpy(id, "n/a", NODEID_LEN - 1);
398 		return;
399 	}
400 
401 	/* PARAMS=xx,xxxxxx */
402 	snprintf(params, PARAMS_LEN, "%02x,%06x", nd->byte0, nd->params);
403 	/* NODEID=tttttt/mdl,mmm.ppssssssssssss,xxxx */
404 	id = store_ebcdic(id, nd->type, sizeof(nd->type), '/');
405 	id = store_ebcdic(id, nd->model, sizeof(nd->model), ',');
406 	id = store_ebcdic(id, nd->manufacturer, sizeof(nd->manufacturer), '.');
407 	id = store_ebcdic(id, nd->plant, sizeof(nd->plant), 0);
408 	id = store_ebcdic(id, nd->seq, sizeof(nd->seq), ',');
409 	sprintf(id, "%04X", nd->tag);
410 }
411 
412 static void chsc_process_sei_link_incident(struct chsc_sei_nt0_area *sei_area)
413 {
414 	struct lir *lir = (struct lir *) &sei_area->ccdf;
415 	char iuparams[PARAMS_LEN], iunodeid[NODEID_LEN], auparams[PARAMS_LEN],
416 	     aunodeid[NODEID_LEN];
417 
418 	CIO_CRW_EVENT(4, "chsc: link incident (rs=%02x, rs_id=%04x, iq=%02x)\n",
419 		      sei_area->rs, sei_area->rsid, sei_area->ccdf[0]);
420 
421 	/* Ignore NULL Link Incident Records. */
422 	if (lir->iq.null)
423 		return;
424 
425 	/* Inform user that a link requires maintenance actions because it has
426 	 * become degraded or not operational. Note that this log message is
427 	 * the primary intention behind a Link Incident Record. */
428 
429 	format_node_data(iuparams, iunodeid, &lir->incident_node);
430 	format_node_data(auparams, aunodeid, &lir->attached_node);
431 
432 	switch (lir->iq.class) {
433 	case LIR_IQ_CLASS_DEGRADED:
434 		pr_warn("Link degraded: RS=%02x RSID=%04x IC=%02x "
435 			"IUPARAMS=%s IUNODEID=%s AUPARAMS=%s AUNODEID=%s\n",
436 			sei_area->rs, sei_area->rsid, lir->ic, iuparams,
437 			iunodeid, auparams, aunodeid);
438 		break;
439 	case LIR_IQ_CLASS_NOT_OPERATIONAL:
440 		pr_err("Link stopped: RS=%02x RSID=%04x IC=%02x "
441 		       "IUPARAMS=%s IUNODEID=%s AUPARAMS=%s AUNODEID=%s\n",
442 		       sei_area->rs, sei_area->rsid, lir->ic, iuparams,
443 		       iunodeid, auparams, aunodeid);
444 		break;
445 	default:
446 		break;
447 	}
448 }
449 
450 static void chsc_process_sei_res_acc(struct chsc_sei_nt0_area *sei_area)
451 {
452 	struct channel_path *chp;
453 	struct chp_link link;
454 	struct chp_id chpid;
455 	int status;
456 
457 	CIO_CRW_EVENT(4, "chsc: resource accessibility event (rs=%02x, "
458 		      "rs_id=%04x)\n", sei_area->rs, sei_area->rsid);
459 	if (sei_area->rs != 4)
460 		return;
461 	chp_id_init(&chpid);
462 	chpid.id = sei_area->rsid;
463 	/* allocate a new channel path structure, if needed */
464 	status = chp_get_status(chpid);
465 	if (!status)
466 		return;
467 
468 	if (status < 0) {
469 		chp_new(chpid);
470 	} else {
471 		chp = chpid_to_chp(chpid);
472 		mutex_lock(&chp->lock);
473 		chp_update_desc(chp);
474 		mutex_unlock(&chp->lock);
475 	}
476 	memset(&link, 0, sizeof(struct chp_link));
477 	link.chpid = chpid;
478 	chsc_link_from_sei(&link, sei_area);
479 	s390_process_res_acc(&link);
480 }
481 
482 static void chsc_process_sei_chp_avail(struct chsc_sei_nt0_area *sei_area)
483 {
484 	struct channel_path *chp;
485 	struct chp_id chpid;
486 	u8 *data;
487 	int num;
488 
489 	CIO_CRW_EVENT(4, "chsc: channel path availability information\n");
490 	if (sei_area->rs != 0)
491 		return;
492 	data = sei_area->ccdf;
493 	chp_id_init(&chpid);
494 	for (num = 0; num <= __MAX_CHPID; num++) {
495 		if (!chp_test_bit(data, num))
496 			continue;
497 		chpid.id = num;
498 
499 		CIO_CRW_EVENT(4, "Update information for channel path "
500 			      "%x.%02x\n", chpid.cssid, chpid.id);
501 		chp = chpid_to_chp(chpid);
502 		if (!chp) {
503 			chp_new(chpid);
504 			continue;
505 		}
506 		mutex_lock(&chp->lock);
507 		chp_update_desc(chp);
508 		mutex_unlock(&chp->lock);
509 	}
510 }
511 
512 struct chp_config_data {
513 	u8 map[32];
514 	u8 op;
515 	u8 pc;
516 };
517 
518 static void chsc_process_sei_chp_config(struct chsc_sei_nt0_area *sei_area)
519 {
520 	struct chp_config_data *data;
521 	struct chp_id chpid;
522 	int num;
523 	char *events[3] = {"configure", "deconfigure", "cancel deconfigure"};
524 
525 	CIO_CRW_EVENT(4, "chsc: channel-path-configuration notification\n");
526 	if (sei_area->rs != 0)
527 		return;
528 	data = (struct chp_config_data *) &(sei_area->ccdf);
529 	chp_id_init(&chpid);
530 	for (num = 0; num <= __MAX_CHPID; num++) {
531 		if (!chp_test_bit(data->map, num))
532 			continue;
533 		chpid.id = num;
534 		pr_notice("Processing %s for channel path %x.%02x\n",
535 			  events[data->op], chpid.cssid, chpid.id);
536 		switch (data->op) {
537 		case 0:
538 			chp_cfg_schedule(chpid, 1);
539 			break;
540 		case 1:
541 			chp_cfg_schedule(chpid, 0);
542 			break;
543 		case 2:
544 			chp_cfg_cancel_deconfigure(chpid);
545 			break;
546 		}
547 	}
548 }
549 
550 static void chsc_process_sei_scm_change(struct chsc_sei_nt0_area *sei_area)
551 {
552 	int ret;
553 
554 	CIO_CRW_EVENT(4, "chsc: scm change notification\n");
555 	if (sei_area->rs != 7)
556 		return;
557 
558 	ret = scm_update_information();
559 	if (ret)
560 		CIO_CRW_EVENT(0, "chsc: updating change notification"
561 			      " failed (rc=%d).\n", ret);
562 }
563 
564 static void chsc_process_sei_scm_avail(struct chsc_sei_nt0_area *sei_area)
565 {
566 	int ret;
567 
568 	CIO_CRW_EVENT(4, "chsc: scm available information\n");
569 	if (sei_area->rs != 7)
570 		return;
571 
572 	ret = scm_process_availability_information();
573 	if (ret)
574 		CIO_CRW_EVENT(0, "chsc: process availability information"
575 			      " failed (rc=%d).\n", ret);
576 }
577 
578 static void chsc_process_sei_ap_cfg_chg(struct chsc_sei_nt0_area *sei_area)
579 {
580 	CIO_CRW_EVENT(3, "chsc: ap config changed\n");
581 	if (sei_area->rs != 5)
582 		return;
583 
584 	ap_bus_cfg_chg();
585 }
586 
587 static void chsc_process_sei_fces_event(struct chsc_sei_nt0_area *sei_area)
588 {
589 	struct chp_link link;
590 	struct chp_id chpid;
591 	struct channel_path *chp;
592 
593 	CIO_CRW_EVENT(4,
594 	"chsc: FCES status notification (rs=%02x, rs_id=%04x, FCES-status=%x)\n",
595 		sei_area->rs, sei_area->rsid, sei_area->ccdf[0]);
596 
597 	if (sei_area->rs != SEI_RS_CHPID)
598 		return;
599 	chp_id_init(&chpid);
600 	chpid.id = sei_area->rsid;
601 
602 	/* Ignore the event on unknown/invalid chp */
603 	chp = chpid_to_chp(chpid);
604 	if (!chp)
605 		return;
606 
607 	memset(&link, 0, sizeof(struct chp_link));
608 	link.chpid = chpid;
609 	chsc_link_from_sei(&link, sei_area);
610 
611 	for_each_subchannel_staged(process_fces_event, NULL, &link);
612 }
613 
614 static void chsc_process_sei_nt2(struct chsc_sei_nt2_area *sei_area)
615 {
616 	switch (sei_area->cc) {
617 	case 1:
618 		zpci_event_error(sei_area->ccdf);
619 		break;
620 	case 2:
621 		zpci_event_availability(sei_area->ccdf);
622 		break;
623 	default:
624 		CIO_CRW_EVENT(2, "chsc: sei nt2 unhandled cc=%d\n",
625 			      sei_area->cc);
626 		break;
627 	}
628 }
629 
630 static void chsc_process_sei_nt0(struct chsc_sei_nt0_area *sei_area)
631 {
632 	/* which kind of information was stored? */
633 	switch (sei_area->cc) {
634 	case 1: /* link incident*/
635 		chsc_process_sei_link_incident(sei_area);
636 		break;
637 	case 2: /* i/o resource accessibility */
638 		chsc_process_sei_res_acc(sei_area);
639 		break;
640 	case 3: /* ap config changed */
641 		chsc_process_sei_ap_cfg_chg(sei_area);
642 		break;
643 	case 7: /* channel-path-availability information */
644 		chsc_process_sei_chp_avail(sei_area);
645 		break;
646 	case 8: /* channel-path-configuration notification */
647 		chsc_process_sei_chp_config(sei_area);
648 		break;
649 	case 12: /* scm change notification */
650 		chsc_process_sei_scm_change(sei_area);
651 		break;
652 	case 14: /* scm available notification */
653 		chsc_process_sei_scm_avail(sei_area);
654 		break;
655 	case 15: /* FCES event notification */
656 		chsc_process_sei_fces_event(sei_area);
657 		break;
658 	default: /* other stuff */
659 		CIO_CRW_EVENT(2, "chsc: sei nt0 unhandled cc=%d\n",
660 			      sei_area->cc);
661 		break;
662 	}
663 
664 	/* Check if we might have lost some information. */
665 	if (sei_area->flags & 0x40) {
666 		CIO_CRW_EVENT(2, "chsc: event overflow\n");
667 		css_schedule_eval_all();
668 	}
669 }
670 
671 static void chsc_process_event_information(struct chsc_sei *sei, u64 ntsm)
672 {
673 	static int ntsm_unsupported;
674 
675 	while (true) {
676 		memset(sei, 0, sizeof(*sei));
677 		sei->request.length = 0x0010;
678 		sei->request.code = 0x000e;
679 		if (!ntsm_unsupported)
680 			sei->ntsm = ntsm;
681 
682 		if (chsc(sei))
683 			break;
684 
685 		if (sei->response.code != 0x0001) {
686 			CIO_CRW_EVENT(2, "chsc: sei failed (rc=%04x, ntsm=%llx)\n",
687 				      sei->response.code, sei->ntsm);
688 
689 			if (sei->response.code == 3 && sei->ntsm) {
690 				/* Fallback for old firmware. */
691 				ntsm_unsupported = 1;
692 				continue;
693 			}
694 			break;
695 		}
696 
697 		CIO_CRW_EVENT(2, "chsc: sei successful (nt=%d)\n", sei->nt);
698 		switch (sei->nt) {
699 		case 0:
700 			chsc_process_sei_nt0(&sei->u.nt0_area);
701 			break;
702 		case 2:
703 			chsc_process_sei_nt2(&sei->u.nt2_area);
704 			break;
705 		default:
706 			CIO_CRW_EVENT(2, "chsc: unhandled nt: %d\n", sei->nt);
707 			break;
708 		}
709 
710 		if (!(sei->u.nt0_area.flags & 0x80))
711 			break;
712 	}
713 }
714 
715 /*
716  * Handle channel subsystem related CRWs.
717  * Use store event information to find out what's going on.
718  *
719  * Note: Access to sei_page is serialized through machine check handler
720  * thread, so no need for locking.
721  */
722 static void chsc_process_crw(struct crw *crw0, struct crw *crw1, int overflow)
723 {
724 	struct chsc_sei *sei = sei_page;
725 
726 	if (overflow) {
727 		css_schedule_eval_all();
728 		return;
729 	}
730 	CIO_CRW_EVENT(2, "CRW reports slct=%d, oflw=%d, "
731 		      "chn=%d, rsc=%X, anc=%d, erc=%X, rsid=%X\n",
732 		      crw0->slct, crw0->oflw, crw0->chn, crw0->rsc, crw0->anc,
733 		      crw0->erc, crw0->rsid);
734 
735 	CIO_TRACE_EVENT(2, "prcss");
736 	chsc_process_event_information(sei, CHSC_SEI_NT0 | CHSC_SEI_NT2);
737 }
738 
739 void chsc_chp_online(struct chp_id chpid)
740 {
741 	struct channel_path *chp = chpid_to_chp(chpid);
742 	struct chp_link link;
743 	char dbf_txt[15];
744 
745 	sprintf(dbf_txt, "cadd%x.%02x", chpid.cssid, chpid.id);
746 	CIO_TRACE_EVENT(2, dbf_txt);
747 
748 	if (chp_get_status(chpid) != 0) {
749 		memset(&link, 0, sizeof(struct chp_link));
750 		link.chpid = chpid;
751 		/* Wait until previous actions have settled. */
752 		css_wait_for_slow_path();
753 
754 		mutex_lock(&chp->lock);
755 		chp_update_desc(chp);
756 		mutex_unlock(&chp->lock);
757 
758 		for_each_subchannel_staged(__s390_process_res_acc, NULL,
759 					   &link);
760 		css_schedule_reprobe();
761 	}
762 }
763 
764 static void __s390_subchannel_vary_chpid(struct subchannel *sch,
765 					 struct chp_id chpid, int on)
766 {
767 	unsigned long flags;
768 	struct chp_link link;
769 
770 	memset(&link, 0, sizeof(struct chp_link));
771 	link.chpid = chpid;
772 	spin_lock_irqsave(sch->lock, flags);
773 	if (sch->driver && sch->driver->chp_event)
774 		sch->driver->chp_event(sch, &link,
775 				       on ? CHP_VARY_ON : CHP_VARY_OFF);
776 	spin_unlock_irqrestore(sch->lock, flags);
777 }
778 
779 static int s390_subchannel_vary_chpid_off(struct subchannel *sch, void *data)
780 {
781 	struct chp_id *chpid = data;
782 
783 	__s390_subchannel_vary_chpid(sch, *chpid, 0);
784 	return 0;
785 }
786 
787 static int s390_subchannel_vary_chpid_on(struct subchannel *sch, void *data)
788 {
789 	struct chp_id *chpid = data;
790 
791 	__s390_subchannel_vary_chpid(sch, *chpid, 1);
792 	return 0;
793 }
794 
795 /**
796  * chsc_chp_vary - propagate channel-path vary operation to subchannels
797  * @chpid: channl-path ID
798  * @on: non-zero for vary online, zero for vary offline
799  */
800 int chsc_chp_vary(struct chp_id chpid, int on)
801 {
802 	struct channel_path *chp = chpid_to_chp(chpid);
803 
804 	/* Wait until previous actions have settled. */
805 	css_wait_for_slow_path();
806 	/*
807 	 * Redo PathVerification on the devices the chpid connects to
808 	 */
809 	if (on) {
810 		/* Try to update the channel path description. */
811 		chp_update_desc(chp);
812 		for_each_subchannel_staged(s390_subchannel_vary_chpid_on,
813 					   NULL, &chpid);
814 		css_schedule_reprobe();
815 	} else
816 		for_each_subchannel_staged(s390_subchannel_vary_chpid_off,
817 					   NULL, &chpid);
818 
819 	return 0;
820 }
821 
822 static void
823 chsc_remove_cmg_attr(struct channel_subsystem *css)
824 {
825 	int i;
826 
827 	for (i = 0; i <= __MAX_CHPID; i++) {
828 		if (!css->chps[i])
829 			continue;
830 		chp_remove_cmg_attr(css->chps[i]);
831 	}
832 }
833 
834 static int
835 chsc_add_cmg_attr(struct channel_subsystem *css)
836 {
837 	int i, ret;
838 
839 	ret = 0;
840 	for (i = 0; i <= __MAX_CHPID; i++) {
841 		if (!css->chps[i])
842 			continue;
843 		ret = chp_add_cmg_attr(css->chps[i]);
844 		if (ret)
845 			goto cleanup;
846 	}
847 	return ret;
848 cleanup:
849 	for (--i; i >= 0; i--) {
850 		if (!css->chps[i])
851 			continue;
852 		chp_remove_cmg_attr(css->chps[i]);
853 	}
854 	return ret;
855 }
856 
857 int __chsc_do_secm(struct channel_subsystem *css, int enable)
858 {
859 	struct {
860 		struct chsc_header request;
861 		u32 operation_code : 2;
862 		u32 : 30;
863 		u32 key : 4;
864 		u32 : 28;
865 		u32 zeroes1;
866 		u32 cub_addr1;
867 		u32 zeroes2;
868 		u32 cub_addr2;
869 		u32 reserved[13];
870 		struct chsc_header response;
871 		u32 status : 8;
872 		u32 : 4;
873 		u32 fmt : 4;
874 		u32 : 16;
875 	} *secm_area;
876 	unsigned long flags;
877 	int ret, ccode;
878 
879 	spin_lock_irqsave(&chsc_page_lock, flags);
880 	memset(chsc_page, 0, PAGE_SIZE);
881 	secm_area = chsc_page;
882 	secm_area->request.length = 0x0050;
883 	secm_area->request.code = 0x0016;
884 
885 	secm_area->key = PAGE_DEFAULT_KEY >> 4;
886 	secm_area->cub_addr1 = (u64)(unsigned long)css->cub_addr1;
887 	secm_area->cub_addr2 = (u64)(unsigned long)css->cub_addr2;
888 
889 	secm_area->operation_code = enable ? 0 : 1;
890 
891 	ccode = chsc(secm_area);
892 	if (ccode > 0) {
893 		ret = (ccode == 3) ? -ENODEV : -EBUSY;
894 		goto out;
895 	}
896 
897 	switch (secm_area->response.code) {
898 	case 0x0102:
899 	case 0x0103:
900 		ret = -EINVAL;
901 		break;
902 	default:
903 		ret = chsc_error_from_response(secm_area->response.code);
904 	}
905 	if (ret != 0)
906 		CIO_CRW_EVENT(2, "chsc: secm failed (rc=%04x)\n",
907 			      secm_area->response.code);
908 out:
909 	spin_unlock_irqrestore(&chsc_page_lock, flags);
910 	return ret;
911 }
912 
913 int
914 chsc_secm(struct channel_subsystem *css, int enable)
915 {
916 	int ret;
917 
918 	if (enable && !css->cm_enabled) {
919 		css->cub_addr1 = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA);
920 		css->cub_addr2 = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA);
921 		if (!css->cub_addr1 || !css->cub_addr2) {
922 			free_page((unsigned long)css->cub_addr1);
923 			free_page((unsigned long)css->cub_addr2);
924 			return -ENOMEM;
925 		}
926 	}
927 	ret = __chsc_do_secm(css, enable);
928 	if (!ret) {
929 		css->cm_enabled = enable;
930 		if (css->cm_enabled) {
931 			ret = chsc_add_cmg_attr(css);
932 			if (ret) {
933 				__chsc_do_secm(css, 0);
934 				css->cm_enabled = 0;
935 			}
936 		} else
937 			chsc_remove_cmg_attr(css);
938 	}
939 	if (!css->cm_enabled) {
940 		free_page((unsigned long)css->cub_addr1);
941 		free_page((unsigned long)css->cub_addr2);
942 	}
943 	return ret;
944 }
945 
946 int chsc_determine_channel_path_desc(struct chp_id chpid, int fmt, int rfmt,
947 				     int c, int m, void *page)
948 {
949 	struct chsc_scpd *scpd_area;
950 	int ccode, ret;
951 
952 	if ((rfmt == 1 || rfmt == 0) && c == 1 &&
953 	    !css_general_characteristics.fcs)
954 		return -EINVAL;
955 	if ((rfmt == 2) && !css_general_characteristics.cib)
956 		return -EINVAL;
957 	if ((rfmt == 3) && !css_general_characteristics.util_str)
958 		return -EINVAL;
959 
960 	memset(page, 0, PAGE_SIZE);
961 	scpd_area = page;
962 	scpd_area->request.length = 0x0010;
963 	scpd_area->request.code = 0x0002;
964 	scpd_area->cssid = chpid.cssid;
965 	scpd_area->first_chpid = chpid.id;
966 	scpd_area->last_chpid = chpid.id;
967 	scpd_area->m = m;
968 	scpd_area->c = c;
969 	scpd_area->fmt = fmt;
970 	scpd_area->rfmt = rfmt;
971 
972 	ccode = chsc(scpd_area);
973 	if (ccode > 0)
974 		return (ccode == 3) ? -ENODEV : -EBUSY;
975 
976 	ret = chsc_error_from_response(scpd_area->response.code);
977 	if (ret)
978 		CIO_CRW_EVENT(2, "chsc: scpd failed (rc=%04x)\n",
979 			      scpd_area->response.code);
980 	return ret;
981 }
982 EXPORT_SYMBOL_GPL(chsc_determine_channel_path_desc);
983 
984 #define chsc_det_chp_desc(FMT, c)					\
985 int chsc_determine_fmt##FMT##_channel_path_desc(			\
986 	struct chp_id chpid, struct channel_path_desc_fmt##FMT *desc)	\
987 {									\
988 	struct chsc_scpd *scpd_area;					\
989 	unsigned long flags;						\
990 	int ret;							\
991 									\
992 	spin_lock_irqsave(&chsc_page_lock, flags);			\
993 	scpd_area = chsc_page;						\
994 	ret = chsc_determine_channel_path_desc(chpid, 0, FMT, c, 0,	\
995 					       scpd_area);		\
996 	if (ret)							\
997 		goto out;						\
998 									\
999 	memcpy(desc, scpd_area->data, sizeof(*desc));			\
1000 out:									\
1001 	spin_unlock_irqrestore(&chsc_page_lock, flags);			\
1002 	return ret;							\
1003 }
1004 
1005 chsc_det_chp_desc(0, 0)
1006 chsc_det_chp_desc(1, 1)
1007 chsc_det_chp_desc(3, 0)
1008 
1009 static void
1010 chsc_initialize_cmg_chars(struct channel_path *chp, u8 cmcv,
1011 			  struct cmg_chars *chars)
1012 {
1013 	int i, mask;
1014 
1015 	for (i = 0; i < NR_MEASUREMENT_CHARS; i++) {
1016 		mask = 0x80 >> (i + 3);
1017 		if (cmcv & mask)
1018 			chp->cmg_chars.values[i] = chars->values[i];
1019 		else
1020 			chp->cmg_chars.values[i] = 0;
1021 	}
1022 }
1023 
1024 int chsc_get_channel_measurement_chars(struct channel_path *chp)
1025 {
1026 	unsigned long flags;
1027 	int ccode, ret;
1028 
1029 	struct {
1030 		struct chsc_header request;
1031 		u32 : 24;
1032 		u32 first_chpid : 8;
1033 		u32 : 24;
1034 		u32 last_chpid : 8;
1035 		u32 zeroes1;
1036 		struct chsc_header response;
1037 		u32 zeroes2;
1038 		u32 not_valid : 1;
1039 		u32 shared : 1;
1040 		u32 : 22;
1041 		u32 chpid : 8;
1042 		u32 cmcv : 5;
1043 		u32 : 11;
1044 		u32 cmgq : 8;
1045 		u32 cmg : 8;
1046 		u32 zeroes3;
1047 		u32 data[NR_MEASUREMENT_CHARS];
1048 	} *scmc_area;
1049 
1050 	chp->shared = -1;
1051 	chp->cmg = -1;
1052 
1053 	if (!css_chsc_characteristics.scmc || !css_chsc_characteristics.secm)
1054 		return -EINVAL;
1055 
1056 	spin_lock_irqsave(&chsc_page_lock, flags);
1057 	memset(chsc_page, 0, PAGE_SIZE);
1058 	scmc_area = chsc_page;
1059 	scmc_area->request.length = 0x0010;
1060 	scmc_area->request.code = 0x0022;
1061 	scmc_area->first_chpid = chp->chpid.id;
1062 	scmc_area->last_chpid = chp->chpid.id;
1063 
1064 	ccode = chsc(scmc_area);
1065 	if (ccode > 0) {
1066 		ret = (ccode == 3) ? -ENODEV : -EBUSY;
1067 		goto out;
1068 	}
1069 
1070 	ret = chsc_error_from_response(scmc_area->response.code);
1071 	if (ret) {
1072 		CIO_CRW_EVENT(2, "chsc: scmc failed (rc=%04x)\n",
1073 			      scmc_area->response.code);
1074 		goto out;
1075 	}
1076 	if (scmc_area->not_valid)
1077 		goto out;
1078 
1079 	chp->cmg = scmc_area->cmg;
1080 	chp->shared = scmc_area->shared;
1081 	if (chp->cmg != 2 && chp->cmg != 3) {
1082 		/* No cmg-dependent data. */
1083 		goto out;
1084 	}
1085 	chsc_initialize_cmg_chars(chp, scmc_area->cmcv,
1086 				  (struct cmg_chars *) &scmc_area->data);
1087 out:
1088 	spin_unlock_irqrestore(&chsc_page_lock, flags);
1089 	return ret;
1090 }
1091 
1092 int __init chsc_init(void)
1093 {
1094 	int ret;
1095 
1096 	sei_page = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA);
1097 	chsc_page = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA);
1098 	if (!sei_page || !chsc_page) {
1099 		ret = -ENOMEM;
1100 		goto out_err;
1101 	}
1102 	ret = crw_register_handler(CRW_RSC_CSS, chsc_process_crw);
1103 	if (ret)
1104 		goto out_err;
1105 	return ret;
1106 out_err:
1107 	free_page((unsigned long)chsc_page);
1108 	free_page((unsigned long)sei_page);
1109 	return ret;
1110 }
1111 
1112 void __init chsc_init_cleanup(void)
1113 {
1114 	crw_unregister_handler(CRW_RSC_CSS);
1115 	free_page((unsigned long)chsc_page);
1116 	free_page((unsigned long)sei_page);
1117 }
1118 
1119 int __chsc_enable_facility(struct chsc_sda_area *sda_area, int operation_code)
1120 {
1121 	int ret;
1122 
1123 	sda_area->request.length = 0x0400;
1124 	sda_area->request.code = 0x0031;
1125 	sda_area->operation_code = operation_code;
1126 
1127 	ret = chsc(sda_area);
1128 	if (ret > 0) {
1129 		ret = (ret == 3) ? -ENODEV : -EBUSY;
1130 		goto out;
1131 	}
1132 
1133 	switch (sda_area->response.code) {
1134 	case 0x0101:
1135 		ret = -EOPNOTSUPP;
1136 		break;
1137 	default:
1138 		ret = chsc_error_from_response(sda_area->response.code);
1139 	}
1140 out:
1141 	return ret;
1142 }
1143 
1144 int chsc_enable_facility(int operation_code)
1145 {
1146 	struct chsc_sda_area *sda_area;
1147 	unsigned long flags;
1148 	int ret;
1149 
1150 	spin_lock_irqsave(&chsc_page_lock, flags);
1151 	memset(chsc_page, 0, PAGE_SIZE);
1152 	sda_area = chsc_page;
1153 
1154 	ret = __chsc_enable_facility(sda_area, operation_code);
1155 	if (ret != 0)
1156 		CIO_CRW_EVENT(2, "chsc: sda (oc=%x) failed (rc=%04x)\n",
1157 			      operation_code, sda_area->response.code);
1158 
1159 	spin_unlock_irqrestore(&chsc_page_lock, flags);
1160 	return ret;
1161 }
1162 
1163 int __init chsc_get_cssid_iid(int idx, u8 *cssid, u8 *iid)
1164 {
1165 	struct {
1166 		struct chsc_header request;
1167 		u8 atype;
1168 		u32 : 24;
1169 		u32 reserved1[6];
1170 		struct chsc_header response;
1171 		u32 reserved2[3];
1172 		struct {
1173 			u8 cssid;
1174 			u8 iid;
1175 			u32 : 16;
1176 		} list[0];
1177 	} *sdcal_area;
1178 	int ret;
1179 
1180 	spin_lock_irq(&chsc_page_lock);
1181 	memset(chsc_page, 0, PAGE_SIZE);
1182 	sdcal_area = chsc_page;
1183 	sdcal_area->request.length = 0x0020;
1184 	sdcal_area->request.code = 0x0034;
1185 	sdcal_area->atype = 4;
1186 
1187 	ret = chsc(sdcal_area);
1188 	if (ret) {
1189 		ret = (ret == 3) ? -ENODEV : -EBUSY;
1190 		goto exit;
1191 	}
1192 
1193 	ret = chsc_error_from_response(sdcal_area->response.code);
1194 	if (ret) {
1195 		CIO_CRW_EVENT(2, "chsc: sdcal failed (rc=%04x)\n",
1196 			      sdcal_area->response.code);
1197 		goto exit;
1198 	}
1199 
1200 	if ((addr_t) &sdcal_area->list[idx] <
1201 	    (addr_t) &sdcal_area->response + sdcal_area->response.length) {
1202 		*cssid = sdcal_area->list[idx].cssid;
1203 		*iid = sdcal_area->list[idx].iid;
1204 	}
1205 	else
1206 		ret = -ENODEV;
1207 exit:
1208 	spin_unlock_irq(&chsc_page_lock);
1209 	return ret;
1210 }
1211 
1212 struct css_general_char css_general_characteristics;
1213 struct css_chsc_char css_chsc_characteristics;
1214 
1215 int __init
1216 chsc_determine_css_characteristics(void)
1217 {
1218 	unsigned long flags;
1219 	int result;
1220 	struct {
1221 		struct chsc_header request;
1222 		u32 reserved1;
1223 		u32 reserved2;
1224 		u32 reserved3;
1225 		struct chsc_header response;
1226 		u32 reserved4;
1227 		u32 general_char[510];
1228 		u32 chsc_char[508];
1229 	} *scsc_area;
1230 
1231 	spin_lock_irqsave(&chsc_page_lock, flags);
1232 	memset(chsc_page, 0, PAGE_SIZE);
1233 	scsc_area = chsc_page;
1234 	scsc_area->request.length = 0x0010;
1235 	scsc_area->request.code = 0x0010;
1236 
1237 	result = chsc(scsc_area);
1238 	if (result) {
1239 		result = (result == 3) ? -ENODEV : -EBUSY;
1240 		goto exit;
1241 	}
1242 
1243 	result = chsc_error_from_response(scsc_area->response.code);
1244 	if (result == 0) {
1245 		memcpy(&css_general_characteristics, scsc_area->general_char,
1246 		       sizeof(css_general_characteristics));
1247 		memcpy(&css_chsc_characteristics, scsc_area->chsc_char,
1248 		       sizeof(css_chsc_characteristics));
1249 	} else
1250 		CIO_CRW_EVENT(2, "chsc: scsc failed (rc=%04x)\n",
1251 			      scsc_area->response.code);
1252 exit:
1253 	spin_unlock_irqrestore(&chsc_page_lock, flags);
1254 	return result;
1255 }
1256 
1257 EXPORT_SYMBOL_GPL(css_general_characteristics);
1258 EXPORT_SYMBOL_GPL(css_chsc_characteristics);
1259 
1260 int chsc_sstpc(void *page, unsigned int op, u16 ctrl, u64 *clock_delta)
1261 {
1262 	struct {
1263 		struct chsc_header request;
1264 		unsigned int rsvd0;
1265 		unsigned int op : 8;
1266 		unsigned int rsvd1 : 8;
1267 		unsigned int ctrl : 16;
1268 		unsigned int rsvd2[5];
1269 		struct chsc_header response;
1270 		unsigned int rsvd3[3];
1271 		u64 clock_delta;
1272 		unsigned int rsvd4[2];
1273 	} *rr;
1274 	int rc;
1275 
1276 	memset(page, 0, PAGE_SIZE);
1277 	rr = page;
1278 	rr->request.length = 0x0020;
1279 	rr->request.code = 0x0033;
1280 	rr->op = op;
1281 	rr->ctrl = ctrl;
1282 	rc = chsc(rr);
1283 	if (rc)
1284 		return -EIO;
1285 	rc = (rr->response.code == 0x0001) ? 0 : -EIO;
1286 	if (clock_delta)
1287 		*clock_delta = rr->clock_delta;
1288 	return rc;
1289 }
1290 
1291 int chsc_sstpi(void *page, void *result, size_t size)
1292 {
1293 	struct {
1294 		struct chsc_header request;
1295 		unsigned int rsvd0[3];
1296 		struct chsc_header response;
1297 		char data[];
1298 	} *rr;
1299 	int rc;
1300 
1301 	memset(page, 0, PAGE_SIZE);
1302 	rr = page;
1303 	rr->request.length = 0x0010;
1304 	rr->request.code = 0x0038;
1305 	rc = chsc(rr);
1306 	if (rc)
1307 		return -EIO;
1308 	memcpy(result, &rr->data, size);
1309 	return (rr->response.code == 0x0001) ? 0 : -EIO;
1310 }
1311 
1312 int chsc_stzi(void *page, void *result, size_t size)
1313 {
1314 	struct {
1315 		struct chsc_header request;
1316 		unsigned int rsvd0[3];
1317 		struct chsc_header response;
1318 		char data[];
1319 	} *rr;
1320 	int rc;
1321 
1322 	memset(page, 0, PAGE_SIZE);
1323 	rr = page;
1324 	rr->request.length = 0x0010;
1325 	rr->request.code = 0x003e;
1326 	rc = chsc(rr);
1327 	if (rc)
1328 		return -EIO;
1329 	memcpy(result, &rr->data, size);
1330 	return (rr->response.code == 0x0001) ? 0 : -EIO;
1331 }
1332 
1333 int chsc_siosl(struct subchannel_id schid)
1334 {
1335 	struct {
1336 		struct chsc_header request;
1337 		u32 word1;
1338 		struct subchannel_id sid;
1339 		u32 word3;
1340 		struct chsc_header response;
1341 		u32 word[11];
1342 	} *siosl_area;
1343 	unsigned long flags;
1344 	int ccode;
1345 	int rc;
1346 
1347 	spin_lock_irqsave(&chsc_page_lock, flags);
1348 	memset(chsc_page, 0, PAGE_SIZE);
1349 	siosl_area = chsc_page;
1350 	siosl_area->request.length = 0x0010;
1351 	siosl_area->request.code = 0x0046;
1352 	siosl_area->word1 = 0x80000000;
1353 	siosl_area->sid = schid;
1354 
1355 	ccode = chsc(siosl_area);
1356 	if (ccode > 0) {
1357 		if (ccode == 3)
1358 			rc = -ENODEV;
1359 		else
1360 			rc = -EBUSY;
1361 		CIO_MSG_EVENT(2, "chsc: chsc failed for 0.%x.%04x (ccode=%d)\n",
1362 			      schid.ssid, schid.sch_no, ccode);
1363 		goto out;
1364 	}
1365 	rc = chsc_error_from_response(siosl_area->response.code);
1366 	if (rc)
1367 		CIO_MSG_EVENT(2, "chsc: siosl failed for 0.%x.%04x (rc=%04x)\n",
1368 			      schid.ssid, schid.sch_no,
1369 			      siosl_area->response.code);
1370 	else
1371 		CIO_MSG_EVENT(4, "chsc: siosl succeeded for 0.%x.%04x\n",
1372 			      schid.ssid, schid.sch_no);
1373 out:
1374 	spin_unlock_irqrestore(&chsc_page_lock, flags);
1375 	return rc;
1376 }
1377 EXPORT_SYMBOL_GPL(chsc_siosl);
1378 
1379 /**
1380  * chsc_scm_info() - store SCM information (SSI)
1381  * @scm_area: request and response block for SSI
1382  * @token: continuation token
1383  *
1384  * Returns 0 on success.
1385  */
1386 int chsc_scm_info(struct chsc_scm_info *scm_area, u64 token)
1387 {
1388 	int ccode, ret;
1389 
1390 	memset(scm_area, 0, sizeof(*scm_area));
1391 	scm_area->request.length = 0x0020;
1392 	scm_area->request.code = 0x004C;
1393 	scm_area->reqtok = token;
1394 
1395 	ccode = chsc(scm_area);
1396 	if (ccode > 0) {
1397 		ret = (ccode == 3) ? -ENODEV : -EBUSY;
1398 		goto out;
1399 	}
1400 	ret = chsc_error_from_response(scm_area->response.code);
1401 	if (ret != 0)
1402 		CIO_MSG_EVENT(2, "chsc: scm info failed (rc=%04x)\n",
1403 			      scm_area->response.code);
1404 out:
1405 	return ret;
1406 }
1407 EXPORT_SYMBOL_GPL(chsc_scm_info);
1408 
1409 /**
1410  * chsc_pnso() - Perform Network-Subchannel Operation
1411  * @schid:		id of the subchannel on which PNSO is performed
1412  * @pnso_area:		request and response block for the operation
1413  * @oc:			Operation Code
1414  * @resume_token:	resume token for multiblock response
1415  * @cnc:		Boolean change-notification control
1416  *
1417  * pnso_area must be allocated by the caller with get_zeroed_page(GFP_KERNEL)
1418  *
1419  * Returns 0 on success.
1420  */
1421 int chsc_pnso(struct subchannel_id schid, struct chsc_pnso_area *pnso_area,
1422 	      u8 oc, struct chsc_pnso_resume_token resume_token, int cnc)
1423 {
1424 	memset(pnso_area, 0, sizeof(*pnso_area));
1425 	pnso_area->request.length = 0x0030;
1426 	pnso_area->request.code = 0x003d; /* network-subchannel operation */
1427 	pnso_area->m	   = schid.m;
1428 	pnso_area->ssid  = schid.ssid;
1429 	pnso_area->sch	 = schid.sch_no;
1430 	pnso_area->cssid = schid.cssid;
1431 	pnso_area->oc	 = oc;
1432 	pnso_area->resume_token = resume_token;
1433 	pnso_area->n	   = (cnc != 0);
1434 	if (chsc(pnso_area))
1435 		return -EIO;
1436 	return chsc_error_from_response(pnso_area->response.code);
1437 }
1438 
1439 int chsc_sgib(u32 origin)
1440 {
1441 	struct {
1442 		struct chsc_header request;
1443 		u16 op;
1444 		u8  reserved01[2];
1445 		u8  reserved02:4;
1446 		u8  fmt:4;
1447 		u8  reserved03[7];
1448 		/* operation data area begin */
1449 		u8  reserved04[4];
1450 		u32 gib_origin;
1451 		u8  reserved05[10];
1452 		u8  aix;
1453 		u8  reserved06[4029];
1454 		struct chsc_header response;
1455 		u8  reserved07[4];
1456 	} *sgib_area;
1457 	int ret;
1458 
1459 	spin_lock_irq(&chsc_page_lock);
1460 	memset(chsc_page, 0, PAGE_SIZE);
1461 	sgib_area = chsc_page;
1462 	sgib_area->request.length = 0x0fe0;
1463 	sgib_area->request.code = 0x0021;
1464 	sgib_area->op = 0x1;
1465 	sgib_area->gib_origin = origin;
1466 
1467 	ret = chsc(sgib_area);
1468 	if (ret == 0)
1469 		ret = chsc_error_from_response(sgib_area->response.code);
1470 	spin_unlock_irq(&chsc_page_lock);
1471 
1472 	return ret;
1473 }
1474 EXPORT_SYMBOL_GPL(chsc_sgib);
1475 
1476 #define SCUD_REQ_LEN	0x10 /* SCUD request block length */
1477 #define SCUD_REQ_CMD	0x4b /* SCUD Command Code */
1478 
1479 struct chse_cudb {
1480 	u16 flags:8;
1481 	u16 chp_valid:8;
1482 	u16 cu;
1483 	u32 esm_valid:8;
1484 	u32:24;
1485 	u8 chpid[8];
1486 	u32:32;
1487 	u32:32;
1488 	u8 esm[8];
1489 	u32 efla[8];
1490 } __packed;
1491 
1492 struct chsc_scud {
1493 	struct chsc_header request;
1494 	u16:4;
1495 	u16 fmt:4;
1496 	u16 cssid:8;
1497 	u16 first_cu;
1498 	u16:16;
1499 	u16 last_cu;
1500 	u32:32;
1501 	struct chsc_header response;
1502 	u16:4;
1503 	u16 fmt_resp:4;
1504 	u32:24;
1505 	struct chse_cudb cudb[];
1506 } __packed;
1507 
1508 /**
1509  * chsc_scud() - Store control-unit description.
1510  * @cu:		number of the control-unit
1511  * @esm:	8 1-byte endpoint security mode values
1512  * @esm_valid:	validity mask for @esm
1513  *
1514  * Interface to retrieve information about the endpoint security
1515  * modes for up to 8 paths of a control unit.
1516  *
1517  * Returns 0 on success.
1518  */
1519 int chsc_scud(u16 cu, u64 *esm, u8 *esm_valid)
1520 {
1521 	struct chsc_scud *scud = chsc_page;
1522 	int ret;
1523 
1524 	spin_lock_irq(&chsc_page_lock);
1525 	memset(chsc_page, 0, PAGE_SIZE);
1526 	scud->request.length = SCUD_REQ_LEN;
1527 	scud->request.code = SCUD_REQ_CMD;
1528 	scud->fmt = 0;
1529 	scud->cssid = 0;
1530 	scud->first_cu = cu;
1531 	scud->last_cu = cu;
1532 
1533 	ret = chsc(scud);
1534 	if (!ret)
1535 		ret = chsc_error_from_response(scud->response.code);
1536 
1537 	if (!ret && (scud->response.length <= 8 || scud->fmt_resp != 0
1538 			|| !(scud->cudb[0].flags & 0x80)
1539 			|| scud->cudb[0].cu != cu)) {
1540 
1541 		CIO_MSG_EVENT(2, "chsc: scud failed rc=%04x, L2=%04x "
1542 			"FMT=%04x, cudb.flags=%02x, cudb.cu=%04x",
1543 			scud->response.code, scud->response.length,
1544 			scud->fmt_resp, scud->cudb[0].flags, scud->cudb[0].cu);
1545 		ret = -EINVAL;
1546 	}
1547 
1548 	if (ret)
1549 		goto out;
1550 
1551 	memcpy(esm, scud->cudb[0].esm, sizeof(*esm));
1552 	*esm_valid = scud->cudb[0].esm_valid;
1553 out:
1554 	spin_unlock_irq(&chsc_page_lock);
1555 	return ret;
1556 }
1557 EXPORT_SYMBOL_GPL(chsc_scud);
1558