fsdev/virtfs-proxy-helper.c

   1 /*
   2  * Helper for QEMU Proxy FS Driver
   3  * Copyright IBM, Corp. 2011
   4  *
   5  * Authors:
   6  * M. Mohan Kumar <mohan@in.ibm.com>
   7  *
   8  * This work is licensed under the terms of the GNU GPL, version 2. See
   9  * the COPYING file in the top-level directory.
  10  */
  11
  12 #include "qemu/osdep.h"
  13 #include <sys/resource.h>
  14 #include <getopt.h>
  15 #include <syslog.h>
  16 #include <sys/capability.h>
  17 #include <sys/fsuid.h>
  18 #include <sys/vfs.h>
  19 #include <sys/ioctl.h>
  20 #include <linux/fs.h>
  21 #ifdef CONFIG_LINUX_MAGIC_H
  22 #include <linux/magic.h>
  23 #endif
  24 #include "qemu-common.h"
  25 #include "qemu/sockets.h"
  26 #include "qemu/xattr.h"
  27 #include "9p-iov-marshal.h"
  28 #include "hw/9pfs/9p-proxy.h"
  29 #include "fsdev/9p-iov-marshal.h"
  30
  31 #define PROGNAME "virtfs-proxy-helper"
  32
  33 #ifndef XFS_SUPER_MAGIC
  34 #define XFS_SUPER_MAGIC  0x58465342
  35 #endif
  36 #ifndef EXT2_SUPER_MAGIC
  37 #define EXT2_SUPER_MAGIC 0xEF53
  38 #endif
  39 #ifndef REISERFS_SUPER_MAGIC
  40 #define REISERFS_SUPER_MAGIC 0x52654973
  41 #endif
  42 #ifndef BTRFS_SUPER_MAGIC
  43 #define BTRFS_SUPER_MAGIC 0x9123683E
  44 #endif
  45
  46 static struct option helper_opts[] = {
  47     {"fd", required_argument, NULL, 'f'},
  48     {"path", required_argument, NULL, 'p'},
  49     {"nodaemon", no_argument, NULL, 'n'},
  50     {"socket", required_argument, NULL, 's'},
  51     {"uid", required_argument, NULL, 'u'},
  52     {"gid", required_argument, NULL, 'g'},
  53     {},
  54 };
  55
  56 static bool is_daemon;
  57 static bool get_version; /* IOC getversion IOCTL supported */
  58
  59 static void GCC_FMT_ATTR(2, 3) do_log(int loglevel, const char *format, ...)
  60 {
  61     va_list ap;
  62
  63     va_start(ap, format);
  64     if (is_daemon) {
  65         vsyslog(LOG_CRIT, format, ap);
  66     } else {
  67         vfprintf(stderr, format, ap);
  68     }
  69     va_end(ap);
  70 }
  71
  72 static void do_perror(const char *string)
  73 {
  74     if (is_daemon) {
  75         syslog(LOG_CRIT, "%s:%s", string, strerror(errno));
  76     } else {
  77         fprintf(stderr, "%s:%s\n", string, strerror(errno));
  78     }
  79 }
  80
  81 static int do_cap_set(cap_value_t *cap_value, int size, int reset)
  82 {
  83     cap_t caps;
  84     if (reset) {
  85         /*
  86          * Start with an empty set and set permitted and effective
  87          */
  88         caps = cap_init();
  89         if (caps == NULL) {
  90             do_perror("cap_init");
  91             return -1;
  92         }
  93         if (cap_set_flag(caps, CAP_PERMITTED, size, cap_value, CAP_SET) < 0) {
  94             do_perror("cap_set_flag");
  95             goto error;
  96         }
  97     } else {
  98         caps = cap_get_proc();
  99         if (!caps) {
 100             do_perror("cap_get_proc");
 101             return -1;
 102         }
 103     }
 104     if (cap_set_flag(caps, CAP_EFFECTIVE, size, cap_value, CAP_SET) < 0) {
 105         do_perror("cap_set_flag");
 106         goto error;
 107     }
 108     if (cap_set_proc(caps) < 0) {
 109         do_perror("cap_set_proc");
 110         goto error;
 111     }
 112     cap_free(caps);
 113     return 0;
 114
 115 error:
 116     cap_free(caps);
 117     return -1;
 118 }
 119
 120 static int init_capabilities(void)
 121 {
 122     /* helper needs following capabilities only */
 123     cap_value_t cap_list[] = {
 124         CAP_CHOWN,
 125         CAP_DAC_OVERRIDE,
 126         CAP_FOWNER,
 127         CAP_FSETID,
 128         CAP_SETGID,
 129         CAP_MKNOD,
 130         CAP_SETUID,
 131     };
 132     return do_cap_set(cap_list, ARRAY_SIZE(cap_list), 1);
 133 }
 134
 135 static int socket_read(int sockfd, void *buff, ssize_t size)
 136 {
 137     ssize_t retval, total = 0;
 138
 139     while (size) {
 140         retval = read(sockfd, buff, size);
 141         if (retval == 0) {
 142             return -EIO;
 143         }
 144         if (retval < 0) {
 145             if (errno == EINTR) {
 146                 continue;
 147             }
 148             return -errno;
 149         }
 150         size -= retval;
 151         buff += retval;
 152         total += retval;
 153     }
 154     return total;
 155 }
 156
 157 static int socket_write(int sockfd, void *buff, ssize_t size)
 158 {
 159     ssize_t retval, total = 0;
 160
 161     while (size) {
 162         retval = write(sockfd, buff, size);
 163         if (retval < 0) {
 164             if (errno == EINTR) {
 165                 continue;
 166             }
 167             return -errno;
 168         }
 169         size -= retval;
 170         buff += retval;
 171         total += retval;
 172     }
 173     return total;
 174 }
 175
 176 static int read_request(int sockfd, struct iovec *iovec, ProxyHeader *header)
 177 {
 178     int retval;
 179
 180     /*
 181      * read the request header.
 182      */
 183     iovec->iov_len = 0;
 184     retval = socket_read(sockfd, iovec->iov_base, PROXY_HDR_SZ);
 185     if (retval < 0) {
 186         return retval;
 187     }
 188     iovec->iov_len = PROXY_HDR_SZ;
 189     retval = proxy_unmarshal(iovec, 0, "dd", &header->type, &header->size);
 190     if (retval < 0) {
 191         return retval;
 192     }
 193     /*
 194      * We can't process message.size > PROXY_MAX_IO_SZ.
 195      * Treat it as fatal error
 196      */
 197     if (header->size > PROXY_MAX_IO_SZ) {
 198         return -ENOBUFS;
 199     }
 200     retval = socket_read(sockfd, iovec->iov_base + PROXY_HDR_SZ, header->size);
 201     if (retval < 0) {
 202         return retval;
 203     }
 204     iovec->iov_len += header->size;
 205     return 0;
 206 }
 207
 208 static int send_fd(int sockfd, int fd)
 209 {
 210     struct msghdr msg;
 211     struct iovec iov;
 212     int retval, data;
 213     struct cmsghdr *cmsg;
 214     union MsgControl msg_control;
 215
 216     iov.iov_base = &data;
 217     iov.iov_len = sizeof(data);
 218
 219     memset(&msg, 0, sizeof(msg));
 220     msg.msg_iov = &iov;
 221     msg.msg_iovlen = 1;
 222     /* No ancillary data on error */
 223     if (fd < 0) {
 224         /* fd is really negative errno if the request failed  */
 225         data = fd;
 226     } else {
 227         data = V9FS_FD_VALID;
 228         msg.msg_control = &msg_control;
 229         msg.msg_controllen = sizeof(msg_control);
 230
 231         cmsg = &msg_control.cmsg;
 232         cmsg->cmsg_len = CMSG_LEN(sizeof(fd));
 233         cmsg->cmsg_level = SOL_SOCKET;
 234         cmsg->cmsg_type = SCM_RIGHTS;
 235         memcpy(CMSG_DATA(cmsg), &fd, sizeof(fd));
 236     }
 237
 238     do {
 239         retval = sendmsg(sockfd, &msg, 0);
 240     } while (retval < 0 && errno == EINTR);
 241     if (fd >= 0) {
 242         close(fd);
 243     }
 244     if (retval < 0) {
 245         return retval;
 246     }
 247     return 0;
 248 }
 249
 250 static int send_status(int sockfd, struct iovec *iovec, int status)
 251 {
 252     ProxyHeader header;
 253     int retval, msg_size;
 254
 255     if (status < 0) {
 256         header.type = T_ERROR;
 257     } else {
 258         header.type = T_SUCCESS;
 259     }
 260     header.size = sizeof(status);
 261     /*
 262      * marshal the return status. We don't check error.
 263      * because we are sure we have enough space for the status
 264      */
 265     msg_size = proxy_marshal(iovec, 0, "ddd", header.type,
 266                              header.size, status);
 267     if (msg_size < 0) {
 268         return msg_size;
 269     }
 270     retval = socket_write(sockfd, iovec->iov_base, msg_size);
 271     if (retval < 0) {
 272         return retval;
 273     }
 274     return 0;
 275 }
 276
 277 /*
 278  * from man 7 capabilities, section
 279  * Effect of User ID Changes on Capabilities:
 280  * If the effective user ID is changed from nonzero to 0, then the permitted
 281  * set is copied to the effective set.  If the effective user ID is changed
 282  * from 0 to nonzero, then all capabilities are are cleared from the effective
 283  * set.
 284  *
 285  * The setfsuid/setfsgid man pages warn that changing the effective user ID may
 286  * expose the program to unwanted signals, but this is not true anymore: for an
 287  * unprivileged (without CAP_KILL) program to send a signal, the real or
 288  * effective user ID of the sending process must equal the real or saved user
 289  * ID of the target process.  Even when dropping privileges, it is enough to
 290  * keep the saved UID to a "privileged" value and virtfs-proxy-helper won't
 291  * be exposed to signals.  So just use setresuid/setresgid.
 292  */
 293 static int setugid(int uid, int gid, int *suid, int *sgid)
 294 {
 295     int retval;
 296
 297     /*
 298      * We still need DAC_OVERRIDE because we don't change
 299      * supplementary group ids, and hence may be subjected DAC rules
 300      */
 301     cap_value_t cap_list[] = {
 302         CAP_DAC_OVERRIDE,
 303     };
 304
 305     *suid = geteuid();
 306     *sgid = getegid();
 307
 308     if (setresgid(-1, gid, *sgid) == -1) {
 309         retval = -errno;
 310         goto err_out;
 311     }
 312
 313     if (setresuid(-1, uid, *suid) == -1) {
 314         retval = -errno;
 315         goto err_sgid;
 316     }
 317
 318     if (uid != 0 || gid != 0) {
 319         if (do_cap_set(cap_list, ARRAY_SIZE(cap_list), 0) < 0) {
 320             retval = -errno;
 321             goto err_suid;
 322         }
 323     }
 324     return 0;
 325
 326 err_suid:
 327     if (setresuid(-1, *suid, *suid) == -1) {
 328         abort();
 329     }
 330 err_sgid:
 331     if (setresgid(-1, *sgid, *sgid) == -1) {
 332         abort();
 333     }
 334 err_out:
 335     return retval;
 336 }
 337
 338 /*
 339  * This is used to reset the ugid back with the saved values
 340  * There is nothing much we can do checking error values here.
 341  */
 342 static void resetugid(int suid, int sgid)
 343 {
 344     if (setresgid(-1, sgid, sgid) == -1) {
 345         abort();
 346     }
 347     if (setresuid(-1, suid, suid) == -1) {
 348         abort();
 349     }
 350 }
 351
 352 /*
 353  * send response in two parts
 354  * 1) ProxyHeader
 355  * 2) Response or error status
 356  * This function should be called with marshaled response
 357  * send_response constructs header part and error part only.
 358  * send response sends {ProxyHeader,Response} if the request was success
 359  * otherwise sends {ProxyHeader,error status}
 360  */
 361 static int send_response(int sock, struct iovec *iovec, int size)
 362 {
 363     int retval;
 364     ProxyHeader header;
 365
 366     /*
 367      * If response size exceeds available iovec->iov_len,
 368      * we return ENOBUFS
 369      */
 370     if (size > PROXY_MAX_IO_SZ) {
 371         size = -ENOBUFS;
 372     }
 373
 374     if (size < 0) {
 375         /*
 376          * In case of error we would not have got the error encoded
 377          * already so encode the error here.
 378          */
 379         header.type = T_ERROR;
 380         header.size = sizeof(size);
 381         proxy_marshal(iovec, PROXY_HDR_SZ, "d", size);
 382     } else {
 383         header.type = T_SUCCESS;
 384         header.size = size;
 385     }
 386     proxy_marshal(iovec, 0, "dd", header.type, header.size);
 387     retval = socket_write(sock, iovec->iov_base, header.size + PROXY_HDR_SZ);
 388     if (retval < 0) {
 389         return retval;
 390     }
 391     return 0;
 392 }
 393
 394 /*
 395  * gets generation number
 396  * returns -errno on failure and sizeof(generation number) on success
 397  */
 398 static int do_getversion(struct iovec *iovec, struct iovec *out_iovec)
 399 {
 400     uint64_t version;
 401     int retval = -ENOTTY;
 402 #ifdef FS_IOC_GETVERSION
 403     int fd;
 404     V9fsString path;
 405 #endif
 406
 407
 408     /* no need to issue ioctl */
 409     if (!get_version) {
 410         version = 0;
 411         retval = proxy_marshal(out_iovec, PROXY_HDR_SZ, "q", version);
 412         return retval;
 413     }
 414 #ifdef FS_IOC_GETVERSION
 415     retval = proxy_unmarshal(iovec, PROXY_HDR_SZ, "s", &path);
 416     if (retval < 0) {
 417         return retval;
 418     }
 419
 420     fd = open(path.data, O_RDONLY);
 421     if (fd < 0) {
 422         retval = -errno;
 423         goto err_out;
 424     }
 425     if (ioctl(fd, FS_IOC_GETVERSION, &version) < 0) {
 426         retval = -errno;
 427     } else {
 428         retval = proxy_marshal(out_iovec, PROXY_HDR_SZ, "q", version);
 429     }
 430     close(fd);
 431 err_out:
 432     v9fs_string_free(&path);
 433 #endif
 434     return retval;
 435 }
 436
 437 static int do_getxattr(int type, struct iovec *iovec, struct iovec *out_iovec)
 438 {
 439     int size = 0, offset, retval;
 440     V9fsString path, name, xattr;
 441
 442     v9fs_string_init(&xattr);
 443     v9fs_string_init(&path);
 444     retval = proxy_unmarshal(iovec, PROXY_HDR_SZ, "ds", &size, &path);
 445     if (retval < 0) {
 446         return retval;
 447     }
 448     offset = PROXY_HDR_SZ + retval;
 449
 450     if (size) {
 451         xattr.data = g_malloc(size);
 452         xattr.size = size;
 453     }
 454     switch (type) {
 455     case T_LGETXATTR:
 456         v9fs_string_init(&name);
 457         retval = proxy_unmarshal(iovec, offset, "s", &name);
 458         if (retval > 0) {
 459             retval = lgetxattr(path.data, name.data, xattr.data, size);
 460             if (retval < 0) {
 461                 retval = -errno;
 462             } else {
 463                 xattr.size = retval;
 464             }
 465         }
 466         v9fs_string_free(&name);
 467         break;
 468     case T_LLISTXATTR:
 469         retval = llistxattr(path.data, xattr.data, size);
 470         if (retval < 0) {
 471             retval = -errno;
 472         } else {
 473             xattr.size = retval;
 474         }
 475         break;
 476     }
 477     if (retval < 0) {
 478         goto err_out;
 479     }
 480
 481     if (!size) {
 482         proxy_marshal(out_iovec, PROXY_HDR_SZ, "d", retval);
 483         retval = sizeof(retval);
 484     } else {
 485         retval = proxy_marshal(out_iovec, PROXY_HDR_SZ, "s", &xattr);
 486     }
 487 err_out:
 488     v9fs_string_free(&xattr);
 489     v9fs_string_free(&path);
 490     return retval;
 491 }
 492
 493 static void stat_to_prstat(ProxyStat *pr_stat, struct stat *stat)
 494 {
 495     memset(pr_stat, 0, sizeof(*pr_stat));
 496     pr_stat->st_dev = stat->st_dev;
 497     pr_stat->st_ino = stat->st_ino;
 498     pr_stat->st_nlink = stat->st_nlink;
 499     pr_stat->st_mode = stat->st_mode;
 500     pr_stat->st_uid = stat->st_uid;
 501     pr_stat->st_gid = stat->st_gid;
 502     pr_stat->st_rdev = stat->st_rdev;
 503     pr_stat->st_size = stat->st_size;
 504     pr_stat->st_blksize = stat->st_blksize;
 505     pr_stat->st_blocks = stat->st_blocks;
 506     pr_stat->st_atim_sec = stat->st_atim.tv_sec;
 507     pr_stat->st_atim_nsec = stat->st_atim.tv_nsec;
 508     pr_stat->st_mtim_sec = stat->st_mtim.tv_sec;
 509     pr_stat->st_mtim_nsec = stat->st_mtim.tv_nsec;
 510     pr_stat->st_ctim_sec = stat->st_ctim.tv_sec;
 511     pr_stat->st_ctim_nsec = stat->st_ctim.tv_nsec;
 512 }
 513
 514 static void statfs_to_prstatfs(ProxyStatFS *pr_stfs, struct statfs *stfs)
 515 {
 516     memset(pr_stfs, 0, sizeof(*pr_stfs));
 517     pr_stfs->f_type = stfs->f_type;
 518     pr_stfs->f_bsize = stfs->f_bsize;
 519     pr_stfs->f_blocks = stfs->f_blocks;
 520     pr_stfs->f_bfree = stfs->f_bfree;
 521     pr_stfs->f_bavail = stfs->f_bavail;
 522     pr_stfs->f_files = stfs->f_files;
 523     pr_stfs->f_ffree = stfs->f_ffree;
 524     pr_stfs->f_fsid[0] = stfs->f_fsid.__val[0];
 525     pr_stfs->f_fsid[1] = stfs->f_fsid.__val[1];
 526     pr_stfs->f_namelen = stfs->f_namelen;
 527     pr_stfs->f_frsize = stfs->f_frsize;
 528 }
 529
 530 /*
 531  * Gets stat/statfs information and packs in out_iovec structure
 532  * on success returns number of bytes packed in out_iovec struture
 533  * otherwise returns -errno
 534  */
 535 static int do_stat(int type, struct iovec *iovec, struct iovec *out_iovec)
 536 {
 537     int retval;
 538     V9fsString path;
 539     ProxyStat pr_stat;
 540     ProxyStatFS pr_stfs;
 541     struct stat st_buf;
 542     struct statfs stfs_buf;
 543
 544     v9fs_string_init(&path);
 545     retval = proxy_unmarshal(iovec, PROXY_HDR_SZ, "s", &path);
 546     if (retval < 0) {
 547         return retval;
 548     }
 549
 550     switch (type) {
 551     case T_LSTAT:
 552         retval = lstat(path.data, &st_buf);
 553         if (retval < 0) {
 554             retval = -errno;
 555         } else {
 556             stat_to_prstat(&pr_stat, &st_buf);
 557             retval = proxy_marshal(out_iovec, PROXY_HDR_SZ,
 558                                    "qqqdddqqqqqqqqqq", pr_stat.st_dev,
 559                                    pr_stat.st_ino, pr_stat.st_nlink,
 560                                    pr_stat.st_mode, pr_stat.st_uid,
 561                                    pr_stat.st_gid, pr_stat.st_rdev,
 562                                    pr_stat.st_size, pr_stat.st_blksize,
 563                                    pr_stat.st_blocks,
 564                                    pr_stat.st_atim_sec, pr_stat.st_atim_nsec,
 565                                    pr_stat.st_mtim_sec, pr_stat.st_mtim_nsec,
 566                                    pr_stat.st_ctim_sec, pr_stat.st_ctim_nsec);
 567         }
 568         break;
 569     case T_STATFS:
 570         retval = statfs(path.data, &stfs_buf);
 571         if (retval < 0) {
 572             retval = -errno;
 573         } else {
 574             statfs_to_prstatfs(&pr_stfs, &stfs_buf);
 575             retval = proxy_marshal(out_iovec, PROXY_HDR_SZ,
 576                                    "qqqqqqqqqqq", pr_stfs.f_type,
 577                                    pr_stfs.f_bsize, pr_stfs.f_blocks,
 578                                    pr_stfs.f_bfree, pr_stfs.f_bavail,
 579                                    pr_stfs.f_files, pr_stfs.f_ffree,
 580                                    pr_stfs.f_fsid[0], pr_stfs.f_fsid[1],
 581                                    pr_stfs.f_namelen, pr_stfs.f_frsize);
 582         }
 583         break;
 584     }
 585     v9fs_string_free(&path);
 586     return retval;
 587 }
 588
 589 static int do_readlink(struct iovec *iovec, struct iovec *out_iovec)
 590 {
 591     char *buffer;
 592     int size, retval;
 593     V9fsString target, path;
 594
 595     v9fs_string_init(&path);
 596     retval = proxy_unmarshal(iovec, PROXY_HDR_SZ, "sd", &path, &size);
 597     if (retval < 0) {
 598         v9fs_string_free(&path);
 599         return retval;
 600     }
 601     buffer = g_malloc(size);
 602     v9fs_string_init(&target);
 603     retval = readlink(path.data, buffer, size - 1);
 604     if (retval > 0) {
 605         buffer[retval] = '\0';
 606         v9fs_string_sprintf(&target, "%s", buffer);
 607         retval = proxy_marshal(out_iovec, PROXY_HDR_SZ, "s", &target);
 608     } else {
 609         retval = -errno;
 610     }
 611     g_free(buffer);
 612     v9fs_string_free(&target);
 613     v9fs_string_free(&path);
 614     return retval;
 615 }
 616
 617 /*
 618  * create other filesystem objects and send 0 on success
 619  * return -errno on error
 620  */
 621 static int do_create_others(int type, struct iovec *iovec)
 622 {
 623     dev_t rdev;
 624     int retval = 0;
 625     int offset = PROXY_HDR_SZ;
 626     V9fsString oldpath, path;
 627     int mode, uid, gid, cur_uid, cur_gid;
 628
 629     v9fs_string_init(&path);
 630     v9fs_string_init(&oldpath);
 631
 632     retval = proxy_unmarshal(iovec, offset, "dd", &uid, &gid);
 633     if (retval < 0) {
 634         return retval;
 635     }
 636     offset += retval;
 637     retval = setugid(uid, gid, &cur_uid, &cur_gid);
 638     if (retval < 0) {
 639         goto unmarshal_err_out;
 640     }
 641     switch (type) {
 642     case T_MKNOD:
 643         retval = proxy_unmarshal(iovec, offset, "sdq", &path, &mode, &rdev);
 644         if (retval < 0) {
 645             goto err_out;
 646         }
 647         retval = mknod(path.data, mode, rdev);
 648         break;
 649     case T_MKDIR:
 650         retval = proxy_unmarshal(iovec, offset, "sd", &path, &mode);
 651         if (retval < 0) {
 652             goto err_out;
 653         }
 654         retval = mkdir(path.data, mode);
 655         break;
 656     case T_SYMLINK:
 657         retval = proxy_unmarshal(iovec, offset, "ss", &oldpath, &path);
 658         if (retval < 0) {
 659             goto err_out;
 660         }
 661         retval = symlink(oldpath.data, path.data);
 662         break;
 663     }
 664     if (retval < 0) {
 665         retval = -errno;
 666     }
 667
 668 err_out:
 669     resetugid(cur_uid, cur_gid);
 670 unmarshal_err_out:
 671     v9fs_string_free(&path);
 672     v9fs_string_free(&oldpath);
 673     return retval;
 674 }
 675
 676 /*
 677  * create a file and send fd on success
 678  * return -errno on error
 679  */
 680 static int do_create(struct iovec *iovec)
 681 {
 682     int ret;
 683     V9fsString path;
 684     int flags, mode, uid, gid, cur_uid, cur_gid;
 685
 686     v9fs_string_init(&path);
 687     ret = proxy_unmarshal(iovec, PROXY_HDR_SZ, "sdddd",
 688                           &path, &flags, &mode, &uid, &gid);
 689     if (ret < 0) {
 690         goto unmarshal_err_out;
 691     }
 692     ret = setugid(uid, gid, &cur_uid, &cur_gid);
 693     if (ret < 0) {
 694         goto unmarshal_err_out;
 695     }
 696     ret = open(path.data, flags, mode);
 697     if (ret < 0) {
 698         ret = -errno;
 699     }
 700
 701     resetugid(cur_uid, cur_gid);
 702 unmarshal_err_out:
 703     v9fs_string_free(&path);
 704     return ret;
 705 }
 706
 707 /*
 708  * open a file and send fd on success
 709  * return -errno on error
 710  */
 711 static int do_open(struct iovec *iovec)
 712 {
 713     int flags, ret;
 714     V9fsString path;
 715
 716     v9fs_string_init(&path);
 717     ret = proxy_unmarshal(iovec, PROXY_HDR_SZ, "sd", &path, &flags);
 718     if (ret < 0) {
 719         goto err_out;
 720     }
 721     ret = open(path.data, flags);
 722     if (ret < 0) {
 723         ret = -errno;
 724     }
 725 err_out:
 726     v9fs_string_free(&path);
 727     return ret;
 728 }
 729
 730 /* create unix domain socket and return the descriptor */
 731 static int proxy_socket(const char *path, uid_t uid, gid_t gid)
 732 {
 733     int sock, client;
 734     struct sockaddr_un proxy, qemu;
 735     socklen_t size;
 736
 737     /* requested socket already exists, refuse to start */
 738     if (!access(path, F_OK)) {
 739         do_log(LOG_CRIT, "socket already exists\n");
 740         return -1;
 741     }
 742
 743     if (strlen(path) >= sizeof(proxy.sun_path)) {
 744         do_log(LOG_CRIT, "UNIX domain socket path exceeds %zu characters\n",
 745                sizeof(proxy.sun_path));
 746         return -1;
 747     }
 748
 749     sock = socket(AF_UNIX, SOCK_STREAM, 0);
 750     if (sock < 0) {
 751         do_perror("socket");
 752         return -1;
 753     }
 754
 755     /* mask other part of mode bits */
 756     umask(7);
 757
 758     proxy.sun_family = AF_UNIX;
 759     strcpy(proxy.sun_path, path);
 760     if (bind(sock, (struct sockaddr *)&proxy,
 761             sizeof(struct sockaddr_un)) < 0) {
 762         do_perror("bind");
 763         goto error;
 764     }
 765     if (chown(proxy.sun_path, uid, gid) < 0) {
 766         do_perror("chown");
 767         goto error;
 768     }
 769     if (listen(sock, 1) < 0) {
 770         do_perror("listen");
 771         goto error;
 772     }
 773
 774     size = sizeof(qemu);
 775     client = accept(sock, (struct sockaddr *)&qemu, &size);
 776     if (client < 0) {
 777         do_perror("accept");
 778         goto error;
 779     }
 780     close(sock);
 781     return client;
 782
 783 error:
 784     close(sock);
 785     return -1;
 786 }
 787
 788 static void usage(char *prog)
 789 {
 790     fprintf(stderr, "usage: %s\n"
 791             " -p|--path <path> 9p path to export\n"
 792             " {-f|--fd <socket-descriptor>} socket file descriptor to be used\n"
 793             " {-s|--socket <socketname> socket file used for communication\n"
 794             " \t-u|--uid <uid> -g|--gid <gid>} - uid:gid combination to give "
 795             " access to this socket\n"
 796             " \tNote: -s & -f can not be used together\n"
 797             " [-n|--nodaemon] Run as a normal program\n",
 798             basename(prog));
 799 }
 800
 801 static int process_reply(int sock, int type,
 802                          struct iovec *out_iovec, int retval)
 803 {
 804     switch (type) {
 805     case T_OPEN:
 806     case T_CREATE:
 807         if (send_fd(sock, retval) < 0) {
 808             return -1;
 809         }
 810         break;
 811     case T_MKNOD:
 812     case T_MKDIR:
 813     case T_SYMLINK:
 814     case T_LINK:
 815     case T_CHMOD:
 816     case T_CHOWN:
 817     case T_TRUNCATE:
 818     case T_UTIME:
 819     case T_RENAME:
 820     case T_REMOVE:
 821     case T_LSETXATTR:
 822     case T_LREMOVEXATTR:
 823         if (send_status(sock, out_iovec, retval) < 0) {
 824             return -1;
 825         }
 826         break;
 827     case T_LSTAT:
 828     case T_STATFS:
 829     case T_READLINK:
 830     case T_LGETXATTR:
 831     case T_LLISTXATTR:
 832     case T_GETVERSION:
 833         if (send_response(sock, out_iovec, retval) < 0) {
 834             return -1;
 835         }
 836         break;
 837     default:
 838         return -1;
 839         break;
 840     }
 841     return 0;
 842 }
 843
 844 static int process_requests(int sock)
 845 {
 846     int flags;
 847     int size = 0;
 848     int retval = 0;
 849     uint64_t offset;
 850     ProxyHeader header;
 851     int mode, uid, gid;
 852     V9fsString name, value;
 853     struct timespec spec[2];
 854     V9fsString oldpath, path;
 855     struct iovec in_iovec, out_iovec;
 856
 857     in_iovec.iov_base  = g_malloc(PROXY_MAX_IO_SZ + PROXY_HDR_SZ);
 858     in_iovec.iov_len   = PROXY_MAX_IO_SZ + PROXY_HDR_SZ;
 859     out_iovec.iov_base = g_malloc(PROXY_MAX_IO_SZ + PROXY_HDR_SZ);
 860     out_iovec.iov_len  = PROXY_MAX_IO_SZ + PROXY_HDR_SZ;
 861
 862     while (1) {
 863         /*
 864          * initialize the header type, so that we send
 865          * response to proper request type.
 866          */
 867         header.type = 0;
 868         retval = read_request(sock, &in_iovec, &header);
 869         if (retval < 0) {
 870             goto err_out;
 871         }
 872
 873         switch (header.type) {
 874         case T_OPEN:
 875             retval = do_open(&in_iovec);
 876             break;
 877         case T_CREATE:
 878             retval = do_create(&in_iovec);
 879             break;
 880         case T_MKNOD:
 881         case T_MKDIR:
 882         case T_SYMLINK:
 883             retval = do_create_others(header.type, &in_iovec);
 884             break;
 885         case T_LINK:
 886             v9fs_string_init(&path);
 887             v9fs_string_init(&oldpath);
 888             retval = proxy_unmarshal(&in_iovec, PROXY_HDR_SZ,
 889                                      "ss", &oldpath, &path);
 890             if (retval > 0) {
 891                 retval = link(oldpath.data, path.data);
 892                 if (retval < 0) {
 893                     retval = -errno;
 894                 }
 895             }
 896             v9fs_string_free(&oldpath);
 897             v9fs_string_free(&path);
 898             break;
 899         case T_LSTAT:
 900         case T_STATFS:
 901             retval = do_stat(header.type, &in_iovec, &out_iovec);
 902             break;
 903         case T_READLINK:
 904             retval = do_readlink(&in_iovec, &out_iovec);
 905             break;
 906         case T_CHMOD:
 907             v9fs_string_init(&path);
 908             retval = proxy_unmarshal(&in_iovec, PROXY_HDR_SZ,
 909                                      "sd", &path, &mode);
 910             if (retval > 0) {
 911                 retval = chmod(path.data, mode);
 912                 if (retval < 0) {
 913                     retval = -errno;
 914                 }
 915             }
 916             v9fs_string_free(&path);
 917             break;
 918         case T_CHOWN:
 919             v9fs_string_init(&path);
 920             retval = proxy_unmarshal(&in_iovec, PROXY_HDR_SZ, "sdd", &path,
 921                                      &uid, &gid);
 922             if (retval > 0) {
 923                 retval = lchown(path.data, uid, gid);
 924                 if (retval < 0) {
 925                     retval = -errno;
 926                 }
 927             }
 928             v9fs_string_free(&path);
 929             break;
 930         case T_TRUNCATE:
 931             v9fs_string_init(&path);
 932             retval = proxy_unmarshal(&in_iovec, PROXY_HDR_SZ, "sq",
 933                                      &path, &offset);
 934             if (retval > 0) {
 935                 retval = truncate(path.data, offset);
 936                 if (retval < 0) {
 937                     retval = -errno;
 938                 }
 939             }
 940             v9fs_string_free(&path);
 941             break;
 942         case T_UTIME:
 943             v9fs_string_init(&path);
 944             retval = proxy_unmarshal(&in_iovec, PROXY_HDR_SZ, "sqqqq", &path,
 945                                      &spec[0].tv_sec, &spec[0].tv_nsec,
 946                                      &spec[1].tv_sec, &spec[1].tv_nsec);
 947             if (retval > 0) {
 948                 retval = qemu_utimens(path.data, spec);
 949                 if (retval < 0) {
 950                     retval = -errno;
 951                 }
 952             }
 953             v9fs_string_free(&path);
 954             break;
 955         case T_RENAME:
 956             v9fs_string_init(&path);
 957             v9fs_string_init(&oldpath);
 958             retval = proxy_unmarshal(&in_iovec, PROXY_HDR_SZ,
 959                                      "ss", &oldpath, &path);
 960             if (retval > 0) {
 961                 retval = rename(oldpath.data, path.data);
 962                 if (retval < 0) {
 963                     retval = -errno;
 964                 }
 965             }
 966             v9fs_string_free(&oldpath);
 967             v9fs_string_free(&path);
 968             break;
 969         case T_REMOVE:
 970             v9fs_string_init(&path);
 971             retval = proxy_unmarshal(&in_iovec, PROXY_HDR_SZ, "s", &path);
 972             if (retval > 0) {
 973                 retval = remove(path.data);
 974                 if (retval < 0) {
 975                     retval = -errno;
 976                 }
 977             }
 978             v9fs_string_free(&path);
 979             break;
 980         case T_LGETXATTR:
 981         case T_LLISTXATTR:
 982             retval = do_getxattr(header.type, &in_iovec, &out_iovec);
 983             break;
 984         case T_LSETXATTR:
 985             v9fs_string_init(&path);
 986             v9fs_string_init(&name);
 987             v9fs_string_init(&value);
 988             retval = proxy_unmarshal(&in_iovec, PROXY_HDR_SZ, "sssdd", &path,
 989                                      &name, &value, &size, &flags);
 990             if (retval > 0) {
 991                 retval = lsetxattr(path.data,
 992                                    name.data, value.data, size, flags);
 993                 if (retval < 0) {
 994                     retval = -errno;
 995                 }
 996             }
 997             v9fs_string_free(&path);
 998             v9fs_string_free(&name);
 999             v9fs_string_free(&value);
1000             break;
1001         case T_LREMOVEXATTR:
1002             v9fs_string_init(&path);
1003             v9fs_string_init(&name);
1004             retval = proxy_unmarshal(&in_iovec,
1005                                      PROXY_HDR_SZ, "ss", &path, &name);
1006             if (retval > 0) {
1007                 retval = lremovexattr(path.data, name.data);
1008                 if (retval < 0) {
1009                     retval = -errno;
1010                 }
1011             }
1012             v9fs_string_free(&path);
1013             v9fs_string_free(&name);
1014             break;
1015         case T_GETVERSION:
1016             retval = do_getversion(&in_iovec, &out_iovec);
1017             break;
1018         default:
1019             goto err_out;
1020             break;
1021         }
1022
1023         if (process_reply(sock, header.type, &out_iovec, retval) < 0) {
1024             goto err_out;
1025         }
1026     }
1027 err_out:
1028     g_free(in_iovec.iov_base);
1029     g_free(out_iovec.iov_base);
1030     return -1;
1031 }
1032
1033 int main(int argc, char **argv)
1034 {
1035     int sock;
1036     uid_t own_u;
1037     gid_t own_g;
1038     char *rpath = NULL;
1039     char *sock_name = NULL;
1040     struct stat stbuf;
1041     int c, option_index;
1042 #ifdef FS_IOC_GETVERSION
1043     int retval;
1044     struct statfs st_fs;
1045 #endif
1046
1047     is_daemon = true;
1048     sock = -1;
1049     own_u = own_g = -1;
1050     while (1) {
1051         option_index = 0;
1052         c = getopt_long(argc, argv, "p:nh?f:s:u:g:", helper_opts,
1053                         &option_index);
1054         if (c == -1) {
1055             break;
1056         }
1057         switch (c) {
1058         case 'p':
1059             rpath = g_strdup(optarg);
1060             break;
1061         case 'n':
1062             is_daemon = false;
1063             break;
1064         case 'f':
1065             sock = atoi(optarg);
1066             break;
1067         case 's':
1068             sock_name = g_strdup(optarg);
1069             break;
1070         case 'u':
1071             own_u = atoi(optarg);
1072             break;
1073         case 'g':
1074             own_g = atoi(optarg);
1075             break;
1076         case '?':
1077         case 'h':
1078         default:
1079             usage(argv[0]);
1080             exit(EXIT_FAILURE);
1081         }
1082     }
1083
1084     /* Parameter validation */
1085     if ((sock_name == NULL && sock == -1) || rpath == NULL) {
1086         fprintf(stderr, "socket, socket descriptor or path not specified\n");
1087         usage(argv[0]);
1088         return -1;
1089     }
1090
1091     if (sock_name && sock != -1) {
1092         fprintf(stderr, "both named socket and socket descriptor specified\n");
1093         usage(argv[0]);
1094         exit(EXIT_FAILURE);
1095     }
1096
1097     if (sock_name && (own_u == -1 || own_g == -1)) {
1098         fprintf(stderr, "owner uid:gid not specified, ");
1099         fprintf(stderr,
1100                 "owner uid:gid specifies who can access the socket file\n");
1101         usage(argv[0]);
1102         exit(EXIT_FAILURE);
1103     }
1104
1105     if (lstat(rpath, &stbuf) < 0) {
1106         fprintf(stderr, "invalid path \"%s\" specified, %s\n",
1107                 rpath, strerror(errno));
1108         exit(EXIT_FAILURE);
1109     }
1110
1111     if (!S_ISDIR(stbuf.st_mode)) {
1112         fprintf(stderr, "specified path \"%s\" is not directory\n", rpath);
1113         exit(EXIT_FAILURE);
1114     }
1115
1116     if (is_daemon) {
1117         if (daemon(0, 0) < 0) {
1118             fprintf(stderr, "daemon call failed\n");
1119             exit(EXIT_FAILURE);
1120         }
1121         openlog(PROGNAME, LOG_PID, LOG_DAEMON);
1122     }
1123
1124     do_log(LOG_INFO, "Started\n");
1125     if (sock_name) {
1126         sock = proxy_socket(sock_name, own_u, own_g);
1127         if (sock < 0) {
1128             goto error;
1129         }
1130     }
1131
1132     if (chdir("/") < 0) {
1133         do_perror("chdir");
1134         goto error;
1135     }
1136     if (chroot(rpath) < 0) {
1137         do_perror("chroot");
1138         goto error;
1139     }
1140
1141     get_version = false;
1142 #ifdef FS_IOC_GETVERSION
1143     /* check whether underlying FS support IOC_GETVERSION */
1144     retval = statfs("/", &st_fs);
1145     if (!retval) {
1146         switch (st_fs.f_type) {
1147         case EXT2_SUPER_MAGIC:
1148         case BTRFS_SUPER_MAGIC:
1149         case REISERFS_SUPER_MAGIC:
1150         case XFS_SUPER_MAGIC:
1151             get_version = true;
1152             break;
1153         }
1154     }
1155 #endif
1156
1157     umask(0);
1158     if (init_capabilities() < 0) {
1159         goto error;
1160     }
1161
1162     process_requests(sock);
1163 error:
1164     do_log(LOG_INFO, "Done\n");
1165     closelog();
1166     return 0;
1167 }