css.c 22.2 KB
Newer Older
Linus Torvalds's avatar
Linus Torvalds committed
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)
Linus Torvalds's avatar
Linus Torvalds committed
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>
Linus Torvalds's avatar
Linus Torvalds committed
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"
Linus Torvalds's avatar
Linus Torvalds committed
26
27

int css_init_done = 0;
28
static int need_reprobe = 0;
29
static int max_ssid = 0;
Linus Torvalds's avatar
Linus Torvalds committed
30

31
struct channel_subsystem *channel_subsystems[__MAX_CSSID + 1];
Linus Torvalds's avatar
Linus Torvalds committed
32

33
int css_characteristics_avail = 0;
Linus Torvalds's avatar
Linus Torvalds committed
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;
}

Linus Torvalds's avatar
Linus Torvalds committed
110
static struct subchannel *
111
css_alloc_subchannel(struct subchannel_id schid)
Linus Torvalds's avatar
Linus Torvalds committed
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);
Linus Torvalds's avatar
Linus Torvalds committed
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
	if (ret < 0) {
		kfree(sch);
		return ERR_PTR(ret);
	}

	if (sch->st != SUBCHANNEL_TYPE_IO) {
		/* For now we ignore all non-io subchannels. */
		kfree(sch);
		return ERR_PTR(-EINVAL);
	}

	/* 
	 * Set intparm to subchannel address.
	 * This is fine even on 64bit since the subchannel is always located
	 * under 2G.
	 */
136
	sch->schib.pmcw.intparm = (u32)(addr_t)sch;
Linus Torvalds's avatar
Linus Torvalds committed
137
138
	ret = cio_modify(sch);
	if (ret) {
139
		kfree(sch->lock);
Linus Torvalds's avatar
Linus Torvalds committed
140
141
142
143
144
145
146
147
148
149
150
151
152
		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);
153
		kfree(sch->lock);
Linus Torvalds's avatar
Linus Torvalds committed
154
155
156
157
158
159
160
161
162
163
		kfree(sch);
	}
}

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

	sch = to_subchannel(dev);
164
165
	if (!cio_is_console(sch->schid)) {
		kfree(sch->lock);
Linus Torvalds's avatar
Linus Torvalds committed
166
		kfree(sch);
167
	}
Linus Torvalds's avatar
Linus Torvalds committed
168
169
}

170
static int css_sch_device_register(struct subchannel *sch)
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
{
	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);
}

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
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
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)
Linus Torvalds's avatar
Linus Torvalds committed
233
234
235
236
{
	int ret;

	/* Initialize the subchannel structure */
237
	sch->dev.parent = &channel_subsystems[0]->device;
Linus Torvalds's avatar
Linus Torvalds committed
238
239
	sch->dev.bus = &css_bus_type;
	sch->dev.release = &css_subchannel_release;
240
	sch->dev.groups = subch_attr_groups;
241
242
243
244
245
246
247
248
249
	/*
	 * 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;
250
	css_update_ssd_info(sch);
Linus Torvalds's avatar
Linus Torvalds committed
251
	/* make it known to the system */
252
	ret = css_sch_device_register(sch);
253
	if (ret) {
Cornelia Huck's avatar
Cornelia Huck committed
254
255
		CIO_MSG_EVENT(0, "Could not register sch 0.%x.%04x: %d\n",
			      sch->schid.ssid, sch->schid.sch_no, ret);
256
257
		return ret;
	}
Linus Torvalds's avatar
Linus Torvalds committed
258
259
260
	return ret;
}

261
static int css_probe_device(struct subchannel_id schid)
Linus Torvalds's avatar
Linus Torvalds committed
262
263
264
265
{
	int ret;
	struct subchannel *sch;

266
	sch = css_alloc_subchannel(schid);
Linus Torvalds's avatar
Linus Torvalds committed
267
268
269
270
271
272
273
274
	if (IS_ERR(sch))
		return PTR_ERR(sch);
	ret = css_register_subchannel(sch);
	if (ret)
		css_free_subchannel(sch);
	return ret;
}

275
276
277
278
static int
check_subchannel(struct device * dev, void * data)
{
	struct subchannel *sch;
279
	struct subchannel_id *schid = data;
280
281

	sch = to_subchannel(dev);
282
	return schid_equal(&sch->schid, schid);
283
284
}

Linus Torvalds's avatar
Linus Torvalds committed
285
struct subchannel *
286
get_subchannel_by_schid(struct subchannel_id schid)
Linus Torvalds's avatar
Linus Torvalds committed
287
288
289
{
	struct device *dev;

290
	dev = bus_find_device(&css_bus_type, NULL,
291
			      &schid, check_subchannel);
Linus Torvalds's avatar
Linus Torvalds committed
292

293
	return dev ? to_subchannel(dev) : NULL;
Linus Torvalds's avatar
Linus Torvalds committed
294
295
}

296
297
298
299
300
301
302
303
304
305
306
307
/**
 * 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);

308
static int css_get_subchannel_status(struct subchannel *sch)
Linus Torvalds's avatar
Linus Torvalds committed
309
310
311
{
	struct schib schib;

312
313
314
	if (stsch(sch->schid, &schib))
		return CIO_GONE;
	if (!css_sch_is_valid(&schib))
Linus Torvalds's avatar
Linus Torvalds committed
315
		return CIO_GONE;
316
	if (sch->schib.pmcw.dnv && (schib.pmcw.dev != sch->schib.pmcw.dev))
Linus Torvalds's avatar
Linus Torvalds committed
317
		return CIO_REVALIDATE;
318
	if (!sch->lpm)
Linus Torvalds's avatar
Linus Torvalds committed
319
320
321
		return CIO_NO_PATH;
	return CIO_OPER;
}
322
323

static int css_evaluate_known_subchannel(struct subchannel *sch, int slow)
Linus Torvalds's avatar
Linus Torvalds committed
324
325
326
{
	int event, ret, disc;
	unsigned long flags;
327
	enum { NONE, UNREGISTER, UNREGISTER_PROBE, REPROBE } action;
Linus Torvalds's avatar
Linus Torvalds committed
328

329
	spin_lock_irqsave(sch->lock, flags);
330
	disc = device_is_disconnected(sch);
Linus Torvalds's avatar
Linus Torvalds committed
331
	if (disc && slow) {
332
		/* Disconnected devices are evaluated directly only.*/
333
		spin_unlock_irqrestore(sch->lock, flags);
334
		return 0;
Linus Torvalds's avatar
Linus Torvalds committed
335
	}
336
337
	/* No interrupt after machine check - kill pending timers. */
	device_kill_pending_timer(sch);
Linus Torvalds's avatar
Linus Torvalds committed
338
	if (!disc && !slow) {
339
		/* Non-disconnected devices are evaluated on the slow path. */
340
		spin_unlock_irqrestore(sch->lock, flags);
341
		return -EAGAIN;
Linus Torvalds's avatar
Linus Torvalds committed
342
	}
343
	event = css_get_subchannel_status(sch);
344
	CIO_MSG_EVENT(4, "Evaluating schid 0.%x.%04x, event %d, %s, %s path.\n",
345
346
347
348
349
		      sch->schid.ssid, sch->schid.sch_no, event,
		      disc ? "disconnected" : "normal",
		      slow ? "slow" : "fast");
	/* Analyze subchannel status. */
	action = NONE;
Linus Torvalds's avatar
Linus Torvalds committed
350
351
	switch (event) {
	case CIO_NO_PATH:
352
353
354
		if (disc) {
			/* Check if paths have become available. */
			action = REPROBE;
Linus Torvalds's avatar
Linus Torvalds committed
355
356
			break;
		}
357
358
359
360
361
362
363
364
		/* 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) {
365
			spin_unlock_irqrestore(sch->lock, flags);
366
			ret = sch->driver->notify(sch, event);
367
			spin_lock_irqsave(sch->lock, flags);
368
369
			if (ret)
				action = NONE;
Linus Torvalds's avatar
Linus Torvalds committed
370
371
372
		}
		break;
	case CIO_REVALIDATE:
373
374
375
376
377
378
		/* Device will be removed, so no notify necessary. */
		if (disc)
			/* Reprobe because immediate unregister might block. */
			action = REPROBE;
		else
			action = UNREGISTER_PROBE;
Linus Torvalds's avatar
Linus Torvalds committed
379
380
		break;
	case CIO_OPER:
381
		if (disc)
Linus Torvalds's avatar
Linus Torvalds committed
382
			/* Get device operational again. */
383
384
385
386
387
388
389
390
391
			action = REPROBE;
		break;
	}
	/* Perform action. */
	ret = 0;
	switch (action) {
	case UNREGISTER:
	case UNREGISTER_PROBE:
		/* Unregister device (will use subchannel lock). */
392
		spin_unlock_irqrestore(sch->lock, flags);
393
		css_sch_device_unregister(sch);
394
		spin_lock_irqsave(sch->lock, flags);
395
396
397
398
399
400
401

		/* Reset intparm to zeroes. */
		sch->schib.pmcw.intparm = 0;
		cio_modify(sch);
		break;
	case REPROBE:
		device_trigger_reprobe(sch);
Linus Torvalds's avatar
Linus Torvalds committed
402
403
		break;
	default:
404
405
		break;
	}
406
	spin_unlock_irqrestore(sch->lock, flags);
407
408
409
	/* Probe if necessary. */
	if (action == UNREGISTER_PROBE)
		ret = css_probe_device(sch->schid);
410
411
412
413
414
415
416
417
418
419
420
421

	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;
	}
422
	if (stsch_err(schid, &schib) || !css_sch_is_valid(&schib)) {
423
424
		/* Unusable - ignore. */
		return 0;
Linus Torvalds's avatar
Linus Torvalds committed
425
	}
426
427
428
429
430
431
	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);
}

432
static void css_evaluate_subchannel(struct subchannel_id schid, int slow)
433
434
435
436
437
438
439
440
441
442
{
	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);
443
444
	if (ret == -EAGAIN)
		css_schedule_eval(schid);
Linus Torvalds's avatar
Linus Torvalds committed
445
446
}

447
448
449
450
static struct idset *slow_subchannel_set;
static spinlock_t slow_subchannel_lock;

static int __init slow_subchannel_init(void)
Linus Torvalds's avatar
Linus Torvalds committed
451
{
452
453
454
	spin_lock_init(&slow_subchannel_lock);
	slow_subchannel_set = idset_sch_new();
	if (!slow_subchannel_set) {
Cornelia Huck's avatar
Cornelia Huck committed
455
		CIO_MSG_EVENT(0, "could not allocate slow subchannel set\n");
456
457
458
		return -ENOMEM;
	}
	return 0;
Linus Torvalds's avatar
Linus Torvalds committed
459
460
}

461
static int slow_eval_known_fn(struct subchannel *sch, void *data)
Linus Torvalds's avatar
Linus Torvalds committed
462
{
463
464
	int eval;
	int rc;
Linus Torvalds's avatar
Linus Torvalds committed
465
466

	spin_lock_irq(&slow_subchannel_lock);
467
468
469
470
471
472
473
	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);
Linus Torvalds's avatar
Linus Torvalds committed
474
	}
475
476
477
478
479
480
481
482
483
484
485
	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);
Linus Torvalds's avatar
Linus Torvalds committed
486
	spin_unlock_irq(&slow_subchannel_lock);
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
	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);
Linus Torvalds's avatar
Linus Torvalds committed
511
512
}

513
static DECLARE_WORK(slow_path_work, css_slow_path_func);
Linus Torvalds's avatar
Linus Torvalds committed
514
515
struct workqueue_struct *slow_path_wq;

516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
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);
}

536
537
538
539
540
541
void css_wait_for_slow_path(void)
{
	flush_workqueue(ccw_device_notify_work);
	flush_workqueue(slow_path_wq);
}

542
543
544
545
546
/* Reprobe subchannel if unregistered. */
static int reprobe_subchannel(struct subchannel_id schid, void *data)
{
	int ret;

Cornelia Huck's avatar
Cornelia Huck committed
547
548
	CIO_MSG_EVENT(6, "cio: reprobe 0.%x.%04x\n",
		      schid.ssid, schid.sch_no);
549
550
551
552
553
554
555
556
557
	if (need_reprobe)
		return -EAGAIN;

	ret = css_probe_device(schid);
	switch (ret) {
	case 0:
		break;
	case -ENXIO:
	case -ENOMEM:
558
	case -EIO:
559
560
561
562
563
564
565
566
567
568
		/* These should abort looping */
		break;
	default:
		ret = 0;
	}

	return ret;
}

/* Work function used to reprobe all unregistered subchannels. */
569
static void reprobe_all(struct work_struct *unused)
570
571
572
573
574
575
576
577
578
{
	int ret;

	CIO_MSG_EVENT(2, "reprobe start\n");

	need_reprobe = 0;
	/* Make sure initial subchannel scan is done. */
	wait_event(ccw_device_init_wq,
		   atomic_read(&ccw_device_init_count) == 0);
579
	ret = for_each_subchannel_staged(NULL, reprobe_subchannel, NULL);
580
581
582
583
584

	CIO_MSG_EVENT(2, "reprobe done (rc=%d, need_reprobe=%d)\n", ret,
		      need_reprobe);
}

585
static DECLARE_WORK(css_reprobe_work, reprobe_all);
586
587
588
589
590

/* Schedule reprobing of all unregistered subchannels. */
void css_schedule_reprobe(void)
{
	need_reprobe = 1;
591
	queue_work(slow_path_wq, &css_reprobe_work);
592
593
594
595
}

EXPORT_SYMBOL_GPL(css_schedule_reprobe);

Linus Torvalds's avatar
Linus Torvalds committed
596
597
598
/*
 * Called from the machine check handler for subchannel report words.
 */
599
void css_process_crw(int rsid1, int rsid2)
Linus Torvalds's avatar
Linus Torvalds committed
600
{
601
	struct subchannel_id mchk_schid;
Linus Torvalds's avatar
Linus Torvalds committed
602

603
604
	CIO_CRW_EVENT(2, "source is subchannel %04X, subsystem id %x\n",
		      rsid1, rsid2);
605
	init_subchannel_id(&mchk_schid);
606
607
608
609
	mchk_schid.sch_no = rsid1;
	if (rsid2 != 0)
		mchk_schid.ssid = (rsid2 >> 8) & 3;

Linus Torvalds's avatar
Linus Torvalds committed
610
611
612
613
614
	/* 
	 * 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.
	 */
615
	css_evaluate_subchannel(mchk_schid, 0);
Linus Torvalds's avatar
Linus Torvalds committed
616
617
}

618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
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;
640
641
642
		/* -EIO: this subchannel set not supported. */
		case -EIO:
			return ret;
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
		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;
}

Linus Torvalds's avatar
Linus Torvalds committed
658
static void __init
659
css_generate_pgid(struct channel_subsystem *css, u32 tod_high)
Linus Torvalds's avatar
Linus Torvalds committed
660
{
661
662
663
664
	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 {
Linus Torvalds's avatar
Linus Torvalds committed
665
#ifdef CONFIG_SMP
666
		css->global_pgid.pgid_high.cpu_addr = hard_smp_processor_id();
Linus Torvalds's avatar
Linus Torvalds committed
667
#else
668
		css->global_pgid.pgid_high.cpu_addr = 0;
Linus Torvalds's avatar
Linus Torvalds committed
669
670
#endif
	}
671
672
673
674
675
676
	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;

}

677
678
679
680
681
682
static void
channel_subsystem_release(struct device *dev)
{
	struct channel_subsystem *css;

	css = to_css(dev);
683
	mutex_destroy(&css->mutex);
684
685
686
	kfree(css);
}

687
688
689
690
691
static ssize_t
css_cm_enable_show(struct device *dev, struct device_attribute *attr,
		   char *buf)
{
	struct channel_subsystem *css = to_css(dev);
692
	int ret;
693
694
695

	if (!css)
		return 0;
696
697
698
699
	mutex_lock(&css->mutex);
	ret = sprintf(buf, "%x\n", css->cm_enabled);
	mutex_unlock(&css->mutex);
	return ret;
700
701
702
703
704
705
706
707
}

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;
708
	unsigned long val;
709

710
711
712
	ret = strict_strtoul(buf, 16, &val);
	if (ret)
		return ret;
713
	mutex_lock(&css->mutex);
714
715
	switch (val) {
	case 0:
716
717
		ret = css->cm_enabled ? chsc_secm(css, 0) : 0;
		break;
718
	case 1:
719
720
721
722
723
		ret = css->cm_enabled ? 0 : chsc_secm(css, 1);
		break;
	default:
		ret = -EINVAL;
	}
724
	mutex_unlock(&css->mutex);
725
726
727
728
729
	return ret < 0 ? ret : count;
}

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

730
static int __init setup_css(int nr)
731
732
{
	u32 tod_high;
733
	int ret;
734
	struct channel_subsystem *css;
735

736
737
738
739
740
	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)
741
		return -ENOMEM;
742
743
744
745
	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);
746
	if (ret) {
747
		kfree(css->pseudo_subchannel);
748
749
		return ret;
	}
750
751
752
753
754
	mutex_init(&css->mutex);
	css->valid = 1;
	css->cssid = nr;
	sprintf(css->device.bus_id, "css%x", nr);
	css->device.release = channel_subsystem_release;
755
	tod_high = (u32) (get_clock() >> 32);
756
	css_generate_pgid(css, tod_high);
757
	return 0;
Linus Torvalds's avatar
Linus Torvalds committed
758
759
}

760
761
762
763
764
765
766
767
768
769
770
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];
771
		mutex_lock(&css->mutex);
772
773
774
		if (css->cm_enabled)
			if (chsc_secm(css, 0))
				ret = NOTIFY_BAD;
775
		mutex_unlock(&css->mutex);
776
777
778
779
780
781
782
783
784
	}

	return ret;
}

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

Linus Torvalds's avatar
Linus Torvalds committed
785
786
787
788
789
790
791
792
/*
 * 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)
{
793
	int ret, i;
Linus Torvalds's avatar
Linus Torvalds committed
794

795
796
797
798
	ret = chsc_determine_css_characteristics();
	if (ret == -ENOMEM)
		goto out; /* No need to continue. */
	if (ret == 0)
Linus Torvalds's avatar
Linus Torvalds committed
799
800
		css_characteristics_avail = 1;

801
802
803
804
805
806
807
808
	ret = chsc_alloc_sei_area();
	if (ret)
		goto out;

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

Linus Torvalds's avatar
Linus Torvalds committed
809
810
811
	if ((ret = bus_register(&css_bus_type)))
		goto out;

812
813
814
815
816
817
818
819
820
821
822
	/* 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;
	}
823
824
	/* Setup css structure. */
	for (i = 0; i <= __MAX_CSSID; i++) {
825
826
827
828
		struct channel_subsystem *css;

		css = kmalloc(sizeof(struct channel_subsystem), GFP_KERNEL);
		if (!css) {
829
			ret = -ENOMEM;
830
			goto out_unregister;
831
		}
832
		channel_subsystems[i] = css;
833
		ret = setup_css(i);
834
835
		if (ret)
			goto out_free;
836
		ret = device_register(&css->device);
837
838
		if (ret)
			goto out_free_all;
839
840
		if (css_characteristics_avail &&
		    css_chsc_characteristics.secm) {
841
			ret = device_create_file(&css->device,
842
843
844
845
						 &dev_attr_cm_enable);
			if (ret)
				goto out_device;
		}
846
		ret = device_register(&css->pseudo_subchannel->dev);
847
848
		if (ret)
			goto out_file;
849
	}
850
851
852
	ret = register_reboot_notifier(&css_reboot_notifier);
	if (ret)
		goto out_pseudo;
Linus Torvalds's avatar
Linus Torvalds committed
853
854
855
856
	css_init_done = 1;

	ctl_set_bit(6, 28);

857
	for_each_subchannel(__init_channel_subsystem, NULL);
Linus Torvalds's avatar
Linus Torvalds committed
858
	return 0;
859
860
out_pseudo:
	device_unregister(&channel_subsystems[i]->pseudo_subchannel->dev);
861
out_file:
862
863
	device_remove_file(&channel_subsystems[i]->device,
			   &dev_attr_cm_enable);
864
out_device:
865
	device_unregister(&channel_subsystems[i]->device);
866
out_free_all:
867
868
	kfree(channel_subsystems[i]->pseudo_subchannel->lock);
	kfree(channel_subsystems[i]->pseudo_subchannel);
869
out_free:
870
	kfree(channel_subsystems[i]);
871
out_unregister:
872
	while (i > 0) {
873
874
		struct channel_subsystem *css;

875
		i--;
876
877
		css = channel_subsystems[i];
		device_unregister(&css->pseudo_subchannel->dev);
878
		if (css_characteristics_avail && css_chsc_characteristics.secm)
879
			device_remove_file(&css->device,
880
					   &dev_attr_cm_enable);
881
		device_unregister(&css->device);
882
	}
883
out_bus:
Linus Torvalds's avatar
Linus Torvalds committed
884
885
	bus_unregister(&css_bus_type);
out:
886
887
888
889
	chsc_free_sei_area();
	kfree(slow_subchannel_set);
	printk(KERN_WARNING"cio: failed to initialize css driver (%d)!\n",
	       ret);
Linus Torvalds's avatar
Linus Torvalds committed
890
891
892
	return ret;
}

893
894
895
896
897
int sch_is_pseudo_sch(struct subchannel *sch)
{
	return sch == to_css(sch->dev.parent)->pseudo_subchannel;
}

Linus Torvalds's avatar
Linus Torvalds committed
898
899
900
901
902
903
904
905
/*
 * 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)
{
906
907
	struct subchannel *sch = to_subchannel(dev);
	struct css_driver *driver = to_cssdriver(drv);
Linus Torvalds's avatar
Linus Torvalds committed
908
909
910
911
912
913
914

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

	return 0;
}

Cornelia Huck's avatar
Cornelia Huck committed
915
static int css_probe(struct device *dev)
916
917
{
	struct subchannel *sch;
Cornelia Huck's avatar
Cornelia Huck committed
918
	int ret;
919
920

	sch = to_subchannel(dev);
921
	sch->driver = to_cssdriver(dev->driver);
Cornelia Huck's avatar
Cornelia Huck committed
922
923
924
925
	ret = sch->driver->probe ? sch->driver->probe(sch) : 0;
	if (ret)
		sch->driver = NULL;
	return ret;
926
927
}

Cornelia Huck's avatar
Cornelia Huck committed
928
static int css_remove(struct device *dev)
929
930
{
	struct subchannel *sch;
Cornelia Huck's avatar
Cornelia Huck committed
931
	int ret;
932
933

	sch = to_subchannel(dev);
Cornelia Huck's avatar
Cornelia Huck committed
934
935
936
	ret = sch->driver->remove ? sch->driver->remove(sch) : 0;
	sch->driver = NULL;
	return ret;
937
938
}

Cornelia Huck's avatar
Cornelia Huck committed
939
static void css_shutdown(struct device *dev)
940
941
942
943
{
	struct subchannel *sch;

	sch = to_subchannel(dev);
Cornelia Huck's avatar
Cornelia Huck committed
944
	if (sch->driver && sch->driver->shutdown)
945
946
947
		sch->driver->shutdown(sch);
}

Linus Torvalds's avatar
Linus Torvalds committed
948
struct bus_type css_bus_type = {
949
950
951
952
953
	.name     = "css",
	.match    = css_bus_match,
	.probe    = css_probe,
	.remove   = css_remove,
	.shutdown = css_shutdown,
Linus Torvalds's avatar
Linus Torvalds committed
954
955
};

956
957
958
959
960
961
962
963
964
965
966
/**
 * 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;
967
	cdrv->drv.owner = cdrv->owner;
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
	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);

Linus Torvalds's avatar
Linus Torvalds committed
984
985
986
987
988
subsys_initcall(init_channel_subsystem);

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