[PATCH] sky2: save/restore base hardware irq during suspend/resume
[linux-2.6] / arch / sparc64 / solaris / ioctl.c
1 /* $Id: ioctl.c,v 1.17 2002/02/08 03:57:14 davem Exp $
2  * ioctl.c: Solaris ioctl emulation.
3  *
4  * Copyright (C) 1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
5  * Copyright (C) 1997,1998 Patrik Rak (prak3264@ss1000.ms.mff.cuni.cz)
6  *
7  * Streams & timod emulation based on code
8  * Copyright (C) 1995, 1996 Mike Jagdis (jaggy@purplet.demon.co.uk)
9  *
10  * 1999-08-19 Implemented solaris 'm' (mag tape) and
11  *            'O' (openprom) ioctls, by Jason Rappleye
12  *             (rappleye@ccr.buffalo.edu)
13  */
14
15 #include <linux/types.h>
16 #include <linux/kernel.h>
17 #include <linux/sched.h>
18 #include <linux/smp.h>
19 #include <linux/smp_lock.h>
20 #include <linux/syscalls.h>
21 #include <linux/ioctl.h>
22 #include <linux/fs.h>
23 #include <linux/file.h>
24 #include <linux/netdevice.h>
25 #include <linux/mtio.h>
26 #include <linux/time.h>
27 #include <linux/rcupdate.h>
28 #include <linux/compat.h>
29
30 #include <net/sock.h>
31
32 #include <asm/uaccess.h>
33 #include <asm/termios.h>
34 #include <asm/openpromio.h>
35
36 #include "conv.h"
37 #include "socksys.h"
38
39 extern asmlinkage int compat_sys_ioctl(unsigned int fd, unsigned int cmd,
40         u32 arg);
41 asmlinkage int solaris_ioctl(unsigned int fd, unsigned int cmd, u32 arg);
42
43 extern int timod_putmsg(unsigned int fd, char __user *ctl_buf, int ctl_len,
44                         char __user *data_buf, int data_len, int flags);
45 extern int timod_getmsg(unsigned int fd, char __user *ctl_buf, int ctl_maxlen, int __user *ctl_len,
46                         char __user *data_buf, int data_maxlen, int __user *data_len, int *flags);
47
48 /* termio* stuff {{{ */
49
50 struct solaris_termios {
51         u32     c_iflag;
52         u32     c_oflag;
53         u32     c_cflag;
54         u32     c_lflag;
55         u8      c_cc[19];
56 };
57
58 struct solaris_termio {
59         u16     c_iflag;
60         u16     c_oflag;
61         u16     c_cflag;
62         u16     c_lflag;
63         s8      c_line;
64         u8      c_cc[8];
65 };
66
67 struct solaris_termiox {
68         u16     x_hflag;
69         u16     x_cflag;
70         u16     x_rflag[5];
71         u16     x_sflag;
72 };
73
74 static u32 solaris_to_linux_cflag(u32 cflag)
75 {
76         cflag &= 0x7fdff000;
77         if (cflag & 0x200000) {
78                 int baud = cflag & 0xf;
79                 cflag &= ~0x20000f;
80                 switch (baud) {
81                 case 0: baud = B57600; break;
82                 case 1: baud = B76800; break;
83                 case 2: baud = B115200; break;
84                 case 3: baud = B153600; break;
85                 case 4: baud = B230400; break;
86                 case 5: baud = B307200; break;
87                 case 6: baud = B460800; break;
88                 }
89                 cflag |= CBAUDEX | baud;
90         }
91         return cflag;
92 }
93
94 static u32 linux_to_solaris_cflag(u32 cflag)
95 {
96         cflag &= ~(CMSPAR | CIBAUD);
97         if (cflag & CBAUDEX) {
98                 int baud = cflag & CBAUD;
99                 cflag &= ~CBAUD;
100                 switch (baud) {
101                 case B57600: baud = 0; break;
102                 case B76800: baud = 1; break;
103                 case B115200: baud = 2; break;
104                 case B153600: baud = 3; break;
105                 case B230400: baud = 4; break;
106                 case B307200: baud = 5; break;
107                 case B460800: baud = 6; break;
108                 case B614400: baud = 7; break;
109                 case B921600: baud = 8; break;
110 #if 0           
111                 case B1843200: baud = 9; break;
112 #endif
113                 }
114                 cflag |= 0x200000 | baud;
115         }
116         return cflag;
117 }
118
119 static inline int linux_to_solaris_termio(unsigned int fd, unsigned int cmd, u32 arg)
120 {
121         struct solaris_termio __user *p = A(arg);
122         int ret;
123         
124         ret = sys_ioctl(fd, cmd, (unsigned long)p);
125         if (!ret) {
126                 u32 cflag;
127                 
128                 if (__get_user (cflag, &p->c_cflag))
129                         return -EFAULT;
130                 cflag = linux_to_solaris_cflag(cflag);
131                 if (__put_user (cflag, &p->c_cflag))
132                         return -EFAULT;
133         }
134         return ret;
135 }
136
137 static int solaris_to_linux_termio(unsigned int fd, unsigned int cmd, u32 arg)
138 {
139         int ret;
140         struct solaris_termio s;
141         mm_segment_t old_fs = get_fs();
142         
143         if (copy_from_user (&s, (struct solaris_termio __user *)A(arg), sizeof(struct solaris_termio)))
144                 return -EFAULT;
145         s.c_cflag = solaris_to_linux_cflag(s.c_cflag);
146         set_fs(KERNEL_DS);
147         ret = sys_ioctl(fd, cmd, (unsigned long)&s);
148         set_fs(old_fs);
149         return ret;
150 }
151
152 static inline int linux_to_solaris_termios(unsigned int fd, unsigned int cmd, u32 arg)
153 {
154         int ret;
155         struct solaris_termios s;
156         mm_segment_t old_fs = get_fs();
157
158         set_fs(KERNEL_DS);      
159         ret = sys_ioctl(fd, cmd, (unsigned long)&s);
160         set_fs(old_fs);
161         if (!ret) {
162                 struct solaris_termios __user *p = A(arg);
163                 if (put_user (s.c_iflag, &p->c_iflag) ||
164                     __put_user (s.c_oflag, &p->c_oflag) ||
165                     __put_user (linux_to_solaris_cflag(s.c_cflag), &p->c_cflag) ||
166                     __put_user (s.c_lflag, &p->c_lflag) ||
167                     __copy_to_user (p->c_cc, s.c_cc, 16) ||
168                     __clear_user (p->c_cc + 16, 2))
169                         return -EFAULT;
170         }
171         return ret;
172 }
173
174 static int solaris_to_linux_termios(unsigned int fd, unsigned int cmd, u32 arg)
175 {
176         int ret;
177         struct solaris_termios s;
178         struct solaris_termios __user *p = A(arg);
179         mm_segment_t old_fs = get_fs();
180
181         set_fs(KERNEL_DS);
182         ret = sys_ioctl(fd, TCGETS, (unsigned long)&s);
183         set_fs(old_fs);
184         if (ret) return ret;
185         if (put_user (s.c_iflag, &p->c_iflag) ||
186             __put_user (s.c_oflag, &p->c_oflag) ||
187             __put_user (s.c_cflag, &p->c_cflag) ||
188             __put_user (s.c_lflag, &p->c_lflag) ||
189             __copy_from_user (s.c_cc, p->c_cc, 16))
190                 return -EFAULT;
191         s.c_cflag = solaris_to_linux_cflag(s.c_cflag);
192         set_fs(KERNEL_DS);
193         ret = sys_ioctl(fd, cmd, (unsigned long)&s);
194         set_fs(old_fs);
195         return ret;
196 }
197
198 static inline int solaris_T(unsigned int fd, unsigned int cmd, u32 arg)
199 {
200         switch (cmd & 0xff) {
201         case 1: /* TCGETA */
202                 return linux_to_solaris_termio(fd, TCGETA, arg);
203         case 2: /* TCSETA */
204                 return solaris_to_linux_termio(fd, TCSETA, arg);
205         case 3: /* TCSETAW */
206                 return solaris_to_linux_termio(fd, TCSETAW, arg);
207         case 4: /* TCSETAF */
208                 return solaris_to_linux_termio(fd, TCSETAF, arg);
209         case 5: /* TCSBRK */
210                 return sys_ioctl(fd, TCSBRK, arg);
211         case 6: /* TCXONC */
212                 return sys_ioctl(fd, TCXONC, arg);
213         case 7: /* TCFLSH */
214                 return sys_ioctl(fd, TCFLSH, arg);
215         case 13: /* TCGETS */
216                 return linux_to_solaris_termios(fd, TCGETS, arg);
217         case 14: /* TCSETS */
218                 return solaris_to_linux_termios(fd, TCSETS, arg);
219         case 15: /* TCSETSW */
220                 return solaris_to_linux_termios(fd, TCSETSW, arg);
221         case 16: /* TCSETSF */
222                 return solaris_to_linux_termios(fd, TCSETSF, arg);
223         case 103: /* TIOCSWINSZ */
224                 return sys_ioctl(fd, TIOCSWINSZ, arg);
225         case 104: /* TIOCGWINSZ */
226                 return sys_ioctl(fd, TIOCGWINSZ, arg);
227         }
228         return -ENOSYS;
229 }
230
231 static inline int solaris_t(unsigned int fd, unsigned int cmd, u32 arg)
232 {
233         switch (cmd & 0xff) {
234         case 20: /* TIOCGPGRP */
235                 return sys_ioctl(fd, TIOCGPGRP, arg);
236         case 21: /* TIOCSPGRP */
237                 return sys_ioctl(fd, TIOCSPGRP, arg);
238         }
239         return -ENOSYS;
240 }
241
242 /* }}} */
243
244 /* A pseudo STREAMS support {{{ */
245
246 struct strioctl {
247         int cmd, timeout, len;
248         u32 data;
249 };
250
251 struct solaris_si_sockparams {
252         int sp_family;
253         int sp_type;
254         int sp_protocol;
255 };
256
257 struct solaris_o_si_udata {
258         int tidusize;
259         int addrsize;
260         int optsize;
261         int etsdusize;
262         int servtype;
263         int so_state;
264         int so_options;
265         int tsdusize;
266 };
267
268 struct solaris_si_udata {
269         int tidusize;
270         int addrsize;
271         int optsize;
272         int etsdusize;
273         int servtype;
274         int so_state;
275         int so_options;
276         int tsdusize;
277         struct solaris_si_sockparams sockparams;
278 };
279
280 #define SOLARIS_MODULE_TIMOD    0
281 #define SOLARIS_MODULE_SOCKMOD  1
282 #define SOLARIS_MODULE_MAX      2
283
284 static struct module_info {
285         const char *name;
286         /* can be expanded further if needed */
287 } module_table[ SOLARIS_MODULE_MAX + 1 ] = {
288         /* the ordering here must match the module numbers above! */
289         { "timod" },
290         { "sockmod" },
291         { NULL }
292 };
293
294 static inline int solaris_sockmod(unsigned int fd, unsigned int cmd, u32 arg)
295 {
296         struct inode *ino;
297         struct fdtable *fdt;
298         /* I wonder which of these tests are superfluous... --patrik */
299         rcu_read_lock();
300         fdt = files_fdtable(current->files);
301         if (! fdt->fd[fd] ||
302             ! fdt->fd[fd]->f_dentry ||
303             ! (ino = fdt->fd[fd]->f_dentry->d_inode) ||
304             ! S_ISSOCK(ino->i_mode)) {
305                 rcu_read_unlock();
306                 return TBADF;
307         }
308         rcu_read_unlock();
309         
310         switch (cmd & 0xff) {
311         case 109: /* SI_SOCKPARAMS */
312         {
313                 struct solaris_si_sockparams si;
314                 if (copy_from_user (&si, A(arg), sizeof(si)))
315                         return (EFAULT << 8) | TSYSERR;
316
317                 /* Should we modify socket ino->socket_i.ops and type? */
318                 return 0;
319         }
320         case 110: /* SI_GETUDATA */
321         {
322                 int etsdusize, servtype;
323                 struct solaris_si_udata __user *p = A(arg);
324                 switch (SOCKET_I(ino)->type) {
325                 case SOCK_STREAM:
326                         etsdusize = 1;
327                         servtype = 2;
328                         break;
329                 default:
330                         etsdusize = -2;
331                         servtype = 3;
332                         break;
333                 }
334                 if (put_user(16384, &p->tidusize) ||
335                     __put_user(sizeof(struct sockaddr), &p->addrsize) ||
336                     __put_user(-1, &p->optsize) ||
337                     __put_user(etsdusize, &p->etsdusize) ||
338                     __put_user(servtype, &p->servtype) ||
339                     __put_user(0, &p->so_state) ||
340                     __put_user(0, &p->so_options) ||
341                     __put_user(16384, &p->tsdusize) ||
342                     __put_user(SOCKET_I(ino)->ops->family, &p->sockparams.sp_family) ||
343                     __put_user(SOCKET_I(ino)->type, &p->sockparams.sp_type) ||
344                     __put_user(SOCKET_I(ino)->ops->family, &p->sockparams.sp_protocol))
345                         return (EFAULT << 8) | TSYSERR;
346                 return 0;
347         }
348         case 101: /* O_SI_GETUDATA */
349         {
350                 int etsdusize, servtype;
351                 struct solaris_o_si_udata __user *p = A(arg);
352                 switch (SOCKET_I(ino)->type) {
353                 case SOCK_STREAM:
354                         etsdusize = 1;
355                         servtype = 2;
356                         break;
357                 default:
358                         etsdusize = -2;
359                         servtype = 3;
360                         break;
361                 }
362                 if (put_user(16384, &p->tidusize) ||
363                     __put_user(sizeof(struct sockaddr), &p->addrsize) ||
364                     __put_user(-1, &p->optsize) ||
365                     __put_user(etsdusize, &p->etsdusize) ||
366                     __put_user(servtype, &p->servtype) ||
367                     __put_user(0, &p->so_state) ||
368                     __put_user(0, &p->so_options) ||
369                     __put_user(16384, &p->tsdusize))
370                         return (EFAULT << 8) | TSYSERR;
371                 return 0;
372         }
373         case 102: /* SI_SHUTDOWN */
374         case 103: /* SI_LISTEN */
375         case 104: /* SI_SETMYNAME */
376         case 105: /* SI_SETPEERNAME */
377         case 106: /* SI_GETINTRANSIT */
378         case 107: /* SI_TCL_LINK */
379         case 108: /* SI_TCL_UNLINK */
380                 ;
381         }
382         return TNOTSUPPORT;
383 }
384
385 static inline int solaris_timod(unsigned int fd, unsigned int cmd, u32 arg,
386                                     int len, int __user *len_p)
387 {
388         int ret;
389                 
390         switch (cmd & 0xff) {
391         case 141: /* TI_OPTMGMT */
392         {
393                 int i;
394                 u32 prim;
395                 SOLD("TI_OPMGMT entry");
396                 ret = timod_putmsg(fd, A(arg), len, NULL, -1, 0);
397                 SOLD("timod_putmsg() returned");
398                 if (ret)
399                         return (-ret << 8) | TSYSERR;
400                 i = MSG_HIPRI;
401                 SOLD("calling timod_getmsg()");
402                 ret = timod_getmsg(fd, A(arg), len, len_p, NULL, -1, NULL, &i);
403                 SOLD("timod_getmsg() returned");
404                 if (ret)
405                         return (-ret << 8) | TSYSERR;
406                 SOLD("ret ok");
407                 if (get_user(prim, (u32 __user *)A(arg)))
408                         return (EFAULT << 8) | TSYSERR;
409                 SOLD("got prim");
410                 if (prim == T_ERROR_ACK) {
411                         u32 tmp, tmp2;
412                         SOLD("prim is T_ERROR_ACK");
413                         if (get_user(tmp, (u32 __user *)A(arg)+3) ||
414                             get_user(tmp2, (u32 __user *)A(arg)+2))
415                                 return (EFAULT << 8) | TSYSERR;
416                         return (tmp2 << 8) | tmp;
417                 }
418                 SOLD("TI_OPMGMT return 0");
419                 return 0;
420         }
421         case 142: /* TI_BIND */
422         {
423                 int i;
424                 u32 prim;
425                 SOLD("TI_BIND entry");
426                 ret = timod_putmsg(fd, A(arg), len, NULL, -1, 0);
427                 SOLD("timod_putmsg() returned");
428                 if (ret)
429                         return (-ret << 8) | TSYSERR;
430                 len = 1024; /* Solaris allows arbitrary return size */
431                 i = MSG_HIPRI;
432                 SOLD("calling timod_getmsg()");
433                 ret = timod_getmsg(fd, A(arg), len, len_p, NULL, -1, NULL, &i);
434                 SOLD("timod_getmsg() returned");
435                 if (ret)
436                         return (-ret << 8) | TSYSERR;
437                 SOLD("ret ok");
438                 if (get_user(prim, (u32 __user *)A(arg)))
439                         return (EFAULT << 8) | TSYSERR;
440                 SOLD("got prim");
441                 if (prim == T_ERROR_ACK) {
442                         u32 tmp, tmp2;
443                         SOLD("prim is T_ERROR_ACK");
444                         if (get_user(tmp, (u32 __user *)A(arg)+3) ||
445                             get_user(tmp2, (u32 __user *)A(arg)+2))
446                                 return (EFAULT << 8) | TSYSERR;
447                         return (tmp2 << 8) | tmp;
448                 }
449                 SOLD("no ERROR_ACK requested");
450                 if (prim != T_OK_ACK)
451                         return TBADSEQ;
452                 SOLD("OK_ACK requested");
453                 i = MSG_HIPRI;
454                 SOLD("calling timod_getmsg()");
455                 ret = timod_getmsg(fd, A(arg), len, len_p, NULL, -1, NULL, &i);
456                 SOLD("timod_getmsg() returned");
457                 if (ret)
458                         return (-ret << 8) | TSYSERR;
459                 SOLD("TI_BIND return ok");
460                 return 0;
461         }
462         case 140: /* TI_GETINFO */
463         case 143: /* TI_UNBIND */
464         case 144: /* TI_GETMYNAME */
465         case 145: /* TI_GETPEERNAME */
466         case 146: /* TI_SETMYNAME */
467         case 147: /* TI_SETPEERNAME */
468                 ;
469         }
470         return TNOTSUPPORT;
471 }
472
473 static inline int solaris_S(struct file *filp, unsigned int fd, unsigned int cmd, u32 arg)
474 {
475         char *p;
476         int ret;
477         mm_segment_t old_fs;
478         struct strioctl si;
479         struct inode *ino;
480         struct sol_socket_struct *sock;
481         struct module_info *mi;
482
483         ino = filp->f_dentry->d_inode;
484         if (!S_ISSOCK(ino->i_mode))
485                 return -EBADF;
486         sock = filp->private_data;
487         if (! sock) {
488                 printk("solaris_S: NULL private_data\n");
489                 return -EBADF;
490         }
491         if (sock->magic != SOLARIS_SOCKET_MAGIC) {
492                 printk("solaris_S: invalid magic\n");
493                 return -EBADF;
494         }
495         
496
497         switch (cmd & 0xff) {
498         case 1: /* I_NREAD */
499                 return -ENOSYS;
500         case 2: /* I_PUSH */
501         {
502                 p = getname (A(arg));
503                 if (IS_ERR (p))
504                         return PTR_ERR(p);
505                 ret = -EINVAL;
506                 for (mi = module_table; mi->name; mi++) {
507                         if (strcmp(mi->name, p) == 0) {
508                                 sol_module m;
509                                 if (sock->modcount >= MAX_NR_STREAM_MODULES) {
510                                         ret = -ENXIO;
511                                         break;
512                                 }
513                                 m = (sol_module) (mi - module_table);
514                                 sock->module[sock->modcount++] = m;
515                                 ret = 0;
516                                 break;
517                         }
518                 }
519                 putname (p);
520                 return ret;
521         }
522         case 3: /* I_POP */
523                 if (sock->modcount <= 0) return -EINVAL;
524                 sock->modcount--;
525                 return 0;
526         case 4: /* I_LOOK */
527         {
528                 const char *p;
529                 if (sock->modcount <= 0) return -EINVAL;
530                 p = module_table[(unsigned)sock->module[sock->modcount]].name;
531                 if (copy_to_user (A(arg), p, strlen(p)))
532                         return -EFAULT;
533                 return 0;
534         }
535         case 5: /* I_FLUSH */
536                 return 0;
537         case 8: /* I_STR */
538                 if (copy_from_user(&si, A(arg), sizeof(struct strioctl)))
539                         return -EFAULT;
540                 /* We ignore what module is actually at the top of stack. */
541                 switch ((si.cmd >> 8) & 0xff) {
542                 case 'I':
543                         return solaris_sockmod(fd, si.cmd, si.data);
544                 case 'T':
545                         return solaris_timod(fd, si.cmd, si.data, si.len,
546                                 &((struct strioctl __user *)A(arg))->len);
547                 default:
548                         return solaris_ioctl(fd, si.cmd, si.data);
549                 }
550         case 9: /* I_SETSIG */
551                 return sys_ioctl(fd, FIOSETOWN, current->pid);
552         case 10: /* I_GETSIG */
553                 old_fs = get_fs();
554                 set_fs(KERNEL_DS);
555                 sys_ioctl(fd, FIOGETOWN, (unsigned long)&ret);
556                 set_fs(old_fs);
557                 if (ret == current->pid) return 0x3ff;
558                 else return -EINVAL;
559         case 11: /* I_FIND */
560         {
561                 int i;
562                 p = getname (A(arg));
563                 if (IS_ERR (p))
564                         return PTR_ERR(p);
565                 ret = 0;
566                 for (i = 0; i < sock->modcount; i++) {
567                         unsigned m = sock->module[i];
568                         if (strcmp(module_table[m].name, p) == 0) {
569                                 ret = 1;
570                                 break;
571                         } 
572                 }
573                 putname (p);
574                 return ret;
575         }
576         case 19: /* I_SWROPT */
577         case 32: /* I_SETCLTIME */
578                 return 0;       /* Lie */
579         }
580         return -ENOSYS;
581 }
582
583 static inline int solaris_s(unsigned int fd, unsigned int cmd, u32 arg)
584 {
585         switch (cmd & 0xff) {
586         case 0: /* SIOCSHIWAT */
587         case 2: /* SIOCSLOWAT */
588                 return 0; /* We don't support them */
589         case 1: /* SIOCGHIWAT */
590         case 3: /* SIOCGLOWAT */
591                 if (put_user (0, (u32 __user *)A(arg)))
592                         return -EFAULT;
593                 return 0; /* Lie */
594         case 7: /* SIOCATMARK */
595                 return sys_ioctl(fd, SIOCATMARK, arg);
596         case 8: /* SIOCSPGRP */
597                 return sys_ioctl(fd, SIOCSPGRP, arg);
598         case 9: /* SIOCGPGRP */
599                 return sys_ioctl(fd, SIOCGPGRP, arg);
600         }
601         return -ENOSYS;
602 }
603
604 static inline int solaris_r(unsigned int fd, unsigned int cmd, u32 arg)
605 {
606         switch (cmd & 0xff) {
607         case 10: /* SIOCADDRT */
608                 return compat_sys_ioctl(fd, SIOCADDRT, arg);
609         case 11: /* SIOCDELRT */
610                 return compat_sys_ioctl(fd, SIOCDELRT, arg);
611         }
612         return -ENOSYS;
613 }
614
615 static inline int solaris_i(unsigned int fd, unsigned int cmd, u32 arg)
616 {
617         switch (cmd & 0xff) {
618         case 12: /* SIOCSIFADDR */
619                 return compat_sys_ioctl(fd, SIOCSIFADDR, arg);
620         case 13: /* SIOCGIFADDR */
621                 return compat_sys_ioctl(fd, SIOCGIFADDR, arg);
622         case 14: /* SIOCSIFDSTADDR */
623                 return compat_sys_ioctl(fd, SIOCSIFDSTADDR, arg);
624         case 15: /* SIOCGIFDSTADDR */
625                 return compat_sys_ioctl(fd, SIOCGIFDSTADDR, arg);
626         case 16: /* SIOCSIFFLAGS */
627                 return compat_sys_ioctl(fd, SIOCSIFFLAGS, arg);
628         case 17: /* SIOCGIFFLAGS */
629                 return compat_sys_ioctl(fd, SIOCGIFFLAGS, arg);
630         case 18: /* SIOCSIFMEM */
631                 return compat_sys_ioctl(fd, SIOCSIFMEM, arg);
632         case 19: /* SIOCGIFMEM */
633                 return compat_sys_ioctl(fd, SIOCGIFMEM, arg);
634         case 20: /* SIOCGIFCONF */
635                 return compat_sys_ioctl(fd, SIOCGIFCONF, arg);
636         case 21: /* SIOCSIFMTU */
637                 return compat_sys_ioctl(fd, SIOCSIFMTU, arg);
638         case 22: /* SIOCGIFMTU */
639                 return compat_sys_ioctl(fd, SIOCGIFMTU, arg);
640         case 23: /* SIOCGIFBRDADDR */
641                 return compat_sys_ioctl(fd, SIOCGIFBRDADDR, arg);
642         case 24: /* SIOCSIFBRDADDR */
643                 return compat_sys_ioctl(fd, SIOCSIFBRDADDR, arg);
644         case 25: /* SIOCGIFNETMASK */
645                 return compat_sys_ioctl(fd, SIOCGIFNETMASK, arg);
646         case 26: /* SIOCSIFNETMASK */
647                 return compat_sys_ioctl(fd, SIOCSIFNETMASK, arg);
648         case 27: /* SIOCGIFMETRIC */
649                 return compat_sys_ioctl(fd, SIOCGIFMETRIC, arg);
650         case 28: /* SIOCSIFMETRIC */
651                 return compat_sys_ioctl(fd, SIOCSIFMETRIC, arg);
652         case 30: /* SIOCSARP */
653                 return compat_sys_ioctl(fd, SIOCSARP, arg);
654         case 31: /* SIOCGARP */
655                 return compat_sys_ioctl(fd, SIOCGARP, arg);
656         case 32: /* SIOCDARP */
657                 return compat_sys_ioctl(fd, SIOCDARP, arg);
658         case 52: /* SIOCGETNAME */
659         case 53: /* SIOCGETPEER */
660                 {
661                         struct sockaddr uaddr;
662                         int uaddr_len = sizeof(struct sockaddr), ret;
663                         long args[3];
664                         mm_segment_t old_fs = get_fs();
665                         int (*sys_socketcall)(int, unsigned long *) =
666                                 (int (*)(int, unsigned long *))SYS(socketcall);
667                         
668                         args[0] = fd; args[1] = (long)&uaddr; args[2] = (long)&uaddr_len;
669                         set_fs(KERNEL_DS);
670                         ret = sys_socketcall(((cmd & 0xff) == 52) ? SYS_GETSOCKNAME : SYS_GETPEERNAME,
671                                         args);
672                         set_fs(old_fs);
673                         if (ret >= 0) {
674                                 if (copy_to_user(A(arg), &uaddr, uaddr_len))
675                                         return -EFAULT;
676                         }
677                         return ret;
678                 }
679 #if 0           
680         case 86: /* SIOCSOCKSYS */
681                 return socksys_syscall(fd, arg);
682 #endif          
683         case 87: /* SIOCGIFNUM */
684                 {
685                         struct net_device *d;
686                         int i = 0;
687                         
688                         read_lock_bh(&dev_base_lock);
689                         for (d = dev_base; d; d = d->next) i++;
690                         read_unlock_bh(&dev_base_lock);
691
692                         if (put_user (i, (int __user *)A(arg)))
693                                 return -EFAULT;
694                         return 0;
695                 }
696         }
697         return -ENOSYS;
698 }
699
700 static int solaris_m(unsigned int fd, unsigned int cmd, u32 arg)
701 {
702         int ret;
703
704         switch (cmd & 0xff) {
705         case 1: /* MTIOCTOP */
706                 ret = sys_ioctl(fd, MTIOCTOP, (unsigned long)&arg);
707                 break;
708         case 2: /* MTIOCGET */
709                 ret = sys_ioctl(fd, MTIOCGET, (unsigned long)&arg);
710                 break;
711         case 3: /* MTIOCGETDRIVETYPE */
712         case 4: /* MTIOCPERSISTENT */
713         case 5: /* MTIOCPERSISTENTSTATUS */
714         case 6: /* MTIOCLRERR */
715         case 7: /* MTIOCGUARANTEEDORDER */
716         case 8: /* MTIOCRESERVE */
717         case 9: /* MTIOCRELEASE */
718         case 10: /* MTIOCFORCERESERVE */
719         case 13: /* MTIOCSTATE */
720         case 14: /* MTIOCREADIGNOREILI */
721         case 15: /* MTIOCREADIGNOREEOFS */
722         case 16: /* MTIOCSHORTFMK */
723         default:
724                 ret = -ENOSYS; /* linux doesn't support these */
725                 break;
726         };
727
728         return ret;
729 }
730
731 static int solaris_O(unsigned int fd, unsigned int cmd, u32 arg)
732 {
733         int ret = -EINVAL;
734
735         switch (cmd & 0xff) {
736         case 1: /* OPROMGETOPT */
737                 ret = sys_ioctl(fd, OPROMGETOPT, arg);
738                 break;
739         case 2: /* OPROMSETOPT */
740                 ret = sys_ioctl(fd, OPROMSETOPT, arg);
741                 break;
742         case 3: /* OPROMNXTOPT */
743                 ret = sys_ioctl(fd, OPROMNXTOPT, arg);
744                 break;
745         case 4: /* OPROMSETOPT2 */
746                 ret = sys_ioctl(fd, OPROMSETOPT2, arg);
747                 break;
748         case 5: /* OPROMNEXT */
749                 ret = sys_ioctl(fd, OPROMNEXT, arg);
750                 break;
751         case 6: /* OPROMCHILD */
752                 ret = sys_ioctl(fd, OPROMCHILD, arg);
753                 break;
754         case 7: /* OPROMGETPROP */
755                 ret = sys_ioctl(fd, OPROMGETPROP, arg);
756                 break;
757         case 8: /* OPROMNXTPROP */
758                 ret = sys_ioctl(fd, OPROMNXTPROP, arg);
759                 break;
760         case 9: /* OPROMU2P */
761                 ret = sys_ioctl(fd, OPROMU2P, arg);
762                 break;
763         case 10: /* OPROMGETCONS */
764                 ret = sys_ioctl(fd, OPROMGETCONS, arg);
765                 break;
766         case 11: /* OPROMGETFBNAME */
767                 ret = sys_ioctl(fd, OPROMGETFBNAME, arg);
768                 break;
769         case 12: /* OPROMGETBOOTARGS */
770                 ret = sys_ioctl(fd, OPROMGETBOOTARGS, arg);
771                 break;
772         case 13: /* OPROMGETVERSION */
773         case 14: /* OPROMPATH2DRV */
774         case 15: /* OPROMDEV2PROMNAME */
775         case 16: /* OPROMPROM2DEVNAME */
776         case 17: /* OPROMGETPROPLEN */
777         default:
778                 ret = -EINVAL;
779                 break;
780         };
781         return ret;
782 }
783
784 /* }}} */
785
786 asmlinkage int solaris_ioctl(unsigned int fd, unsigned int cmd, u32 arg)
787 {
788         struct file *filp;
789         int error = -EBADF;
790
791         filp = fget(fd);
792         if (!filp)
793                 goto out;
794
795         lock_kernel();
796         error = -EFAULT;
797         switch ((cmd >> 8) & 0xff) {
798         case 'S': error = solaris_S(filp, fd, cmd, arg); break;
799         case 'T': error = solaris_T(fd, cmd, arg); break;
800         case 'i': error = solaris_i(fd, cmd, arg); break;
801         case 'r': error = solaris_r(fd, cmd, arg); break;
802         case 's': error = solaris_s(fd, cmd, arg); break;
803         case 't': error = solaris_t(fd, cmd, arg); break;
804         case 'f': error = sys_ioctl(fd, cmd, arg); break;
805         case 'm': error = solaris_m(fd, cmd, arg); break;
806         case 'O': error = solaris_O(fd, cmd, arg); break;
807         default:
808                 error = -ENOSYS;
809                 break;
810         }
811         unlock_kernel();
812         fput(filp);
813 out:
814         if (error == -ENOSYS) {
815                 unsigned char c = cmd>>8;
816                 
817                 if (c < ' ' || c > 126) c = '.';
818                 printk("solaris_ioctl: Unknown cmd fd(%d) cmd(%08x '%c') arg(%08x)\n",
819                        (int)fd, (unsigned int)cmd, c, (unsigned int)arg);
820                 error = -EINVAL;
821         }
822         return error;
823 }