css.c 21.5 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4
/*
 *  drivers/s390/cio/css.c
 *  driver for channel subsystem
 *
5
 *    Copyright IBM Corp. 2002,2008
L
Linus Torvalds 已提交
6
 *    Author(s): Arnd Bergmann (arndb@de.ibm.com)
7
 *		 Cornelia Huck (cornelia.huck@de.ibm.com)
L
Linus Torvalds 已提交
8 9 10 11 12 13 14
 */
#include <linux/module.h>
#include <linux/init.h>
#include <linux/device.h>
#include <linux/slab.h>
#include <linux/errno.h>
#include <linux/list.h>
15
#include <linux/reboot.h>
L
Linus Torvalds 已提交
16

17
#include "../s390mach.h"
L
Linus Torvalds 已提交
18 19 20 21 22
#include "css.h"
#include "cio.h"
#include "cio_debug.h"
#include "ioasm.h"
#include "chsc.h"
23
#include "device.h"
24
#include "idset.h"
25
#include "chp.h"
L
Linus Torvalds 已提交
26 27

int css_init_done = 0;
28
static int need_reprobe = 0;
29
static int max_ssid = 0;
L
Linus Torvalds 已提交
30

31
struct channel_subsystem *channel_subsystems[__MAX_CSSID + 1];
L
Linus Torvalds 已提交
32

33
int css_characteristics_avail = 0;
L
Linus Torvalds 已提交
34

35
int
36 37 38 39 40 41 42 43
for_each_subchannel(int(*fn)(struct subchannel_id, void *), void *data)
{
	struct subchannel_id schid;
	int ret;

	init_subchannel_id(&schid);
	ret = -ENODEV;
	do {
44 45 46 47 48 49 50
		do {
			ret = fn(schid, data);
			if (ret)
				break;
		} while (schid.sch_no++ < __MAX_SUBCHANNEL);
		schid.sch_no = 0;
	} while (schid.ssid++ < max_ssid);
51 52 53
	return ret;
}

54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109
struct cb_data {
	void *data;
	struct idset *set;
	int (*fn_known_sch)(struct subchannel *, void *);
	int (*fn_unknown_sch)(struct subchannel_id, void *);
};

static int call_fn_known_sch(struct device *dev, void *data)
{
	struct subchannel *sch = to_subchannel(dev);
	struct cb_data *cb = data;
	int rc = 0;

	idset_sch_del(cb->set, sch->schid);
	if (cb->fn_known_sch)
		rc = cb->fn_known_sch(sch, cb->data);
	return rc;
}

static int call_fn_unknown_sch(struct subchannel_id schid, void *data)
{
	struct cb_data *cb = data;
	int rc = 0;

	if (idset_sch_contains(cb->set, schid))
		rc = cb->fn_unknown_sch(schid, cb->data);
	return rc;
}

int for_each_subchannel_staged(int (*fn_known)(struct subchannel *, void *),
			       int (*fn_unknown)(struct subchannel_id,
			       void *), void *data)
{
	struct cb_data cb;
	int rc;

	cb.set = idset_sch_new();
	if (!cb.set)
		return -ENOMEM;
	idset_fill(cb.set);
	cb.data = data;
	cb.fn_known_sch = fn_known;
	cb.fn_unknown_sch = fn_unknown;
	/* Process registered subchannels. */
	rc = bus_for_each_dev(&css_bus_type, NULL, &cb, call_fn_known_sch);
	if (rc)
		goto out;
	/* Process unregistered subchannels. */
	if (fn_unknown)
		rc = for_each_subchannel(call_fn_unknown_sch, &cb);
out:
	idset_free(cb.set);

	return rc;
}

L
Linus Torvalds 已提交
110
static struct subchannel *
111
css_alloc_subchannel(struct subchannel_id schid)
L
Linus Torvalds 已提交
112 113 114 115 116 117 118
{
	struct subchannel *sch;
	int ret;

	sch = kmalloc (sizeof (*sch), GFP_KERNEL | GFP_DMA);
	if (sch == NULL)
		return ERR_PTR(-ENOMEM);
119
	ret = cio_validate_subchannel (sch, schid);
L
Linus Torvalds 已提交
120 121 122 123 124 125 126 127 128 129 130 131 132 133
	if (ret < 0) {
		kfree(sch);
		return ERR_PTR(ret);
	}
	return sch;
}

static void
css_free_subchannel(struct subchannel *sch)
{
	if (sch) {
		/* Reset intparm to zeroes. */
		sch->schib.pmcw.intparm = 0;
		cio_modify(sch);
C
Cornelia Huck 已提交
134
		kfree(sch->lock);
L
Linus Torvalds 已提交
135 136 137 138 139 140 141 142 143 144
		kfree(sch);
	}
}

static void
css_subchannel_release(struct device *dev)
{
	struct subchannel *sch;

	sch = to_subchannel(dev);
C
Cornelia Huck 已提交
145 146
	if (!cio_is_console(sch->schid)) {
		kfree(sch->lock);
L
Linus Torvalds 已提交
147
		kfree(sch);
C
Cornelia Huck 已提交
148
	}
L
Linus Torvalds 已提交
149 150
}

151
static int css_sch_device_register(struct subchannel *sch)
152 153 154 155 156 157 158 159 160
{
	int ret;

	mutex_lock(&sch->reg_mutex);
	ret = device_register(&sch->dev);
	mutex_unlock(&sch->reg_mutex);
	return ret;
}

161 162 163 164
/**
 * css_sch_device_unregister - unregister a subchannel
 * @sch: subchannel to be unregistered
 */
165 166 167 168 169 170
void css_sch_device_unregister(struct subchannel *sch)
{
	mutex_lock(&sch->reg_mutex);
	device_unregister(&sch->dev);
	mutex_unlock(&sch->reg_mutex);
}
171
EXPORT_SYMBOL_GPL(css_sch_device_unregister);
172

173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217
static void ssd_from_pmcw(struct chsc_ssd_info *ssd, struct pmcw *pmcw)
{
	int i;
	int mask;

	memset(ssd, 0, sizeof(struct chsc_ssd_info));
	ssd->path_mask = pmcw->pim;
	for (i = 0; i < 8; i++) {
		mask = 0x80 >> i;
		if (pmcw->pim & mask) {
			chp_id_init(&ssd->chpid[i]);
			ssd->chpid[i].id = pmcw->chpid[i];
		}
	}
}

static void ssd_register_chpids(struct chsc_ssd_info *ssd)
{
	int i;
	int mask;

	for (i = 0; i < 8; i++) {
		mask = 0x80 >> i;
		if (ssd->path_mask & mask)
			if (!chp_is_registered(ssd->chpid[i]))
				chp_new(ssd->chpid[i]);
	}
}

void css_update_ssd_info(struct subchannel *sch)
{
	int ret;

	if (cio_is_console(sch->schid)) {
		/* Console is initialized too early for functions requiring
		 * memory allocation. */
		ssd_from_pmcw(&sch->ssd_info, &sch->schib.pmcw);
	} else {
		ret = chsc_get_ssd_info(sch->schid, &sch->ssd_info);
		if (ret)
			ssd_from_pmcw(&sch->ssd_info, &sch->schib.pmcw);
		ssd_register_chpids(&sch->ssd_info);
	}
}

218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252
static ssize_t type_show(struct device *dev, struct device_attribute *attr,
			 char *buf)
{
	struct subchannel *sch = to_subchannel(dev);

	return sprintf(buf, "%01x\n", sch->st);
}

static DEVICE_ATTR(type, 0444, type_show, NULL);

static ssize_t modalias_show(struct device *dev, struct device_attribute *attr,
			     char *buf)
{
	struct subchannel *sch = to_subchannel(dev);

	return sprintf(buf, "css:t%01X\n", sch->st);
}

static DEVICE_ATTR(modalias, 0444, modalias_show, NULL);

static struct attribute *subch_attrs[] = {
	&dev_attr_type.attr,
	&dev_attr_modalias.attr,
	NULL,
};

static struct attribute_group subch_attr_group = {
	.attrs = subch_attrs,
};

static struct attribute_group *default_subch_attr_groups[] = {
	&subch_attr_group,
	NULL,
};

253
static int css_register_subchannel(struct subchannel *sch)
L
Linus Torvalds 已提交
254 255 256 257
{
	int ret;

	/* Initialize the subchannel structure */
258
	sch->dev.parent = &channel_subsystems[0]->device;
L
Linus Torvalds 已提交
259 260
	sch->dev.bus = &css_bus_type;
	sch->dev.release = &css_subchannel_release;
261
	sch->dev.groups = default_subch_attr_groups;
262 263 264 265 266
	/*
	 * We don't want to generate uevents for I/O subchannels that don't
	 * have a working ccw device behind them since they will be
	 * unregistered before they can be used anyway, so we delay the add
	 * uevent until after device recognition was successful.
267 268 269
	 * Note that we suppress the uevent for all subchannel types;
	 * the subchannel driver can decide itself when it wants to inform
	 * userspace of its existence.
270
	 */
271
	sch->dev.uevent_suppress = 1;
272
	css_update_ssd_info(sch);
L
Linus Torvalds 已提交
273
	/* make it known to the system */
274
	ret = css_sch_device_register(sch);
275
	if (ret) {
C
Cornelia Huck 已提交
276 277
		CIO_MSG_EVENT(0, "Could not register sch 0.%x.%04x: %d\n",
			      sch->schid.ssid, sch->schid.sch_no, ret);
278 279
		return ret;
	}
280 281 282 283 284 285 286 287 288
	if (!sch->driver) {
		/*
		 * No driver matched. Generate the uevent now so that
		 * a fitting driver module may be loaded based on the
		 * modalias.
		 */
		sch->dev.uevent_suppress = 0;
		kobject_uevent(&sch->dev.kobj, KOBJ_ADD);
	}
L
Linus Torvalds 已提交
289 290 291
	return ret;
}

C
Cornelia Huck 已提交
292
int css_probe_device(struct subchannel_id schid)
L
Linus Torvalds 已提交
293 294 295 296
{
	int ret;
	struct subchannel *sch;

297
	sch = css_alloc_subchannel(schid);
L
Linus Torvalds 已提交
298 299 300 301 302 303 304 305
	if (IS_ERR(sch))
		return PTR_ERR(sch);
	ret = css_register_subchannel(sch);
	if (ret)
		css_free_subchannel(sch);
	return ret;
}

C
Cornelia Huck 已提交
306 307 308 309
static int
check_subchannel(struct device * dev, void * data)
{
	struct subchannel *sch;
310
	struct subchannel_id *schid = data;
C
Cornelia Huck 已提交
311 312

	sch = to_subchannel(dev);
313
	return schid_equal(&sch->schid, schid);
C
Cornelia Huck 已提交
314 315
}

L
Linus Torvalds 已提交
316
struct subchannel *
317
get_subchannel_by_schid(struct subchannel_id schid)
L
Linus Torvalds 已提交
318 319 320
{
	struct device *dev;

C
Cornelia Huck 已提交
321
	dev = bus_find_device(&css_bus_type, NULL,
322
			      &schid, check_subchannel);
L
Linus Torvalds 已提交
323

C
Cornelia Huck 已提交
324
	return dev ? to_subchannel(dev) : NULL;
L
Linus Torvalds 已提交
325 326
}

327 328 329 330 331 332 333 334 335 336 337 338
/**
 * css_sch_is_valid() - check if a subchannel is valid
 * @schib: subchannel information block for the subchannel
 */
int css_sch_is_valid(struct schib *schib)
{
	if ((schib->pmcw.st == SUBCHANNEL_TYPE_IO) && !schib->pmcw.dnv)
		return 0;
	return 1;
}
EXPORT_SYMBOL_GPL(css_sch_is_valid);

339 340 341 342 343 344 345 346
static int css_evaluate_new_subchannel(struct subchannel_id schid, int slow)
{
	struct schib schib;

	if (!slow) {
		/* Will be done on the slow path. */
		return -EAGAIN;
	}
347
	if (stsch_err(schid, &schib) || !css_sch_is_valid(&schib)) {
348 349
		/* Unusable - ignore. */
		return 0;
L
Linus Torvalds 已提交
350
	}
351 352 353 354 355 356
	CIO_MSG_EVENT(4, "Evaluating schid 0.%x.%04x, event %d, unknown, "
			 "slow path.\n", schid.ssid, schid.sch_no, CIO_OPER);

	return css_probe_device(schid);
}

C
Cornelia Huck 已提交
357 358 359 360 361 362 363 364 365 366 367 368 369 370 371
static int css_evaluate_known_subchannel(struct subchannel *sch, int slow)
{
	int ret = 0;

	if (sch->driver) {
		if (sch->driver->sch_event)
			ret = sch->driver->sch_event(sch, slow);
		else
			dev_dbg(&sch->dev,
				"Got subchannel machine check but "
				"no sch_event handler provided.\n");
	}
	return ret;
}

372
static void css_evaluate_subchannel(struct subchannel_id schid, int slow)
373 374 375 376 377 378 379 380 381 382
{
	struct subchannel *sch;
	int ret;

	sch = get_subchannel_by_schid(schid);
	if (sch) {
		ret = css_evaluate_known_subchannel(sch, slow);
		put_device(&sch->dev);
	} else
		ret = css_evaluate_new_subchannel(schid, slow);
383 384
	if (ret == -EAGAIN)
		css_schedule_eval(schid);
L
Linus Torvalds 已提交
385 386
}

387 388 389 390
static struct idset *slow_subchannel_set;
static spinlock_t slow_subchannel_lock;

static int __init slow_subchannel_init(void)
L
Linus Torvalds 已提交
391
{
392 393 394
	spin_lock_init(&slow_subchannel_lock);
	slow_subchannel_set = idset_sch_new();
	if (!slow_subchannel_set) {
C
Cornelia Huck 已提交
395
		CIO_MSG_EVENT(0, "could not allocate slow subchannel set\n");
396 397 398
		return -ENOMEM;
	}
	return 0;
L
Linus Torvalds 已提交
399 400
}

401
static int slow_eval_known_fn(struct subchannel *sch, void *data)
L
Linus Torvalds 已提交
402
{
403 404
	int eval;
	int rc;
L
Linus Torvalds 已提交
405 406

	spin_lock_irq(&slow_subchannel_lock);
407 408 409 410 411 412 413
	eval = idset_sch_contains(slow_subchannel_set, sch->schid);
	idset_sch_del(slow_subchannel_set, sch->schid);
	spin_unlock_irq(&slow_subchannel_lock);
	if (eval) {
		rc = css_evaluate_known_subchannel(sch, 1);
		if (rc == -EAGAIN)
			css_schedule_eval(sch->schid);
L
Linus Torvalds 已提交
414
	}
415 416 417 418 419 420 421 422 423 424 425
	return 0;
}

static int slow_eval_unknown_fn(struct subchannel_id schid, void *data)
{
	int eval;
	int rc = 0;

	spin_lock_irq(&slow_subchannel_lock);
	eval = idset_sch_contains(slow_subchannel_set, schid);
	idset_sch_del(slow_subchannel_set, schid);
L
Linus Torvalds 已提交
426
	spin_unlock_irq(&slow_subchannel_lock);
427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450
	if (eval) {
		rc = css_evaluate_new_subchannel(schid, 1);
		switch (rc) {
		case -EAGAIN:
			css_schedule_eval(schid);
			rc = 0;
			break;
		case -ENXIO:
		case -ENOMEM:
		case -EIO:
			/* These should abort looping */
			break;
		default:
			rc = 0;
		}
	}
	return rc;
}

static void css_slow_path_func(struct work_struct *unused)
{
	CIO_TRACE_EVENT(4, "slowpath");
	for_each_subchannel_staged(slow_eval_known_fn, slow_eval_unknown_fn,
				   NULL);
L
Linus Torvalds 已提交
451 452
}

453
static DECLARE_WORK(slow_path_work, css_slow_path_func);
L
Linus Torvalds 已提交
454 455
struct workqueue_struct *slow_path_wq;

456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475
void css_schedule_eval(struct subchannel_id schid)
{
	unsigned long flags;

	spin_lock_irqsave(&slow_subchannel_lock, flags);
	idset_sch_add(slow_subchannel_set, schid);
	queue_work(slow_path_wq, &slow_path_work);
	spin_unlock_irqrestore(&slow_subchannel_lock, flags);
}

void css_schedule_eval_all(void)
{
	unsigned long flags;

	spin_lock_irqsave(&slow_subchannel_lock, flags);
	idset_fill(slow_subchannel_set);
	queue_work(slow_path_wq, &slow_path_work);
	spin_unlock_irqrestore(&slow_subchannel_lock, flags);
}

476 477 478 479 480 481
void css_wait_for_slow_path(void)
{
	flush_workqueue(ccw_device_notify_work);
	flush_workqueue(slow_path_wq);
}

482 483 484 485 486
/* Reprobe subchannel if unregistered. */
static int reprobe_subchannel(struct subchannel_id schid, void *data)
{
	int ret;

C
Cornelia Huck 已提交
487 488
	CIO_MSG_EVENT(6, "cio: reprobe 0.%x.%04x\n",
		      schid.ssid, schid.sch_no);
489 490 491 492 493 494 495 496 497
	if (need_reprobe)
		return -EAGAIN;

	ret = css_probe_device(schid);
	switch (ret) {
	case 0:
		break;
	case -ENXIO:
	case -ENOMEM:
498
	case -EIO:
499 500 501 502 503 504 505 506 507 508
		/* These should abort looping */
		break;
	default:
		ret = 0;
	}

	return ret;
}

/* Work function used to reprobe all unregistered subchannels. */
509
static void reprobe_all(struct work_struct *unused)
510 511 512
{
	int ret;

513
	CIO_MSG_EVENT(4, "reprobe start\n");
514 515 516 517 518

	need_reprobe = 0;
	/* Make sure initial subchannel scan is done. */
	wait_event(ccw_device_init_wq,
		   atomic_read(&ccw_device_init_count) == 0);
519
	ret = for_each_subchannel_staged(NULL, reprobe_subchannel, NULL);
520

521
	CIO_MSG_EVENT(4, "reprobe done (rc=%d, need_reprobe=%d)\n", ret,
522 523 524
		      need_reprobe);
}

525
static DECLARE_WORK(css_reprobe_work, reprobe_all);
526 527 528 529 530

/* Schedule reprobing of all unregistered subchannels. */
void css_schedule_reprobe(void)
{
	need_reprobe = 1;
531
	queue_work(slow_path_wq, &css_reprobe_work);
532 533 534 535
}

EXPORT_SYMBOL_GPL(css_schedule_reprobe);

L
Linus Torvalds 已提交
536 537 538
/*
 * Called from the machine check handler for subchannel report words.
 */
539
static void css_process_crw(struct crw *crw0, struct crw *crw1, int overflow)
L
Linus Torvalds 已提交
540
{
541
	struct subchannel_id mchk_schid;
L
Linus Torvalds 已提交
542

543 544 545 546 547 548 549 550 551 552 553 554 555
	if (overflow) {
		css_schedule_eval_all();
		return;
	}
	CIO_CRW_EVENT(2, "CRW0 reports slct=%d, oflw=%d, "
		      "chn=%d, rsc=%X, anc=%d, erc=%X, rsid=%X\n",
		      crw0->slct, crw0->oflw, crw0->chn, crw0->rsc, crw0->anc,
		      crw0->erc, crw0->rsid);
	if (crw1)
		CIO_CRW_EVENT(2, "CRW1 reports slct=%d, oflw=%d, "
			      "chn=%d, rsc=%X, anc=%d, erc=%X, rsid=%X\n",
			      crw1->slct, crw1->oflw, crw1->chn, crw1->rsc,
			      crw1->anc, crw1->erc, crw1->rsid);
556
	init_subchannel_id(&mchk_schid);
557 558 559
	mchk_schid.sch_no = crw0->rsid;
	if (crw1)
		mchk_schid.ssid = (crw1->rsid >> 8) & 3;
560

561
	/*
L
Linus Torvalds 已提交
562 563 564 565
	 * Since we are always presented with IPI in the CRW, we have to
	 * use stsch() to find out if the subchannel in question has come
	 * or gone.
	 */
566
	css_evaluate_subchannel(mchk_schid, 0);
L
Linus Torvalds 已提交
567 568
}

569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590
static int __init
__init_channel_subsystem(struct subchannel_id schid, void *data)
{
	struct subchannel *sch;
	int ret;

	if (cio_is_console(schid))
		sch = cio_get_console_subchannel();
	else {
		sch = css_alloc_subchannel(schid);
		if (IS_ERR(sch))
			ret = PTR_ERR(sch);
		else
			ret = 0;
		switch (ret) {
		case 0:
			break;
		case -ENOMEM:
			panic("Out of memory in init_channel_subsystem\n");
		/* -ENXIO: no more subchannels. */
		case -ENXIO:
			return ret;
591 592 593
		/* -EIO: this subchannel set not supported. */
		case -EIO:
			return ret;
594 595 596 597 598 599 600 601 602 603 604 605 606 607 608
		default:
			return 0;
		}
	}
	/*
	 * We register ALL valid subchannels in ioinfo, even those
	 * that have been present before init_channel_subsystem.
	 * These subchannels can't have been registered yet (kmalloc
	 * not working) so we do it now. This is true e.g. for the
	 * console subchannel.
	 */
	css_register_subchannel(sch);
	return 0;
}

L
Linus Torvalds 已提交
609
static void __init
610
css_generate_pgid(struct channel_subsystem *css, u32 tod_high)
L
Linus Torvalds 已提交
611
{
612 613 614 615
	if (css_characteristics_avail && css_general_characteristics.mcss) {
		css->global_pgid.pgid_high.ext_cssid.version = 0x80;
		css->global_pgid.pgid_high.ext_cssid.cssid = css->cssid;
	} else {
L
Linus Torvalds 已提交
616
#ifdef CONFIG_SMP
617
		css->global_pgid.pgid_high.cpu_addr = hard_smp_processor_id();
L
Linus Torvalds 已提交
618
#else
619
		css->global_pgid.pgid_high.cpu_addr = 0;
L
Linus Torvalds 已提交
620 621
#endif
	}
622 623 624 625 626 627
	css->global_pgid.cpu_id = ((cpuid_t *) __LC_CPUID)->ident;
	css->global_pgid.cpu_model = ((cpuid_t *) __LC_CPUID)->machine;
	css->global_pgid.tod_high = tod_high;

}

628 629 630 631 632 633
static void
channel_subsystem_release(struct device *dev)
{
	struct channel_subsystem *css;

	css = to_css(dev);
634
	mutex_destroy(&css->mutex);
635 636 637
	kfree(css);
}

638 639 640 641 642
static ssize_t
css_cm_enable_show(struct device *dev, struct device_attribute *attr,
		   char *buf)
{
	struct channel_subsystem *css = to_css(dev);
643
	int ret;
644 645 646

	if (!css)
		return 0;
647 648 649 650
	mutex_lock(&css->mutex);
	ret = sprintf(buf, "%x\n", css->cm_enabled);
	mutex_unlock(&css->mutex);
	return ret;
651 652 653 654 655 656 657 658
}

static ssize_t
css_cm_enable_store(struct device *dev, struct device_attribute *attr,
		    const char *buf, size_t count)
{
	struct channel_subsystem *css = to_css(dev);
	int ret;
659
	unsigned long val;
660

661 662 663
	ret = strict_strtoul(buf, 16, &val);
	if (ret)
		return ret;
664
	mutex_lock(&css->mutex);
665 666
	switch (val) {
	case 0:
667 668
		ret = css->cm_enabled ? chsc_secm(css, 0) : 0;
		break;
669
	case 1:
670 671 672 673 674
		ret = css->cm_enabled ? 0 : chsc_secm(css, 1);
		break;
	default:
		ret = -EINVAL;
	}
675
	mutex_unlock(&css->mutex);
676 677 678 679 680
	return ret < 0 ? ret : count;
}

static DEVICE_ATTR(cm_enable, 0644, css_cm_enable_show, css_cm_enable_store);

681
static int __init setup_css(int nr)
682 683
{
	u32 tod_high;
684
	int ret;
685
	struct channel_subsystem *css;
686

687 688 689 690 691
	css = channel_subsystems[nr];
	memset(css, 0, sizeof(struct channel_subsystem));
	css->pseudo_subchannel =
		kzalloc(sizeof(*css->pseudo_subchannel), GFP_KERNEL);
	if (!css->pseudo_subchannel)
692
		return -ENOMEM;
693 694 695 696
	css->pseudo_subchannel->dev.parent = &css->device;
	css->pseudo_subchannel->dev.release = css_subchannel_release;
	sprintf(css->pseudo_subchannel->dev.bus_id, "defunct");
	ret = cio_create_sch_lock(css->pseudo_subchannel);
697
	if (ret) {
698
		kfree(css->pseudo_subchannel);
699 700
		return ret;
	}
701 702 703 704 705
	mutex_init(&css->mutex);
	css->valid = 1;
	css->cssid = nr;
	sprintf(css->device.bus_id, "css%x", nr);
	css->device.release = channel_subsystem_release;
706
	tod_high = (u32) (get_clock() >> 32);
707
	css_generate_pgid(css, tod_high);
708
	return 0;
L
Linus Torvalds 已提交
709 710
}

711 712 713 714 715 716 717 718 719 720 721
static int css_reboot_event(struct notifier_block *this,
			    unsigned long event,
			    void *ptr)
{
	int ret, i;

	ret = NOTIFY_DONE;
	for (i = 0; i <= __MAX_CSSID; i++) {
		struct channel_subsystem *css;

		css = channel_subsystems[i];
722
		mutex_lock(&css->mutex);
723 724 725
		if (css->cm_enabled)
			if (chsc_secm(css, 0))
				ret = NOTIFY_BAD;
726
		mutex_unlock(&css->mutex);
727 728 729 730 731 732 733 734 735
	}

	return ret;
}

static struct notifier_block css_reboot_notifier = {
	.notifier_call = css_reboot_event,
};

L
Linus Torvalds 已提交
736 737 738 739 740 741 742 743
/*
 * Now that the driver core is running, we can setup our channel subsystem.
 * The struct subchannel's are created during probing (except for the
 * static console subchannel).
 */
static int __init
init_channel_subsystem (void)
{
744
	int ret, i;
L
Linus Torvalds 已提交
745

746 747 748 749
	ret = chsc_determine_css_characteristics();
	if (ret == -ENOMEM)
		goto out; /* No need to continue. */
	if (ret == 0)
L
Linus Torvalds 已提交
750 751
		css_characteristics_avail = 1;

752 753 754 755 756 757 758 759
	ret = chsc_alloc_sei_area();
	if (ret)
		goto out;

	ret = slow_subchannel_init();
	if (ret)
		goto out;

760 761 762 763
	ret = s390_register_crw_handler(CRW_RSC_SCH, css_process_crw);
	if (ret)
		goto out;

L
Linus Torvalds 已提交
764 765 766
	if ((ret = bus_register(&css_bus_type)))
		goto out;

767 768 769 770 771 772 773 774 775 776 777
	/* Try to enable MSS. */
	ret = chsc_enable_facility(CHSC_SDA_OC_MSS);
	switch (ret) {
	case 0: /* Success. */
		max_ssid = __MAX_SSID;
		break;
	case -ENOMEM:
		goto out_bus;
	default:
		max_ssid = 0;
	}
778 779
	/* Setup css structure. */
	for (i = 0; i <= __MAX_CSSID; i++) {
780 781 782 783
		struct channel_subsystem *css;

		css = kmalloc(sizeof(struct channel_subsystem), GFP_KERNEL);
		if (!css) {
784
			ret = -ENOMEM;
785
			goto out_unregister;
786
		}
787
		channel_subsystems[i] = css;
788
		ret = setup_css(i);
789 790
		if (ret)
			goto out_free;
791
		ret = device_register(&css->device);
792 793
		if (ret)
			goto out_free_all;
794 795
		if (css_characteristics_avail &&
		    css_chsc_characteristics.secm) {
796
			ret = device_create_file(&css->device,
797 798 799 800
						 &dev_attr_cm_enable);
			if (ret)
				goto out_device;
		}
801
		ret = device_register(&css->pseudo_subchannel->dev);
802 803
		if (ret)
			goto out_file;
804
	}
805 806 807
	ret = register_reboot_notifier(&css_reboot_notifier);
	if (ret)
		goto out_pseudo;
L
Linus Torvalds 已提交
808 809 810 811
	css_init_done = 1;

	ctl_set_bit(6, 28);

812
	for_each_subchannel(__init_channel_subsystem, NULL);
L
Linus Torvalds 已提交
813
	return 0;
814 815
out_pseudo:
	device_unregister(&channel_subsystems[i]->pseudo_subchannel->dev);
816
out_file:
817 818
	device_remove_file(&channel_subsystems[i]->device,
			   &dev_attr_cm_enable);
819
out_device:
820
	device_unregister(&channel_subsystems[i]->device);
821
out_free_all:
822 823
	kfree(channel_subsystems[i]->pseudo_subchannel->lock);
	kfree(channel_subsystems[i]->pseudo_subchannel);
824
out_free:
825
	kfree(channel_subsystems[i]);
826
out_unregister:
827
	while (i > 0) {
828 829
		struct channel_subsystem *css;

830
		i--;
831 832
		css = channel_subsystems[i];
		device_unregister(&css->pseudo_subchannel->dev);
833
		if (css_characteristics_avail && css_chsc_characteristics.secm)
834
			device_remove_file(&css->device,
835
					   &dev_attr_cm_enable);
836
		device_unregister(&css->device);
837
	}
838
out_bus:
L
Linus Torvalds 已提交
839 840
	bus_unregister(&css_bus_type);
out:
841
	s390_unregister_crw_handler(CRW_RSC_CSS);
842 843 844 845
	chsc_free_sei_area();
	kfree(slow_subchannel_set);
	printk(KERN_WARNING"cio: failed to initialize css driver (%d)!\n",
	       ret);
L
Linus Torvalds 已提交
846 847 848
	return ret;
}

849 850 851 852 853
int sch_is_pseudo_sch(struct subchannel *sch)
{
	return sch == to_css(sch->dev.parent)->pseudo_subchannel;
}

L
Linus Torvalds 已提交
854 855 856 857 858 859 860 861
/*
 * find a driver for a subchannel. They identify by the subchannel
 * type with the exception that the console subchannel driver has its own
 * subchannel type although the device is an i/o subchannel
 */
static int
css_bus_match (struct device *dev, struct device_driver *drv)
{
862 863
	struct subchannel *sch = to_subchannel(dev);
	struct css_driver *driver = to_cssdriver(drv);
L
Linus Torvalds 已提交
864 865 866 867 868 869 870

	if (sch->st == driver->subchannel_type)
		return 1;

	return 0;
}

C
Cornelia Huck 已提交
871
static int css_probe(struct device *dev)
872 873
{
	struct subchannel *sch;
C
Cornelia Huck 已提交
874
	int ret;
875 876

	sch = to_subchannel(dev);
877
	sch->driver = to_cssdriver(dev->driver);
C
Cornelia Huck 已提交
878 879 880 881
	ret = sch->driver->probe ? sch->driver->probe(sch) : 0;
	if (ret)
		sch->driver = NULL;
	return ret;
882 883
}

C
Cornelia Huck 已提交
884
static int css_remove(struct device *dev)
885 886
{
	struct subchannel *sch;
C
Cornelia Huck 已提交
887
	int ret;
888 889

	sch = to_subchannel(dev);
C
Cornelia Huck 已提交
890 891 892
	ret = sch->driver->remove ? sch->driver->remove(sch) : 0;
	sch->driver = NULL;
	return ret;
893 894
}

C
Cornelia Huck 已提交
895
static void css_shutdown(struct device *dev)
896 897 898 899
{
	struct subchannel *sch;

	sch = to_subchannel(dev);
C
Cornelia Huck 已提交
900
	if (sch->driver && sch->driver->shutdown)
901 902 903
		sch->driver->shutdown(sch);
}

904 905 906 907 908 909 910 911 912 913 914 915
static int css_uevent(struct device *dev, struct kobj_uevent_env *env)
{
	struct subchannel *sch = to_subchannel(dev);
	int ret;

	ret = add_uevent_var(env, "ST=%01X", sch->st);
	if (ret)
		return ret;
	ret = add_uevent_var(env, "MODALIAS=css:t%01X", sch->st);
	return ret;
}

L
Linus Torvalds 已提交
916
struct bus_type css_bus_type = {
917 918 919 920 921
	.name     = "css",
	.match    = css_bus_match,
	.probe    = css_probe,
	.remove   = css_remove,
	.shutdown = css_shutdown,
922
	.uevent   = css_uevent,
L
Linus Torvalds 已提交
923 924
};

925 926 927 928 929 930 931 932 933 934 935
/**
 * css_driver_register - register a css driver
 * @cdrv: css driver to register
 *
 * This is mainly a wrapper around driver_register that sets name
 * and bus_type in the embedded struct device_driver correctly.
 */
int css_driver_register(struct css_driver *cdrv)
{
	cdrv->drv.name = cdrv->name;
	cdrv->drv.bus = &css_bus_type;
936
	cdrv->drv.owner = cdrv->owner;
937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952
	return driver_register(&cdrv->drv);
}
EXPORT_SYMBOL_GPL(css_driver_register);

/**
 * css_driver_unregister - unregister a css driver
 * @cdrv: css driver to unregister
 *
 * This is a wrapper around driver_unregister.
 */
void css_driver_unregister(struct css_driver *cdrv)
{
	driver_unregister(&cdrv->drv);
}
EXPORT_SYMBOL_GPL(css_driver_unregister);

L
Linus Torvalds 已提交
953 954 955 956 957
subsys_initcall(init_channel_subsystem);

MODULE_LICENSE("GPL");
EXPORT_SYMBOL(css_bus_type);
EXPORT_SYMBOL_GPL(css_characteristics_avail);