[PATCH] I2O: changed I2O API to create I2O messages in kernel memory
[powerpc.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/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 *msg;
234         unsigned int status = 0, swlen = 0, fragsize = 8192;
235         struct i2o_controller *c;
236
237         if (copy_from_user(&kxfer, pxfer, sizeof(struct i2o_sw_xfer)))
238                 return -EFAULT;
239
240         if (get_user(swlen, kxfer.swlen) < 0)
241                 return -EFAULT;
242
243         if (get_user(maxfrag, kxfer.maxfrag) < 0)
244                 return -EFAULT;
245
246         if (get_user(curfrag, kxfer.curfrag) < 0)
247                 return -EFAULT;
248
249         if (curfrag == maxfrag)
250                 fragsize = swlen - (maxfrag - 1) * 8192;
251
252         if (!kxfer.buf || !access_ok(VERIFY_READ, kxfer.buf, fragsize))
253                 return -EFAULT;
254
255         c = i2o_find_iop(kxfer.iop);
256         if (!c)
257                 return -ENXIO;
258
259         msg = i2o_msg_get_wait(c, I2O_TIMEOUT_MESSAGE_GET);
260         if (IS_ERR(msg))
261                 return PTR_ERR(msg);
262
263         if (i2o_dma_alloc(&c->pdev->dev, &buffer, fragsize, GFP_KERNEL)) {
264                 i2o_msg_nop(c, msg);
265                 return -ENOMEM;
266         }
267
268         __copy_from_user(buffer.virt, kxfer.buf, fragsize);
269
270         msg->u.head[0] = cpu_to_le32(NINE_WORD_MSG_SIZE | SGL_OFFSET_7);
271         msg->u.head[1] =
272             cpu_to_le32(I2O_CMD_SW_DOWNLOAD << 24 | HOST_TID << 12 |
273                         ADAPTER_TID);
274         msg->u.head[2] = cpu_to_le32(i2o_config_driver.context);
275         msg->u.head[3] = cpu_to_le32(0);
276         msg->body[0] =
277             cpu_to_le32((((u32) kxfer.flags) << 24) | (((u32) kxfer.
278                                                         sw_type) << 16) |
279                         (((u32) maxfrag) << 8) | (((u32) curfrag)));
280         msg->body[1] = cpu_to_le32(swlen);
281         msg->body[2] = cpu_to_le32(kxfer.sw_id);
282         msg->body[3] = cpu_to_le32(0xD0000000 | fragsize);
283         msg->body[4] = cpu_to_le32(buffer.phys);
284
285         osm_debug("swdl frag %d/%d (size %d)\n", curfrag, maxfrag, fragsize);
286         status = i2o_msg_post_wait_mem(c, msg, 60, &buffer);
287
288         if (status != -ETIMEDOUT)
289                 i2o_dma_free(&c->pdev->dev, &buffer);
290
291         if (status != I2O_POST_WAIT_OK) {
292                 // it fails if you try and send frags out of order
293                 // and for some yet unknown reasons too
294                 osm_info("swdl failed, DetailedStatus = %d\n", status);
295                 return status;
296         }
297
298         return 0;
299 };
300
301 static int i2o_cfg_swul(unsigned long arg)
302 {
303         struct i2o_sw_xfer kxfer;
304         struct i2o_sw_xfer __user *pxfer = (struct i2o_sw_xfer __user *)arg;
305         unsigned char maxfrag = 0, curfrag = 1;
306         struct i2o_dma buffer;
307         struct i2o_message *msg;
308         unsigned int status = 0, swlen = 0, fragsize = 8192;
309         struct i2o_controller *c;
310         int ret = 0;
311
312         if (copy_from_user(&kxfer, pxfer, sizeof(struct i2o_sw_xfer)))
313                 goto return_fault;
314
315         if (get_user(swlen, kxfer.swlen) < 0)
316                 goto return_fault;
317
318         if (get_user(maxfrag, kxfer.maxfrag) < 0)
319                 goto return_fault;
320
321         if (get_user(curfrag, kxfer.curfrag) < 0)
322                 goto return_fault;
323
324         if (curfrag == maxfrag)
325                 fragsize = swlen - (maxfrag - 1) * 8192;
326
327         if (!kxfer.buf)
328                 goto return_fault;
329
330         c = i2o_find_iop(kxfer.iop);
331         if (!c)
332                 return -ENXIO;
333
334         msg = i2o_msg_get_wait(c, I2O_TIMEOUT_MESSAGE_GET);
335         if (IS_ERR(msg))
336                 return PTR_ERR(msg);
337
338         if (i2o_dma_alloc(&c->pdev->dev, &buffer, fragsize, GFP_KERNEL)) {
339                 i2o_msg_nop(c, msg);
340                 return -ENOMEM;
341         }
342
343         msg->u.head[0] = cpu_to_le32(NINE_WORD_MSG_SIZE | SGL_OFFSET_7);
344         msg->u.head[1] =
345             cpu_to_le32(I2O_CMD_SW_UPLOAD << 24 | HOST_TID << 12 | ADAPTER_TID);
346         msg->u.head[2] = cpu_to_le32(i2o_config_driver.context);
347         msg->u.head[3] = cpu_to_le32(0);
348         msg->body[0] =
349             cpu_to_le32((u32) kxfer.flags << 24 | (u32) kxfer.
350                         sw_type << 16 | (u32) maxfrag << 8 | (u32) curfrag);
351         msg->body[1] = cpu_to_le32(swlen);
352         msg->body[2] = cpu_to_le32(kxfer.sw_id);
353         msg->body[3] = cpu_to_le32(0xD0000000 | fragsize);
354         msg->body[4] = cpu_to_le32(buffer.phys);
355
356         osm_debug("swul frag %d/%d (size %d)\n", curfrag, maxfrag, fragsize);
357         status = i2o_msg_post_wait_mem(c, msg, 60, &buffer);
358
359         if (status != I2O_POST_WAIT_OK) {
360                 if (status != -ETIMEDOUT)
361                         i2o_dma_free(&c->pdev->dev, &buffer);
362
363                 osm_info("swul failed, DetailedStatus = %d\n", status);
364                 return status;
365         }
366
367         if (copy_to_user(kxfer.buf, buffer.virt, fragsize))
368                 ret = -EFAULT;
369
370         i2o_dma_free(&c->pdev->dev, &buffer);
371
372       return_ret:
373         return ret;
374       return_fault:
375         ret = -EFAULT;
376         goto return_ret;
377 };
378
379 static int i2o_cfg_swdel(unsigned long arg)
380 {
381         struct i2o_controller *c;
382         struct i2o_sw_xfer kxfer;
383         struct i2o_sw_xfer __user *pxfer = (struct i2o_sw_xfer __user *)arg;
384         struct i2o_message *msg;
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         msg = i2o_msg_get_wait(c, I2O_TIMEOUT_MESSAGE_GET);
399         if (IS_ERR(msg))
400                 return PTR_ERR(msg);
401
402         msg->u.head[0] = cpu_to_le32(SEVEN_WORD_MSG_SIZE | SGL_OFFSET_0);
403         msg->u.head[1] =
404             cpu_to_le32(I2O_CMD_SW_REMOVE << 24 | HOST_TID << 12 | ADAPTER_TID);
405         msg->u.head[2] = cpu_to_le32(i2o_config_driver.context);
406         msg->u.head[3] = cpu_to_le32(0);
407         msg->body[0] =
408             cpu_to_le32((u32) kxfer.flags << 24 | (u32) kxfer.sw_type << 16);
409         msg->body[1] = cpu_to_le32(swlen);
410         msg->body[2] = cpu_to_le32(kxfer.sw_id);
411
412         token = i2o_msg_post_wait(c, msg, 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 *msg;
427         struct i2o_controller *c;
428
429         c = i2o_find_iop(iop);
430         if (!c)
431                 return -ENXIO;
432
433         msg = i2o_msg_get_wait(c, I2O_TIMEOUT_MESSAGE_GET);
434         if (IS_ERR(msg))
435                 return PTR_ERR(msg);
436
437         msg->u.head[0] = cpu_to_le32(FOUR_WORD_MSG_SIZE | SGL_OFFSET_0);
438         msg->u.head[1] =
439             cpu_to_le32(I2O_CMD_CONFIG_VALIDATE << 24 | HOST_TID << 12 | iop);
440         msg->u.head[2] = cpu_to_le32(i2o_config_driver.context);
441         msg->u.head[3] = cpu_to_le32(0);
442
443         token = i2o_msg_post_wait(c, msg, 10);
444
445         if (token != I2O_POST_WAIT_OK) {
446                 osm_info("Can't validate configuration, ErrorStatus = %d\n",
447                          token);
448                 return -ETIMEDOUT;
449         }
450
451         return 0;
452 };
453
454 static int i2o_cfg_evt_reg(unsigned long arg, struct file *fp)
455 {
456         struct i2o_message *msg;
457         struct i2o_evt_id __user *pdesc = (struct i2o_evt_id __user *)arg;
458         struct i2o_evt_id kdesc;
459         struct i2o_controller *c;
460         struct i2o_device *d;
461
462         if (copy_from_user(&kdesc, pdesc, sizeof(struct i2o_evt_id)))
463                 return -EFAULT;
464
465         /* IOP exists? */
466         c = i2o_find_iop(kdesc.iop);
467         if (!c)
468                 return -ENXIO;
469
470         /* Device exists? */
471         d = i2o_iop_find_device(c, kdesc.tid);
472         if (!d)
473                 return -ENODEV;
474
475         msg = i2o_msg_get_wait(c, I2O_TIMEOUT_MESSAGE_GET);
476         if (IS_ERR(msg))
477                 return PTR_ERR(msg);
478
479         msg->u.head[0] = cpu_to_le32(FOUR_WORD_MSG_SIZE | SGL_OFFSET_0);
480         msg->u.head[1] =
481             cpu_to_le32(I2O_CMD_UTIL_EVT_REGISTER << 24 | HOST_TID << 12 |
482                         kdesc.tid);
483         msg->u.head[2] = cpu_to_le32(i2o_config_driver.context);
484         msg->u.head[3] = cpu_to_le32(i2o_cntxt_list_add(c, fp->private_data));
485         msg->body[0] = cpu_to_le32(kdesc.evt_mask);
486
487         i2o_msg_post(c, msg);
488
489         return 0;
490 }
491
492 static int i2o_cfg_evt_get(unsigned long arg, struct file *fp)
493 {
494         struct i2o_cfg_info *p = NULL;
495         struct i2o_evt_get __user *uget = (struct i2o_evt_get __user *)arg;
496         struct i2o_evt_get kget;
497         unsigned long flags;
498
499         for (p = open_files; p; p = p->next)
500                 if (p->q_id == (ulong) fp->private_data)
501                         break;
502
503         if (!p->q_len)
504                 return -ENOENT;
505
506         memcpy(&kget.info, &p->event_q[p->q_out], sizeof(struct i2o_evt_info));
507         MODINC(p->q_out, I2O_EVT_Q_LEN);
508         spin_lock_irqsave(&i2o_config_lock, flags);
509         p->q_len--;
510         kget.pending = p->q_len;
511         kget.lost = p->q_lost;
512         spin_unlock_irqrestore(&i2o_config_lock, flags);
513
514         if (copy_to_user(uget, &kget, sizeof(struct i2o_evt_get)))
515                 return -EFAULT;
516         return 0;
517 }
518
519 #ifdef CONFIG_I2O_EXT_ADAPTEC
520 #ifdef CONFIG_COMPAT
521 static int i2o_cfg_passthru32(struct file *file, unsigned cmnd,
522                               unsigned long arg)
523 {
524         struct i2o_cmd_passthru32 __user *cmd;
525         struct i2o_controller *c;
526         u32 __user *user_msg;
527         u32 *reply = NULL;
528         u32 __user *user_reply = NULL;
529         u32 size = 0;
530         u32 reply_size = 0;
531         u32 rcode = 0;
532         struct i2o_dma sg_list[SG_TABLESIZE];
533         u32 sg_offset = 0;
534         u32 sg_count = 0;
535         u32 i = 0;
536         u32 sg_index = 0;
537         i2o_status_block *sb;
538         struct i2o_message *msg;
539         unsigned int iop;
540
541         cmd = (struct i2o_cmd_passthru32 __user *)arg;
542
543         if (get_user(iop, &cmd->iop) || get_user(i, &cmd->msg))
544                 return -EFAULT;
545
546         user_msg = compat_ptr(i);
547
548         c = i2o_find_iop(iop);
549         if (!c) {
550                 osm_debug("controller %d not found\n", iop);
551                 return -ENXIO;
552         }
553
554         msg = i2o_msg_get_wait(c, I2O_TIMEOUT_MESSAGE_GET);
555
556         sb = c->status_block.virt;
557
558         if (get_user(size, &user_msg[0])) {
559                 osm_warn("unable to get size!\n");
560                 return -EFAULT;
561         }
562         size = size >> 16;
563
564         if (size > sb->inbound_frame_size) {
565                 osm_warn("size of message > inbound_frame_size");
566                 return -EFAULT;
567         }
568
569         user_reply = &user_msg[size];
570
571         size <<= 2;             // Convert to bytes
572
573         /* Copy in the user's I2O command */
574         if (copy_from_user(msg, user_msg, size)) {
575                 osm_warn("unable to copy user message\n");
576                 return -EFAULT;
577         }
578         i2o_dump_message(msg);
579
580         if (get_user(reply_size, &user_reply[0]) < 0)
581                 return -EFAULT;
582
583         reply_size >>= 16;
584         reply_size <<= 2;
585
586         reply = kmalloc(reply_size, GFP_KERNEL);
587         if (!reply) {
588                 printk(KERN_WARNING "%s: Could not allocate reply buffer\n",
589                        c->name);
590                 return -ENOMEM;
591         }
592         memset(reply, 0, reply_size);
593
594         sg_offset = (msg->u.head[0] >> 4) & 0x0f;
595
596         msg->u.s.icntxt = cpu_to_le32(i2o_config_driver.context);
597         msg->u.s.tcntxt = cpu_to_le32(i2o_cntxt_list_add(c, reply));
598
599         memset(sg_list, 0, sizeof(sg_list[0]) * SG_TABLESIZE);
600         if (sg_offset) {
601                 struct sg_simple_element *sg;
602
603                 if (sg_offset * 4 >= size) {
604                         rcode = -EFAULT;
605                         goto cleanup;
606                 }
607                 // TODO 64bit fix
608                 sg = (struct sg_simple_element *)((&msg->u.head[0]) +
609                                                   sg_offset);
610                 sg_count =
611                     (size - sg_offset * 4) / sizeof(struct sg_simple_element);
612                 if (sg_count > SG_TABLESIZE) {
613                         printk(KERN_DEBUG "%s:IOCTL SG List too large (%u)\n",
614                                c->name, sg_count);
615                         rcode = -EINVAL;
616                         goto cleanup;
617                 }
618
619                 for (i = 0; i < sg_count; i++) {
620                         int sg_size;
621                         struct i2o_dma *p;
622
623                         if (!(sg[i].flag_count & 0x10000000
624                               /*I2O_SGL_FLAGS_SIMPLE_ADDRESS_ELEMENT */ )) {
625                                 printk(KERN_DEBUG
626                                        "%s:Bad SG element %d - not simple (%x)\n",
627                                        c->name, i, sg[i].flag_count);
628                                 rcode = -EINVAL;
629                                 goto cleanup;
630                         }
631                         sg_size = sg[i].flag_count & 0xffffff;
632                         p = &(sg_list[sg_index++]);
633                         /* Allocate memory for the transfer */
634                         if (i2o_dma_alloc
635                             (&c->pdev->dev, p, sg_size,
636                              PCI_DMA_BIDIRECTIONAL)) {
637                                 printk(KERN_DEBUG
638                                        "%s: Could not allocate SG buffer - size = %d buffer number %d of %d\n",
639                                        c->name, sg_size, i, sg_count);
640                                 rcode = -ENOMEM;
641                                 goto sg_list_cleanup;
642                         }
643                         /* Copy in the user's SG buffer if necessary */
644                         if (sg[i].
645                             flag_count & 0x04000000 /*I2O_SGL_FLAGS_DIR */ ) {
646                                 // TODO 64bit fix
647                                 if (copy_from_user
648                                     (p->virt,
649                                      (void __user *)(unsigned long)sg[i].
650                                      addr_bus, sg_size)) {
651                                         printk(KERN_DEBUG
652                                                "%s: Could not copy SG buf %d FROM user\n",
653                                                c->name, i);
654                                         rcode = -EFAULT;
655                                         goto sg_list_cleanup;
656                                 }
657                         }
658                         //TODO 64bit fix
659                         sg[i].addr_bus = (u32) p->phys;
660                 }
661         }
662
663         rcode = i2o_msg_post_wait(c, msg, 60);
664         if (rcode)
665                 goto sg_list_cleanup;
666
667         if (sg_offset) {
668                 u32 msg[I2O_OUTBOUND_MSG_FRAME_SIZE];
669                 /* Copy back the Scatter Gather buffers back to user space */
670                 u32 j;
671                 // TODO 64bit fix
672                 struct sg_simple_element *sg;
673                 int sg_size;
674
675                 // re-acquire the original message to handle correctly the sg copy operation
676                 memset(&msg, 0, I2O_OUTBOUND_MSG_FRAME_SIZE * 4);
677                 // get user msg size in u32s
678                 if (get_user(size, &user_msg[0])) {
679                         rcode = -EFAULT;
680                         goto sg_list_cleanup;
681                 }
682                 size = size >> 16;
683                 size *= 4;
684                 /* Copy in the user's I2O command */
685                 if (copy_from_user(msg, user_msg, size)) {
686                         rcode = -EFAULT;
687                         goto sg_list_cleanup;
688                 }
689                 sg_count =
690                     (size - sg_offset * 4) / sizeof(struct sg_simple_element);
691
692                 // TODO 64bit fix
693                 sg = (struct sg_simple_element *)(msg + sg_offset);
694                 for (j = 0; j < sg_count; j++) {
695                         /* Copy out the SG list to user's buffer if necessary */
696                         if (!
697                             (sg[j].
698                              flag_count & 0x4000000 /*I2O_SGL_FLAGS_DIR */ )) {
699                                 sg_size = sg[j].flag_count & 0xffffff;
700                                 // TODO 64bit fix
701                                 if (copy_to_user
702                                     ((void __user *)(u64) sg[j].addr_bus,
703                                      sg_list[j].virt, sg_size)) {
704                                         printk(KERN_WARNING
705                                                "%s: Could not copy %p TO user %x\n",
706                                                c->name, sg_list[j].virt,
707                                                sg[j].addr_bus);
708                                         rcode = -EFAULT;
709                                         goto sg_list_cleanup;
710                                 }
711                         }
712                 }
713         }
714
715         /* Copy back the reply to user space */
716         if (reply_size) {
717                 // we wrote our own values for context - now restore the user supplied ones
718                 if (copy_from_user(reply + 2, user_msg + 2, sizeof(u32) * 2)) {
719                         printk(KERN_WARNING
720                                "%s: Could not copy message context FROM user\n",
721                                c->name);
722                         rcode = -EFAULT;
723                         goto sg_list_cleanup;
724                 }
725                 if (copy_to_user(user_reply, reply, reply_size)) {
726                         printk(KERN_WARNING
727                                "%s: Could not copy reply TO user\n", c->name);
728                         rcode = -EFAULT;
729                 }
730         }
731
732       sg_list_cleanup:
733         for (i = 0; i < sg_index; i++)
734                 i2o_dma_free(&c->pdev->dev, &sg_list[i]);
735
736       cleanup:
737         kfree(reply);
738         return rcode;
739 }
740
741 static long i2o_cfg_compat_ioctl(struct file *file, unsigned cmd,
742                                  unsigned long arg)
743 {
744         int ret;
745         lock_kernel();
746         switch (cmd) {
747         case I2OGETIOPS:
748                 ret = i2o_cfg_ioctl(NULL, file, cmd, arg);
749                 break;
750         case I2OPASSTHRU32:
751                 ret = i2o_cfg_passthru32(file, cmd, arg);
752                 break;
753         default:
754                 ret = -ENOIOCTLCMD;
755                 break;
756         }
757         unlock_kernel();
758         return ret;
759 }
760
761 #endif
762
763 static int i2o_cfg_passthru(unsigned long arg)
764 {
765         struct i2o_cmd_passthru __user *cmd =
766             (struct i2o_cmd_passthru __user *)arg;
767         struct i2o_controller *c;
768         u32 __user *user_msg;
769         u32 *reply = NULL;
770         u32 __user *user_reply = NULL;
771         u32 size = 0;
772         u32 reply_size = 0;
773         u32 rcode = 0;
774         void *sg_list[SG_TABLESIZE];
775         u32 sg_offset = 0;
776         u32 sg_count = 0;
777         int sg_index = 0;
778         u32 i = 0;
779         void *p = NULL;
780         i2o_status_block *sb;
781         struct i2o_message *msg;
782         unsigned int iop;
783
784         if (get_user(iop, &cmd->iop) || get_user(user_msg, &cmd->msg))
785                 return -EFAULT;
786
787         c = i2o_find_iop(iop);
788         if (!c) {
789                 osm_warn("controller %d not found\n", iop);
790                 return -ENXIO;
791         }
792
793         msg = i2o_msg_get_wait(c, I2O_TIMEOUT_MESSAGE_GET);
794
795         sb = c->status_block.virt;
796
797         if (get_user(size, &user_msg[0]))
798                 return -EFAULT;
799         size = size >> 16;
800
801         if (size > sb->inbound_frame_size) {
802                 osm_warn("size of message > inbound_frame_size");
803                 return -EFAULT;
804         }
805
806         user_reply = &user_msg[size];
807
808         size <<= 2;             // Convert to bytes
809
810         /* Copy in the user's I2O command */
811         if (copy_from_user(msg, user_msg, size))
812                 return -EFAULT;
813
814         if (get_user(reply_size, &user_reply[0]) < 0)
815                 return -EFAULT;
816
817         reply_size >>= 16;
818         reply_size <<= 2;
819
820         reply = kmalloc(reply_size, GFP_KERNEL);
821         if (!reply) {
822                 printk(KERN_WARNING "%s: Could not allocate reply buffer\n",
823                        c->name);
824                 return -ENOMEM;
825         }
826         memset(reply, 0, reply_size);
827
828         sg_offset = (msg->u.head[0] >> 4) & 0x0f;
829
830         msg->u.s.icntxt = cpu_to_le32(i2o_config_driver.context);
831         msg->u.s.tcntxt = cpu_to_le32(i2o_cntxt_list_add(c, reply));
832
833         memset(sg_list, 0, sizeof(sg_list[0]) * SG_TABLESIZE);
834         if (sg_offset) {
835                 struct sg_simple_element *sg;
836
837                 if (sg_offset * 4 >= size) {
838                         rcode = -EFAULT;
839                         goto cleanup;
840                 }
841                 // TODO 64bit fix
842                 sg = (struct sg_simple_element *)((&msg->u.head[0]) +
843                                                   sg_offset);
844                 sg_count =
845                     (size - sg_offset * 4) / sizeof(struct sg_simple_element);
846                 if (sg_count > SG_TABLESIZE) {
847                         printk(KERN_DEBUG "%s:IOCTL SG List too large (%u)\n",
848                                c->name, sg_count);
849                         rcode = -EINVAL;
850                         goto cleanup;
851                 }
852
853                 for (i = 0; i < sg_count; i++) {
854                         int sg_size;
855
856                         if (!(sg[i].flag_count & 0x10000000
857                               /*I2O_SGL_FLAGS_SIMPLE_ADDRESS_ELEMENT */ )) {
858                                 printk(KERN_DEBUG
859                                        "%s:Bad SG element %d - not simple (%x)\n",
860                                        c->name, i, sg[i].flag_count);
861                                 rcode = -EINVAL;
862                                 goto sg_list_cleanup;
863                         }
864                         sg_size = sg[i].flag_count & 0xffffff;
865                         /* Allocate memory for the transfer */
866                         p = kmalloc(sg_size, GFP_KERNEL);
867                         if (!p) {
868                                 printk(KERN_DEBUG
869                                        "%s: Could not allocate SG buffer - size = %d buffer number %d of %d\n",
870                                        c->name, sg_size, i, sg_count);
871                                 rcode = -ENOMEM;
872                                 goto sg_list_cleanup;
873                         }
874                         sg_list[sg_index++] = p;        // sglist indexed with input frame, not our internal frame.
875                         /* Copy in the user's SG buffer if necessary */
876                         if (sg[i].
877                             flag_count & 0x04000000 /*I2O_SGL_FLAGS_DIR */ ) {
878                                 // TODO 64bit fix
879                                 if (copy_from_user
880                                     (p, (void __user *)sg[i].addr_bus,
881                                      sg_size)) {
882                                         printk(KERN_DEBUG
883                                                "%s: Could not copy SG buf %d FROM user\n",
884                                                c->name, i);
885                                         rcode = -EFAULT;
886                                         goto sg_list_cleanup;
887                                 }
888                         }
889                         //TODO 64bit fix
890                         sg[i].addr_bus = virt_to_bus(p);
891                 }
892         }
893
894         rcode = i2o_msg_post_wait(c, msg, 60);
895         if (rcode)
896                 goto sg_list_cleanup;
897
898         if (sg_offset) {
899                 u32 msg[128];
900                 /* Copy back the Scatter Gather buffers back to user space */
901                 u32 j;
902                 // TODO 64bit fix
903                 struct sg_simple_element *sg;
904                 int sg_size;
905
906                 // re-acquire the original message to handle correctly the sg copy operation
907                 memset(&msg, 0, I2O_OUTBOUND_MSG_FRAME_SIZE * 4);
908                 // get user msg size in u32s
909                 if (get_user(size, &user_msg[0])) {
910                         rcode = -EFAULT;
911                         goto sg_list_cleanup;
912                 }
913                 size = size >> 16;
914                 size *= 4;
915                 /* Copy in the user's I2O command */
916                 if (copy_from_user(msg, user_msg, size)) {
917                         rcode = -EFAULT;
918                         goto sg_list_cleanup;
919                 }
920                 sg_count =
921                     (size - sg_offset * 4) / sizeof(struct sg_simple_element);
922
923                 // TODO 64bit fix
924                 sg = (struct sg_simple_element *)(msg + sg_offset);
925                 for (j = 0; j < sg_count; j++) {
926                         /* Copy out the SG list to user's buffer if necessary */
927                         if (!
928                             (sg[j].
929                              flag_count & 0x4000000 /*I2O_SGL_FLAGS_DIR */ )) {
930                                 sg_size = sg[j].flag_count & 0xffffff;
931                                 // TODO 64bit fix
932                                 if (copy_to_user
933                                     ((void __user *)sg[j].addr_bus, sg_list[j],
934                                      sg_size)) {
935                                         printk(KERN_WARNING
936                                                "%s: Could not copy %p TO user %x\n",
937                                                c->name, sg_list[j],
938                                                sg[j].addr_bus);
939                                         rcode = -EFAULT;
940                                         goto sg_list_cleanup;
941                                 }
942                         }
943                 }
944         }
945
946         /* Copy back the reply to user space */
947         if (reply_size) {
948                 // we wrote our own values for context - now restore the user supplied ones
949                 if (copy_from_user(reply + 2, user_msg + 2, sizeof(u32) * 2)) {
950                         printk(KERN_WARNING
951                                "%s: Could not copy message context FROM user\n",
952                                c->name);
953                         rcode = -EFAULT;
954                 }
955                 if (copy_to_user(user_reply, reply, reply_size)) {
956                         printk(KERN_WARNING
957                                "%s: Could not copy reply TO user\n", c->name);
958                         rcode = -EFAULT;
959                 }
960         }
961
962       sg_list_cleanup:
963         for (i = 0; i < sg_index; i++)
964                 kfree(sg_list[i]);
965
966       cleanup:
967         kfree(reply);
968         return rcode;
969 }
970 #endif
971
972 /*
973  * IOCTL Handler
974  */
975 static int i2o_cfg_ioctl(struct inode *inode, struct file *fp, unsigned int cmd,
976                          unsigned long arg)
977 {
978         int ret;
979
980         switch (cmd) {
981         case I2OGETIOPS:
982                 ret = i2o_cfg_getiops(arg);
983                 break;
984
985         case I2OHRTGET:
986                 ret = i2o_cfg_gethrt(arg);
987                 break;
988
989         case I2OLCTGET:
990                 ret = i2o_cfg_getlct(arg);
991                 break;
992
993         case I2OPARMSET:
994                 ret = i2o_cfg_parms(arg, I2OPARMSET);
995                 break;
996
997         case I2OPARMGET:
998                 ret = i2o_cfg_parms(arg, I2OPARMGET);
999                 break;
1000
1001         case I2OSWDL:
1002                 ret = i2o_cfg_swdl(arg);
1003                 break;
1004
1005         case I2OSWUL:
1006                 ret = i2o_cfg_swul(arg);
1007                 break;
1008
1009         case I2OSWDEL:
1010                 ret = i2o_cfg_swdel(arg);
1011                 break;
1012
1013         case I2OVALIDATE:
1014                 ret = i2o_cfg_validate(arg);
1015                 break;
1016
1017         case I2OEVTREG:
1018                 ret = i2o_cfg_evt_reg(arg, fp);
1019                 break;
1020
1021         case I2OEVTGET:
1022                 ret = i2o_cfg_evt_get(arg, fp);
1023                 break;
1024
1025 #ifdef CONFIG_I2O_EXT_ADAPTEC
1026         case I2OPASSTHRU:
1027                 ret = i2o_cfg_passthru(arg);
1028                 break;
1029 #endif
1030
1031         default:
1032                 osm_debug("unknown ioctl called!\n");
1033                 ret = -EINVAL;
1034         }
1035
1036         return ret;
1037 }
1038
1039 static int cfg_open(struct inode *inode, struct file *file)
1040 {
1041         struct i2o_cfg_info *tmp =
1042             (struct i2o_cfg_info *)kmalloc(sizeof(struct i2o_cfg_info),
1043                                            GFP_KERNEL);
1044         unsigned long flags;
1045
1046         if (!tmp)
1047                 return -ENOMEM;
1048
1049         file->private_data = (void *)(i2o_cfg_info_id++);
1050         tmp->fp = file;
1051         tmp->fasync = NULL;
1052         tmp->q_id = (ulong) file->private_data;
1053         tmp->q_len = 0;
1054         tmp->q_in = 0;
1055         tmp->q_out = 0;
1056         tmp->q_lost = 0;
1057         tmp->next = open_files;
1058
1059         spin_lock_irqsave(&i2o_config_lock, flags);
1060         open_files = tmp;
1061         spin_unlock_irqrestore(&i2o_config_lock, flags);
1062
1063         return 0;
1064 }
1065
1066 static int cfg_fasync(int fd, struct file *fp, int on)
1067 {
1068         ulong id = (ulong) fp->private_data;
1069         struct i2o_cfg_info *p;
1070
1071         for (p = open_files; p; p = p->next)
1072                 if (p->q_id == id)
1073                         break;
1074
1075         if (!p)
1076                 return -EBADF;
1077
1078         return fasync_helper(fd, fp, on, &p->fasync);
1079 }
1080
1081 static int cfg_release(struct inode *inode, struct file *file)
1082 {
1083         ulong id = (ulong) file->private_data;
1084         struct i2o_cfg_info *p1, *p2;
1085         unsigned long flags;
1086
1087         lock_kernel();
1088         p1 = p2 = NULL;
1089
1090         spin_lock_irqsave(&i2o_config_lock, flags);
1091         for (p1 = open_files; p1;) {
1092                 if (p1->q_id == id) {
1093
1094                         if (p1->fasync)
1095                                 cfg_fasync(-1, file, 0);
1096                         if (p2)
1097                                 p2->next = p1->next;
1098                         else
1099                                 open_files = p1->next;
1100
1101                         kfree(p1);
1102                         break;
1103                 }
1104                 p2 = p1;
1105                 p1 = p1->next;
1106         }
1107         spin_unlock_irqrestore(&i2o_config_lock, flags);
1108         unlock_kernel();
1109
1110         return 0;
1111 }
1112
1113 static struct file_operations config_fops = {
1114         .owner = THIS_MODULE,
1115         .llseek = no_llseek,
1116         .ioctl = i2o_cfg_ioctl,
1117 #ifdef CONFIG_COMPAT
1118         .compat_ioctl = i2o_cfg_compat_ioctl,
1119 #endif
1120         .open = cfg_open,
1121         .release = cfg_release,
1122         .fasync = cfg_fasync,
1123 };
1124
1125 static struct miscdevice i2o_miscdev = {
1126         I2O_MINOR,
1127         "i2octl",
1128         &config_fops
1129 };
1130
1131 static int __init i2o_config_old_init(void)
1132 {
1133         spin_lock_init(&i2o_config_lock);
1134
1135         if (misc_register(&i2o_miscdev) < 0) {
1136                 osm_err("can't register device.\n");
1137                 return -EBUSY;
1138         }
1139
1140         return 0;
1141 }
1142
1143 static void i2o_config_old_exit(void)
1144 {
1145         misc_deregister(&i2o_miscdev);
1146 }
1147
1148 MODULE_AUTHOR("Red Hat Software");