fedora core 6 1.2949 + vserver 2.2.0
[linux-2.6.git] / drivers / message / i2o / exec-osm.c
index 117f261..5278aad 100644 (file)
 
 #include <linux/module.h>
 #include <linux/i2o.h>
+#include <linux/delay.h>
+#include <linux/workqueue.h>
+#include <linux/string.h>
+#include <linux/slab.h>
+#include <linux/sched.h>       /* wait_event_interruptible_timeout() needs this */
+#include <asm/param.h>         /* HZ */
+#include "core.h"
+
+#define OSM_NAME "exec-osm"
 
 struct i2o_driver i2o_exec_driver;
 
-/* Module internal functions from other sources */
-extern int i2o_device_parse_lct(struct i2o_controller *);
+static int i2o_exec_lct_notify(struct i2o_controller *c, u32 change_ind);
 
 /* global wait list for POST WAIT */
 static LIST_HEAD(i2o_exec_wait_list);
@@ -47,6 +55,14 @@ struct i2o_exec_wait {
        u32 m;                  /* message id */
        struct i2o_message *msg;        /* pointer to the reply message */
        struct list_head list;  /* node in global wait list */
+       spinlock_t lock;        /* lock before modifying */
+};
+
+/* Work struct needed to handle LCT NOTIFY replies */
+struct i2o_exec_lct_notify_work {
+       struct work_struct work;        /* work struct */
+       struct i2o_controller *c;       /* controller on which the LCT NOTIFY
+                                          was received */
 };
 
 /* Exec OSM class handling definition */
@@ -67,20 +83,19 @@ static struct i2o_exec_wait *i2o_exec_wait_alloc(void)
 {
        struct i2o_exec_wait *wait;
 
-       wait = kmalloc(sizeof(*wait), GFP_KERNEL);
+       wait = kzalloc(sizeof(*wait), GFP_KERNEL);
        if (!wait)
-               return ERR_PTR(-ENOMEM);
-
-       memset(wait, 0, sizeof(*wait));
+               return NULL;
 
        INIT_LIST_HEAD(&wait->list);
+       spin_lock_init(&wait->lock);
 
        return wait;
 };
 
 /**
- *     i2o_exec_wait_free - Free a i2o_exec_wait struct
- *     @i2o_exec_wait: I2O wait data which should be cleaned up
+ *     i2o_exec_wait_free - Free an i2o_exec_wait struct
+ *     @wait: I2O wait data which should be cleaned up
  */
 static void i2o_exec_wait_free(struct i2o_exec_wait *wait)
 {
@@ -90,7 +105,7 @@ static void i2o_exec_wait_free(struct i2o_exec_wait *wait)
 /**
  *     i2o_msg_post_wait_mem - Post and wait a message with DMA buffers
  *     @c: controller
- *     @m: message to post
+ *     @msg: message to post
  *     @timeout: time in seconds to wait
  *     @dma: i2o_dma struct of the DMA buffer to free on failure
  *
@@ -103,69 +118,59 @@ static void i2o_exec_wait_free(struct i2o_exec_wait *wait)
  *     buffer must not be freed. Instead the event completion will free them
  *     for you. In all other cases the buffer are your problem.
  *
- *     Returns 0 on success or negative error code on failure.
+ *     Returns 0 on success, negative error code on timeout or positive error
+ *     code from reply.
  */
-int i2o_msg_post_wait_mem(struct i2o_controller *c, u32 m, unsigned long
-                         timeout, struct i2o_dma *dma)
+int i2o_msg_post_wait_mem(struct i2o_controller *c, struct i2o_message *msg,
+                         unsigned long timeout, struct i2o_dma *dma)
 {
-       DECLARE_WAIT_QUEUE_HEAD(wq);
-       DEFINE_WAIT(wait);
-       struct i2o_exec_wait *iwait;
+       DECLARE_WAIT_QUEUE_HEAD_ONSTACK(wq);
+       struct i2o_exec_wait *wait;
        static u32 tcntxt = 0x80000000;
-       struct i2o_message *msg = c->in_queue.virt + m;
+       unsigned long flags;
        int rc = 0;
 
-       iwait = i2o_exec_wait_alloc();
-       if (!iwait)
+       wait = i2o_exec_wait_alloc();
+       if (!wait)
                return -ENOMEM;
 
        if (tcntxt == 0xffffffff)
                tcntxt = 0x80000000;
 
        if (dma)
-               iwait->dma = *dma;
+               wait->dma = *dma;
 
        /*
         * Fill in the message initiator context and transaction context.
         * We will only use transaction contexts >= 0x80000000 for POST WAIT,
         * so we could find a POST WAIT reply easier in the reply handler.
         */
-       writel(i2o_exec_driver.context, &msg->u.s.icntxt);
-       iwait->tcntxt = tcntxt++;
-       writel(iwait->tcntxt, &msg->u.s.tcntxt);
+       msg->u.s.icntxt = cpu_to_le32(i2o_exec_driver.context);
+       wait->tcntxt = tcntxt++;
+       msg->u.s.tcntxt = cpu_to_le32(wait->tcntxt);
+
+       wait->wq = &wq;
+       /*
+        * we add elements to the head, because if a entry in the list will
+        * never be removed, we have to iterate over it every time
+        */
+       list_add(&wait->list, &i2o_exec_wait_list);
 
        /*
         * Post the message to the controller. At some point later it will
         * return. If we time out before it returns then complete will be zero.
         */
-       i2o_msg_post(c, m);
+       i2o_msg_post(c, msg);
 
-       if (!iwait->complete) {
-               iwait->wq = &wq;
-               /*
-                * we add elements add the head, because if a entry in the list
-                * will never be removed, we have to iterate over it every time
-                */
-               list_add(&iwait->list, &i2o_exec_wait_list);
+       wait_event_interruptible_timeout(wq, wait->complete, timeout * HZ);
 
-               prepare_to_wait(&wq, &wait, TASK_INTERRUPTIBLE);
+       spin_lock_irqsave(&wait->lock, flags);
 
-               if (!iwait->complete)
-                       schedule_timeout(timeout * HZ);
+       wait->wq = NULL;
 
-               finish_wait(&wq, &wait);
-
-               iwait->wq = NULL;
-       }
-
-       barrier();
-
-       if (iwait->complete) {
-               if (readl(&iwait->msg->body[0]) >> 24)
-                       rc = readl(&iwait->msg->body[0]) & 0xff;
-               i2o_flush_reply(c, iwait->m);
-               i2o_exec_wait_free(iwait);
-       } else {
+       if (wait->complete)
+               rc = le32_to_cpu(wait->msg->body[0]) >> 24;
+       else {
                /*
                 * We cannot remove it now. This is important. When it does
                 * terminate (which it must do if the controller has not
@@ -179,6 +184,13 @@ int i2o_msg_post_wait_mem(struct i2o_controller *c, u32 m, unsigned long
                rc = -ETIMEDOUT;
        }
 
+       spin_unlock_irqrestore(&wait->lock, flags);
+
+       if (rc != -ETIMEDOUT) {
+               i2o_flush_reply(c, wait->m);
+               i2o_exec_wait_free(wait);
+       }
+
        return rc;
 };
 
@@ -187,6 +199,7 @@ int i2o_msg_post_wait_mem(struct i2o_controller *c, u32 m, unsigned long
  *     @c: I2O controller which answers
  *     @m: message id
  *     @msg: pointer to the I2O reply message
+ *     @context: transaction context of request
  *
  *     This function is called in interrupt context only. If the reply reached
  *     before the timeout, the i2o_exec_wait struct is filled with the message
@@ -201,14 +214,11 @@ int i2o_msg_post_wait_mem(struct i2o_controller *c, u32 m, unsigned long
  *     message must also be given back to the controller.
  */
 static int i2o_msg_post_wait_complete(struct i2o_controller *c, u32 m,
-                                     struct i2o_message *msg)
+                                     struct i2o_message *msg, u32 context)
 {
        struct i2o_exec_wait *wait, *tmp;
-       static spinlock_t lock = SPIN_LOCK_UNLOCKED;
+       unsigned long flags;
        int rc = 1;
-       u32 context;
-
-       context = readl(&msg->u.s.tcntxt);
 
        /*
         * We need to search through the i2o_exec_wait_list to see if the given
@@ -217,45 +227,94 @@ static int i2o_msg_post_wait_complete(struct i2o_controller *c, u32 m,
         * already expired. Not much we can do about that except log it for
         * debug purposes, increase timeout, and recompile.
         */
-       spin_lock(&lock);
        list_for_each_entry_safe(wait, tmp, &i2o_exec_wait_list, list) {
                if (wait->tcntxt == context) {
+                       spin_lock_irqsave(&wait->lock, flags);
+
                        list_del(&wait->list);
 
                        wait->m = m;
                        wait->msg = msg;
                        wait->complete = 1;
 
-                       barrier();
-
-                       if (wait->wq) {
-                               wake_up_interruptible(wait->wq);
+                       if (wait->wq)
                                rc = 0;
-                       } else {
+                       else
+                               rc = -1;
+
+                       spin_unlock_irqrestore(&wait->lock, flags);
+
+                       if (rc) {
                                struct device *dev;
 
                                dev = &c->pdev->dev;
 
-                               pr_debug("timedout reply received!\n");
+                               pr_debug("%s: timedout reply received!\n",
+                                        c->name);
                                i2o_dma_free(dev, &wait->dma);
                                i2o_exec_wait_free(wait);
-                               rc = -1;
-                       }
-
-                       spin_unlock(&lock);
+                       } else
+                               wake_up_interruptible(wait->wq);
 
                        return rc;
                }
        }
 
-       spin_unlock(&lock);
-
-       pr_debug("i2o: Bogus reply in POST WAIT (tr-context: %08x)!\n",
+       osm_warn("%s: Bogus reply in POST WAIT (tr-context: %08x)!\n", c->name,
                 context);
 
        return -1;
 };
 
+/**
+ *     i2o_exec_show_vendor_id - Displays Vendor ID of controller
+ *     @d: device of which the Vendor ID should be displayed
+ *     @attr: device_attribute to display
+ *     @buf: buffer into which the Vendor ID should be printed
+ *
+ *     Returns number of bytes printed into buffer.
+ */
+static ssize_t i2o_exec_show_vendor_id(struct device *d,
+                                      struct device_attribute *attr, char *buf)
+{
+       struct i2o_device *dev = to_i2o_device(d);
+       u16 id;
+
+       if (!i2o_parm_field_get(dev, 0x0000, 0, &id, 2)) {
+               sprintf(buf, "0x%04x", le16_to_cpu(id));
+               return strlen(buf) + 1;
+       }
+
+       return 0;
+};
+
+/**
+ *     i2o_exec_show_product_id - Displays Product ID of controller
+ *     @d: device of which the Product ID should be displayed
+ *     @attr: device_attribute to display
+ *     @buf: buffer into which the Product ID should be printed
+ *
+ *     Returns number of bytes printed into buffer.
+ */
+static ssize_t i2o_exec_show_product_id(struct device *d,
+                                       struct device_attribute *attr,
+                                       char *buf)
+{
+       struct i2o_device *dev = to_i2o_device(d);
+       u16 id;
+
+       if (!i2o_parm_field_get(dev, 0x0000, 1, &id, 2)) {
+               sprintf(buf, "0x%04x", le16_to_cpu(id));
+               return strlen(buf) + 1;
+       }
+
+       return 0;
+};
+
+/* Exec-OSM device attributes */
+static DEVICE_ATTR(vendor_id, S_IRUGO, i2o_exec_show_vendor_id, NULL);
+static DEVICE_ATTR(product_id, S_IRUGO, i2o_exec_show_product_id, NULL);
+
 /**
  *     i2o_exec_probe - Called if a new I2O device (executive class) appears
  *     @dev: I2O device which should be probed
@@ -268,12 +327,24 @@ static int i2o_msg_post_wait_complete(struct i2o_controller *c, u32 m,
 static int i2o_exec_probe(struct device *dev)
 {
        struct i2o_device *i2o_dev = to_i2o_device(dev);
+       int rc;
 
-       i2o_event_register(i2o_dev, &i2o_exec_driver, 0, 0xffffffff);
+       rc = i2o_event_register(i2o_dev, &i2o_exec_driver, 0, 0xffffffff);
+       if (rc) goto err_out;
 
-       i2o_dev->iop->exec = i2o_dev;
+       rc = device_create_file(dev, &dev_attr_vendor_id);
+       if (rc) goto err_evtreg;
+       rc = device_create_file(dev, &dev_attr_product_id);
+       if (rc) goto err_vid;
 
        return 0;
+
+err_vid:
+       device_remove_file(dev, &dev_attr_vendor_id);
+err_evtreg:
+       i2o_event_register(to_i2o_device(dev), &i2o_exec_driver, 0, 0);
+err_out:
+       return rc;
 };
 
 /**
@@ -286,6 +357,9 @@ static int i2o_exec_probe(struct device *dev)
  */
 static int i2o_exec_remove(struct device *dev)
 {
+       device_remove_file(dev, &dev_attr_product_id);
+       device_remove_file(dev, &dev_attr_vendor_id);
+
        i2o_event_register(to_i2o_device(dev), &i2o_exec_driver, 0, 0);
 
        return 0;
@@ -293,16 +367,27 @@ static int i2o_exec_remove(struct device *dev)
 
 /**
  *     i2o_exec_lct_modified - Called on LCT NOTIFY reply
- *     @c: I2O controller on which the LCT has modified
+ *     @_work: work struct for a specific controller
  *
  *     This function handles asynchronus LCT NOTIFY replies. It parses the
  *     new LCT and if the buffer for the LCT was to small sends a LCT NOTIFY
- *     again.
+ *     again, otherwise send LCT NOTIFY to get informed on next LCT change.
  */
-static void i2o_exec_lct_modified(struct i2o_controller *c)
+static void i2o_exec_lct_modified(struct work_struct *_work)
 {
-       if (i2o_device_parse_lct(c) == -EAGAIN)
-               i2o_exec_lct_notify(c, 0);
+       struct i2o_exec_lct_notify_work *work =
+               container_of(_work, struct i2o_exec_lct_notify_work, work);
+       u32 change_ind = 0;
+       struct i2o_controller *c = work->c;
+
+       kfree(work);
+
+       if (i2o_device_parse_lct(c) != -EAGAIN)
+               change_ind = c->lct->change_ind + 1;
+
+#ifdef CONFIG_I2O_LCT_NOTIFY_ON_CHANGES
+       i2o_exec_lct_notify(c, change_ind);
+#endif
 };
 
 /**
@@ -322,28 +407,33 @@ static void i2o_exec_lct_modified(struct i2o_controller *c)
 static int i2o_exec_reply(struct i2o_controller *c, u32 m,
                          struct i2o_message *msg)
 {
-       if (readl(&msg->u.head[0]) & MSG_FAIL) {        // Fail bit is set
-               struct i2o_message *pmsg;       /* preserved message */
+       u32 context;
+
+       if (le32_to_cpu(msg->u.head[0]) & MSG_FAIL) {
+               struct i2o_message __iomem *pmsg;
                u32 pm;
 
-               pm = readl(&msg->body[3]);
+               /*
+                * If Fail bit is set we must take the transaction context of
+                * the preserved message to find the right request again.
+                */
 
-               pmsg = c->in_queue.virt + pm;
+               pm = le32_to_cpu(msg->body[3]);
+               pmsg = i2o_msg_in_to_virt(c, pm);
+               context = readl(&pmsg->u.s.tcntxt);
 
                i2o_report_status(KERN_INFO, "i2o_core", msg);
 
-               /* Release the preserved msg by resubmitting it as a NOP */
-               i2o_msg_nop(c, pm);
-
-               /* If reply to i2o_post_wait failed, return causes a timeout */
-               return -1;
-       }
+               /* Release the preserved msg */
+               i2o_msg_nop_mfa(c, pm);
+       } else
+               context = le32_to_cpu(msg->u.s.tcntxt);
 
-       if (readl(&msg->u.s.tcntxt) & 0x80000000)
-               return i2o_msg_post_wait_complete(c, m, msg);
+       if (context & 0x80000000)
+               return i2o_msg_post_wait_complete(c, m, msg, context);
 
-       if ((readl(&msg->u.head[1]) >> 24) == I2O_CMD_LCT_NOTIFY) {
-               struct work_struct *work;
+       if ((le32_to_cpu(msg->u.head[1]) >> 24) == I2O_CMD_LCT_NOTIFY) {
+               struct i2o_exec_lct_notify_work *work;
 
                pr_debug("%s: LCT notify received\n", c->name);
 
@@ -351,8 +441,10 @@ static int i2o_exec_reply(struct i2o_controller *c, u32 m,
                if (!work)
                        return -ENOMEM;
 
-               INIT_WORK(work, (void (*)(void *))i2o_exec_lct_modified, c);
-               queue_work(i2o_exec_driver.event_queue, work);
+               work->c = c;
+
+               INIT_WORK(&work->work, i2o_exec_lct_modified);
+               queue_work(i2o_exec_driver.event_queue, &work->work);
                return 1;
        }
 
@@ -371,15 +463,18 @@ static int i2o_exec_reply(struct i2o_controller *c, u32 m,
 
 /**
  *     i2o_exec_event - Event handling function
- *     @evt: Event which occurs
+ *     @work: Work item in occurring event
  *
  *     Handles events send by the Executive device. At the moment does not do
  *     anything useful.
  */
-static void i2o_exec_event(struct i2o_event *evt)
+static void i2o_exec_event(struct work_struct *work)
 {
-       printk(KERN_INFO "Event received from device: %d\n",
-              evt->i2o_dev->lct_data.tid);
+       struct i2o_event *evt = container_of(work, struct i2o_event, work);
+
+       if (likely(evt->i2o_dev))
+               osm_debug("Event received from device: %d\n",
+                         evt->i2o_dev->lct_data.tid);
        kfree(evt);
 };
 
@@ -396,24 +491,25 @@ static void i2o_exec_event(struct i2o_event *evt)
 int i2o_exec_lct_get(struct i2o_controller *c)
 {
        struct i2o_message *msg;
-       u32 m;
        int i = 0;
        int rc = -EAGAIN;
 
        for (i = 1; i <= I2O_LCT_GET_TRIES; i++) {
-               m = i2o_msg_get_wait(c, &msg, I2O_TIMEOUT_MESSAGE_GET);
-               if (m == I2O_QUEUE_EMPTY)
-                       return -ETIMEDOUT;
-
-               writel(EIGHT_WORD_MSG_SIZE | SGL_OFFSET_6, &msg->u.head[0]);
-               writel(I2O_CMD_LCT_NOTIFY << 24 | HOST_TID << 12 | ADAPTER_TID,
-                      &msg->u.head[1]);
-               writel(0xffffffff, &msg->body[0]);
-               writel(0x00000000, &msg->body[1]);
-               writel(0xd0000000 | c->dlct.len, &msg->body[2]);
-               writel(c->dlct.phys, &msg->body[3]);
-
-               rc = i2o_msg_post_wait(c, m, I2O_TIMEOUT_LCT_GET);
+               msg = i2o_msg_get_wait(c, I2O_TIMEOUT_MESSAGE_GET);
+               if (IS_ERR(msg))
+                       return PTR_ERR(msg);
+
+               msg->u.head[0] =
+                   cpu_to_le32(EIGHT_WORD_MSG_SIZE | SGL_OFFSET_6);
+               msg->u.head[1] =
+                   cpu_to_le32(I2O_CMD_LCT_NOTIFY << 24 | HOST_TID << 12 |
+                               ADAPTER_TID);
+               msg->body[0] = cpu_to_le32(0xffffffff);
+               msg->body[1] = cpu_to_le32(0x00000000);
+               msg->body[2] = cpu_to_le32(0xd0000000 | c->dlct.len);
+               msg->body[3] = cpu_to_le32(c->dlct.phys);
+
+               rc = i2o_msg_post_wait(c, msg, I2O_TIMEOUT_LCT_GET);
                if (rc < 0)
                        break;
 
@@ -435,40 +531,44 @@ int i2o_exec_lct_get(struct i2o_controller *c)
  *     replies immediately after the request. If change_ind > 0 the reply is
  *     send after change indicator of the LCT is > change_ind.
  */
-int i2o_exec_lct_notify(struct i2o_controller *c, u32 change_ind)
+static int i2o_exec_lct_notify(struct i2o_controller *c, u32 change_ind)
 {
        i2o_status_block *sb = c->status_block.virt;
        struct device *dev;
        struct i2o_message *msg;
-       u32 m;
+
+       down(&c->lct_lock);
 
        dev = &c->pdev->dev;
 
-       if (i2o_dma_realloc(dev, &c->dlct, sb->expected_lct_size, GFP_KERNEL))
+       if (i2o_dma_realloc
+           (dev, &c->dlct, le32_to_cpu(sb->expected_lct_size), GFP_KERNEL))
                return -ENOMEM;
 
-       m = i2o_msg_get_wait(c, &msg, I2O_TIMEOUT_MESSAGE_GET);
-       if (m == I2O_QUEUE_EMPTY)
-               return -ETIMEDOUT;
+       msg = i2o_msg_get_wait(c, I2O_TIMEOUT_MESSAGE_GET);
+       if (IS_ERR(msg))
+               return PTR_ERR(msg);
+
+       msg->u.head[0] = cpu_to_le32(EIGHT_WORD_MSG_SIZE | SGL_OFFSET_6);
+       msg->u.head[1] = cpu_to_le32(I2O_CMD_LCT_NOTIFY << 24 | HOST_TID << 12 |
+                                    ADAPTER_TID);
+       msg->u.s.icntxt = cpu_to_le32(i2o_exec_driver.context);
+       msg->u.s.tcntxt = cpu_to_le32(0x00000000);
+       msg->body[0] = cpu_to_le32(0xffffffff);
+       msg->body[1] = cpu_to_le32(change_ind);
+       msg->body[2] = cpu_to_le32(0xd0000000 | c->dlct.len);
+       msg->body[3] = cpu_to_le32(c->dlct.phys);
 
-       writel(EIGHT_WORD_MSG_SIZE | SGL_OFFSET_6, &msg->u.head[0]);
-       writel(I2O_CMD_LCT_NOTIFY << 24 | HOST_TID << 12 | ADAPTER_TID,
-              &msg->u.head[1]);
-       writel(i2o_exec_driver.context, &msg->u.s.icntxt);
-       writel(0, &msg->u.s.tcntxt);    /* FIXME */
-       writel(0xffffffff, &msg->body[0]);
-       writel(change_ind, &msg->body[1]);
-       writel(0xd0000000 | c->dlct.len, &msg->body[2]);
-       writel(c->dlct.phys, &msg->body[3]);
+       i2o_msg_post(c, msg);
 
-       i2o_msg_post(c, m);
+       up(&c->lct_lock);
 
        return 0;
 };
 
 /* Exec OSM driver struct */
 struct i2o_driver i2o_exec_driver = {
-       .name = "exec-osm",
+       .name = OSM_NAME,
        .reply = i2o_exec_reply,
        .event = i2o_exec_event,
        .classes = i2o_exec_class_id,
@@ -495,11 +595,10 @@ int __init i2o_exec_init(void)
  *
  *     Unregisters the Exec OSM from the I2O core.
  */
-void __exit i2o_exec_exit(void)
+void i2o_exec_exit(void)
 {
        i2o_driver_unregister(&i2o_exec_driver);
 };
 
 EXPORT_SYMBOL(i2o_msg_post_wait_mem);
 EXPORT_SYMBOL(i2o_exec_lct_get);
-EXPORT_SYMBOL(i2o_exec_lct_notify);