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: releng/6.4/sys/compat/linux/linux_stats.c 175187 2008-01-09 16:07:32Z kib $");
31
32 #include "opt_compat.h"
33 #include "opt_mac.h"
34
35 #include <sys/param.h>
36 #include <sys/dirent.h>
37 #include <sys/file.h>
38 #include <sys/filedesc.h>
39 #include <sys/proc.h>
40 #include <sys/jail.h>
41 #include <sys/mac.h>
42 #include <sys/malloc.h>
43 #include <sys/mount.h>
44 #include <sys/namei.h>
45 #include <sys/stat.h>
46 #include <sys/syscallsubr.h>
47 #include <sys/systm.h>
48 #include <sys/vnode.h>
49 #include <sys/conf.h>
50 #include <sys/fcntl.h>
51
52 #ifdef COMPAT_LINUX32
53 #include <machine/../linux32/linux.h>
54 #include <machine/../linux32/linux32_proto.h>
55 #else
56 #include <machine/../linux/linux.h>
57 #include <machine/../linux/linux_proto.h>
58 #endif
59
60 #include <compat/linux/linux_util.h>
61
62 /*
63 * XXX: This was removed from newstat_copyout(), and almost identical
64 * XXX: code was in stat64_copyout(). findcdev() needs to be replaced
65 * XXX: with something that does lookup and locking properly.
66 * XXX: When somebody fixes this: please try to avoid duplicating it.
67 */
68 #if 0
69 static void
70 disk_foo(struct somestat *tbuf)
71 {
72 struct cdevsw *cdevsw;
73 struct cdev *dev;
74
75 /* Lie about disk drives which are character devices
76 * in FreeBSD but block devices under Linux.
77 */
78 if (S_ISCHR(tbuf.st_mode) &&
79 (dev = findcdev(buf->st_rdev)) != NULL) {
80 cdevsw = dev_refthread(dev);
81 if (cdevsw != NULL) {
82 if (cdevsw->d_flags & D_DISK) {
83 tbuf.st_mode &= ~S_IFMT;
84 tbuf.st_mode |= S_IFBLK;
85
86 /* XXX this may not be quite right */
87 /* Map major number to 0 */
88 tbuf.st_dev = uminor(buf->st_dev) & 0xf;
89 tbuf.st_rdev = buf->st_rdev & 0xff;
90 }
91 dev_relthread(dev);
92 }
93 }
94
95 }
96 #endif
97
98 static void
99 translate_fd_major_minor(struct thread *td, int fd, struct stat *buf)
100 {
101 struct file *fp;
102 int error;
103 int major, minor;
104
105 if ((error = fget(td, fd, &fp)) != 0)
106 return;
107 if (fp->f_vnode) {
108 if (fp->f_vnode->v_type == VCHR
109 || fp->f_vnode->v_type == VBLK) {
110 if (fp->f_vnode->v_un.vu_cdev) {
111 if (linux_driver_get_major_minor(
112 fp->f_vnode->v_un.vu_cdev->si_name,
113 &major, &minor) == 0) {
114 buf->st_rdev = (major << 8 | minor);
115 }
116 }
117 }
118 }
119 fdrop(fp, td);
120 }
121
122 static void
123 translate_path_major_minor(struct thread *td, char *path, struct stat *buf)
124 {
125 struct proc *p = td->td_proc;
126 struct filedesc *fdp = p->p_fd;
127 struct file *fp;
128 int fd;
129 int temp;
130
131 temp = td->td_retval[0];
132 if (kern_open(td, path, UIO_SYSSPACE, O_RDONLY, 0) != 0)
133 return;
134 fd = td->td_retval[0];
135 td->td_retval[0] = temp;
136 translate_fd_major_minor(td, fd, buf);
137 FILEDESC_LOCK(fdp);
138 fp = fdp->fd_ofiles[fd];
139 FILEDESC_UNLOCK(fdp);
140 fdclose(fdp, fdp->fd_ofiles[fd], fd, td);
141 }
142
143 static int
144 newstat_copyout(struct stat *buf, void *ubuf)
145 {
146 struct l_newstat tbuf;
147
148 bzero(&tbuf, sizeof(tbuf));
149 tbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8);
150 tbuf.st_ino = buf->st_ino;
151 tbuf.st_mode = buf->st_mode;
152 tbuf.st_nlink = buf->st_nlink;
153 tbuf.st_uid = buf->st_uid;
154 tbuf.st_gid = buf->st_gid;
155 tbuf.st_rdev = buf->st_rdev;
156 tbuf.st_size = buf->st_size;
157 tbuf.st_atime = buf->st_atime;
158 tbuf.st_mtime = buf->st_mtime;
159 tbuf.st_ctime = buf->st_ctime;
160 tbuf.st_blksize = buf->st_blksize;
161 tbuf.st_blocks = buf->st_blocks;
162
163 return (copyout(&tbuf, ubuf, sizeof(tbuf)));
164 }
165
166 int
167 linux_newstat(struct thread *td, struct linux_newstat_args *args)
168 {
169 struct stat buf;
170 char *path;
171 int error;
172
173 LCONVPATHEXIST(td, args->path, &path);
174
175 #ifdef DEBUG
176 if (ldebug(newstat))
177 printf(ARGS(newstat, "%s, *"), path);
178 #endif
179
180 error = kern_stat(td, path, UIO_SYSSPACE, &buf);
181 if (!error && strlen(path) > strlen("/dev/pts/") &&
182 !strncmp(path, "/dev/pts/", strlen("/dev/pts/"))
183 && path[9] >= '' && path[9] <= '9') {
184 /*
185 * Linux checks major and minors of the slave device to make
186 * sure it's a pty device, so let's make him believe it is.
187 */
188 buf.st_rdev = (136 << 8);
189 }
190
191 translate_path_major_minor(td, path, &buf);
192
193 LFREEPATH(path);
194 if (error)
195 return (error);
196 return (newstat_copyout(&buf, args->buf));
197 }
198
199 int
200 linux_newlstat(struct thread *td, struct linux_newlstat_args *args)
201 {
202 struct stat sb;
203 char *path;
204 int error;
205
206 LCONVPATHEXIST(td, args->path, &path);
207
208 #ifdef DEBUG
209 if (ldebug(newlstat))
210 printf(ARGS(newlstat, "%s, *"), path);
211 #endif
212
213 error = kern_lstat(td, path, UIO_SYSSPACE, &sb);
214 if (!error)
215 translate_path_major_minor(td, path, &sb);
216 LFREEPATH(path);
217 if (error)
218 return (error);
219 return (newstat_copyout(&sb, args->buf));
220 }
221
222 int
223 linux_newfstat(struct thread *td, struct linux_newfstat_args *args)
224 {
225 struct stat buf;
226 int error;
227
228 #ifdef DEBUG
229 if (ldebug(newfstat))
230 printf(ARGS(newfstat, "%d, *"), args->fd);
231 #endif
232
233 error = kern_fstat(td, args->fd, &buf);
234 translate_fd_major_minor(td, args->fd, &buf);
235 if (!error)
236 error = newstat_copyout(&buf, args->buf);
237
238 return (error);
239 }
240
241 static int
242 stat_copyout(struct stat *buf, void *ubuf)
243 {
244 struct l_stat lbuf;
245
246 bzero(&lbuf, sizeof(lbuf));
247 lbuf.st_dev = buf->st_dev;
248 lbuf.st_ino = buf->st_ino;
249 lbuf.st_mode = buf->st_mode;
250 lbuf.st_nlink = buf->st_nlink;
251 lbuf.st_uid = buf->st_uid;
252 lbuf.st_gid = buf->st_gid;
253 lbuf.st_rdev = buf->st_rdev;
254 if (buf->st_size < (quad_t)1 << 32)
255 lbuf.st_size = buf->st_size;
256 else
257 lbuf.st_size = -2;
258 lbuf.st_atime = buf->st_atime;
259 lbuf.st_mtime = buf->st_mtime;
260 lbuf.st_ctime = buf->st_ctime;
261 lbuf.st_blksize = buf->st_blksize;
262 lbuf.st_blocks = buf->st_blocks;
263 lbuf.st_flags = buf->st_flags;
264 lbuf.st_gen = buf->st_gen;
265
266 return (copyout(&lbuf, ubuf, sizeof(lbuf)));
267 }
268
269 int
270 linux_stat(struct thread *td, struct linux_stat_args *args)
271 {
272 struct stat buf;
273 char *path;
274 int error;
275
276 LCONVPATHEXIST(td, args->path, &path);
277
278 #ifdef DEBUG
279 if (ldebug(stat))
280 printf(ARGS(stat, "%s, *"), path);
281 #endif
282 error = kern_stat(td, path, UIO_SYSSPACE, &buf);
283 if (error) {
284 LFREEPATH(path);
285 return (error);
286 }
287 translate_path_major_minor(td, path, &buf);
288 LFREEPATH(path);
289 return(stat_copyout(&buf, args->up));
290 }
291
292 int
293 linux_lstat(struct thread *td, struct linux_lstat_args *args)
294 {
295 struct stat buf;
296 char *path;
297 int error;
298
299 LCONVPATHEXIST(td, args->path, &path);
300
301 #ifdef DEBUG
302 if (ldebug(lstat))
303 printf(ARGS(lstat, "%s, *"), path);
304 #endif
305 error = kern_lstat(td, path, UIO_SYSSPACE, &buf);
306 if (error) {
307 LFREEPATH(path);
308 return (error);
309 }
310 translate_path_major_minor(td, path, &buf);
311 LFREEPATH(path);
312 return(stat_copyout(&buf, args->up));
313 }
314
315 /* XXX - All fields of type l_int are defined as l_long on i386 */
316 struct l_statfs {
317 l_int f_type;
318 l_int f_bsize;
319 l_int f_blocks;
320 l_int f_bfree;
321 l_int f_bavail;
322 l_int f_files;
323 l_int f_ffree;
324 l_fsid_t f_fsid;
325 l_int f_namelen;
326 l_int f_spare[6];
327 };
328
329 #define LINUX_CODA_SUPER_MAGIC 0x73757245L
330 #define LINUX_EXT2_SUPER_MAGIC 0xEF53L
331 #define LINUX_HPFS_SUPER_MAGIC 0xf995e849L
332 #define LINUX_ISOFS_SUPER_MAGIC 0x9660L
333 #define LINUX_MSDOS_SUPER_MAGIC 0x4d44L
334 #define LINUX_NCP_SUPER_MAGIC 0x564cL
335 #define LINUX_NFS_SUPER_MAGIC 0x6969L
336 #define LINUX_NTFS_SUPER_MAGIC 0x5346544EL
337 #define LINUX_PROC_SUPER_MAGIC 0x9fa0L
338 #define LINUX_UFS_SUPER_MAGIC 0x00011954L /* XXX - UFS_MAGIC in Linux */
339 #define LINUX_DEVFS_SUPER_MAGIC 0x1373L
340
341 static long
342 bsd_to_linux_ftype(const char *fstypename)
343 {
344 int i;
345 static struct {const char *bsd_name; long linux_type;} b2l_tbl[] = {
346 {"ufs", LINUX_UFS_SUPER_MAGIC},
347 {"cd9660", LINUX_ISOFS_SUPER_MAGIC},
348 {"nfs", LINUX_NFS_SUPER_MAGIC},
349 {"ext2fs", LINUX_EXT2_SUPER_MAGIC},
350 {"procfs", LINUX_PROC_SUPER_MAGIC},
351 {"msdosfs", LINUX_MSDOS_SUPER_MAGIC},
352 {"ntfs", LINUX_NTFS_SUPER_MAGIC},
353 {"nwfs", LINUX_NCP_SUPER_MAGIC},
354 {"hpfs", LINUX_HPFS_SUPER_MAGIC},
355 {"coda", LINUX_CODA_SUPER_MAGIC},
356 {"devfs", LINUX_DEVFS_SUPER_MAGIC},
357 {NULL, 0L}};
358
359 for (i = 0; b2l_tbl[i].bsd_name != NULL; i++)
360 if (strcmp(b2l_tbl[i].bsd_name, fstypename) == 0)
361 return (b2l_tbl[i].linux_type);
362
363 return (0L);
364 }
365
366 static void
367 bsd_to_linux_statfs(struct statfs *bsd_statfs, struct l_statfs *linux_statfs)
368 {
369
370 linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename);
371 linux_statfs->f_bsize = bsd_statfs->f_bsize;
372 linux_statfs->f_blocks = bsd_statfs->f_blocks;
373 linux_statfs->f_bfree = bsd_statfs->f_bfree;
374 linux_statfs->f_bavail = bsd_statfs->f_bavail;
375 linux_statfs->f_ffree = bsd_statfs->f_ffree;
376 linux_statfs->f_files = bsd_statfs->f_files;
377 linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0];
378 linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1];
379 linux_statfs->f_namelen = MAXNAMLEN;
380 }
381
382 int
383 linux_statfs(struct thread *td, struct linux_statfs_args *args)
384 {
385 struct l_statfs linux_statfs;
386 struct statfs bsd_statfs;
387 char *path;
388 int error;
389
390 LCONVPATHEXIST(td, args->path, &path);
391
392 #ifdef DEBUG
393 if (ldebug(statfs))
394 printf(ARGS(statfs, "%s, *"), path);
395 #endif
396 error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs);
397 LFREEPATH(path);
398 if (error)
399 return (error);
400 bsd_to_linux_statfs(&bsd_statfs, &linux_statfs);
401 return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
402 }
403
404 static void
405 bsd_to_linux_statfs64(struct statfs *bsd_statfs, struct l_statfs64 *linux_statfs)
406 {
407
408 linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename);
409 linux_statfs->f_bsize = bsd_statfs->f_bsize;
410 linux_statfs->f_blocks = bsd_statfs->f_blocks;
411 linux_statfs->f_bfree = bsd_statfs->f_bfree;
412 linux_statfs->f_bavail = bsd_statfs->f_bavail;
413 linux_statfs->f_ffree = bsd_statfs->f_ffree;
414 linux_statfs->f_files = bsd_statfs->f_files;
415 linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0];
416 linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1];
417 linux_statfs->f_namelen = MAXNAMLEN;
418 }
419
420 int
421 linux_statfs64(struct thread *td, struct linux_statfs64_args *args)
422 {
423 struct l_statfs64 linux_statfs;
424 struct statfs bsd_statfs;
425 char *path;
426 int error;
427
428 if (args->bufsize != sizeof(struct l_statfs64))
429 return EINVAL;
430
431 LCONVPATHEXIST(td, args->path, &path);
432
433 #ifdef DEBUG
434 if (ldebug(statfs64))
435 printf(ARGS(statfs64, "%s, *"), path);
436 #endif
437 error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs);
438 LFREEPATH(path);
439 if (error)
440 return (error);
441 bsd_to_linux_statfs64(&bsd_statfs, &linux_statfs);
442 return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
443 }
444
445 int
446 linux_fstatfs(struct thread *td, struct linux_fstatfs_args *args)
447 {
448 struct l_statfs linux_statfs;
449 struct statfs bsd_statfs;
450 int error;
451
452 #ifdef DEBUG
453 if (ldebug(fstatfs))
454 printf(ARGS(fstatfs, "%d, *"), args->fd);
455 #endif
456 error = kern_fstatfs(td, args->fd, &bsd_statfs);
457 if (error)
458 return error;
459 bsd_to_linux_statfs(&bsd_statfs, &linux_statfs);
460 return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
461 }
462
463 struct l_ustat
464 {
465 l_daddr_t f_tfree;
466 l_ino_t f_tinode;
467 char f_fname[6];
468 char f_fpack[6];
469 };
470
471 int
472 linux_ustat(struct thread *td, struct linux_ustat_args *args)
473 {
474 #ifdef DEBUG
475 if (ldebug(ustat))
476 printf(ARGS(ustat, "%d, *"), args->dev);
477 #endif
478
479 return (EOPNOTSUPP);
480 }
481
482 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32))
483
484 static int
485 stat64_copyout(struct stat *buf, void *ubuf)
486 {
487 struct l_stat64 lbuf;
488
489 bzero(&lbuf, sizeof(lbuf));
490 lbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8);
491 lbuf.st_ino = buf->st_ino;
492 lbuf.st_mode = buf->st_mode;
493 lbuf.st_nlink = buf->st_nlink;
494 lbuf.st_uid = buf->st_uid;
495 lbuf.st_gid = buf->st_gid;
496 lbuf.st_rdev = buf->st_rdev;
497 lbuf.st_size = buf->st_size;
498 lbuf.st_atime = buf->st_atime;
499 lbuf.st_mtime = buf->st_mtime;
500 lbuf.st_ctime = buf->st_ctime;
501 lbuf.st_blksize = buf->st_blksize;
502 lbuf.st_blocks = buf->st_blocks;
503
504 /*
505 * The __st_ino field makes all the difference. In the Linux kernel
506 * it is conditionally compiled based on STAT64_HAS_BROKEN_ST_INO,
507 * but without the assignment to __st_ino the runtime linker refuses
508 * to mmap(2) any shared libraries. I guess it's broken alright :-)
509 */
510 lbuf.__st_ino = buf->st_ino;
511
512 return (copyout(&lbuf, ubuf, sizeof(lbuf)));
513 }
514
515 int
516 linux_stat64(struct thread *td, struct linux_stat64_args *args)
517 {
518 struct stat buf;
519 char *filename;
520 int error;
521
522 LCONVPATHEXIST(td, args->filename, &filename);
523
524 #ifdef DEBUG
525 if (ldebug(stat64))
526 printf(ARGS(stat64, "%s, *"), filename);
527 #endif
528
529 error = kern_stat(td, filename, UIO_SYSSPACE, &buf);
530 if (!error) {
531 if (strlen(filename) > strlen("/dev/pts/") &&
532 !strncmp(filename, "/dev/pts/", strlen("/dev/pts/")) &&
533 filename[9] >= '' && filename[9] <= '9') {
534 /*
535 * Linux checks major and minors of the slave device
536 * to make sure it's a pty deivce, so let's make him
537 * believe it is.
538 */
539 buf.st_rdev = (136 << 8);
540 } else
541 translate_path_major_minor(td, filename, &buf);
542 }
543 LFREEPATH(filename);
544 if (error)
545 return (error);
546 return (stat64_copyout(&buf, args->statbuf));
547 }
548
549 int
550 linux_lstat64(struct thread *td, struct linux_lstat64_args *args)
551 {
552 struct stat sb;
553 char *filename;
554 int error;
555
556 LCONVPATHEXIST(td, args->filename, &filename);
557
558 #ifdef DEBUG
559 if (ldebug(lstat64))
560 printf(ARGS(lstat64, "%s, *"), args->filename);
561 #endif
562
563 error = kern_lstat(td, filename, UIO_SYSSPACE, &sb);
564 if (!error)
565 translate_path_major_minor(td, filename, &sb);
566 LFREEPATH(filename);
567 if (error)
568 return (error);
569 return (stat64_copyout(&sb, args->statbuf));
570 }
571
572 int
573 linux_fstat64(struct thread *td, struct linux_fstat64_args *args)
574 {
575 struct stat buf;
576 int error;
577
578 #ifdef DEBUG
579 if (ldebug(fstat64))
580 printf(ARGS(fstat64, "%d, *"), args->fd);
581 #endif
582
583 error = kern_fstat(td, args->fd, &buf);
584 translate_fd_major_minor(td, args->fd, &buf);
585 if (!error)
586 error = stat64_copyout(&buf, args->statbuf);
587
588 return (error);
589 }
590
591 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */
Cache object: 4205cad1f1ad2c6718d30835983d17d2
|