2 * Channel subsystem base support.
4 * Copyright 2012 IBM Corp.
5 * Author(s): Cornelia Huck <cornelia.huck@de.ibm.com>
7 * This work is licensed under the terms of the GNU GPL, version 2 or (at
8 * your option) any later version. See the COPYING file in the top-level
12 #include "qemu/osdep.h"
13 #include "qapi/error.h"
14 #include "qapi/visitor.h"
16 #include "qemu/bitops.h"
17 #include "exec/address-spaces.h"
19 #include "hw/s390x/ioinst.h"
20 #include "hw/s390x/css.h"
22 #include "hw/s390x/s390_flic.h"
24 typedef struct CrwContainer
{
26 QTAILQ_ENTRY(CrwContainer
) sibling
;
29 typedef struct ChpInfo
{
35 typedef struct SubchSet
{
36 SubchDev
*sch
[MAX_SCHID
+ 1];
37 unsigned long schids_used
[BITS_TO_LONGS(MAX_SCHID
+ 1)];
38 unsigned long devnos_used
[BITS_TO_LONGS(MAX_SCHID
+ 1)];
41 typedef struct CssImage
{
42 SubchSet
*sch_set
[MAX_SSID
+ 1];
43 ChpInfo chpids
[MAX_CHPID
+ 1];
46 typedef struct IoAdapter
{
52 typedef struct ChannelSubSys
{
53 QTAILQ_HEAD(, CrwContainer
) pending_crws
;
61 CssImage
*css
[MAX_CSSID
+ 1];
62 uint8_t default_cssid
;
63 IoAdapter
*io_adapters
[CSS_IO_ADAPTER_TYPE_NUMS
][MAX_ISC
+ 1];
64 QTAILQ_HEAD(, IndAddr
) indicator_addresses
;
67 static ChannelSubSys channel_subsys
= {
68 .pending_crws
= QTAILQ_HEAD_INITIALIZER(channel_subsys
.pending_crws
),
73 .chnmon_active
= false,
74 .indicator_addresses
=
75 QTAILQ_HEAD_INITIALIZER(channel_subsys
.indicator_addresses
),
78 IndAddr
*get_indicator(hwaddr ind_addr
, int len
)
82 QTAILQ_FOREACH(indicator
, &channel_subsys
.indicator_addresses
, sibling
) {
83 if (indicator
->addr
== ind_addr
) {
88 indicator
= g_new0(IndAddr
, 1);
89 indicator
->addr
= ind_addr
;
91 indicator
->refcnt
= 1;
92 QTAILQ_INSERT_TAIL(&channel_subsys
.indicator_addresses
,
97 static int s390_io_adapter_map(AdapterInfo
*adapter
, uint64_t map_addr
,
100 S390FLICState
*fs
= s390_get_flic();
101 S390FLICStateClass
*fsc
= S390_FLIC_COMMON_GET_CLASS(fs
);
103 return fsc
->io_adapter_map(fs
, adapter
->adapter_id
, map_addr
, do_map
);
106 void release_indicator(AdapterInfo
*adapter
, IndAddr
*indicator
)
108 assert(indicator
->refcnt
> 0);
110 if (indicator
->refcnt
> 0) {
113 QTAILQ_REMOVE(&channel_subsys
.indicator_addresses
, indicator
, sibling
);
114 if (indicator
->map
) {
115 s390_io_adapter_map(adapter
, indicator
->map
, false);
120 int map_indicator(AdapterInfo
*adapter
, IndAddr
*indicator
)
124 if (indicator
->map
) {
125 return 0; /* already mapped is not an error */
127 indicator
->map
= indicator
->addr
;
128 ret
= s390_io_adapter_map(adapter
, indicator
->map
, true);
129 if ((ret
!= 0) && (ret
!= -ENOSYS
)) {
139 int css_create_css_image(uint8_t cssid
, bool default_image
)
141 trace_css_new_image(cssid
, default_image
? "(default)" : "");
142 /* 255 is reserved */
146 if (channel_subsys
.css
[cssid
]) {
149 channel_subsys
.css
[cssid
] = g_malloc0(sizeof(CssImage
));
151 channel_subsys
.default_cssid
= cssid
;
156 uint32_t css_get_adapter_id(CssIoAdapterType type
, uint8_t isc
)
158 if (type
>= CSS_IO_ADAPTER_TYPE_NUMS
|| isc
> MAX_ISC
||
159 !channel_subsys
.io_adapters
[type
][isc
]) {
163 return channel_subsys
.io_adapters
[type
][isc
]->id
;
167 * css_register_io_adapters: Register I/O adapters per ISC during init
169 * @swap: an indication if byte swap is needed.
170 * @maskable: an indication if the adapter is subject to the mask operation.
171 * @errp: location to store error information.
173 void css_register_io_adapters(CssIoAdapterType type
, bool swap
, bool maskable
,
179 S390FLICState
*fs
= s390_get_flic();
180 S390FLICStateClass
*fsc
= S390_FLIC_COMMON_GET_CLASS(fs
);
183 * Disallow multiple registrations for the same device type.
184 * Report an error if registering for an already registered type.
186 if (channel_subsys
.io_adapters
[type
][0]) {
187 error_setg(errp
, "Adapters for type %d already registered", type
);
190 for (isc
= 0; isc
<= MAX_ISC
; isc
++) {
191 id
= (type
<< 3) | isc
;
192 ret
= fsc
->register_io_adapter(fs
, id
, isc
, swap
, maskable
);
194 adapter
= g_new0(IoAdapter
, 1);
197 adapter
->type
= type
;
198 channel_subsys
.io_adapters
[type
][isc
] = adapter
;
200 error_setg_errno(errp
, -ret
, "Unexpected error %d when "
201 "registering adapter %d", ret
, id
);
207 * No need to free registered adapters in kvm: kvm will clean up
208 * when the machine goes away.
211 for (isc
--; isc
>= 0; isc
--) {
212 g_free(channel_subsys
.io_adapters
[type
][isc
]);
213 channel_subsys
.io_adapters
[type
][isc
] = NULL
;
219 static void css_clear_io_interrupt(uint16_t subchannel_id
,
220 uint16_t subchannel_nr
)
223 static bool no_clear_irq
;
224 S390FLICState
*fs
= s390_get_flic();
225 S390FLICStateClass
*fsc
= S390_FLIC_COMMON_GET_CLASS(fs
);
228 if (unlikely(no_clear_irq
)) {
231 r
= fsc
->clear_io_irq(fs
, subchannel_id
, subchannel_nr
);
238 * Ignore unavailability, as the user can't do anything
243 error_setg_errno(&err
, -r
, "unexpected error condition");
244 error_propagate(&error_abort
, err
);
248 static inline uint16_t css_do_build_subchannel_id(uint8_t cssid
, uint8_t ssid
)
250 if (channel_subsys
.max_cssid
> 0) {
251 return (cssid
<< 8) | (1 << 3) | (ssid
<< 1) | 1;
253 return (ssid
<< 1) | 1;
256 uint16_t css_build_subchannel_id(SubchDev
*sch
)
258 return css_do_build_subchannel_id(sch
->cssid
, sch
->ssid
);
261 static void css_inject_io_interrupt(SubchDev
*sch
)
263 uint8_t isc
= (sch
->curr_status
.pmcw
.flags
& PMCW_FLAGS_MASK_ISC
) >> 11;
265 trace_css_io_interrupt(sch
->cssid
, sch
->ssid
, sch
->schid
,
266 sch
->curr_status
.pmcw
.intparm
, isc
, "");
267 s390_io_interrupt(css_build_subchannel_id(sch
),
269 sch
->curr_status
.pmcw
.intparm
,
273 void css_conditional_io_interrupt(SubchDev
*sch
)
276 * If the subchannel is not currently status pending, make it pending
279 if (!(sch
->curr_status
.scsw
.ctrl
& SCSW_STCTL_STATUS_PEND
)) {
280 uint8_t isc
= (sch
->curr_status
.pmcw
.flags
& PMCW_FLAGS_MASK_ISC
) >> 11;
282 trace_css_io_interrupt(sch
->cssid
, sch
->ssid
, sch
->schid
,
283 sch
->curr_status
.pmcw
.intparm
, isc
,
285 sch
->curr_status
.scsw
.ctrl
&= ~SCSW_CTRL_MASK_STCTL
;
286 sch
->curr_status
.scsw
.ctrl
|=
287 SCSW_STCTL_ALERT
| SCSW_STCTL_STATUS_PEND
;
288 /* Inject an I/O interrupt. */
289 s390_io_interrupt(css_build_subchannel_id(sch
),
291 sch
->curr_status
.pmcw
.intparm
,
296 void css_adapter_interrupt(uint8_t isc
)
298 uint32_t io_int_word
= (isc
<< 27) | IO_INT_WORD_AI
;
300 trace_css_adapter_interrupt(isc
);
301 s390_io_interrupt(0, 0, 0, io_int_word
);
304 static void sch_handle_clear_func(SubchDev
*sch
)
306 PMCW
*p
= &sch
->curr_status
.pmcw
;
307 SCSW
*s
= &sch
->curr_status
.scsw
;
310 /* Path management: In our simple css, we always choose the only path. */
313 /* Reset values prior to 'issuing the clear signal'. */
316 s
->flags
&= ~SCSW_FLAGS_MASK_PNO
;
318 /* We always 'attempt to issue the clear signal', and we always succeed. */
319 sch
->channel_prog
= 0x0;
320 sch
->last_cmd_valid
= false;
321 s
->ctrl
&= ~SCSW_ACTL_CLEAR_PEND
;
322 s
->ctrl
|= SCSW_STCTL_STATUS_PEND
;
330 static void sch_handle_halt_func(SubchDev
*sch
)
333 PMCW
*p
= &sch
->curr_status
.pmcw
;
334 SCSW
*s
= &sch
->curr_status
.scsw
;
335 hwaddr curr_ccw
= sch
->channel_prog
;
338 /* Path management: In our simple css, we always choose the only path. */
341 /* We always 'attempt to issue the halt signal', and we always succeed. */
342 sch
->channel_prog
= 0x0;
343 sch
->last_cmd_valid
= false;
344 s
->ctrl
&= ~SCSW_ACTL_HALT_PEND
;
345 s
->ctrl
|= SCSW_STCTL_STATUS_PEND
;
347 if ((s
->ctrl
& (SCSW_ACTL_SUBCH_ACTIVE
| SCSW_ACTL_DEVICE_ACTIVE
)) ||
348 !((s
->ctrl
& SCSW_ACTL_START_PEND
) ||
349 (s
->ctrl
& SCSW_ACTL_SUSP
))) {
350 s
->dstat
= SCSW_DSTAT_DEVICE_END
;
352 if ((s
->ctrl
& (SCSW_ACTL_SUBCH_ACTIVE
| SCSW_ACTL_DEVICE_ACTIVE
)) ||
353 (s
->ctrl
& SCSW_ACTL_SUSP
)) {
354 s
->cpa
= curr_ccw
+ 8;
361 static void copy_sense_id_to_guest(SenseId
*dest
, SenseId
*src
)
365 dest
->reserved
= src
->reserved
;
366 dest
->cu_type
= cpu_to_be16(src
->cu_type
);
367 dest
->cu_model
= src
->cu_model
;
368 dest
->dev_type
= cpu_to_be16(src
->dev_type
);
369 dest
->dev_model
= src
->dev_model
;
370 dest
->unused
= src
->unused
;
371 for (i
= 0; i
< ARRAY_SIZE(dest
->ciw
); i
++) {
372 dest
->ciw
[i
].type
= src
->ciw
[i
].type
;
373 dest
->ciw
[i
].command
= src
->ciw
[i
].command
;
374 dest
->ciw
[i
].count
= cpu_to_be16(src
->ciw
[i
].count
);
378 static CCW1
copy_ccw_from_guest(hwaddr addr
, bool fmt1
)
385 cpu_physical_memory_read(addr
, &tmp1
, sizeof(tmp1
));
386 ret
.cmd_code
= tmp1
.cmd_code
;
387 ret
.flags
= tmp1
.flags
;
388 ret
.count
= be16_to_cpu(tmp1
.count
);
389 ret
.cda
= be32_to_cpu(tmp1
.cda
);
391 cpu_physical_memory_read(addr
, &tmp0
, sizeof(tmp0
));
392 if ((tmp0
.cmd_code
& 0x0f) == CCW_CMD_TIC
) {
393 ret
.cmd_code
= CCW_CMD_TIC
;
397 ret
.cmd_code
= tmp0
.cmd_code
;
398 ret
.flags
= tmp0
.flags
;
399 ret
.count
= be16_to_cpu(tmp0
.count
);
401 ret
.cda
= be16_to_cpu(tmp0
.cda1
) | (tmp0
.cda0
<< 16);
406 static int css_interpret_ccw(SubchDev
*sch
, hwaddr ccw_addr
,
407 bool suspend_allowed
)
418 /* Translate everything to format-1 ccws - the information is the same. */
419 ccw
= copy_ccw_from_guest(ccw_addr
, sch
->ccw_fmt_1
);
421 /* Check for invalid command codes. */
422 if ((ccw
.cmd_code
& 0x0f) == 0) {
425 if (((ccw
.cmd_code
& 0x0f) == CCW_CMD_TIC
) &&
426 ((ccw
.cmd_code
& 0xf0) != 0)) {
429 if (!sch
->ccw_fmt_1
&& (ccw
.count
== 0) &&
430 (ccw
.cmd_code
!= CCW_CMD_TIC
)) {
434 if (ccw
.flags
& CCW_FLAG_SUSPEND
) {
435 return suspend_allowed
? -EINPROGRESS
: -EINVAL
;
438 check_len
= !((ccw
.flags
& CCW_FLAG_SLI
) && !(ccw
.flags
& CCW_FLAG_DC
));
441 if (sch
->ccw_no_data_cnt
== 255) {
444 sch
->ccw_no_data_cnt
++;
447 /* Look at the command. */
448 switch (ccw
.cmd_code
) {
453 case CCW_CMD_BASIC_SENSE
:
455 if (ccw
.count
!= sizeof(sch
->sense_data
)) {
460 len
= MIN(ccw
.count
, sizeof(sch
->sense_data
));
461 cpu_physical_memory_write(ccw
.cda
, sch
->sense_data
, len
);
462 sch
->curr_status
.scsw
.count
= ccw
.count
- len
;
463 memset(sch
->sense_data
, 0, sizeof(sch
->sense_data
));
466 case CCW_CMD_SENSE_ID
:
470 copy_sense_id_to_guest(&sense_id
, &sch
->id
);
471 /* Sense ID information is device specific. */
473 if (ccw
.count
!= sizeof(sense_id
)) {
478 len
= MIN(ccw
.count
, sizeof(sense_id
));
480 * Only indicate 0xff in the first sense byte if we actually
481 * have enough place to store at least bytes 0-3.
484 sense_id
.reserved
= 0xff;
486 sense_id
.reserved
= 0;
488 cpu_physical_memory_write(ccw
.cda
, &sense_id
, len
);
489 sch
->curr_status
.scsw
.count
= ccw
.count
- len
;
494 if (sch
->last_cmd_valid
&& (sch
->last_cmd
.cmd_code
== CCW_CMD_TIC
)) {
498 if (ccw
.flags
& (CCW_FLAG_CC
| CCW_FLAG_DC
)) {
502 sch
->channel_prog
= ccw
.cda
;
507 /* Handle device specific commands. */
508 ret
= sch
->ccw_cb(sch
, ccw
);
515 sch
->last_cmd_valid
= true;
517 if (ccw
.flags
& CCW_FLAG_CC
) {
518 sch
->channel_prog
+= 8;
526 static void sch_handle_start_func(SubchDev
*sch
, ORB
*orb
)
529 PMCW
*p
= &sch
->curr_status
.pmcw
;
530 SCSW
*s
= &sch
->curr_status
.scsw
;
533 bool suspend_allowed
;
535 /* Path management: In our simple css, we always choose the only path. */
538 if (!(s
->ctrl
& SCSW_ACTL_SUSP
)) {
539 /* Start Function triggered via ssch, i.e. we have an ORB */
542 /* Look at the orb and try to execute the channel program. */
543 assert(orb
!= NULL
); /* resume does not pass an orb */
544 p
->intparm
= orb
->intparm
;
545 if (!(orb
->lpm
& path
)) {
546 /* Generate a deferred cc 3 condition. */
547 s
->flags
|= SCSW_FLAGS_MASK_CC
;
548 s
->ctrl
&= ~SCSW_CTRL_MASK_STCTL
;
549 s
->ctrl
|= (SCSW_STCTL_ALERT
| SCSW_STCTL_STATUS_PEND
);
552 sch
->ccw_fmt_1
= !!(orb
->ctrl0
& ORB_CTRL0_MASK_FMT
);
553 s
->flags
|= (sch
->ccw_fmt_1
) ? SCSW_FLAGS_MASK_FMT
: 0;
554 sch
->ccw_no_data_cnt
= 0;
555 suspend_allowed
= !!(orb
->ctrl0
& ORB_CTRL0_MASK_SPND
);
557 /* Start Function resumed via rsch, i.e. we don't have an
559 s
->ctrl
&= ~(SCSW_ACTL_SUSP
| SCSW_ACTL_RESUME_PEND
);
560 /* The channel program had been suspended before. */
561 suspend_allowed
= true;
563 sch
->last_cmd_valid
= false;
565 ret
= css_interpret_ccw(sch
, sch
->channel_prog
, suspend_allowed
);
568 /* ccw chain, continue processing */
572 s
->ctrl
&= ~SCSW_ACTL_START_PEND
;
573 s
->ctrl
&= ~SCSW_CTRL_MASK_STCTL
;
574 s
->ctrl
|= SCSW_STCTL_PRIMARY
| SCSW_STCTL_SECONDARY
|
575 SCSW_STCTL_STATUS_PEND
;
576 s
->dstat
= SCSW_DSTAT_CHANNEL_END
| SCSW_DSTAT_DEVICE_END
;
577 s
->cpa
= sch
->channel_prog
+ 8;
580 /* unsupported command, generate unit check (command reject) */
581 s
->ctrl
&= ~SCSW_ACTL_START_PEND
;
582 s
->dstat
= SCSW_DSTAT_UNIT_CHECK
;
583 /* Set sense bit 0 in ecw0. */
584 sch
->sense_data
[0] = 0x80;
585 s
->ctrl
&= ~SCSW_CTRL_MASK_STCTL
;
586 s
->ctrl
|= SCSW_STCTL_PRIMARY
| SCSW_STCTL_SECONDARY
|
587 SCSW_STCTL_ALERT
| SCSW_STCTL_STATUS_PEND
;
588 s
->cpa
= sch
->channel_prog
+ 8;
591 /* memory problem, generate channel data check */
592 s
->ctrl
&= ~SCSW_ACTL_START_PEND
;
593 s
->cstat
= SCSW_CSTAT_DATA_CHECK
;
594 s
->ctrl
&= ~SCSW_CTRL_MASK_STCTL
;
595 s
->ctrl
|= SCSW_STCTL_PRIMARY
| SCSW_STCTL_SECONDARY
|
596 SCSW_STCTL_ALERT
| SCSW_STCTL_STATUS_PEND
;
597 s
->cpa
= sch
->channel_prog
+ 8;
600 /* subchannel busy, generate deferred cc 1 */
601 s
->flags
&= ~SCSW_FLAGS_MASK_CC
;
602 s
->flags
|= (1 << 8);
603 s
->ctrl
&= ~SCSW_CTRL_MASK_STCTL
;
604 s
->ctrl
|= SCSW_STCTL_ALERT
| SCSW_STCTL_STATUS_PEND
;
607 /* channel program has been suspended */
608 s
->ctrl
&= ~SCSW_ACTL_START_PEND
;
609 s
->ctrl
|= SCSW_ACTL_SUSP
;
612 /* error, generate channel program check */
613 s
->ctrl
&= ~SCSW_ACTL_START_PEND
;
614 s
->cstat
= SCSW_CSTAT_PROG_CHECK
;
615 s
->ctrl
&= ~SCSW_CTRL_MASK_STCTL
;
616 s
->ctrl
|= SCSW_STCTL_PRIMARY
| SCSW_STCTL_SECONDARY
|
617 SCSW_STCTL_ALERT
| SCSW_STCTL_STATUS_PEND
;
618 s
->cpa
= sch
->channel_prog
+ 8;
621 } while (ret
== -EAGAIN
);
626 * On real machines, this would run asynchronously to the main vcpus.
627 * We might want to make some parts of the ssch handling (interpreting
628 * read/writes) asynchronous later on if we start supporting more than
629 * our current very simple devices.
631 static void do_subchannel_work(SubchDev
*sch
, ORB
*orb
)
634 SCSW
*s
= &sch
->curr_status
.scsw
;
636 if (s
->ctrl
& SCSW_FCTL_CLEAR_FUNC
) {
637 sch_handle_clear_func(sch
);
638 } else if (s
->ctrl
& SCSW_FCTL_HALT_FUNC
) {
639 sch_handle_halt_func(sch
);
640 } else if (s
->ctrl
& SCSW_FCTL_START_FUNC
) {
641 /* Triggered by both ssch and rsch. */
642 sch_handle_start_func(sch
, orb
);
647 css_inject_io_interrupt(sch
);
650 static void copy_pmcw_to_guest(PMCW
*dest
, const PMCW
*src
)
654 dest
->intparm
= cpu_to_be32(src
->intparm
);
655 dest
->flags
= cpu_to_be16(src
->flags
);
656 dest
->devno
= cpu_to_be16(src
->devno
);
657 dest
->lpm
= src
->lpm
;
658 dest
->pnom
= src
->pnom
;
659 dest
->lpum
= src
->lpum
;
660 dest
->pim
= src
->pim
;
661 dest
->mbi
= cpu_to_be16(src
->mbi
);
662 dest
->pom
= src
->pom
;
663 dest
->pam
= src
->pam
;
664 for (i
= 0; i
< ARRAY_SIZE(dest
->chpid
); i
++) {
665 dest
->chpid
[i
] = src
->chpid
[i
];
667 dest
->chars
= cpu_to_be32(src
->chars
);
670 static void copy_scsw_to_guest(SCSW
*dest
, const SCSW
*src
)
672 dest
->flags
= cpu_to_be16(src
->flags
);
673 dest
->ctrl
= cpu_to_be16(src
->ctrl
);
674 dest
->cpa
= cpu_to_be32(src
->cpa
);
675 dest
->dstat
= src
->dstat
;
676 dest
->cstat
= src
->cstat
;
677 dest
->count
= cpu_to_be16(src
->count
);
680 static void copy_schib_to_guest(SCHIB
*dest
, const SCHIB
*src
)
684 copy_pmcw_to_guest(&dest
->pmcw
, &src
->pmcw
);
685 copy_scsw_to_guest(&dest
->scsw
, &src
->scsw
);
686 dest
->mba
= cpu_to_be64(src
->mba
);
687 for (i
= 0; i
< ARRAY_SIZE(dest
->mda
); i
++) {
688 dest
->mda
[i
] = src
->mda
[i
];
692 int css_do_stsch(SubchDev
*sch
, SCHIB
*schib
)
694 /* Use current status. */
695 copy_schib_to_guest(schib
, &sch
->curr_status
);
699 static void copy_pmcw_from_guest(PMCW
*dest
, const PMCW
*src
)
703 dest
->intparm
= be32_to_cpu(src
->intparm
);
704 dest
->flags
= be16_to_cpu(src
->flags
);
705 dest
->devno
= be16_to_cpu(src
->devno
);
706 dest
->lpm
= src
->lpm
;
707 dest
->pnom
= src
->pnom
;
708 dest
->lpum
= src
->lpum
;
709 dest
->pim
= src
->pim
;
710 dest
->mbi
= be16_to_cpu(src
->mbi
);
711 dest
->pom
= src
->pom
;
712 dest
->pam
= src
->pam
;
713 for (i
= 0; i
< ARRAY_SIZE(dest
->chpid
); i
++) {
714 dest
->chpid
[i
] = src
->chpid
[i
];
716 dest
->chars
= be32_to_cpu(src
->chars
);
719 static void copy_scsw_from_guest(SCSW
*dest
, const SCSW
*src
)
721 dest
->flags
= be16_to_cpu(src
->flags
);
722 dest
->ctrl
= be16_to_cpu(src
->ctrl
);
723 dest
->cpa
= be32_to_cpu(src
->cpa
);
724 dest
->dstat
= src
->dstat
;
725 dest
->cstat
= src
->cstat
;
726 dest
->count
= be16_to_cpu(src
->count
);
729 static void copy_schib_from_guest(SCHIB
*dest
, const SCHIB
*src
)
733 copy_pmcw_from_guest(&dest
->pmcw
, &src
->pmcw
);
734 copy_scsw_from_guest(&dest
->scsw
, &src
->scsw
);
735 dest
->mba
= be64_to_cpu(src
->mba
);
736 for (i
= 0; i
< ARRAY_SIZE(dest
->mda
); i
++) {
737 dest
->mda
[i
] = src
->mda
[i
];
741 int css_do_msch(SubchDev
*sch
, const SCHIB
*orig_schib
)
743 SCSW
*s
= &sch
->curr_status
.scsw
;
744 PMCW
*p
= &sch
->curr_status
.pmcw
;
749 if (!(sch
->curr_status
.pmcw
.flags
& PMCW_FLAGS_MASK_DNV
)) {
754 if (s
->ctrl
& SCSW_STCTL_STATUS_PEND
) {
760 (SCSW_FCTL_START_FUNC
|SCSW_FCTL_HALT_FUNC
|SCSW_FCTL_CLEAR_FUNC
)) {
765 copy_schib_from_guest(&schib
, orig_schib
);
766 /* Only update the program-modifiable fields. */
767 p
->intparm
= schib
.pmcw
.intparm
;
769 p
->flags
&= ~(PMCW_FLAGS_MASK_ISC
| PMCW_FLAGS_MASK_ENA
|
770 PMCW_FLAGS_MASK_LM
| PMCW_FLAGS_MASK_MME
|
772 p
->flags
|= schib
.pmcw
.flags
&
773 (PMCW_FLAGS_MASK_ISC
| PMCW_FLAGS_MASK_ENA
|
774 PMCW_FLAGS_MASK_LM
| PMCW_FLAGS_MASK_MME
|
776 p
->lpm
= schib
.pmcw
.lpm
;
777 p
->mbi
= schib
.pmcw
.mbi
;
778 p
->pom
= schib
.pmcw
.pom
;
779 p
->chars
&= ~(PMCW_CHARS_MASK_MBFC
| PMCW_CHARS_MASK_CSENSE
);
780 p
->chars
|= schib
.pmcw
.chars
&
781 (PMCW_CHARS_MASK_MBFC
| PMCW_CHARS_MASK_CSENSE
);
782 sch
->curr_status
.mba
= schib
.mba
;
784 /* Has the channel been disabled? */
785 if (sch
->disable_cb
&& (oldflags
& PMCW_FLAGS_MASK_ENA
) != 0
786 && (p
->flags
& PMCW_FLAGS_MASK_ENA
) == 0) {
787 sch
->disable_cb(sch
);
796 int css_do_xsch(SubchDev
*sch
)
798 SCSW
*s
= &sch
->curr_status
.scsw
;
799 PMCW
*p
= &sch
->curr_status
.pmcw
;
802 if (~(p
->flags
) & (PMCW_FLAGS_MASK_DNV
| PMCW_FLAGS_MASK_ENA
)) {
807 if (!(s
->ctrl
& SCSW_CTRL_MASK_FCTL
) ||
808 ((s
->ctrl
& SCSW_CTRL_MASK_FCTL
) != SCSW_FCTL_START_FUNC
) ||
810 (SCSW_ACTL_RESUME_PEND
| SCSW_ACTL_START_PEND
| SCSW_ACTL_SUSP
))) ||
811 (s
->ctrl
& SCSW_ACTL_SUBCH_ACTIVE
)) {
816 if (s
->ctrl
& SCSW_CTRL_MASK_STCTL
) {
821 /* Cancel the current operation. */
822 s
->ctrl
&= ~(SCSW_FCTL_START_FUNC
|
823 SCSW_ACTL_RESUME_PEND
|
824 SCSW_ACTL_START_PEND
|
826 sch
->channel_prog
= 0x0;
827 sch
->last_cmd_valid
= false;
836 int css_do_csch(SubchDev
*sch
)
838 SCSW
*s
= &sch
->curr_status
.scsw
;
839 PMCW
*p
= &sch
->curr_status
.pmcw
;
842 if (~(p
->flags
) & (PMCW_FLAGS_MASK_DNV
| PMCW_FLAGS_MASK_ENA
)) {
847 /* Trigger the clear function. */
848 s
->ctrl
&= ~(SCSW_CTRL_MASK_FCTL
| SCSW_CTRL_MASK_ACTL
);
849 s
->ctrl
|= SCSW_FCTL_CLEAR_FUNC
| SCSW_ACTL_CLEAR_PEND
;
851 do_subchannel_work(sch
, NULL
);
858 int css_do_hsch(SubchDev
*sch
)
860 SCSW
*s
= &sch
->curr_status
.scsw
;
861 PMCW
*p
= &sch
->curr_status
.pmcw
;
864 if (~(p
->flags
) & (PMCW_FLAGS_MASK_DNV
| PMCW_FLAGS_MASK_ENA
)) {
869 if (((s
->ctrl
& SCSW_CTRL_MASK_STCTL
) == SCSW_STCTL_STATUS_PEND
) ||
870 (s
->ctrl
& (SCSW_STCTL_PRIMARY
|
871 SCSW_STCTL_SECONDARY
|
872 SCSW_STCTL_ALERT
))) {
877 if (s
->ctrl
& (SCSW_FCTL_HALT_FUNC
| SCSW_FCTL_CLEAR_FUNC
)) {
882 /* Trigger the halt function. */
883 s
->ctrl
|= SCSW_FCTL_HALT_FUNC
;
884 s
->ctrl
&= ~SCSW_FCTL_START_FUNC
;
885 if (((s
->ctrl
& SCSW_CTRL_MASK_ACTL
) ==
886 (SCSW_ACTL_SUBCH_ACTIVE
| SCSW_ACTL_DEVICE_ACTIVE
)) &&
887 ((s
->ctrl
& SCSW_CTRL_MASK_STCTL
) == SCSW_STCTL_INTERMEDIATE
)) {
888 s
->ctrl
&= ~SCSW_STCTL_STATUS_PEND
;
890 s
->ctrl
|= SCSW_ACTL_HALT_PEND
;
892 do_subchannel_work(sch
, NULL
);
899 static void css_update_chnmon(SubchDev
*sch
)
901 if (!(sch
->curr_status
.pmcw
.flags
& PMCW_FLAGS_MASK_MME
)) {
905 /* The counter is conveniently located at the beginning of the struct. */
906 if (sch
->curr_status
.pmcw
.chars
& PMCW_CHARS_MASK_MBFC
) {
907 /* Format 1, per-subchannel area. */
910 count
= address_space_ldl(&address_space_memory
,
911 sch
->curr_status
.mba
,
912 MEMTXATTRS_UNSPECIFIED
,
915 address_space_stl(&address_space_memory
, sch
->curr_status
.mba
, count
,
916 MEMTXATTRS_UNSPECIFIED
, NULL
);
918 /* Format 0, global area. */
922 offset
= sch
->curr_status
.pmcw
.mbi
<< 5;
923 count
= address_space_lduw(&address_space_memory
,
924 channel_subsys
.chnmon_area
+ offset
,
925 MEMTXATTRS_UNSPECIFIED
,
928 address_space_stw(&address_space_memory
,
929 channel_subsys
.chnmon_area
+ offset
, count
,
930 MEMTXATTRS_UNSPECIFIED
, NULL
);
934 int css_do_ssch(SubchDev
*sch
, ORB
*orb
)
936 SCSW
*s
= &sch
->curr_status
.scsw
;
937 PMCW
*p
= &sch
->curr_status
.pmcw
;
940 if (~(p
->flags
) & (PMCW_FLAGS_MASK_DNV
| PMCW_FLAGS_MASK_ENA
)) {
945 if (s
->ctrl
& SCSW_STCTL_STATUS_PEND
) {
950 if (s
->ctrl
& (SCSW_FCTL_START_FUNC
|
951 SCSW_FCTL_HALT_FUNC
|
952 SCSW_FCTL_CLEAR_FUNC
)) {
957 /* If monitoring is active, update counter. */
958 if (channel_subsys
.chnmon_active
) {
959 css_update_chnmon(sch
);
961 sch
->channel_prog
= orb
->cpa
;
962 /* Trigger the start function. */
963 s
->ctrl
|= (SCSW_FCTL_START_FUNC
| SCSW_ACTL_START_PEND
);
964 s
->flags
&= ~SCSW_FLAGS_MASK_PNO
;
966 do_subchannel_work(sch
, orb
);
973 static void copy_irb_to_guest(IRB
*dest
, const IRB
*src
, PMCW
*pmcw
,
977 uint16_t stctl
= src
->scsw
.ctrl
& SCSW_CTRL_MASK_STCTL
;
978 uint16_t actl
= src
->scsw
.ctrl
& SCSW_CTRL_MASK_ACTL
;
980 copy_scsw_to_guest(&dest
->scsw
, &src
->scsw
);
982 for (i
= 0; i
< ARRAY_SIZE(dest
->esw
); i
++) {
983 dest
->esw
[i
] = cpu_to_be32(src
->esw
[i
]);
985 for (i
= 0; i
< ARRAY_SIZE(dest
->ecw
); i
++) {
986 dest
->ecw
[i
] = cpu_to_be32(src
->ecw
[i
]);
988 *irb_len
= sizeof(*dest
) - sizeof(dest
->emw
);
990 /* extended measurements enabled? */
991 if ((src
->scsw
.flags
& SCSW_FLAGS_MASK_ESWF
) ||
992 !(pmcw
->flags
& PMCW_FLAGS_MASK_TF
) ||
993 !(pmcw
->chars
& PMCW_CHARS_MASK_XMWME
)) {
996 /* extended measurements pending? */
997 if (!(stctl
& SCSW_STCTL_STATUS_PEND
)) {
1000 if ((stctl
& SCSW_STCTL_PRIMARY
) ||
1001 (stctl
== SCSW_STCTL_SECONDARY
) ||
1002 ((stctl
& SCSW_STCTL_INTERMEDIATE
) && (actl
& SCSW_ACTL_SUSP
))) {
1003 for (i
= 0; i
< ARRAY_SIZE(dest
->emw
); i
++) {
1004 dest
->emw
[i
] = cpu_to_be32(src
->emw
[i
]);
1007 *irb_len
= sizeof(*dest
);
1010 int css_do_tsch_get_irb(SubchDev
*sch
, IRB
*target_irb
, int *irb_len
)
1012 SCSW
*s
= &sch
->curr_status
.scsw
;
1013 PMCW
*p
= &sch
->curr_status
.pmcw
;
1017 if (~(p
->flags
) & (PMCW_FLAGS_MASK_DNV
| PMCW_FLAGS_MASK_ENA
)) {
1021 stctl
= s
->ctrl
& SCSW_CTRL_MASK_STCTL
;
1023 /* Prepare the irb for the guest. */
1024 memset(&irb
, 0, sizeof(IRB
));
1026 /* Copy scsw from current status. */
1027 memcpy(&irb
.scsw
, s
, sizeof(SCSW
));
1028 if (stctl
& SCSW_STCTL_STATUS_PEND
) {
1029 if (s
->cstat
& (SCSW_CSTAT_DATA_CHECK
|
1030 SCSW_CSTAT_CHN_CTRL_CHK
|
1031 SCSW_CSTAT_INTF_CTRL_CHK
)) {
1032 irb
.scsw
.flags
|= SCSW_FLAGS_MASK_ESWF
;
1033 irb
.esw
[0] = 0x04804000;
1035 irb
.esw
[0] = 0x00800000;
1037 /* If a unit check is pending, copy sense data. */
1038 if ((s
->dstat
& SCSW_DSTAT_UNIT_CHECK
) &&
1039 (p
->chars
& PMCW_CHARS_MASK_CSENSE
)) {
1042 irb
.scsw
.flags
|= SCSW_FLAGS_MASK_ESWF
| SCSW_FLAGS_MASK_ECTL
;
1043 /* Attention: sense_data is already BE! */
1044 memcpy(irb
.ecw
, sch
->sense_data
, sizeof(sch
->sense_data
));
1045 for (i
= 0; i
< ARRAY_SIZE(irb
.ecw
); i
++) {
1046 irb
.ecw
[i
] = be32_to_cpu(irb
.ecw
[i
]);
1048 irb
.esw
[1] = 0x01000000 | (sizeof(sch
->sense_data
) << 8);
1051 /* Store the irb to the guest. */
1052 copy_irb_to_guest(target_irb
, &irb
, p
, irb_len
);
1054 return ((stctl
& SCSW_STCTL_STATUS_PEND
) == 0);
1057 void css_do_tsch_update_subch(SubchDev
*sch
)
1059 SCSW
*s
= &sch
->curr_status
.scsw
;
1060 PMCW
*p
= &sch
->curr_status
.pmcw
;
1065 stctl
= s
->ctrl
& SCSW_CTRL_MASK_STCTL
;
1066 fctl
= s
->ctrl
& SCSW_CTRL_MASK_FCTL
;
1067 actl
= s
->ctrl
& SCSW_CTRL_MASK_ACTL
;
1069 /* Clear conditions on subchannel, if applicable. */
1070 if (stctl
& SCSW_STCTL_STATUS_PEND
) {
1071 s
->ctrl
&= ~SCSW_CTRL_MASK_STCTL
;
1072 if ((stctl
!= (SCSW_STCTL_INTERMEDIATE
| SCSW_STCTL_STATUS_PEND
)) ||
1073 ((fctl
& SCSW_FCTL_HALT_FUNC
) &&
1074 (actl
& SCSW_ACTL_SUSP
))) {
1075 s
->ctrl
&= ~SCSW_CTRL_MASK_FCTL
;
1077 if (stctl
!= (SCSW_STCTL_INTERMEDIATE
| SCSW_STCTL_STATUS_PEND
)) {
1078 s
->flags
&= ~SCSW_FLAGS_MASK_PNO
;
1079 s
->ctrl
&= ~(SCSW_ACTL_RESUME_PEND
|
1080 SCSW_ACTL_START_PEND
|
1081 SCSW_ACTL_HALT_PEND
|
1082 SCSW_ACTL_CLEAR_PEND
|
1085 if ((actl
& SCSW_ACTL_SUSP
) &&
1086 (fctl
& SCSW_FCTL_START_FUNC
)) {
1087 s
->flags
&= ~SCSW_FLAGS_MASK_PNO
;
1088 if (fctl
& SCSW_FCTL_HALT_FUNC
) {
1089 s
->ctrl
&= ~(SCSW_ACTL_RESUME_PEND
|
1090 SCSW_ACTL_START_PEND
|
1091 SCSW_ACTL_HALT_PEND
|
1092 SCSW_ACTL_CLEAR_PEND
|
1095 s
->ctrl
&= ~SCSW_ACTL_RESUME_PEND
;
1099 /* Clear pending sense data. */
1100 if (p
->chars
& PMCW_CHARS_MASK_CSENSE
) {
1101 memset(sch
->sense_data
, 0 , sizeof(sch
->sense_data
));
1106 static void copy_crw_to_guest(CRW
*dest
, const CRW
*src
)
1108 dest
->flags
= cpu_to_be16(src
->flags
);
1109 dest
->rsid
= cpu_to_be16(src
->rsid
);
1112 int css_do_stcrw(CRW
*crw
)
1114 CrwContainer
*crw_cont
;
1117 crw_cont
= QTAILQ_FIRST(&channel_subsys
.pending_crws
);
1119 QTAILQ_REMOVE(&channel_subsys
.pending_crws
, crw_cont
, sibling
);
1120 copy_crw_to_guest(crw
, &crw_cont
->crw
);
1124 /* List was empty, turn crw machine checks on again. */
1125 memset(crw
, 0, sizeof(*crw
));
1126 channel_subsys
.do_crw_mchk
= true;
1133 static void copy_crw_from_guest(CRW
*dest
, const CRW
*src
)
1135 dest
->flags
= be16_to_cpu(src
->flags
);
1136 dest
->rsid
= be16_to_cpu(src
->rsid
);
1139 void css_undo_stcrw(CRW
*crw
)
1141 CrwContainer
*crw_cont
;
1143 crw_cont
= g_try_malloc0(sizeof(CrwContainer
));
1145 channel_subsys
.crws_lost
= true;
1148 copy_crw_from_guest(&crw_cont
->crw
, crw
);
1150 QTAILQ_INSERT_HEAD(&channel_subsys
.pending_crws
, crw_cont
, sibling
);
1153 int css_do_tpi(IOIntCode
*int_code
, int lowcore
)
1155 /* No pending interrupts for !KVM. */
1159 int css_collect_chp_desc(int m
, uint8_t cssid
, uint8_t f_chpid
, uint8_t l_chpid
,
1160 int rfmt
, void *buf
)
1164 uint32_t chpid_type_word
;
1168 css
= channel_subsys
.css
[channel_subsys
.default_cssid
];
1170 css
= channel_subsys
.css
[cssid
];
1176 for (i
= f_chpid
; i
<= l_chpid
; i
++) {
1177 if (css
->chpids
[i
].in_use
) {
1178 chpid_type_word
= 0x80000000 | (css
->chpids
[i
].type
<< 8) | i
;
1180 words
[0] = cpu_to_be32(chpid_type_word
);
1182 memcpy(buf
+ desc_size
, words
, 8);
1184 } else if (rfmt
== 1) {
1185 words
[0] = cpu_to_be32(chpid_type_word
);
1193 memcpy(buf
+ desc_size
, words
, 32);
1201 void css_do_schm(uint8_t mbk
, int update
, int dct
, uint64_t mbo
)
1203 /* dct is currently ignored (not really meaningful for our devices) */
1204 /* TODO: Don't ignore mbk. */
1205 if (update
&& !channel_subsys
.chnmon_active
) {
1206 /* Enable measuring. */
1207 channel_subsys
.chnmon_area
= mbo
;
1208 channel_subsys
.chnmon_active
= true;
1210 if (!update
&& channel_subsys
.chnmon_active
) {
1211 /* Disable measuring. */
1212 channel_subsys
.chnmon_area
= 0;
1213 channel_subsys
.chnmon_active
= false;
1217 int css_do_rsch(SubchDev
*sch
)
1219 SCSW
*s
= &sch
->curr_status
.scsw
;
1220 PMCW
*p
= &sch
->curr_status
.pmcw
;
1223 if (~(p
->flags
) & (PMCW_FLAGS_MASK_DNV
| PMCW_FLAGS_MASK_ENA
)) {
1228 if (s
->ctrl
& SCSW_STCTL_STATUS_PEND
) {
1233 if (((s
->ctrl
& SCSW_CTRL_MASK_FCTL
) != SCSW_FCTL_START_FUNC
) ||
1234 (s
->ctrl
& SCSW_ACTL_RESUME_PEND
) ||
1235 (!(s
->ctrl
& SCSW_ACTL_SUSP
))) {
1240 /* If monitoring is active, update counter. */
1241 if (channel_subsys
.chnmon_active
) {
1242 css_update_chnmon(sch
);
1245 s
->ctrl
|= SCSW_ACTL_RESUME_PEND
;
1246 do_subchannel_work(sch
, NULL
);
1253 int css_do_rchp(uint8_t cssid
, uint8_t chpid
)
1257 if (cssid
> channel_subsys
.max_cssid
) {
1260 if (channel_subsys
.max_cssid
== 0) {
1261 real_cssid
= channel_subsys
.default_cssid
;
1265 if (!channel_subsys
.css
[real_cssid
]) {
1269 if (!channel_subsys
.css
[real_cssid
]->chpids
[chpid
].in_use
) {
1273 if (!channel_subsys
.css
[real_cssid
]->chpids
[chpid
].is_virtual
) {
1275 "rchp unsupported for non-virtual chpid %x.%02x!\n",
1280 /* We don't really use a channel path, so we're done here. */
1281 css_queue_crw(CRW_RSC_CHP
, CRW_ERC_INIT
,
1282 channel_subsys
.max_cssid
> 0 ? 1 : 0, chpid
);
1283 if (channel_subsys
.max_cssid
> 0) {
1284 css_queue_crw(CRW_RSC_CHP
, CRW_ERC_INIT
, 0, real_cssid
<< 8);
1289 bool css_schid_final(int m
, uint8_t cssid
, uint8_t ssid
, uint16_t schid
)
1294 real_cssid
= (!m
&& (cssid
== 0)) ? channel_subsys
.default_cssid
: cssid
;
1295 if (ssid
> MAX_SSID
||
1296 !channel_subsys
.css
[real_cssid
] ||
1297 !channel_subsys
.css
[real_cssid
]->sch_set
[ssid
]) {
1300 set
= channel_subsys
.css
[real_cssid
]->sch_set
[ssid
];
1301 return schid
> find_last_bit(set
->schids_used
,
1302 (MAX_SCHID
+ 1) / sizeof(unsigned long));
1305 static int css_add_virtual_chpid(uint8_t cssid
, uint8_t chpid
, uint8_t type
)
1309 trace_css_chpid_add(cssid
, chpid
, type
);
1310 css
= channel_subsys
.css
[cssid
];
1314 if (css
->chpids
[chpid
].in_use
) {
1317 css
->chpids
[chpid
].in_use
= 1;
1318 css
->chpids
[chpid
].type
= type
;
1319 css
->chpids
[chpid
].is_virtual
= 1;
1321 css_generate_chp_crws(cssid
, chpid
);
1326 void css_sch_build_virtual_schib(SubchDev
*sch
, uint8_t chpid
, uint8_t type
)
1328 PMCW
*p
= &sch
->curr_status
.pmcw
;
1329 SCSW
*s
= &sch
->curr_status
.scsw
;
1331 CssImage
*css
= channel_subsys
.css
[sch
->cssid
];
1333 assert(css
!= NULL
);
1334 memset(p
, 0, sizeof(PMCW
));
1335 p
->flags
|= PMCW_FLAGS_MASK_DNV
;
1336 p
->devno
= sch
->devno
;
1341 p
->chpid
[0] = chpid
;
1342 if (!css
->chpids
[chpid
].in_use
) {
1343 css_add_virtual_chpid(sch
->cssid
, chpid
, type
);
1346 memset(s
, 0, sizeof(SCSW
));
1347 sch
->curr_status
.mba
= 0;
1348 for (i
= 0; i
< ARRAY_SIZE(sch
->curr_status
.mda
); i
++) {
1349 sch
->curr_status
.mda
[i
] = 0;
1353 SubchDev
*css_find_subch(uint8_t m
, uint8_t cssid
, uint8_t ssid
, uint16_t schid
)
1357 real_cssid
= (!m
&& (cssid
== 0)) ? channel_subsys
.default_cssid
: cssid
;
1359 if (!channel_subsys
.css
[real_cssid
]) {
1363 if (!channel_subsys
.css
[real_cssid
]->sch_set
[ssid
]) {
1367 return channel_subsys
.css
[real_cssid
]->sch_set
[ssid
]->sch
[schid
];
1371 * Return free device number in subchannel set.
1373 * Return index of the first free device number in the subchannel set
1374 * identified by @p cssid and @p ssid, beginning the search at @p
1375 * start and wrapping around at MAX_DEVNO. Return a value exceeding
1376 * MAX_SCHID if there are no free device numbers in the subchannel
1379 static uint32_t css_find_free_devno(uint8_t cssid
, uint8_t ssid
,
1384 for (round
= 0; round
<= MAX_DEVNO
; round
++) {
1385 uint16_t devno
= (start
+ round
) % MAX_DEVNO
;
1387 if (!css_devno_used(cssid
, ssid
, devno
)) {
1391 return MAX_DEVNO
+ 1;
1395 * Return first free subchannel (id) in subchannel set.
1397 * Return index of the first free subchannel in the subchannel set
1398 * identified by @p cssid and @p ssid, if there is any. Return a value
1399 * exceeding MAX_SCHID if there are no free subchannels in the
1402 static uint32_t css_find_free_subch(uint8_t cssid
, uint8_t ssid
)
1406 for (schid
= 0; schid
<= MAX_SCHID
; schid
++) {
1407 if (!css_find_subch(1, cssid
, ssid
, schid
)) {
1411 return MAX_SCHID
+ 1;
1415 * Return first free subchannel (id) in subchannel set for a device number
1417 * Verify the device number @p devno is not used yet in the subchannel
1418 * set identified by @p cssid and @p ssid. Set @p schid to the index
1419 * of the first free subchannel in the subchannel set, if there is
1420 * any. Return true if everything succeeded and false otherwise.
1422 static bool css_find_free_subch_for_devno(uint8_t cssid
, uint8_t ssid
,
1423 uint16_t devno
, uint16_t *schid
,
1426 uint32_t free_schid
;
1429 if (css_devno_used(cssid
, ssid
, devno
)) {
1430 error_setg(errp
, "Device %x.%x.%04x already exists",
1431 cssid
, ssid
, devno
);
1434 free_schid
= css_find_free_subch(cssid
, ssid
);
1435 if (free_schid
> MAX_SCHID
) {
1436 error_setg(errp
, "No free subchannel found for %x.%x.%04x",
1437 cssid
, ssid
, devno
);
1440 *schid
= free_schid
;
1445 * Return first free subchannel (id) and device number
1447 * Locate the first free subchannel and first free device number in
1448 * any of the subchannel sets of the channel subsystem identified by
1449 * @p cssid. Return false if no free subchannel / device number could
1450 * be found. Otherwise set @p ssid, @p devno and @p schid to identify
1451 * the available subchannel and device number and return true.
1453 * May modify @p ssid, @p devno and / or @p schid even if no free
1454 * subchannel / device number could be found.
1456 static bool css_find_free_subch_and_devno(uint8_t cssid
, uint8_t *ssid
,
1457 uint16_t *devno
, uint16_t *schid
,
1460 uint32_t free_schid
, free_devno
;
1462 assert(ssid
&& devno
&& schid
);
1463 for (*ssid
= 0; *ssid
<= MAX_SSID
; (*ssid
)++) {
1464 free_schid
= css_find_free_subch(cssid
, *ssid
);
1465 if (free_schid
> MAX_SCHID
) {
1468 free_devno
= css_find_free_devno(cssid
, *ssid
, free_schid
);
1469 if (free_devno
> MAX_DEVNO
) {
1472 *schid
= free_schid
;
1473 *devno
= free_devno
;
1476 error_setg(errp
, "Virtual channel subsystem is full!");
1480 bool css_subch_visible(SubchDev
*sch
)
1482 if (sch
->ssid
> channel_subsys
.max_ssid
) {
1486 if (sch
->cssid
!= channel_subsys
.default_cssid
) {
1487 return (channel_subsys
.max_cssid
> 0);
1493 bool css_present(uint8_t cssid
)
1495 return (channel_subsys
.css
[cssid
] != NULL
);
1498 bool css_devno_used(uint8_t cssid
, uint8_t ssid
, uint16_t devno
)
1500 if (!channel_subsys
.css
[cssid
]) {
1503 if (!channel_subsys
.css
[cssid
]->sch_set
[ssid
]) {
1507 return !!test_bit(devno
,
1508 channel_subsys
.css
[cssid
]->sch_set
[ssid
]->devnos_used
);
1511 void css_subch_assign(uint8_t cssid
, uint8_t ssid
, uint16_t schid
,
1512 uint16_t devno
, SubchDev
*sch
)
1517 trace_css_assign_subch(sch
? "assign" : "deassign", cssid
, ssid
, schid
,
1519 if (!channel_subsys
.css
[cssid
]) {
1521 "Suspicious call to %s (%x.%x.%04x) for non-existing css!\n",
1522 __func__
, cssid
, ssid
, schid
);
1525 css
= channel_subsys
.css
[cssid
];
1527 if (!css
->sch_set
[ssid
]) {
1528 css
->sch_set
[ssid
] = g_malloc0(sizeof(SubchSet
));
1530 s_set
= css
->sch_set
[ssid
];
1532 s_set
->sch
[schid
] = sch
;
1534 set_bit(schid
, s_set
->schids_used
);
1535 set_bit(devno
, s_set
->devnos_used
);
1537 clear_bit(schid
, s_set
->schids_used
);
1538 clear_bit(devno
, s_set
->devnos_used
);
1542 void css_queue_crw(uint8_t rsc
, uint8_t erc
, int chain
, uint16_t rsid
)
1544 CrwContainer
*crw_cont
;
1546 trace_css_crw(rsc
, erc
, rsid
, chain
? "(chained)" : "");
1547 /* TODO: Maybe use a static crw pool? */
1548 crw_cont
= g_try_malloc0(sizeof(CrwContainer
));
1550 channel_subsys
.crws_lost
= true;
1553 crw_cont
->crw
.flags
= (rsc
<< 8) | erc
;
1555 crw_cont
->crw
.flags
|= CRW_FLAGS_MASK_C
;
1557 crw_cont
->crw
.rsid
= rsid
;
1558 if (channel_subsys
.crws_lost
) {
1559 crw_cont
->crw
.flags
|= CRW_FLAGS_MASK_R
;
1560 channel_subsys
.crws_lost
= false;
1563 QTAILQ_INSERT_TAIL(&channel_subsys
.pending_crws
, crw_cont
, sibling
);
1565 if (channel_subsys
.do_crw_mchk
) {
1566 channel_subsys
.do_crw_mchk
= false;
1567 /* Inject crw pending machine check. */
1572 void css_generate_sch_crws(uint8_t cssid
, uint8_t ssid
, uint16_t schid
,
1573 int hotplugged
, int add
)
1575 uint8_t guest_cssid
;
1578 if (add
&& !hotplugged
) {
1581 if (channel_subsys
.max_cssid
== 0) {
1582 /* Default cssid shows up as 0. */
1583 guest_cssid
= (cssid
== channel_subsys
.default_cssid
) ? 0 : cssid
;
1585 /* Show real cssid to the guest. */
1586 guest_cssid
= cssid
;
1589 * Only notify for higher subchannel sets/channel subsystems if the
1590 * guest has enabled it.
1592 if ((ssid
> channel_subsys
.max_ssid
) ||
1593 (guest_cssid
> channel_subsys
.max_cssid
) ||
1594 ((channel_subsys
.max_cssid
== 0) &&
1595 (cssid
!= channel_subsys
.default_cssid
))) {
1598 chain_crw
= (channel_subsys
.max_ssid
> 0) ||
1599 (channel_subsys
.max_cssid
> 0);
1600 css_queue_crw(CRW_RSC_SUBCH
, CRW_ERC_IPI
, chain_crw
? 1 : 0, schid
);
1602 css_queue_crw(CRW_RSC_SUBCH
, CRW_ERC_IPI
, 0,
1603 (guest_cssid
<< 8) | (ssid
<< 4));
1605 /* RW_ERC_IPI --> clear pending interrupts */
1606 css_clear_io_interrupt(css_do_build_subchannel_id(cssid
, ssid
), schid
);
1609 void css_generate_chp_crws(uint8_t cssid
, uint8_t chpid
)
1614 void css_generate_css_crws(uint8_t cssid
)
1616 if (!channel_subsys
.sei_pending
) {
1617 css_queue_crw(CRW_RSC_CSS
, 0, 0, cssid
);
1619 channel_subsys
.sei_pending
= true;
1622 void css_clear_sei_pending(void)
1624 channel_subsys
.sei_pending
= false;
1627 int css_enable_mcsse(void)
1629 trace_css_enable_facility("mcsse");
1630 channel_subsys
.max_cssid
= MAX_CSSID
;
1634 int css_enable_mss(void)
1636 trace_css_enable_facility("mss");
1637 channel_subsys
.max_ssid
= MAX_SSID
;
1641 void subch_device_save(SubchDev
*s
, QEMUFile
*f
)
1645 qemu_put_byte(f
, s
->cssid
);
1646 qemu_put_byte(f
, s
->ssid
);
1647 qemu_put_be16(f
, s
->schid
);
1648 qemu_put_be16(f
, s
->devno
);
1649 qemu_put_byte(f
, s
->thinint_active
);
1652 qemu_put_be32(f
, s
->curr_status
.pmcw
.intparm
);
1653 qemu_put_be16(f
, s
->curr_status
.pmcw
.flags
);
1654 qemu_put_be16(f
, s
->curr_status
.pmcw
.devno
);
1655 qemu_put_byte(f
, s
->curr_status
.pmcw
.lpm
);
1656 qemu_put_byte(f
, s
->curr_status
.pmcw
.pnom
);
1657 qemu_put_byte(f
, s
->curr_status
.pmcw
.lpum
);
1658 qemu_put_byte(f
, s
->curr_status
.pmcw
.pim
);
1659 qemu_put_be16(f
, s
->curr_status
.pmcw
.mbi
);
1660 qemu_put_byte(f
, s
->curr_status
.pmcw
.pom
);
1661 qemu_put_byte(f
, s
->curr_status
.pmcw
.pam
);
1662 qemu_put_buffer(f
, s
->curr_status
.pmcw
.chpid
, 8);
1663 qemu_put_be32(f
, s
->curr_status
.pmcw
.chars
);
1665 qemu_put_be16(f
, s
->curr_status
.scsw
.flags
);
1666 qemu_put_be16(f
, s
->curr_status
.scsw
.ctrl
);
1667 qemu_put_be32(f
, s
->curr_status
.scsw
.cpa
);
1668 qemu_put_byte(f
, s
->curr_status
.scsw
.dstat
);
1669 qemu_put_byte(f
, s
->curr_status
.scsw
.cstat
);
1670 qemu_put_be16(f
, s
->curr_status
.scsw
.count
);
1671 qemu_put_be64(f
, s
->curr_status
.mba
);
1672 qemu_put_buffer(f
, s
->curr_status
.mda
, 4);
1674 qemu_put_buffer(f
, s
->sense_data
, 32);
1675 qemu_put_be64(f
, s
->channel_prog
);
1677 qemu_put_byte(f
, s
->last_cmd
.cmd_code
);
1678 qemu_put_byte(f
, s
->last_cmd
.flags
);
1679 qemu_put_be16(f
, s
->last_cmd
.count
);
1680 qemu_put_be32(f
, s
->last_cmd
.cda
);
1681 qemu_put_byte(f
, s
->last_cmd_valid
);
1682 qemu_put_byte(f
, s
->id
.reserved
);
1683 qemu_put_be16(f
, s
->id
.cu_type
);
1684 qemu_put_byte(f
, s
->id
.cu_model
);
1685 qemu_put_be16(f
, s
->id
.dev_type
);
1686 qemu_put_byte(f
, s
->id
.dev_model
);
1687 qemu_put_byte(f
, s
->id
.unused
);
1688 for (i
= 0; i
< ARRAY_SIZE(s
->id
.ciw
); i
++) {
1689 qemu_put_byte(f
, s
->id
.ciw
[i
].type
);
1690 qemu_put_byte(f
, s
->id
.ciw
[i
].command
);
1691 qemu_put_be16(f
, s
->id
.ciw
[i
].count
);
1693 qemu_put_byte(f
, s
->ccw_fmt_1
);
1694 qemu_put_byte(f
, s
->ccw_no_data_cnt
);
1697 int subch_device_load(SubchDev
*s
, QEMUFile
*f
)
1700 uint16_t old_schid
= s
->schid
;
1703 s
->cssid
= qemu_get_byte(f
);
1704 s
->ssid
= qemu_get_byte(f
);
1705 s
->schid
= qemu_get_be16(f
);
1706 s
->devno
= qemu_get_be16(f
);
1707 /* Re-assign subch. */
1708 if (old_schid
!= s
->schid
) {
1709 old_s
= channel_subsys
.css
[s
->cssid
]->sch_set
[s
->ssid
]->sch
[old_schid
];
1711 * (old_s != s) means that some other device has its correct
1712 * subchannel already assigned (in load).
1715 css_subch_assign(s
->cssid
, s
->ssid
, old_schid
, s
->devno
, NULL
);
1717 /* It's OK to re-assign without a prior de-assign. */
1718 css_subch_assign(s
->cssid
, s
->ssid
, s
->schid
, s
->devno
, s
);
1720 s
->thinint_active
= qemu_get_byte(f
);
1723 s
->curr_status
.pmcw
.intparm
= qemu_get_be32(f
);
1724 s
->curr_status
.pmcw
.flags
= qemu_get_be16(f
);
1725 s
->curr_status
.pmcw
.devno
= qemu_get_be16(f
);
1726 s
->curr_status
.pmcw
.lpm
= qemu_get_byte(f
);
1727 s
->curr_status
.pmcw
.pnom
= qemu_get_byte(f
);
1728 s
->curr_status
.pmcw
.lpum
= qemu_get_byte(f
);
1729 s
->curr_status
.pmcw
.pim
= qemu_get_byte(f
);
1730 s
->curr_status
.pmcw
.mbi
= qemu_get_be16(f
);
1731 s
->curr_status
.pmcw
.pom
= qemu_get_byte(f
);
1732 s
->curr_status
.pmcw
.pam
= qemu_get_byte(f
);
1733 qemu_get_buffer(f
, s
->curr_status
.pmcw
.chpid
, 8);
1734 s
->curr_status
.pmcw
.chars
= qemu_get_be32(f
);
1736 s
->curr_status
.scsw
.flags
= qemu_get_be16(f
);
1737 s
->curr_status
.scsw
.ctrl
= qemu_get_be16(f
);
1738 s
->curr_status
.scsw
.cpa
= qemu_get_be32(f
);
1739 s
->curr_status
.scsw
.dstat
= qemu_get_byte(f
);
1740 s
->curr_status
.scsw
.cstat
= qemu_get_byte(f
);
1741 s
->curr_status
.scsw
.count
= qemu_get_be16(f
);
1742 s
->curr_status
.mba
= qemu_get_be64(f
);
1743 qemu_get_buffer(f
, s
->curr_status
.mda
, 4);
1745 qemu_get_buffer(f
, s
->sense_data
, 32);
1746 s
->channel_prog
= qemu_get_be64(f
);
1748 s
->last_cmd
.cmd_code
= qemu_get_byte(f
);
1749 s
->last_cmd
.flags
= qemu_get_byte(f
);
1750 s
->last_cmd
.count
= qemu_get_be16(f
);
1751 s
->last_cmd
.cda
= qemu_get_be32(f
);
1752 s
->last_cmd_valid
= qemu_get_byte(f
);
1753 s
->id
.reserved
= qemu_get_byte(f
);
1754 s
->id
.cu_type
= qemu_get_be16(f
);
1755 s
->id
.cu_model
= qemu_get_byte(f
);
1756 s
->id
.dev_type
= qemu_get_be16(f
);
1757 s
->id
.dev_model
= qemu_get_byte(f
);
1758 s
->id
.unused
= qemu_get_byte(f
);
1759 for (i
= 0; i
< ARRAY_SIZE(s
->id
.ciw
); i
++) {
1760 s
->id
.ciw
[i
].type
= qemu_get_byte(f
);
1761 s
->id
.ciw
[i
].command
= qemu_get_byte(f
);
1762 s
->id
.ciw
[i
].count
= qemu_get_be16(f
);
1764 s
->ccw_fmt_1
= qemu_get_byte(f
);
1765 s
->ccw_no_data_cnt
= qemu_get_byte(f
);
1767 * Hack alert. We don't migrate the channel subsystem status (no
1768 * device!), but we need to find out if the guest enabled mss/mcss-e.
1769 * If the subchannel is enabled, it certainly was able to access it,
1770 * so adjust the max_ssid/max_cssid values for relevant ssid/cssid
1771 * values. This is not watertight, but better than nothing.
1773 if (s
->curr_status
.pmcw
.flags
& PMCW_FLAGS_MASK_ENA
) {
1775 channel_subsys
.max_ssid
= MAX_SSID
;
1777 if (s
->cssid
!= channel_subsys
.default_cssid
) {
1778 channel_subsys
.max_cssid
= MAX_CSSID
;
1784 void css_reset_sch(SubchDev
*sch
)
1786 PMCW
*p
= &sch
->curr_status
.pmcw
;
1788 if ((p
->flags
& PMCW_FLAGS_MASK_ENA
) != 0 && sch
->disable_cb
) {
1789 sch
->disable_cb(sch
);
1793 p
->flags
&= ~(PMCW_FLAGS_MASK_ISC
| PMCW_FLAGS_MASK_ENA
|
1794 PMCW_FLAGS_MASK_LM
| PMCW_FLAGS_MASK_MME
|
1795 PMCW_FLAGS_MASK_MP
| PMCW_FLAGS_MASK_TF
);
1796 p
->flags
|= PMCW_FLAGS_MASK_DNV
;
1797 p
->devno
= sch
->devno
;
1805 p
->chars
&= ~(PMCW_CHARS_MASK_MBFC
| PMCW_CHARS_MASK_XMWME
|
1806 PMCW_CHARS_MASK_CSENSE
);
1808 memset(&sch
->curr_status
.scsw
, 0, sizeof(sch
->curr_status
.scsw
));
1809 sch
->curr_status
.mba
= 0;
1811 sch
->channel_prog
= 0x0;
1812 sch
->last_cmd_valid
= false;
1813 sch
->thinint_active
= false;
1816 void css_reset(void)
1818 CrwContainer
*crw_cont
;
1820 /* Clean up monitoring. */
1821 channel_subsys
.chnmon_active
= false;
1822 channel_subsys
.chnmon_area
= 0;
1824 /* Clear pending CRWs. */
1825 while ((crw_cont
= QTAILQ_FIRST(&channel_subsys
.pending_crws
))) {
1826 QTAILQ_REMOVE(&channel_subsys
.pending_crws
, crw_cont
, sibling
);
1829 channel_subsys
.sei_pending
= false;
1830 channel_subsys
.do_crw_mchk
= true;
1831 channel_subsys
.crws_lost
= false;
1833 /* Reset maximum ids. */
1834 channel_subsys
.max_cssid
= 0;
1835 channel_subsys
.max_ssid
= 0;
1838 static void get_css_devid(Object
*obj
, Visitor
*v
, const char *name
,
1839 void *opaque
, Error
**errp
)
1841 DeviceState
*dev
= DEVICE(obj
);
1842 Property
*prop
= opaque
;
1843 CssDevId
*dev_id
= qdev_get_prop_ptr(dev
, prop
);
1844 char buffer
[] = "xx.x.xxxx";
1848 if (dev_id
->valid
) {
1850 r
= snprintf(buffer
, sizeof(buffer
), "%02x.%1x.%04x", dev_id
->cssid
,
1851 dev_id
->ssid
, dev_id
->devid
);
1852 assert(r
== sizeof(buffer
) - 1);
1854 /* drop leading zero */
1855 if (dev_id
->cssid
<= 0xf) {
1859 snprintf(buffer
, sizeof(buffer
), "<unset>");
1862 visit_type_str(v
, name
, &p
, errp
);
1866 * parse <cssid>.<ssid>.<devid> and assert valid range for cssid/ssid
1868 static void set_css_devid(Object
*obj
, Visitor
*v
, const char *name
,
1869 void *opaque
, Error
**errp
)
1871 DeviceState
*dev
= DEVICE(obj
);
1872 Property
*prop
= opaque
;
1873 CssDevId
*dev_id
= qdev_get_prop_ptr(dev
, prop
);
1874 Error
*local_err
= NULL
;
1877 unsigned int cssid
, ssid
, devid
;
1879 if (dev
->realized
) {
1880 qdev_prop_set_after_realize(dev
, name
, errp
);
1884 visit_type_str(v
, name
, &str
, &local_err
);
1886 error_propagate(errp
, local_err
);
1890 num
= sscanf(str
, "%2x.%1x%n.%4x%n", &cssid
, &ssid
, &n1
, &devid
, &n2
);
1891 if (num
!= 3 || (n2
- n1
) != 5 || strlen(str
) != n2
) {
1892 error_set_from_qdev_prop_error(errp
, EINVAL
, dev
, prop
, str
);
1895 if ((cssid
> MAX_CSSID
) || (ssid
> MAX_SSID
)) {
1896 error_setg(errp
, "Invalid cssid or ssid: cssid %x, ssid %x",
1901 dev_id
->cssid
= cssid
;
1902 dev_id
->ssid
= ssid
;
1903 dev_id
->devid
= devid
;
1904 dev_id
->valid
= true;
1910 PropertyInfo css_devid_propinfo
= {
1912 .description
= "Identifier of an I/O device in the channel "
1913 "subsystem, example: fe.1.23ab",
1914 .get
= get_css_devid
,
1915 .set
= set_css_devid
,
1918 PropertyInfo css_devid_ro_propinfo
= {
1920 .description
= "Read-only identifier of an I/O device in the channel "
1921 "subsystem, example: fe.1.23ab",
1922 .get
= get_css_devid
,
1925 SubchDev
*css_create_virtual_sch(CssDevId bus_id
, Error
**errp
)
1931 /* Enforce use of virtual cssid. */
1932 if (bus_id
.cssid
!= VIRTUAL_CSSID
) {
1933 error_setg(errp
, "cssid %hhx not valid for virtual devices",
1937 if (!css_find_free_subch_for_devno(bus_id
.cssid
, bus_id
.ssid
,
1938 bus_id
.devid
, &schid
, errp
)) {
1942 bus_id
.cssid
= VIRTUAL_CSSID
;
1943 if (!css_find_free_subch_and_devno(bus_id
.cssid
, &bus_id
.ssid
,
1944 &bus_id
.devid
, &schid
, errp
)) {
1949 sch
= g_malloc0(sizeof(*sch
));
1950 sch
->cssid
= bus_id
.cssid
;
1951 sch
->ssid
= bus_id
.ssid
;
1952 sch
->devno
= bus_id
.devid
;
1954 css_subch_assign(sch
->cssid
, sch
->ssid
, schid
, sch
->devno
, sch
);