Merge /spare/repo/linux-2.6/
[linux-2.6] / drivers / message / i2o / i2o_config.c
1 /*
2  * I2O Configuration Interface Driver
3  *
4  * (C) Copyright 1999-2002  Red Hat
5  *
6  * Written by Alan Cox, Building Number Three Ltd
7  *
8  * Fixes/additions:
9  *      Deepak Saxena (04/20/1999):
10  *              Added basic ioctl() support
11  *      Deepak Saxena (06/07/1999):
12  *              Added software download ioctl (still testing)
13  *      Auvo Häkkinen (09/10/1999):
14  *              Changes to i2o_cfg_reply(), ioctl_parms()
15  *              Added ioct_validate()
16  *      Taneli Vähäkangas (09/30/1999):
17  *              Fixed ioctl_swdl()
18  *      Taneli Vähäkangas (10/04/1999):
19  *              Changed ioctl_swdl(), implemented ioctl_swul() and ioctl_swdel()
20  *      Deepak Saxena (11/18/1999):
21  *              Added event managmenet support
22  *      Alan Cox <alan@redhat.com>:
23  *              2.4 rewrite ported to 2.5
24  *      Markus Lidel <Markus.Lidel@shadowconnect.com>:
25  *              Added pass-thru support for Adaptec's raidutils
26  *
27  * This program is free software; you can redistribute it and/or
28  * modify it under the terms of the GNU General Public License
29  * as published by the Free Software Foundation; either version
30  * 2 of the License, or (at your option) any later version.
31  */
32
33 #include <linux/miscdevice.h>
34 #include <linux/smp_lock.h>
35 #include <linux/compat.h>
36
37 #include <asm/uaccess.h>
38
39 #include "core.h"
40
41 #define SG_TABLESIZE            30
42
43 static int i2o_cfg_ioctl(struct inode *inode, struct file *fp, unsigned int cmd,
44                          unsigned long arg);
45
46 static spinlock_t i2o_config_lock;
47
48 #define MODINC(x,y) ((x) = ((x) + 1) % (y))
49
50 struct sg_simple_element {
51         u32 flag_count;
52         u32 addr_bus;
53 };
54
55 struct i2o_cfg_info {
56         struct file *fp;
57         struct fasync_struct *fasync;
58         struct i2o_evt_info event_q[I2O_EVT_Q_LEN];
59         u16 q_in;               // Queue head index
60         u16 q_out;              // Queue tail index
61         u16 q_len;              // Queue length
62         u16 q_lost;             // Number of lost events
63         ulong q_id;             // Event queue ID...used as tx_context
64         struct i2o_cfg_info *next;
65 };
66 static struct i2o_cfg_info *open_files = NULL;
67 static ulong i2o_cfg_info_id = 0;
68
69 static int i2o_cfg_getiops(unsigned long arg)
70 {
71         struct i2o_controller *c;
72         u8 __user *user_iop_table = (void __user *)arg;
73         u8 tmp[MAX_I2O_CONTROLLERS];
74         int ret = 0;
75
76         memset(tmp, 0, MAX_I2O_CONTROLLERS);
77
78         list_for_each_entry(c, &i2o_controllers, list)
79             tmp[c->unit] = 1;
80
81         if (copy_to_user(user_iop_table, tmp, MAX_I2O_CONTROLLERS))
82                 ret = -EFAULT;
83
84         return ret;
85 };
86
87 static int i2o_cfg_gethrt(unsigned long arg)
88 {
89         struct i2o_controller *c;
90         struct i2o_cmd_hrtlct __user *cmd = (struct i2o_cmd_hrtlct __user *)arg;
91         struct i2o_cmd_hrtlct kcmd;
92         i2o_hrt *hrt;
93         int len;
94         u32 reslen;
95         int ret = 0;
96
97         if (copy_from_user(&kcmd, cmd, sizeof(struct i2o_cmd_hrtlct)))
98                 return -EFAULT;
99
100         if (get_user(reslen, kcmd.reslen) < 0)
101                 return -EFAULT;
102
103         if (kcmd.resbuf == NULL)
104                 return -EFAULT;
105
106         c = i2o_find_iop(kcmd.iop);
107         if (!c)
108                 return -ENXIO;
109
110         hrt = (i2o_hrt *) c->hrt.virt;
111
112         len = 8 + ((hrt->entry_len * hrt->num_entries) << 2);
113
114         /* We did a get user...so assuming mem is ok...is this bad? */
115         put_user(len, kcmd.reslen);
116         if (len > reslen)
117                 ret = -ENOBUFS;
118         if (copy_to_user(kcmd.resbuf, (void *)hrt, len))
119                 ret = -EFAULT;
120
121         return ret;
122 };
123
124 static int i2o_cfg_getlct(unsigned long arg)
125 {
126         struct i2o_controller *c;
127         struct i2o_cmd_hrtlct __user *cmd = (struct i2o_cmd_hrtlct __user *)arg;
128         struct i2o_cmd_hrtlct kcmd;
129         i2o_lct *lct;
130         int len;
131         int ret = 0;
132         u32 reslen;
133
134         if (copy_from_user(&kcmd, cmd, sizeof(struct i2o_cmd_hrtlct)))
135                 return -EFAULT;
136
137         if (get_user(reslen, kcmd.reslen) < 0)
138                 return -EFAULT;
139
140         if (kcmd.resbuf == NULL)
141                 return -EFAULT;
142
143         c = i2o_find_iop(kcmd.iop);
144         if (!c)
145                 return -ENXIO;
146
147         lct = (i2o_lct *) c->lct;
148
149         len = (unsigned int)lct->table_size << 2;
150         put_user(len, kcmd.reslen);
151         if (len > reslen)
152                 ret = -ENOBUFS;
153         else if (copy_to_user(kcmd.resbuf, lct, len))
154                 ret = -EFAULT;
155
156         return ret;
157 };
158
159 static int i2o_cfg_parms(unsigned long arg, unsigned int type)
160 {
161         int ret = 0;
162         struct i2o_controller *c;
163         struct i2o_device *dev;
164         struct i2o_cmd_psetget __user *cmd =
165             (struct i2o_cmd_psetget __user *)arg;
166         struct i2o_cmd_psetget kcmd;
167         u32 reslen;
168         u8 *ops;
169         u8 *res;
170         int len = 0;
171
172         u32 i2o_cmd = (type == I2OPARMGET ?
173                        I2O_CMD_UTIL_PARAMS_GET : I2O_CMD_UTIL_PARAMS_SET);
174
175         if (copy_from_user(&kcmd, cmd, sizeof(struct i2o_cmd_psetget)))
176                 return -EFAULT;
177
178         if (get_user(reslen, kcmd.reslen))
179                 return -EFAULT;
180
181         c = i2o_find_iop(kcmd.iop);
182         if (!c)
183                 return -ENXIO;
184
185         dev = i2o_iop_find_device(c, kcmd.tid);
186         if (!dev)
187                 return -ENXIO;
188
189         ops = (u8 *) kmalloc(kcmd.oplen, GFP_KERNEL);
190         if (!ops)
191                 return -ENOMEM;
192
193         if (copy_from_user(ops, kcmd.opbuf, kcmd.oplen)) {
194                 kfree(ops);
195                 return -EFAULT;
196         }
197
198         /*
199          * It's possible to have a _very_ large table
200          * and that the user asks for all of it at once...
201          */
202         res = (u8 *) kmalloc(65536, GFP_KERNEL);
203         if (!res) {
204                 kfree(ops);
205                 return -ENOMEM;
206         }
207
208         len = i2o_parm_issue(dev, i2o_cmd, ops, kcmd.oplen, res, 65536);
209         kfree(ops);
210
211         if (len < 0) {
212                 kfree(res);
213                 return -EAGAIN;
214         }
215
216         put_user(len, kcmd.reslen);
217         if (len > reslen)
218                 ret = -ENOBUFS;
219         else if (copy_to_user(kcmd.resbuf, res, len))
220                 ret = -EFAULT;
221
222         kfree(res);
223
224         return ret;
225 };
226
227 static int i2o_cfg_swdl(unsigned long arg)
228 {
229         struct i2o_sw_xfer kxfer;
230         struct i2o_sw_xfer __user *pxfer = (struct i2o_sw_xfer __user *)arg;
231         unsigned char maxfrag = 0, curfrag = 1;
232         struct i2o_dma buffer;
233         struct i2o_message __iomem *msg;
234         u32 m;
235         unsigned int status = 0, swlen = 0, fragsize = 8192;
236         struct i2o_controller *c;
237
238         if (copy_from_user(&kxfer, pxfer, sizeof(struct i2o_sw_xfer)))
239                 return -EFAULT;
240
241         if (get_user(swlen, kxfer.swlen) < 0)
242                 return -EFAULT;
243
244         if (get_user(maxfrag, kxfer.maxfrag) < 0)
245                 return -EFAULT;
246
247         if (get_user(curfrag, kxfer.curfrag) < 0)
248                 return -EFAULT;
249
250         if (curfrag == maxfrag)
251                 fragsize = swlen - (maxfrag - 1) * 8192;
252
253         if (!kxfer.buf || !access_ok(VERIFY_READ, kxfer.buf, fragsize))
254                 return -EFAULT;
255
256         c = i2o_find_iop(kxfer.iop);
257         if (!c)
258                 return -ENXIO;
259
260         m = i2o_msg_get_wait(c, &msg, I2O_TIMEOUT_MESSAGE_GET);
261         if (m == I2O_QUEUE_EMPTY)
262                 return -EBUSY;
263
264         if (i2o_dma_alloc(&c->pdev->dev, &buffer, fragsize, GFP_KERNEL)) {
265                 i2o_msg_nop(c, m);
266                 return -ENOMEM;
267         }
268
269         __copy_from_user(buffer.virt, kxfer.buf, fragsize);
270
271         writel(NINE_WORD_MSG_SIZE | SGL_OFFSET_7, &msg->u.head[0]);
272         writel(I2O_CMD_SW_DOWNLOAD << 24 | HOST_TID << 12 | ADAPTER_TID,
273                &msg->u.head[1]);
274         writel(i2o_config_driver.context, &msg->u.head[2]);
275         writel(0, &msg->u.head[3]);
276         writel((((u32) kxfer.flags) << 24) | (((u32) kxfer.sw_type) << 16) |
277                (((u32) maxfrag) << 8) | (((u32) curfrag)), &msg->body[0]);
278         writel(swlen, &msg->body[1]);
279         writel(kxfer.sw_id, &msg->body[2]);
280         writel(0xD0000000 | fragsize, &msg->body[3]);
281         writel(buffer.phys, &msg->body[4]);
282
283         osm_debug("swdl frag %d/%d (size %d)\n", curfrag, maxfrag, fragsize);
284         status = i2o_msg_post_wait_mem(c, m, 60, &buffer);
285
286         if (status != -ETIMEDOUT)
287                 i2o_dma_free(&c->pdev->dev, &buffer);
288
289         if (status != I2O_POST_WAIT_OK) {
290                 // it fails if you try and send frags out of order
291                 // and for some yet unknown reasons too
292                 osm_info("swdl failed, DetailedStatus = %d\n", status);
293                 return status;
294         }
295
296         return 0;
297 };
298
299 static int i2o_cfg_swul(unsigned long arg)
300 {
301         struct i2o_sw_xfer kxfer;
302         struct i2o_sw_xfer __user *pxfer = (struct i2o_sw_xfer __user *)arg;
303         unsigned char maxfrag = 0, curfrag = 1;
304         struct i2o_dma buffer;
305         struct i2o_message __iomem *msg;
306         u32 m;
307         unsigned int status = 0, swlen = 0, fragsize = 8192;
308         struct i2o_controller *c;
309         int ret = 0;
310
311         if (copy_from_user(&kxfer, pxfer, sizeof(struct i2o_sw_xfer)))
312                 goto return_fault;
313
314         if (get_user(swlen, kxfer.swlen) < 0)
315                 goto return_fault;
316
317         if (get_user(maxfrag, kxfer.maxfrag) < 0)
318                 goto return_fault;
319
320         if (get_user(curfrag, kxfer.curfrag) < 0)
321                 goto return_fault;
322
323         if (curfrag == maxfrag)
324                 fragsize = swlen - (maxfrag - 1) * 8192;
325
326         if (!kxfer.buf)
327                 goto return_fault;
328
329         c = i2o_find_iop(kxfer.iop);
330         if (!c)
331                 return -ENXIO;
332
333         m = i2o_msg_get_wait(c, &msg, I2O_TIMEOUT_MESSAGE_GET);
334         if (m == I2O_QUEUE_EMPTY)
335                 return -EBUSY;
336
337         if (i2o_dma_alloc(&c->pdev->dev, &buffer, fragsize, GFP_KERNEL)) {
338                 i2o_msg_nop(c, m);
339                 return -ENOMEM;
340         }
341
342         writel(NINE_WORD_MSG_SIZE | SGL_OFFSET_7, &msg->u.head[0]);
343         writel(I2O_CMD_SW_UPLOAD << 24 | HOST_TID << 12 | ADAPTER_TID,
344                &msg->u.head[1]);
345         writel(i2o_config_driver.context, &msg->u.head[2]);
346         writel(0, &msg->u.head[3]);
347         writel((u32) kxfer.flags << 24 | (u32) kxfer.
348                sw_type << 16 | (u32) maxfrag << 8 | (u32) curfrag,
349                &msg->body[0]);
350         writel(swlen, &msg->body[1]);
351         writel(kxfer.sw_id, &msg->body[2]);
352         writel(0xD0000000 | fragsize, &msg->body[3]);
353         writel(buffer.phys, &msg->body[4]);
354
355         osm_debug("swul frag %d/%d (size %d)\n", curfrag, maxfrag, fragsize);
356         status = i2o_msg_post_wait_mem(c, m, 60, &buffer);
357
358         if (status != I2O_POST_WAIT_OK) {
359                 if (status != -ETIMEDOUT)
360                         i2o_dma_free(&c->pdev->dev, &buffer);
361
362                 osm_info("swul failed, DetailedStatus = %d\n", status);
363                 return status;
364         }
365
366         if (copy_to_user(kxfer.buf, buffer.virt, fragsize))
367                 ret = -EFAULT;
368
369         i2o_dma_free(&c->pdev->dev, &buffer);
370
371       return_ret:
372         return ret;
373       return_fault:
374         ret = -EFAULT;
375         goto return_ret;
376 };
377
378 static int i2o_cfg_swdel(unsigned long arg)
379 {
380         struct i2o_controller *c;
381         struct i2o_sw_xfer kxfer;
382         struct i2o_sw_xfer __user *pxfer = (struct i2o_sw_xfer __user *)arg;
383         struct i2o_message __iomem *msg;
384         u32 m;
385         unsigned int swlen;
386         int token;
387
388         if (copy_from_user(&kxfer, pxfer, sizeof(struct i2o_sw_xfer)))
389                 return -EFAULT;
390
391         if (get_user(swlen, kxfer.swlen) < 0)
392                 return -EFAULT;
393
394         c = i2o_find_iop(kxfer.iop);
395         if (!c)
396                 return -ENXIO;
397
398         m = i2o_msg_get_wait(c, &msg, I2O_TIMEOUT_MESSAGE_GET);
399         if (m == I2O_QUEUE_EMPTY)
400                 return -EBUSY;
401
402         writel(SEVEN_WORD_MSG_SIZE | SGL_OFFSET_0, &msg->u.head[0]);
403         writel(I2O_CMD_SW_REMOVE << 24 | HOST_TID << 12 | ADAPTER_TID,
404                &msg->u.head[1]);
405         writel(i2o_config_driver.context, &msg->u.head[2]);
406         writel(0, &msg->u.head[3]);
407         writel((u32) kxfer.flags << 24 | (u32) kxfer.sw_type << 16,
408                &msg->body[0]);
409         writel(swlen, &msg->body[1]);
410         writel(kxfer.sw_id, &msg->body[2]);
411
412         token = i2o_msg_post_wait(c, m, 10);
413
414         if (token != I2O_POST_WAIT_OK) {
415                 osm_info("swdel failed, DetailedStatus = %d\n", token);
416                 return -ETIMEDOUT;
417         }
418
419         return 0;
420 };
421
422 static int i2o_cfg_validate(unsigned long arg)
423 {
424         int token;
425         int iop = (int)arg;
426         struct i2o_message __iomem *msg;
427         u32 m;
428         struct i2o_controller *c;
429
430         c = i2o_find_iop(iop);
431         if (!c)
432                 return -ENXIO;
433
434         m = i2o_msg_get_wait(c, &msg, I2O_TIMEOUT_MESSAGE_GET);
435         if (m == I2O_QUEUE_EMPTY)
436                 return -EBUSY;
437
438         writel(FOUR_WORD_MSG_SIZE | SGL_OFFSET_0, &msg->u.head[0]);
439         writel(I2O_CMD_CONFIG_VALIDATE << 24 | HOST_TID << 12 | iop,
440                &msg->u.head[1]);
441         writel(i2o_config_driver.context, &msg->u.head[2]);
442         writel(0, &msg->u.head[3]);
443
444         token = i2o_msg_post_wait(c, m, 10);
445
446         if (token != I2O_POST_WAIT_OK) {
447                 osm_info("Can't validate configuration, ErrorStatus = %d\n",
448                          token);
449                 return -ETIMEDOUT;
450         }
451
452         return 0;
453 };
454
455 static int i2o_cfg_evt_reg(unsigned long arg, struct file *fp)
456 {
457         struct i2o_message __iomem *msg;
458         u32 m;
459         struct i2o_evt_id __user *pdesc = (struct i2o_evt_id __user *)arg;
460         struct i2o_evt_id kdesc;
461         struct i2o_controller *c;
462         struct i2o_device *d;
463
464         if (copy_from_user(&kdesc, pdesc, sizeof(struct i2o_evt_id)))
465                 return -EFAULT;
466
467         /* IOP exists? */
468         c = i2o_find_iop(kdesc.iop);
469         if (!c)
470                 return -ENXIO;
471
472         /* Device exists? */
473         d = i2o_iop_find_device(c, kdesc.tid);
474         if (!d)
475                 return -ENODEV;
476
477         m = i2o_msg_get_wait(c, &msg, I2O_TIMEOUT_MESSAGE_GET);
478         if (m == I2O_QUEUE_EMPTY)
479                 return -EBUSY;
480
481         writel(FOUR_WORD_MSG_SIZE | SGL_OFFSET_0, &msg->u.head[0]);
482         writel(I2O_CMD_UTIL_EVT_REGISTER << 24 | HOST_TID << 12 | kdesc.tid,
483                &msg->u.head[1]);
484         writel(i2o_config_driver.context, &msg->u.head[2]);
485         writel(i2o_cntxt_list_add(c, fp->private_data), &msg->u.head[3]);
486         writel(kdesc.evt_mask, &msg->body[0]);
487
488         i2o_msg_post(c, m);
489
490         return 0;
491 }
492
493 static int i2o_cfg_evt_get(unsigned long arg, struct file *fp)
494 {
495         struct i2o_cfg_info *p = NULL;
496         struct i2o_evt_get __user *uget = (struct i2o_evt_get __user *)arg;
497         struct i2o_evt_get kget;
498         unsigned long flags;
499
500         for (p = open_files; p; p = p->next)
501                 if (p->q_id == (ulong) fp->private_data)
502                         break;
503
504         if (!p->q_len)
505                 return -ENOENT;
506
507         memcpy(&kget.info, &p->event_q[p->q_out], sizeof(struct i2o_evt_info));
508         MODINC(p->q_out, I2O_EVT_Q_LEN);
509         spin_lock_irqsave(&i2o_config_lock, flags);
510         p->q_len--;
511         kget.pending = p->q_len;
512         kget.lost = p->q_lost;
513         spin_unlock_irqrestore(&i2o_config_lock, flags);
514
515         if (copy_to_user(uget, &kget, sizeof(struct i2o_evt_get)))
516                 return -EFAULT;
517         return 0;
518 }
519
520 #ifdef CONFIG_I2O_EXT_ADAPTEC
521 #ifdef CONFIG_COMPAT
522 static int i2o_cfg_passthru32(struct file *file, unsigned cmnd,
523                               unsigned long arg)
524 {
525         struct i2o_cmd_passthru32 __user *cmd;
526         struct i2o_controller *c;
527         u32 __user *user_msg;
528         u32 *reply = NULL;
529         u32 __user *user_reply = NULL;
530         u32 size = 0;
531         u32 reply_size = 0;
532         u32 rcode = 0;
533         struct i2o_dma sg_list[SG_TABLESIZE];
534         u32 sg_offset = 0;
535         u32 sg_count = 0;
536         u32 i = 0;
537         u32 sg_index = 0;
538         i2o_status_block *sb;
539         struct i2o_message *msg;
540         u32 m;
541         unsigned int iop;
542
543         cmd = (struct i2o_cmd_passthru32 __user *)arg;
544
545         if (get_user(iop, &cmd->iop) || get_user(i, &cmd->msg))
546                 return -EFAULT;
547
548         user_msg = compat_ptr(i);
549
550         c = i2o_find_iop(iop);
551         if (!c) {
552                 osm_debug("controller %d not found\n", iop);
553                 return -ENXIO;
554         }
555
556         m = i2o_msg_get_wait(c, &msg, I2O_TIMEOUT_MESSAGE_GET);
557
558         sb = c->status_block.virt;
559
560         if (get_user(size, &user_msg[0])) {
561                 osm_warn("unable to get size!\n");
562                 return -EFAULT;
563         }
564         size = size >> 16;
565
566         if (size > sb->inbound_frame_size) {
567                 osm_warn("size of message > inbound_frame_size");
568                 return -EFAULT;
569         }
570
571         user_reply = &user_msg[size];
572
573         size <<= 2;             // Convert to bytes
574
575         /* Copy in the user's I2O command */
576         if (copy_from_user(msg, user_msg, size)) {
577                 osm_warn("unable to copy user message\n");
578                 return -EFAULT;
579         }
580         i2o_dump_message(msg);
581
582         if (get_user(reply_size, &user_reply[0]) < 0)
583                 return -EFAULT;
584
585         reply_size >>= 16;
586         reply_size <<= 2;
587
588         reply = kmalloc(reply_size, GFP_KERNEL);
589         if (!reply) {
590                 printk(KERN_WARNING "%s: Could not allocate reply buffer\n",
591                        c->name);
592                 return -ENOMEM;
593         }
594         memset(reply, 0, reply_size);
595
596         sg_offset = (msg->u.head[0] >> 4) & 0x0f;
597
598         writel(i2o_config_driver.context, &msg->u.s.icntxt);
599         writel(i2o_cntxt_list_add(c, reply), &msg->u.s.tcntxt);
600
601         memset(sg_list, 0, sizeof(sg_list[0]) * SG_TABLESIZE);
602         if (sg_offset) {
603                 struct sg_simple_element *sg;
604
605                 if (sg_offset * 4 >= size) {
606                         rcode = -EFAULT;
607                         goto cleanup;
608                 }
609                 // TODO 64bit fix
610                 sg = (struct sg_simple_element *)((&msg->u.head[0]) +
611                                                   sg_offset);
612                 sg_count =
613                     (size - sg_offset * 4) / sizeof(struct sg_simple_element);
614                 if (sg_count > SG_TABLESIZE) {
615                         printk(KERN_DEBUG "%s:IOCTL SG List too large (%u)\n",
616                                c->name, sg_count);
617                         rcode = -EINVAL;
618                         goto cleanup;
619                 }
620
621                 for (i = 0; i < sg_count; i++) {
622                         int sg_size;
623                         struct i2o_dma *p;
624
625                         if (!(sg[i].flag_count & 0x10000000
626                               /*I2O_SGL_FLAGS_SIMPLE_ADDRESS_ELEMENT */ )) {
627                                 printk(KERN_DEBUG
628                                        "%s:Bad SG element %d - not simple (%x)\n",
629                                        c->name, i, sg[i].flag_count);
630                                 rcode = -EINVAL;
631                                 goto cleanup;
632                         }
633                         sg_size = sg[i].flag_count & 0xffffff;
634                         p = &(sg_list[sg_index++]);
635                         /* Allocate memory for the transfer */
636                         if (i2o_dma_alloc
637                             (&c->pdev->dev, p, sg_size,
638                              PCI_DMA_BIDIRECTIONAL)) {
639                                 printk(KERN_DEBUG
640                                        "%s: Could not allocate SG buffer - size = %d buffer number %d of %d\n",
641                                        c->name, sg_size, i, sg_count);
642                                 rcode = -ENOMEM;
643                                 goto sg_list_cleanup;
644                         }
645                         /* Copy in the user's SG buffer if necessary */
646                         if (sg[i].
647                             flag_count & 0x04000000 /*I2O_SGL_FLAGS_DIR */ ) {
648                                 // TODO 64bit fix
649                                 if (copy_from_user
650                                     (p->virt,
651                                      (void __user *)(unsigned long)sg[i].
652                                      addr_bus, sg_size)) {
653                                         printk(KERN_DEBUG
654                                                "%s: Could not copy SG buf %d FROM user\n",
655                                                c->name, i);
656                                         rcode = -EFAULT;
657                                         goto sg_list_cleanup;
658                                 }
659                         }
660                         //TODO 64bit fix
661                         sg[i].addr_bus = (u32) p->phys;
662                 }
663         }
664
665         rcode = i2o_msg_post_wait(c, m, 60);
666         if (rcode)
667                 goto sg_list_cleanup;
668
669         if (sg_offset) {
670                 u32 msg[I2O_OUTBOUND_MSG_FRAME_SIZE];
671                 /* Copy back the Scatter Gather buffers back to user space */
672                 u32 j;
673                 // TODO 64bit fix
674                 struct sg_simple_element *sg;
675                 int sg_size;
676
677                 // re-acquire the original message to handle correctly the sg copy operation
678                 memset(&msg, 0, I2O_OUTBOUND_MSG_FRAME_SIZE * 4);
679                 // get user msg size in u32s
680                 if (get_user(size, &user_msg[0])) {
681                         rcode = -EFAULT;
682                         goto sg_list_cleanup;
683                 }
684                 size = size >> 16;
685                 size *= 4;
686                 /* Copy in the user's I2O command */
687                 if (copy_from_user(msg, user_msg, size)) {
688                         rcode = -EFAULT;
689                         goto sg_list_cleanup;
690                 }
691                 sg_count =
692                     (size - sg_offset * 4) / sizeof(struct sg_simple_element);
693
694                 // TODO 64bit fix
695                 sg = (struct sg_simple_element *)(msg + sg_offset);
696                 for (j = 0; j < sg_count; j++) {
697                         /* Copy out the SG list to user's buffer if necessary */
698                         if (!
699                             (sg[j].
700                              flag_count & 0x4000000 /*I2O_SGL_FLAGS_DIR */ )) {
701                                 sg_size = sg[j].flag_count & 0xffffff;
702                                 // TODO 64bit fix
703                                 if (copy_to_user
704                                     ((void __user *)(u64) sg[j].addr_bus,
705                                      sg_list[j].virt, sg_size)) {
706                                         printk(KERN_WARNING
707                                                "%s: Could not copy %p TO user %x\n",
708                                                c->name, sg_list[j].virt,
709                                                sg[j].addr_bus);
710                                         rcode = -EFAULT;
711                                         goto sg_list_cleanup;
712                                 }
713                         }
714                 }
715         }
716
717         /* Copy back the reply to user space */
718         if (reply_size) {
719                 // we wrote our own values for context - now restore the user supplied ones
720                 if (copy_from_user(reply + 2, user_msg + 2, sizeof(u32) * 2)) {
721                         printk(KERN_WARNING
722                                "%s: Could not copy message context FROM user\n",
723                                c->name);
724                         rcode = -EFAULT;
725                         goto sg_list_cleanup;
726                 }
727                 if (copy_to_user(user_reply, reply, reply_size)) {
728                         printk(KERN_WARNING
729                                "%s: Could not copy reply TO user\n", c->name);
730                         rcode = -EFAULT;
731                 }
732         }
733
734       sg_list_cleanup:
735         for (i = 0; i < sg_index; i++)
736                 i2o_dma_free(&c->pdev->dev, &sg_list[i]);
737
738       cleanup:
739         kfree(reply);
740         return rcode;
741 }
742
743 static long i2o_cfg_compat_ioctl(struct file *file, unsigned cmd,
744                                  unsigned long arg)
745 {
746         int ret;
747         lock_kernel();
748         switch (cmd) {
749         case I2OGETIOPS:
750                 ret = i2o_cfg_ioctl(NULL, file, cmd, arg);
751                 break;
752         case I2OPASSTHRU32:
753                 ret = i2o_cfg_passthru32(file, cmd, arg);
754                 break;
755         default:
756                 ret = -ENOIOCTLCMD;
757                 break;
758         }
759         unlock_kernel();
760         return ret;
761 }
762
763 #endif
764
765 static int i2o_cfg_passthru(unsigned long arg)
766 {
767         struct i2o_cmd_passthru __user *cmd =
768             (struct i2o_cmd_passthru __user *)arg;
769         struct i2o_controller *c;
770         u32 __user *user_msg;
771         u32 *reply = NULL;
772         u32 __user *user_reply = NULL;
773         u32 size = 0;
774         u32 reply_size = 0;
775         u32 rcode = 0;
776         void *sg_list[SG_TABLESIZE];
777         u32 sg_offset = 0;
778         u32 sg_count = 0;
779         int sg_index = 0;
780         u32 i = 0;
781         void *p = NULL;
782         i2o_status_block *sb;
783         struct i2o_message __iomem *msg;
784         u32 m;
785         unsigned int iop;
786
787         if (get_user(iop, &cmd->iop) || get_user(user_msg, &cmd->msg))
788                 return -EFAULT;
789
790         c = i2o_find_iop(iop);
791         if (!c) {
792                 osm_warn("controller %d not found\n", iop);
793                 return -ENXIO;
794         }
795
796         m = i2o_msg_get_wait(c, &msg, I2O_TIMEOUT_MESSAGE_GET);
797
798         sb = c->status_block.virt;
799
800         if (get_user(size, &user_msg[0]))
801                 return -EFAULT;
802         size = size >> 16;
803
804         if (size > sb->inbound_frame_size) {
805                 osm_warn("size of message > inbound_frame_size");
806                 return -EFAULT;
807         }
808
809         user_reply = &user_msg[size];
810
811         size <<= 2;             // Convert to bytes
812
813         /* Copy in the user's I2O command */
814         if (copy_from_user(msg, user_msg, size))
815                 return -EFAULT;
816
817         if (get_user(reply_size, &user_reply[0]) < 0)
818                 return -EFAULT;
819
820         reply_size >>= 16;
821         reply_size <<= 2;
822
823         reply = kmalloc(reply_size, GFP_KERNEL);
824         if (!reply) {
825                 printk(KERN_WARNING "%s: Could not allocate reply buffer\n",
826                        c->name);
827                 return -ENOMEM;
828         }
829         memset(reply, 0, reply_size);
830
831         sg_offset = (msg->u.head[0] >> 4) & 0x0f;
832
833         writel(i2o_config_driver.context, &msg->u.s.icntxt);
834         writel(i2o_cntxt_list_add(c, reply), &msg->u.s.tcntxt);
835
836         memset(sg_list, 0, sizeof(sg_list[0]) * SG_TABLESIZE);
837         if (sg_offset) {
838                 struct sg_simple_element *sg;
839
840                 if (sg_offset * 4 >= size) {
841                         rcode = -EFAULT;
842                         goto cleanup;
843                 }
844                 // TODO 64bit fix
845                 sg = (struct sg_simple_element *)((&msg->u.head[0]) +
846                                                   sg_offset);
847                 sg_count =
848                     (size - sg_offset * 4) / sizeof(struct sg_simple_element);
849                 if (sg_count > SG_TABLESIZE) {
850                         printk(KERN_DEBUG "%s:IOCTL SG List too large (%u)\n",
851                                c->name, sg_count);
852                         rcode = -EINVAL;
853                         goto cleanup;
854                 }
855
856                 for (i = 0; i < sg_count; i++) {
857                         int sg_size;
858
859                         if (!(sg[i].flag_count & 0x10000000
860                               /*I2O_SGL_FLAGS_SIMPLE_ADDRESS_ELEMENT */ )) {
861                                 printk(KERN_DEBUG
862                                        "%s:Bad SG element %d - not simple (%x)\n",
863                                        c->name, i, sg[i].flag_count);
864                                 rcode = -EINVAL;
865                                 goto sg_list_cleanup;
866                         }
867                         sg_size = sg[i].flag_count & 0xffffff;
868                         /* Allocate memory for the transfer */
869                         p = kmalloc(sg_size, GFP_KERNEL);
870                         if (!p) {
871                                 printk(KERN_DEBUG
872                                        "%s: Could not allocate SG buffer - size = %d buffer number %d of %d\n",
873                                        c->name, sg_size, i, sg_count);
874                                 rcode = -ENOMEM;
875                                 goto sg_list_cleanup;
876                         }
877                         sg_list[sg_index++] = p;        // sglist indexed with input frame, not our internal frame.
878                         /* Copy in the user's SG buffer if necessary */
879                         if (sg[i].
880                             flag_count & 0x04000000 /*I2O_SGL_FLAGS_DIR */ ) {
881                                 // TODO 64bit fix
882                                 if (copy_from_user
883                                     (p, (void __user *)sg[i].addr_bus,
884                                      sg_size)) {
885                                         printk(KERN_DEBUG
886                                                "%s: Could not copy SG buf %d FROM user\n",
887                                                c->name, i);
888                                         rcode = -EFAULT;
889                                         goto sg_list_cleanup;
890                                 }
891                         }
892                         //TODO 64bit fix
893                         sg[i].addr_bus = virt_to_bus(p);
894                 }
895         }
896
897         rcode = i2o_msg_post_wait(c, m, 60);
898         if (rcode)
899                 goto sg_list_cleanup;
900
901         if (sg_offset) {
902                 u32 msg[128];
903                 /* Copy back the Scatter Gather buffers back to user space */
904                 u32 j;
905                 // TODO 64bit fix
906                 struct sg_simple_element *sg;
907                 int sg_size;
908
909                 // re-acquire the original message to handle correctly the sg copy operation
910                 memset(&msg, 0, I2O_OUTBOUND_MSG_FRAME_SIZE * 4);
911                 // get user msg size in u32s
912                 if (get_user(size, &user_msg[0])) {
913                         rcode = -EFAULT;
914                         goto sg_list_cleanup;
915                 }
916                 size = size >> 16;
917                 size *= 4;
918                 /* Copy in the user's I2O command */
919                 if (copy_from_user(msg, user_msg, size)) {
920                         rcode = -EFAULT;
921                         goto sg_list_cleanup;
922                 }
923                 sg_count =
924                     (size - sg_offset * 4) / sizeof(struct sg_simple_element);
925
926                 // TODO 64bit fix
927                 sg = (struct sg_simple_element *)(msg + sg_offset);
928                 for (j = 0; j < sg_count; j++) {
929                         /* Copy out the SG list to user's buffer if necessary */
930                         if (!
931                             (sg[j].
932                              flag_count & 0x4000000 /*I2O_SGL_FLAGS_DIR */ )) {
933                                 sg_size = sg[j].flag_count & 0xffffff;
934                                 // TODO 64bit fix
935                                 if (copy_to_user
936                                     ((void __user *)sg[j].addr_bus, sg_list[j],
937                                      sg_size)) {
938                                         printk(KERN_WARNING
939                                                "%s: Could not copy %p TO user %x\n",
940                                                c->name, sg_list[j],
941                                                sg[j].addr_bus);
942                                         rcode = -EFAULT;
943                                         goto sg_list_cleanup;
944                                 }
945                         }
946                 }
947         }
948
949         /* Copy back the reply to user space */
950         if (reply_size) {
951                 // we wrote our own values for context - now restore the user supplied ones
952                 if (copy_from_user(reply + 2, user_msg + 2, sizeof(u32) * 2)) {
953                         printk(KERN_WARNING
954                                "%s: Could not copy message context FROM user\n",
955                                c->name);
956                         rcode = -EFAULT;
957                 }
958                 if (copy_to_user(user_reply, reply, reply_size)) {
959                         printk(KERN_WARNING
960                                "%s: Could not copy reply TO user\n", c->name);
961                         rcode = -EFAULT;
962                 }
963         }
964
965       sg_list_cleanup:
966         for (i = 0; i < sg_index; i++)
967                 kfree(sg_list[i]);
968
969       cleanup:
970         kfree(reply);
971         return rcode;
972 }
973 #endif
974
975 /*
976  * IOCTL Handler
977  */
978 static int i2o_cfg_ioctl(struct inode *inode, struct file *fp, unsigned int cmd,
979                          unsigned long arg)
980 {
981         int ret;
982
983         switch (cmd) {
984         case I2OGETIOPS:
985                 ret = i2o_cfg_getiops(arg);
986                 break;
987
988         case I2OHRTGET:
989                 ret = i2o_cfg_gethrt(arg);
990                 break;
991
992         case I2OLCTGET:
993                 ret = i2o_cfg_getlct(arg);
994                 break;
995
996         case I2OPARMSET:
997                 ret = i2o_cfg_parms(arg, I2OPARMSET);
998                 break;
999
1000         case I2OPARMGET:
1001                 ret = i2o_cfg_parms(arg, I2OPARMGET);
1002                 break;
1003
1004         case I2OSWDL:
1005                 ret = i2o_cfg_swdl(arg);
1006                 break;
1007
1008         case I2OSWUL:
1009                 ret = i2o_cfg_swul(arg);
1010                 break;
1011
1012         case I2OSWDEL:
1013                 ret = i2o_cfg_swdel(arg);
1014                 break;
1015
1016         case I2OVALIDATE:
1017                 ret = i2o_cfg_validate(arg);
1018                 break;
1019
1020         case I2OEVTREG:
1021                 ret = i2o_cfg_evt_reg(arg, fp);
1022                 break;
1023
1024         case I2OEVTGET:
1025                 ret = i2o_cfg_evt_get(arg, fp);
1026                 break;
1027
1028 #ifdef CONFIG_I2O_EXT_ADAPTEC
1029         case I2OPASSTHRU:
1030                 ret = i2o_cfg_passthru(arg);
1031                 break;
1032 #endif
1033
1034         default:
1035                 osm_debug("unknown ioctl called!\n");
1036                 ret = -EINVAL;
1037         }
1038
1039         return ret;
1040 }
1041
1042 static int cfg_open(struct inode *inode, struct file *file)
1043 {
1044         struct i2o_cfg_info *tmp =
1045             (struct i2o_cfg_info *)kmalloc(sizeof(struct i2o_cfg_info),
1046                                            GFP_KERNEL);
1047         unsigned long flags;
1048
1049         if (!tmp)
1050                 return -ENOMEM;
1051
1052         file->private_data = (void *)(i2o_cfg_info_id++);
1053         tmp->fp = file;
1054         tmp->fasync = NULL;
1055         tmp->q_id = (ulong) file->private_data;
1056         tmp->q_len = 0;
1057         tmp->q_in = 0;
1058         tmp->q_out = 0;
1059         tmp->q_lost = 0;
1060         tmp->next = open_files;
1061
1062         spin_lock_irqsave(&i2o_config_lock, flags);
1063         open_files = tmp;
1064         spin_unlock_irqrestore(&i2o_config_lock, flags);
1065
1066         return 0;
1067 }
1068
1069 static int cfg_fasync(int fd, struct file *fp, int on)
1070 {
1071         ulong id = (ulong) fp->private_data;
1072         struct i2o_cfg_info *p;
1073
1074         for (p = open_files; p; p = p->next)
1075                 if (p->q_id == id)
1076                         break;
1077
1078         if (!p)
1079                 return -EBADF;
1080
1081         return fasync_helper(fd, fp, on, &p->fasync);
1082 }
1083
1084 static int cfg_release(struct inode *inode, struct file *file)
1085 {
1086         ulong id = (ulong) file->private_data;
1087         struct i2o_cfg_info *p1, *p2;
1088         unsigned long flags;
1089
1090         lock_kernel();
1091         p1 = p2 = NULL;
1092
1093         spin_lock_irqsave(&i2o_config_lock, flags);
1094         for (p1 = open_files; p1;) {
1095                 if (p1->q_id == id) {
1096
1097                         if (p1->fasync)
1098                                 cfg_fasync(-1, file, 0);
1099                         if (p2)
1100                                 p2->next = p1->next;
1101                         else
1102                                 open_files = p1->next;
1103
1104                         kfree(p1);
1105                         break;
1106                 }
1107                 p2 = p1;
1108                 p1 = p1->next;
1109         }
1110         spin_unlock_irqrestore(&i2o_config_lock, flags);
1111         unlock_kernel();
1112
1113         return 0;
1114 }
1115
1116 static struct file_operations config_fops = {
1117         .owner = THIS_MODULE,
1118         .llseek = no_llseek,
1119         .ioctl = i2o_cfg_ioctl,
1120 #ifdef CONFIG_COMPAT
1121         .compat_ioctl = i2o_cfg_compat_ioctl,
1122 #endif
1123         .open = cfg_open,
1124         .release = cfg_release,
1125         .fasync = cfg_fasync,
1126 };
1127
1128 static struct miscdevice i2o_miscdev = {
1129         I2O_MINOR,
1130         "i2octl",
1131         &config_fops
1132 };
1133
1134 static int __init i2o_config_old_init(void)
1135 {
1136         spin_lock_init(&i2o_config_lock);
1137
1138         if (misc_register(&i2o_miscdev) < 0) {
1139                 osm_err("can't register device.\n");
1140                 return -EBUSY;
1141         }
1142
1143         return 0;
1144 }
1145
1146 static void i2o_config_old_exit(void)
1147 {
1148         misc_deregister(&i2o_miscdev);
1149 }
1150
1151 MODULE_AUTHOR("Red Hat Software");