The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/compat/linux/linux_file.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    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/10.1/sys/compat/linux/linux_file.c 255219 2013-09-05 00:09:56Z pjd $");
   31 
   32 #include "opt_compat.h"
   33 
   34 #include <sys/param.h>
   35 #include <sys/systm.h>
   36 #include <sys/capability.h>
   37 #include <sys/conf.h>
   38 #include <sys/dirent.h>
   39 #include <sys/fcntl.h>
   40 #include <sys/file.h>
   41 #include <sys/filedesc.h>
   42 #include <sys/lock.h>
   43 #include <sys/malloc.h>
   44 #include <sys/mount.h>
   45 #include <sys/mutex.h>
   46 #include <sys/namei.h>
   47 #include <sys/proc.h>
   48 #include <sys/stat.h>
   49 #include <sys/sx.h>
   50 #include <sys/syscallsubr.h>
   51 #include <sys/sysproto.h>
   52 #include <sys/tty.h>
   53 #include <sys/unistd.h>
   54 #include <sys/vnode.h>
   55 
   56 #include <security/mac/mac_framework.h>
   57 
   58 #include <ufs/ufs/extattr.h>
   59 #include <ufs/ufs/quota.h>
   60 #include <ufs/ufs/ufsmount.h>
   61 
   62 #ifdef COMPAT_LINUX32
   63 #include <machine/../linux32/linux.h>
   64 #include <machine/../linux32/linux32_proto.h>
   65 #else
   66 #include <machine/../linux/linux.h>
   67 #include <machine/../linux/linux_proto.h>
   68 #endif
   69 #include <compat/linux/linux_misc.h>
   70 #include <compat/linux/linux_util.h>
   71 #include <compat/linux/linux_file.h>
   72 
   73 int
   74 linux_creat(struct thread *td, struct linux_creat_args *args)
   75 {
   76     char *path;
   77     int error;
   78 
   79     LCONVPATHEXIST(td, args->path, &path);
   80 
   81 #ifdef DEBUG
   82         if (ldebug(creat))
   83                 printf(ARGS(creat, "%s, %d"), path, args->mode);
   84 #endif
   85     error = kern_open(td, path, UIO_SYSSPACE, O_WRONLY | O_CREAT | O_TRUNC,
   86         args->mode);
   87     LFREEPATH(path);
   88     return (error);
   89 }
   90 
   91 
   92 static int
   93 linux_common_open(struct thread *td, int dirfd, char *path, int l_flags, int mode)
   94 {
   95     cap_rights_t rights;
   96     struct proc *p = td->td_proc;
   97     struct file *fp;
   98     int fd;
   99     int bsd_flags, error;
  100 
  101     bsd_flags = 0;
  102     switch (l_flags & LINUX_O_ACCMODE) {
  103     case LINUX_O_WRONLY:
  104         bsd_flags |= O_WRONLY;
  105         break;
  106     case LINUX_O_RDWR:
  107         bsd_flags |= O_RDWR;
  108         break;
  109     default:
  110         bsd_flags |= O_RDONLY;
  111     }
  112     if (l_flags & LINUX_O_NDELAY)
  113         bsd_flags |= O_NONBLOCK;
  114     if (l_flags & LINUX_O_APPEND)
  115         bsd_flags |= O_APPEND;
  116     if (l_flags & LINUX_O_SYNC)
  117         bsd_flags |= O_FSYNC;
  118     if (l_flags & LINUX_O_NONBLOCK)
  119         bsd_flags |= O_NONBLOCK;
  120     if (l_flags & LINUX_FASYNC)
  121         bsd_flags |= O_ASYNC;
  122     if (l_flags & LINUX_O_CREAT)
  123         bsd_flags |= O_CREAT;
  124     if (l_flags & LINUX_O_TRUNC)
  125         bsd_flags |= O_TRUNC;
  126     if (l_flags & LINUX_O_EXCL)
  127         bsd_flags |= O_EXCL;
  128     if (l_flags & LINUX_O_NOCTTY)
  129         bsd_flags |= O_NOCTTY;
  130     if (l_flags & LINUX_O_DIRECT)
  131         bsd_flags |= O_DIRECT;
  132     if (l_flags & LINUX_O_NOFOLLOW)
  133         bsd_flags |= O_NOFOLLOW;
  134     if (l_flags & LINUX_O_DIRECTORY)
  135         bsd_flags |= O_DIRECTORY;
  136     /* XXX LINUX_O_NOATIME: unable to be easily implemented. */
  137 
  138     error = kern_openat(td, dirfd, path, UIO_SYSSPACE, bsd_flags, mode);
  139 
  140     if (!error) {
  141             fd = td->td_retval[0];
  142             /*
  143              * XXX In between kern_open() and fget(), another process
  144              * having the same filedesc could use that fd without
  145              * checking below.
  146              */
  147             error = fget(td, fd, cap_rights_init(&rights, CAP_IOCTL), &fp);
  148             if (!error) {
  149                     sx_slock(&proctree_lock);
  150                     PROC_LOCK(p);
  151                     if (!(bsd_flags & O_NOCTTY) &&
  152                         SESS_LEADER(p) && !(p->p_flag & P_CONTROLT)) {
  153                             PROC_UNLOCK(p);
  154                             sx_unlock(&proctree_lock);
  155                             /* XXXPJD: Verify if TIOCSCTTY is allowed. */
  156                             if (fp->f_type == DTYPE_VNODE)
  157                                     (void) fo_ioctl(fp, TIOCSCTTY, (caddr_t) 0,
  158                                              td->td_ucred, td);
  159                     } else {
  160                             PROC_UNLOCK(p);
  161                             sx_sunlock(&proctree_lock);
  162                     }
  163                     fdrop(fp, td);
  164                     /*
  165                      * XXX as above, fdrop()/kern_close() pair is racy.
  166                      */
  167                     if (error)
  168                             kern_close(td, fd);
  169             }
  170     }
  171 
  172 #ifdef DEBUG
  173     if (ldebug(open))
  174             printf(LMSG("open returns error %d"), error);
  175 #endif
  176     LFREEPATH(path);
  177     return (error);
  178 }
  179 
  180 int
  181 linux_openat(struct thread *td, struct linux_openat_args *args)
  182 {
  183         char *path;
  184         int dfd;
  185 
  186         dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd;
  187         if (args->flags & LINUX_O_CREAT)
  188                 LCONVPATH_AT(td, args->filename, &path, 1, dfd);
  189         else
  190                 LCONVPATH_AT(td, args->filename, &path, 0, dfd);
  191 #ifdef DEBUG
  192         if (ldebug(openat))
  193                 printf(ARGS(openat, "%i, %s, 0x%x, 0x%x"), args->dfd,
  194                     path, args->flags, args->mode);
  195 #endif
  196         return (linux_common_open(td, dfd, path, args->flags, args->mode));
  197 }
  198 
  199 int
  200 linux_open(struct thread *td, struct linux_open_args *args)
  201 {
  202     char *path;
  203 
  204     if (args->flags & LINUX_O_CREAT)
  205         LCONVPATHCREAT(td, args->path, &path);
  206     else
  207         LCONVPATHEXIST(td, args->path, &path);
  208 
  209 #ifdef DEBUG
  210         if (ldebug(open))
  211                 printf(ARGS(open, "%s, 0x%x, 0x%x"),
  212                     path, args->flags, args->mode);
  213 #endif
  214 
  215         return (linux_common_open(td, AT_FDCWD, path, args->flags, args->mode));
  216 }
  217 
  218 int
  219 linux_lseek(struct thread *td, struct linux_lseek_args *args)
  220 {
  221 
  222     struct lseek_args /* {
  223         int fd;
  224         int pad;
  225         off_t offset;
  226         int whence;
  227     } */ tmp_args;
  228     int error;
  229 
  230 #ifdef DEBUG
  231         if (ldebug(lseek))
  232                 printf(ARGS(lseek, "%d, %ld, %d"),
  233                     args->fdes, (long)args->off, args->whence);
  234 #endif
  235     tmp_args.fd = args->fdes;
  236     tmp_args.offset = (off_t)args->off;
  237     tmp_args.whence = args->whence;
  238     error = sys_lseek(td, &tmp_args);
  239     return error;
  240 }
  241 
  242 int
  243 linux_llseek(struct thread *td, struct linux_llseek_args *args)
  244 {
  245         struct lseek_args bsd_args;
  246         int error;
  247         off_t off;
  248 
  249 #ifdef DEBUG
  250         if (ldebug(llseek))
  251                 printf(ARGS(llseek, "%d, %d:%d, %d"),
  252                     args->fd, args->ohigh, args->olow, args->whence);
  253 #endif
  254         off = (args->olow) | (((off_t) args->ohigh) << 32);
  255 
  256         bsd_args.fd = args->fd;
  257         bsd_args.offset = off;
  258         bsd_args.whence = args->whence;
  259 
  260         if ((error = sys_lseek(td, &bsd_args)))
  261                 return error;
  262 
  263         if ((error = copyout(td->td_retval, args->res, sizeof (off_t))))
  264                 return error;
  265 
  266         td->td_retval[0] = 0;
  267         return 0;
  268 }
  269 
  270 int
  271 linux_readdir(struct thread *td, struct linux_readdir_args *args)
  272 {
  273         struct linux_getdents_args lda;
  274 
  275         lda.fd = args->fd;
  276         lda.dent = args->dent;
  277         lda.count = 1;
  278         return linux_getdents(td, &lda);
  279 }
  280 
  281 /*
  282  * Note that linux_getdents(2) and linux_getdents64(2) have the same
  283  * arguments. They only differ in the definition of struct dirent they
  284  * operate on. We use this to common the code, with the exception of
  285  * accessing struct dirent. Note that linux_readdir(2) is implemented
  286  * by means of linux_getdents(2). In this case we never operate on
  287  * struct dirent64 and thus don't need to handle it...
  288  */
  289 
  290 struct l_dirent {
  291         l_ulong         d_ino;
  292         l_off_t         d_off;
  293         l_ushort        d_reclen;
  294         char            d_name[LINUX_NAME_MAX + 1];
  295 };
  296 
  297 struct l_dirent64 {
  298         uint64_t        d_ino;
  299         int64_t         d_off;
  300         l_ushort        d_reclen;
  301         u_char          d_type;
  302         char            d_name[LINUX_NAME_MAX + 1];
  303 };
  304 
  305 /*
  306  * Linux uses the last byte in the dirent buffer to store d_type,
  307  * at least glibc-2.7 requires it. That is why l_dirent is padded with 2 bytes.
  308  */
  309 #define LINUX_RECLEN(namlen)                                            \
  310     roundup((offsetof(struct l_dirent, d_name) + (namlen) + 2),         \
  311     sizeof(l_ulong))
  312 
  313 #define LINUX_RECLEN64(namlen)                                          \
  314     roundup((offsetof(struct l_dirent64, d_name) + (namlen) + 1),       \
  315     sizeof(uint64_t))
  316 
  317 #define LINUX_MAXRECLEN         max(LINUX_RECLEN(LINUX_NAME_MAX),       \
  318                                     LINUX_RECLEN64(LINUX_NAME_MAX))
  319 #define LINUX_DIRBLKSIZ         512
  320 
  321 static int
  322 getdents_common(struct thread *td, struct linux_getdents64_args *args,
  323     int is64bit)
  324 {
  325         struct dirent *bdp;
  326         struct vnode *vp;
  327         caddr_t inp, buf;               /* BSD-format */
  328         int len, reclen;                /* BSD-format */
  329         caddr_t outp;                   /* Linux-format */
  330         int resid, linuxreclen=0;       /* Linux-format */
  331         caddr_t lbuf;                   /* Linux-format */
  332         cap_rights_t rights;
  333         struct file *fp;
  334         struct uio auio;
  335         struct iovec aiov;
  336         off_t off;
  337         struct l_dirent *linux_dirent;
  338         struct l_dirent64 *linux_dirent64;
  339         int buflen, error, eofflag, nbytes, justone;
  340         u_long *cookies = NULL, *cookiep;
  341         int ncookies;
  342 
  343         nbytes = args->count;
  344         if (nbytes == 1) {
  345                 /* readdir(2) case. Always struct dirent. */
  346                 if (is64bit)
  347                         return (EINVAL);
  348                 nbytes = sizeof(*linux_dirent);
  349                 justone = 1;
  350         } else
  351                 justone = 0;
  352 
  353         error = getvnode(td->td_proc->p_fd, args->fd,
  354             cap_rights_init(&rights, CAP_READ), &fp);
  355         if (error != 0)
  356                 return (error);
  357 
  358         if ((fp->f_flag & FREAD) == 0) {
  359                 fdrop(fp, td);
  360                 return (EBADF);
  361         }
  362 
  363         off = foffset_lock(fp, 0);
  364         vp = fp->f_vnode;
  365         if (vp->v_type != VDIR) {
  366                 foffset_unlock(fp, off, 0);
  367                 fdrop(fp, td);
  368                 return (EINVAL);
  369         }
  370 
  371 
  372         buflen = max(LINUX_DIRBLKSIZ, nbytes);
  373         buflen = min(buflen, MAXBSIZE);
  374         buf = malloc(buflen, M_TEMP, M_WAITOK);
  375         lbuf = malloc(LINUX_MAXRECLEN, M_TEMP, M_WAITOK | M_ZERO);
  376         vn_lock(vp, LK_SHARED | LK_RETRY);
  377 
  378         aiov.iov_base = buf;
  379         aiov.iov_len = buflen;
  380         auio.uio_iov = &aiov;
  381         auio.uio_iovcnt = 1;
  382         auio.uio_rw = UIO_READ;
  383         auio.uio_segflg = UIO_SYSSPACE;
  384         auio.uio_td = td;
  385         auio.uio_resid = buflen;
  386         auio.uio_offset = off;
  387 
  388 #ifdef MAC
  389         /*
  390          * Do directory search MAC check using non-cached credentials.
  391          */
  392         if ((error = mac_vnode_check_readdir(td->td_ucred, vp)))
  393                 goto out;
  394 #endif /* MAC */
  395         if ((error = VOP_READDIR(vp, &auio, fp->f_cred, &eofflag, &ncookies,
  396                  &cookies)))
  397                 goto out;
  398 
  399         inp = buf;
  400         outp = (caddr_t)args->dirent;
  401         resid = nbytes;
  402         if ((len = buflen - auio.uio_resid) <= 0)
  403                 goto eof;
  404 
  405         cookiep = cookies;
  406 
  407         if (cookies) {
  408                 /*
  409                  * When using cookies, the vfs has the option of reading from
  410                  * a different offset than that supplied (UFS truncates the
  411                  * offset to a block boundary to make sure that it never reads
  412                  * partway through a directory entry, even if the directory
  413                  * has been compacted).
  414                  */
  415                 while (len > 0 && ncookies > 0 && *cookiep <= off) {
  416                         bdp = (struct dirent *) inp;
  417                         len -= bdp->d_reclen;
  418                         inp += bdp->d_reclen;
  419                         cookiep++;
  420                         ncookies--;
  421                 }
  422         }
  423 
  424         while (len > 0) {
  425                 if (cookiep && ncookies == 0)
  426                         break;
  427                 bdp = (struct dirent *) inp;
  428                 reclen = bdp->d_reclen;
  429                 if (reclen & 3) {
  430                         error = EFAULT;
  431                         goto out;
  432                 }
  433 
  434                 if (bdp->d_fileno == 0) {
  435                         inp += reclen;
  436                         if (cookiep) {
  437                                 off = *cookiep++;
  438                                 ncookies--;
  439                         } else
  440                                 off += reclen;
  441 
  442                         len -= reclen;
  443                         continue;
  444                 }
  445 
  446                 linuxreclen = (is64bit)
  447                     ? LINUX_RECLEN64(bdp->d_namlen)
  448                     : LINUX_RECLEN(bdp->d_namlen);
  449 
  450                 if (reclen > len || resid < linuxreclen) {
  451                         outp++;
  452                         break;
  453                 }
  454 
  455                 if (justone) {
  456                         /* readdir(2) case. */
  457                         linux_dirent = (struct l_dirent*)lbuf;
  458                         linux_dirent->d_ino = bdp->d_fileno;
  459                         linux_dirent->d_off = (l_off_t)linuxreclen;
  460                         linux_dirent->d_reclen = (l_ushort)bdp->d_namlen;
  461                         strlcpy(linux_dirent->d_name, bdp->d_name,
  462                             linuxreclen - offsetof(struct l_dirent, d_name));
  463                         error = copyout(linux_dirent, outp, linuxreclen);
  464                 }
  465                 if (is64bit) {
  466                         linux_dirent64 = (struct l_dirent64*)lbuf;
  467                         linux_dirent64->d_ino = bdp->d_fileno;
  468                         linux_dirent64->d_off = (cookiep)
  469                             ? (l_off_t)*cookiep
  470                             : (l_off_t)(off + reclen);
  471                         linux_dirent64->d_reclen = (l_ushort)linuxreclen;
  472                         linux_dirent64->d_type = bdp->d_type;
  473                         strlcpy(linux_dirent64->d_name, bdp->d_name,
  474                             linuxreclen - offsetof(struct l_dirent64, d_name));
  475                         error = copyout(linux_dirent64, outp, linuxreclen);
  476                 } else if (!justone) {
  477                         linux_dirent = (struct l_dirent*)lbuf;
  478                         linux_dirent->d_ino = bdp->d_fileno;
  479                         linux_dirent->d_off = (cookiep)
  480                             ? (l_off_t)*cookiep
  481                             : (l_off_t)(off + reclen);
  482                         linux_dirent->d_reclen = (l_ushort)linuxreclen;
  483                         /*
  484                          * Copy d_type to last byte of l_dirent buffer
  485                          */
  486                         lbuf[linuxreclen-1] = bdp->d_type;
  487                         strlcpy(linux_dirent->d_name, bdp->d_name,
  488                             linuxreclen - offsetof(struct l_dirent, d_name)-1);
  489                         error = copyout(linux_dirent, outp, linuxreclen);
  490                 }
  491 
  492                 if (error)
  493                         goto out;
  494 
  495                 inp += reclen;
  496                 if (cookiep) {
  497                         off = *cookiep++;
  498                         ncookies--;
  499                 } else
  500                         off += reclen;
  501 
  502                 outp += linuxreclen;
  503                 resid -= linuxreclen;
  504                 len -= reclen;
  505                 if (justone)
  506                         break;
  507         }
  508 
  509         if (outp == (caddr_t)args->dirent) {
  510                 nbytes = resid;
  511                 goto eof;
  512         }
  513 
  514         if (justone)
  515                 nbytes = resid + linuxreclen;
  516 
  517 eof:
  518         td->td_retval[0] = nbytes - resid;
  519 
  520 out:
  521         free(cookies, M_TEMP);
  522 
  523         VOP_UNLOCK(vp, 0);
  524         foffset_unlock(fp, off, 0);
  525         fdrop(fp, td);
  526         free(buf, M_TEMP);
  527         free(lbuf, M_TEMP);
  528         return (error);
  529 }
  530 
  531 int
  532 linux_getdents(struct thread *td, struct linux_getdents_args *args)
  533 {
  534 
  535 #ifdef DEBUG
  536         if (ldebug(getdents))
  537                 printf(ARGS(getdents, "%d, *, %d"), args->fd, args->count);
  538 #endif
  539 
  540         return (getdents_common(td, (struct linux_getdents64_args*)args, 0));
  541 }
  542 
  543 int
  544 linux_getdents64(struct thread *td, struct linux_getdents64_args *args)
  545 {
  546 
  547 #ifdef DEBUG
  548         if (ldebug(getdents64))
  549                 printf(ARGS(getdents64, "%d, *, %d"), args->fd, args->count);
  550 #endif
  551 
  552         return (getdents_common(td, args, 1));
  553 }
  554 
  555 /*
  556  * These exist mainly for hooks for doing /compat/linux translation.
  557  */
  558 
  559 int
  560 linux_access(struct thread *td, struct linux_access_args *args)
  561 {
  562         char *path;
  563         int error;
  564 
  565         /* linux convention */
  566         if (args->amode & ~(F_OK | X_OK | W_OK | R_OK))
  567                 return (EINVAL);
  568 
  569         LCONVPATHEXIST(td, args->path, &path);
  570 
  571 #ifdef DEBUG
  572         if (ldebug(access))
  573                 printf(ARGS(access, "%s, %d"), path, args->amode);
  574 #endif
  575         error = kern_access(td, path, UIO_SYSSPACE, args->amode);
  576         LFREEPATH(path);
  577 
  578         return (error);
  579 }
  580 
  581 int
  582 linux_faccessat(struct thread *td, struct linux_faccessat_args *args)
  583 {
  584         char *path;
  585         int error, dfd, flag;
  586 
  587         if (args->flag & ~LINUX_AT_EACCESS)
  588                 return (EINVAL);
  589         /* linux convention */
  590         if (args->amode & ~(F_OK | X_OK | W_OK | R_OK))
  591                 return (EINVAL);
  592 
  593         dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd;
  594         LCONVPATHEXIST_AT(td, args->filename, &path, dfd);
  595 
  596 #ifdef DEBUG
  597         if (ldebug(access))
  598                 printf(ARGS(access, "%s, %d"), path, args->amode);
  599 #endif
  600 
  601         flag = (args->flag & LINUX_AT_EACCESS) == 0 ? 0 : AT_EACCESS;
  602         error = kern_accessat(td, dfd, path, UIO_SYSSPACE, flag, args->amode);
  603         LFREEPATH(path);
  604 
  605         return (error);
  606 }
  607 
  608 int
  609 linux_unlink(struct thread *td, struct linux_unlink_args *args)
  610 {
  611         char *path;
  612         int error;
  613         struct stat st;
  614 
  615         LCONVPATHEXIST(td, args->path, &path);
  616 
  617 #ifdef DEBUG
  618         if (ldebug(unlink))
  619                 printf(ARGS(unlink, "%s"), path);
  620 #endif
  621 
  622         error = kern_unlink(td, path, UIO_SYSSPACE);
  623         if (error == EPERM)
  624                 /* Introduce POSIX noncompliant behaviour of Linux */
  625                 if (kern_stat(td, path, UIO_SYSSPACE, &st) == 0)
  626                         if (S_ISDIR(st.st_mode))
  627                                 error = EISDIR;
  628         LFREEPATH(path);
  629         return (error);
  630 }
  631 
  632 int
  633 linux_unlinkat(struct thread *td, struct linux_unlinkat_args *args)
  634 {
  635         char *path;
  636         int error, dfd;
  637         struct stat st;
  638 
  639         if (args->flag & ~LINUX_AT_REMOVEDIR)
  640                 return (EINVAL);
  641 
  642         dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd;
  643         LCONVPATHEXIST_AT(td, args->pathname, &path, dfd);
  644 
  645 #ifdef DEBUG
  646         if (ldebug(unlinkat))
  647                 printf(ARGS(unlinkat, "%s"), path);
  648 #endif
  649 
  650         if (args->flag & LINUX_AT_REMOVEDIR)
  651                 error = kern_rmdirat(td, dfd, path, UIO_SYSSPACE);
  652         else
  653                 error = kern_unlinkat(td, dfd, path, UIO_SYSSPACE, 0);
  654         if (error == EPERM && !(args->flag & LINUX_AT_REMOVEDIR)) {
  655                 /* Introduce POSIX noncompliant behaviour of Linux */
  656                 if (kern_statat(td, AT_SYMLINK_NOFOLLOW, dfd, path,
  657                     UIO_SYSSPACE, &st) == 0 && S_ISDIR(st.st_mode))
  658                         error = EISDIR;
  659         }
  660         LFREEPATH(path);
  661         return (error);
  662 }
  663 int
  664 linux_chdir(struct thread *td, struct linux_chdir_args *args)
  665 {
  666         char *path;
  667         int error;
  668 
  669         LCONVPATHEXIST(td, args->path, &path);
  670 
  671 #ifdef DEBUG
  672         if (ldebug(chdir))
  673                 printf(ARGS(chdir, "%s"), path);
  674 #endif
  675         error = kern_chdir(td, path, UIO_SYSSPACE);
  676         LFREEPATH(path);
  677         return (error);
  678 }
  679 
  680 int
  681 linux_chmod(struct thread *td, struct linux_chmod_args *args)
  682 {
  683         char *path;
  684         int error;
  685 
  686         LCONVPATHEXIST(td, args->path, &path);
  687 
  688 #ifdef DEBUG
  689         if (ldebug(chmod))
  690                 printf(ARGS(chmod, "%s, %d"), path, args->mode);
  691 #endif
  692         error = kern_chmod(td, path, UIO_SYSSPACE, args->mode);
  693         LFREEPATH(path);
  694         return (error);
  695 }
  696 
  697 int
  698 linux_fchmodat(struct thread *td, struct linux_fchmodat_args *args)
  699 {
  700         char *path;
  701         int error, dfd;
  702 
  703         dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd;
  704         LCONVPATHEXIST_AT(td, args->filename, &path, dfd);
  705 
  706 #ifdef DEBUG
  707         if (ldebug(fchmodat))
  708                 printf(ARGS(fchmodat, "%s, %d"), path, args->mode);
  709 #endif
  710 
  711         error = kern_fchmodat(td, dfd, path, UIO_SYSSPACE, args->mode, 0);
  712         LFREEPATH(path);
  713         return (error);
  714 }
  715 
  716 int
  717 linux_mkdir(struct thread *td, struct linux_mkdir_args *args)
  718 {
  719         char *path;
  720         int error;
  721 
  722         LCONVPATHCREAT(td, args->path, &path);
  723 
  724 #ifdef DEBUG
  725         if (ldebug(mkdir))
  726                 printf(ARGS(mkdir, "%s, %d"), path, args->mode);
  727 #endif
  728         error = kern_mkdir(td, path, UIO_SYSSPACE, args->mode);
  729         LFREEPATH(path);
  730         return (error);
  731 }
  732 
  733 int
  734 linux_mkdirat(struct thread *td, struct linux_mkdirat_args *args)
  735 {
  736         char *path;
  737         int error, dfd;
  738 
  739         dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd;
  740         LCONVPATHCREAT_AT(td, args->pathname, &path, dfd);
  741 
  742 #ifdef DEBUG
  743         if (ldebug(mkdirat))
  744                 printf(ARGS(mkdirat, "%s, %d"), path, args->mode);
  745 #endif
  746         error = kern_mkdirat(td, dfd, path, UIO_SYSSPACE, args->mode);
  747         LFREEPATH(path);
  748         return (error);
  749 }
  750 
  751 int
  752 linux_rmdir(struct thread *td, struct linux_rmdir_args *args)
  753 {
  754         char *path;
  755         int error;
  756 
  757         LCONVPATHEXIST(td, args->path, &path);
  758 
  759 #ifdef DEBUG
  760         if (ldebug(rmdir))
  761                 printf(ARGS(rmdir, "%s"), path);
  762 #endif
  763         error = kern_rmdir(td, path, UIO_SYSSPACE);
  764         LFREEPATH(path);
  765         return (error);
  766 }
  767 
  768 int
  769 linux_rename(struct thread *td, struct linux_rename_args *args)
  770 {
  771         char *from, *to;
  772         int error;
  773 
  774         LCONVPATHEXIST(td, args->from, &from);
  775         /* Expand LCONVPATHCREATE so that `from' can be freed on errors */
  776         error = linux_emul_convpath(td, args->to, UIO_USERSPACE, &to, 1, AT_FDCWD);
  777         if (to == NULL) {
  778                 LFREEPATH(from);
  779                 return (error);
  780         }
  781 
  782 #ifdef DEBUG
  783         if (ldebug(rename))
  784                 printf(ARGS(rename, "%s, %s"), from, to);
  785 #endif
  786         error = kern_rename(td, from, to, UIO_SYSSPACE);
  787         LFREEPATH(from);
  788         LFREEPATH(to);
  789         return (error);
  790 }
  791 
  792 int
  793 linux_renameat(struct thread *td, struct linux_renameat_args *args)
  794 {
  795         char *from, *to;
  796         int error, olddfd, newdfd;
  797 
  798         olddfd = (args->olddfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->olddfd;
  799         newdfd = (args->newdfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->newdfd;
  800         LCONVPATHEXIST_AT(td, args->oldname, &from, olddfd);
  801         /* Expand LCONVPATHCREATE so that `from' can be freed on errors */
  802         error = linux_emul_convpath(td, args->newname, UIO_USERSPACE, &to, 1, newdfd);
  803         if (to == NULL) {
  804                 LFREEPATH(from);
  805                 return (error);
  806         }
  807 
  808 #ifdef DEBUG
  809         if (ldebug(renameat))
  810                 printf(ARGS(renameat, "%s, %s"), from, to);
  811 #endif
  812         error = kern_renameat(td, olddfd, from, newdfd, to, UIO_SYSSPACE);
  813         LFREEPATH(from);
  814         LFREEPATH(to);
  815         return (error);
  816 }
  817 
  818 int
  819 linux_symlink(struct thread *td, struct linux_symlink_args *args)
  820 {
  821         char *path, *to;
  822         int error;
  823 
  824         LCONVPATHEXIST(td, args->path, &path);
  825         /* Expand LCONVPATHCREATE so that `path' can be freed on errors */
  826         error = linux_emul_convpath(td, args->to, UIO_USERSPACE, &to, 1, AT_FDCWD);
  827         if (to == NULL) {
  828                 LFREEPATH(path);
  829                 return (error);
  830         }
  831 
  832 #ifdef DEBUG
  833         if (ldebug(symlink))
  834                 printf(ARGS(symlink, "%s, %s"), path, to);
  835 #endif
  836         error = kern_symlink(td, path, to, UIO_SYSSPACE);
  837         LFREEPATH(path);
  838         LFREEPATH(to);
  839         return (error);
  840 }
  841 
  842 int
  843 linux_symlinkat(struct thread *td, struct linux_symlinkat_args *args)
  844 {
  845         char *path, *to;
  846         int error, dfd;
  847 
  848         dfd = (args->newdfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->newdfd;
  849         LCONVPATHEXIST_AT(td, args->oldname, &path, dfd);
  850         /* Expand LCONVPATHCREATE so that `path' can be freed on errors */
  851         error = linux_emul_convpath(td, args->newname, UIO_USERSPACE, &to, 1, dfd);
  852         if (to == NULL) {
  853                 LFREEPATH(path);
  854                 return (error);
  855         }
  856 
  857 #ifdef DEBUG
  858         if (ldebug(symlinkat))
  859                 printf(ARGS(symlinkat, "%s, %s"), path, to);
  860 #endif
  861 
  862         error = kern_symlinkat(td, path, dfd, to, UIO_SYSSPACE);
  863         LFREEPATH(path);
  864         LFREEPATH(to);
  865         return (error);
  866 }
  867 
  868 int
  869 linux_readlink(struct thread *td, struct linux_readlink_args *args)
  870 {
  871         char *name;
  872         int error;
  873 
  874         LCONVPATHEXIST(td, args->name, &name);
  875 
  876 #ifdef DEBUG
  877         if (ldebug(readlink))
  878                 printf(ARGS(readlink, "%s, %p, %d"), name, (void *)args->buf,
  879                     args->count);
  880 #endif
  881         error = kern_readlink(td, name, UIO_SYSSPACE, args->buf, UIO_USERSPACE,
  882             args->count);
  883         LFREEPATH(name);
  884         return (error);
  885 }
  886 
  887 int
  888 linux_readlinkat(struct thread *td, struct linux_readlinkat_args *args)
  889 {
  890         char *name;
  891         int error, dfd;
  892 
  893         dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd;
  894         LCONVPATHEXIST_AT(td, args->path, &name, dfd);
  895 
  896 #ifdef DEBUG
  897         if (ldebug(readlinkat))
  898                 printf(ARGS(readlinkat, "%s, %p, %d"), name, (void *)args->buf,
  899                     args->bufsiz);
  900 #endif
  901 
  902         error = kern_readlinkat(td, dfd, name, UIO_SYSSPACE, args->buf,
  903             UIO_USERSPACE, args->bufsiz);
  904         LFREEPATH(name);
  905         return (error);
  906 }
  907 
  908 int
  909 linux_truncate(struct thread *td, struct linux_truncate_args *args)
  910 {
  911         char *path;
  912         int error;
  913 
  914         LCONVPATHEXIST(td, args->path, &path);
  915 
  916 #ifdef DEBUG
  917         if (ldebug(truncate))
  918                 printf(ARGS(truncate, "%s, %ld"), path, (long)args->length);
  919 #endif
  920 
  921         error = kern_truncate(td, path, UIO_SYSSPACE, args->length);
  922         LFREEPATH(path);
  923         return (error);
  924 }
  925 
  926 int
  927 linux_truncate64(struct thread *td, struct linux_truncate64_args *args)
  928 {
  929         char *path;
  930         int error;
  931 
  932         LCONVPATHEXIST(td, args->path, &path);
  933 
  934 #ifdef DEBUG
  935         if (ldebug(truncate64))
  936                 printf(ARGS(truncate64, "%s, %jd"), path, args->length);
  937 #endif
  938 
  939         error = kern_truncate(td, path, UIO_SYSSPACE, args->length);
  940         LFREEPATH(path);
  941         return (error);
  942 }
  943 int
  944 linux_ftruncate(struct thread *td, struct linux_ftruncate_args *args)
  945 {
  946         struct ftruncate_args /* {
  947                 int fd;
  948                 int pad;
  949                 off_t length;
  950                 } */ nuap;
  951            
  952         nuap.fd = args->fd;
  953         nuap.length = args->length;
  954         return (sys_ftruncate(td, &nuap));
  955 }
  956 
  957 int
  958 linux_link(struct thread *td, struct linux_link_args *args)
  959 {
  960         char *path, *to;
  961         int error;
  962 
  963         LCONVPATHEXIST(td, args->path, &path);
  964         /* Expand LCONVPATHCREATE so that `path' can be freed on errors */
  965         error = linux_emul_convpath(td, args->to, UIO_USERSPACE, &to, 1, AT_FDCWD);
  966         if (to == NULL) {
  967                 LFREEPATH(path);
  968                 return (error);
  969         }
  970 
  971 #ifdef DEBUG
  972         if (ldebug(link))
  973                 printf(ARGS(link, "%s, %s"), path, to);
  974 #endif
  975         error = kern_link(td, path, to, UIO_SYSSPACE);
  976         LFREEPATH(path);
  977         LFREEPATH(to);
  978         return (error);
  979 }
  980 
  981 int
  982 linux_linkat(struct thread *td, struct linux_linkat_args *args)
  983 {
  984         char *path, *to;
  985         int error, olddfd, newdfd, follow;
  986 
  987         if (args->flag & ~LINUX_AT_SYMLINK_FOLLOW)
  988                 return (EINVAL);
  989 
  990         olddfd = (args->olddfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->olddfd;
  991         newdfd = (args->newdfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->newdfd;
  992         LCONVPATHEXIST_AT(td, args->oldname, &path, olddfd);
  993         /* Expand LCONVPATHCREATE so that `path' can be freed on errors */
  994         error = linux_emul_convpath(td, args->newname, UIO_USERSPACE, &to, 1, newdfd);
  995         if (to == NULL) {
  996                 LFREEPATH(path);
  997                 return (error);
  998         }
  999 
 1000 #ifdef DEBUG
 1001         if (ldebug(linkat))
 1002                 printf(ARGS(linkat, "%i, %s, %i, %s, %i"), args->olddfd, path,
 1003                         args->newdfd, to, args->flag);
 1004 #endif
 1005 
 1006         follow = (args->flag & LINUX_AT_SYMLINK_FOLLOW) == 0 ? NOFOLLOW :
 1007             FOLLOW;
 1008         error = kern_linkat(td, olddfd, newdfd, path, to, UIO_SYSSPACE, follow);
 1009         LFREEPATH(path);
 1010         LFREEPATH(to);
 1011         return (error);
 1012 }
 1013 
 1014 int
 1015 linux_fdatasync(td, uap)
 1016         struct thread *td;
 1017         struct linux_fdatasync_args *uap;
 1018 {
 1019         struct fsync_args bsd;
 1020 
 1021         bsd.fd = uap->fd;
 1022         return sys_fsync(td, &bsd);
 1023 }
 1024 
 1025 int
 1026 linux_pread(td, uap)
 1027         struct thread *td;
 1028         struct linux_pread_args *uap;
 1029 {
 1030         struct pread_args bsd;
 1031         cap_rights_t rights;
 1032         struct vnode *vp;
 1033         int error;
 1034 
 1035         bsd.fd = uap->fd;
 1036         bsd.buf = uap->buf;
 1037         bsd.nbyte = uap->nbyte;
 1038         bsd.offset = uap->offset;
 1039 
 1040         error = sys_pread(td, &bsd);
 1041 
 1042         if (error == 0) {
 1043                 /* This seems to violate POSIX but linux does it */
 1044                 error = fgetvp(td, uap->fd,
 1045                     cap_rights_init(&rights, CAP_PREAD), &vp);
 1046                 if (error != 0)
 1047                         return (error);
 1048                 if (vp->v_type == VDIR) {
 1049                         vrele(vp);
 1050                         return (EISDIR);
 1051                 }
 1052                 vrele(vp);
 1053         }
 1054 
 1055         return (error);
 1056 }
 1057 
 1058 int
 1059 linux_pwrite(td, uap)
 1060         struct thread *td;
 1061         struct linux_pwrite_args *uap;
 1062 {
 1063         struct pwrite_args bsd;
 1064 
 1065         bsd.fd = uap->fd;
 1066         bsd.buf = uap->buf;
 1067         bsd.nbyte = uap->nbyte;
 1068         bsd.offset = uap->offset;
 1069         return sys_pwrite(td, &bsd);
 1070 }
 1071 
 1072 int
 1073 linux_mount(struct thread *td, struct linux_mount_args *args)
 1074 {
 1075         struct ufs_args ufs;
 1076         char fstypename[MFSNAMELEN];
 1077         char mntonname[MNAMELEN], mntfromname[MNAMELEN];
 1078         int error;
 1079         int fsflags;
 1080         void *fsdata;
 1081 
 1082         error = copyinstr(args->filesystemtype, fstypename, MFSNAMELEN - 1,
 1083             NULL);
 1084         if (error)
 1085                 return (error);
 1086         error = copyinstr(args->specialfile, mntfromname, MNAMELEN - 1, NULL);
 1087         if (error)
 1088                 return (error);
 1089         error = copyinstr(args->dir, mntonname, MNAMELEN - 1, NULL);
 1090         if (error)
 1091                 return (error);
 1092 
 1093 #ifdef DEBUG
 1094         if (ldebug(mount))
 1095                 printf(ARGS(mount, "%s, %s, %s"),
 1096                     fstypename, mntfromname, mntonname);
 1097 #endif
 1098 
 1099         if (strcmp(fstypename, "ext2") == 0) {
 1100                 strcpy(fstypename, "ext2fs");
 1101                 fsdata = &ufs;
 1102                 ufs.fspec = mntfromname;
 1103 #define DEFAULT_ROOTID          -2
 1104                 ufs.export.ex_root = DEFAULT_ROOTID;
 1105                 ufs.export.ex_flags =
 1106                     args->rwflag & LINUX_MS_RDONLY ? MNT_EXRDONLY : 0;
 1107         } else if (strcmp(fstypename, "proc") == 0) {
 1108                 strcpy(fstypename, "linprocfs");
 1109                 fsdata = NULL;
 1110         } else if (strcmp(fstypename, "vfat") == 0) {
 1111                 strcpy(fstypename, "msdosfs");
 1112                 fsdata = NULL;
 1113         } else {
 1114                 return (ENODEV);
 1115         }
 1116 
 1117         fsflags = 0;
 1118 
 1119         if ((args->rwflag & 0xffff0000) == 0xc0ed0000) {
 1120                 /*
 1121                  * Linux SYNC flag is not included; the closest equivalent
 1122                  * FreeBSD has is !ASYNC, which is our default.
 1123                  */
 1124                 if (args->rwflag & LINUX_MS_RDONLY)
 1125                         fsflags |= MNT_RDONLY;
 1126                 if (args->rwflag & LINUX_MS_NOSUID)
 1127                         fsflags |= MNT_NOSUID;
 1128                 if (args->rwflag & LINUX_MS_NOEXEC)
 1129                         fsflags |= MNT_NOEXEC;
 1130                 if (args->rwflag & LINUX_MS_REMOUNT)
 1131                         fsflags |= MNT_UPDATE;
 1132         }
 1133 
 1134         if (strcmp(fstypename, "linprocfs") == 0) {
 1135                 error = kernel_vmount(fsflags,
 1136                         "fstype", fstypename,
 1137                         "fspath", mntonname,
 1138                         NULL);
 1139         } else if (strcmp(fstypename, "msdosfs") == 0) {
 1140                 error = kernel_vmount(fsflags,
 1141                         "fstype", fstypename,
 1142                         "fspath", mntonname,
 1143                         "from", mntfromname,
 1144                         NULL);
 1145         } else
 1146                 error = EOPNOTSUPP;
 1147         return (error);
 1148 }
 1149 
 1150 int
 1151 linux_oldumount(struct thread *td, struct linux_oldumount_args *args)
 1152 {
 1153         struct linux_umount_args args2;
 1154 
 1155         args2.path = args->path;
 1156         args2.flags = 0;
 1157         return (linux_umount(td, &args2));
 1158 }
 1159 
 1160 int
 1161 linux_umount(struct thread *td, struct linux_umount_args *args)
 1162 {
 1163         struct unmount_args bsd;
 1164 
 1165         bsd.path = args->path;
 1166         bsd.flags = args->flags;        /* XXX correct? */
 1167         return (sys_unmount(td, &bsd));
 1168 }
 1169 
 1170 /*
 1171  * fcntl family of syscalls
 1172  */
 1173 
 1174 struct l_flock {
 1175         l_short         l_type;
 1176         l_short         l_whence;
 1177         l_off_t         l_start;
 1178         l_off_t         l_len;
 1179         l_pid_t         l_pid;
 1180 }
 1181 #if defined(__amd64__) && defined(COMPAT_LINUX32)
 1182 __packed
 1183 #endif
 1184 ;
 1185 
 1186 static void
 1187 linux_to_bsd_flock(struct l_flock *linux_flock, struct flock *bsd_flock)
 1188 {
 1189         switch (linux_flock->l_type) {
 1190         case LINUX_F_RDLCK:
 1191                 bsd_flock->l_type = F_RDLCK;
 1192                 break;
 1193         case LINUX_F_WRLCK:
 1194                 bsd_flock->l_type = F_WRLCK;
 1195                 break;
 1196         case LINUX_F_UNLCK:
 1197                 bsd_flock->l_type = F_UNLCK;
 1198                 break;
 1199         default:
 1200                 bsd_flock->l_type = -1;
 1201                 break;
 1202         }
 1203         bsd_flock->l_whence = linux_flock->l_whence;
 1204         bsd_flock->l_start = (off_t)linux_flock->l_start;
 1205         bsd_flock->l_len = (off_t)linux_flock->l_len;
 1206         bsd_flock->l_pid = (pid_t)linux_flock->l_pid;
 1207         bsd_flock->l_sysid = 0;
 1208 }
 1209 
 1210 static void
 1211 bsd_to_linux_flock(struct flock *bsd_flock, struct l_flock *linux_flock)
 1212 {
 1213         switch (bsd_flock->l_type) {
 1214         case F_RDLCK:
 1215                 linux_flock->l_type = LINUX_F_RDLCK;
 1216                 break;
 1217         case F_WRLCK:
 1218                 linux_flock->l_type = LINUX_F_WRLCK;
 1219                 break;
 1220         case F_UNLCK:
 1221                 linux_flock->l_type = LINUX_F_UNLCK;
 1222                 break;
 1223         }
 1224         linux_flock->l_whence = bsd_flock->l_whence;
 1225         linux_flock->l_start = (l_off_t)bsd_flock->l_start;
 1226         linux_flock->l_len = (l_off_t)bsd_flock->l_len;
 1227         linux_flock->l_pid = (l_pid_t)bsd_flock->l_pid;
 1228 }
 1229 
 1230 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32))
 1231 struct l_flock64 {
 1232         l_short         l_type;
 1233         l_short         l_whence;
 1234         l_loff_t        l_start;
 1235         l_loff_t        l_len;
 1236         l_pid_t         l_pid;
 1237 }
 1238 #if defined(__amd64__) && defined(COMPAT_LINUX32)
 1239 __packed
 1240 #endif
 1241 ;
 1242 
 1243 static void
 1244 linux_to_bsd_flock64(struct l_flock64 *linux_flock, struct flock *bsd_flock)
 1245 {
 1246         switch (linux_flock->l_type) {
 1247         case LINUX_F_RDLCK:
 1248                 bsd_flock->l_type = F_RDLCK;
 1249                 break;
 1250         case LINUX_F_WRLCK:
 1251                 bsd_flock->l_type = F_WRLCK;
 1252                 break;
 1253         case LINUX_F_UNLCK:
 1254                 bsd_flock->l_type = F_UNLCK;
 1255                 break;
 1256         default:
 1257                 bsd_flock->l_type = -1;
 1258                 break;
 1259         }
 1260         bsd_flock->l_whence = linux_flock->l_whence;
 1261         bsd_flock->l_start = (off_t)linux_flock->l_start;
 1262         bsd_flock->l_len = (off_t)linux_flock->l_len;
 1263         bsd_flock->l_pid = (pid_t)linux_flock->l_pid;
 1264         bsd_flock->l_sysid = 0;
 1265 }
 1266 
 1267 static void
 1268 bsd_to_linux_flock64(struct flock *bsd_flock, struct l_flock64 *linux_flock)
 1269 {
 1270         switch (bsd_flock->l_type) {
 1271         case F_RDLCK:
 1272                 linux_flock->l_type = LINUX_F_RDLCK;
 1273                 break;
 1274         case F_WRLCK:
 1275                 linux_flock->l_type = LINUX_F_WRLCK;
 1276                 break;
 1277         case F_UNLCK:
 1278                 linux_flock->l_type = LINUX_F_UNLCK;
 1279                 break;
 1280         }
 1281         linux_flock->l_whence = bsd_flock->l_whence;
 1282         linux_flock->l_start = (l_loff_t)bsd_flock->l_start;
 1283         linux_flock->l_len = (l_loff_t)bsd_flock->l_len;
 1284         linux_flock->l_pid = (l_pid_t)bsd_flock->l_pid;
 1285 }
 1286 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */
 1287 
 1288 static int
 1289 fcntl_common(struct thread *td, struct linux_fcntl64_args *args)
 1290 {
 1291         struct l_flock linux_flock;
 1292         struct flock bsd_flock;
 1293         cap_rights_t rights;
 1294         struct file *fp;
 1295         long arg;
 1296         int error, result;
 1297 
 1298         switch (args->cmd) {
 1299         case LINUX_F_DUPFD:
 1300                 return (kern_fcntl(td, args->fd, F_DUPFD, args->arg));
 1301 
 1302         case LINUX_F_GETFD:
 1303                 return (kern_fcntl(td, args->fd, F_GETFD, 0));
 1304 
 1305         case LINUX_F_SETFD:
 1306                 return (kern_fcntl(td, args->fd, F_SETFD, args->arg));
 1307 
 1308         case LINUX_F_GETFL:
 1309                 error = kern_fcntl(td, args->fd, F_GETFL, 0);
 1310                 result = td->td_retval[0];
 1311                 td->td_retval[0] = 0;
 1312                 if (result & O_RDONLY)
 1313                         td->td_retval[0] |= LINUX_O_RDONLY;
 1314                 if (result & O_WRONLY)
 1315                         td->td_retval[0] |= LINUX_O_WRONLY;
 1316                 if (result & O_RDWR)
 1317                         td->td_retval[0] |= LINUX_O_RDWR;
 1318                 if (result & O_NDELAY)
 1319                         td->td_retval[0] |= LINUX_O_NONBLOCK;
 1320                 if (result & O_APPEND)
 1321                         td->td_retval[0] |= LINUX_O_APPEND;
 1322                 if (result & O_FSYNC)
 1323                         td->td_retval[0] |= LINUX_O_SYNC;
 1324                 if (result & O_ASYNC)
 1325                         td->td_retval[0] |= LINUX_FASYNC;
 1326 #ifdef LINUX_O_NOFOLLOW
 1327                 if (result & O_NOFOLLOW)
 1328                         td->td_retval[0] |= LINUX_O_NOFOLLOW;
 1329 #endif
 1330 #ifdef LINUX_O_DIRECT
 1331                 if (result & O_DIRECT)
 1332                         td->td_retval[0] |= LINUX_O_DIRECT;
 1333 #endif
 1334                 return (error);
 1335 
 1336         case LINUX_F_SETFL:
 1337                 arg = 0;
 1338                 if (args->arg & LINUX_O_NDELAY)
 1339                         arg |= O_NONBLOCK;
 1340                 if (args->arg & LINUX_O_APPEND)
 1341                         arg |= O_APPEND;
 1342                 if (args->arg & LINUX_O_SYNC)
 1343                         arg |= O_FSYNC;
 1344                 if (args->arg & LINUX_FASYNC)
 1345                         arg |= O_ASYNC;
 1346 #ifdef LINUX_O_NOFOLLOW
 1347                 if (args->arg & LINUX_O_NOFOLLOW)
 1348                         arg |= O_NOFOLLOW;
 1349 #endif
 1350 #ifdef LINUX_O_DIRECT
 1351                 if (args->arg & LINUX_O_DIRECT)
 1352                         arg |= O_DIRECT;
 1353 #endif
 1354                 return (kern_fcntl(td, args->fd, F_SETFL, arg));
 1355 
 1356         case LINUX_F_GETLK:
 1357                 error = copyin((void *)args->arg, &linux_flock,
 1358                     sizeof(linux_flock));
 1359                 if (error)
 1360                         return (error);
 1361                 linux_to_bsd_flock(&linux_flock, &bsd_flock);
 1362                 error = kern_fcntl(td, args->fd, F_GETLK, (intptr_t)&bsd_flock);
 1363                 if (error)
 1364                         return (error);
 1365                 bsd_to_linux_flock(&bsd_flock, &linux_flock);
 1366                 return (copyout(&linux_flock, (void *)args->arg,
 1367                     sizeof(linux_flock)));
 1368 
 1369         case LINUX_F_SETLK:
 1370                 error = copyin((void *)args->arg, &linux_flock,
 1371                     sizeof(linux_flock));
 1372                 if (error)
 1373                         return (error);
 1374                 linux_to_bsd_flock(&linux_flock, &bsd_flock);
 1375                 return (kern_fcntl(td, args->fd, F_SETLK,
 1376                     (intptr_t)&bsd_flock));
 1377 
 1378         case LINUX_F_SETLKW:
 1379                 error = copyin((void *)args->arg, &linux_flock,
 1380                     sizeof(linux_flock));
 1381                 if (error)
 1382                         return (error);
 1383                 linux_to_bsd_flock(&linux_flock, &bsd_flock);
 1384                 return (kern_fcntl(td, args->fd, F_SETLKW,
 1385                      (intptr_t)&bsd_flock));
 1386 
 1387         case LINUX_F_GETOWN:
 1388                 return (kern_fcntl(td, args->fd, F_GETOWN, 0));
 1389 
 1390         case LINUX_F_SETOWN:
 1391                 /*
 1392                  * XXX some Linux applications depend on F_SETOWN having no
 1393                  * significant effect for pipes (SIGIO is not delivered for
 1394                  * pipes under Linux-2.2.35 at least).
 1395                  */
 1396                 error = fget(td, args->fd,
 1397                     cap_rights_init(&rights, CAP_FCNTL), &fp);
 1398                 if (error)
 1399                         return (error);
 1400                 if (fp->f_type == DTYPE_PIPE) {
 1401                         fdrop(fp, td);
 1402                         return (EINVAL);
 1403                 }
 1404                 fdrop(fp, td);
 1405 
 1406                 return (kern_fcntl(td, args->fd, F_SETOWN, args->arg));
 1407         }
 1408 
 1409         return (EINVAL);
 1410 }
 1411 
 1412 int
 1413 linux_fcntl(struct thread *td, struct linux_fcntl_args *args)
 1414 {
 1415         struct linux_fcntl64_args args64;
 1416 
 1417 #ifdef DEBUG
 1418         if (ldebug(fcntl))
 1419                 printf(ARGS(fcntl, "%d, %08x, *"), args->fd, args->cmd);
 1420 #endif
 1421 
 1422         args64.fd = args->fd;
 1423         args64.cmd = args->cmd;
 1424         args64.arg = args->arg;
 1425         return (fcntl_common(td, &args64));
 1426 }
 1427 
 1428 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32))
 1429 int
 1430 linux_fcntl64(struct thread *td, struct linux_fcntl64_args *args)
 1431 {
 1432         struct l_flock64 linux_flock;
 1433         struct flock bsd_flock;
 1434         int error;
 1435 
 1436 #ifdef DEBUG
 1437         if (ldebug(fcntl64))
 1438                 printf(ARGS(fcntl64, "%d, %08x, *"), args->fd, args->cmd);
 1439 #endif
 1440 
 1441         switch (args->cmd) {
 1442         case LINUX_F_GETLK64:
 1443                 error = copyin((void *)args->arg, &linux_flock,
 1444                     sizeof(linux_flock));
 1445                 if (error)
 1446                         return (error);
 1447                 linux_to_bsd_flock64(&linux_flock, &bsd_flock);
 1448                 error = kern_fcntl(td, args->fd, F_GETLK, (intptr_t)&bsd_flock);
 1449                 if (error)
 1450                         return (error);
 1451                 bsd_to_linux_flock64(&bsd_flock, &linux_flock);
 1452                 return (copyout(&linux_flock, (void *)args->arg,
 1453                             sizeof(linux_flock)));
 1454 
 1455         case LINUX_F_SETLK64:
 1456                 error = copyin((void *)args->arg, &linux_flock,
 1457                     sizeof(linux_flock));
 1458                 if (error)
 1459                         return (error);
 1460                 linux_to_bsd_flock64(&linux_flock, &bsd_flock);
 1461                 return (kern_fcntl(td, args->fd, F_SETLK,
 1462                     (intptr_t)&bsd_flock));
 1463 
 1464         case LINUX_F_SETLKW64:
 1465                 error = copyin((void *)args->arg, &linux_flock,
 1466                     sizeof(linux_flock));
 1467                 if (error)
 1468                         return (error);
 1469                 linux_to_bsd_flock64(&linux_flock, &bsd_flock);
 1470                 return (kern_fcntl(td, args->fd, F_SETLKW,
 1471                     (intptr_t)&bsd_flock));
 1472         }
 1473 
 1474         return (fcntl_common(td, args));
 1475 }
 1476 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */
 1477 
 1478 int
 1479 linux_chown(struct thread *td, struct linux_chown_args *args)
 1480 {
 1481         char *path;
 1482         int error;
 1483 
 1484         LCONVPATHEXIST(td, args->path, &path);
 1485 
 1486 #ifdef DEBUG
 1487         if (ldebug(chown))
 1488                 printf(ARGS(chown, "%s, %d, %d"), path, args->uid, args->gid);
 1489 #endif
 1490         error = kern_chown(td, path, UIO_SYSSPACE, args->uid, args->gid);
 1491         LFREEPATH(path);
 1492         return (error);
 1493 }
 1494 
 1495 int
 1496 linux_fchownat(struct thread *td, struct linux_fchownat_args *args)
 1497 {
 1498         char *path;
 1499         int error, dfd, flag;
 1500 
 1501         if (args->flag & ~LINUX_AT_SYMLINK_NOFOLLOW)
 1502                 return (EINVAL);
 1503 
 1504         dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD :  args->dfd;
 1505         LCONVPATHEXIST_AT(td, args->filename, &path, dfd);
 1506 
 1507 #ifdef DEBUG
 1508         if (ldebug(fchownat))
 1509                 printf(ARGS(fchownat, "%s, %d, %d"), path, args->uid, args->gid);
 1510 #endif
 1511 
 1512         flag = (args->flag & LINUX_AT_SYMLINK_NOFOLLOW) == 0 ? 0 :
 1513             AT_SYMLINK_NOFOLLOW;
 1514         error = kern_fchownat(td, dfd, path, UIO_SYSSPACE, args->uid, args->gid,
 1515             flag);
 1516         LFREEPATH(path);
 1517         return (error);
 1518 }
 1519 
 1520 int
 1521 linux_lchown(struct thread *td, struct linux_lchown_args *args)
 1522 {
 1523         char *path;
 1524         int error;
 1525 
 1526         LCONVPATHEXIST(td, args->path, &path);
 1527 
 1528 #ifdef DEBUG
 1529         if (ldebug(lchown))
 1530                 printf(ARGS(lchown, "%s, %d, %d"), path, args->uid, args->gid);
 1531 #endif
 1532         error = kern_lchown(td, path, UIO_SYSSPACE, args->uid, args->gid);
 1533         LFREEPATH(path);
 1534         return (error);
 1535 }
 1536 
 1537 static int
 1538 convert_fadvice(int advice)
 1539 {
 1540         switch (advice) {
 1541         case LINUX_POSIX_FADV_NORMAL:
 1542                 return (POSIX_FADV_NORMAL);
 1543         case LINUX_POSIX_FADV_RANDOM:
 1544                 return (POSIX_FADV_RANDOM);
 1545         case LINUX_POSIX_FADV_SEQUENTIAL:
 1546                 return (POSIX_FADV_SEQUENTIAL);
 1547         case LINUX_POSIX_FADV_WILLNEED:
 1548                 return (POSIX_FADV_WILLNEED);
 1549         case LINUX_POSIX_FADV_DONTNEED:
 1550                 return (POSIX_FADV_DONTNEED);
 1551         case LINUX_POSIX_FADV_NOREUSE:
 1552                 return (POSIX_FADV_NOREUSE);
 1553         default:
 1554                 return (-1);
 1555         }
 1556 }
 1557 
 1558 int
 1559 linux_fadvise64(struct thread *td, struct linux_fadvise64_args *args)
 1560 {
 1561         int advice;
 1562 
 1563         advice = convert_fadvice(args->advice);
 1564         if (advice == -1)
 1565                 return (EINVAL);
 1566         return (kern_posix_fadvise(td, args->fd, args->offset, args->len,
 1567             advice));
 1568 }
 1569 
 1570 int
 1571 linux_fadvise64_64(struct thread *td, struct linux_fadvise64_64_args *args)
 1572 {
 1573         int advice;
 1574 
 1575         advice = convert_fadvice(args->advice);
 1576         if (advice == -1)
 1577                 return (EINVAL);
 1578         return (kern_posix_fadvise(td, args->fd, args->offset, args->len,
 1579             advice));
 1580 }
 1581 
 1582 int
 1583 linux_pipe(struct thread *td, struct linux_pipe_args *args)
 1584 {
 1585         int fildes[2];
 1586         int error;
 1587 
 1588 #ifdef DEBUG
 1589         if (ldebug(pipe))
 1590                 printf(ARGS(pipe, "*"));
 1591 #endif
 1592 
 1593         error = kern_pipe2(td, fildes, 0);
 1594         if (error)
 1595                 return (error);
 1596 
 1597         /* XXX: Close descriptors on error. */
 1598         return (copyout(fildes, args->pipefds, sizeof(fildes)));
 1599 }
 1600 
 1601 int
 1602 linux_pipe2(struct thread *td, struct linux_pipe2_args *args)
 1603 {
 1604         int fildes[2];
 1605         int error, flags;
 1606 
 1607 #ifdef DEBUG
 1608         if (ldebug(pipe2))
 1609                 printf(ARGS(pipe2, "*, %d"), args->flags);
 1610 #endif
 1611 
 1612         if ((args->flags & ~(LINUX_O_NONBLOCK | LINUX_O_CLOEXEC)) != 0)
 1613                 return (EINVAL);
 1614 
 1615         flags = 0;
 1616         if ((args->flags & LINUX_O_NONBLOCK) != 0)
 1617                 flags |= O_NONBLOCK;
 1618         if ((args->flags & LINUX_O_CLOEXEC) != 0)
 1619                 flags |= O_CLOEXEC;
 1620         error = kern_pipe2(td, fildes, flags);
 1621         if (error)
 1622                 return (error);
 1623 
 1624         /* XXX: Close descriptors on error. */
 1625         return (copyout(fildes, args->pipefds, sizeof(fildes)));
 1626 }

Cache object: f55427cd868a9e0513e004f629c90ddc


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.