1 /* $Id: fs.c,v 1.27 2002/02/08 03:57:14 davem Exp $
2 * fs.c: fs related syscall emulation for Solaris
4 * Copyright (C) 1997,1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
6 * 1999-08-19 Implemented solaris F_FREESP (truncate)
7 * fcntl, by Jason Rappleye (rappleye@ccr.buffalo.edu)
10 #include <linux/types.h>
11 #include <linux/sched.h>
12 #include <linux/slab.h>
13 #include <linux/capability.h>
15 #include <linux/namei.h>
17 #include <linux/file.h>
18 #include <linux/stat.h>
19 #include <linux/smp_lock.h>
20 #include <linux/limits.h>
21 #include <linux/resource.h>
22 #include <linux/quotaops.h>
23 #include <linux/mount.h>
24 #include <linux/vfs.h>
26 #include <asm/uaccess.h>
27 #include <asm/string.h>
28 #include <asm/ptrace.h>
42 s32 st_pad1
[3]; /* network id */
51 s32 st_pad3
; /* st_size, off_t expansion */
52 timestruct_t st_atime
;
53 timestruct_t st_mtime
;
54 timestruct_t st_ctime
;
58 s32 st_pad4
[8]; /* expansion area */
63 s32 st_pad1
[3]; /* network id */
72 timestruct_t st_atime
;
73 timestruct_t st_mtime
;
74 timestruct_t st_ctime
;
78 s32 st_pad4
[4]; /* expansion area */
81 #define UFSMAGIC (((unsigned)'u'<<24)||((unsigned)'f'<<16)||((unsigned)'s'<<8))
83 static inline int putstat(struct sol_stat __user
*ubuf
, struct kstat
*kbuf
)
87 if (kbuf
->size
> MAX_NON_LFS
||
88 !sysv_valid_dev(kbuf
->dev
) ||
89 !sysv_valid_dev(kbuf
->rdev
))
92 if (sizeof(ino
) < sizeof(kbuf
->ino
) && ino
!= kbuf
->ino
)
94 if (put_user (sysv_encode_dev(kbuf
->dev
), &ubuf
->st_dev
) ||
95 __put_user (ino
, &ubuf
->st_ino
) ||
96 __put_user (kbuf
->mode
, &ubuf
->st_mode
) ||
97 __put_user (kbuf
->nlink
, &ubuf
->st_nlink
) ||
98 __put_user (kbuf
->uid
, &ubuf
->st_uid
) ||
99 __put_user (kbuf
->gid
, &ubuf
->st_gid
) ||
100 __put_user (sysv_encode_dev(kbuf
->rdev
), &ubuf
->st_rdev
) ||
101 __put_user (kbuf
->size
, &ubuf
->st_size
) ||
102 __put_user (kbuf
->atime
.tv_sec
, &ubuf
->st_atime
.tv_sec
) ||
103 __put_user (kbuf
->atime
.tv_nsec
, &ubuf
->st_atime
.tv_nsec
) ||
104 __put_user (kbuf
->mtime
.tv_sec
, &ubuf
->st_mtime
.tv_sec
) ||
105 __put_user (kbuf
->mtime
.tv_nsec
, &ubuf
->st_mtime
.tv_nsec
) ||
106 __put_user (kbuf
->ctime
.tv_sec
, &ubuf
->st_ctime
.tv_sec
) ||
107 __put_user (kbuf
->ctime
.tv_nsec
, &ubuf
->st_ctime
.tv_nsec
) ||
108 __put_user (kbuf
->blksize
, &ubuf
->st_blksize
) ||
109 __put_user (kbuf
->blocks
, &ubuf
->st_blocks
) ||
110 __put_user (UFSMAGIC
, (unsigned __user
*)ubuf
->st_fstype
))
115 static inline int putstat64(struct sol_stat64 __user
*ubuf
, struct kstat
*kbuf
)
117 if (!sysv_valid_dev(kbuf
->dev
) || !sysv_valid_dev(kbuf
->rdev
))
119 if (put_user (sysv_encode_dev(kbuf
->dev
), &ubuf
->st_dev
) ||
120 __put_user (kbuf
->ino
, &ubuf
->st_ino
) ||
121 __put_user (kbuf
->mode
, &ubuf
->st_mode
) ||
122 __put_user (kbuf
->nlink
, &ubuf
->st_nlink
) ||
123 __put_user (kbuf
->uid
, &ubuf
->st_uid
) ||
124 __put_user (kbuf
->gid
, &ubuf
->st_gid
) ||
125 __put_user (sysv_encode_dev(kbuf
->rdev
), &ubuf
->st_rdev
) ||
126 __put_user (kbuf
->size
, &ubuf
->st_size
) ||
127 __put_user (kbuf
->atime
.tv_sec
, &ubuf
->st_atime
.tv_sec
) ||
128 __put_user (kbuf
->atime
.tv_nsec
, &ubuf
->st_atime
.tv_nsec
) ||
129 __put_user (kbuf
->mtime
.tv_sec
, &ubuf
->st_mtime
.tv_sec
) ||
130 __put_user (kbuf
->mtime
.tv_nsec
, &ubuf
->st_mtime
.tv_nsec
) ||
131 __put_user (kbuf
->ctime
.tv_sec
, &ubuf
->st_ctime
.tv_sec
) ||
132 __put_user (kbuf
->ctime
.tv_nsec
, &ubuf
->st_ctime
.tv_nsec
) ||
133 __put_user (kbuf
->blksize
, &ubuf
->st_blksize
) ||
134 __put_user (kbuf
->blocks
, &ubuf
->st_blocks
) ||
135 __put_user (UFSMAGIC
, (unsigned __user
*)ubuf
->st_fstype
))
140 asmlinkage
int solaris_stat(u32 filename
, u32 statbuf
)
143 int ret
= vfs_stat(A(filename
), &s
);
145 return putstat(A(statbuf
), &s
);
149 asmlinkage
int solaris_xstat(int vers
, u32 filename
, u32 statbuf
)
151 /* Solaris doesn't bother with looking at vers, so we do neither */
152 return solaris_stat(filename
, statbuf
);
155 asmlinkage
int solaris_stat64(u32 filename
, u32 statbuf
)
158 int ret
= vfs_stat(A(filename
), &s
);
160 return putstat64(A(statbuf
), &s
);
164 asmlinkage
int solaris_lstat(u32 filename
, u32 statbuf
)
167 int ret
= vfs_lstat(A(filename
), &s
);
169 return putstat(A(statbuf
), &s
);
173 asmlinkage
int solaris_lxstat(int vers
, u32 filename
, u32 statbuf
)
175 return solaris_lstat(filename
, statbuf
);
178 asmlinkage
int solaris_lstat64(u32 filename
, u32 statbuf
)
181 int ret
= vfs_lstat(A(filename
), &s
);
183 return putstat64(A(statbuf
), &s
);
187 asmlinkage
int solaris_fstat(unsigned int fd
, u32 statbuf
)
190 int ret
= vfs_fstat(fd
, &s
);
192 return putstat(A(statbuf
), &s
);
196 asmlinkage
int solaris_fxstat(int vers
, u32 fd
, u32 statbuf
)
198 return solaris_fstat(fd
, statbuf
);
201 asmlinkage
int solaris_fstat64(unsigned int fd
, u32 statbuf
)
204 int ret
= vfs_fstat(fd
, &s
);
206 return putstat64(A(statbuf
), &s
);
210 asmlinkage
int solaris_mknod(u32 path
, u32 mode
, s32 dev
)
212 int (*sys_mknod
)(const char __user
*,int,unsigned) =
213 (int (*)(const char __user
*,int,unsigned))SYS(mknod
);
214 int major
= sysv_major(dev
);
215 int minor
= sysv_minor(dev
);
217 /* minor is guaranteed to be OK for MKDEV, major might be not */
220 return sys_mknod(A(path
), mode
, new_encode_dev(MKDEV(major
,minor
)));
223 asmlinkage
int solaris_xmknod(int vers
, u32 path
, u32 mode
, s32 dev
)
225 return solaris_mknod(path
, mode
, dev
);
228 asmlinkage
int solaris_getdents64(unsigned int fd
, void __user
*dirent
, unsigned int count
)
230 int (*sys_getdents
)(unsigned int, void __user
*, unsigned int) =
231 (int (*)(unsigned int, void __user
*, unsigned int))SYS(getdents
);
233 return sys_getdents(fd
, dirent
, count
);
236 /* This statfs thingie probably will go in the near future, but... */
250 asmlinkage
int solaris_statfs(u32 path
, u32 buf
, int len
, int fstype
)
254 mm_segment_t old_fs
= get_fs();
255 int (*sys_statfs
)(const char __user
*,struct statfs __user
*) =
256 (int (*)(const char __user
*,struct statfs __user
*))SYS(statfs
);
257 struct sol_statfs __user
*ss
= A(buf
);
259 if (len
!= sizeof(struct sol_statfs
)) return -EINVAL
;
261 /* FIXME: mixing userland and kernel pointers */
263 ret
= sys_statfs(A(path
), &s
);
266 if (put_user (s
.f_type
, &ss
->f_type
) ||
267 __put_user (s
.f_bsize
, &ss
->f_bsize
) ||
268 __put_user (0, &ss
->f_frsize
) ||
269 __put_user (s
.f_blocks
, &ss
->f_blocks
) ||
270 __put_user (s
.f_bfree
, &ss
->f_bfree
) ||
271 __put_user (s
.f_files
, &ss
->f_files
) ||
272 __put_user (s
.f_ffree
, &ss
->f_ffree
) ||
273 __clear_user (&ss
->f_fname
, 12))
278 /* Linux can't stat unmounted filesystems so we
279 * simply lie and claim 100MB of 1GB is free. Sorry.
281 if (put_user (fstype
, &ss
->f_type
) ||
282 __put_user (1024, &ss
->f_bsize
) ||
283 __put_user (0, &ss
->f_frsize
) ||
284 __put_user (1024*1024, &ss
->f_blocks
) ||
285 __put_user (100*1024, &ss
->f_bfree
) ||
286 __put_user (60000, &ss
->f_files
) ||
287 __put_user (50000, &ss
->f_ffree
) ||
288 __clear_user (&ss
->f_fname
, 12))
293 asmlinkage
int solaris_fstatfs(u32 fd
, u32 buf
, int len
, int fstype
)
297 mm_segment_t old_fs
= get_fs();
298 int (*sys_fstatfs
)(unsigned,struct statfs __user
*) =
299 (int (*)(unsigned,struct statfs __user
*))SYS(fstatfs
);
300 struct sol_statfs __user
*ss
= A(buf
);
302 if (len
!= sizeof(struct sol_statfs
)) return -EINVAL
;
305 ret
= sys_fstatfs(fd
, &s
);
308 if (put_user (s
.f_type
, &ss
->f_type
) ||
309 __put_user (s
.f_bsize
, &ss
->f_bsize
) ||
310 __put_user (0, &ss
->f_frsize
) ||
311 __put_user (s
.f_blocks
, &ss
->f_blocks
) ||
312 __put_user (s
.f_bfree
, &ss
->f_bfree
) ||
313 __put_user (s
.f_files
, &ss
->f_files
) ||
314 __put_user (s
.f_ffree
, &ss
->f_ffree
) ||
315 __clear_user (&ss
->f_fname
, 12))
320 /* Otherwise fstatfs is the same as statfs */
321 return solaris_statfs(0, buf
, len
, fstype
);
341 struct sol_statvfs64
{
358 static int report_statvfs(struct vfsmount
*mnt
, struct inode
*inode
, u32 buf
)
362 struct sol_statvfs __user
*ss
= A(buf
);
364 error
= vfs_statfs(mnt
->mnt_root
, &s
);
366 const char *p
= mnt
->mnt_sb
->s_type
->name
;
371 if (IS_RDONLY(inode
)) i
= 1;
372 if (mnt
->mnt_flags
& MNT_NOSUID
) i
|= 2;
373 if (!sysv_valid_dev(inode
->i_sb
->s_dev
))
375 if (put_user (s
.f_bsize
, &ss
->f_bsize
) ||
376 __put_user (0, &ss
->f_frsize
) ||
377 __put_user (s
.f_blocks
, &ss
->f_blocks
) ||
378 __put_user (s
.f_bfree
, &ss
->f_bfree
) ||
379 __put_user (s
.f_bavail
, &ss
->f_bavail
) ||
380 __put_user (s
.f_files
, &ss
->f_files
) ||
381 __put_user (s
.f_ffree
, &ss
->f_ffree
) ||
382 __put_user (s
.f_ffree
, &ss
->f_favail
) ||
383 __put_user (sysv_encode_dev(inode
->i_sb
->s_dev
), &ss
->f_fsid
) ||
384 __copy_to_user (ss
->f_basetype
,p
,j
) ||
385 __put_user (0, (char __user
*)&ss
->f_basetype
[j
]) ||
386 __put_user (s
.f_namelen
, &ss
->f_namemax
) ||
387 __put_user (i
, &ss
->f_flag
) ||
388 __clear_user (&ss
->f_fstr
, 32))
394 static int report_statvfs64(struct vfsmount
*mnt
, struct inode
*inode
, u32 buf
)
398 struct sol_statvfs64 __user
*ss
= A(buf
);
400 error
= vfs_statfs(mnt
->mnt_root
, &s
);
402 const char *p
= mnt
->mnt_sb
->s_type
->name
;
407 if (IS_RDONLY(inode
)) i
= 1;
408 if (mnt
->mnt_flags
& MNT_NOSUID
) i
|= 2;
409 if (!sysv_valid_dev(inode
->i_sb
->s_dev
))
411 if (put_user (s
.f_bsize
, &ss
->f_bsize
) ||
412 __put_user (0, &ss
->f_frsize
) ||
413 __put_user (s
.f_blocks
, &ss
->f_blocks
) ||
414 __put_user (s
.f_bfree
, &ss
->f_bfree
) ||
415 __put_user (s
.f_bavail
, &ss
->f_bavail
) ||
416 __put_user (s
.f_files
, &ss
->f_files
) ||
417 __put_user (s
.f_ffree
, &ss
->f_ffree
) ||
418 __put_user (s
.f_ffree
, &ss
->f_favail
) ||
419 __put_user (sysv_encode_dev(inode
->i_sb
->s_dev
), &ss
->f_fsid
) ||
420 __copy_to_user (ss
->f_basetype
,p
,j
) ||
421 __put_user (0, (char __user
*)&ss
->f_basetype
[j
]) ||
422 __put_user (s
.f_namelen
, &ss
->f_namemax
) ||
423 __put_user (i
, &ss
->f_flag
) ||
424 __clear_user (&ss
->f_fstr
, 32))
430 asmlinkage
int solaris_statvfs(u32 path
, u32 buf
)
435 error
= user_path_walk(A(path
),&nd
);
437 struct inode
* inode
= nd
.dentry
->d_inode
;
438 error
= report_statvfs(nd
.mnt
, inode
, buf
);
444 asmlinkage
int solaris_fstatvfs(unsigned int fd
, u32 buf
)
452 error
= report_statvfs(file
->f_path
.mnt
, file
->f_path
.dentry
->d_inode
, buf
);
459 asmlinkage
int solaris_statvfs64(u32 path
, u32 buf
)
465 error
= user_path_walk(A(path
), &nd
);
467 struct inode
* inode
= nd
.dentry
->d_inode
;
468 error
= report_statvfs64(nd
.mnt
, inode
, buf
);
475 asmlinkage
int solaris_fstatvfs64(unsigned int fd
, u32 buf
)
484 error
= report_statvfs64(file
->f_path
.mnt
, file
->f_path
.dentry
->d_inode
, buf
);
491 extern asmlinkage
long sparc32_open(const char * filename
, int flags
, int mode
);
493 asmlinkage
int solaris_open(u32 fname
, int flags
, u32 mode
)
495 const char *filename
= (const char *)(long)fname
;
496 int fl
= flags
& 0xf;
498 /* Translate flags first. */
499 if (flags
& 0x2000) fl
|= O_LARGEFILE
;
500 if (flags
& 0x8050) fl
|= O_SYNC
;
501 if (flags
& 0x80) fl
|= O_NONBLOCK
;
502 if (flags
& 0x100) fl
|= O_CREAT
;
503 if (flags
& 0x200) fl
|= O_TRUNC
;
504 if (flags
& 0x400) fl
|= O_EXCL
;
505 if (flags
& 0x800) fl
|= O_NOCTTY
;
508 return sparc32_open(filename
, flags
, mode
);
511 #define SOL_F_SETLK 6
512 #define SOL_F_SETLKW 7
513 #define SOL_F_FREESP 11
514 #define SOL_F_ISSTREAM 13
515 #define SOL_F_GETLK 14
516 #define SOL_F_PRIV 15
517 #define SOL_F_NPRIV 16
518 #define SOL_F_QUOTACTL 17
519 #define SOL_F_BLOCKS 18
520 #define SOL_F_BLKSIZE 19
521 #define SOL_F_GETOWN 23
522 #define SOL_F_SETOWN 24
534 asmlinkage
int solaris_fcntl(unsigned fd
, unsigned cmd
, u32 arg
)
536 int (*sys_fcntl
)(unsigned,unsigned,unsigned long) =
537 (int (*)(unsigned,unsigned,unsigned long))SYS(fcntl
);
543 case F_SETFD
: return sys_fcntl(fd
, cmd
, (unsigned long)arg
);
545 flags
= sys_fcntl(fd
, cmd
, 0);
547 if (flags
& O_SYNC
) ret
|= 0x8050;
548 if (flags
& O_NONBLOCK
) ret
|= 0x80;
552 if (arg
& 0x8050) flags
|= O_SYNC
;
553 if (arg
& 0x80) flags
|= O_NONBLOCK
;
554 return sys_fcntl(fd
, cmd
, (long)flags
);
560 struct sol_flock __user
*p
= A(arg
);
561 mm_segment_t old_fs
= get_fs();
564 case SOL_F_GETLK
: cmd
= F_GETLK
; break;
565 case SOL_F_SETLK
: cmd
= F_SETLK
; break;
566 case SOL_F_SETLKW
: cmd
= F_SETLKW
; break;
569 if (get_user (f
.l_type
, &p
->l_type
) ||
570 __get_user (f
.l_whence
, &p
->l_whence
) ||
571 __get_user (f
.l_start
, &p
->l_start
) ||
572 __get_user (f
.l_len
, &p
->l_len
) ||
573 __get_user (f
.l_pid
, &p
->l_sysid
))
577 ret
= sys_fcntl(fd
, cmd
, (unsigned long)&f
);
580 if (__put_user (f
.l_type
, &p
->l_type
) ||
581 __put_user (f
.l_whence
, &p
->l_whence
) ||
582 __put_user (f
.l_start
, &p
->l_start
) ||
583 __put_user (f
.l_len
, &p
->l_len
) ||
584 __put_user (f
.l_pid
, &p
->l_pid
) ||
585 __put_user (0, &p
->l_sysid
))
593 int (*sys_newftruncate
)(unsigned int, unsigned long)=
594 (int (*)(unsigned int, unsigned long))SYS(ftruncate
);
596 if (get_user(length
, &((struct sol_flock __user
*)A(arg
))->l_start
))
599 return sys_newftruncate(fd
, length
);
605 asmlinkage
int solaris_ulimit(int cmd
, int val
)
608 case 1: /* UL_GETFSIZE - in 512B chunks */
609 return current
->signal
->rlim
[RLIMIT_FSIZE
].rlim_cur
>> 9;
610 case 2: /* UL_SETFSIZE */
611 if ((unsigned long)val
> (LONG_MAX
>>9)) return -ERANGE
;
613 task_lock(current
->group_leader
);
614 if (val
> current
->signal
->rlim
[RLIMIT_FSIZE
].rlim_max
) {
615 if (!capable(CAP_SYS_RESOURCE
)) {
616 task_unlock(current
->group_leader
);
619 current
->signal
->rlim
[RLIMIT_FSIZE
].rlim_max
= val
;
621 current
->signal
->rlim
[RLIMIT_FSIZE
].rlim_cur
= val
;
622 task_unlock(current
->group_leader
);
624 case 3: /* UL_GMEMLIM */
625 return current
->signal
->rlim
[RLIMIT_DATA
].rlim_cur
;
626 case 4: /* UL_GDESLIM */
627 return sysctl_nr_open
;
632 /* At least at the time I'm writing this, Linux doesn't have ACLs, so we
634 asmlinkage
int solaris_acl(u32 filename
, int cmd
, int nentries
, u32 aclbufp
)
639 asmlinkage
int solaris_facl(unsigned int fd
, int cmd
, int nentries
, u32 aclbufp
)
644 asmlinkage
int solaris_pread(unsigned int fd
, char __user
*buf
, u32 count
, u32 pos
)
646 ssize_t (*sys_pread64
)(unsigned int, char __user
*, size_t, loff_t
) =
647 (ssize_t (*)(unsigned int, char __user
*, size_t, loff_t
))SYS(pread64
);
649 return sys_pread64(fd
, buf
, count
, (loff_t
)pos
);
652 asmlinkage
int solaris_pwrite(unsigned int fd
, char __user
*buf
, u32 count
, u32 pos
)
654 ssize_t (*sys_pwrite64
)(unsigned int, char __user
*, size_t, loff_t
) =
655 (ssize_t (*)(unsigned int, char __user
*, size_t, loff_t
))SYS(pwrite64
);
657 return sys_pwrite64(fd
, buf
, count
, (loff_t
)pos
);
661 #define _PC_LINK_MAX 1
662 #define _PC_MAX_CANON 2
663 #define _PC_MAX_INPUT 3
664 #define _PC_NAME_MAX 4
665 #define _PC_PATH_MAX 5
666 #define _PC_PIPE_BUF 6
667 #define _PC_NO_TRUNC 7
668 #define _PC_VDISABLE 8
669 #define _PC_CHOWN_RESTRICTED 9
671 #define _PC_ASYNC_IO 10
672 #define _PC_PRIO_IO 11
673 #define _PC_SYNC_IO 12
676 /* This is not a real and complete implementation yet, just to keep
677 * the easy Solaris binaries happy.
679 asmlinkage
int solaris_fpathconf(int fd
, int name
)
702 case _PC_CHOWN_RESTRICTED
:
716 asmlinkage
int solaris_pathconf(u32 path
, int name
)
718 return solaris_fpathconf(0, name
);
721 /* solaris_llseek returns long long - quite difficult */
722 asmlinkage
long solaris_llseek(struct pt_regs
*regs
, u32 off_hi
, u32 off_lo
, int whence
)
724 int (*sys_llseek
)(unsigned int, unsigned long, unsigned long, loff_t __user
*, unsigned int) =
725 (int (*)(unsigned int, unsigned long, unsigned long, loff_t __user
*, unsigned int))SYS(_llseek
);
727 mm_segment_t old_fs
= get_fs();
731 ret
= sys_llseek((unsigned int)regs
->u_regs
[UREG_I0
], off_hi
, off_lo
, &retval
, whence
);
733 if (ret
< 0) return ret
;
734 regs
->u_regs
[UREG_I1
] = (u32
)retval
;
735 return (retval
>> 32);
738 /* Have to mask out all but lower 3 bits */
739 asmlinkage
int solaris_access(u32 filename
, long mode
)
741 int (*sys_access
)(const char __user
*, int) =
742 (int (*)(const char __user
*, int))SYS(access
);
744 return sys_access(A(filename
), mode
& 7);