2 * Implementation of various system calls for Linux/PowerPC
4 * Copyright (C) 1995-1996 Gary Thomas (gdt@linuxppc.org)
6 * Derived from "arch/i386/kernel/sys_i386.c"
7 * Adapted from the i386 version by Gary Thomas
8 * Modified by Cort Dougan (cort@cs.nmt.edu)
9 * and Paul Mackerras (paulus@cs.anu.edu.au).
11 * This file contains various random system calls that
12 * have a non-standard calling sequence on the Linux/PPC
15 * This program is free software; you can redistribute it and/or
16 * modify it under the terms of the GNU General Public License
17 * as published by the Free Software Foundation; either version
18 * 2 of the License, or (at your option) any later version.
22 #include <linux/errno.h>
23 #include <linux/sched.h>
24 #include <linux/syscalls.h>
27 #include <linux/smp.h>
28 #include <linux/sem.h>
29 #include <linux/msg.h>
30 #include <linux/shm.h>
31 #include <linux/stat.h>
32 #include <linux/mman.h>
33 #include <linux/sys.h>
34 #include <linux/ipc.h>
35 #include <linux/utsname.h>
36 #include <linux/file.h>
37 #include <linux/init.h>
38 #include <linux/personality.h>
40 #include <asm/uaccess.h>
41 #include <asm/syscalls.h>
43 #include <asm/unistd.h>
46 * sys_ipc() is the de-multiplexer for the SysV IPC calls..
48 * This is really horribly ugly.
50 int sys_ipc(uint call
, int first
, unsigned long second
, long third
,
51 void __user
*ptr
, long fifth
)
55 version
= call
>> 16; /* hack for backward compatibility */
61 ret
= sys_semtimedop(first
, (struct sembuf __user
*)ptr
,
62 (unsigned)second
, NULL
);
65 ret
= sys_semtimedop(first
, (struct sembuf __user
*)ptr
,
67 (const struct timespec __user
*) fifth
);
70 ret
= sys_semget (first
, (int)second
, third
);
78 if ((ret
= get_user(fourth
.__pad
, (void __user
* __user
*)ptr
)))
80 ret
= sys_semctl(first
, (int)second
, third
, fourth
);
84 ret
= sys_msgsnd(first
, (struct msgbuf __user
*)ptr
,
85 (size_t)second
, third
);
90 struct ipc_kludge tmp
;
95 if ((ret
= copy_from_user(&tmp
,
96 (struct ipc_kludge __user
*) ptr
,
97 sizeof (tmp
)) ? -EFAULT
: 0))
99 ret
= sys_msgrcv(first
, tmp
.msgp
, (size_t) second
,
104 ret
= sys_msgrcv (first
, (struct msgbuf __user
*) ptr
,
105 (size_t)second
, fifth
, third
);
110 ret
= sys_msgget((key_t
)first
, (int)second
);
113 ret
= sys_msgctl(first
, (int)second
,
114 (struct msqid_ds __user
*)ptr
);
118 ret
= do_shmat(first
, (char __user
*)ptr
, (int)second
, &raddr
);
121 ret
= put_user(raddr
, (ulong __user
*) third
);
125 ret
= sys_shmdt((char __user
*)ptr
);
128 ret
= sys_shmget(first
, (size_t)second
, third
);
131 ret
= sys_shmctl(first
, (int)second
,
132 (struct shmid_ds __user
*)ptr
);
140 * sys_pipe() is the normal C calling standard for creating
141 * a pipe. It's not the way unix traditionally does this, though.
143 int sys_pipe(int __user
*fildes
)
150 if (copy_to_user(fildes
, fd
, 2*sizeof(int)))
156 static inline unsigned long do_mmap2(unsigned long addr
, size_t len
,
157 unsigned long prot
, unsigned long flags
,
158 unsigned long fd
, unsigned long off
, int shift
)
160 struct file
* file
= NULL
;
161 unsigned long ret
= -EINVAL
;
164 if (off
& ((1 << shift
) - 1))
170 if (!(flags
& MAP_ANONYMOUS
)) {
171 if (!(file
= fget(fd
)))
175 flags
&= ~(MAP_EXECUTABLE
| MAP_DENYWRITE
);
177 down_write(¤t
->mm
->mmap_sem
);
178 ret
= do_mmap_pgoff(file
, addr
, len
, prot
, flags
, off
);
179 up_write(¤t
->mm
->mmap_sem
);
186 unsigned long sys_mmap2(unsigned long addr
, size_t len
,
187 unsigned long prot
, unsigned long flags
,
188 unsigned long fd
, unsigned long pgoff
)
190 return do_mmap2(addr
, len
, prot
, flags
, fd
, pgoff
, PAGE_SHIFT
-12);
193 unsigned long sys_mmap(unsigned long addr
, size_t len
,
194 unsigned long prot
, unsigned long flags
,
195 unsigned long fd
, off_t offset
)
197 return do_mmap2(addr
, len
, prot
, flags
, fd
, offset
, PAGE_SHIFT
);
202 * Due to some executables calling the wrong select we sometimes
203 * get wrong args. This determines how the args are being passed
204 * (a single ptr to them all args passed) then calls
205 * sys_select() with the appropriate args. -- Cort
208 ppc_select(int n
, fd_set __user
*inp
, fd_set __user
*outp
, fd_set __user
*exp
, struct timeval __user
*tvp
)
210 if ( (unsigned long)n
>= 4096 )
212 unsigned long __user
*buffer
= (unsigned long __user
*)n
;
213 if (!access_ok(VERIFY_READ
, buffer
, 5*sizeof(unsigned long))
214 || __get_user(n
, buffer
)
215 || __get_user(inp
, ((fd_set __user
* __user
*)(buffer
+1)))
216 || __get_user(outp
, ((fd_set __user
* __user
*)(buffer
+2)))
217 || __get_user(exp
, ((fd_set __user
* __user
*)(buffer
+3)))
218 || __get_user(tvp
, ((struct timeval __user
* __user
*)(buffer
+4))))
221 return sys_select(n
, inp
, outp
, exp
, tvp
);
226 long ppc64_personality(unsigned long personality
)
230 if (personality(current
->personality
) == PER_LINUX32
231 && personality
== PER_LINUX
)
232 personality
= PER_LINUX32
;
233 ret
= sys_personality(personality
);
234 if (ret
== PER_LINUX32
)
241 #define OVERRIDE_MACHINE (personality(current->personality) == PER_LINUX32)
243 #define OVERRIDE_MACHINE 0
246 static inline int override_machine(char __user
*mach
)
248 if (OVERRIDE_MACHINE
) {
249 /* change ppc64 to ppc */
250 if (__put_user(0, mach
+3) || __put_user(0, mach
+4))
256 long ppc_newuname(struct new_utsname __user
* name
)
261 if (copy_to_user(name
, utsname(), sizeof(*name
)))
265 err
= override_machine(name
->machine
);
269 int sys_uname(struct old_utsname __user
*name
)
274 if (copy_to_user(name
, utsname(), sizeof(*name
)))
278 err
= override_machine(name
->machine
);
282 int sys_olduname(struct oldold_utsname __user
*name
)
286 if (!access_ok(VERIFY_WRITE
, name
, sizeof(struct oldold_utsname
)))
290 error
= __copy_to_user(&name
->sysname
, &utsname()->sysname
,
292 error
|= __put_user(0, name
->sysname
+ __OLD_UTS_LEN
);
293 error
|= __copy_to_user(&name
->nodename
, &utsname()->nodename
,
295 error
|= __put_user(0, name
->nodename
+ __OLD_UTS_LEN
);
296 error
|= __copy_to_user(&name
->release
, &utsname()->release
,
298 error
|= __put_user(0, name
->release
+ __OLD_UTS_LEN
);
299 error
|= __copy_to_user(&name
->version
, &utsname()->version
,
301 error
|= __put_user(0, name
->version
+ __OLD_UTS_LEN
);
302 error
|= __copy_to_user(&name
->machine
, &utsname()->machine
,
304 error
|= override_machine(name
->machine
);
307 return error
? -EFAULT
: 0;
310 long ppc_fadvise64_64(int fd
, int advice
, u32 offset_high
, u32 offset_low
,
311 u32 len_high
, u32 len_low
)
313 return sys_fadvise64(fd
, (u64
)offset_high
<< 32 | offset_low
,
314 (u64
)len_high
<< 32 | len_low
, advice
);
317 void do_show_syscall(unsigned long r3
, unsigned long r4
, unsigned long r5
,
318 unsigned long r6
, unsigned long r7
, unsigned long r8
,
319 struct pt_regs
*regs
)
321 printk("syscall %ld(%lx, %lx, %lx, %lx, %lx, %lx) regs=%p current=%p"
322 " cpu=%d\n", regs
->gpr
[0], r3
, r4
, r5
, r6
, r7
, r8
, regs
,
323 current
, smp_processor_id());
326 void do_show_syscall_exit(unsigned long r3
)
328 printk(" -> %lx, current=%p cpu=%d\n", r3
, current
, smp_processor_id());