[S390] dasd: use idal for device characteristics
[safe/jmp/linux-2.6] / drivers / s390 / cio / chsc.c
index b86f94e..1ecd3e5 100644 (file)
 /*
  *  drivers/s390/cio/chsc.c
  *   S/390 common I/O routines -- channel subsystem call
- *   $Revision: 1.119 $
  *
- *    Copyright (C) 1999-2002 IBM Deutschland Entwicklung GmbH,
- *                           IBM Corporation
+ *    Copyright IBM Corp. 1999,2008
  *    Author(s): Ingo Adlung (adlung@de.ibm.com)
- *              Cornelia Huck (cohuck@de.ibm.com)
+ *              Cornelia Huck (cornelia.huck@de.ibm.com)
  *              Arnd Bergmann (arndb@de.ibm.com)
  */
 
+#define KMSG_COMPONENT "cio"
+#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
+
 #include <linux/module.h>
-#include <linux/config.h>
 #include <linux/slab.h>
 #include <linux/init.h>
 #include <linux/device.h>
 
 #include <asm/cio.h>
+#include <asm/chpid.h>
+#include <asm/chsc.h>
+#include <asm/crw.h>
 
 #include "css.h"
 #include "cio.h"
 #include "cio_debug.h"
 #include "ioasm.h"
+#include "chp.h"
 #include "chsc.h"
 
-static struct channel_path *chps[NR_CHPIDS];
-
 static void *sei_page;
 
-static int new_channel_path(int chpid);
-
-static inline void
-set_chp_logically_online(int chp, int onoff)
-{
-       chps[chp]->state = onoff;
-}
-
-static int
-get_chp_status(int chp)
-{
-       return (chps[chp] ? chps[chp]->state : -ENODEV);
-}
-
-void
-chsc_validate_chpids(struct subchannel *sch)
-{
-       int mask, chp;
-
-       for (chp = 0; chp <= 7; chp++) {
-               mask = 0x80 >> chp;
-               if (!get_chp_status(sch->schib.pmcw.chpid[chp]))
-                       /* disable using this path */
-                       sch->opm &= ~mask;
-       }
-}
-
-void
-chpid_is_actually_online(int chp)
-{
-       int state;
-
-       state = get_chp_status(chp);
-       if (state < 0) {
-               need_rescan = 1;
-               queue_work(slow_path_wq, &slow_path_work);
-       } else
-               WARN_ON(!state);
-}
-
-/* FIXME: this is _always_ called for every subchannel. shouldn't we
- *       process more than one at a time? */
-static int
-chsc_get_sch_desc_irq(struct subchannel *sch, void *page)
+/**
+ * chsc_error_from_response() - convert a chsc response to an error
+ * @response: chsc response code
+ *
+ * Returns an appropriate Linux error code for @response.
+ */
+int chsc_error_from_response(int response)
 {
-       int ccode, j;
-
-       struct {
-               struct chsc_header request;
-               u16 reserved1;
-               u16 f_sch;        /* first subchannel */
-               u16 reserved2;
-               u16 l_sch;        /* last subchannel */
-               u32 reserved3;
-               struct chsc_header response;
-               u32 reserved4;
-               u8 sch_valid : 1;
-               u8 dev_valid : 1;
-               u8 st        : 3; /* subchannel type */
-               u8 zeroes    : 3;
-               u8  unit_addr;    /* unit address */
-               u16 devno;        /* device number */
-               u8 path_mask;
-               u8 fla_valid_mask;
-               u16 sch;          /* subchannel */
-               u8 chpid[8];      /* chpids 0-7 */
-               u16 fla[8];       /* full link addresses 0-7 */
-       } *ssd_area;
-
-       ssd_area = page;
-
-       ssd_area->request = (struct chsc_header) {
-               .length = 0x0010,
-               .code   = 0x0004,
-       };
-
-       ssd_area->f_sch = sch->irq;
-       ssd_area->l_sch = sch->irq;
-
-       ccode = chsc(ssd_area);
-       if (ccode > 0) {
-               pr_debug("chsc returned with ccode = %d\n", ccode);
-               return (ccode == 3) ? -ENODEV : -EBUSY;
-       }
-
-       switch (ssd_area->response.code) {
-       case 0x0001: /* everything ok */
-               break;
+       switch (response) {
+       case 0x0001:
+               return 0;
        case 0x0002:
-               CIO_CRW_EVENT(2, "Invalid command!\n");
-               return -EINVAL;
        case 0x0003:
-               CIO_CRW_EVENT(2, "Error in chsc request block!\n");
+       case 0x0006:
+       case 0x0007:
+       case 0x0008:
+       case 0x000a:
                return -EINVAL;
        case 0x0004:
-               CIO_CRW_EVENT(2, "Model does not provide ssd\n");
                return -EOPNOTSUPP;
        default:
-               CIO_CRW_EVENT(2, "Unknown CHSC response %d\n",
-                             ssd_area->response.code);
                return -EIO;
        }
-
-       /*
-        * ssd_area->st stores the type of the detected
-        * subchannel, with the following definitions:
-        *
-        * 0: I/O subchannel:     All fields have meaning
-        * 1: CHSC subchannel:    Only sch_val, st and sch
-        *                        have meaning
-        * 2: Message subchannel: All fields except unit_addr
-        *                        have meaning
-        * 3: ADM subchannel:     Only sch_val, st and sch
-        *                        have meaning
-        *
-        * Other types are currently undefined.
-        */
-       if (ssd_area->st > 3) { /* uhm, that looks strange... */
-               CIO_CRW_EVENT(0, "Strange subchannel type %d"
-                             " for sch %04x\n", ssd_area->st, sch->irq);
-               /*
-                * There may have been a new subchannel type defined in the
-                * time since this code was written; since we don't know which
-                * fields have meaning and what to do with it we just jump out
-                */
-               return 0;
-       } else {
-               const char *type[4] = {"I/O", "chsc", "message", "ADM"};
-               CIO_CRW_EVENT(6, "ssd: sch %04x is %s subchannel\n",
-                             sch->irq, type[ssd_area->st]);
-
-               sch->ssd_info.valid = 1;
-               sch->ssd_info.type = ssd_area->st;
-       }
-
-       if (ssd_area->st == 0 || ssd_area->st == 2) {
-               for (j = 0; j < 8; j++) {
-                       if (!((0x80 >> j) & ssd_area->path_mask &
-                             ssd_area->fla_valid_mask))
-                               continue;
-                       sch->ssd_info.chpid[j] = ssd_area->chpid[j];
-                       sch->ssd_info.fla[j]   = ssd_area->fla[j];
-               }
-       }
-       return 0;
 }
-
-int
-css_get_ssd_info(struct subchannel *sch)
+EXPORT_SYMBOL_GPL(chsc_error_from_response);
+
+struct chsc_ssd_area {
+       struct chsc_header request;
+       u16 :10;
+       u16 ssid:2;
+       u16 :4;
+       u16 f_sch;        /* first subchannel */
+       u16 :16;
+       u16 l_sch;        /* last subchannel */
+       u32 :32;
+       struct chsc_header response;
+       u32 :32;
+       u8 sch_valid : 1;
+       u8 dev_valid : 1;
+       u8 st        : 3; /* subchannel type */
+       u8 zeroes    : 3;
+       u8  unit_addr;    /* unit address */
+       u16 devno;        /* device number */
+       u8 path_mask;
+       u8 fla_valid_mask;
+       u16 sch;          /* subchannel */
+       u8 chpid[8];      /* chpids 0-7 */
+       u16 fla[8];       /* full link addresses 0-7 */
+} __attribute__ ((packed));
+
+int chsc_get_ssd_info(struct subchannel_id schid, struct chsc_ssd_info *ssd)
 {
+       unsigned long page;
+       struct chsc_ssd_area *ssd_area;
+       int ccode;
        int ret;
-       void *page;
+       int i;
+       int mask;
 
-       page = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA);
+       page = get_zeroed_page(GFP_KERNEL | GFP_DMA);
        if (!page)
                return -ENOMEM;
-       spin_lock_irq(&sch->lock);
-       ret = chsc_get_sch_desc_irq(sch, page);
-       if (ret) {
-               static int cio_chsc_err_msg;
-               
-               if (!cio_chsc_err_msg) {
-                       printk(KERN_ERR
-                              "chsc_get_sch_descriptions:"
-                              " Error %d while doing chsc; "
-                              "processing some machine checks may "
-                              "not work\n", ret);
-                       cio_chsc_err_msg = 1;
-               }
+       ssd_area = (struct chsc_ssd_area *) page;
+       ssd_area->request.length = 0x0010;
+       ssd_area->request.code = 0x0004;
+       ssd_area->ssid = schid.ssid;
+       ssd_area->f_sch = schid.sch_no;
+       ssd_area->l_sch = schid.sch_no;
+
+       ccode = chsc(ssd_area);
+       /* Check response. */
+       if (ccode > 0) {
+               ret = (ccode == 3) ? -ENODEV : -EBUSY;
+               goto out_free;
        }
-       spin_unlock_irq(&sch->lock);
-       free_page((unsigned long)page);
-       if (!ret) {
-               int j, chpid;
-               /* Allocate channel path structures, if needed. */
-               for (j = 0; j < 8; j++) {
-                       chpid = sch->ssd_info.chpid[j];
-                       if (chpid && (get_chp_status(chpid) < 0))
-                           new_channel_path(chpid);
+       ret = chsc_error_from_response(ssd_area->response.code);
+       if (ret != 0) {
+               CIO_MSG_EVENT(2, "chsc: ssd failed for 0.%x.%04x (rc=%04x)\n",
+                             schid.ssid, schid.sch_no,
+                             ssd_area->response.code);
+               goto out_free;
+       }
+       if (!ssd_area->sch_valid) {
+               ret = -ENODEV;
+               goto out_free;
+       }
+       /* Copy data */
+       ret = 0;
+       memset(ssd, 0, sizeof(struct chsc_ssd_info));
+       if ((ssd_area->st != SUBCHANNEL_TYPE_IO) &&
+           (ssd_area->st != SUBCHANNEL_TYPE_MSG))
+               goto out_free;
+       ssd->path_mask = ssd_area->path_mask;
+       ssd->fla_valid_mask = ssd_area->fla_valid_mask;
+       for (i = 0; i < 8; i++) {
+               mask = 0x80 >> i;
+               if (ssd_area->path_mask & mask) {
+                       chp_id_init(&ssd->chpid[i]);
+                       ssd->chpid[i].id = ssd_area->chpid[i];
                }
+               if (ssd_area->fla_valid_mask & mask)
+                       ssd->fla[i] = ssd_area->fla[i];
        }
+out_free:
+       free_page(page);
        return ret;
 }
 
-static int
-s390_subchannel_remove_chpid(struct device *dev, void *data)
+static int s390_subchannel_remove_chpid(struct subchannel *sch, void *data)
 {
-       int j;
-       int mask;
-       struct subchannel *sch;
-       __u8 *chpid;
-       struct schib schib;
-
-       sch = to_subchannel(dev);
-       chpid = data;
-       for (j = 0; j < 8; j++)
-               if (sch->schib.pmcw.chpid[j] == *chpid)
-                       break;
-       if (j >= 8)
-               return 0;
-
-       mask = 0x80 >> j;
-       spin_lock(&sch->lock);
-
-       stsch(sch->irq, &schib);
-       if (!schib.pmcw.dnv)
-               goto out_unreg;
-       memcpy(&sch->schib, &schib, sizeof(struct schib));
-       /* Check for single path devices. */
-       if (sch->schib.pmcw.pim == 0x80)
-               goto out_unreg;
-       if (sch->vpm == mask)
-               goto out_unreg;
-
-       if ((sch->schib.scsw.actl & (SCSW_ACTL_CLEAR_PEND |
-                                    SCSW_ACTL_HALT_PEND |
-                                    SCSW_ACTL_START_PEND |
-                                    SCSW_ACTL_RESUME_PEND)) &&
-           (sch->schib.pmcw.lpum == mask)) {
-               int cc = cio_cancel(sch);
-               
-               if (cc == -ENODEV)
-                       goto out_unreg;
-
-               if (cc == -EINVAL) {
-                       cc = cio_clear(sch);
-                       if (cc == -ENODEV)
-                               goto out_unreg;
-                       /* Call handler. */
-                       if (sch->driver && sch->driver->termination)
-                               sch->driver->termination(&sch->dev);
-                       goto out_unlock;
-               }
-       } else if ((sch->schib.scsw.actl & SCSW_ACTL_DEVACT) &&
-                  (sch->schib.scsw.actl & SCSW_ACTL_SCHACT) &&
-                  (sch->schib.pmcw.lpum == mask)) {
-               int cc;
-
-               cc = cio_clear(sch);
-               if (cc == -ENODEV)
+       spin_lock_irq(sch->lock);
+       if (sch->driver && sch->driver->chp_event)
+               if (sch->driver->chp_event(sch, data, CHP_OFFLINE) != 0)
                        goto out_unreg;
-               /* Call handler. */
-               if (sch->driver && sch->driver->termination)
-                       sch->driver->termination(&sch->dev);
-               goto out_unlock;
-       }
-
-       /* trigger path verification. */
-       if (sch->driver && sch->driver->verify)
-               sch->driver->verify(&sch->dev);
-out_unlock:
-       spin_unlock(&sch->lock);
+       spin_unlock_irq(sch->lock);
        return 0;
+
 out_unreg:
-       spin_unlock(&sch->lock);
        sch->lpm = 0;
-       if (css_enqueue_subchannel_slow(sch->irq)) {
-               css_clear_subchannel_slow_list();
-               need_rescan = 1;
-       }
+       spin_unlock_irq(sch->lock);
+       css_schedule_eval(sch->schid);
        return 0;
 }
 
-static inline void
-s390_set_chpid_offline( __u8 chpid)
+void chsc_chp_offline(struct chp_id chpid)
 {
        char dbf_txt[15];
+       struct chp_link link;
 
-       sprintf(dbf_txt, "chpr%x", chpid);
+       sprintf(dbf_txt, "chpr%x.%02x", chpid.cssid, chpid.id);
        CIO_TRACE_EVENT(2, dbf_txt);
 
-       if (get_chp_status(chpid) <= 0)
+       if (chp_get_status(chpid) <= 0)
                return;
-
-       bus_for_each_dev(&css_bus_type, NULL, &chpid,
-                        s390_subchannel_remove_chpid);
-
-       if (need_rescan || css_slow_subchannels_exist())
-               queue_work(slow_path_wq, &slow_path_work);
+       memset(&link, 0, sizeof(struct chp_link));
+       link.chpid = chpid;
+       /* Wait until previous actions have settled. */
+       css_wait_for_slow_path();
+       for_each_subchannel_staged(s390_subchannel_remove_chpid, NULL, &link);
 }
 
-static int
-s390_process_res_acc_sch(u8 chpid, __u16 fla, u32 fla_mask,
-                        struct subchannel *sch)
+static int s390_process_res_acc_new_sch(struct subchannel_id schid, void *data)
 {
-       int found;
-       int chp;
-       int ccode;
-       
-       found = 0;
-       for (chp = 0; chp <= 7; chp++)
-               /*
-                * check if chpid is in information updated by ssd
-                */
-               if (sch->ssd_info.valid &&
-                   sch->ssd_info.chpid[chp] == chpid &&
-                   (sch->ssd_info.fla[chp] & fla_mask) == fla) {
-                       found = 1;
-                       break;
-               }
-       
-       if (found == 0)
-               return 0;
-
+       struct schib schib;
        /*
-        * Do a stsch to update our subchannel structure with the
-        * new path information and eventually check for logically
-        * offline chpids.
+        * We don't know the device yet, but since a path
+        * may be available now to the device we'll have
+        * to do recognition again.
+        * Since we don't have any idea about which chpid
+        * that beast may be on we'll have to do a stsch
+        * on all devices, grr...
         */
-       ccode = stsch(sch->irq, &sch->schib);
-       if (ccode > 0)
-               return 0;
+       if (stsch_err(schid, &schib))
+               /* We're through */
+               return -ENXIO;
 
-       return 0x80 >> chp;
+       /* Put it on the slow path. */
+       css_schedule_eval(schid);
+       return 0;
 }
 
-static int
-s390_process_res_acc (u8 chpid, __u16 fla, u32 fla_mask)
+static int __s390_process_res_acc(struct subchannel *sch, void *data)
+{
+       spin_lock_irq(sch->lock);
+       if (sch->driver && sch->driver->chp_event)
+               sch->driver->chp_event(sch, data, CHP_ONLINE);
+       spin_unlock_irq(sch->lock);
+
+       return 0;
+}
+
+static void s390_process_res_acc(struct chp_link *link)
 {
-       struct subchannel *sch;
-       int irq, rc;
        char dbf_txt[15];
 
-       sprintf(dbf_txt, "accpr%x", chpid);
+       sprintf(dbf_txt, "accpr%x.%02x", link->chpid.cssid,
+               link->chpid.id);
        CIO_TRACE_EVENT( 2, dbf_txt);
-       if (fla != 0) {
-               sprintf(dbf_txt, "fla%x", fla);
+       if (link->fla != 0) {
+               sprintf(dbf_txt, "fla%x", link->fla);
                CIO_TRACE_EVENT( 2, dbf_txt);
        }
-
+       /* Wait until previous actions have settled. */
+       css_wait_for_slow_path();
        /*
         * I/O resources may have become accessible.
         * Scan through all subchannels that may be concerned and
@@ -365,75 +221,8 @@ s390_process_res_acc (u8 chpid, __u16 fla, u32 fla_mask)
         * The more information we have (info), the less scanning
         * will we have to do.
         */
-
-       if (!get_chp_status(chpid))
-               return 0; /* no need to do the rest */
-
-       rc = 0;
-       for (irq = 0; irq < __MAX_SUBCHANNELS; irq++) {
-               int chp_mask, old_lpm;
-
-               sch = get_subchannel_by_schid(irq);
-               if (!sch) {
-                       struct schib schib;
-                       int ret;
-                       /*
-                        * We don't know the device yet, but since a path
-                        * may be available now to the device we'll have
-                        * to do recognition again.
-                        * Since we don't have any idea about which chpid
-                        * that beast may be on we'll have to do a stsch
-                        * on all devices, grr...
-                        */
-                       if (stsch(irq, &schib)) {
-                               /* We're through */
-                               if (need_rescan)
-                                       rc = -EAGAIN;
-                               break;
-                       }
-                       if (need_rescan) {
-                               rc = -EAGAIN;
-                               continue;
-                       }
-                       /* Put it on the slow path. */
-                       ret = css_enqueue_subchannel_slow(irq);
-                       if (ret) {
-                               css_clear_subchannel_slow_list();
-                               need_rescan = 1;
-                       }
-                       rc = -EAGAIN;
-                       continue;
-               }
-       
-               spin_lock_irq(&sch->lock);
-
-               chp_mask = s390_process_res_acc_sch(chpid, fla, fla_mask, sch);
-
-               if (chp_mask == 0) {
-
-                       spin_unlock_irq(&sch->lock);
-
-                       if (fla_mask != 0)
-                               break;
-                       else
-                               continue;
-               }
-               old_lpm = sch->lpm;
-               sch->lpm = ((sch->schib.pmcw.pim &
-                            sch->schib.pmcw.pam &
-                            sch->schib.pmcw.pom)
-                           | chp_mask) & sch->opm;
-               if (!old_lpm && sch->lpm)
-                       device_trigger_reprobe(sch);
-               else if (sch->driver && sch->driver->verify)
-                       sch->driver->verify(&sch->dev);
-
-               spin_unlock_irq(&sch->lock);
-               put_device(&sch->dev);
-               if (fla_mask != 0)
-                       break;
-       }
-       return rc;
+       for_each_subchannel_staged(__s390_process_res_acc,
+                                  s390_process_res_acc_new_sch, link);
 }
 
 static int
@@ -449,9 +238,9 @@ __get_chpid_from_lir(void *data)
                u32 andesc[28];
                /* incident-specific information */
                u32 isinfo[28];
-       } *lir;
+       } __attribute__ ((packed)) *lir;
 
-       lir = (struct lir*) data;
+       lir = data;
        if (!(lir->iq&0x80))
                /* NULL link incident record */
                return -EINVAL;
@@ -466,487 +255,431 @@ __get_chpid_from_lir(void *data)
        return (u16) (lir->indesc[0]&0x000000ff);
 }
 
-int
-chsc_process_crw(void)
+struct chsc_sei_area {
+       struct chsc_header request;
+       u32 reserved1;
+       u32 reserved2;
+       u32 reserved3;
+       struct chsc_header response;
+       u32 reserved4;
+       u8  flags;
+       u8  vf;         /* validity flags */
+       u8  rs;         /* reporting source */
+       u8  cc;         /* content code */
+       u16 fla;        /* full link address */
+       u16 rsid;       /* reporting source id */
+       u32 reserved5;
+       u32 reserved6;
+       u8 ccdf[4096 - 16 - 24];        /* content-code dependent field */
+       /* ccdf has to be big enough for a link-incident record */
+} __attribute__ ((packed));
+
+static void chsc_process_sei_link_incident(struct chsc_sei_area *sei_area)
 {
-       int chpid, ret;
-       struct {
-               struct chsc_header request;
-               u32 reserved1;
-               u32 reserved2;
-               u32 reserved3;
-               struct chsc_header response;
-               u32 reserved4;
-               u8  flags;
-               u8  vf;         /* validity flags */
-               u8  rs;         /* reporting source */
-               u8  cc;         /* content code */
-               u16 fla;        /* full link address */
-               u16 rsid;       /* reporting source id */
-               u32 reserved5;
-               u32 reserved6;
-               u32 ccdf[96];   /* content-code dependent field */
-               /* ccdf has to be big enough for a link-incident record */
-       } *sei_area;
+       struct chp_id chpid;
+       int id;
 
-       if (!sei_page)
-               return 0;
-       /*
-        * build the chsc request block for store event information
-        * and do the call
-        * This function is only called by the machine check handler thread,
-        * so we don't need locking for the sei_page.
-        */
-       sei_area = sei_page;
+       CIO_CRW_EVENT(4, "chsc: link incident (rs=%02x, rs_id=%04x)\n",
+                     sei_area->rs, sei_area->rsid);
+       if (sei_area->rs != 4)
+               return;
+       id = __get_chpid_from_lir(sei_area->ccdf);
+       if (id < 0)
+               CIO_CRW_EVENT(4, "chsc: link incident - invalid LIR\n");
+       else {
+               chp_id_init(&chpid);
+               chpid.id = id;
+               chsc_chp_offline(chpid);
+       }
+}
 
-       CIO_TRACE_EVENT( 2, "prcss");
-       ret = 0;
-       do {
-               int ccode, status;
-               memset(sei_area, 0, sizeof(*sei_area));
+static void chsc_process_sei_res_acc(struct chsc_sei_area *sei_area)
+{
+       struct chp_link link;
+       struct chp_id chpid;
+       int status;
 
-               sei_area->request = (struct chsc_header) {
-                       .length = 0x0010,
-                       .code   = 0x000e,
-               };
-
-               ccode = chsc(sei_area);
-               if (ccode > 0)
-                       return 0;
-
-               switch (sei_area->response.code) {
-                       /* for debug purposes, check for problems */
-               case 0x0001:
-                       CIO_CRW_EVENT(4, "chsc_process_crw: event information "
-                                       "successfully stored\n");
-                       break; /* everything ok */
-               case 0x0002:
-                       CIO_CRW_EVENT(2,
-                                     "chsc_process_crw: invalid command!\n");
-                       return 0;
-               case 0x0003:
-                       CIO_CRW_EVENT(2, "chsc_process_crw: error in chsc "
-                                     "request block!\n");
-                       return 0;
-               case 0x0005:
-                       CIO_CRW_EVENT(2, "chsc_process_crw: no event "
-                                     "information stored\n");
-                       return 0;
-               default:
-                       CIO_CRW_EVENT(2, "chsc_process_crw: chsc response %d\n",
-                                     sei_area->response.code);
-                       return 0;
-               }
+       CIO_CRW_EVENT(4, "chsc: resource accessibility event (rs=%02x, "
+                     "rs_id=%04x)\n", sei_area->rs, sei_area->rsid);
+       if (sei_area->rs != 4)
+               return;
+       chp_id_init(&chpid);
+       chpid.id = sei_area->rsid;
+       /* allocate a new channel path structure, if needed */
+       status = chp_get_status(chpid);
+       if (status < 0)
+               chp_new(chpid);
+       else if (!status)
+               return;
+       memset(&link, 0, sizeof(struct chp_link));
+       link.chpid = chpid;
+       if ((sei_area->vf & 0xc0) != 0) {
+               link.fla = sei_area->fla;
+               if ((sei_area->vf & 0xc0) == 0xc0)
+                       /* full link address */
+                       link.fla_mask = 0xffff;
+               else
+                       /* link address */
+                       link.fla_mask = 0xff00;
+       }
+       s390_process_res_acc(&link);
+}
 
-               /* Check if we might have lost some information. */
-               if (sei_area->flags & 0x40)
-                       CIO_CRW_EVENT(2, "chsc_process_crw: Event information "
-                                      "has been lost due to overflow!\n");
+struct chp_config_data {
+       u8 map[32];
+       u8 op;
+       u8 pc;
+};
 
-               if (sei_area->rs != 4) {
-                       CIO_CRW_EVENT(2, "chsc_process_crw: reporting source "
-                                     "(%04X) isn't a chpid!\n",
-                                     sei_area->rsid);
-                       continue;
-               }
+static void chsc_process_sei_chp_config(struct chsc_sei_area *sei_area)
+{
+       struct chp_config_data *data;
+       struct chp_id chpid;
+       int num;
+       char *events[3] = {"configure", "deconfigure", "cancel deconfigure"};
 
-               /* which kind of information was stored? */
-               switch (sei_area->cc) {
-               case 1: /* link incident*/
-                       CIO_CRW_EVENT(4, "chsc_process_crw: "
-                                     "channel subsystem reports link incident,"
-                                     " reporting source is chpid %x\n",
-                                     sei_area->rsid);
-                       chpid = __get_chpid_from_lir(sei_area->ccdf);
-                       if (chpid < 0)
-                               CIO_CRW_EVENT(4, "%s: Invalid LIR, skipping\n",
-                                             __FUNCTION__);
-                       else
-                               s390_set_chpid_offline(chpid);
+       CIO_CRW_EVENT(4, "chsc: channel-path-configuration notification\n");
+       if (sei_area->rs != 0)
+               return;
+       data = (struct chp_config_data *) &(sei_area->ccdf);
+       chp_id_init(&chpid);
+       for (num = 0; num <= __MAX_CHPID; num++) {
+               if (!chp_test_bit(data->map, num))
+                       continue;
+               chpid.id = num;
+               pr_notice("Processing %s for channel path %x.%02x\n",
+                         events[data->op], chpid.cssid, chpid.id);
+               switch (data->op) {
+               case 0:
+                       chp_cfg_schedule(chpid, 1);
                        break;
-                       
-               case 2: /* i/o resource accessibiliy */
-                       CIO_CRW_EVENT(4, "chsc_process_crw: "
-                                     "channel subsystem reports some I/O "
-                                     "devices may have become accessible\n");
-                       pr_debug("Data received after sei: \n");
-                       pr_debug("Validity flags: %x\n", sei_area->vf);
-                       
-                       /* allocate a new channel path structure, if needed */
-                       status = get_chp_status(sei_area->rsid);
-                       if (status < 0)
-                               new_channel_path(sei_area->rsid);
-                       else if (!status)
-                               return 0;
-                       if ((sei_area->vf & 0x80) == 0) {
-                               pr_debug("chpid: %x\n", sei_area->rsid);
-                               ret = s390_process_res_acc(sei_area->rsid,
-                                                          0, 0);
-                       } else if ((sei_area->vf & 0xc0) == 0x80) {
-                               pr_debug("chpid: %x link addr: %x\n",
-                                        sei_area->rsid, sei_area->fla);
-                               ret = s390_process_res_acc(sei_area->rsid,
-                                                          sei_area->fla,
-                                                          0xff00);
-                       } else if ((sei_area->vf & 0xc0) == 0xc0) {
-                               pr_debug("chpid: %x full link addr: %x\n",
-                                        sei_area->rsid, sei_area->fla);
-                               ret = s390_process_res_acc(sei_area->rsid,
-                                                          sei_area->fla,
-                                                          0xffff);
-                       }
-                       pr_debug("\n");
-                       
+               case 1:
+                       chp_cfg_schedule(chpid, 0);
                        break;
-                       
-               default: /* other stuff */
-                       CIO_CRW_EVENT(4, "chsc_process_crw: event %d\n",
-                                     sei_area->cc);
+               case 2:
+                       chp_cfg_cancel_deconfigure(chpid);
                        break;
                }
-       } while (sei_area->flags & 0x80);
-       return ret;
+       }
 }
 
-static int
-chp_add(int chpid)
+static void chsc_process_sei(struct chsc_sei_area *sei_area)
 {
-       struct subchannel *sch;
-       int irq, ret, rc;
-       char dbf_txt[15];
+       /* Check if we might have lost some information. */
+       if (sei_area->flags & 0x40) {
+               CIO_CRW_EVENT(2, "chsc: event overflow\n");
+               css_schedule_eval_all();
+       }
+       /* which kind of information was stored? */
+       switch (sei_area->cc) {
+       case 1: /* link incident*/
+               chsc_process_sei_link_incident(sei_area);
+               break;
+       case 2: /* i/o resource accessibiliy */
+               chsc_process_sei_res_acc(sei_area);
+               break;
+       case 8: /* channel-path-configuration notification */
+               chsc_process_sei_chp_config(sei_area);
+               break;
+       default: /* other stuff */
+               CIO_CRW_EVENT(4, "chsc: unhandled sei content code %d\n",
+                             sei_area->cc);
+               break;
+       }
+}
 
-       if (!get_chp_status(chpid))
-               return 0; /* no need to do the rest */
-       
-       sprintf(dbf_txt, "cadd%x", chpid);
-       CIO_TRACE_EVENT(2, dbf_txt);
+static void chsc_process_crw(struct crw *crw0, struct crw *crw1, int overflow)
+{
+       struct chsc_sei_area *sei_area;
 
-       rc = 0;
-       for (irq = 0; irq < __MAX_SUBCHANNELS; irq++) {
-               int i;
+       if (overflow) {
+               css_schedule_eval_all();
+               return;
+       }
+       CIO_CRW_EVENT(2, "CRW reports slct=%d, oflw=%d, "
+                     "chn=%d, rsc=%X, anc=%d, erc=%X, rsid=%X\n",
+                     crw0->slct, crw0->oflw, crw0->chn, crw0->rsc, crw0->anc,
+                     crw0->erc, crw0->rsid);
+       if (!sei_page)
+               return;
+       /* Access to sei_page is serialized through machine check handler
+        * thread, so no need for locking. */
+       sei_area = sei_page;
 
-               sch = get_subchannel_by_schid(irq);
-               if (!sch) {
-                       struct schib schib;
+       CIO_TRACE_EVENT(2, "prcss");
+       do {
+               memset(sei_area, 0, sizeof(*sei_area));
+               sei_area->request.length = 0x0010;
+               sei_area->request.code = 0x000e;
+               if (chsc(sei_area))
+                       break;
 
-                       if (stsch(irq, &schib)) {
-                               /* We're through */
-                               if (need_rescan)
-                                       rc = -EAGAIN;
-                               break;
-                       }
-                       if (need_rescan) {
-                               rc = -EAGAIN;
-                               continue;
-                       }
-                       /* Put it on the slow path. */
-                       ret = css_enqueue_subchannel_slow(irq);
-                       if (ret) {
-                               css_clear_subchannel_slow_list();
-                               need_rescan = 1;
-                       }
-                       rc = -EAGAIN;
-                       continue;
-               }
-       
-               spin_lock(&sch->lock);
-               for (i=0; i<8; i++)
-                       if (sch->schib.pmcw.chpid[i] == chpid) {
-                               if (stsch(sch->irq, &sch->schib) != 0) {
-                                       /* Endgame. */
-                                       spin_unlock(&sch->lock);
-                                       return rc;
-                               }
-                               break;
-                       }
-               if (i==8) {
-                       spin_unlock(&sch->lock);
-                       return rc;
+               if (sei_area->response.code == 0x0001) {
+                       CIO_CRW_EVENT(4, "chsc: sei successful\n");
+                       chsc_process_sei(sei_area);
+               } else {
+                       CIO_CRW_EVENT(2, "chsc: sei failed (rc=%04x)\n",
+                                     sei_area->response.code);
+                       break;
                }
-               sch->lpm = ((sch->schib.pmcw.pim &
-                            sch->schib.pmcw.pam &
-                            sch->schib.pmcw.pom)
-                           | 0x80 >> i) & sch->opm;
-
-               if (sch->driver && sch->driver->verify)
-                       sch->driver->verify(&sch->dev);
-
-               spin_unlock(&sch->lock);
-               put_device(&sch->dev);
-       }
-       return rc;
+       } while (sei_area->flags & 0x80);
 }
 
-/* 
- * Handling of crw machine checks with channel path source.
- */
-int
-chp_process_crw(int chpid, int on)
+void chsc_chp_online(struct chp_id chpid)
 {
-       if (on == 0) {
-               /* Path has gone. We use the link incident routine.*/
-               s390_set_chpid_offline(chpid);
-               return 0; /* De-register is async anyway. */
-       }
-       /*
-        * Path has come. Allocate a new channel path structure,
-        * if needed.
-        */
-       if (get_chp_status(chpid) < 0)
-               new_channel_path(chpid);
-       /* Avoid the extra overhead in process_rec_acc. */
-       return chp_add(chpid);
-}
+       char dbf_txt[15];
+       struct chp_link link;
 
-static inline int
-__check_for_io_and_kill(struct subchannel *sch, int index)
-{
-       int cc;
+       sprintf(dbf_txt, "cadd%x.%02x", chpid.cssid, chpid.id);
+       CIO_TRACE_EVENT(2, dbf_txt);
 
-       if (!device_is_online(sch))
-               /* cio could be doing I/O. */
-               return 0;
-       cc = stsch(sch->irq, &sch->schib);
-       if (cc)
-               return 0;
-       if (sch->schib.scsw.actl && sch->schib.pmcw.lpum == (0x80 >> index)) {
-               device_set_waiting(sch);
-               return 1;
+       if (chp_get_status(chpid) != 0) {
+               memset(&link, 0, sizeof(struct chp_link));
+               link.chpid = chpid;
+               /* Wait until previous actions have settled. */
+               css_wait_for_slow_path();
+               for_each_subchannel_staged(__s390_process_res_acc, NULL,
+                                          &link);
        }
-       return 0;
 }
 
-static inline void
-__s390_subchannel_vary_chpid(struct subchannel *sch, __u8 chpid, int on)
+static void __s390_subchannel_vary_chpid(struct subchannel *sch,
+                                        struct chp_id chpid, int on)
 {
-       int chp, old_lpm;
        unsigned long flags;
-
-       if (!sch->ssd_info.valid)
-               return;
-       
-       spin_lock_irqsave(&sch->lock, flags);
-       old_lpm = sch->lpm;
-       for (chp = 0; chp < 8; chp++) {
-               if (sch->ssd_info.chpid[chp] != chpid)
-                       continue;
-
-               if (on) {
-                       sch->opm |= (0x80 >> chp);
-                       sch->lpm |= (0x80 >> chp);
-                       if (!old_lpm)
-                               device_trigger_reprobe(sch);
-                       else if (sch->driver && sch->driver->verify)
-                               sch->driver->verify(&sch->dev);
-               } else {
-                       sch->opm &= ~(0x80 >> chp);
-                       sch->lpm &= ~(0x80 >> chp);
-                       /*
-                        * Give running I/O a grace period in which it
-                        * can successfully terminate, even using the
-                        * just varied off path. Then kill it.
-                        */
-                       if (!__check_for_io_and_kill(sch, chp) && !sch->lpm) {
-                               if (css_enqueue_subchannel_slow(sch->irq)) {
-                                       css_clear_subchannel_slow_list();
-                                       need_rescan = 1;
-                               }
-                       } else if (sch->driver && sch->driver->verify)
-                               sch->driver->verify(&sch->dev);
-               }
-               break;
-       }
-       spin_unlock_irqrestore(&sch->lock, flags);
+       struct chp_link link;
+
+       memset(&link, 0, sizeof(struct chp_link));
+       link.chpid = chpid;
+       spin_lock_irqsave(sch->lock, flags);
+       if (sch->driver && sch->driver->chp_event)
+               sch->driver->chp_event(sch, &link,
+                                      on ? CHP_VARY_ON : CHP_VARY_OFF);
+       spin_unlock_irqrestore(sch->lock, flags);
 }
 
-static int
-s390_subchannel_vary_chpid_off(struct device *dev, void *data)
+static int s390_subchannel_vary_chpid_off(struct subchannel *sch, void *data)
 {
-       struct subchannel *sch;
-       __u8 *chpid;
-
-       sch = to_subchannel(dev);
-       chpid = data;
+       struct chp_id *chpid = data;
 
        __s390_subchannel_vary_chpid(sch, *chpid, 0);
        return 0;
 }
 
-static int
-s390_subchannel_vary_chpid_on(struct device *dev, void *data)
+static int s390_subchannel_vary_chpid_on(struct subchannel *sch, void *data)
 {
-       struct subchannel *sch;
-       __u8 *chpid;
-
-       sch = to_subchannel(dev);
-       chpid = data;
+       struct chp_id *chpid = data;
 
        __s390_subchannel_vary_chpid(sch, *chpid, 1);
        return 0;
 }
 
-/*
- * Function: s390_vary_chpid
- * Varies the specified chpid online or offline
- */
 static int
-s390_vary_chpid( __u8 chpid, int on)
+__s390_vary_chpid_on(struct subchannel_id schid, void *data)
 {
-       char dbf_text[15];
-       int status, irq, ret;
-       struct subchannel *sch;
-
-       sprintf(dbf_text, on?"varyon%x":"varyoff%x", chpid);
-       CIO_TRACE_EVENT( 2, dbf_text);
-
-       status = get_chp_status(chpid);
-       if (status < 0) {
-               printk(KERN_ERR "Can't vary unknown chpid %02X\n", chpid);
-               return -EINVAL;
-       }
+       struct schib schib;
 
-       if (!on && !status) {
-               printk(KERN_ERR "chpid %x is already offline\n", chpid);
-               return -EINVAL;
-       }
+       if (stsch_err(schid, &schib))
+               /* We're through */
+               return -ENXIO;
+       /* Put it on the slow path. */
+       css_schedule_eval(schid);
+       return 0;
+}
 
-       set_chp_logically_online(chpid, on);
+/**
+ * chsc_chp_vary - propagate channel-path vary operation to subchannels
+ * @chpid: channl-path ID
+ * @on: non-zero for vary online, zero for vary offline
+ */
+int chsc_chp_vary(struct chp_id chpid, int on)
+{
+       struct chp_link link;
 
+       memset(&link, 0, sizeof(struct chp_link));
+       link.chpid = chpid;
+       /* Wait until previous actions have settled. */
+       css_wait_for_slow_path();
        /*
         * Redo PathVerification on the devices the chpid connects to
         */
 
-       bus_for_each_dev(&css_bus_type, NULL, &chpid, on ?
-                        s390_subchannel_vary_chpid_on :
-                        s390_subchannel_vary_chpid_off);
-       if (!on)
-               goto out;
-       /* Scan for new devices on varied on path. */
-       for (irq = 0; irq < __MAX_SUBCHANNELS; irq++) {
-               struct schib schib;
+       if (on)
+               for_each_subchannel_staged(s390_subchannel_vary_chpid_on,
+                                          __s390_vary_chpid_on, &link);
+       else
+               for_each_subchannel_staged(s390_subchannel_vary_chpid_off,
+                                          NULL, &link);
 
-               if (need_rescan)
-                       break;
-               sch = get_subchannel_by_schid(irq);
-               if (sch) {
-                       put_device(&sch->dev);
-                       continue;
-               }
-               if (stsch(irq, &schib))
-                       /* We're through */
-                       break;
-               /* Put it on the slow path. */
-               ret = css_enqueue_subchannel_slow(irq);
-               if (ret) {
-                       css_clear_subchannel_slow_list();
-                       need_rescan = 1;
-               }
-       }
-out:
-       if (need_rescan || css_slow_subchannels_exist())
-               queue_work(slow_path_wq, &slow_path_work);
        return 0;
 }
 
-/*
- * Files for the channel path entries.
- */
-static ssize_t
-chp_status_show(struct device *dev, struct device_attribute *attr, char *buf)
+static void
+chsc_remove_cmg_attr(struct channel_subsystem *css)
 {
-       struct channel_path *chp = container_of(dev, struct channel_path, dev);
+       int i;
 
-       if (!chp)
-               return 0;
-       return (get_chp_status(chp->id) ? sprintf(buf, "online\n") :
-               sprintf(buf, "offline\n"));
+       for (i = 0; i <= __MAX_CHPID; i++) {
+               if (!css->chps[i])
+                       continue;
+               chp_remove_cmg_attr(css->chps[i]);
+       }
 }
 
-static ssize_t
-chp_status_write(struct device *dev, struct device_attribute *attr, const char *buf, size_t count)
+static int
+chsc_add_cmg_attr(struct channel_subsystem *css)
 {
-       struct channel_path *cp = container_of(dev, struct channel_path, dev);
-       char cmd[10];
-       int num_args;
-       int error;
-
-       num_args = sscanf(buf, "%5s", cmd);
-       if (!num_args)
-               return count;
-
-       if (!strnicmp(cmd, "on", 2))
-               error = s390_vary_chpid(cp->id, 1);
-       else if (!strnicmp(cmd, "off", 3))
-               error = s390_vary_chpid(cp->id, 0);
-       else
-               error = -EINVAL;
-
-       return error < 0 ? error : count;
+       int i, ret;
 
+       ret = 0;
+       for (i = 0; i <= __MAX_CHPID; i++) {
+               if (!css->chps[i])
+                       continue;
+               ret = chp_add_cmg_attr(css->chps[i]);
+               if (ret)
+                       goto cleanup;
+       }
+       return ret;
+cleanup:
+       for (--i; i >= 0; i--) {
+               if (!css->chps[i])
+                       continue;
+               chp_remove_cmg_attr(css->chps[i]);
+       }
+       return ret;
 }
 
-static DEVICE_ATTR(status, 0644, chp_status_show, chp_status_write);
-
-static ssize_t
-chp_type_show(struct device *dev, struct device_attribute *attr, char *buf)
+int __chsc_do_secm(struct channel_subsystem *css, int enable, void *page)
 {
-       struct channel_path *chp = container_of(dev, struct channel_path, dev);
+       struct {
+               struct chsc_header request;
+               u32 operation_code : 2;
+               u32 : 30;
+               u32 key : 4;
+               u32 : 28;
+               u32 zeroes1;
+               u32 cub_addr1;
+               u32 zeroes2;
+               u32 cub_addr2;
+               u32 reserved[13];
+               struct chsc_header response;
+               u32 status : 8;
+               u32 : 4;
+               u32 fmt : 4;
+               u32 : 16;
+       } __attribute__ ((packed)) *secm_area;
+       int ret, ccode;
 
-       if (!chp)
-               return 0;
-       return sprintf(buf, "%x\n", chp->desc.desc);
-}
+       secm_area = page;
+       secm_area->request.length = 0x0050;
+       secm_area->request.code = 0x0016;
 
-static DEVICE_ATTR(type, 0444, chp_type_show, NULL);
+       secm_area->key = PAGE_DEFAULT_KEY;
+       secm_area->cub_addr1 = (u64)(unsigned long)css->cub_addr1;
+       secm_area->cub_addr2 = (u64)(unsigned long)css->cub_addr2;
 
-static struct attribute * chp_attrs[] = {
-       &dev_attr_status.attr,
-       &dev_attr_type.attr,
-       NULL,
-};
+       secm_area->operation_code = enable ? 0 : 1;
 
-static struct attribute_group chp_attr_group = {
-       .attrs = chp_attrs,
-};
+       ccode = chsc(secm_area);
+       if (ccode > 0)
+               return (ccode == 3) ? -ENODEV : -EBUSY;
 
-static void
-chp_release(struct device *dev)
+       switch (secm_area->response.code) {
+       case 0x0102:
+       case 0x0103:
+               ret = -EINVAL;
+               break;
+       default:
+               ret = chsc_error_from_response(secm_area->response.code);
+       }
+       if (ret != 0)
+               CIO_CRW_EVENT(2, "chsc: secm failed (rc=%04x)\n",
+                             secm_area->response.code);
+       return ret;
+}
+
+int
+chsc_secm(struct channel_subsystem *css, int enable)
 {
-       struct channel_path *cp;
-       
-       cp = container_of(dev, struct channel_path, dev);
-       kfree(cp);
+       void  *secm_area;
+       int ret;
+
+       secm_area = (void *)get_zeroed_page(GFP_KERNEL |  GFP_DMA);
+       if (!secm_area)
+               return -ENOMEM;
+
+       if (enable && !css->cm_enabled) {
+               css->cub_addr1 = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA);
+               css->cub_addr2 = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA);
+               if (!css->cub_addr1 || !css->cub_addr2) {
+                       free_page((unsigned long)css->cub_addr1);
+                       free_page((unsigned long)css->cub_addr2);
+                       free_page((unsigned long)secm_area);
+                       return -ENOMEM;
+               }
+       }
+       ret = __chsc_do_secm(css, enable, secm_area);
+       if (!ret) {
+               css->cm_enabled = enable;
+               if (css->cm_enabled) {
+                       ret = chsc_add_cmg_attr(css);
+                       if (ret) {
+                               memset(secm_area, 0, PAGE_SIZE);
+                               __chsc_do_secm(css, 0, secm_area);
+                               css->cm_enabled = 0;
+                       }
+               } else
+                       chsc_remove_cmg_attr(css);
+       }
+       if (!css->cm_enabled) {
+               free_page((unsigned long)css->cub_addr1);
+               free_page((unsigned long)css->cub_addr2);
+       }
+       free_page((unsigned long)secm_area);
+       return ret;
 }
 
-static int
-chsc_determine_channel_path_description(int chpid,
-                                       struct channel_path_desc *desc)
+int chsc_determine_channel_path_desc(struct chp_id chpid, int fmt, int rfmt,
+                                    int c, int m,
+                                    struct chsc_response_struct *resp)
 {
        int ccode, ret;
 
        struct {
                struct chsc_header request;
-               u32 : 24;
+               u32 : 2;
+               u32 m : 1;
+               u32 c : 1;
+               u32 fmt : 4;
+               u32 cssid : 8;
+               u32 : 4;
+               u32 rfmt : 4;
                u32 first_chpid : 8;
                u32 : 24;
                u32 last_chpid : 8;
                u32 zeroes1;
                struct chsc_header response;
-               u32 zeroes2;
-               struct channel_path_desc desc;
-       } *scpd_area;
+               u8 data[PAGE_SIZE - 20];
+       } __attribute__ ((packed)) *scpd_area;
 
+       if ((rfmt == 1) && !css_general_characteristics.fcs)
+               return -EINVAL;
+       if ((rfmt == 2) && !css_general_characteristics.cib)
+               return -EINVAL;
        scpd_area = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA);
        if (!scpd_area)
                return -ENOMEM;
 
-       scpd_area->request = (struct chsc_header) {
-               .length = 0x0010,
-               .code   = 0x0002,
-       };
+       scpd_area->request.length = 0x0010;
+       scpd_area->request.code = 0x0002;
 
-       scpd_area->first_chpid = chpid;
-       scpd_area->last_chpid = chpid;
+       scpd_area->cssid = chpid.cssid;
+       scpd_area->first_chpid = chpid.id;
+       scpd_area->last_chpid = chpid.id;
+       scpd_area->m = m;
+       scpd_area->c = c;
+       scpd_area->fmt = fmt;
+       scpd_area->rfmt = rfmt;
 
        ccode = chsc(scpd_area);
        if (ccode > 0) {
@@ -954,108 +687,197 @@ chsc_determine_channel_path_description(int chpid,
                goto out;
        }
 
-       switch (scpd_area->response.code) {
-       case 0x0001: /* Success. */
-               memcpy(desc, &scpd_area->desc,
-                      sizeof(struct channel_path_desc));
-               ret = 0;
-               break;
-       case 0x0003: /* Invalid block. */
-       case 0x0007: /* Invalid format. */
-       case 0x0008: /* Other invalid block. */
-               CIO_CRW_EVENT(2, "Error in chsc request block!\n");
-               ret = -EINVAL;
-               break;
-       case 0x0004: /* Command not provided in model. */
-               CIO_CRW_EVENT(2, "Model does not provide scpd\n");
-               ret = -EOPNOTSUPP;
-               break;
-       default:
-               CIO_CRW_EVENT(2, "Unknown CHSC response %d\n",
+       ret = chsc_error_from_response(scpd_area->response.code);
+       if (ret == 0)
+               /* Success. */
+               memcpy(resp, &scpd_area->response, scpd_area->response.length);
+       else
+               CIO_CRW_EVENT(2, "chsc: scpd failed (rc=%04x)\n",
                              scpd_area->response.code);
-               ret = -EIO;
-       }
 out:
        free_page((unsigned long)scpd_area);
        return ret;
 }
+EXPORT_SYMBOL_GPL(chsc_determine_channel_path_desc);
 
-/*
- * Entries for chpids on the system bus.
- * This replaces /proc/chpids.
- */
-static int
-new_channel_path(int chpid)
+int chsc_determine_base_channel_path_desc(struct chp_id chpid,
+                                         struct channel_path_desc *desc)
 {
-       struct channel_path *chp;
+       struct chsc_response_struct *chsc_resp;
        int ret;
 
-       chp = kmalloc(sizeof(struct channel_path), GFP_KERNEL);
-       if (!chp)
+       chsc_resp = kzalloc(sizeof(*chsc_resp), GFP_KERNEL);
+       if (!chsc_resp)
                return -ENOMEM;
-       memset(chp, 0, sizeof(struct channel_path));
-
-       /* fill in status, etc. */
-       chp->id = chpid;
-       chp->state = 1;
-       chp->dev = (struct device) {
-               .parent  = &css_bus_device,
-               .release = chp_release,
-       };
-       snprintf(chp->dev.bus_id, BUS_ID_SIZE, "chp0.%x", chpid);
-
-       /* Obtain channel path description and fill it in. */
-       ret = chsc_determine_channel_path_description(chpid, &chp->desc);
+       ret = chsc_determine_channel_path_desc(chpid, 0, 0, 0, 0, chsc_resp);
        if (ret)
                goto out_free;
-
-       /* make it known to the system */
-       ret = device_register(&chp->dev);
-       if (ret) {
-               printk(KERN_WARNING "%s: could not register %02x\n",
-                      __func__, chpid);
-               goto out_free;
-       }
-       ret = sysfs_create_group(&chp->dev.kobj, &chp_attr_group);
-       if (ret) {
-               device_unregister(&chp->dev);
-               goto out_free;
-       } else
-               chps[chpid] = chp;
-       return ret;
+       memcpy(desc, &chsc_resp->data, chsc_resp->length);
 out_free:
-       kfree(chp);
+       kfree(chsc_resp);
        return ret;
 }
 
-void *
-chsc_get_chp_desc(struct subchannel *sch, int chp_no)
+static void
+chsc_initialize_cmg_chars(struct channel_path *chp, u8 cmcv,
+                         struct cmg_chars *chars)
 {
-       struct channel_path *chp;
-       struct channel_path_desc *desc;
-
-       chp = chps[sch->schib.pmcw.chpid[chp_no]];
-       if (!chp)
-               return NULL;
-       desc = kmalloc(sizeof(struct channel_path_desc), GFP_KERNEL);
-       if (!desc)
-               return NULL;
-       memcpy(desc, &chp->desc, sizeof(struct channel_path_desc));
-       return desc;
+       switch (chp->cmg) {
+       case 2:
+       case 3:
+               chp->cmg_chars = kmalloc(sizeof(struct cmg_chars),
+                                        GFP_KERNEL);
+               if (chp->cmg_chars) {
+                       int i, mask;
+                       struct cmg_chars *cmg_chars;
+
+                       cmg_chars = chp->cmg_chars;
+                       for (i = 0; i < NR_MEASUREMENT_CHARS; i++) {
+                               mask = 0x80 >> (i + 3);
+                               if (cmcv & mask)
+                                       cmg_chars->values[i] = chars->values[i];
+                               else
+                                       cmg_chars->values[i] = 0;
+                       }
+               }
+               break;
+       default:
+               /* No cmg-dependent data. */
+               break;
+       }
 }
 
+int chsc_get_channel_measurement_chars(struct channel_path *chp)
+{
+       int ccode, ret;
 
-static int __init
-chsc_alloc_sei_area(void)
+       struct {
+               struct chsc_header request;
+               u32 : 24;
+               u32 first_chpid : 8;
+               u32 : 24;
+               u32 last_chpid : 8;
+               u32 zeroes1;
+               struct chsc_header response;
+               u32 zeroes2;
+               u32 not_valid : 1;
+               u32 shared : 1;
+               u32 : 22;
+               u32 chpid : 8;
+               u32 cmcv : 5;
+               u32 : 11;
+               u32 cmgq : 8;
+               u32 cmg : 8;
+               u32 zeroes3;
+               u32 data[NR_MEASUREMENT_CHARS];
+       } __attribute__ ((packed)) *scmc_area;
+
+       scmc_area = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA);
+       if (!scmc_area)
+               return -ENOMEM;
+
+       scmc_area->request.length = 0x0010;
+       scmc_area->request.code = 0x0022;
+
+       scmc_area->first_chpid = chp->chpid.id;
+       scmc_area->last_chpid = chp->chpid.id;
+
+       ccode = chsc(scmc_area);
+       if (ccode > 0) {
+               ret = (ccode == 3) ? -ENODEV : -EBUSY;
+               goto out;
+       }
+
+       ret = chsc_error_from_response(scmc_area->response.code);
+       if (ret == 0) {
+               /* Success. */
+               if (!scmc_area->not_valid) {
+                       chp->cmg = scmc_area->cmg;
+                       chp->shared = scmc_area->shared;
+                       chsc_initialize_cmg_chars(chp, scmc_area->cmcv,
+                                                 (struct cmg_chars *)
+                                                 &scmc_area->data);
+               } else {
+                       chp->cmg = -1;
+                       chp->shared = -1;
+               }
+       } else {
+               CIO_CRW_EVENT(2, "chsc: scmc failed (rc=%04x)\n",
+                             scmc_area->response.code);
+       }
+out:
+       free_page((unsigned long)scmc_area);
+       return ret;
+}
+
+int __init chsc_alloc_sei_area(void)
 {
+       int ret;
+
        sei_page = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA);
-       if (!sei_page)
-               printk(KERN_WARNING"Can't allocate page for processing of " \
-                      "chsc machine checks!\n");
-       return (sei_page ? 0 : -ENOMEM);
+       if (!sei_page) {
+               CIO_MSG_EVENT(0, "Can't allocate page for processing of "
+                             "chsc machine checks!\n");
+               return -ENOMEM;
+       }
+       ret = crw_register_handler(CRW_RSC_CSS, chsc_process_crw);
+       if (ret)
+               kfree(sei_page);
+       return ret;
+}
+
+void __init chsc_free_sei_area(void)
+{
+       crw_unregister_handler(CRW_RSC_CSS);
+       kfree(sei_page);
 }
 
-subsys_initcall(chsc_alloc_sei_area);
+int __init
+chsc_enable_facility(int operation_code)
+{
+       int ret;
+       struct {
+               struct chsc_header request;
+               u8 reserved1:4;
+               u8 format:4;
+               u8 reserved2;
+               u16 operation_code;
+               u32 reserved3;
+               u32 reserved4;
+               u32 operation_data_area[252];
+               struct chsc_header response;
+               u32 reserved5:4;
+               u32 format2:4;
+               u32 reserved6:24;
+       } __attribute__ ((packed)) *sda_area;
+
+       sda_area = (void *)get_zeroed_page(GFP_KERNEL|GFP_DMA);
+       if (!sda_area)
+               return -ENOMEM;
+       sda_area->request.length = 0x0400;
+       sda_area->request.code = 0x0031;
+       sda_area->operation_code = operation_code;
+
+       ret = chsc(sda_area);
+       if (ret > 0) {
+               ret = (ret == 3) ? -ENODEV : -EBUSY;
+               goto out;
+       }
+
+       switch (sda_area->response.code) {
+       case 0x0101:
+               ret = -EOPNOTSUPP;
+               break;
+       default:
+               ret = chsc_error_from_response(sda_area->response.code);
+       }
+       if (ret != 0)
+               CIO_CRW_EVENT(2, "chsc: sda (oc=%x) failed (rc=%04x)\n",
+                             operation_code, sda_area->response.code);
+ out:
+       free_page((unsigned long)sda_area);
+       return ret;
+}
 
 struct css_general_char css_general_characteristics;
 struct css_chsc_char css_chsc_characteristics;
@@ -1073,38 +895,30 @@ chsc_determine_css_characteristics(void)
                u32 reserved4;
                u32 general_char[510];
                u32 chsc_char[518];
-       } *scsc_area;
+       } __attribute__ ((packed)) *scsc_area;
 
        scsc_area = (void *)get_zeroed_page(GFP_KERNEL | GFP_DMA);
-       if (!scsc_area) {
-               printk(KERN_WARNING"cio: Was not able to determine available" \
-                      "CHSCs due to no memory.\n");
+       if (!scsc_area)
                return -ENOMEM;
-       }
 
-       scsc_area->request = (struct chsc_header) {
-               .length = 0x0010,
-               .code   = 0x0010,
-       };
+       scsc_area->request.length = 0x0010;
+       scsc_area->request.code = 0x0010;
 
        result = chsc(scsc_area);
        if (result) {
-               printk(KERN_WARNING"cio: Was not able to determine " \
-                      "available CHSCs, cc=%i.\n", result);
-               result = -EIO;
+               result = (result == 3) ? -ENODEV : -EBUSY;
                goto exit;
        }
 
-       if (scsc_area->response.code != 1) {
-               printk(KERN_WARNING"cio: Was not able to determine " \
-                      "available CHSCs.\n");
-               result = -EIO;
-               goto exit;
-       }
-       memcpy(&css_general_characteristics, scsc_area->general_char,
-              sizeof(css_general_characteristics));
-       memcpy(&css_chsc_characteristics, scsc_area->chsc_char,
-              sizeof(css_chsc_characteristics));
+       result = chsc_error_from_response(scsc_area->response.code);
+       if (result == 0) {
+               memcpy(&css_general_characteristics, scsc_area->general_char,
+                      sizeof(css_general_characteristics));
+               memcpy(&css_chsc_characteristics, scsc_area->chsc_char,
+                      sizeof(css_chsc_characteristics));
+       } else
+               CIO_CRW_EVENT(2, "chsc: scsc failed (rc=%04x)\n",
+                             scsc_area->response.code);
 exit:
        free_page ((unsigned long) scsc_area);
        return result;
@@ -1112,3 +926,52 @@ exit:
 
 EXPORT_SYMBOL_GPL(css_general_characteristics);
 EXPORT_SYMBOL_GPL(css_chsc_characteristics);
+
+int chsc_sstpc(void *page, unsigned int op, u16 ctrl)
+{
+       struct {
+               struct chsc_header request;
+               unsigned int rsvd0;
+               unsigned int op : 8;
+               unsigned int rsvd1 : 8;
+               unsigned int ctrl : 16;
+               unsigned int rsvd2[5];
+               struct chsc_header response;
+               unsigned int rsvd3[7];
+       } __attribute__ ((packed)) *rr;
+       int rc;
+
+       memset(page, 0, PAGE_SIZE);
+       rr = page;
+       rr->request.length = 0x0020;
+       rr->request.code = 0x0033;
+       rr->op = op;
+       rr->ctrl = ctrl;
+       rc = chsc(rr);
+       if (rc)
+               return -EIO;
+       rc = (rr->response.code == 0x0001) ? 0 : -EIO;
+       return rc;
+}
+
+int chsc_sstpi(void *page, void *result, size_t size)
+{
+       struct {
+               struct chsc_header request;
+               unsigned int rsvd0[3];
+               struct chsc_header response;
+               char data[size];
+       } __attribute__ ((packed)) *rr;
+       int rc;
+
+       memset(page, 0, PAGE_SIZE);
+       rr = page;
+       rr->request.length = 0x0010;
+       rr->request.code = 0x0038;
+       rc = chsc(rr);
+       if (rc)
+               return -EIO;
+       memcpy(result, &rr->data, size);
+       return (rr->response.code == 0x0001) ? 0 : -EIO;
+}
+