1 /*- 2 * Copyright (c) 1994-1995 S�ren Schmidt 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer 10 * in this position and unchanged. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. The name of the author may not be used to endorse or promote products 15 * derived from this software without specific prior written permission 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 __FBSDID("$FreeBSD$"); 31 32 #include "opt_mac.h" 33 34 #include <sys/param.h> 35 #include <sys/dirent.h> 36 #include <sys/file.h> 37 #include <sys/filedesc.h> 38 #include <sys/proc.h> 39 #include <sys/jail.h> 40 #include <sys/mac.h> 41 #include <sys/malloc.h> 42 #include <sys/mount.h> 43 #include <sys/namei.h> 44 #include <sys/stat.h> 45 #include <sys/syscallsubr.h> 46 #include <sys/systm.h> 47 #include <sys/vnode.h> 48 49 #include "opt_compat.h" 50 51 #ifdef COMPAT_LINUX32 52 #include <machine/../linux32/linux.h> 53 #include <machine/../linux32/linux32_proto.h> 54 #else 55 #include <machine/../linux/linux.h> 56 #include <machine/../linux/linux_proto.h> 57 #endif 58 59 #include <compat/linux/linux_util.h> 60 61 /* 62 * XXX: This was removed from newstat_copyout(), and almost identical 63 * XXX: code was in stat64_copyout(). findcdev() needs to be replaced 64 * XXX: with something that does lookup and locking properly. 65 * XXX: When somebody fixes this: please try to avoid duplicating it. 66 */ 67 #if 0 68 static void 69 disk_foo(struct somestat *tbuf) 70 { 71 struct cdevsw *cdevsw; 72 struct cdev *dev; 73 74 /* Lie about disk drives which are character devices 75 * in FreeBSD but block devices under Linux. 76 */ 77 if (S_ISCHR(tbuf.st_mode) && 78 (dev = findcdev(buf->st_rdev)) != NULL) { 79 cdevsw = dev_refthread(dev); 80 if (cdevsw != NULL) { 81 if (cdevsw->d_flags & D_DISK) { 82 tbuf.st_mode &= ~S_IFMT; 83 tbuf.st_mode |= S_IFBLK; 84 85 /* XXX this may not be quite right */ 86 /* Map major number to 0 */ 87 tbuf.st_dev = uminor(buf->st_dev) & 0xf; 88 tbuf.st_rdev = buf->st_rdev & 0xff; 89 } 90 dev_relthread(dev); 91 } 92 } 93 94 } 95 #endif 96 97 static int 98 newstat_copyout(struct stat *buf, void *ubuf) 99 { 100 struct l_newstat tbuf; 101 102 bzero(&tbuf, sizeof(tbuf)); 103 tbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8); 104 tbuf.st_ino = buf->st_ino; 105 tbuf.st_mode = buf->st_mode; 106 tbuf.st_nlink = buf->st_nlink; 107 tbuf.st_uid = buf->st_uid; 108 tbuf.st_gid = buf->st_gid; 109 tbuf.st_rdev = buf->st_rdev; 110 tbuf.st_size = buf->st_size; 111 tbuf.st_atime = buf->st_atime; 112 tbuf.st_mtime = buf->st_mtime; 113 tbuf.st_ctime = buf->st_ctime; 114 tbuf.st_blksize = buf->st_blksize; 115 tbuf.st_blocks = buf->st_blocks; 116 117 return (copyout(&tbuf, ubuf, sizeof(tbuf))); 118 } 119 120 int 121 linux_newstat(struct thread *td, struct linux_newstat_args *args) 122 { 123 struct stat buf; 124 char *path; 125 int error; 126 127 LCONVPATHEXIST(td, args->path, &path); 128 129 #ifdef DEBUG 130 if (ldebug(newstat)) 131 printf(ARGS(newstat, "%s, *"), path); 132 #endif 133 134 error = kern_stat(td, path, UIO_SYSSPACE, &buf); 135 if (!error && strlen(path) > strlen("/dev/pts/") && 136 !strncmp(path, "/dev/pts/", strlen("/dev/pts/")) 137 && path[9] >= '0' && path[9] <= '9') { 138 /* 139 * Linux checks major and minors of the slave device to make 140 * sure it's a pty device, so let's make him believe it is. 141 */ 142 buf.st_rdev = (136 << 8); 143 } 144 145 LFREEPATH(path); 146 if (error) 147 return (error); 148 return (newstat_copyout(&buf, args->buf)); 149 } 150 151 int 152 linux_newlstat(struct thread *td, struct linux_newlstat_args *args) 153 { 154 struct stat sb; 155 char *path; 156 int error; 157 158 LCONVPATHEXIST(td, args->path, &path); 159 160 #ifdef DEBUG 161 if (ldebug(newlstat)) 162 printf(ARGS(newlstat, "%s, *"), path); 163 #endif 164 165 error = kern_lstat(td, path, UIO_SYSSPACE, &sb); 166 LFREEPATH(path); 167 if (error) 168 return (error); 169 return (newstat_copyout(&sb, args->buf)); 170 } 171 172 int 173 linux_newfstat(struct thread *td, struct linux_newfstat_args *args) 174 { 175 struct stat buf; 176 int error; 177 178 #ifdef DEBUG 179 if (ldebug(newfstat)) 180 printf(ARGS(newfstat, "%d, *"), args->fd); 181 #endif 182 183 error = kern_fstat(td, args->fd, &buf); 184 if (!error) 185 error = newstat_copyout(&buf, args->buf); 186 187 return (error); 188 } 189 190 /* XXX - All fields of type l_int are defined as l_long on i386 */ 191 struct l_statfs { 192 l_int f_type; 193 l_int f_bsize; 194 l_int f_blocks; 195 l_int f_bfree; 196 l_int f_bavail; 197 l_int f_files; 198 l_int f_ffree; 199 l_fsid_t f_fsid; 200 l_int f_namelen; 201 l_int f_spare[6]; 202 }; 203 204 #define LINUX_CODA_SUPER_MAGIC 0x73757245L 205 #define LINUX_EXT2_SUPER_MAGIC 0xEF53L 206 #define LINUX_HPFS_SUPER_MAGIC 0xf995e849L 207 #define LINUX_ISOFS_SUPER_MAGIC 0x9660L 208 #define LINUX_MSDOS_SUPER_MAGIC 0x4d44L 209 #define LINUX_NCP_SUPER_MAGIC 0x564cL 210 #define LINUX_NFS_SUPER_MAGIC 0x6969L 211 #define LINUX_NTFS_SUPER_MAGIC 0x5346544EL 212 #define LINUX_PROC_SUPER_MAGIC 0x9fa0L 213 #define LINUX_UFS_SUPER_MAGIC 0x00011954L /* XXX - UFS_MAGIC in Linux */ 214 #define LINUX_DEVFS_SUPER_MAGIC 0x1373L 215 216 static long 217 bsd_to_linux_ftype(const char *fstypename) 218 { 219 int i; 220 static struct {const char *bsd_name; long linux_type;} b2l_tbl[] = { 221 {"ufs", LINUX_UFS_SUPER_MAGIC}, 222 {"cd9660", LINUX_ISOFS_SUPER_MAGIC}, 223 {"nfs", LINUX_NFS_SUPER_MAGIC}, 224 {"ext2fs", LINUX_EXT2_SUPER_MAGIC}, 225 {"procfs", LINUX_PROC_SUPER_MAGIC}, 226 {"msdosfs", LINUX_MSDOS_SUPER_MAGIC}, 227 {"ntfs", LINUX_NTFS_SUPER_MAGIC}, 228 {"nwfs", LINUX_NCP_SUPER_MAGIC}, 229 {"hpfs", LINUX_HPFS_SUPER_MAGIC}, 230 {"coda", LINUX_CODA_SUPER_MAGIC}, 231 {"devfs", LINUX_DEVFS_SUPER_MAGIC}, 232 {NULL, 0L}}; 233 234 for (i = 0; b2l_tbl[i].bsd_name != NULL; i++) 235 if (strcmp(b2l_tbl[i].bsd_name, fstypename) == 0) 236 return (b2l_tbl[i].linux_type); 237 238 return (0L); 239 } 240 241 static void 242 bsd_to_linux_statfs(struct statfs *bsd_statfs, struct l_statfs *linux_statfs) 243 { 244 245 linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename); 246 linux_statfs->f_bsize = bsd_statfs->f_bsize; 247 linux_statfs->f_blocks = bsd_statfs->f_blocks; 248 linux_statfs->f_bfree = bsd_statfs->f_bfree; 249 linux_statfs->f_bavail = bsd_statfs->f_bavail; 250 linux_statfs->f_ffree = bsd_statfs->f_ffree; 251 linux_statfs->f_files = bsd_statfs->f_files; 252 linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0]; 253 linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1]; 254 linux_statfs->f_namelen = MAXNAMLEN; 255 } 256 257 int 258 linux_statfs(struct thread *td, struct linux_statfs_args *args) 259 { 260 struct l_statfs linux_statfs; 261 struct statfs bsd_statfs; 262 char *path; 263 int error; 264 265 LCONVPATHEXIST(td, args->path, &path); 266 267 #ifdef DEBUG 268 if (ldebug(statfs)) 269 printf(ARGS(statfs, "%s, *"), path); 270 #endif 271 error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs); 272 LFREEPATH(path); 273 if (error) 274 return (error); 275 bsd_to_linux_statfs(&bsd_statfs, &linux_statfs); 276 return copyout(&linux_statfs, args->buf, sizeof(linux_statfs)); 277 } 278 279 int 280 linux_fstatfs(struct thread *td, struct linux_fstatfs_args *args) 281 { 282 struct l_statfs linux_statfs; 283 struct statfs bsd_statfs; 284 int error; 285 286 #ifdef DEBUG 287 if (ldebug(fstatfs)) 288 printf(ARGS(fstatfs, "%d, *"), args->fd); 289 #endif 290 error = kern_fstatfs(td, args->fd, &bsd_statfs); 291 if (error) 292 return error; 293 bsd_to_linux_statfs(&bsd_statfs, &linux_statfs); 294 return copyout(&linux_statfs, args->buf, sizeof(linux_statfs)); 295 } 296 297 struct l_ustat 298 { 299 l_daddr_t f_tfree; 300 l_ino_t f_tinode; 301 char f_fname[6]; 302 char f_fpack[6]; 303 }; 304 305 int 306 linux_ustat(struct thread *td, struct linux_ustat_args *args) 307 { 308 #ifdef DEBUG 309 if (ldebug(ustat)) 310 printf(ARGS(ustat, "%d, *"), args->dev); 311 #endif 312 313 return (EOPNOTSUPP); 314 315 #ifdef not_that_way 316 struct l_ustat lu; 317 struct cdev *dev; 318 struct vnode *vp; 319 struct statfs *stat; 320 int error; 321 322 323 /* 324 * lu.f_fname and lu.f_fpack are not used. They are always zeroed. 325 * lu.f_tinode and lu.f_tfree are set from the device's super block. 326 */ 327 bzero(&lu, sizeof(lu)); 328 329 /* 330 * XXX - Don't return an error if we can't find a vnode for the 331 * device. Our struct cdev *is 32-bits whereas Linux only has a 16-bits 332 * struct cdev *. The struct cdev *that is used now may as well be a truncated 333 * struct cdev *returned from previous syscalls. Just return a bzeroed 334 * ustat in that case. 335 * 336 * XXX: findcdev() SHALL not be used this way. Somebody (TM) will 337 * have to find a better way. It may be that we should stick 338 * a dev_t into struct mount, and walk the mountlist for a 339 * perfect match and failing that try again looking for a 340 * minor-truncated match. 341 */ 342 dev = findcdev(makedev(args->dev >> 8, args->dev & 0xFF)); 343 if (dev != NULL && vfinddev(dev, &vp)) { 344 if (vp->v_mount == NULL) 345 return (EINVAL); 346 #ifdef MAC 347 error = mac_check_mount_stat(td->td_ucred, vp->v_mount); 348 if (error) 349 return (error); 350 #endif 351 stat = &(vp->v_mount->mnt_stat); 352 error = VFS_STATFS(vp->v_mount, stat, td); 353 if (error) 354 return (error); 355 356 lu.f_tfree = stat->f_bfree; 357 lu.f_tinode = stat->f_ffree; 358 } 359 360 return (copyout(&lu, args->ubuf, sizeof(lu))); 361 #endif 362 } 363 364 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32)) 365 366 static int 367 stat64_copyout(struct stat *buf, void *ubuf) 368 { 369 struct l_stat64 lbuf; 370 371 bzero(&lbuf, sizeof(lbuf)); 372 lbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8); 373 lbuf.st_ino = buf->st_ino; 374 lbuf.st_mode = buf->st_mode; 375 lbuf.st_nlink = buf->st_nlink; 376 lbuf.st_uid = buf->st_uid; 377 lbuf.st_gid = buf->st_gid; 378 lbuf.st_rdev = buf->st_rdev; 379 lbuf.st_size = buf->st_size; 380 lbuf.st_atime = buf->st_atime; 381 lbuf.st_mtime = buf->st_mtime; 382 lbuf.st_ctime = buf->st_ctime; 383 lbuf.st_blksize = buf->st_blksize; 384 lbuf.st_blocks = buf->st_blocks; 385 386 /* 387 * The __st_ino field makes all the difference. In the Linux kernel 388 * it is conditionally compiled based on STAT64_HAS_BROKEN_ST_INO, 389 * but without the assignment to __st_ino the runtime linker refuses 390 * to mmap(2) any shared libraries. I guess it's broken alright :-) 391 */ 392 lbuf.__st_ino = buf->st_ino; 393 394 return (copyout(&lbuf, ubuf, sizeof(lbuf))); 395 } 396 397 int 398 linux_stat64(struct thread *td, struct linux_stat64_args *args) 399 { 400 struct stat buf; 401 char *filename; 402 int error; 403 404 LCONVPATHEXIST(td, args->filename, &filename); 405 406 #ifdef DEBUG 407 if (ldebug(stat64)) 408 printf(ARGS(stat64, "%s, *"), filename); 409 #endif 410 411 error = kern_stat(td, filename, UIO_SYSSPACE, &buf); 412 if (!error && strlen(filename) > strlen("/dev/pts/") && 413 !strncmp(filename, "/dev/pts/", strlen("/dev/pts/")) 414 && filename[9] >= '0' && filename[9] <= '9') { 415 /* 416 * Linux checks major and minors of the slave device to make 417 * sure it's a pty deivce, so let's make him believe it is. 418 */ 419 buf.st_rdev = (136 << 8); 420 } 421 422 LFREEPATH(filename); 423 if (error) 424 return (error); 425 return (stat64_copyout(&buf, args->statbuf)); 426 } 427 428 int 429 linux_lstat64(struct thread *td, struct linux_lstat64_args *args) 430 { 431 struct stat sb; 432 char *filename; 433 int error; 434 435 LCONVPATHEXIST(td, args->filename, &filename); 436 437 #ifdef DEBUG 438 if (ldebug(lstat64)) 439 printf(ARGS(lstat64, "%s, *"), args->filename); 440 #endif 441 442 error = kern_lstat(td, filename, UIO_SYSSPACE, &sb); 443 LFREEPATH(filename); 444 if (error) 445 return (error); 446 return (stat64_copyout(&sb, args->statbuf)); 447 } 448 449 int 450 linux_fstat64(struct thread *td, struct linux_fstat64_args *args) 451 { 452 struct stat buf; 453 int error; 454 455 #ifdef DEBUG 456 if (ldebug(fstat64)) 457 printf(ARGS(fstat64, "%d, *"), args->fd); 458 #endif 459 460 error = kern_fstat(td, args->fd, &buf); 461 if (!error) 462 error = stat64_copyout(&buf, args->statbuf); 463 464 return (error); 465 } 466 467 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */ 468