1/*
2 * driver for channel subsystem
3 *
4 * Copyright IBM Corp. 2002, 2010
5 *
6 * Author(s): Arnd Bergmann (arndb@de.ibm.com)
7 *	      Cornelia Huck (cornelia.huck@de.ibm.com)
8 */
9
10#define KMSG_COMPONENT "cio"
11#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
12
13#include <linux/module.h>
14#include <linux/init.h>
15#include <linux/device.h>
16#include <linux/slab.h>
17#include <linux/errno.h>
18#include <linux/list.h>
19#include <linux/reboot.h>
20#include <linux/suspend.h>
21#include <linux/proc_fs.h>
22#include <asm/isc.h>
23#include <asm/crw.h>
24
25#include "css.h"
26#include "cio.h"
27#include "cio_debug.h"
28#include "ioasm.h"
29#include "chsc.h"
30#include "device.h"
31#include "idset.h"
32#include "chp.h"
33
34int css_init_done = 0;
35int max_ssid;
36
37struct channel_subsystem *channel_subsystems[__MAX_CSSID + 1];
38static struct bus_type css_bus_type;
39
40int
41for_each_subchannel(int(*fn)(struct subchannel_id, void *), void *data)
42{
43	struct subchannel_id schid;
44	int ret;
45
46	init_subchannel_id(&schid);
47	ret = -ENODEV;
48	do {
49		do {
50			ret = fn(schid, data);
51			if (ret)
52				break;
53		} while (schid.sch_no++ < __MAX_SUBCHANNEL);
54		schid.sch_no = 0;
55	} while (schid.ssid++ < max_ssid);
56	return ret;
57}
58
59struct cb_data {
60	void *data;
61	struct idset *set;
62	int (*fn_known_sch)(struct subchannel *, void *);
63	int (*fn_unknown_sch)(struct subchannel_id, void *);
64};
65
66static int call_fn_known_sch(struct device *dev, void *data)
67{
68	struct subchannel *sch = to_subchannel(dev);
69	struct cb_data *cb = data;
70	int rc = 0;
71
72	if (cb->set)
73		idset_sch_del(cb->set, sch->schid);
74	if (cb->fn_known_sch)
75		rc = cb->fn_known_sch(sch, cb->data);
76	return rc;
77}
78
79static int call_fn_unknown_sch(struct subchannel_id schid, void *data)
80{
81	struct cb_data *cb = data;
82	int rc = 0;
83
84	if (idset_sch_contains(cb->set, schid))
85		rc = cb->fn_unknown_sch(schid, cb->data);
86	return rc;
87}
88
89static int call_fn_all_sch(struct subchannel_id schid, void *data)
90{
91	struct cb_data *cb = data;
92	struct subchannel *sch;
93	int rc = 0;
94
95	sch = get_subchannel_by_schid(schid);
96	if (sch) {
97		if (cb->fn_known_sch)
98			rc = cb->fn_known_sch(sch, cb->data);
99		put_device(&sch->dev);
100	} else {
101		if (cb->fn_unknown_sch)
102			rc = cb->fn_unknown_sch(schid, cb->data);
103	}
104
105	return rc;
106}
107
108int for_each_subchannel_staged(int (*fn_known)(struct subchannel *, void *),
109			       int (*fn_unknown)(struct subchannel_id,
110			       void *), void *data)
111{
112	struct cb_data cb;
113	int rc;
114
115	cb.data = data;
116	cb.fn_known_sch = fn_known;
117	cb.fn_unknown_sch = fn_unknown;
118
119	if (fn_known && !fn_unknown) {
120		/* Skip idset allocation in case of known-only loop. */
121		cb.set = NULL;
122		return bus_for_each_dev(&css_bus_type, NULL, &cb,
123					call_fn_known_sch);
124	}
125
126	cb.set = idset_sch_new();
127	if (!cb.set)
128		/* fall back to brute force scanning in case of oom */
129		return for_each_subchannel(call_fn_all_sch, &cb);
130
131	idset_fill(cb.set);
132
133	/* Process registered subchannels. */
134	rc = bus_for_each_dev(&css_bus_type, NULL, &cb, call_fn_known_sch);
135	if (rc)
136		goto out;
137	/* Process unregistered subchannels. */
138	if (fn_unknown)
139		rc = for_each_subchannel(call_fn_unknown_sch, &cb);
140out:
141	idset_free(cb.set);
142
143	return rc;
144}
145
146static void css_sch_todo(struct work_struct *work);
147
148static int css_sch_create_locks(struct subchannel *sch)
149{
150	sch->lock = kmalloc(sizeof(*sch->lock), GFP_KERNEL);
151	if (!sch->lock)
152		return -ENOMEM;
153
154	spin_lock_init(sch->lock);
155	mutex_init(&sch->reg_mutex);
156
157	return 0;
158}
159
160static void css_subchannel_release(struct device *dev)
161{
162	struct subchannel *sch = to_subchannel(dev);
163
164	sch->config.intparm = 0;
165	cio_commit_config(sch);
166	kfree(sch->lock);
167	kfree(sch);
168}
169
170struct subchannel *css_alloc_subchannel(struct subchannel_id schid)
171{
172	struct subchannel *sch;
173	int ret;
174
175	sch = kzalloc(sizeof(*sch), GFP_KERNEL | GFP_DMA);
176	if (!sch)
177		return ERR_PTR(-ENOMEM);
178
179	ret = cio_validate_subchannel(sch, schid);
180	if (ret < 0)
181		goto err;
182
183	ret = css_sch_create_locks(sch);
184	if (ret)
185		goto err;
186
187	INIT_WORK(&sch->todo_work, css_sch_todo);
188	sch->dev.release = &css_subchannel_release;
189	device_initialize(&sch->dev);
190	return sch;
191
192err:
193	kfree(sch);
194	return ERR_PTR(ret);
195}
196
197static int css_sch_device_register(struct subchannel *sch)
198{
199	int ret;
200
201	mutex_lock(&sch->reg_mutex);
202	dev_set_name(&sch->dev, "0.%x.%04x", sch->schid.ssid,
203		     sch->schid.sch_no);
204	ret = device_add(&sch->dev);
205	mutex_unlock(&sch->reg_mutex);
206	return ret;
207}
208
209/**
210 * css_sch_device_unregister - unregister a subchannel
211 * @sch: subchannel to be unregistered
212 */
213void css_sch_device_unregister(struct subchannel *sch)
214{
215	mutex_lock(&sch->reg_mutex);
216	if (device_is_registered(&sch->dev))
217		device_unregister(&sch->dev);
218	mutex_unlock(&sch->reg_mutex);
219}
220EXPORT_SYMBOL_GPL(css_sch_device_unregister);
221
222static void ssd_from_pmcw(struct chsc_ssd_info *ssd, struct pmcw *pmcw)
223{
224	int i;
225	int mask;
226
227	memset(ssd, 0, sizeof(struct chsc_ssd_info));
228	ssd->path_mask = pmcw->pim;
229	for (i = 0; i < 8; i++) {
230		mask = 0x80 >> i;
231		if (pmcw->pim & mask) {
232			chp_id_init(&ssd->chpid[i]);
233			ssd->chpid[i].id = pmcw->chpid[i];
234		}
235	}
236}
237
238static void ssd_register_chpids(struct chsc_ssd_info *ssd)
239{
240	int i;
241	int mask;
242
243	for (i = 0; i < 8; i++) {
244		mask = 0x80 >> i;
245		if (ssd->path_mask & mask)
246			if (!chp_is_registered(ssd->chpid[i]))
247				chp_new(ssd->chpid[i]);
248	}
249}
250
251void css_update_ssd_info(struct subchannel *sch)
252{
253	int ret;
254
255	ret = chsc_get_ssd_info(sch->schid, &sch->ssd_info);
256	if (ret)
257		ssd_from_pmcw(&sch->ssd_info, &sch->schib.pmcw);
258
259	ssd_register_chpids(&sch->ssd_info);
260}
261
262static ssize_t type_show(struct device *dev, struct device_attribute *attr,
263			 char *buf)
264{
265	struct subchannel *sch = to_subchannel(dev);
266
267	return sprintf(buf, "%01x\n", sch->st);
268}
269
270static DEVICE_ATTR(type, 0444, type_show, NULL);
271
272static ssize_t modalias_show(struct device *dev, struct device_attribute *attr,
273			     char *buf)
274{
275	struct subchannel *sch = to_subchannel(dev);
276
277	return sprintf(buf, "css:t%01X\n", sch->st);
278}
279
280static DEVICE_ATTR(modalias, 0444, modalias_show, NULL);
281
282static struct attribute *subch_attrs[] = {
283	&dev_attr_type.attr,
284	&dev_attr_modalias.attr,
285	NULL,
286};
287
288static struct attribute_group subch_attr_group = {
289	.attrs = subch_attrs,
290};
291
292static const struct attribute_group *default_subch_attr_groups[] = {
293	&subch_attr_group,
294	NULL,
295};
296
297int css_register_subchannel(struct subchannel *sch)
298{
299	int ret;
300
301	/* Initialize the subchannel structure */
302	sch->dev.parent = &channel_subsystems[0]->device;
303	sch->dev.bus = &css_bus_type;
304	sch->dev.groups = default_subch_attr_groups;
305	/*
306	 * We don't want to generate uevents for I/O subchannels that don't
307	 * have a working ccw device behind them since they will be
308	 * unregistered before they can be used anyway, so we delay the add
309	 * uevent until after device recognition was successful.
310	 * Note that we suppress the uevent for all subchannel types;
311	 * the subchannel driver can decide itself when it wants to inform
312	 * userspace of its existence.
313	 */
314	dev_set_uevent_suppress(&sch->dev, 1);
315	css_update_ssd_info(sch);
316	/* make it known to the system */
317	ret = css_sch_device_register(sch);
318	if (ret) {
319		CIO_MSG_EVENT(0, "Could not register sch 0.%x.%04x: %d\n",
320			      sch->schid.ssid, sch->schid.sch_no, ret);
321		return ret;
322	}
323	if (!sch->driver) {
324		/*
325		 * No driver matched. Generate the uevent now so that
326		 * a fitting driver module may be loaded based on the
327		 * modalias.
328		 */
329		dev_set_uevent_suppress(&sch->dev, 0);
330		kobject_uevent(&sch->dev.kobj, KOBJ_ADD);
331	}
332	return ret;
333}
334
335static int css_probe_device(struct subchannel_id schid)
336{
337	struct subchannel *sch;
338	int ret;
339
340	sch = css_alloc_subchannel(schid);
341	if (IS_ERR(sch))
342		return PTR_ERR(sch);
343
344	ret = css_register_subchannel(sch);
345	if (ret)
346		put_device(&sch->dev);
347
348	return ret;
349}
350
351static int
352check_subchannel(struct device * dev, void * data)
353{
354	struct subchannel *sch;
355	struct subchannel_id *schid = data;
356
357	sch = to_subchannel(dev);
358	return schid_equal(&sch->schid, schid);
359}
360
361struct subchannel *
362get_subchannel_by_schid(struct subchannel_id schid)
363{
364	struct device *dev;
365
366	dev = bus_find_device(&css_bus_type, NULL,
367			      &schid, check_subchannel);
368
369	return dev ? to_subchannel(dev) : NULL;
370}
371
372/**
373 * css_sch_is_valid() - check if a subchannel is valid
374 * @schib: subchannel information block for the subchannel
375 */
376int css_sch_is_valid(struct schib *schib)
377{
378	if ((schib->pmcw.st == SUBCHANNEL_TYPE_IO) && !schib->pmcw.dnv)
379		return 0;
380	if ((schib->pmcw.st == SUBCHANNEL_TYPE_MSG) && !schib->pmcw.w)
381		return 0;
382	return 1;
383}
384EXPORT_SYMBOL_GPL(css_sch_is_valid);
385
386static int css_evaluate_new_subchannel(struct subchannel_id schid, int slow)
387{
388	struct schib schib;
389
390	if (!slow) {
391		/* Will be done on the slow path. */
392		return -EAGAIN;
393	}
394	if (stsch_err(schid, &schib)) {
395		/* Subchannel is not provided. */
396		return -ENXIO;
397	}
398	if (!css_sch_is_valid(&schib)) {
399		/* Unusable - ignore. */
400		return 0;
401	}
402	CIO_MSG_EVENT(4, "event: sch 0.%x.%04x, new\n", schid.ssid,
403		      schid.sch_no);
404
405	return css_probe_device(schid);
406}
407
408static int css_evaluate_known_subchannel(struct subchannel *sch, int slow)
409{
410	int ret = 0;
411
412	if (sch->driver) {
413		if (sch->driver->sch_event)
414			ret = sch->driver->sch_event(sch, slow);
415		else
416			dev_dbg(&sch->dev,
417				"Got subchannel machine check but "
418				"no sch_event handler provided.\n");
419	}
420	if (ret != 0 && ret != -EAGAIN) {
421		CIO_MSG_EVENT(2, "eval: sch 0.%x.%04x, rc=%d\n",
422			      sch->schid.ssid, sch->schid.sch_no, ret);
423	}
424	return ret;
425}
426
427static void css_evaluate_subchannel(struct subchannel_id schid, int slow)
428{
429	struct subchannel *sch;
430	int ret;
431
432	sch = get_subchannel_by_schid(schid);
433	if (sch) {
434		ret = css_evaluate_known_subchannel(sch, slow);
435		put_device(&sch->dev);
436	} else
437		ret = css_evaluate_new_subchannel(schid, slow);
438	if (ret == -EAGAIN)
439		css_schedule_eval(schid);
440}
441
442/**
443 * css_sched_sch_todo - schedule a subchannel operation
444 * @sch: subchannel
445 * @todo: todo
446 *
447 * Schedule the operation identified by @todo to be performed on the slow path
448 * workqueue. Do nothing if another operation with higher priority is already
449 * scheduled. Needs to be called with subchannel lock held.
450 */
451void css_sched_sch_todo(struct subchannel *sch, enum sch_todo todo)
452{
453	CIO_MSG_EVENT(4, "sch_todo: sched sch=0.%x.%04x todo=%d\n",
454		      sch->schid.ssid, sch->schid.sch_no, todo);
455	if (sch->todo >= todo)
456		return;
457	/* Get workqueue ref. */
458	if (!get_device(&sch->dev))
459		return;
460	sch->todo = todo;
461	if (!queue_work(cio_work_q, &sch->todo_work)) {
462		/* Already queued, release workqueue ref. */
463		put_device(&sch->dev);
464	}
465}
466EXPORT_SYMBOL_GPL(css_sched_sch_todo);
467
468static void css_sch_todo(struct work_struct *work)
469{
470	struct subchannel *sch;
471	enum sch_todo todo;
472	int ret;
473
474	sch = container_of(work, struct subchannel, todo_work);
475	/* Find out todo. */
476	spin_lock_irq(sch->lock);
477	todo = sch->todo;
478	CIO_MSG_EVENT(4, "sch_todo: sch=0.%x.%04x, todo=%d\n", sch->schid.ssid,
479		      sch->schid.sch_no, todo);
480	sch->todo = SCH_TODO_NOTHING;
481	spin_unlock_irq(sch->lock);
482	/* Perform todo. */
483	switch (todo) {
484	case SCH_TODO_NOTHING:
485		break;
486	case SCH_TODO_EVAL:
487		ret = css_evaluate_known_subchannel(sch, 1);
488		if (ret == -EAGAIN) {
489			spin_lock_irq(sch->lock);
490			css_sched_sch_todo(sch, todo);
491			spin_unlock_irq(sch->lock);
492		}
493		break;
494	case SCH_TODO_UNREG:
495		css_sch_device_unregister(sch);
496		break;
497	}
498	/* Release workqueue ref. */
499	put_device(&sch->dev);
500}
501
502static struct idset *slow_subchannel_set;
503static spinlock_t slow_subchannel_lock;
504static wait_queue_head_t css_eval_wq;
505static atomic_t css_eval_scheduled;
506
507static int __init slow_subchannel_init(void)
508{
509	spin_lock_init(&slow_subchannel_lock);
510	atomic_set(&css_eval_scheduled, 0);
511	init_waitqueue_head(&css_eval_wq);
512	slow_subchannel_set = idset_sch_new();
513	if (!slow_subchannel_set) {
514		CIO_MSG_EVENT(0, "could not allocate slow subchannel set\n");
515		return -ENOMEM;
516	}
517	return 0;
518}
519
520static int slow_eval_known_fn(struct subchannel *sch, void *data)
521{
522	int eval;
523	int rc;
524
525	spin_lock_irq(&slow_subchannel_lock);
526	eval = idset_sch_contains(slow_subchannel_set, sch->schid);
527	idset_sch_del(slow_subchannel_set, sch->schid);
528	spin_unlock_irq(&slow_subchannel_lock);
529	if (eval) {
530		rc = css_evaluate_known_subchannel(sch, 1);
531		if (rc == -EAGAIN)
532			css_schedule_eval(sch->schid);
533	}
534	return 0;
535}
536
537static int slow_eval_unknown_fn(struct subchannel_id schid, void *data)
538{
539	int eval;
540	int rc = 0;
541
542	spin_lock_irq(&slow_subchannel_lock);
543	eval = idset_sch_contains(slow_subchannel_set, schid);
544	idset_sch_del(slow_subchannel_set, schid);
545	spin_unlock_irq(&slow_subchannel_lock);
546	if (eval) {
547		rc = css_evaluate_new_subchannel(schid, 1);
548		switch (rc) {
549		case -EAGAIN:
550			css_schedule_eval(schid);
551			rc = 0;
552			break;
553		case -ENXIO:
554		case -ENOMEM:
555		case -EIO:
556			/* These should abort looping */
557			spin_lock_irq(&slow_subchannel_lock);
558			idset_sch_del_subseq(slow_subchannel_set, schid);
559			spin_unlock_irq(&slow_subchannel_lock);
560			break;
561		default:
562			rc = 0;
563		}
564		/* Allow scheduling here since the containing loop might
565		 * take a while.  */
566		cond_resched();
567	}
568	return rc;
569}
570
571static void css_slow_path_func(struct work_struct *unused)
572{
573	unsigned long flags;
574
575	CIO_TRACE_EVENT(4, "slowpath");
576	for_each_subchannel_staged(slow_eval_known_fn, slow_eval_unknown_fn,
577				   NULL);
578	spin_lock_irqsave(&slow_subchannel_lock, flags);
579	if (idset_is_empty(slow_subchannel_set)) {
580		atomic_set(&css_eval_scheduled, 0);
581		wake_up(&css_eval_wq);
582	}
583	spin_unlock_irqrestore(&slow_subchannel_lock, flags);
584}
585
586static DECLARE_DELAYED_WORK(slow_path_work, css_slow_path_func);
587struct workqueue_struct *cio_work_q;
588
589void css_schedule_eval(struct subchannel_id schid)
590{
591	unsigned long flags;
592
593	spin_lock_irqsave(&slow_subchannel_lock, flags);
594	idset_sch_add(slow_subchannel_set, schid);
595	atomic_set(&css_eval_scheduled, 1);
596	queue_delayed_work(cio_work_q, &slow_path_work, 0);
597	spin_unlock_irqrestore(&slow_subchannel_lock, flags);
598}
599
600void css_schedule_eval_all(void)
601{
602	unsigned long flags;
603
604	spin_lock_irqsave(&slow_subchannel_lock, flags);
605	idset_fill(slow_subchannel_set);
606	atomic_set(&css_eval_scheduled, 1);
607	queue_delayed_work(cio_work_q, &slow_path_work, 0);
608	spin_unlock_irqrestore(&slow_subchannel_lock, flags);
609}
610
611static int __unset_registered(struct device *dev, void *data)
612{
613	struct idset *set = data;
614	struct subchannel *sch = to_subchannel(dev);
615
616	idset_sch_del(set, sch->schid);
617	return 0;
618}
619
620void css_schedule_eval_all_unreg(unsigned long delay)
621{
622	unsigned long flags;
623	struct idset *unreg_set;
624
625	/* Find unregistered subchannels. */
626	unreg_set = idset_sch_new();
627	if (!unreg_set) {
628		/* Fallback. */
629		css_schedule_eval_all();
630		return;
631	}
632	idset_fill(unreg_set);
633	bus_for_each_dev(&css_bus_type, NULL, unreg_set, __unset_registered);
634	/* Apply to slow_subchannel_set. */
635	spin_lock_irqsave(&slow_subchannel_lock, flags);
636	idset_add_set(slow_subchannel_set, unreg_set);
637	atomic_set(&css_eval_scheduled, 1);
638	queue_delayed_work(cio_work_q, &slow_path_work, delay);
639	spin_unlock_irqrestore(&slow_subchannel_lock, flags);
640	idset_free(unreg_set);
641}
642
643void css_wait_for_slow_path(void)
644{
645	flush_workqueue(cio_work_q);
646}
647
648/* Schedule reprobing of all unregistered subchannels. */
649void css_schedule_reprobe(void)
650{
651	/* Schedule with a delay to allow merging of subsequent calls. */
652	css_schedule_eval_all_unreg(1 * HZ);
653}
654EXPORT_SYMBOL_GPL(css_schedule_reprobe);
655
656/*
657 * Called from the machine check handler for subchannel report words.
658 */
659static void css_process_crw(struct crw *crw0, struct crw *crw1, int overflow)
660{
661	struct subchannel_id mchk_schid;
662	struct subchannel *sch;
663
664	if (overflow) {
665		css_schedule_eval_all();
666		return;
667	}
668	CIO_CRW_EVENT(2, "CRW0 reports slct=%d, oflw=%d, "
669		      "chn=%d, rsc=%X, anc=%d, erc=%X, rsid=%X\n",
670		      crw0->slct, crw0->oflw, crw0->chn, crw0->rsc, crw0->anc,
671		      crw0->erc, crw0->rsid);
672	if (crw1)
673		CIO_CRW_EVENT(2, "CRW1 reports slct=%d, oflw=%d, "
674			      "chn=%d, rsc=%X, anc=%d, erc=%X, rsid=%X\n",
675			      crw1->slct, crw1->oflw, crw1->chn, crw1->rsc,
676			      crw1->anc, crw1->erc, crw1->rsid);
677	init_subchannel_id(&mchk_schid);
678	mchk_schid.sch_no = crw0->rsid;
679	if (crw1)
680		mchk_schid.ssid = (crw1->rsid >> 4) & 3;
681
682	if (crw0->erc == CRW_ERC_PMOD) {
683		sch = get_subchannel_by_schid(mchk_schid);
684		if (sch) {
685			css_update_ssd_info(sch);
686			put_device(&sch->dev);
687		}
688	}
689	/*
690	 * Since we are always presented with IPI in the CRW, we have to
691	 * use stsch() to find out if the subchannel in question has come
692	 * or gone.
693	 */
694	css_evaluate_subchannel(mchk_schid, 0);
695}
696
697static void __init
698css_generate_pgid(struct channel_subsystem *css, u32 tod_high)
699{
700	struct cpuid cpu_id;
701
702	if (css_general_characteristics.mcss) {
703		css->global_pgid.pgid_high.ext_cssid.version = 0x80;
704		css->global_pgid.pgid_high.ext_cssid.cssid = css->cssid;
705	} else {
706#ifdef CONFIG_SMP
707		css->global_pgid.pgid_high.cpu_addr = stap();
708#else
709		css->global_pgid.pgid_high.cpu_addr = 0;
710#endif
711	}
712	get_cpu_id(&cpu_id);
713	css->global_pgid.cpu_id = cpu_id.ident;
714	css->global_pgid.cpu_model = cpu_id.machine;
715	css->global_pgid.tod_high = tod_high;
716
717}
718
719static void
720channel_subsystem_release(struct device *dev)
721{
722	struct channel_subsystem *css;
723
724	css = to_css(dev);
725	mutex_destroy(&css->mutex);
726	if (css->pseudo_subchannel) {
727		/* Implies that it has been generated but never registered. */
728		css_subchannel_release(&css->pseudo_subchannel->dev);
729		css->pseudo_subchannel = NULL;
730	}
731	kfree(css);
732}
733
734static ssize_t
735css_cm_enable_show(struct device *dev, struct device_attribute *attr,
736		   char *buf)
737{
738	struct channel_subsystem *css = to_css(dev);
739	int ret;
740
741	if (!css)
742		return 0;
743	mutex_lock(&css->mutex);
744	ret = sprintf(buf, "%x\n", css->cm_enabled);
745	mutex_unlock(&css->mutex);
746	return ret;
747}
748
749static ssize_t
750css_cm_enable_store(struct device *dev, struct device_attribute *attr,
751		    const char *buf, size_t count)
752{
753	struct channel_subsystem *css = to_css(dev);
754	int ret;
755	unsigned long val;
756
757	ret = kstrtoul(buf, 16, &val);
758	if (ret)
759		return ret;
760	mutex_lock(&css->mutex);
761	switch (val) {
762	case 0:
763		ret = css->cm_enabled ? chsc_secm(css, 0) : 0;
764		break;
765	case 1:
766		ret = css->cm_enabled ? 0 : chsc_secm(css, 1);
767		break;
768	default:
769		ret = -EINVAL;
770	}
771	mutex_unlock(&css->mutex);
772	return ret < 0 ? ret : count;
773}
774
775static DEVICE_ATTR(cm_enable, 0644, css_cm_enable_show, css_cm_enable_store);
776
777static int __init setup_css(int nr)
778{
779	u32 tod_high;
780	int ret;
781	struct channel_subsystem *css;
782
783	css = channel_subsystems[nr];
784	memset(css, 0, sizeof(struct channel_subsystem));
785	css->pseudo_subchannel =
786		kzalloc(sizeof(*css->pseudo_subchannel), GFP_KERNEL);
787	if (!css->pseudo_subchannel)
788		return -ENOMEM;
789	css->pseudo_subchannel->dev.parent = &css->device;
790	css->pseudo_subchannel->dev.release = css_subchannel_release;
791	dev_set_name(&css->pseudo_subchannel->dev, "defunct");
792	mutex_init(&css->pseudo_subchannel->reg_mutex);
793	ret = css_sch_create_locks(css->pseudo_subchannel);
794	if (ret) {
795		kfree(css->pseudo_subchannel);
796		return ret;
797	}
798	mutex_init(&css->mutex);
799	css->valid = 1;
800	css->cssid = nr;
801	dev_set_name(&css->device, "css%x", nr);
802	css->device.release = channel_subsystem_release;
803	tod_high = (u32) (get_tod_clock() >> 32);
804	css_generate_pgid(css, tod_high);
805	return 0;
806}
807
808static int css_reboot_event(struct notifier_block *this,
809			    unsigned long event,
810			    void *ptr)
811{
812	int ret, i;
813
814	ret = NOTIFY_DONE;
815	for (i = 0; i <= __MAX_CSSID; i++) {
816		struct channel_subsystem *css;
817
818		css = channel_subsystems[i];
819		mutex_lock(&css->mutex);
820		if (css->cm_enabled)
821			if (chsc_secm(css, 0))
822				ret = NOTIFY_BAD;
823		mutex_unlock(&css->mutex);
824	}
825
826	return ret;
827}
828
829static struct notifier_block css_reboot_notifier = {
830	.notifier_call = css_reboot_event,
831};
832
833/*
834 * Since the css devices are neither on a bus nor have a class
835 * nor have a special device type, we cannot stop/restart channel
836 * path measurements via the normal suspend/resume callbacks, but have
837 * to use notifiers.
838 */
839static int css_power_event(struct notifier_block *this, unsigned long event,
840			   void *ptr)
841{
842	int ret, i;
843
844	switch (event) {
845	case PM_HIBERNATION_PREPARE:
846	case PM_SUSPEND_PREPARE:
847		ret = NOTIFY_DONE;
848		for (i = 0; i <= __MAX_CSSID; i++) {
849			struct channel_subsystem *css;
850
851			css = channel_subsystems[i];
852			mutex_lock(&css->mutex);
853			if (!css->cm_enabled) {
854				mutex_unlock(&css->mutex);
855				continue;
856			}
857			ret = __chsc_do_secm(css, 0);
858			ret = notifier_from_errno(ret);
859			mutex_unlock(&css->mutex);
860		}
861		break;
862	case PM_POST_HIBERNATION:
863	case PM_POST_SUSPEND:
864		ret = NOTIFY_DONE;
865		for (i = 0; i <= __MAX_CSSID; i++) {
866			struct channel_subsystem *css;
867
868			css = channel_subsystems[i];
869			mutex_lock(&css->mutex);
870			if (!css->cm_enabled) {
871				mutex_unlock(&css->mutex);
872				continue;
873			}
874			ret = __chsc_do_secm(css, 1);
875			ret = notifier_from_errno(ret);
876			mutex_unlock(&css->mutex);
877		}
878		/* search for subchannels, which appeared during hibernation */
879		css_schedule_reprobe();
880		break;
881	default:
882		ret = NOTIFY_DONE;
883	}
884	return ret;
885
886}
887static struct notifier_block css_power_notifier = {
888	.notifier_call = css_power_event,
889};
890
891/*
892 * Now that the driver core is running, we can setup our channel subsystem.
893 * The struct subchannel's are created during probing.
894 */
895static int __init css_bus_init(void)
896{
897	int ret, i;
898
899	ret = chsc_init();
900	if (ret)
901		return ret;
902
903	chsc_determine_css_characteristics();
904	/* Try to enable MSS. */
905	ret = chsc_enable_facility(CHSC_SDA_OC_MSS);
906	if (ret)
907		max_ssid = 0;
908	else /* Success. */
909		max_ssid = __MAX_SSID;
910
911	ret = slow_subchannel_init();
912	if (ret)
913		goto out;
914
915	ret = crw_register_handler(CRW_RSC_SCH, css_process_crw);
916	if (ret)
917		goto out;
918
919	if ((ret = bus_register(&css_bus_type)))
920		goto out;
921
922	/* Setup css structure. */
923	for (i = 0; i <= __MAX_CSSID; i++) {
924		struct channel_subsystem *css;
925
926		css = kmalloc(sizeof(struct channel_subsystem), GFP_KERNEL);
927		if (!css) {
928			ret = -ENOMEM;
929			goto out_unregister;
930		}
931		channel_subsystems[i] = css;
932		ret = setup_css(i);
933		if (ret) {
934			kfree(channel_subsystems[i]);
935			goto out_unregister;
936		}
937		ret = device_register(&css->device);
938		if (ret) {
939			put_device(&css->device);
940			goto out_unregister;
941		}
942		if (css_chsc_characteristics.secm) {
943			ret = device_create_file(&css->device,
944						 &dev_attr_cm_enable);
945			if (ret)
946				goto out_device;
947		}
948		ret = device_register(&css->pseudo_subchannel->dev);
949		if (ret) {
950			put_device(&css->pseudo_subchannel->dev);
951			goto out_file;
952		}
953	}
954	ret = register_reboot_notifier(&css_reboot_notifier);
955	if (ret)
956		goto out_unregister;
957	ret = register_pm_notifier(&css_power_notifier);
958	if (ret) {
959		unregister_reboot_notifier(&css_reboot_notifier);
960		goto out_unregister;
961	}
962	css_init_done = 1;
963
964	/* Enable default isc for I/O subchannels. */
965	isc_register(IO_SCH_ISC);
966
967	return 0;
968out_file:
969	if (css_chsc_characteristics.secm)
970		device_remove_file(&channel_subsystems[i]->device,
971				   &dev_attr_cm_enable);
972out_device:
973	device_unregister(&channel_subsystems[i]->device);
974out_unregister:
975	while (i > 0) {
976		struct channel_subsystem *css;
977
978		i--;
979		css = channel_subsystems[i];
980		device_unregister(&css->pseudo_subchannel->dev);
981		css->pseudo_subchannel = NULL;
982		if (css_chsc_characteristics.secm)
983			device_remove_file(&css->device,
984					   &dev_attr_cm_enable);
985		device_unregister(&css->device);
986	}
987	bus_unregister(&css_bus_type);
988out:
989	crw_unregister_handler(CRW_RSC_SCH);
990	idset_free(slow_subchannel_set);
991	chsc_init_cleanup();
992	pr_alert("The CSS device driver initialization failed with "
993		 "errno=%d\n", ret);
994	return ret;
995}
996
997static void __init css_bus_cleanup(void)
998{
999	struct channel_subsystem *css;
1000	int i;
1001
1002	for (i = 0; i <= __MAX_CSSID; i++) {
1003		css = channel_subsystems[i];
1004		device_unregister(&css->pseudo_subchannel->dev);
1005		css->pseudo_subchannel = NULL;
1006		if (css_chsc_characteristics.secm)
1007			device_remove_file(&css->device, &dev_attr_cm_enable);
1008		device_unregister(&css->device);
1009	}
1010	bus_unregister(&css_bus_type);
1011	crw_unregister_handler(CRW_RSC_SCH);
1012	idset_free(slow_subchannel_set);
1013	chsc_init_cleanup();
1014	isc_unregister(IO_SCH_ISC);
1015}
1016
1017static int __init channel_subsystem_init(void)
1018{
1019	int ret;
1020
1021	ret = css_bus_init();
1022	if (ret)
1023		return ret;
1024	cio_work_q = create_singlethread_workqueue("cio");
1025	if (!cio_work_q) {
1026		ret = -ENOMEM;
1027		goto out_bus;
1028	}
1029	ret = io_subchannel_init();
1030	if (ret)
1031		goto out_wq;
1032
1033	return ret;
1034out_wq:
1035	destroy_workqueue(cio_work_q);
1036out_bus:
1037	css_bus_cleanup();
1038	return ret;
1039}
1040subsys_initcall(channel_subsystem_init);
1041
1042static int css_settle(struct device_driver *drv, void *unused)
1043{
1044	struct css_driver *cssdrv = to_cssdriver(drv);
1045
1046	if (cssdrv->settle)
1047		return cssdrv->settle();
1048	return 0;
1049}
1050
1051int css_complete_work(void)
1052{
1053	int ret;
1054
1055	/* Wait for the evaluation of subchannels to finish. */
1056	ret = wait_event_interruptible(css_eval_wq,
1057				       atomic_read(&css_eval_scheduled) == 0);
1058	if (ret)
1059		return -EINTR;
1060	flush_workqueue(cio_work_q);
1061	/* Wait for the subchannel type specific initialization to finish */
1062	return bus_for_each_drv(&css_bus_type, NULL, NULL, css_settle);
1063}
1064
1065
1066/*
1067 * Wait for the initialization of devices to finish, to make sure we are
1068 * done with our setup if the search for the root device starts.
1069 */
1070static int __init channel_subsystem_init_sync(void)
1071{
1072	/* Register subchannels which are already in use. */
1073	cio_register_early_subchannels();
1074	/* Start initial subchannel evaluation. */
1075	css_schedule_eval_all();
1076	css_complete_work();
1077	return 0;
1078}
1079subsys_initcall_sync(channel_subsystem_init_sync);
1080
1081void channel_subsystem_reinit(void)
1082{
1083	struct channel_path *chp;
1084	struct chp_id chpid;
1085
1086	chsc_enable_facility(CHSC_SDA_OC_MSS);
1087	chp_id_for_each(&chpid) {
1088		chp = chpid_to_chp(chpid);
1089		if (chp)
1090			chp_update_desc(chp);
1091	}
1092}
1093
1094#ifdef CONFIG_PROC_FS
1095static ssize_t cio_settle_write(struct file *file, const char __user *buf,
1096				size_t count, loff_t *ppos)
1097{
1098	int ret;
1099
1100	/* Handle pending CRW's. */
1101	crw_wait_for_channel_report();
1102	ret = css_complete_work();
1103
1104	return ret ? ret : count;
1105}
1106
1107static const struct file_operations cio_settle_proc_fops = {
1108	.open = nonseekable_open,
1109	.write = cio_settle_write,
1110	.llseek = no_llseek,
1111};
1112
1113static int __init cio_settle_init(void)
1114{
1115	struct proc_dir_entry *entry;
1116
1117	entry = proc_create("cio_settle", S_IWUSR, NULL,
1118			    &cio_settle_proc_fops);
1119	if (!entry)
1120		return -ENOMEM;
1121	return 0;
1122}
1123device_initcall(cio_settle_init);
1124#endif /*CONFIG_PROC_FS*/
1125
1126int sch_is_pseudo_sch(struct subchannel *sch)
1127{
1128	return sch == to_css(sch->dev.parent)->pseudo_subchannel;
1129}
1130
1131static int css_bus_match(struct device *dev, struct device_driver *drv)
1132{
1133	struct subchannel *sch = to_subchannel(dev);
1134	struct css_driver *driver = to_cssdriver(drv);
1135	struct css_device_id *id;
1136
1137	for (id = driver->subchannel_type; id->match_flags; id++) {
1138		if (sch->st == id->type)
1139			return 1;
1140	}
1141
1142	return 0;
1143}
1144
1145static int css_probe(struct device *dev)
1146{
1147	struct subchannel *sch;
1148	int ret;
1149
1150	sch = to_subchannel(dev);
1151	sch->driver = to_cssdriver(dev->driver);
1152	ret = sch->driver->probe ? sch->driver->probe(sch) : 0;
1153	if (ret)
1154		sch->driver = NULL;
1155	return ret;
1156}
1157
1158static int css_remove(struct device *dev)
1159{
1160	struct subchannel *sch;
1161	int ret;
1162
1163	sch = to_subchannel(dev);
1164	ret = sch->driver->remove ? sch->driver->remove(sch) : 0;
1165	sch->driver = NULL;
1166	return ret;
1167}
1168
1169static void css_shutdown(struct device *dev)
1170{
1171	struct subchannel *sch;
1172
1173	sch = to_subchannel(dev);
1174	if (sch->driver && sch->driver->shutdown)
1175		sch->driver->shutdown(sch);
1176}
1177
1178static int css_uevent(struct device *dev, struct kobj_uevent_env *env)
1179{
1180	struct subchannel *sch = to_subchannel(dev);
1181	int ret;
1182
1183	ret = add_uevent_var(env, "ST=%01X", sch->st);
1184	if (ret)
1185		return ret;
1186	ret = add_uevent_var(env, "MODALIAS=css:t%01X", sch->st);
1187	return ret;
1188}
1189
1190static int css_pm_prepare(struct device *dev)
1191{
1192	struct subchannel *sch = to_subchannel(dev);
1193	struct css_driver *drv;
1194
1195	if (mutex_is_locked(&sch->reg_mutex))
1196		return -EAGAIN;
1197	if (!sch->dev.driver)
1198		return 0;
1199	drv = to_cssdriver(sch->dev.driver);
1200	/* Notify drivers that they may not register children. */
1201	return drv->prepare ? drv->prepare(sch) : 0;
1202}
1203
1204static void css_pm_complete(struct device *dev)
1205{
1206	struct subchannel *sch = to_subchannel(dev);
1207	struct css_driver *drv;
1208
1209	if (!sch->dev.driver)
1210		return;
1211	drv = to_cssdriver(sch->dev.driver);
1212	if (drv->complete)
1213		drv->complete(sch);
1214}
1215
1216static int css_pm_freeze(struct device *dev)
1217{
1218	struct subchannel *sch = to_subchannel(dev);
1219	struct css_driver *drv;
1220
1221	if (!sch->dev.driver)
1222		return 0;
1223	drv = to_cssdriver(sch->dev.driver);
1224	return drv->freeze ? drv->freeze(sch) : 0;
1225}
1226
1227static int css_pm_thaw(struct device *dev)
1228{
1229	struct subchannel *sch = to_subchannel(dev);
1230	struct css_driver *drv;
1231
1232	if (!sch->dev.driver)
1233		return 0;
1234	drv = to_cssdriver(sch->dev.driver);
1235	return drv->thaw ? drv->thaw(sch) : 0;
1236}
1237
1238static int css_pm_restore(struct device *dev)
1239{
1240	struct subchannel *sch = to_subchannel(dev);
1241	struct css_driver *drv;
1242
1243	css_update_ssd_info(sch);
1244	if (!sch->dev.driver)
1245		return 0;
1246	drv = to_cssdriver(sch->dev.driver);
1247	return drv->restore ? drv->restore(sch) : 0;
1248}
1249
1250static const struct dev_pm_ops css_pm_ops = {
1251	.prepare = css_pm_prepare,
1252	.complete = css_pm_complete,
1253	.freeze = css_pm_freeze,
1254	.thaw = css_pm_thaw,
1255	.restore = css_pm_restore,
1256};
1257
1258static struct bus_type css_bus_type = {
1259	.name     = "css",
1260	.match    = css_bus_match,
1261	.probe    = css_probe,
1262	.remove   = css_remove,
1263	.shutdown = css_shutdown,
1264	.uevent   = css_uevent,
1265	.pm = &css_pm_ops,
1266};
1267
1268/**
1269 * css_driver_register - register a css driver
1270 * @cdrv: css driver to register
1271 *
1272 * This is mainly a wrapper around driver_register that sets name
1273 * and bus_type in the embedded struct device_driver correctly.
1274 */
1275int css_driver_register(struct css_driver *cdrv)
1276{
1277	cdrv->drv.bus = &css_bus_type;
1278	return driver_register(&cdrv->drv);
1279}
1280EXPORT_SYMBOL_GPL(css_driver_register);
1281
1282/**
1283 * css_driver_unregister - unregister a css driver
1284 * @cdrv: css driver to unregister
1285 *
1286 * This is a wrapper around driver_unregister.
1287 */
1288void css_driver_unregister(struct css_driver *cdrv)
1289{
1290	driver_unregister(&cdrv->drv);
1291}
1292EXPORT_SYMBOL_GPL(css_driver_unregister);
1293
1294MODULE_LICENSE("GPL");
1295