Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * drivers/s390/cio/chsc.c | |
3 | * S/390 common I/O routines -- channel subsystem call | |
1da177e4 | 4 | * |
34aec07c | 5 | * Copyright IBM Corp. 1999,2010 |
1da177e4 | 6 | * Author(s): Ingo Adlung (adlung@de.ibm.com) |
4ce3b30c | 7 | * Cornelia Huck (cornelia.huck@de.ibm.com) |
1da177e4 LT |
8 | * Arnd Bergmann (arndb@de.ibm.com) |
9 | */ | |
10 | ||
e6d5a428 ME |
11 | #define KMSG_COMPONENT "cio" |
12 | #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt | |
13 | ||
1da177e4 | 14 | #include <linux/module.h> |
1da177e4 LT |
15 | #include <linux/slab.h> |
16 | #include <linux/init.h> | |
17 | #include <linux/device.h> | |
18 | ||
19 | #include <asm/cio.h> | |
e5854a58 | 20 | #include <asm/chpid.h> |
9d92a7e1 | 21 | #include <asm/chsc.h> |
f5daba1d | 22 | #include <asm/crw.h> |
1da177e4 LT |
23 | |
24 | #include "css.h" | |
25 | #include "cio.h" | |
26 | #include "cio_debug.h" | |
27 | #include "ioasm.h" | |
e6b6e10a | 28 | #include "chp.h" |
1da177e4 LT |
29 | #include "chsc.h" |
30 | ||
1da177e4 | 31 | static void *sei_page; |
34196f82 SO |
32 | static void *chsc_page; |
33 | static DEFINE_SPINLOCK(chsc_page_lock); | |
1da177e4 | 34 | |
dae39843 CH |
35 | /** |
36 | * chsc_error_from_response() - convert a chsc response to an error | |
37 | * @response: chsc response code | |
38 | * | |
39 | * Returns an appropriate Linux error code for @response. | |
40 | */ | |
41 | int chsc_error_from_response(int response) | |
b9c9a21a CH |
42 | { |
43 | switch (response) { | |
44 | case 0x0001: | |
45 | return 0; | |
46 | case 0x0002: | |
47 | case 0x0003: | |
48 | case 0x0006: | |
49 | case 0x0007: | |
50 | case 0x0008: | |
51 | case 0x000a: | |
fd0457a6 | 52 | case 0x0104: |
b9c9a21a CH |
53 | return -EINVAL; |
54 | case 0x0004: | |
55 | return -EOPNOTSUPP; | |
56 | default: | |
57 | return -EIO; | |
58 | } | |
59 | } | |
dae39843 | 60 | EXPORT_SYMBOL_GPL(chsc_error_from_response); |
b9c9a21a | 61 | |
7ad6a249 PO |
62 | struct chsc_ssd_area { |
63 | struct chsc_header request; | |
64 | u16 :10; | |
65 | u16 ssid:2; | |
66 | u16 :4; | |
67 | u16 f_sch; /* first subchannel */ | |
68 | u16 :16; | |
69 | u16 l_sch; /* last subchannel */ | |
70 | u32 :32; | |
71 | struct chsc_header response; | |
72 | u32 :32; | |
73 | u8 sch_valid : 1; | |
74 | u8 dev_valid : 1; | |
75 | u8 st : 3; /* subchannel type */ | |
76 | u8 zeroes : 3; | |
77 | u8 unit_addr; /* unit address */ | |
78 | u16 devno; /* device number */ | |
79 | u8 path_mask; | |
80 | u8 fla_valid_mask; | |
81 | u16 sch; /* subchannel */ | |
82 | u8 chpid[8]; /* chpids 0-7 */ | |
83 | u16 fla[8]; /* full link addresses 0-7 */ | |
84 | } __attribute__ ((packed)); | |
85 | ||
86 | int chsc_get_ssd_info(struct subchannel_id schid, struct chsc_ssd_info *ssd) | |
1da177e4 | 87 | { |
7ad6a249 PO |
88 | struct chsc_ssd_area *ssd_area; |
89 | int ccode; | |
90 | int ret; | |
91 | int i; | |
92 | int mask; | |
1da177e4 | 93 | |
34196f82 SO |
94 | spin_lock_irq(&chsc_page_lock); |
95 | memset(chsc_page, 0, PAGE_SIZE); | |
96 | ssd_area = chsc_page; | |
495a5b45 CH |
97 | ssd_area->request.length = 0x0010; |
98 | ssd_area->request.code = 0x0004; | |
7ad6a249 PO |
99 | ssd_area->ssid = schid.ssid; |
100 | ssd_area->f_sch = schid.sch_no; | |
101 | ssd_area->l_sch = schid.sch_no; | |
1da177e4 LT |
102 | |
103 | ccode = chsc(ssd_area); | |
7ad6a249 | 104 | /* Check response. */ |
1da177e4 | 105 | if (ccode > 0) { |
7ad6a249 | 106 | ret = (ccode == 3) ? -ENODEV : -EBUSY; |
34196f82 | 107 | goto out; |
1da177e4 | 108 | } |
b9c9a21a CH |
109 | ret = chsc_error_from_response(ssd_area->response.code); |
110 | if (ret != 0) { | |
7ad6a249 PO |
111 | CIO_MSG_EVENT(2, "chsc: ssd failed for 0.%x.%04x (rc=%04x)\n", |
112 | schid.ssid, schid.sch_no, | |
1da177e4 | 113 | ssd_area->response.code); |
34196f82 | 114 | goto out; |
1da177e4 | 115 | } |
7ad6a249 PO |
116 | if (!ssd_area->sch_valid) { |
117 | ret = -ENODEV; | |
34196f82 | 118 | goto out; |
1da177e4 | 119 | } |
7ad6a249 PO |
120 | /* Copy data */ |
121 | ret = 0; | |
122 | memset(ssd, 0, sizeof(struct chsc_ssd_info)); | |
b279a4f5 CH |
123 | if ((ssd_area->st != SUBCHANNEL_TYPE_IO) && |
124 | (ssd_area->st != SUBCHANNEL_TYPE_MSG)) | |
34196f82 | 125 | goto out; |
7ad6a249 PO |
126 | ssd->path_mask = ssd_area->path_mask; |
127 | ssd->fla_valid_mask = ssd_area->fla_valid_mask; | |
128 | for (i = 0; i < 8; i++) { | |
129 | mask = 0x80 >> i; | |
130 | if (ssd_area->path_mask & mask) { | |
131 | chp_id_init(&ssd->chpid[i]); | |
132 | ssd->chpid[i].id = ssd_area->chpid[i]; | |
1da177e4 | 133 | } |
7ad6a249 PO |
134 | if (ssd_area->fla_valid_mask & mask) |
135 | ssd->fla[i] = ssd_area->fla[i]; | |
1da177e4 | 136 | } |
34196f82 SO |
137 | out: |
138 | spin_unlock_irq(&chsc_page_lock); | |
1da177e4 LT |
139 | return ret; |
140 | } | |
141 | ||
e82a1567 | 142 | static int s390_subchannel_remove_chpid(struct subchannel *sch, void *data) |
1da177e4 | 143 | { |
2ec22984 | 144 | spin_lock_irq(sch->lock); |
c820de39 CH |
145 | if (sch->driver && sch->driver->chp_event) |
146 | if (sch->driver->chp_event(sch, data, CHP_OFFLINE) != 0) | |
1da177e4 | 147 | goto out_unreg; |
2ec22984 | 148 | spin_unlock_irq(sch->lock); |
1da177e4 | 149 | return 0; |
387b734f | 150 | |
1da177e4 | 151 | out_unreg: |
1da177e4 | 152 | sch->lpm = 0; |
387b734f | 153 | spin_unlock_irq(sch->lock); |
83b3370c | 154 | css_schedule_eval(sch->schid); |
1da177e4 LT |
155 | return 0; |
156 | } | |
157 | ||
e6b6e10a | 158 | void chsc_chp_offline(struct chp_id chpid) |
1da177e4 LT |
159 | { |
160 | char dbf_txt[15]; | |
99611f87 | 161 | struct chp_link link; |
1da177e4 | 162 | |
f86635fa | 163 | sprintf(dbf_txt, "chpr%x.%02x", chpid.cssid, chpid.id); |
1da177e4 LT |
164 | CIO_TRACE_EVENT(2, dbf_txt); |
165 | ||
e6b6e10a | 166 | if (chp_get_status(chpid) <= 0) |
1da177e4 | 167 | return; |
99611f87 CH |
168 | memset(&link, 0, sizeof(struct chp_link)); |
169 | link.chpid = chpid; | |
22806dc1 CH |
170 | /* Wait until previous actions have settled. */ |
171 | css_wait_for_slow_path(); | |
99611f87 | 172 | for_each_subchannel_staged(s390_subchannel_remove_chpid, NULL, &link); |
1da177e4 LT |
173 | } |
174 | ||
e82a1567 | 175 | static int s390_process_res_acc_new_sch(struct subchannel_id schid, void *data) |
f97a56fb CH |
176 | { |
177 | struct schib schib; | |
f97a56fb CH |
178 | /* |
179 | * We don't know the device yet, but since a path | |
180 | * may be available now to the device we'll have | |
181 | * to do recognition again. | |
182 | * Since we don't have any idea about which chpid | |
183 | * that beast may be on we'll have to do a stsch | |
184 | * on all devices, grr... | |
185 | */ | |
fb6958a5 | 186 | if (stsch_err(schid, &schib)) |
f97a56fb | 187 | /* We're through */ |
83b3370c | 188 | return -ENXIO; |
f97a56fb CH |
189 | |
190 | /* Put it on the slow path. */ | |
83b3370c | 191 | css_schedule_eval(schid); |
f97a56fb CH |
192 | return 0; |
193 | } | |
194 | ||
e82a1567 | 195 | static int __s390_process_res_acc(struct subchannel *sch, void *data) |
1da177e4 | 196 | { |
2ec22984 | 197 | spin_lock_irq(sch->lock); |
c820de39 CH |
198 | if (sch->driver && sch->driver->chp_event) |
199 | sch->driver->chp_event(sch, data, CHP_ONLINE); | |
2ec22984 | 200 | spin_unlock_irq(sch->lock); |
e82a1567 | 201 | |
dd9963f9 | 202 | return 0; |
f97a56fb CH |
203 | } |
204 | ||
99611f87 | 205 | static void s390_process_res_acc(struct chp_link *link) |
f97a56fb | 206 | { |
1da177e4 LT |
207 | char dbf_txt[15]; |
208 | ||
99611f87 CH |
209 | sprintf(dbf_txt, "accpr%x.%02x", link->chpid.cssid, |
210 | link->chpid.id); | |
1da177e4 | 211 | CIO_TRACE_EVENT( 2, dbf_txt); |
99611f87 CH |
212 | if (link->fla != 0) { |
213 | sprintf(dbf_txt, "fla%x", link->fla); | |
1da177e4 LT |
214 | CIO_TRACE_EVENT( 2, dbf_txt); |
215 | } | |
22806dc1 CH |
216 | /* Wait until previous actions have settled. */ |
217 | css_wait_for_slow_path(); | |
1da177e4 LT |
218 | /* |
219 | * I/O resources may have become accessible. | |
220 | * Scan through all subchannels that may be concerned and | |
221 | * do a validation on those. | |
222 | * The more information we have (info), the less scanning | |
223 | * will we have to do. | |
224 | */ | |
e82a1567 | 225 | for_each_subchannel_staged(__s390_process_res_acc, |
99611f87 | 226 | s390_process_res_acc_new_sch, link); |
1da177e4 LT |
227 | } |
228 | ||
229 | static int | |
230 | __get_chpid_from_lir(void *data) | |
231 | { | |
232 | struct lir { | |
233 | u8 iq; | |
234 | u8 ic; | |
235 | u16 sci; | |
236 | /* incident-node descriptor */ | |
237 | u32 indesc[28]; | |
238 | /* attached-node descriptor */ | |
239 | u32 andesc[28]; | |
240 | /* incident-specific information */ | |
241 | u32 isinfo[28]; | |
0f008aa3 | 242 | } __attribute__ ((packed)) *lir; |
1da177e4 | 243 | |
12975aef | 244 | lir = data; |
1da177e4 LT |
245 | if (!(lir->iq&0x80)) |
246 | /* NULL link incident record */ | |
247 | return -EINVAL; | |
248 | if (!(lir->indesc[0]&0xc0000000)) | |
249 | /* node descriptor not valid */ | |
250 | return -EINVAL; | |
251 | if (!(lir->indesc[0]&0x10000000)) | |
252 | /* don't handle device-type nodes - FIXME */ | |
253 | return -EINVAL; | |
254 | /* Byte 3 contains the chpid. Could also be CTCA, but we don't care */ | |
255 | ||
256 | return (u16) (lir->indesc[0]&0x000000ff); | |
257 | } | |
258 | ||
184357a5 PO |
259 | struct chsc_sei_area { |
260 | struct chsc_header request; | |
261 | u32 reserved1; | |
262 | u32 reserved2; | |
263 | u32 reserved3; | |
264 | struct chsc_header response; | |
265 | u32 reserved4; | |
266 | u8 flags; | |
267 | u8 vf; /* validity flags */ | |
268 | u8 rs; /* reporting source */ | |
269 | u8 cc; /* content code */ | |
270 | u16 fla; /* full link address */ | |
271 | u16 rsid; /* reporting source id */ | |
272 | u32 reserved5; | |
273 | u32 reserved6; | |
274 | u8 ccdf[4096 - 16 - 24]; /* content-code dependent field */ | |
275 | /* ccdf has to be big enough for a link-incident record */ | |
276 | } __attribute__ ((packed)); | |
277 | ||
83b3370c | 278 | static void chsc_process_sei_link_incident(struct chsc_sei_area *sei_area) |
184357a5 | 279 | { |
f86635fa PO |
280 | struct chp_id chpid; |
281 | int id; | |
184357a5 PO |
282 | |
283 | CIO_CRW_EVENT(4, "chsc: link incident (rs=%02x, rs_id=%04x)\n", | |
284 | sei_area->rs, sei_area->rsid); | |
285 | if (sei_area->rs != 4) | |
83b3370c | 286 | return; |
f86635fa PO |
287 | id = __get_chpid_from_lir(sei_area->ccdf); |
288 | if (id < 0) | |
184357a5 | 289 | CIO_CRW_EVENT(4, "chsc: link incident - invalid LIR\n"); |
f86635fa PO |
290 | else { |
291 | chp_id_init(&chpid); | |
292 | chpid.id = id; | |
e6b6e10a | 293 | chsc_chp_offline(chpid); |
f86635fa | 294 | } |
184357a5 PO |
295 | } |
296 | ||
83b3370c | 297 | static void chsc_process_sei_res_acc(struct chsc_sei_area *sei_area) |
1da177e4 | 298 | { |
99611f87 | 299 | struct chp_link link; |
f86635fa | 300 | struct chp_id chpid; |
184357a5 | 301 | int status; |
184357a5 PO |
302 | |
303 | CIO_CRW_EVENT(4, "chsc: resource accessibility event (rs=%02x, " | |
304 | "rs_id=%04x)\n", sei_area->rs, sei_area->rsid); | |
305 | if (sei_area->rs != 4) | |
83b3370c | 306 | return; |
f86635fa PO |
307 | chp_id_init(&chpid); |
308 | chpid.id = sei_area->rsid; | |
184357a5 | 309 | /* allocate a new channel path structure, if needed */ |
e6b6e10a | 310 | status = chp_get_status(chpid); |
184357a5 | 311 | if (status < 0) |
e6b6e10a | 312 | chp_new(chpid); |
184357a5 | 313 | else if (!status) |
83b3370c | 314 | return; |
99611f87 CH |
315 | memset(&link, 0, sizeof(struct chp_link)); |
316 | link.chpid = chpid; | |
184357a5 | 317 | if ((sei_area->vf & 0xc0) != 0) { |
99611f87 | 318 | link.fla = sei_area->fla; |
184357a5 PO |
319 | if ((sei_area->vf & 0xc0) == 0xc0) |
320 | /* full link address */ | |
99611f87 | 321 | link.fla_mask = 0xffff; |
184357a5 PO |
322 | else |
323 | /* link address */ | |
99611f87 | 324 | link.fla_mask = 0xff00; |
184357a5 | 325 | } |
99611f87 | 326 | s390_process_res_acc(&link); |
184357a5 PO |
327 | } |
328 | ||
e5854a58 PO |
329 | struct chp_config_data { |
330 | u8 map[32]; | |
331 | u8 op; | |
332 | u8 pc; | |
333 | }; | |
334 | ||
83b3370c | 335 | static void chsc_process_sei_chp_config(struct chsc_sei_area *sei_area) |
e5854a58 PO |
336 | { |
337 | struct chp_config_data *data; | |
338 | struct chp_id chpid; | |
339 | int num; | |
e6d5a428 | 340 | char *events[3] = {"configure", "deconfigure", "cancel deconfigure"}; |
e5854a58 PO |
341 | |
342 | CIO_CRW_EVENT(4, "chsc: channel-path-configuration notification\n"); | |
343 | if (sei_area->rs != 0) | |
83b3370c | 344 | return; |
e5854a58 PO |
345 | data = (struct chp_config_data *) &(sei_area->ccdf); |
346 | chp_id_init(&chpid); | |
347 | for (num = 0; num <= __MAX_CHPID; num++) { | |
348 | if (!chp_test_bit(data->map, num)) | |
349 | continue; | |
350 | chpid.id = num; | |
e6d5a428 ME |
351 | pr_notice("Processing %s for channel path %x.%02x\n", |
352 | events[data->op], chpid.cssid, chpid.id); | |
e5854a58 PO |
353 | switch (data->op) { |
354 | case 0: | |
355 | chp_cfg_schedule(chpid, 1); | |
356 | break; | |
357 | case 1: | |
358 | chp_cfg_schedule(chpid, 0); | |
359 | break; | |
360 | case 2: | |
361 | chp_cfg_cancel_deconfigure(chpid); | |
362 | break; | |
363 | } | |
364 | } | |
e5854a58 PO |
365 | } |
366 | ||
83b3370c | 367 | static void chsc_process_sei(struct chsc_sei_area *sei_area) |
184357a5 | 368 | { |
184357a5 | 369 | /* Check if we might have lost some information. */ |
83b3370c | 370 | if (sei_area->flags & 0x40) { |
184357a5 | 371 | CIO_CRW_EVENT(2, "chsc: event overflow\n"); |
83b3370c PO |
372 | css_schedule_eval_all(); |
373 | } | |
184357a5 | 374 | /* which kind of information was stored? */ |
184357a5 PO |
375 | switch (sei_area->cc) { |
376 | case 1: /* link incident*/ | |
83b3370c | 377 | chsc_process_sei_link_incident(sei_area); |
184357a5 PO |
378 | break; |
379 | case 2: /* i/o resource accessibiliy */ | |
83b3370c | 380 | chsc_process_sei_res_acc(sei_area); |
184357a5 | 381 | break; |
e5854a58 | 382 | case 8: /* channel-path-configuration notification */ |
83b3370c | 383 | chsc_process_sei_chp_config(sei_area); |
e5854a58 | 384 | break; |
184357a5 PO |
385 | default: /* other stuff */ |
386 | CIO_CRW_EVENT(4, "chsc: unhandled sei content code %d\n", | |
387 | sei_area->cc); | |
388 | break; | |
389 | } | |
184357a5 PO |
390 | } |
391 | ||
c1156189 | 392 | static void chsc_process_crw(struct crw *crw0, struct crw *crw1, int overflow) |
184357a5 PO |
393 | { |
394 | struct chsc_sei_area *sei_area; | |
1da177e4 | 395 | |
c1156189 CH |
396 | if (overflow) { |
397 | css_schedule_eval_all(); | |
398 | return; | |
399 | } | |
400 | CIO_CRW_EVENT(2, "CRW reports slct=%d, oflw=%d, " | |
401 | "chn=%d, rsc=%X, anc=%d, erc=%X, rsid=%X\n", | |
402 | crw0->slct, crw0->oflw, crw0->chn, crw0->rsc, crw0->anc, | |
403 | crw0->erc, crw0->rsid); | |
1da177e4 | 404 | if (!sei_page) |
83b3370c | 405 | return; |
184357a5 PO |
406 | /* Access to sei_page is serialized through machine check handler |
407 | * thread, so no need for locking. */ | |
1da177e4 LT |
408 | sei_area = sei_page; |
409 | ||
c1156189 | 410 | CIO_TRACE_EVENT(2, "prcss"); |
1da177e4 | 411 | do { |
1da177e4 | 412 | memset(sei_area, 0, sizeof(*sei_area)); |
495a5b45 CH |
413 | sei_area->request.length = 0x0010; |
414 | sei_area->request.code = 0x000e; | |
184357a5 PO |
415 | if (chsc(sei_area)) |
416 | break; | |
1da177e4 | 417 | |
184357a5 PO |
418 | if (sei_area->response.code == 0x0001) { |
419 | CIO_CRW_EVENT(4, "chsc: sei successful\n"); | |
83b3370c | 420 | chsc_process_sei(sei_area); |
184357a5 PO |
421 | } else { |
422 | CIO_CRW_EVENT(2, "chsc: sei failed (rc=%04x)\n", | |
1da177e4 | 423 | sei_area->response.code); |
1da177e4 LT |
424 | break; |
425 | } | |
426 | } while (sei_area->flags & 0x80); | |
1da177e4 LT |
427 | } |
428 | ||
83b3370c | 429 | void chsc_chp_online(struct chp_id chpid) |
f97a56fb | 430 | { |
1da177e4 | 431 | char dbf_txt[15]; |
99611f87 | 432 | struct chp_link link; |
1da177e4 | 433 | |
f86635fa | 434 | sprintf(dbf_txt, "cadd%x.%02x", chpid.cssid, chpid.id); |
1da177e4 LT |
435 | CIO_TRACE_EVENT(2, dbf_txt); |
436 | ||
22806dc1 | 437 | if (chp_get_status(chpid) != 0) { |
99611f87 CH |
438 | memset(&link, 0, sizeof(struct chp_link)); |
439 | link.chpid = chpid; | |
22806dc1 CH |
440 | /* Wait until previous actions have settled. */ |
441 | css_wait_for_slow_path(); | |
c820de39 | 442 | for_each_subchannel_staged(__s390_process_res_acc, NULL, |
99611f87 | 443 | &link); |
22806dc1 | 444 | } |
1da177e4 LT |
445 | } |
446 | ||
f86635fa PO |
447 | static void __s390_subchannel_vary_chpid(struct subchannel *sch, |
448 | struct chp_id chpid, int on) | |
1da177e4 | 449 | { |
1da177e4 | 450 | unsigned long flags; |
99611f87 | 451 | struct chp_link link; |
1da177e4 | 452 | |
99611f87 CH |
453 | memset(&link, 0, sizeof(struct chp_link)); |
454 | link.chpid = chpid; | |
2ec22984 | 455 | spin_lock_irqsave(sch->lock, flags); |
c820de39 | 456 | if (sch->driver && sch->driver->chp_event) |
99611f87 | 457 | sch->driver->chp_event(sch, &link, |
c820de39 | 458 | on ? CHP_VARY_ON : CHP_VARY_OFF); |
2ec22984 | 459 | spin_unlock_irqrestore(sch->lock, flags); |
1da177e4 LT |
460 | } |
461 | ||
e82a1567 | 462 | static int s390_subchannel_vary_chpid_off(struct subchannel *sch, void *data) |
1da177e4 | 463 | { |
e82a1567 | 464 | struct chp_id *chpid = data; |
1da177e4 LT |
465 | |
466 | __s390_subchannel_vary_chpid(sch, *chpid, 0); | |
467 | return 0; | |
468 | } | |
469 | ||
e82a1567 | 470 | static int s390_subchannel_vary_chpid_on(struct subchannel *sch, void *data) |
1da177e4 | 471 | { |
e82a1567 | 472 | struct chp_id *chpid = data; |
1da177e4 LT |
473 | |
474 | __s390_subchannel_vary_chpid(sch, *chpid, 1); | |
475 | return 0; | |
476 | } | |
477 | ||
f97a56fb CH |
478 | static int |
479 | __s390_vary_chpid_on(struct subchannel_id schid, void *data) | |
480 | { | |
481 | struct schib schib; | |
f97a56fb | 482 | |
fb6958a5 | 483 | if (stsch_err(schid, &schib)) |
f97a56fb CH |
484 | /* We're through */ |
485 | return -ENXIO; | |
486 | /* Put it on the slow path. */ | |
83b3370c | 487 | css_schedule_eval(schid); |
f97a56fb CH |
488 | return 0; |
489 | } | |
490 | ||
e6b6e10a PO |
491 | /** |
492 | * chsc_chp_vary - propagate channel-path vary operation to subchannels | |
493 | * @chpid: channl-path ID | |
494 | * @on: non-zero for vary online, zero for vary offline | |
1da177e4 | 495 | */ |
e6b6e10a | 496 | int chsc_chp_vary(struct chp_id chpid, int on) |
1da177e4 | 497 | { |
99611f87 CH |
498 | struct chp_link link; |
499 | ||
500 | memset(&link, 0, sizeof(struct chp_link)); | |
501 | link.chpid = chpid; | |
22806dc1 CH |
502 | /* Wait until previous actions have settled. */ |
503 | css_wait_for_slow_path(); | |
1da177e4 LT |
504 | /* |
505 | * Redo PathVerification on the devices the chpid connects to | |
506 | */ | |
507 | ||
f97a56fb | 508 | if (on) |
e82a1567 | 509 | for_each_subchannel_staged(s390_subchannel_vary_chpid_on, |
99611f87 | 510 | __s390_vary_chpid_on, &link); |
e82a1567 PO |
511 | else |
512 | for_each_subchannel_staged(s390_subchannel_vary_chpid_off, | |
99611f87 | 513 | NULL, &link); |
e82a1567 | 514 | |
1da177e4 LT |
515 | return 0; |
516 | } | |
517 | ||
495a5b45 CH |
518 | static void |
519 | chsc_remove_cmg_attr(struct channel_subsystem *css) | |
520 | { | |
521 | int i; | |
522 | ||
523 | for (i = 0; i <= __MAX_CHPID; i++) { | |
524 | if (!css->chps[i]) | |
525 | continue; | |
e6b6e10a | 526 | chp_remove_cmg_attr(css->chps[i]); |
495a5b45 CH |
527 | } |
528 | } | |
529 | ||
530 | static int | |
531 | chsc_add_cmg_attr(struct channel_subsystem *css) | |
532 | { | |
533 | int i, ret; | |
534 | ||
535 | ret = 0; | |
536 | for (i = 0; i <= __MAX_CHPID; i++) { | |
537 | if (!css->chps[i]) | |
538 | continue; | |
e6b6e10a | 539 | ret = chp_add_cmg_attr(css->chps[i]); |
495a5b45 CH |
540 | if (ret) |
541 | goto cleanup; | |
542 | } | |
543 | return ret; | |
544 | cleanup: | |
545 | for (--i; i >= 0; i--) { | |
546 | if (!css->chps[i]) | |
547 | continue; | |
e6b6e10a | 548 | chp_remove_cmg_attr(css->chps[i]); |
495a5b45 CH |
549 | } |
550 | return ret; | |
551 | } | |
552 | ||
34196f82 | 553 | int __chsc_do_secm(struct channel_subsystem *css, int enable) |
495a5b45 CH |
554 | { |
555 | struct { | |
556 | struct chsc_header request; | |
557 | u32 operation_code : 2; | |
558 | u32 : 30; | |
559 | u32 key : 4; | |
560 | u32 : 28; | |
561 | u32 zeroes1; | |
562 | u32 cub_addr1; | |
563 | u32 zeroes2; | |
564 | u32 cub_addr2; | |
565 | u32 reserved[13]; | |
566 | struct chsc_header response; | |
567 | u32 status : 8; | |
568 | u32 : 4; | |
569 | u32 fmt : 4; | |
570 | u32 : 16; | |
0f008aa3 | 571 | } __attribute__ ((packed)) *secm_area; |
495a5b45 CH |
572 | int ret, ccode; |
573 | ||
34196f82 SO |
574 | spin_lock_irq(&chsc_page_lock); |
575 | memset(chsc_page, 0, PAGE_SIZE); | |
576 | secm_area = chsc_page; | |
495a5b45 CH |
577 | secm_area->request.length = 0x0050; |
578 | secm_area->request.code = 0x0016; | |
579 | ||
d1bf8590 | 580 | secm_area->key = PAGE_DEFAULT_KEY >> 4; |
495a5b45 CH |
581 | secm_area->cub_addr1 = (u64)(unsigned long)css->cub_addr1; |
582 | secm_area->cub_addr2 = (u64)(unsigned long)css->cub_addr2; | |
583 | ||
584 | secm_area->operation_code = enable ? 0 : 1; | |
585 | ||
586 | ccode = chsc(secm_area); | |
34196f82 SO |
587 | if (ccode > 0) { |
588 | ret = (ccode == 3) ? -ENODEV : -EBUSY; | |
589 | goto out; | |
590 | } | |
495a5b45 CH |
591 | |
592 | switch (secm_area->response.code) { | |
b9c9a21a CH |
593 | case 0x0102: |
594 | case 0x0103: | |
495a5b45 | 595 | ret = -EINVAL; |
17e7d87d | 596 | break; |
495a5b45 | 597 | default: |
b9c9a21a | 598 | ret = chsc_error_from_response(secm_area->response.code); |
495a5b45 | 599 | } |
b9c9a21a CH |
600 | if (ret != 0) |
601 | CIO_CRW_EVENT(2, "chsc: secm failed (rc=%04x)\n", | |
602 | secm_area->response.code); | |
34196f82 SO |
603 | out: |
604 | spin_unlock_irq(&chsc_page_lock); | |
495a5b45 CH |
605 | return ret; |
606 | } | |
607 | ||
608 | int | |
609 | chsc_secm(struct channel_subsystem *css, int enable) | |
610 | { | |
495a5b45 CH |
611 | int ret; |
612 | ||
495a5b45 CH |
613 | if (enable && !css->cm_enabled) { |
614 | css->cub_addr1 = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA); | |
615 | css->cub_addr2 = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA); | |
616 | if (!css->cub_addr1 || !css->cub_addr2) { | |
617 | free_page((unsigned long)css->cub_addr1); | |
618 | free_page((unsigned long)css->cub_addr2); | |
495a5b45 CH |
619 | return -ENOMEM; |
620 | } | |
621 | } | |
34196f82 | 622 | ret = __chsc_do_secm(css, enable); |
495a5b45 CH |
623 | if (!ret) { |
624 | css->cm_enabled = enable; | |
625 | if (css->cm_enabled) { | |
626 | ret = chsc_add_cmg_attr(css); | |
627 | if (ret) { | |
34196f82 | 628 | __chsc_do_secm(css, 0); |
495a5b45 CH |
629 | css->cm_enabled = 0; |
630 | } | |
631 | } else | |
632 | chsc_remove_cmg_attr(css); | |
633 | } | |
8c4941c5 | 634 | if (!css->cm_enabled) { |
495a5b45 CH |
635 | free_page((unsigned long)css->cub_addr1); |
636 | free_page((unsigned long)css->cub_addr2); | |
637 | } | |
495a5b45 CH |
638 | return ret; |
639 | } | |
640 | ||
9d92a7e1 CH |
641 | int chsc_determine_channel_path_desc(struct chp_id chpid, int fmt, int rfmt, |
642 | int c, int m, | |
643 | struct chsc_response_struct *resp) | |
1da177e4 LT |
644 | { |
645 | int ccode, ret; | |
646 | ||
647 | struct { | |
648 | struct chsc_header request; | |
9d92a7e1 CH |
649 | u32 : 2; |
650 | u32 m : 1; | |
651 | u32 c : 1; | |
652 | u32 fmt : 4; | |
653 | u32 cssid : 8; | |
654 | u32 : 4; | |
655 | u32 rfmt : 4; | |
1da177e4 LT |
656 | u32 first_chpid : 8; |
657 | u32 : 24; | |
658 | u32 last_chpid : 8; | |
659 | u32 zeroes1; | |
660 | struct chsc_header response; | |
9d92a7e1 | 661 | u8 data[PAGE_SIZE - 20]; |
0f008aa3 | 662 | } __attribute__ ((packed)) *scpd_area; |
1da177e4 | 663 | |
9d92a7e1 CH |
664 | if ((rfmt == 1) && !css_general_characteristics.fcs) |
665 | return -EINVAL; | |
666 | if ((rfmt == 2) && !css_general_characteristics.cib) | |
667 | return -EINVAL; | |
1da177e4 | 668 | |
34196f82 SO |
669 | spin_lock_irq(&chsc_page_lock); |
670 | memset(chsc_page, 0, PAGE_SIZE); | |
671 | scpd_area = chsc_page; | |
495a5b45 CH |
672 | scpd_area->request.length = 0x0010; |
673 | scpd_area->request.code = 0x0002; | |
9d92a7e1 | 674 | scpd_area->cssid = chpid.cssid; |
f86635fa PO |
675 | scpd_area->first_chpid = chpid.id; |
676 | scpd_area->last_chpid = chpid.id; | |
9d92a7e1 CH |
677 | scpd_area->m = m; |
678 | scpd_area->c = c; | |
679 | scpd_area->fmt = fmt; | |
680 | scpd_area->rfmt = rfmt; | |
1da177e4 LT |
681 | |
682 | ccode = chsc(scpd_area); | |
683 | if (ccode > 0) { | |
684 | ret = (ccode == 3) ? -ENODEV : -EBUSY; | |
685 | goto out; | |
686 | } | |
687 | ||
b9c9a21a CH |
688 | ret = chsc_error_from_response(scpd_area->response.code); |
689 | if (ret == 0) | |
690 | /* Success. */ | |
9d92a7e1 | 691 | memcpy(resp, &scpd_area->response, scpd_area->response.length); |
b9c9a21a CH |
692 | else |
693 | CIO_CRW_EVENT(2, "chsc: scpd failed (rc=%04x)\n", | |
1da177e4 | 694 | scpd_area->response.code); |
1da177e4 | 695 | out: |
34196f82 | 696 | spin_unlock_irq(&chsc_page_lock); |
1da177e4 LT |
697 | return ret; |
698 | } | |
9d92a7e1 CH |
699 | EXPORT_SYMBOL_GPL(chsc_determine_channel_path_desc); |
700 | ||
701 | int chsc_determine_base_channel_path_desc(struct chp_id chpid, | |
702 | struct channel_path_desc *desc) | |
703 | { | |
704 | struct chsc_response_struct *chsc_resp; | |
705 | int ret; | |
706 | ||
707 | chsc_resp = kzalloc(sizeof(*chsc_resp), GFP_KERNEL); | |
708 | if (!chsc_resp) | |
709 | return -ENOMEM; | |
710 | ret = chsc_determine_channel_path_desc(chpid, 0, 0, 0, 0, chsc_resp); | |
711 | if (ret) | |
712 | goto out_free; | |
878c4956 | 713 | memcpy(desc, &chsc_resp->data, sizeof(*desc)); |
9d92a7e1 CH |
714 | out_free: |
715 | kfree(chsc_resp); | |
716 | return ret; | |
717 | } | |
1da177e4 | 718 | |
495a5b45 CH |
719 | static void |
720 | chsc_initialize_cmg_chars(struct channel_path *chp, u8 cmcv, | |
721 | struct cmg_chars *chars) | |
722 | { | |
34196f82 SO |
723 | struct cmg_chars *cmg_chars; |
724 | int i, mask; | |
725 | ||
726 | cmg_chars = chp->cmg_chars; | |
727 | for (i = 0; i < NR_MEASUREMENT_CHARS; i++) { | |
728 | mask = 0x80 >> (i + 3); | |
729 | if (cmcv & mask) | |
730 | cmg_chars->values[i] = chars->values[i]; | |
731 | else | |
732 | cmg_chars->values[i] = 0; | |
495a5b45 CH |
733 | } |
734 | } | |
735 | ||
e6b6e10a | 736 | int chsc_get_channel_measurement_chars(struct channel_path *chp) |
495a5b45 | 737 | { |
34196f82 | 738 | struct cmg_chars *cmg_chars; |
495a5b45 CH |
739 | int ccode, ret; |
740 | ||
741 | struct { | |
742 | struct chsc_header request; | |
743 | u32 : 24; | |
744 | u32 first_chpid : 8; | |
745 | u32 : 24; | |
746 | u32 last_chpid : 8; | |
747 | u32 zeroes1; | |
748 | struct chsc_header response; | |
749 | u32 zeroes2; | |
750 | u32 not_valid : 1; | |
751 | u32 shared : 1; | |
752 | u32 : 22; | |
753 | u32 chpid : 8; | |
754 | u32 cmcv : 5; | |
755 | u32 : 11; | |
756 | u32 cmgq : 8; | |
757 | u32 cmg : 8; | |
758 | u32 zeroes3; | |
759 | u32 data[NR_MEASUREMENT_CHARS]; | |
0f008aa3 | 760 | } __attribute__ ((packed)) *scmc_area; |
495a5b45 | 761 | |
34196f82 SO |
762 | chp->cmg_chars = NULL; |
763 | cmg_chars = kmalloc(sizeof(*cmg_chars), GFP_KERNEL); | |
764 | if (!cmg_chars) | |
495a5b45 CH |
765 | return -ENOMEM; |
766 | ||
34196f82 SO |
767 | spin_lock_irq(&chsc_page_lock); |
768 | memset(chsc_page, 0, PAGE_SIZE); | |
769 | scmc_area = chsc_page; | |
495a5b45 CH |
770 | scmc_area->request.length = 0x0010; |
771 | scmc_area->request.code = 0x0022; | |
f86635fa PO |
772 | scmc_area->first_chpid = chp->chpid.id; |
773 | scmc_area->last_chpid = chp->chpid.id; | |
495a5b45 CH |
774 | |
775 | ccode = chsc(scmc_area); | |
776 | if (ccode > 0) { | |
777 | ret = (ccode == 3) ? -ENODEV : -EBUSY; | |
778 | goto out; | |
779 | } | |
780 | ||
b9c9a21a | 781 | ret = chsc_error_from_response(scmc_area->response.code); |
34196f82 | 782 | if (ret) { |
b9c9a21a | 783 | CIO_CRW_EVENT(2, "chsc: scmc failed (rc=%04x)\n", |
495a5b45 | 784 | scmc_area->response.code); |
34196f82 SO |
785 | goto out; |
786 | } | |
787 | if (scmc_area->not_valid) { | |
788 | chp->cmg = -1; | |
789 | chp->shared = -1; | |
790 | goto out; | |
791 | } | |
792 | chp->cmg = scmc_area->cmg; | |
793 | chp->shared = scmc_area->shared; | |
794 | if (chp->cmg != 2 && chp->cmg != 3) { | |
795 | /* No cmg-dependent data. */ | |
796 | goto out; | |
495a5b45 | 797 | } |
34196f82 SO |
798 | chp->cmg_chars = cmg_chars; |
799 | chsc_initialize_cmg_chars(chp, scmc_area->cmcv, | |
800 | (struct cmg_chars *) &scmc_area->data); | |
495a5b45 | 801 | out: |
34196f82 SO |
802 | spin_unlock_irq(&chsc_page_lock); |
803 | if (!chp->cmg_chars) | |
804 | kfree(cmg_chars); | |
805 | ||
495a5b45 CH |
806 | return ret; |
807 | } | |
808 | ||
34aec07c | 809 | int __init chsc_init(void) |
1da177e4 | 810 | { |
c1156189 CH |
811 | int ret; |
812 | ||
1da177e4 | 813 | sei_page = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA); |
34196f82 SO |
814 | chsc_page = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA); |
815 | if (!sei_page || !chsc_page) { | |
816 | ret = -ENOMEM; | |
817 | goto out_err; | |
c1156189 | 818 | } |
f5daba1d | 819 | ret = crw_register_handler(CRW_RSC_CSS, chsc_process_crw); |
c1156189 | 820 | if (ret) |
34196f82 SO |
821 | goto out_err; |
822 | return ret; | |
823 | out_err: | |
824 | free_page((unsigned long)chsc_page); | |
825 | free_page((unsigned long)sei_page); | |
c1156189 | 826 | return ret; |
1da177e4 LT |
827 | } |
828 | ||
34aec07c | 829 | void __init chsc_init_cleanup(void) |
4434a38c | 830 | { |
f5daba1d | 831 | crw_unregister_handler(CRW_RSC_CSS); |
34196f82 | 832 | free_page((unsigned long)chsc_page); |
34aec07c | 833 | free_page((unsigned long)sei_page); |
4434a38c CH |
834 | } |
835 | ||
818c272b | 836 | int chsc_enable_facility(int operation_code) |
fb6958a5 | 837 | { |
34196f82 | 838 | unsigned long flags; |
fb6958a5 | 839 | int ret; |
34196f82 | 840 | struct { |
fb6958a5 CH |
841 | struct chsc_header request; |
842 | u8 reserved1:4; | |
843 | u8 format:4; | |
844 | u8 reserved2; | |
845 | u16 operation_code; | |
846 | u32 reserved3; | |
847 | u32 reserved4; | |
848 | u32 operation_data_area[252]; | |
849 | struct chsc_header response; | |
850 | u32 reserved5:4; | |
851 | u32 format2:4; | |
852 | u32 reserved6:24; | |
34196f82 | 853 | } __attribute__ ((packed)) *sda_area; |
fb6958a5 | 854 | |
34196f82 SO |
855 | spin_lock_irqsave(&chsc_page_lock, flags); |
856 | memset(chsc_page, 0, PAGE_SIZE); | |
857 | sda_area = chsc_page; | |
858 | sda_area->request.length = 0x0400; | |
859 | sda_area->request.code = 0x0031; | |
860 | sda_area->operation_code = operation_code; | |
fb6958a5 | 861 | |
34196f82 | 862 | ret = chsc(sda_area); |
fb6958a5 CH |
863 | if (ret > 0) { |
864 | ret = (ret == 3) ? -ENODEV : -EBUSY; | |
865 | goto out; | |
866 | } | |
b9c9a21a | 867 | |
34196f82 | 868 | switch (sda_area->response.code) { |
b9c9a21a | 869 | case 0x0101: |
fb6958a5 CH |
870 | ret = -EOPNOTSUPP; |
871 | break; | |
b9c9a21a | 872 | default: |
34196f82 | 873 | ret = chsc_error_from_response(sda_area->response.code); |
fb6958a5 | 874 | } |
b9c9a21a CH |
875 | if (ret != 0) |
876 | CIO_CRW_EVENT(2, "chsc: sda (oc=%x) failed (rc=%04x)\n", | |
34196f82 SO |
877 | operation_code, sda_area->response.code); |
878 | out: | |
879 | spin_unlock_irqrestore(&chsc_page_lock, flags); | |
fb6958a5 CH |
880 | return ret; |
881 | } | |
882 | ||
1da177e4 LT |
883 | struct css_general_char css_general_characteristics; |
884 | struct css_chsc_char css_chsc_characteristics; | |
885 | ||
886 | int __init | |
887 | chsc_determine_css_characteristics(void) | |
888 | { | |
889 | int result; | |
890 | struct { | |
891 | struct chsc_header request; | |
892 | u32 reserved1; | |
893 | u32 reserved2; | |
894 | u32 reserved3; | |
895 | struct chsc_header response; | |
896 | u32 reserved4; | |
897 | u32 general_char[510]; | |
34aec07c | 898 | u32 chsc_char[508]; |
0f008aa3 | 899 | } __attribute__ ((packed)) *scsc_area; |
1da177e4 | 900 | |
34196f82 SO |
901 | spin_lock_irq(&chsc_page_lock); |
902 | memset(chsc_page, 0, PAGE_SIZE); | |
903 | scsc_area = chsc_page; | |
495a5b45 CH |
904 | scsc_area->request.length = 0x0010; |
905 | scsc_area->request.code = 0x0010; | |
1da177e4 LT |
906 | |
907 | result = chsc(scsc_area); | |
908 | if (result) { | |
b9c9a21a | 909 | result = (result == 3) ? -ENODEV : -EBUSY; |
1da177e4 LT |
910 | goto exit; |
911 | } | |
912 | ||
b9c9a21a CH |
913 | result = chsc_error_from_response(scsc_area->response.code); |
914 | if (result == 0) { | |
915 | memcpy(&css_general_characteristics, scsc_area->general_char, | |
916 | sizeof(css_general_characteristics)); | |
917 | memcpy(&css_chsc_characteristics, scsc_area->chsc_char, | |
918 | sizeof(css_chsc_characteristics)); | |
919 | } else | |
920 | CIO_CRW_EVENT(2, "chsc: scsc failed (rc=%04x)\n", | |
921 | scsc_area->response.code); | |
1da177e4 | 922 | exit: |
34196f82 | 923 | spin_unlock_irq(&chsc_page_lock); |
1da177e4 LT |
924 | return result; |
925 | } | |
926 | ||
927 | EXPORT_SYMBOL_GPL(css_general_characteristics); | |
928 | EXPORT_SYMBOL_GPL(css_chsc_characteristics); | |
d2fec595 MS |
929 | |
930 | int chsc_sstpc(void *page, unsigned int op, u16 ctrl) | |
931 | { | |
932 | struct { | |
933 | struct chsc_header request; | |
934 | unsigned int rsvd0; | |
935 | unsigned int op : 8; | |
936 | unsigned int rsvd1 : 8; | |
937 | unsigned int ctrl : 16; | |
938 | unsigned int rsvd2[5]; | |
939 | struct chsc_header response; | |
940 | unsigned int rsvd3[7]; | |
941 | } __attribute__ ((packed)) *rr; | |
942 | int rc; | |
943 | ||
944 | memset(page, 0, PAGE_SIZE); | |
945 | rr = page; | |
946 | rr->request.length = 0x0020; | |
947 | rr->request.code = 0x0033; | |
948 | rr->op = op; | |
949 | rr->ctrl = ctrl; | |
950 | rc = chsc(rr); | |
951 | if (rc) | |
952 | return -EIO; | |
953 | rc = (rr->response.code == 0x0001) ? 0 : -EIO; | |
954 | return rc; | |
955 | } | |
956 | ||
957 | int chsc_sstpi(void *page, void *result, size_t size) | |
958 | { | |
959 | struct { | |
960 | struct chsc_header request; | |
961 | unsigned int rsvd0[3]; | |
962 | struct chsc_header response; | |
963 | char data[size]; | |
964 | } __attribute__ ((packed)) *rr; | |
965 | int rc; | |
966 | ||
967 | memset(page, 0, PAGE_SIZE); | |
968 | rr = page; | |
969 | rr->request.length = 0x0010; | |
970 | rr->request.code = 0x0038; | |
971 | rc = chsc(rr); | |
972 | if (rc) | |
973 | return -EIO; | |
974 | memcpy(result, &rr->data, size); | |
975 | return (rr->response.code == 0x0001) ? 0 : -EIO; | |
976 | } | |
977 | ||
fd0457a6 ME |
978 | int chsc_siosl(struct subchannel_id schid) |
979 | { | |
34196f82 SO |
980 | struct { |
981 | struct chsc_header request; | |
982 | u32 word1; | |
983 | struct subchannel_id sid; | |
984 | u32 word3; | |
985 | struct chsc_header response; | |
986 | u32 word[11]; | |
987 | } __attribute__ ((packed)) *siosl_area; | |
fd0457a6 ME |
988 | unsigned long flags; |
989 | int ccode; | |
990 | int rc; | |
991 | ||
34196f82 SO |
992 | spin_lock_irqsave(&chsc_page_lock, flags); |
993 | memset(chsc_page, 0, PAGE_SIZE); | |
994 | siosl_area = chsc_page; | |
995 | siosl_area->request.length = 0x0010; | |
996 | siosl_area->request.code = 0x0046; | |
997 | siosl_area->word1 = 0x80000000; | |
998 | siosl_area->sid = schid; | |
fd0457a6 | 999 | |
34196f82 | 1000 | ccode = chsc(siosl_area); |
fd0457a6 ME |
1001 | if (ccode > 0) { |
1002 | if (ccode == 3) | |
1003 | rc = -ENODEV; | |
1004 | else | |
1005 | rc = -EBUSY; | |
1006 | CIO_MSG_EVENT(2, "chsc: chsc failed for 0.%x.%04x (ccode=%d)\n", | |
1007 | schid.ssid, schid.sch_no, ccode); | |
1008 | goto out; | |
1009 | } | |
34196f82 | 1010 | rc = chsc_error_from_response(siosl_area->response.code); |
fd0457a6 ME |
1011 | if (rc) |
1012 | CIO_MSG_EVENT(2, "chsc: siosl failed for 0.%x.%04x (rc=%04x)\n", | |
1013 | schid.ssid, schid.sch_no, | |
34196f82 | 1014 | siosl_area->response.code); |
fd0457a6 ME |
1015 | else |
1016 | CIO_MSG_EVENT(4, "chsc: siosl succeeded for 0.%x.%04x\n", | |
1017 | schid.ssid, schid.sch_no); | |
1018 | out: | |
34196f82 | 1019 | spin_unlock_irqrestore(&chsc_page_lock, flags); |
fd0457a6 ME |
1020 | return rc; |
1021 | } | |
1022 | EXPORT_SYMBOL_GPL(chsc_siosl); |