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