[S390] cio: rename css to channel_subsystems
[linux-2.6/x86.git] / drivers / s390 / cio / css.c
blob08f6e7b6c999f5c1ae2f2194634046db0744b262
1 /*
2 * drivers/s390/cio/css.c
3 * driver for channel subsystem
5 * Copyright (C) 2002 IBM Deutschland Entwicklung GmbH,
6 * IBM Corporation
7 * Author(s): Arnd Bergmann (arndb@de.ibm.com)
8 * Cornelia Huck (cornelia.huck@de.ibm.com)
9 */
10 #include <linux/module.h>
11 #include <linux/init.h>
12 #include <linux/device.h>
13 #include <linux/slab.h>
14 #include <linux/errno.h>
15 #include <linux/list.h>
17 #include "css.h"
18 #include "cio.h"
19 #include "cio_debug.h"
20 #include "ioasm.h"
21 #include "chsc.h"
22 #include "device.h"
23 #include "idset.h"
24 #include "chp.h"
26 int css_init_done = 0;
27 static int need_reprobe = 0;
28 static int max_ssid = 0;
30 struct channel_subsystem *channel_subsystems[__MAX_CSSID + 1];
32 int css_characteristics_avail = 0;
34 int
35 for_each_subchannel(int(*fn)(struct subchannel_id, void *), void *data)
37 struct subchannel_id schid;
38 int ret;
40 init_subchannel_id(&schid);
41 ret = -ENODEV;
42 do {
43 do {
44 ret = fn(schid, data);
45 if (ret)
46 break;
47 } while (schid.sch_no++ < __MAX_SUBCHANNEL);
48 schid.sch_no = 0;
49 } while (schid.ssid++ < max_ssid);
50 return ret;
53 static struct subchannel *
54 css_alloc_subchannel(struct subchannel_id schid)
56 struct subchannel *sch;
57 int ret;
59 sch = kmalloc (sizeof (*sch), GFP_KERNEL | GFP_DMA);
60 if (sch == NULL)
61 return ERR_PTR(-ENOMEM);
62 ret = cio_validate_subchannel (sch, schid);
63 if (ret < 0) {
64 kfree(sch);
65 return ERR_PTR(ret);
68 if (sch->st != SUBCHANNEL_TYPE_IO) {
69 /* For now we ignore all non-io subchannels. */
70 kfree(sch);
71 return ERR_PTR(-EINVAL);
74 /*
75 * Set intparm to subchannel address.
76 * This is fine even on 64bit since the subchannel is always located
77 * under 2G.
79 sch->schib.pmcw.intparm = (__u32)(unsigned long)sch;
80 ret = cio_modify(sch);
81 if (ret) {
82 kfree(sch->lock);
83 kfree(sch);
84 return ERR_PTR(ret);
86 return sch;
89 static void
90 css_free_subchannel(struct subchannel *sch)
92 if (sch) {
93 /* Reset intparm to zeroes. */
94 sch->schib.pmcw.intparm = 0;
95 cio_modify(sch);
96 kfree(sch->lock);
97 kfree(sch);
101 static void
102 css_subchannel_release(struct device *dev)
104 struct subchannel *sch;
106 sch = to_subchannel(dev);
107 if (!cio_is_console(sch->schid)) {
108 kfree(sch->lock);
109 kfree(sch);
113 static int css_sch_device_register(struct subchannel *sch)
115 int ret;
117 mutex_lock(&sch->reg_mutex);
118 ret = device_register(&sch->dev);
119 mutex_unlock(&sch->reg_mutex);
120 return ret;
123 void css_sch_device_unregister(struct subchannel *sch)
125 mutex_lock(&sch->reg_mutex);
126 device_unregister(&sch->dev);
127 mutex_unlock(&sch->reg_mutex);
130 static void ssd_from_pmcw(struct chsc_ssd_info *ssd, struct pmcw *pmcw)
132 int i;
133 int mask;
135 memset(ssd, 0, sizeof(struct chsc_ssd_info));
136 ssd->path_mask = pmcw->pim;
137 for (i = 0; i < 8; i++) {
138 mask = 0x80 >> i;
139 if (pmcw->pim & mask) {
140 chp_id_init(&ssd->chpid[i]);
141 ssd->chpid[i].id = pmcw->chpid[i];
146 static void ssd_register_chpids(struct chsc_ssd_info *ssd)
148 int i;
149 int mask;
151 for (i = 0; i < 8; i++) {
152 mask = 0x80 >> i;
153 if (ssd->path_mask & mask)
154 if (!chp_is_registered(ssd->chpid[i]))
155 chp_new(ssd->chpid[i]);
159 void css_update_ssd_info(struct subchannel *sch)
161 int ret;
163 if (cio_is_console(sch->schid)) {
164 /* Console is initialized too early for functions requiring
165 * memory allocation. */
166 ssd_from_pmcw(&sch->ssd_info, &sch->schib.pmcw);
167 } else {
168 ret = chsc_get_ssd_info(sch->schid, &sch->ssd_info);
169 if (ret)
170 ssd_from_pmcw(&sch->ssd_info, &sch->schib.pmcw);
171 ssd_register_chpids(&sch->ssd_info);
175 static int css_register_subchannel(struct subchannel *sch)
177 int ret;
179 /* Initialize the subchannel structure */
180 sch->dev.parent = &channel_subsystems[0]->device;
181 sch->dev.bus = &css_bus_type;
182 sch->dev.release = &css_subchannel_release;
183 sch->dev.groups = subch_attr_groups;
184 css_update_ssd_info(sch);
185 /* make it known to the system */
186 ret = css_sch_device_register(sch);
187 if (ret) {
188 CIO_MSG_EVENT(0, "Could not register sch 0.%x.%04x: %d\n",
189 sch->schid.ssid, sch->schid.sch_no, ret);
190 return ret;
192 return ret;
195 static int css_probe_device(struct subchannel_id schid)
197 int ret;
198 struct subchannel *sch;
200 sch = css_alloc_subchannel(schid);
201 if (IS_ERR(sch))
202 return PTR_ERR(sch);
203 ret = css_register_subchannel(sch);
204 if (ret)
205 css_free_subchannel(sch);
206 return ret;
209 static int
210 check_subchannel(struct device * dev, void * data)
212 struct subchannel *sch;
213 struct subchannel_id *schid = data;
215 sch = to_subchannel(dev);
216 return schid_equal(&sch->schid, schid);
219 struct subchannel *
220 get_subchannel_by_schid(struct subchannel_id schid)
222 struct device *dev;
224 dev = bus_find_device(&css_bus_type, NULL,
225 &schid, check_subchannel);
227 return dev ? to_subchannel(dev) : NULL;
230 static int css_get_subchannel_status(struct subchannel *sch)
232 struct schib schib;
234 if (stsch(sch->schid, &schib) || !schib.pmcw.dnv)
235 return CIO_GONE;
236 if (sch->schib.pmcw.dnv && (schib.pmcw.dev != sch->schib.pmcw.dev))
237 return CIO_REVALIDATE;
238 if (!sch->lpm)
239 return CIO_NO_PATH;
240 return CIO_OPER;
243 static int css_evaluate_known_subchannel(struct subchannel *sch, int slow)
245 int event, ret, disc;
246 unsigned long flags;
247 enum { NONE, UNREGISTER, UNREGISTER_PROBE, REPROBE } action;
249 spin_lock_irqsave(sch->lock, flags);
250 disc = device_is_disconnected(sch);
251 if (disc && slow) {
252 /* Disconnected devices are evaluated directly only.*/
253 spin_unlock_irqrestore(sch->lock, flags);
254 return 0;
256 /* No interrupt after machine check - kill pending timers. */
257 device_kill_pending_timer(sch);
258 if (!disc && !slow) {
259 /* Non-disconnected devices are evaluated on the slow path. */
260 spin_unlock_irqrestore(sch->lock, flags);
261 return -EAGAIN;
263 event = css_get_subchannel_status(sch);
264 CIO_MSG_EVENT(4, "Evaluating schid 0.%x.%04x, event %d, %s, %s path.\n",
265 sch->schid.ssid, sch->schid.sch_no, event,
266 disc ? "disconnected" : "normal",
267 slow ? "slow" : "fast");
268 /* Analyze subchannel status. */
269 action = NONE;
270 switch (event) {
271 case CIO_NO_PATH:
272 if (disc) {
273 /* Check if paths have become available. */
274 action = REPROBE;
275 break;
277 /* fall through */
278 case CIO_GONE:
279 /* Prevent unwanted effects when opening lock. */
280 cio_disable_subchannel(sch);
281 device_set_disconnected(sch);
282 /* Ask driver what to do with device. */
283 action = UNREGISTER;
284 if (sch->driver && sch->driver->notify) {
285 spin_unlock_irqrestore(sch->lock, flags);
286 ret = sch->driver->notify(&sch->dev, event);
287 spin_lock_irqsave(sch->lock, flags);
288 if (ret)
289 action = NONE;
291 break;
292 case CIO_REVALIDATE:
293 /* Device will be removed, so no notify necessary. */
294 if (disc)
295 /* Reprobe because immediate unregister might block. */
296 action = REPROBE;
297 else
298 action = UNREGISTER_PROBE;
299 break;
300 case CIO_OPER:
301 if (disc)
302 /* Get device operational again. */
303 action = REPROBE;
304 break;
306 /* Perform action. */
307 ret = 0;
308 switch (action) {
309 case UNREGISTER:
310 case UNREGISTER_PROBE:
311 /* Unregister device (will use subchannel lock). */
312 spin_unlock_irqrestore(sch->lock, flags);
313 css_sch_device_unregister(sch);
314 spin_lock_irqsave(sch->lock, flags);
316 /* Reset intparm to zeroes. */
317 sch->schib.pmcw.intparm = 0;
318 cio_modify(sch);
319 break;
320 case REPROBE:
321 device_trigger_reprobe(sch);
322 break;
323 default:
324 break;
326 spin_unlock_irqrestore(sch->lock, flags);
327 /* Probe if necessary. */
328 if (action == UNREGISTER_PROBE)
329 ret = css_probe_device(sch->schid);
331 return ret;
334 static int css_evaluate_new_subchannel(struct subchannel_id schid, int slow)
336 struct schib schib;
338 if (!slow) {
339 /* Will be done on the slow path. */
340 return -EAGAIN;
342 if (stsch_err(schid, &schib) || !schib.pmcw.dnv) {
343 /* Unusable - ignore. */
344 return 0;
346 CIO_MSG_EVENT(4, "Evaluating schid 0.%x.%04x, event %d, unknown, "
347 "slow path.\n", schid.ssid, schid.sch_no, CIO_OPER);
349 return css_probe_device(schid);
352 static void css_evaluate_subchannel(struct subchannel_id schid, int slow)
354 struct subchannel *sch;
355 int ret;
357 sch = get_subchannel_by_schid(schid);
358 if (sch) {
359 ret = css_evaluate_known_subchannel(sch, slow);
360 put_device(&sch->dev);
361 } else
362 ret = css_evaluate_new_subchannel(schid, slow);
363 if (ret == -EAGAIN)
364 css_schedule_eval(schid);
367 static struct idset *slow_subchannel_set;
368 static spinlock_t slow_subchannel_lock;
370 static int __init slow_subchannel_init(void)
372 spin_lock_init(&slow_subchannel_lock);
373 slow_subchannel_set = idset_sch_new();
374 if (!slow_subchannel_set) {
375 CIO_MSG_EVENT(0, "could not allocate slow subchannel set\n");
376 return -ENOMEM;
378 return 0;
381 static void css_slow_path_func(struct work_struct *unused)
383 struct subchannel_id schid;
385 CIO_TRACE_EVENT(4, "slowpath");
386 spin_lock_irq(&slow_subchannel_lock);
387 init_subchannel_id(&schid);
388 while (idset_sch_get_first(slow_subchannel_set, &schid)) {
389 idset_sch_del(slow_subchannel_set, schid);
390 spin_unlock_irq(&slow_subchannel_lock);
391 css_evaluate_subchannel(schid, 1);
392 spin_lock_irq(&slow_subchannel_lock);
394 spin_unlock_irq(&slow_subchannel_lock);
397 static DECLARE_WORK(slow_path_work, css_slow_path_func);
398 struct workqueue_struct *slow_path_wq;
400 void css_schedule_eval(struct subchannel_id schid)
402 unsigned long flags;
404 spin_lock_irqsave(&slow_subchannel_lock, flags);
405 idset_sch_add(slow_subchannel_set, schid);
406 queue_work(slow_path_wq, &slow_path_work);
407 spin_unlock_irqrestore(&slow_subchannel_lock, flags);
410 void css_schedule_eval_all(void)
412 unsigned long flags;
414 spin_lock_irqsave(&slow_subchannel_lock, flags);
415 idset_fill(slow_subchannel_set);
416 queue_work(slow_path_wq, &slow_path_work);
417 spin_unlock_irqrestore(&slow_subchannel_lock, flags);
420 /* Reprobe subchannel if unregistered. */
421 static int reprobe_subchannel(struct subchannel_id schid, void *data)
423 struct subchannel *sch;
424 int ret;
426 CIO_MSG_EVENT(6, "cio: reprobe 0.%x.%04x\n",
427 schid.ssid, schid.sch_no);
428 if (need_reprobe)
429 return -EAGAIN;
431 sch = get_subchannel_by_schid(schid);
432 if (sch) {
433 /* Already known. */
434 put_device(&sch->dev);
435 return 0;
438 ret = css_probe_device(schid);
439 switch (ret) {
440 case 0:
441 break;
442 case -ENXIO:
443 case -ENOMEM:
444 /* These should abort looping */
445 break;
446 default:
447 ret = 0;
450 return ret;
453 /* Work function used to reprobe all unregistered subchannels. */
454 static void reprobe_all(struct work_struct *unused)
456 int ret;
458 CIO_MSG_EVENT(2, "reprobe start\n");
460 need_reprobe = 0;
461 /* Make sure initial subchannel scan is done. */
462 wait_event(ccw_device_init_wq,
463 atomic_read(&ccw_device_init_count) == 0);
464 ret = for_each_subchannel(reprobe_subchannel, NULL);
466 CIO_MSG_EVENT(2, "reprobe done (rc=%d, need_reprobe=%d)\n", ret,
467 need_reprobe);
470 static DECLARE_WORK(css_reprobe_work, reprobe_all);
472 /* Schedule reprobing of all unregistered subchannels. */
473 void css_schedule_reprobe(void)
475 need_reprobe = 1;
476 queue_work(ccw_device_work, &css_reprobe_work);
479 EXPORT_SYMBOL_GPL(css_schedule_reprobe);
482 * Called from the machine check handler for subchannel report words.
484 void css_process_crw(int rsid1, int rsid2)
486 struct subchannel_id mchk_schid;
488 CIO_CRW_EVENT(2, "source is subchannel %04X, subsystem id %x\n",
489 rsid1, rsid2);
490 init_subchannel_id(&mchk_schid);
491 mchk_schid.sch_no = rsid1;
492 if (rsid2 != 0)
493 mchk_schid.ssid = (rsid2 >> 8) & 3;
496 * Since we are always presented with IPI in the CRW, we have to
497 * use stsch() to find out if the subchannel in question has come
498 * or gone.
500 css_evaluate_subchannel(mchk_schid, 0);
503 static int __init
504 __init_channel_subsystem(struct subchannel_id schid, void *data)
506 struct subchannel *sch;
507 int ret;
509 if (cio_is_console(schid))
510 sch = cio_get_console_subchannel();
511 else {
512 sch = css_alloc_subchannel(schid);
513 if (IS_ERR(sch))
514 ret = PTR_ERR(sch);
515 else
516 ret = 0;
517 switch (ret) {
518 case 0:
519 break;
520 case -ENOMEM:
521 panic("Out of memory in init_channel_subsystem\n");
522 /* -ENXIO: no more subchannels. */
523 case -ENXIO:
524 return ret;
525 /* -EIO: this subchannel set not supported. */
526 case -EIO:
527 return ret;
528 default:
529 return 0;
533 * We register ALL valid subchannels in ioinfo, even those
534 * that have been present before init_channel_subsystem.
535 * These subchannels can't have been registered yet (kmalloc
536 * not working) so we do it now. This is true e.g. for the
537 * console subchannel.
539 css_register_subchannel(sch);
540 return 0;
543 static void __init
544 css_generate_pgid(struct channel_subsystem *css, u32 tod_high)
546 if (css_characteristics_avail && css_general_characteristics.mcss) {
547 css->global_pgid.pgid_high.ext_cssid.version = 0x80;
548 css->global_pgid.pgid_high.ext_cssid.cssid = css->cssid;
549 } else {
550 #ifdef CONFIG_SMP
551 css->global_pgid.pgid_high.cpu_addr = hard_smp_processor_id();
552 #else
553 css->global_pgid.pgid_high.cpu_addr = 0;
554 #endif
556 css->global_pgid.cpu_id = ((cpuid_t *) __LC_CPUID)->ident;
557 css->global_pgid.cpu_model = ((cpuid_t *) __LC_CPUID)->machine;
558 css->global_pgid.tod_high = tod_high;
562 static void
563 channel_subsystem_release(struct device *dev)
565 struct channel_subsystem *css;
567 css = to_css(dev);
568 mutex_destroy(&css->mutex);
569 kfree(css);
572 static ssize_t
573 css_cm_enable_show(struct device *dev, struct device_attribute *attr,
574 char *buf)
576 struct channel_subsystem *css = to_css(dev);
578 if (!css)
579 return 0;
580 return sprintf(buf, "%x\n", css->cm_enabled);
583 static ssize_t
584 css_cm_enable_store(struct device *dev, struct device_attribute *attr,
585 const char *buf, size_t count)
587 struct channel_subsystem *css = to_css(dev);
588 int ret;
590 switch (buf[0]) {
591 case '0':
592 ret = css->cm_enabled ? chsc_secm(css, 0) : 0;
593 break;
594 case '1':
595 ret = css->cm_enabled ? 0 : chsc_secm(css, 1);
596 break;
597 default:
598 ret = -EINVAL;
600 return ret < 0 ? ret : count;
603 static DEVICE_ATTR(cm_enable, 0644, css_cm_enable_show, css_cm_enable_store);
605 static int __init setup_css(int nr)
607 u32 tod_high;
608 int ret;
609 struct channel_subsystem *css;
611 css = channel_subsystems[nr];
612 memset(css, 0, sizeof(struct channel_subsystem));
613 css->pseudo_subchannel =
614 kzalloc(sizeof(*css->pseudo_subchannel), GFP_KERNEL);
615 if (!css->pseudo_subchannel)
616 return -ENOMEM;
617 css->pseudo_subchannel->dev.parent = &css->device;
618 css->pseudo_subchannel->dev.release = css_subchannel_release;
619 sprintf(css->pseudo_subchannel->dev.bus_id, "defunct");
620 ret = cio_create_sch_lock(css->pseudo_subchannel);
621 if (ret) {
622 kfree(css->pseudo_subchannel);
623 return ret;
625 mutex_init(&css->mutex);
626 css->valid = 1;
627 css->cssid = nr;
628 sprintf(css->device.bus_id, "css%x", nr);
629 css->device.release = channel_subsystem_release;
630 tod_high = (u32) (get_clock() >> 32);
631 css_generate_pgid(css, tod_high);
632 return 0;
636 * Now that the driver core is running, we can setup our channel subsystem.
637 * The struct subchannel's are created during probing (except for the
638 * static console subchannel).
640 static int __init
641 init_channel_subsystem (void)
643 int ret, i;
645 ret = chsc_determine_css_characteristics();
646 if (ret == -ENOMEM)
647 goto out; /* No need to continue. */
648 if (ret == 0)
649 css_characteristics_avail = 1;
651 ret = chsc_alloc_sei_area();
652 if (ret)
653 goto out;
655 ret = slow_subchannel_init();
656 if (ret)
657 goto out;
659 if ((ret = bus_register(&css_bus_type)))
660 goto out;
662 /* Try to enable MSS. */
663 ret = chsc_enable_facility(CHSC_SDA_OC_MSS);
664 switch (ret) {
665 case 0: /* Success. */
666 max_ssid = __MAX_SSID;
667 break;
668 case -ENOMEM:
669 goto out_bus;
670 default:
671 max_ssid = 0;
673 /* Setup css structure. */
674 for (i = 0; i <= __MAX_CSSID; i++) {
675 struct channel_subsystem *css;
677 css = kmalloc(sizeof(struct channel_subsystem), GFP_KERNEL);
678 if (!css) {
679 ret = -ENOMEM;
680 goto out_unregister;
682 channel_subsystems[i] = css;
683 ret = setup_css(i);
684 if (ret)
685 goto out_free;
686 ret = device_register(&css->device);
687 if (ret)
688 goto out_free_all;
689 if (css_characteristics_avail &&
690 css_chsc_characteristics.secm) {
691 ret = device_create_file(&css->device,
692 &dev_attr_cm_enable);
693 if (ret)
694 goto out_device;
696 ret = device_register(&css->pseudo_subchannel->dev);
697 if (ret)
698 goto out_file;
700 css_init_done = 1;
702 ctl_set_bit(6, 28);
704 for_each_subchannel(__init_channel_subsystem, NULL);
705 return 0;
706 out_file:
707 device_remove_file(&channel_subsystems[i]->device,
708 &dev_attr_cm_enable);
709 out_device:
710 device_unregister(&channel_subsystems[i]->device);
711 out_free_all:
712 kfree(channel_subsystems[i]->pseudo_subchannel->lock);
713 kfree(channel_subsystems[i]->pseudo_subchannel);
714 out_free:
715 kfree(channel_subsystems[i]);
716 out_unregister:
717 while (i > 0) {
718 struct channel_subsystem *css;
720 i--;
721 css = channel_subsystems[i];
722 device_unregister(&css->pseudo_subchannel->dev);
723 if (css_characteristics_avail && css_chsc_characteristics.secm)
724 device_remove_file(&css->device,
725 &dev_attr_cm_enable);
726 device_unregister(&css->device);
728 out_bus:
729 bus_unregister(&css_bus_type);
730 out:
731 chsc_free_sei_area();
732 kfree(slow_subchannel_set);
733 printk(KERN_WARNING"cio: failed to initialize css driver (%d)!\n",
734 ret);
735 return ret;
738 int sch_is_pseudo_sch(struct subchannel *sch)
740 return sch == to_css(sch->dev.parent)->pseudo_subchannel;
744 * find a driver for a subchannel. They identify by the subchannel
745 * type with the exception that the console subchannel driver has its own
746 * subchannel type although the device is an i/o subchannel
748 static int
749 css_bus_match (struct device *dev, struct device_driver *drv)
751 struct subchannel *sch = container_of (dev, struct subchannel, dev);
752 struct css_driver *driver = container_of (drv, struct css_driver, drv);
754 if (sch->st == driver->subchannel_type)
755 return 1;
757 return 0;
760 static int
761 css_probe (struct device *dev)
763 struct subchannel *sch;
765 sch = to_subchannel(dev);
766 sch->driver = container_of (dev->driver, struct css_driver, drv);
767 return (sch->driver->probe ? sch->driver->probe(sch) : 0);
770 static int
771 css_remove (struct device *dev)
773 struct subchannel *sch;
775 sch = to_subchannel(dev);
776 return (sch->driver->remove ? sch->driver->remove(sch) : 0);
779 static void
780 css_shutdown (struct device *dev)
782 struct subchannel *sch;
784 sch = to_subchannel(dev);
785 if (sch->driver->shutdown)
786 sch->driver->shutdown(sch);
789 struct bus_type css_bus_type = {
790 .name = "css",
791 .match = css_bus_match,
792 .probe = css_probe,
793 .remove = css_remove,
794 .shutdown = css_shutdown,
797 subsys_initcall(init_channel_subsystem);
799 MODULE_LICENSE("GPL");
800 EXPORT_SYMBOL(css_bus_type);
801 EXPORT_SYMBOL_GPL(css_characteristics_avail);