2 * sysirix.c: IRIX system call emulation.
4 * Copyright (C) 1996 David S. Miller
5 * Copyright (C) 1997 Miguel de Icaza
6 * Copyright (C) 1997, 1998, 1999, 2000 Ralf Baechle
8 #include <linux/kernel.h>
9 #include <linux/sched.h>
10 #include <linux/binfmts.h>
11 #include <linux/highuid.h>
12 #include <linux/pagemap.h>
14 #include <linux/mman.h>
15 #include <linux/slab.h>
16 #include <linux/swap.h>
17 #include <linux/errno.h>
18 #include <linux/time.h>
19 #include <linux/timex.h>
20 #include <linux/times.h>
21 #include <linux/elf.h>
22 #include <linux/msg.h>
23 #include <linux/shm.h>
24 #include <linux/smp.h>
25 #include <linux/smp_lock.h>
26 #include <linux/utsname.h>
27 #include <linux/file.h>
28 #include <linux/vfs.h>
29 #include <linux/namei.h>
30 #include <linux/socket.h>
31 #include <linux/security.h>
32 #include <linux/syscalls.h>
34 #include <asm/ptrace.h>
36 #include <asm/uaccess.h>
37 #include <asm/inventory.h>
39 /* 2,191 lines of complete and utter shit coming up... */
41 extern int max_threads
;
43 /* The sysmp commands supported thus far. */
44 #define MP_NPROCS 1 /* # processor in complex */
45 #define MP_NAPROCS 2 /* # active processors in complex */
46 #define MP_PGSIZE 14 /* Return system page size in v1. */
48 asmlinkage
int irix_sysmp(struct pt_regs
*regs
)
54 if(regs
->regs
[2] == 1000)
56 cmd
= regs
->regs
[base
+ 4];
63 error
= num_online_cpus();
66 printk("SYSMP[%s:%d]: Unsupported opcode %d\n",
67 current
->comm
, current
->pid
, (int)cmd
);
75 /* The prctl commands. */
76 #define PR_MAXPROCS 1 /* Tasks/user. */
77 #define PR_ISBLOCKED 2 /* If blocked, return 1. */
78 #define PR_SETSTACKSIZE 3 /* Set largest task stack size. */
79 #define PR_GETSTACKSIZE 4 /* Get largest task stack size. */
80 #define PR_MAXPPROCS 5 /* Num parallel tasks. */
81 #define PR_UNBLKONEXEC 6 /* When task exec/exit's, unblock. */
82 #define PR_SETEXITSIG 8 /* When task exit's, set signal. */
83 #define PR_RESIDENT 9 /* Make task unswappable. */
84 #define PR_ATTACHADDR 10 /* (Re-)Connect a vma to a task. */
85 #define PR_DETACHADDR 11 /* Disconnect a vma from a task. */
86 #define PR_TERMCHILD 12 /* When parent sleeps with fishes, kill child. */
87 #define PR_GETSHMASK 13 /* Get the sproc() share mask. */
88 #define PR_GETNSHARE 14 /* Number of share group members. */
89 #define PR_COREPID 15 /* Add task pid to name when it core. */
90 #define PR_ATTACHADDRPERM 16 /* (Re-)Connect vma, with specified prot. */
91 #define PR_PTHREADEXIT 17 /* Kill a pthread without prejudice. */
93 asmlinkage
int irix_prctl(struct pt_regs
*regs
)
96 int error
= 0, base
= 0;
98 if (regs
->regs
[2] == 1000)
100 cmd
= regs
->regs
[base
+ 4];
103 printk("irix_prctl[%s:%d]: Wants PR_MAXPROCS\n",
104 current
->comm
, current
->pid
);
109 struct task_struct
*task
;
111 printk("irix_prctl[%s:%d]: Wants PR_ISBLOCKED\n",
112 current
->comm
, current
->pid
);
113 read_lock(&tasklist_lock
);
114 task
= find_task_by_pid(regs
->regs
[base
+ 5]);
117 error
= (task
->run_list
.next
!= NULL
);
118 read_unlock(&tasklist_lock
);
119 /* Can _your_ OS find this out that fast? */
123 case PR_SETSTACKSIZE
: {
124 long value
= regs
->regs
[base
+ 5];
126 printk("irix_prctl[%s:%d]: Wants PR_SETSTACKSIZE<%08lx>\n",
127 current
->comm
, current
->pid
, (unsigned long) value
);
128 if (value
> RLIM_INFINITY
)
129 value
= RLIM_INFINITY
;
130 if (capable(CAP_SYS_ADMIN
)) {
131 task_lock(current
->group_leader
);
132 current
->signal
->rlim
[RLIMIT_STACK
].rlim_max
=
133 current
->signal
->rlim
[RLIMIT_STACK
].rlim_cur
= value
;
134 task_unlock(current
->group_leader
);
138 task_lock(current
->group_leader
);
139 if (value
> current
->signal
->rlim
[RLIMIT_STACK
].rlim_max
) {
141 task_unlock(current
->group_leader
);
144 current
->signal
->rlim
[RLIMIT_STACK
].rlim_cur
= value
;
145 task_unlock(current
->group_leader
);
150 case PR_GETSTACKSIZE
:
151 printk("irix_prctl[%s:%d]: Wants PR_GETSTACKSIZE\n",
152 current
->comm
, current
->pid
);
153 error
= current
->signal
->rlim
[RLIMIT_STACK
].rlim_cur
;
157 printk("irix_prctl[%s:%d]: Wants PR_MAXPROCS\n",
158 current
->comm
, current
->pid
);
163 printk("irix_prctl[%s:%d]: Wants PR_UNBLKONEXEC\n",
164 current
->comm
, current
->pid
);
169 printk("irix_prctl[%s:%d]: Wants PR_SETEXITSIG\n",
170 current
->comm
, current
->pid
);
172 /* We can probably play some game where we set the task
173 * exit_code to some non-zero value when this is requested,
174 * and check whether exit_code is already set in do_exit().
180 printk("irix_prctl[%s:%d]: Wants PR_RESIDENT\n",
181 current
->comm
, current
->pid
);
182 error
= 0; /* Compatibility indeed. */
186 printk("irix_prctl[%s:%d]: Wants PR_ATTACHADDR\n",
187 current
->comm
, current
->pid
);
192 printk("irix_prctl[%s:%d]: Wants PR_DETACHADDR\n",
193 current
->comm
, current
->pid
);
198 printk("irix_prctl[%s:%d]: Wants PR_TERMCHILD\n",
199 current
->comm
, current
->pid
);
204 printk("irix_prctl[%s:%d]: Wants PR_GETSHMASK\n",
205 current
->comm
, current
->pid
);
206 error
= -EINVAL
; /* Until I have the sproc() stuff in. */
210 error
= 0; /* Until I have the sproc() stuff in. */
214 printk("irix_prctl[%s:%d]: Wants PR_COREPID\n",
215 current
->comm
, current
->pid
);
219 case PR_ATTACHADDRPERM
:
220 printk("irix_prctl[%s:%d]: Wants PR_ATTACHADDRPERM\n",
221 current
->comm
, current
->pid
);
226 printk("irix_prctl[%s:%d]: Wants PR_PTHREADEXIT\n",
227 current
->comm
, current
->pid
);
228 do_exit(regs
->regs
[base
+ 5]);
231 printk("irix_prctl[%s:%d]: Non-existant opcode %d\n",
232 current
->comm
, current
->pid
, (int)cmd
);
240 #undef DEBUG_PROCGRPS
242 extern unsigned long irix_mapelf(int fd
, struct elf_phdr
*user_phdrp
, int cnt
);
243 extern int getrusage(struct task_struct
*p
, int who
, struct rusage __user
*ru
);
244 extern char *prom_getenv(char *name
);
245 extern long prom_setenv(char *name
, char *value
);
247 /* The syssgi commands supported thus far. */
248 #define SGI_SYSID 1 /* Return unique per-machine identifier. */
249 #define SGI_INVENT 5 /* Fetch inventory */
250 # define SGI_INV_SIZEOF 1
251 # define SGI_INV_READ 2
252 #define SGI_RDNAME 6 /* Return string name of a process. */
253 #define SGI_SETNVRAM 8 /* Set PROM variable. */
254 #define SGI_GETNVRAM 9 /* Get PROM variable. */
255 #define SGI_SETPGID 21 /* Set process group id. */
256 #define SGI_SYSCONF 22 /* POSIX sysconf garbage. */
257 #define SGI_PATHCONF 24 /* POSIX sysconf garbage. */
258 #define SGI_SETGROUPS 40 /* POSIX sysconf garbage. */
259 #define SGI_GETGROUPS 41 /* POSIX sysconf garbage. */
260 #define SGI_RUSAGE 56 /* BSD style rusage(). */
261 #define SGI_SSYNC 62 /* Synchronous fs sync. */
262 #define SGI_GETSID 65 /* SysVr4 get session id. */
263 #define SGI_ELFMAP 68 /* Map an elf image. */
264 #define SGI_TOSSTSAVE 108 /* Toss saved vma's. */
265 #define SGI_FP_BCOPY 129 /* Should FPU bcopy be used on this machine? */
266 #define SGI_PHYSP 1011 /* Translate virtual into physical page. */
268 asmlinkage
int irix_syssgi(struct pt_regs
*regs
)
271 int retval
, base
= 0;
273 if (regs
->regs
[2] == 1000)
276 cmd
= regs
->regs
[base
+ 4];
279 char *buf
= (char *) regs
->regs
[base
+ 5];
281 /* XXX Use ethernet addr.... */
282 retval
= clear_user(buf
, 64);
287 int pid
= (int) regs
->regs
[base
+ 5];
288 char *buf
= (char *) regs
->regs
[base
+ 6];
289 struct task_struct
*p
;
290 char tcomm
[sizeof(current
->comm
)];
292 if (!access_ok(VERIFY_WRITE
, buf
, sizeof(tcomm
))) {
296 read_lock(&tasklist_lock
);
297 p
= find_task_by_pid(pid
);
299 read_unlock(&tasklist_lock
);
303 get_task_comm(tcomm
, p
);
304 read_unlock(&tasklist_lock
);
306 /* XXX Need to check sizes. */
307 copy_to_user(buf
, tcomm
, sizeof(tcomm
));
313 char *name
= (char *) regs
->regs
[base
+5];
314 char *buf
= (char *) regs
->regs
[base
+6];
316 return -EINVAL
; /* til I fix it */
317 if (!access_ok(VERIFY_WRITE
, buf
, 128)) {
321 value
= prom_getenv(name
); /* PROM lock? */
326 /* Do I strlen() for the length? */
327 copy_to_user(buf
, value
, 128);
333 char *name
= (char *) regs
->regs
[base
+5];
334 char *value
= (char *) regs
->regs
[base
+6];
335 return -EINVAL
; /* til I fix it */
336 retval
= prom_setenv(name
, value
);
337 /* XXX make sure retval conforms to syssgi(2) */
338 printk("[%s:%d] setnvram(\"%s\", \"%s\"): retval %d",
339 current
->comm
, current
->pid
, name
, value
, retval
);
340 /* if (retval == PROM_ENOENT)
347 #ifdef DEBUG_PROCGRPS
348 printk("[%s:%d] setpgid(%d, %d) ",
349 current
->comm
, current
->pid
,
350 (int) regs
->regs
[base
+ 5], (int)regs
->regs
[base
+ 6]);
352 retval
= sys_setpgid(regs
->regs
[base
+ 5], regs
->regs
[base
+ 6]);
354 #ifdef DEBUG_PROCGRPS
355 printk("retval=%d\n", retval
);
360 switch(regs
->regs
[base
+ 5]) {
362 retval
= (MAX_ARG_PAGES
>> 4); /* XXX estimate... */
365 retval
= max_threads
;
371 retval
= NGROUPS_MAX
;
409 retval
= sys_setgroups((int) regs
->regs
[base
+ 5],
410 (gid_t
*) regs
->regs
[base
+ 6]);
414 retval
= sys_getgroups((int) regs
->regs
[base
+ 5],
415 (gid_t
*) regs
->regs
[base
+ 6]);
419 struct rusage
*ru
= (struct rusage
*) regs
->regs
[base
+ 6];
421 switch((int) regs
->regs
[base
+ 5]) {
424 retval
= getrusage(current
, RUSAGE_SELF
, ru
);
428 /* rusage children */
429 retval
= getrusage(current
, RUSAGE_CHILDREN
, ru
);
444 #ifdef DEBUG_PROCGRPS
445 printk("[%s:%d] getsid(%d) ", current
->comm
, current
->pid
,
446 (int) regs
->regs
[base
+ 5]);
448 retval
= sys_getsid(regs
->regs
[base
+ 5]);
449 #ifdef DEBUG_PROCGRPS
450 printk("retval=%d\n", retval
);
455 retval
= irix_mapelf((int) regs
->regs
[base
+ 5],
456 (struct elf_phdr
*) regs
->regs
[base
+ 6],
457 (int) regs
->regs
[base
+ 7]);
461 /* XXX We don't need to do anything? */
470 unsigned long addr
= regs
->regs
[base
+ 5];
471 int *pageno
= (int *) (regs
->regs
[base
+ 6]);
472 struct mm_struct
*mm
= current
->mm
;
477 if (!access_ok(VERIFY_WRITE
, pageno
, sizeof(int)))
480 down_read(&mm
->mmap_sem
);
481 pgdp
= pgd_offset(mm
, addr
);
482 pmdp
= pmd_offset(pgdp
, addr
);
483 ptep
= pte_offset(pmdp
, addr
);
488 if (pte_val(pte
) & (_PAGE_VALID
| _PAGE_PRESENT
)) {
489 retval
= put_user((pte_val(pte
) & PAGE_MASK
) >>
493 up_read(&mm
->mmap_sem
);
498 int arg1
= (int) regs
->regs
[base
+ 5];
499 void *buffer
= (void *) regs
->regs
[base
+ 6];
500 int count
= (int) regs
->regs
[base
+ 7];
504 retval
= sizeof (inventory_t
);
507 retval
= dump_inventory_to_user (buffer
, count
);
516 printk("irix_syssgi: Unsupported command %d\n", (int)cmd
);
525 asmlinkage
int irix_gtime(struct pt_regs
*regs
)
527 return get_seconds();
531 * IRIX is completely broken... it returns 0 on success, otherwise
534 asmlinkage
int irix_brk(unsigned long brk
)
537 unsigned long newbrk
, oldbrk
;
538 struct mm_struct
*mm
= current
->mm
;
541 down_write(&mm
->mmap_sem
);
542 if (brk
< mm
->end_code
) {
547 newbrk
= PAGE_ALIGN(brk
);
548 oldbrk
= PAGE_ALIGN(mm
->brk
);
549 if (oldbrk
== newbrk
) {
556 * Always allow shrinking brk
558 if (brk
<= mm
->brk
) {
560 do_munmap(mm
, newbrk
, oldbrk
-newbrk
);
565 * Check against rlimit and stack..
567 rlim
= current
->signal
->rlim
[RLIMIT_DATA
].rlim_cur
;
568 if (rlim
>= RLIM_INFINITY
)
570 if (brk
- mm
->end_code
> rlim
) {
576 * Check against existing mmap mappings.
578 if (find_vma_intersection(mm
, oldbrk
, newbrk
+PAGE_SIZE
)) {
584 * Check if we have enough memory..
586 if (security_vm_enough_memory((newbrk
-oldbrk
) >> PAGE_SHIFT
)) {
592 * Ok, looks good - let it rip.
595 do_brk(oldbrk
, newbrk
-oldbrk
);
599 up_write(&mm
->mmap_sem
);
603 asmlinkage
int irix_getpid(struct pt_regs
*regs
)
605 regs
->regs
[3] = current
->real_parent
->pid
;
609 asmlinkage
int irix_getuid(struct pt_regs
*regs
)
611 regs
->regs
[3] = current
->euid
;
615 asmlinkage
int irix_getgid(struct pt_regs
*regs
)
617 regs
->regs
[3] = current
->egid
;
621 asmlinkage
int irix_stime(int value
)
628 err
= security_settime(&tv
, NULL
);
632 write_seqlock_irq(&xtime_lock
);
633 xtime
.tv_sec
= value
;
635 time_adjust
= 0; /* stop active adjtime() */
636 time_status
|= STA_UNSYNC
;
637 time_maxerror
= NTP_PHASE_LIMIT
;
638 time_esterror
= NTP_PHASE_LIMIT
;
639 write_sequnlock_irq(&xtime_lock
);
644 static inline void jiffiestotv(unsigned long jiffies
, struct timeval
*value
)
646 value
->tv_usec
= (jiffies
% HZ
) * (1000000 / HZ
);
647 value
->tv_sec
= jiffies
/ HZ
;
650 static inline void getitimer_real(struct itimerval
*value
)
652 register unsigned long val
, interval
;
654 interval
= current
->it_real_incr
;
656 if (del_timer(¤t
->real_timer
)) {
657 unsigned long now
= jiffies
;
658 val
= current
->real_timer
.expires
;
659 add_timer(¤t
->real_timer
);
660 /* look out for negative/zero itimer.. */
665 jiffiestotv(val
, &value
->it_value
);
666 jiffiestotv(interval
, &value
->it_interval
);
669 asmlinkage
unsigned int irix_alarm(unsigned int seconds
)
671 struct itimerval it_new
, it_old
;
672 unsigned int oldalarm
;
675 getitimer_real(&it_old
);
676 del_timer(¤t
->real_timer
);
678 it_new
.it_interval
.tv_sec
= it_new
.it_interval
.tv_usec
= 0;
679 it_new
.it_value
.tv_sec
= seconds
;
680 it_new
.it_value
.tv_usec
= 0;
681 do_setitimer(ITIMER_REAL
, &it_new
, &it_old
);
683 oldalarm
= it_old
.it_value
.tv_sec
;
685 * ehhh.. We can't return 0 if we have an alarm pending ...
686 * And we'd better return too much than too little anyway
688 if (it_old
.it_value
.tv_usec
)
694 asmlinkage
int irix_pause(void)
696 current
->state
= TASK_INTERRUPTIBLE
;
702 /* XXX need more than this... */
703 asmlinkage
int irix_mount(char *dev_name
, char *dir_name
, unsigned long flags
,
704 char *type
, void *data
, int datalen
)
706 printk("[%s:%d] irix_mount(%p,%p,%08lx,%p,%p,%d)\n",
707 current
->comm
, current
->pid
,
708 dev_name
, dir_name
, flags
, type
, data
, datalen
);
710 return sys_mount(dev_name
, dir_name
, type
, flags
, data
);
715 long f_bsize
, f_frsize
, f_blocks
, f_bfree
, f_files
, f_ffree
;
716 char f_fname
[6], f_fpack
[6];
719 asmlinkage
int irix_statfs(const char *path
, struct irix_statfs
*buf
,
720 int len
, int fs_type
)
726 /* We don't support this feature yet. */
731 if (!access_ok(VERIFY_WRITE
, buf
, sizeof(struct irix_statfs
))) {
735 error
= user_path_walk(path
, &nd
);
739 error
= vfs_statfs(nd
.dentry
->d_inode
->i_sb
, &kbuf
);
743 __put_user(kbuf
.f_type
, &buf
->f_type
);
744 __put_user(kbuf
.f_bsize
, &buf
->f_bsize
);
745 __put_user(kbuf
.f_frsize
, &buf
->f_frsize
);
746 __put_user(kbuf
.f_blocks
, &buf
->f_blocks
);
747 __put_user(kbuf
.f_bfree
, &buf
->f_bfree
);
748 __put_user(kbuf
.f_files
, &buf
->f_files
);
749 __put_user(kbuf
.f_ffree
, &buf
->f_ffree
);
750 for (i
= 0; i
< 6; i
++) {
751 __put_user(0, &buf
->f_fname
[i
]);
752 __put_user(0, &buf
->f_fpack
[i
]);
762 asmlinkage
int irix_fstatfs(unsigned int fd
, struct irix_statfs
*buf
)
768 if (!access_ok(VERIFY_WRITE
, buf
, sizeof(struct irix_statfs
))) {
772 if (!(file
= fget(fd
))) {
777 error
= vfs_statfs(file
->f_dentry
->d_inode
->i_sb
, &kbuf
);
781 __put_user(kbuf
.f_type
, &buf
->f_type
);
782 __put_user(kbuf
.f_bsize
, &buf
->f_bsize
);
783 __put_user(kbuf
.f_frsize
, &buf
->f_frsize
);
784 __put_user(kbuf
.f_blocks
, &buf
->f_blocks
);
785 __put_user(kbuf
.f_bfree
, &buf
->f_bfree
);
786 __put_user(kbuf
.f_files
, &buf
->f_files
);
787 __put_user(kbuf
.f_ffree
, &buf
->f_ffree
);
788 for(i
= 0; i
< 6; i
++) {
789 __put_user(0, &buf
->f_fname
[i
]);
790 __put_user(0, &buf
->f_fpack
[i
]);
799 asmlinkage
int irix_setpgrp(int flags
)
803 #ifdef DEBUG_PROCGRPS
804 printk("[%s:%d] setpgrp(%d) ", current
->comm
, current
->pid
, flags
);
807 error
= process_group(current
);
809 error
= sys_setsid();
810 #ifdef DEBUG_PROCGRPS
811 printk("returning %d\n", process_group(current
));
817 asmlinkage
int irix_times(struct tms
* tbuf
)
822 if (!access_ok(VERIFY_WRITE
,tbuf
,sizeof *tbuf
))
824 err
|= __put_user(current
->utime
, &tbuf
->tms_utime
);
825 err
|= __put_user(current
->stime
, &tbuf
->tms_stime
);
826 err
|= __put_user(current
->signal
->cutime
, &tbuf
->tms_cutime
);
827 err
|= __put_user(current
->signal
->cstime
, &tbuf
->tms_cstime
);
833 asmlinkage
int irix_exec(struct pt_regs
*regs
)
838 if(regs
->regs
[2] == 1000)
840 filename
= getname((char *) (long)regs
->regs
[base
+ 4]);
841 error
= PTR_ERR(filename
);
842 if (IS_ERR(filename
))
845 error
= do_execve(filename
, (char **) (long)regs
->regs
[base
+ 5],
852 asmlinkage
int irix_exece(struct pt_regs
*regs
)
857 if (regs
->regs
[2] == 1000)
859 filename
= getname((char *) (long)regs
->regs
[base
+ 4]);
860 error
= PTR_ERR(filename
);
861 if (IS_ERR(filename
))
863 error
= do_execve(filename
, (char **) (long)regs
->regs
[base
+ 5],
864 (char **) (long)regs
->regs
[base
+ 6], regs
);
870 asmlinkage
unsigned long irix_gethostid(void)
872 printk("[%s:%d]: irix_gethostid() called...\n",
873 current
->comm
, current
->pid
);
878 asmlinkage
unsigned long irix_sethostid(unsigned long val
)
880 printk("[%s:%d]: irix_sethostid(%08lx) called...\n",
881 current
->comm
, current
->pid
, val
);
886 asmlinkage
int irix_socket(int family
, int type
, int protocol
)
898 type
= 9; /* Invalid... */
910 type
= SOCK_SEQPACKET
;
917 return sys_socket(family
, type
, protocol
);
920 asmlinkage
int irix_getdomainname(char *name
, int len
)
924 if (!access_ok(VERIFY_WRITE
, name
, len
))
928 if (len
> __NEW_UTS_LEN
)
931 if (copy_to_user(name
, system_utsname
.domainname
, len
))
938 asmlinkage
unsigned long irix_getpagesize(void)
943 asmlinkage
int irix_msgsys(int opcode
, unsigned long arg0
, unsigned long arg1
,
944 unsigned long arg2
, unsigned long arg3
,
949 return sys_msgget((key_t
) arg0
, (int) arg1
);
951 return sys_msgctl((int) arg0
, (int) arg1
, (struct msqid_ds
*)arg2
);
953 return sys_msgrcv((int) arg0
, (struct msgbuf
*) arg1
,
954 (size_t) arg2
, (long) arg3
, (int) arg4
);
956 return sys_msgsnd((int) arg0
, (struct msgbuf
*) arg1
,
957 (size_t) arg2
, (int) arg3
);
963 asmlinkage
int irix_shmsys(int opcode
, unsigned long arg0
, unsigned long arg1
,
964 unsigned long arg2
, unsigned long arg3
)
968 return do_shmat((int) arg0
, (char *)arg1
, (int) arg2
,
969 (unsigned long *) arg3
);
971 return sys_shmctl((int)arg0
, (int)arg1
, (struct shmid_ds
*)arg2
);
973 return sys_shmdt((char *)arg0
);
975 return sys_shmget((key_t
) arg0
, (int) arg1
, (int) arg2
);
981 asmlinkage
int irix_semsys(int opcode
, unsigned long arg0
, unsigned long arg1
,
982 unsigned long arg2
, int arg3
)
986 return sys_semctl((int) arg0
, (int) arg1
, (int) arg2
,
989 return sys_semget((key_t
) arg0
, (int) arg1
, (int) arg2
);
991 return sys_semop((int) arg0
, (struct sembuf
*)arg1
,
992 (unsigned int) arg2
);
998 static inline loff_t
llseek(struct file
*file
, loff_t offset
, int origin
)
1000 loff_t (*fn
)(struct file
*, loff_t
, int);
1003 fn
= default_llseek
;
1004 if (file
->f_op
&& file
->f_op
->llseek
)
1005 fn
= file
->f_op
->llseek
;
1007 retval
= fn(file
, offset
, origin
);
1012 asmlinkage
int irix_lseek64(int fd
, int _unused
, int offhi
, int offlow
,
1027 offset
= llseek(file
, ((loff_t
) offhi
<< 32) | offlow
, origin
);
1028 retval
= (int) offset
;
1036 asmlinkage
int irix_sginap(int ticks
)
1038 current
->state
= TASK_INTERRUPTIBLE
;
1039 schedule_timeout(ticks
);
1043 asmlinkage
int irix_sgikopt(char *istring
, char *ostring
, int len
)
1048 asmlinkage
int irix_gettimeofday(struct timeval
*tv
)
1054 if (!access_ok(VERIFY_WRITE
, tv
, sizeof(struct timeval
)))
1058 seq
= read_seqbegin(&xtime_lock
);
1060 nsec
= xtime
.tv_nsec
;
1061 } while (read_seqretry(&xtime_lock
, seq
));
1063 err
= __put_user(sec
, &tv
->tv_sec
);
1064 err
|= __put_user((nsec
/ 1000), &tv
->tv_usec
);
1069 #define IRIX_MAP_AUTOGROW 0x40
1071 asmlinkage
unsigned long irix_mmap32(unsigned long addr
, size_t len
, int prot
,
1072 int flags
, int fd
, off_t offset
)
1074 struct file
*file
= NULL
;
1075 unsigned long retval
;
1077 if (!(flags
& MAP_ANONYMOUS
)) {
1078 if (!(file
= fget(fd
)))
1081 /* Ok, bad taste hack follows, try to think in something else
1082 * when reading this. */
1083 if (flags
& IRIX_MAP_AUTOGROW
) {
1084 unsigned long old_pos
;
1085 long max_size
= offset
+ len
;
1087 if (max_size
> file
->f_dentry
->d_inode
->i_size
) {
1088 old_pos
= sys_lseek (fd
, max_size
- 1, 0);
1089 sys_write (fd
, "", 1);
1090 sys_lseek (fd
, old_pos
, 0);
1095 flags
&= ~(MAP_EXECUTABLE
| MAP_DENYWRITE
);
1097 down_write(¤t
->mm
->mmap_sem
);
1098 retval
= do_mmap(file
, addr
, len
, prot
, flags
, offset
);
1099 up_write(¤t
->mm
->mmap_sem
);
1106 asmlinkage
int irix_madvise(unsigned long addr
, int len
, int behavior
)
1108 printk("[%s:%d] Wheee.. irix_madvise(%08lx,%d,%d)\n",
1109 current
->comm
, current
->pid
, addr
, len
, behavior
);
1114 asmlinkage
int irix_pagelock(char *addr
, int len
, int op
)
1116 printk("[%s:%d] Wheee.. irix_pagelock(%p,%d,%d)\n",
1117 current
->comm
, current
->pid
, addr
, len
, op
);
1122 asmlinkage
int irix_quotactl(struct pt_regs
*regs
)
1124 printk("[%s:%d] Wheee.. irix_quotactl()\n",
1125 current
->comm
, current
->pid
);
1130 asmlinkage
int irix_BSDsetpgrp(int pid
, int pgrp
)
1134 #ifdef DEBUG_PROCGRPS
1135 printk("[%s:%d] BSDsetpgrp(%d, %d) ", current
->comm
, current
->pid
,
1141 /* Wheee, weird sysv thing... */
1142 if ((pgrp
== 0) && (pid
== current
->pid
))
1143 error
= sys_setsid();
1145 error
= sys_setpgid(pid
, pgrp
);
1147 #ifdef DEBUG_PROCGRPS
1148 printk("error = %d\n", error
);
1154 asmlinkage
int irix_systeminfo(int cmd
, char *buf
, int cnt
)
1156 printk("[%s:%d] Wheee.. irix_systeminfo(%d,%p,%d)\n",
1157 current
->comm
, current
->pid
, cmd
, buf
, cnt
);
1163 char sysname
[257], nodename
[257], release
[257];
1164 char version
[257], machine
[257];
1165 char m_type
[257], base_rel
[257];
1166 char _unused0
[257], _unused1
[257], _unused2
[257];
1167 char _unused3
[257], _unused4
[257], _unused5
[257];
1170 asmlinkage
int irix_uname(struct iuname
*buf
)
1172 down_read(&uts_sem
);
1173 if (copy_to_user(system_utsname
.sysname
, buf
->sysname
, 65)
1174 || copy_to_user(system_utsname
.nodename
, buf
->nodename
, 65)
1175 || copy_to_user(system_utsname
.release
, buf
->release
, 65)
1176 || copy_to_user(system_utsname
.version
, buf
->version
, 65)
1177 || copy_to_user(system_utsname
.machine
, buf
->machine
, 65)) {
1187 static int irix_xstat32_xlate(struct kstat
*stat
, void *ubuf
)
1190 u32 st_dev
, st_pad1
[3], st_ino
, st_mode
, st_nlink
, st_uid
, st_gid
;
1191 u32 st_rdev
, st_pad2
[2], st_size
, st_pad3
;
1192 u32 st_atime0
, st_atime1
;
1193 u32 st_mtime0
, st_mtime1
;
1194 u32 st_ctime0
, st_ctime1
;
1195 u32 st_blksize
, st_blocks
;
1200 if (!sysv_valid_dev(stat
->dev
) || !sysv_valid_dev(stat
->rdev
))
1202 ub
.st_dev
= sysv_encode_dev(stat
->dev
);
1203 ub
.st_ino
= stat
->ino
;
1204 ub
.st_mode
= stat
->mode
;
1205 ub
.st_nlink
= stat
->nlink
;
1206 SET_UID(ub
.st_uid
, stat
->uid
);
1207 SET_GID(ub
.st_gid
, stat
->gid
);
1208 ub
.st_rdev
= sysv_encode_dev(stat
->rdev
);
1209 #if BITS_PER_LONG == 32
1210 if (stat
->size
> MAX_NON_LFS
)
1213 ub
.st_size
= stat
->size
;
1214 ub
.st_atime0
= stat
->atime
.tv_sec
;
1215 ub
.st_atime1
= stat
->atime
.tv_nsec
;
1216 ub
.st_mtime0
= stat
->mtime
.tv_sec
;
1217 ub
.st_mtime1
= stat
->atime
.tv_nsec
;
1218 ub
.st_ctime0
= stat
->ctime
.tv_sec
;
1219 ub
.st_ctime1
= stat
->atime
.tv_nsec
;
1220 ub
.st_blksize
= stat
->blksize
;
1221 ub
.st_blocks
= stat
->blocks
;
1222 strcpy (ub
.st_fstype
, "efs");
1224 return copy_to_user(ubuf
, &ub
, sizeof(ub
)) ? -EFAULT
: 0;
1227 static int irix_xstat64_xlate(struct kstat
*stat
, void *ubuf
)
1230 u32 st_dev
; s32 st_pad1
[3];
1231 unsigned long long st_ino
;
1233 u32 st_nlink
; s32 st_uid
; s32 st_gid
; u32 st_rdev
;
1237 struct { s32 tv_sec
, tv_nsec
; } st_atime
, st_mtime
, st_ctime
;
1239 long long st_blocks
;
1244 if (!sysv_valid_dev(stat
->dev
) || !sysv_valid_dev(stat
->rdev
))
1247 ks
.st_dev
= sysv_encode_dev(stat
->dev
);
1248 ks
.st_pad1
[0] = ks
.st_pad1
[1] = ks
.st_pad1
[2] = 0;
1249 ks
.st_ino
= (unsigned long long) stat
->ino
;
1250 ks
.st_mode
= (u32
) stat
->mode
;
1251 ks
.st_nlink
= (u32
) stat
->nlink
;
1252 ks
.st_uid
= (s32
) stat
->uid
;
1253 ks
.st_gid
= (s32
) stat
->gid
;
1254 ks
.st_rdev
= sysv_encode_dev (stat
->rdev
);
1255 ks
.st_pad2
[0] = ks
.st_pad2
[1] = 0;
1256 ks
.st_size
= (long long) stat
->size
;
1259 /* XXX hackety hack... */
1260 ks
.st_atime
.tv_sec
= (s32
) stat
->atime
.tv_sec
;
1261 ks
.st_atime
.tv_nsec
= stat
->atime
.tv_nsec
;
1262 ks
.st_mtime
.tv_sec
= (s32
) stat
->mtime
.tv_sec
;
1263 ks
.st_mtime
.tv_nsec
= stat
->mtime
.tv_nsec
;
1264 ks
.st_ctime
.tv_sec
= (s32
) stat
->ctime
.tv_sec
;
1265 ks
.st_ctime
.tv_nsec
= stat
->ctime
.tv_nsec
;
1267 ks
.st_blksize
= (s32
) stat
->blksize
;
1268 ks
.st_blocks
= (long long) stat
->blocks
;
1269 memset(ks
.st_fstype
, 0, 16);
1270 ks
.st_pad4
[0] = ks
.st_pad4
[1] = ks
.st_pad4
[2] = ks
.st_pad4
[3] = 0;
1271 ks
.st_pad4
[4] = ks
.st_pad4
[5] = ks
.st_pad4
[6] = ks
.st_pad4
[7] = 0;
1273 /* Now write it all back. */
1274 return copy_to_user(ubuf
, &ks
, sizeof(ks
)) ? -EFAULT
: 0;
1277 asmlinkage
int irix_xstat(int version
, char *filename
, struct stat
*statbuf
)
1283 printk("[%s:%d] Wheee.. irix_xstat(%d,%s,%p) ",
1284 current
->comm
, current
->pid
, version
, filename
, statbuf
);
1287 retval
= vfs_stat(filename
, &stat
);
1291 retval
= irix_xstat32_xlate(&stat
, statbuf
);
1294 retval
= irix_xstat64_xlate(&stat
, statbuf
);
1303 asmlinkage
int irix_lxstat(int version
, char *filename
, struct stat
*statbuf
)
1309 printk("[%s:%d] Wheee.. irix_lxstat(%d,%s,%p) ",
1310 current
->comm
, current
->pid
, version
, filename
, statbuf
);
1313 error
= vfs_lstat(filename
, &stat
);
1318 error
= irix_xstat32_xlate(&stat
, statbuf
);
1321 error
= irix_xstat64_xlate(&stat
, statbuf
);
1330 asmlinkage
int irix_fxstat(int version
, int fd
, struct stat
*statbuf
)
1336 printk("[%s:%d] Wheee.. irix_fxstat(%d,%d,%p) ",
1337 current
->comm
, current
->pid
, version
, fd
, statbuf
);
1340 error
= vfs_fstat(fd
, &stat
);
1344 error
= irix_xstat32_xlate(&stat
, statbuf
);
1347 error
= irix_xstat64_xlate(&stat
, statbuf
);
1356 asmlinkage
int irix_xmknod(int ver
, char *filename
, int mode
, unsigned dev
)
1359 printk("[%s:%d] Wheee.. irix_xmknod(%d,%s,%x,%x)\n",
1360 current
->comm
, current
->pid
, ver
, filename
, mode
, dev
);
1364 /* shouldn't we convert here as well as on stat()? */
1365 retval
= sys_mknod(filename
, mode
, dev
);
1376 asmlinkage
int irix_swapctl(int cmd
, char *arg
)
1378 printk("[%s:%d] Wheee.. irix_swapctl(%d,%p)\n",
1379 current
->comm
, current
->pid
, cmd
, arg
);
1384 struct irix_statvfs
{
1385 u32 f_bsize
; u32 f_frsize
; u32 f_blocks
;
1386 u32 f_bfree
; u32 f_bavail
; u32 f_files
; u32 f_ffree
; u32 f_favail
;
1387 u32 f_fsid
; char f_basetype
[16];
1388 u32 f_flag
; u32 f_namemax
;
1389 char f_fstr
[32]; u32 f_filler
[16];
1392 asmlinkage
int irix_statvfs(char *fname
, struct irix_statvfs
*buf
)
1394 struct nameidata nd
;
1395 struct kstatfs kbuf
;
1398 printk("[%s:%d] Wheee.. irix_statvfs(%s,%p)\n",
1399 current
->comm
, current
->pid
, fname
, buf
);
1400 if (!access_ok(VERIFY_WRITE
, buf
, sizeof(struct irix_statvfs
))) {
1404 error
= user_path_walk(fname
, &nd
);
1407 error
= vfs_statfs(nd
.dentry
->d_inode
->i_sb
, &kbuf
);
1411 __put_user(kbuf
.f_bsize
, &buf
->f_bsize
);
1412 __put_user(kbuf
.f_frsize
, &buf
->f_frsize
);
1413 __put_user(kbuf
.f_blocks
, &buf
->f_blocks
);
1414 __put_user(kbuf
.f_bfree
, &buf
->f_bfree
);
1415 __put_user(kbuf
.f_bfree
, &buf
->f_bavail
); /* XXX hackety hack... */
1416 __put_user(kbuf
.f_files
, &buf
->f_files
);
1417 __put_user(kbuf
.f_ffree
, &buf
->f_ffree
);
1418 __put_user(kbuf
.f_ffree
, &buf
->f_favail
); /* XXX hackety hack... */
1420 __put_user(kbuf
.f_fsid
.val
[1], &buf
->f_fsid
);
1422 __put_user(kbuf
.f_fsid
.val
[0], &buf
->f_fsid
);
1424 for (i
= 0; i
< 16; i
++)
1425 __put_user(0, &buf
->f_basetype
[i
]);
1426 __put_user(0, &buf
->f_flag
);
1427 __put_user(kbuf
.f_namelen
, &buf
->f_namemax
);
1428 for (i
= 0; i
< 32; i
++)
1429 __put_user(0, &buf
->f_fstr
[i
]);
1439 asmlinkage
int irix_fstatvfs(int fd
, struct irix_statvfs
*buf
)
1441 struct kstatfs kbuf
;
1445 printk("[%s:%d] Wheee.. irix_fstatvfs(%d,%p)\n",
1446 current
->comm
, current
->pid
, fd
, buf
);
1448 if (!access_ok(VERIFY_WRITE
, buf
, sizeof(struct irix_statvfs
))) {
1452 if (!(file
= fget(fd
))) {
1456 error
= vfs_statfs(file
->f_dentry
->d_inode
->i_sb
, &kbuf
);
1460 __put_user(kbuf
.f_bsize
, &buf
->f_bsize
);
1461 __put_user(kbuf
.f_frsize
, &buf
->f_frsize
);
1462 __put_user(kbuf
.f_blocks
, &buf
->f_blocks
);
1463 __put_user(kbuf
.f_bfree
, &buf
->f_bfree
);
1464 __put_user(kbuf
.f_bfree
, &buf
->f_bavail
); /* XXX hackety hack... */
1465 __put_user(kbuf
.f_files
, &buf
->f_files
);
1466 __put_user(kbuf
.f_ffree
, &buf
->f_ffree
);
1467 __put_user(kbuf
.f_ffree
, &buf
->f_favail
); /* XXX hackety hack... */
1469 __put_user(kbuf
.f_fsid
.val
[1], &buf
->f_fsid
);
1471 __put_user(kbuf
.f_fsid
.val
[0], &buf
->f_fsid
);
1473 for(i
= 0; i
< 16; i
++)
1474 __put_user(0, &buf
->f_basetype
[i
]);
1475 __put_user(0, &buf
->f_flag
);
1476 __put_user(kbuf
.f_namelen
, &buf
->f_namemax
);
1477 __clear_user(&buf
->f_fstr
, sizeof(buf
->f_fstr
));
1485 asmlinkage
int irix_priocntl(struct pt_regs
*regs
)
1487 printk("[%s:%d] Wheee.. irix_priocntl()\n",
1488 current
->comm
, current
->pid
);
1493 asmlinkage
int irix_sigqueue(int pid
, int sig
, int code
, int val
)
1495 printk("[%s:%d] Wheee.. irix_sigqueue(%d,%d,%d,%d)\n",
1496 current
->comm
, current
->pid
, pid
, sig
, code
, val
);
1501 asmlinkage
int irix_truncate64(char *name
, int pad
, int size1
, int size2
)
1509 retval
= sys_truncate(name
, size2
);
1515 asmlinkage
int irix_ftruncate64(int fd
, int pad
, int size1
, int size2
)
1523 retval
= sys_ftruncate(fd
, size2
);
1529 asmlinkage
int irix_mmap64(struct pt_regs
*regs
)
1531 int len
, prot
, flags
, fd
, off1
, off2
, error
, base
= 0;
1532 unsigned long addr
, pgoff
, *sp
;
1533 struct file
*file
= NULL
;
1535 if (regs
->regs
[2] == 1000)
1537 sp
= (unsigned long *) (regs
->regs
[29] + 16);
1538 addr
= regs
->regs
[base
+ 4];
1539 len
= regs
->regs
[base
+ 5];
1540 prot
= regs
->regs
[base
+ 6];
1542 flags
= regs
->regs
[base
+ 7];
1543 if (!access_ok(VERIFY_READ
, sp
, (4 * sizeof(unsigned long)))) {
1548 __get_user(off1
, &sp
[1]);
1549 __get_user(off2
, &sp
[2]);
1551 if (!access_ok(VERIFY_READ
, sp
, (5 * sizeof(unsigned long)))) {
1555 __get_user(flags
, &sp
[0]);
1556 __get_user(fd
, &sp
[1]);
1557 __get_user(off1
, &sp
[2]);
1558 __get_user(off2
, &sp
[3]);
1561 if (off1
& PAGE_MASK
) {
1566 pgoff
= (off1
<< (32 - PAGE_SHIFT
)) | (off2
>> PAGE_SHIFT
);
1568 if (!(flags
& MAP_ANONYMOUS
)) {
1569 if (!(file
= fget(fd
))) {
1574 /* Ok, bad taste hack follows, try to think in something else
1575 when reading this */
1576 if (flags
& IRIX_MAP_AUTOGROW
) {
1577 unsigned long old_pos
;
1578 long max_size
= off2
+ len
;
1580 if (max_size
> file
->f_dentry
->d_inode
->i_size
) {
1581 old_pos
= sys_lseek (fd
, max_size
- 1, 0);
1582 sys_write (fd
, "", 1);
1583 sys_lseek (fd
, old_pos
, 0);
1588 flags
&= ~(MAP_EXECUTABLE
| MAP_DENYWRITE
);
1590 down_write(¤t
->mm
->mmap_sem
);
1591 error
= do_mmap_pgoff(file
, addr
, len
, prot
, flags
, pgoff
);
1592 up_write(¤t
->mm
->mmap_sem
);
1601 asmlinkage
int irix_dmi(struct pt_regs
*regs
)
1603 printk("[%s:%d] Wheee.. irix_dmi()\n",
1604 current
->comm
, current
->pid
);
1609 asmlinkage
int irix_pread(int fd
, char *buf
, int cnt
, int off64
,
1612 printk("[%s:%d] Wheee.. irix_pread(%d,%p,%d,%d,%d,%d)\n",
1613 current
->comm
, current
->pid
, fd
, buf
, cnt
, off64
, off1
, off2
);
1618 asmlinkage
int irix_pwrite(int fd
, char *buf
, int cnt
, int off64
,
1621 printk("[%s:%d] Wheee.. irix_pwrite(%d,%p,%d,%d,%d,%d)\n",
1622 current
->comm
, current
->pid
, fd
, buf
, cnt
, off64
, off1
, off2
);
1627 asmlinkage
int irix_sgifastpath(int cmd
, unsigned long arg0
, unsigned long arg1
,
1628 unsigned long arg2
, unsigned long arg3
,
1629 unsigned long arg4
, unsigned long arg5
)
1631 printk("[%s:%d] Wheee.. irix_fastpath(%d,%08lx,%08lx,%08lx,%08lx,"
1633 current
->comm
, current
->pid
, cmd
, arg0
, arg1
, arg2
,
1639 struct irix_statvfs64
{
1640 u32 f_bsize
; u32 f_frsize
;
1641 u64 f_blocks
; u64 f_bfree
; u64 f_bavail
;
1642 u64 f_files
; u64 f_ffree
; u64 f_favail
;
1644 char f_basetype
[16];
1645 u32 f_flag
; u32 f_namemax
;
1650 asmlinkage
int irix_statvfs64(char *fname
, struct irix_statvfs64
*buf
)
1652 struct nameidata nd
;
1653 struct kstatfs kbuf
;
1656 printk("[%s:%d] Wheee.. irix_statvfs64(%s,%p)\n",
1657 current
->comm
, current
->pid
, fname
, buf
);
1658 if (!access_ok(VERIFY_WRITE
, buf
, sizeof(struct irix_statvfs64
))) {
1662 error
= user_path_walk(fname
, &nd
);
1665 error
= vfs_statfs(nd
.dentry
->d_inode
->i_sb
, &kbuf
);
1669 __put_user(kbuf
.f_bsize
, &buf
->f_bsize
);
1670 __put_user(kbuf
.f_frsize
, &buf
->f_frsize
);
1671 __put_user(kbuf
.f_blocks
, &buf
->f_blocks
);
1672 __put_user(kbuf
.f_bfree
, &buf
->f_bfree
);
1673 __put_user(kbuf
.f_bfree
, &buf
->f_bavail
); /* XXX hackety hack... */
1674 __put_user(kbuf
.f_files
, &buf
->f_files
);
1675 __put_user(kbuf
.f_ffree
, &buf
->f_ffree
);
1676 __put_user(kbuf
.f_ffree
, &buf
->f_favail
); /* XXX hackety hack... */
1678 __put_user(kbuf
.f_fsid
.val
[1], &buf
->f_fsid
);
1680 __put_user(kbuf
.f_fsid
.val
[0], &buf
->f_fsid
);
1682 for(i
= 0; i
< 16; i
++)
1683 __put_user(0, &buf
->f_basetype
[i
]);
1684 __put_user(0, &buf
->f_flag
);
1685 __put_user(kbuf
.f_namelen
, &buf
->f_namemax
);
1686 for(i
= 0; i
< 32; i
++)
1687 __put_user(0, &buf
->f_fstr
[i
]);
1697 asmlinkage
int irix_fstatvfs64(int fd
, struct irix_statvfs
*buf
)
1699 struct kstatfs kbuf
;
1703 printk("[%s:%d] Wheee.. irix_fstatvfs64(%d,%p)\n",
1704 current
->comm
, current
->pid
, fd
, buf
);
1706 if (!access_ok(VERIFY_WRITE
, buf
, sizeof(struct irix_statvfs
))) {
1710 if (!(file
= fget(fd
))) {
1714 error
= vfs_statfs(file
->f_dentry
->d_inode
->i_sb
, &kbuf
);
1718 __put_user(kbuf
.f_bsize
, &buf
->f_bsize
);
1719 __put_user(kbuf
.f_frsize
, &buf
->f_frsize
);
1720 __put_user(kbuf
.f_blocks
, &buf
->f_blocks
);
1721 __put_user(kbuf
.f_bfree
, &buf
->f_bfree
);
1722 __put_user(kbuf
.f_bfree
, &buf
->f_bavail
); /* XXX hackety hack... */
1723 __put_user(kbuf
.f_files
, &buf
->f_files
);
1724 __put_user(kbuf
.f_ffree
, &buf
->f_ffree
);
1725 __put_user(kbuf
.f_ffree
, &buf
->f_favail
); /* XXX hackety hack... */
1727 __put_user(kbuf
.f_fsid
.val
[1], &buf
->f_fsid
);
1729 __put_user(kbuf
.f_fsid
.val
[0], &buf
->f_fsid
);
1731 for(i
= 0; i
< 16; i
++)
1732 __put_user(0, &buf
->f_basetype
[i
]);
1733 __put_user(0, &buf
->f_flag
);
1734 __put_user(kbuf
.f_namelen
, &buf
->f_namemax
);
1735 __clear_user(buf
->f_fstr
, sizeof(buf
->f_fstr
[i
]));
1743 asmlinkage
int irix_getmountid(char *fname
, unsigned long *midbuf
)
1747 printk("[%s:%d] irix_getmountid(%s, %p)\n",
1748 current
->comm
, current
->pid
, fname
, midbuf
);
1749 if (!access_ok(VERIFY_WRITE
, midbuf
, (sizeof(unsigned long) * 4)))
1753 * The idea with this system call is that when trying to determine
1754 * 'pwd' and it's a toss-up for some reason, userland can use the
1755 * fsid of the filesystem to try and make the right decision, but
1756 * we don't have this so for now. XXX
1758 err
|= __put_user(0, &midbuf
[0]);
1759 err
|= __put_user(0, &midbuf
[1]);
1760 err
|= __put_user(0, &midbuf
[2]);
1761 err
|= __put_user(0, &midbuf
[3]);
1766 asmlinkage
int irix_nsproc(unsigned long entry
, unsigned long mask
,
1767 unsigned long arg
, unsigned long sp
, int slen
)
1769 printk("[%s:%d] Wheee.. irix_nsproc(%08lx,%08lx,%08lx,%08lx,%d)\n",
1770 current
->comm
, current
->pid
, entry
, mask
, arg
, sp
, slen
);
1775 #undef DEBUG_GETDENTS
1777 struct irix_dirent32
{
1780 unsigned short d_reclen
;
1784 struct irix_dirent32_callback
{
1785 struct irix_dirent32
*current_dir
;
1786 struct irix_dirent32
*previous
;
1791 #define NAME_OFFSET32(de) ((int) ((de)->d_name - (char *) (de)))
1792 #define ROUND_UP32(x) (((x)+sizeof(u32)-1) & ~(sizeof(u32)-1))
1794 static int irix_filldir32(void *__buf
, const char *name
, int namlen
,
1795 loff_t offset
, ino_t ino
, unsigned int d_type
)
1797 struct irix_dirent32
*dirent
;
1798 struct irix_dirent32_callback
*buf
=
1799 (struct irix_dirent32_callback
*)__buf
;
1800 unsigned short reclen
= ROUND_UP32(NAME_OFFSET32(dirent
) + namlen
+ 1);
1802 #ifdef DEBUG_GETDENTS
1803 printk("\nirix_filldir32[reclen<%d>namlen<%d>count<%d>]",
1804 reclen
, namlen
, buf
->count
);
1806 buf
->error
= -EINVAL
; /* only used if we fail.. */
1807 if (reclen
> buf
->count
)
1809 dirent
= buf
->previous
;
1811 __put_user(offset
, &dirent
->d_off
);
1812 dirent
= buf
->current_dir
;
1813 buf
->previous
= dirent
;
1814 __put_user(ino
, &dirent
->d_ino
);
1815 __put_user(reclen
, &dirent
->d_reclen
);
1816 copy_to_user(dirent
->d_name
, name
, namlen
);
1817 __put_user(0, &dirent
->d_name
[namlen
]);
1818 ((char *) dirent
) += reclen
;
1819 buf
->current_dir
= dirent
;
1820 buf
->count
-= reclen
;
1825 asmlinkage
int irix_ngetdents(unsigned int fd
, void * dirent
,
1826 unsigned int count
, int *eob
)
1829 struct irix_dirent32
*lastdirent
;
1830 struct irix_dirent32_callback buf
;
1833 #ifdef DEBUG_GETDENTS
1834 printk("[%s:%d] ngetdents(%d, %p, %d, %p) ", current
->comm
,
1835 current
->pid
, fd
, dirent
, count
, eob
);
1842 buf
.current_dir
= (struct irix_dirent32
*) dirent
;
1843 buf
.previous
= NULL
;
1847 error
= vfs_readdir(file
, irix_filldir32
, &buf
);
1852 lastdirent
= buf
.previous
;
1854 put_user(file
->f_pos
, &lastdirent
->d_off
);
1855 error
= count
- buf
.count
;
1858 if (put_user(0, eob
) < 0) {
1863 #ifdef DEBUG_GETDENTS
1864 printk("eob=%d returning %d\n", *eob
, count
- buf
.count
);
1866 error
= count
- buf
.count
;
1874 struct irix_dirent64
{
1877 unsigned short d_reclen
;
1881 struct irix_dirent64_callback
{
1882 struct irix_dirent64
*curr
;
1883 struct irix_dirent64
*previous
;
1888 #define NAME_OFFSET64(de) ((int) ((de)->d_name - (char *) (de)))
1889 #define ROUND_UP64(x) (((x)+sizeof(u64)-1) & ~(sizeof(u64)-1))
1891 static int irix_filldir64(void * __buf
, const char * name
, int namlen
,
1892 loff_t offset
, ino_t ino
, unsigned int d_type
)
1894 struct irix_dirent64
*dirent
;
1895 struct irix_dirent64_callback
* buf
=
1896 (struct irix_dirent64_callback
*) __buf
;
1897 unsigned short reclen
= ROUND_UP64(NAME_OFFSET64(dirent
) + namlen
+ 1);
1899 buf
->error
= -EINVAL
; /* only used if we fail.. */
1900 if (reclen
> buf
->count
)
1902 dirent
= buf
->previous
;
1904 __put_user(offset
, &dirent
->d_off
);
1906 buf
->previous
= dirent
;
1907 __put_user(ino
, &dirent
->d_ino
);
1908 __put_user(reclen
, &dirent
->d_reclen
);
1909 __copy_to_user(dirent
->d_name
, name
, namlen
);
1910 __put_user(0, &dirent
->d_name
[namlen
]);
1911 ((char *) dirent
) += reclen
;
1913 buf
->count
-= reclen
;
1918 asmlinkage
int irix_getdents64(int fd
, void *dirent
, int cnt
)
1921 struct irix_dirent64
*lastdirent
;
1922 struct irix_dirent64_callback buf
;
1925 #ifdef DEBUG_GETDENTS
1926 printk("[%s:%d] getdents64(%d, %p, %d) ", current
->comm
,
1927 current
->pid
, fd
, dirent
, cnt
);
1930 if (!(file
= fget(fd
)))
1934 if (!access_ok(VERIFY_WRITE
, dirent
, cnt
))
1938 if (cnt
< (sizeof(struct irix_dirent64
) + 255))
1941 buf
.curr
= (struct irix_dirent64
*) dirent
;
1942 buf
.previous
= NULL
;
1945 error
= vfs_readdir(file
, irix_filldir64
, &buf
);
1948 lastdirent
= buf
.previous
;
1953 lastdirent
->d_off
= (u64
) file
->f_pos
;
1954 #ifdef DEBUG_GETDENTS
1955 printk("returning %d\n", cnt
- buf
.count
);
1957 error
= cnt
- buf
.count
;
1965 asmlinkage
int irix_ngetdents64(int fd
, void *dirent
, int cnt
, int *eob
)
1968 struct irix_dirent64
*lastdirent
;
1969 struct irix_dirent64_callback buf
;
1972 #ifdef DEBUG_GETDENTS
1973 printk("[%s:%d] ngetdents64(%d, %p, %d) ", current
->comm
,
1974 current
->pid
, fd
, dirent
, cnt
);
1977 if (!(file
= fget(fd
)))
1981 if (!access_ok(VERIFY_WRITE
, dirent
, cnt
) ||
1982 !access_ok(VERIFY_WRITE
, eob
, sizeof(*eob
)))
1986 if (cnt
< (sizeof(struct irix_dirent64
) + 255))
1990 buf
.curr
= (struct irix_dirent64
*) dirent
;
1991 buf
.previous
= NULL
;
1994 error
= vfs_readdir(file
, irix_filldir64
, &buf
);
1997 lastdirent
= buf
.previous
;
2002 lastdirent
->d_off
= (u64
) file
->f_pos
;
2003 #ifdef DEBUG_GETDENTS
2004 printk("eob=%d returning %d\n", *eob
, cnt
- buf
.count
);
2006 error
= cnt
- buf
.count
;
2014 asmlinkage
int irix_uadmin(unsigned long op
, unsigned long func
, unsigned long arg
)
2021 printk("[%s:%d] irix_uadmin: Wants to reboot...\n",
2022 current
->comm
, current
->pid
);
2028 printk("[%s:%d] irix_uadmin: Wants to shutdown...\n",
2029 current
->comm
, current
->pid
);
2035 printk("[%s:%d] irix_uadmin: Wants to remount root...\n",
2036 current
->comm
, current
->pid
);
2041 /* Kill all tasks. */
2042 printk("[%s:%d] irix_uadmin: Wants to kill all tasks...\n",
2043 current
->comm
, current
->pid
);
2048 /* Set magic mushrooms... */
2049 printk("[%s:%d] irix_uadmin: Wants to set magic mushroom[%d]...\n",
2050 current
->comm
, current
->pid
, (int) func
);
2055 printk("[%s:%d] irix_uadmin: Unknown operation [%d]...\n",
2056 current
->comm
, current
->pid
, (int) op
);
2065 asmlinkage
int irix_utssys(char *inbuf
, int arg
, int type
, char *outbuf
)
2072 retval
= irix_uname((struct iuname
*)inbuf
);
2077 printk("[%s:%d] irix_utssys: Wants to do ustat()\n",
2078 current
->comm
, current
->pid
);
2084 printk("[%s:%d] irix_utssys: Wants to do fusers()\n",
2085 current
->comm
, current
->pid
);
2090 printk("[%s:%d] irix_utssys: Wants to do unknown type[%d]\n",
2091 current
->comm
, current
->pid
, (int) type
);
2102 #define IRIX_F_ALLOCSP 10
2104 asmlinkage
int irix_fcntl(int fd
, int cmd
, int arg
)
2109 printk("[%s:%d] irix_fcntl(%d, %d, %d) ", current
->comm
,
2110 current
->pid
, fd
, cmd
, arg
);
2112 if (cmd
== IRIX_F_ALLOCSP
){
2115 retval
= sys_fcntl(fd
, cmd
, arg
);
2117 printk("%d\n", retval
);
2122 asmlinkage
int irix_ulimit(int cmd
, int arg
)
2128 printk("[%s:%d] irix_ulimit: Wants to get file size limit.\n",
2129 current
->comm
, current
->pid
);
2134 printk("[%s:%d] irix_ulimit: Wants to set file size limit.\n",
2135 current
->comm
, current
->pid
);
2140 printk("[%s:%d] irix_ulimit: Wants to get brk limit.\n",
2141 current
->comm
, current
->pid
);
2147 printk("[%s:%d] irix_ulimit: Wants to get fd limit.\n",
2148 current
->comm
, current
->pid
);
2152 retval
= current
->signal
->rlim
[RLIMIT_NOFILE
].rlim_cur
;
2156 printk("[%s:%d] irix_ulimit: Wants to get txt offset.\n",
2157 current
->comm
, current
->pid
);
2162 printk("[%s:%d] irix_ulimit: Unknown command [%d].\n",
2163 current
->comm
, current
->pid
, cmd
);
2171 asmlinkage
int irix_unimp(struct pt_regs
*regs
)
2173 printk("irix_unimp [%s:%d] v0=%d v1=%d a0=%08lx a1=%08lx a2=%08lx "
2174 "a3=%08lx\n", current
->comm
, current
->pid
,
2175 (int) regs
->regs
[2], (int) regs
->regs
[3],
2176 regs
->regs
[4], regs
->regs
[5], regs
->regs
[6], regs
->regs
[7]);