css.c 21.8 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7
/*
 *  drivers/s390/cio/css.c
 *  driver for channel subsystem
 *
 *    Copyright (C) 2002 IBM Deutschland Entwicklung GmbH,
 *			 IBM Corporation
 *    Author(s): Arnd Bergmann (arndb@de.ibm.com)
8
 *		 Cornelia Huck (cornelia.huck@de.ibm.com)
L
Linus Torvalds 已提交
9 10 11 12 13 14 15
 */
#include <linux/module.h>
#include <linux/init.h>
#include <linux/device.h>
#include <linux/slab.h>
#include <linux/errno.h>
#include <linux/list.h>
16
#include <linux/reboot.h>
L
Linus Torvalds 已提交
17 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 161 162 163 164 165 166 167
{
	int ret;

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

void css_sch_device_unregister(struct subchannel *sch)
{
	mutex_lock(&sch->reg_mutex);
	device_unregister(&sch->dev);
	mutex_unlock(&sch->reg_mutex);
}

168 169 170 171 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
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);
	}
}

static int css_register_subchannel(struct subchannel *sch)
L
Linus Torvalds 已提交
214 215 216 217
{
	int ret;

	/* Initialize the subchannel structure */
218
	sch->dev.parent = &channel_subsystems[0]->device;
L
Linus Torvalds 已提交
219 220
	sch->dev.bus = &css_bus_type;
	sch->dev.release = &css_subchannel_release;
221
	sch->dev.groups = subch_attr_groups;
222 223 224 225 226 227 228 229 230
	/*
	 * 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.
	 */
	if (!cio_is_console(sch->schid))
		/* Console is special, no need to suppress. */
		sch->dev.uevent_suppress = 1;
231
	css_update_ssd_info(sch);
L
Linus Torvalds 已提交
232
	/* make it known to the system */
233
	ret = css_sch_device_register(sch);
234
	if (ret) {
C
Cornelia Huck 已提交
235 236
		CIO_MSG_EVENT(0, "Could not register sch 0.%x.%04x: %d\n",
			      sch->schid.ssid, sch->schid.sch_no, ret);
237 238
		return ret;
	}
L
Linus Torvalds 已提交
239 240 241
	return ret;
}

242
static int css_probe_device(struct subchannel_id schid)
L
Linus Torvalds 已提交
243 244 245 246
{
	int ret;
	struct subchannel *sch;

247
	sch = css_alloc_subchannel(schid);
L
Linus Torvalds 已提交
248 249 250 251 252 253 254 255
	if (IS_ERR(sch))
		return PTR_ERR(sch);
	ret = css_register_subchannel(sch);
	if (ret)
		css_free_subchannel(sch);
	return ret;
}

C
Cornelia Huck 已提交
256 257 258 259
static int
check_subchannel(struct device * dev, void * data)
{
	struct subchannel *sch;
260
	struct subchannel_id *schid = data;
C
Cornelia Huck 已提交
261 262

	sch = to_subchannel(dev);
263
	return schid_equal(&sch->schid, schid);
C
Cornelia Huck 已提交
264 265
}

L
Linus Torvalds 已提交
266
struct subchannel *
267
get_subchannel_by_schid(struct subchannel_id schid)
L
Linus Torvalds 已提交
268 269 270
{
	struct device *dev;

C
Cornelia Huck 已提交
271
	dev = bus_find_device(&css_bus_type, NULL,
272
			      &schid, check_subchannel);
L
Linus Torvalds 已提交
273

C
Cornelia Huck 已提交
274
	return dev ? to_subchannel(dev) : NULL;
L
Linus Torvalds 已提交
275 276
}

277 278 279 280 281 282 283 284 285 286 287 288
/**
 * 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);

289
static int css_get_subchannel_status(struct subchannel *sch)
L
Linus Torvalds 已提交
290 291 292
{
	struct schib schib;

293 294 295
	if (stsch(sch->schid, &schib))
		return CIO_GONE;
	if (!css_sch_is_valid(&schib))
L
Linus Torvalds 已提交
296
		return CIO_GONE;
297
	if (sch->schib.pmcw.dnv && (schib.pmcw.dev != sch->schib.pmcw.dev))
L
Linus Torvalds 已提交
298
		return CIO_REVALIDATE;
299
	if (!sch->lpm)
L
Linus Torvalds 已提交
300 301 302
		return CIO_NO_PATH;
	return CIO_OPER;
}
303 304

static int css_evaluate_known_subchannel(struct subchannel *sch, int slow)
L
Linus Torvalds 已提交
305 306 307
{
	int event, ret, disc;
	unsigned long flags;
308
	enum { NONE, UNREGISTER, UNREGISTER_PROBE, REPROBE } action;
L
Linus Torvalds 已提交
309

C
Cornelia Huck 已提交
310
	spin_lock_irqsave(sch->lock, flags);
311
	disc = device_is_disconnected(sch);
L
Linus Torvalds 已提交
312
	if (disc && slow) {
313
		/* Disconnected devices are evaluated directly only.*/
C
Cornelia Huck 已提交
314
		spin_unlock_irqrestore(sch->lock, flags);
315
		return 0;
L
Linus Torvalds 已提交
316
	}
317 318
	/* No interrupt after machine check - kill pending timers. */
	device_kill_pending_timer(sch);
L
Linus Torvalds 已提交
319
	if (!disc && !slow) {
320
		/* Non-disconnected devices are evaluated on the slow path. */
C
Cornelia Huck 已提交
321
		spin_unlock_irqrestore(sch->lock, flags);
322
		return -EAGAIN;
L
Linus Torvalds 已提交
323
	}
324
	event = css_get_subchannel_status(sch);
325
	CIO_MSG_EVENT(4, "Evaluating schid 0.%x.%04x, event %d, %s, %s path.\n",
326 327 328 329 330
		      sch->schid.ssid, sch->schid.sch_no, event,
		      disc ? "disconnected" : "normal",
		      slow ? "slow" : "fast");
	/* Analyze subchannel status. */
	action = NONE;
L
Linus Torvalds 已提交
331 332
	switch (event) {
	case CIO_NO_PATH:
333 334 335
		if (disc) {
			/* Check if paths have become available. */
			action = REPROBE;
L
Linus Torvalds 已提交
336 337
			break;
		}
338 339 340 341 342 343 344 345
		/* fall through */
	case CIO_GONE:
		/* Prevent unwanted effects when opening lock. */
		cio_disable_subchannel(sch);
		device_set_disconnected(sch);
		/* Ask driver what to do with device. */
		action = UNREGISTER;
		if (sch->driver && sch->driver->notify) {
C
Cornelia Huck 已提交
346
			spin_unlock_irqrestore(sch->lock, flags);
347
			ret = sch->driver->notify(sch, event);
C
Cornelia Huck 已提交
348
			spin_lock_irqsave(sch->lock, flags);
349 350
			if (ret)
				action = NONE;
L
Linus Torvalds 已提交
351 352 353
		}
		break;
	case CIO_REVALIDATE:
354 355 356 357 358 359
		/* Device will be removed, so no notify necessary. */
		if (disc)
			/* Reprobe because immediate unregister might block. */
			action = REPROBE;
		else
			action = UNREGISTER_PROBE;
L
Linus Torvalds 已提交
360 361
		break;
	case CIO_OPER:
362
		if (disc)
L
Linus Torvalds 已提交
363
			/* Get device operational again. */
364 365 366 367 368 369 370 371 372
			action = REPROBE;
		break;
	}
	/* Perform action. */
	ret = 0;
	switch (action) {
	case UNREGISTER:
	case UNREGISTER_PROBE:
		/* Unregister device (will use subchannel lock). */
C
Cornelia Huck 已提交
373
		spin_unlock_irqrestore(sch->lock, flags);
374
		css_sch_device_unregister(sch);
C
Cornelia Huck 已提交
375
		spin_lock_irqsave(sch->lock, flags);
376 377 378 379 380 381 382

		/* Reset intparm to zeroes. */
		sch->schib.pmcw.intparm = 0;
		cio_modify(sch);
		break;
	case REPROBE:
		device_trigger_reprobe(sch);
L
Linus Torvalds 已提交
383 384
		break;
	default:
385 386
		break;
	}
C
Cornelia Huck 已提交
387
	spin_unlock_irqrestore(sch->lock, flags);
388 389 390
	/* Probe if necessary. */
	if (action == UNREGISTER_PROBE)
		ret = css_probe_device(sch->schid);
391 392 393 394 395 396 397 398 399 400 401 402

	return ret;
}

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;
	}
403
	if (stsch_err(schid, &schib) || !css_sch_is_valid(&schib)) {
404 405
		/* Unusable - ignore. */
		return 0;
L
Linus Torvalds 已提交
406
	}
407 408 409 410 411 412
	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);
}

413
static void css_evaluate_subchannel(struct subchannel_id schid, int slow)
414 415 416 417 418 419 420 421 422 423
{
	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);
424 425
	if (ret == -EAGAIN)
		css_schedule_eval(schid);
L
Linus Torvalds 已提交
426 427
}

428 429 430 431
static struct idset *slow_subchannel_set;
static spinlock_t slow_subchannel_lock;

static int __init slow_subchannel_init(void)
L
Linus Torvalds 已提交
432
{
433 434 435
	spin_lock_init(&slow_subchannel_lock);
	slow_subchannel_set = idset_sch_new();
	if (!slow_subchannel_set) {
C
Cornelia Huck 已提交
436
		CIO_MSG_EVENT(0, "could not allocate slow subchannel set\n");
437 438 439
		return -ENOMEM;
	}
	return 0;
L
Linus Torvalds 已提交
440 441
}

442
static int slow_eval_known_fn(struct subchannel *sch, void *data)
L
Linus Torvalds 已提交
443
{
444 445
	int eval;
	int rc;
L
Linus Torvalds 已提交
446 447

	spin_lock_irq(&slow_subchannel_lock);
448 449 450 451 452 453 454
	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 已提交
455
	}
456 457 458 459 460 461 462 463 464 465 466
	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 已提交
467
	spin_unlock_irq(&slow_subchannel_lock);
468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491
	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 已提交
492 493
}

494
static DECLARE_WORK(slow_path_work, css_slow_path_func);
L
Linus Torvalds 已提交
495 496
struct workqueue_struct *slow_path_wq;

497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516
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);
}

517 518 519 520 521 522
void css_wait_for_slow_path(void)
{
	flush_workqueue(ccw_device_notify_work);
	flush_workqueue(slow_path_wq);
}

523 524 525 526 527
/* Reprobe subchannel if unregistered. */
static int reprobe_subchannel(struct subchannel_id schid, void *data)
{
	int ret;

C
Cornelia Huck 已提交
528 529
	CIO_MSG_EVENT(6, "cio: reprobe 0.%x.%04x\n",
		      schid.ssid, schid.sch_no);
530 531 532 533 534 535 536 537 538
	if (need_reprobe)
		return -EAGAIN;

	ret = css_probe_device(schid);
	switch (ret) {
	case 0:
		break;
	case -ENXIO:
	case -ENOMEM:
539
	case -EIO:
540 541 542 543 544 545 546 547 548 549
		/* These should abort looping */
		break;
	default:
		ret = 0;
	}

	return ret;
}

/* Work function used to reprobe all unregistered subchannels. */
550
static void reprobe_all(struct work_struct *unused)
551 552 553
{
	int ret;

554
	CIO_MSG_EVENT(4, "reprobe start\n");
555 556 557 558 559

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

562
	CIO_MSG_EVENT(4, "reprobe done (rc=%d, need_reprobe=%d)\n", ret,
563 564 565
		      need_reprobe);
}

566
static DECLARE_WORK(css_reprobe_work, reprobe_all);
567 568 569 570 571

/* Schedule reprobing of all unregistered subchannels. */
void css_schedule_reprobe(void)
{
	need_reprobe = 1;
572
	queue_work(slow_path_wq, &css_reprobe_work);
573 574 575 576
}

EXPORT_SYMBOL_GPL(css_schedule_reprobe);

L
Linus Torvalds 已提交
577 578 579
/*
 * Called from the machine check handler for subchannel report words.
 */
580
void css_process_crw(int rsid1, int rsid2)
L
Linus Torvalds 已提交
581
{
582
	struct subchannel_id mchk_schid;
L
Linus Torvalds 已提交
583

584 585
	CIO_CRW_EVENT(2, "source is subchannel %04X, subsystem id %x\n",
		      rsid1, rsid2);
586
	init_subchannel_id(&mchk_schid);
587 588 589 590
	mchk_schid.sch_no = rsid1;
	if (rsid2 != 0)
		mchk_schid.ssid = (rsid2 >> 8) & 3;

L
Linus Torvalds 已提交
591 592 593 594 595
	/* 
	 * 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.
	 */
596
	css_evaluate_subchannel(mchk_schid, 0);
L
Linus Torvalds 已提交
597 598
}

599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620
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;
621 622 623
		/* -EIO: this subchannel set not supported. */
		case -EIO:
			return ret;
624 625 626 627 628 629 630 631 632 633 634 635 636 637 638
		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 已提交
639
static void __init
640
css_generate_pgid(struct channel_subsystem *css, u32 tod_high)
L
Linus Torvalds 已提交
641
{
642 643 644 645
	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 已提交
646
#ifdef CONFIG_SMP
647
		css->global_pgid.pgid_high.cpu_addr = hard_smp_processor_id();
L
Linus Torvalds 已提交
648
#else
649
		css->global_pgid.pgid_high.cpu_addr = 0;
L
Linus Torvalds 已提交
650 651
#endif
	}
652 653 654 655 656 657
	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;

}

658 659 660 661 662 663
static void
channel_subsystem_release(struct device *dev)
{
	struct channel_subsystem *css;

	css = to_css(dev);
664
	mutex_destroy(&css->mutex);
665 666 667
	kfree(css);
}

668 669 670 671 672
static ssize_t
css_cm_enable_show(struct device *dev, struct device_attribute *attr,
		   char *buf)
{
	struct channel_subsystem *css = to_css(dev);
673
	int ret;
674 675 676

	if (!css)
		return 0;
677 678 679 680
	mutex_lock(&css->mutex);
	ret = sprintf(buf, "%x\n", css->cm_enabled);
	mutex_unlock(&css->mutex);
	return ret;
681 682 683 684 685 686 687 688
}

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;
689
	unsigned long val;
690

691 692 693
	ret = strict_strtoul(buf, 16, &val);
	if (ret)
		return ret;
694
	mutex_lock(&css->mutex);
695 696
	switch (val) {
	case 0:
697 698
		ret = css->cm_enabled ? chsc_secm(css, 0) : 0;
		break;
699
	case 1:
700 701 702 703 704
		ret = css->cm_enabled ? 0 : chsc_secm(css, 1);
		break;
	default:
		ret = -EINVAL;
	}
705
	mutex_unlock(&css->mutex);
706 707 708 709 710
	return ret < 0 ? ret : count;
}

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

711
static int __init setup_css(int nr)
712 713
{
	u32 tod_high;
714
	int ret;
715
	struct channel_subsystem *css;
716

717 718 719 720 721
	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)
722
		return -ENOMEM;
723 724 725 726
	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);
727
	if (ret) {
728
		kfree(css->pseudo_subchannel);
729 730
		return ret;
	}
731 732 733 734 735
	mutex_init(&css->mutex);
	css->valid = 1;
	css->cssid = nr;
	sprintf(css->device.bus_id, "css%x", nr);
	css->device.release = channel_subsystem_release;
736
	tod_high = (u32) (get_clock() >> 32);
737
	css_generate_pgid(css, tod_high);
738
	return 0;
L
Linus Torvalds 已提交
739 740
}

741 742 743 744 745 746 747 748 749 750 751
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];
752
		mutex_lock(&css->mutex);
753 754 755
		if (css->cm_enabled)
			if (chsc_secm(css, 0))
				ret = NOTIFY_BAD;
756
		mutex_unlock(&css->mutex);
757 758 759 760 761 762 763 764 765
	}

	return ret;
}

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

L
Linus Torvalds 已提交
766 767 768 769 770 771 772 773
/*
 * 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)
{
774
	int ret, i;
L
Linus Torvalds 已提交
775

776 777 778 779
	ret = chsc_determine_css_characteristics();
	if (ret == -ENOMEM)
		goto out; /* No need to continue. */
	if (ret == 0)
L
Linus Torvalds 已提交
780 781
		css_characteristics_avail = 1;

782 783 784 785 786 787 788 789
	ret = chsc_alloc_sei_area();
	if (ret)
		goto out;

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

L
Linus Torvalds 已提交
790 791 792
	if ((ret = bus_register(&css_bus_type)))
		goto out;

793 794 795 796 797 798 799 800 801 802 803
	/* 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;
	}
804 805
	/* Setup css structure. */
	for (i = 0; i <= __MAX_CSSID; i++) {
806 807 808 809
		struct channel_subsystem *css;

		css = kmalloc(sizeof(struct channel_subsystem), GFP_KERNEL);
		if (!css) {
810
			ret = -ENOMEM;
811
			goto out_unregister;
812
		}
813
		channel_subsystems[i] = css;
814
		ret = setup_css(i);
815 816
		if (ret)
			goto out_free;
817
		ret = device_register(&css->device);
818 819
		if (ret)
			goto out_free_all;
820 821
		if (css_characteristics_avail &&
		    css_chsc_characteristics.secm) {
822
			ret = device_create_file(&css->device,
823 824 825 826
						 &dev_attr_cm_enable);
			if (ret)
				goto out_device;
		}
827
		ret = device_register(&css->pseudo_subchannel->dev);
828 829
		if (ret)
			goto out_file;
830
	}
831 832 833
	ret = register_reboot_notifier(&css_reboot_notifier);
	if (ret)
		goto out_pseudo;
L
Linus Torvalds 已提交
834 835 836 837
	css_init_done = 1;

	ctl_set_bit(6, 28);

838
	for_each_subchannel(__init_channel_subsystem, NULL);
L
Linus Torvalds 已提交
839
	return 0;
840 841
out_pseudo:
	device_unregister(&channel_subsystems[i]->pseudo_subchannel->dev);
842
out_file:
843 844
	device_remove_file(&channel_subsystems[i]->device,
			   &dev_attr_cm_enable);
845
out_device:
846
	device_unregister(&channel_subsystems[i]->device);
847
out_free_all:
848 849
	kfree(channel_subsystems[i]->pseudo_subchannel->lock);
	kfree(channel_subsystems[i]->pseudo_subchannel);
850
out_free:
851
	kfree(channel_subsystems[i]);
852
out_unregister:
853
	while (i > 0) {
854 855
		struct channel_subsystem *css;

856
		i--;
857 858
		css = channel_subsystems[i];
		device_unregister(&css->pseudo_subchannel->dev);
859
		if (css_characteristics_avail && css_chsc_characteristics.secm)
860
			device_remove_file(&css->device,
861
					   &dev_attr_cm_enable);
862
		device_unregister(&css->device);
863
	}
864
out_bus:
L
Linus Torvalds 已提交
865 866
	bus_unregister(&css_bus_type);
out:
867 868 869 870
	chsc_free_sei_area();
	kfree(slow_subchannel_set);
	printk(KERN_WARNING"cio: failed to initialize css driver (%d)!\n",
	       ret);
L
Linus Torvalds 已提交
871 872 873
	return ret;
}

874 875 876 877 878
int sch_is_pseudo_sch(struct subchannel *sch)
{
	return sch == to_css(sch->dev.parent)->pseudo_subchannel;
}

L
Linus Torvalds 已提交
879 880 881 882 883 884 885 886
/*
 * 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)
{
887 888
	struct subchannel *sch = to_subchannel(dev);
	struct css_driver *driver = to_cssdriver(drv);
L
Linus Torvalds 已提交
889 890 891 892 893 894 895

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

	return 0;
}

C
Cornelia Huck 已提交
896
static int css_probe(struct device *dev)
897 898
{
	struct subchannel *sch;
C
Cornelia Huck 已提交
899
	int ret;
900 901

	sch = to_subchannel(dev);
902
	sch->driver = to_cssdriver(dev->driver);
C
Cornelia Huck 已提交
903 904 905 906
	ret = sch->driver->probe ? sch->driver->probe(sch) : 0;
	if (ret)
		sch->driver = NULL;
	return ret;
907 908
}

C
Cornelia Huck 已提交
909
static int css_remove(struct device *dev)
910 911
{
	struct subchannel *sch;
C
Cornelia Huck 已提交
912
	int ret;
913 914

	sch = to_subchannel(dev);
C
Cornelia Huck 已提交
915 916 917
	ret = sch->driver->remove ? sch->driver->remove(sch) : 0;
	sch->driver = NULL;
	return ret;
918 919
}

C
Cornelia Huck 已提交
920
static void css_shutdown(struct device *dev)
921 922 923 924
{
	struct subchannel *sch;

	sch = to_subchannel(dev);
C
Cornelia Huck 已提交
925
	if (sch->driver && sch->driver->shutdown)
926 927 928
		sch->driver->shutdown(sch);
}

L
Linus Torvalds 已提交
929
struct bus_type css_bus_type = {
930 931 932 933 934
	.name     = "css",
	.match    = css_bus_match,
	.probe    = css_probe,
	.remove   = css_remove,
	.shutdown = css_shutdown,
L
Linus Torvalds 已提交
935 936
};

937 938 939 940 941 942 943 944 945 946 947
/**
 * 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;
948
	cdrv->drv.owner = cdrv->owner;
949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964
	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 已提交
965 966 967 968 969
subsys_initcall(init_channel_subsystem);

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