hw/9pfs/9p.c

   1 /*
   2  * Virtio 9p backend
   3  *
   4  * Copyright IBM, Corp. 2010
   5  *
   6  * Authors:
   7  *  Anthony Liguori   <[email protected]>
   8  *
   9  * This work is licensed under the terms of the GNU GPL, version 2.  See
  10  * the COPYING file in the top-level directory.
  11  *
  12  */
  13
  14 #include "qemu/osdep.h"
  15 #include <glib/gprintf.h>
  16 #include "hw/virtio/virtio.h"
  17 #include "qapi/error.h"
  18 #include "qemu/error-report.h"
  19 #include "qemu/iov.h"
  20 #include "qemu/main-loop.h"
  21 #include "qemu/sockets.h"
  22 #include "virtio-9p.h"
  23 #include "fsdev/qemu-fsdev.h"
  24 #include "9p-xattr.h"
  25 #include "coth.h"
  26 #include "trace.h"
  27 #include "migration/blocker.h"
  28 #include "sysemu/qtest.h"
  29 #include "qemu/xxhash.h"
  30 #include <math.h>
  31 #include <linux/limits.h>
  32
  33 int open_fd_hw;
  34 int total_open_fd;
  35 static int open_fd_rc;
  36
  37 enum {
  38     Oread   = 0x00,
  39     Owrite  = 0x01,
  40     Ordwr   = 0x02,
  41     Oexec   = 0x03,
  42     Oexcl   = 0x04,
  43     Otrunc  = 0x10,
  44     Orexec  = 0x20,
  45     Orclose = 0x40,
  46     Oappend = 0x80,
  47 };
  48
  49 static ssize_t pdu_marshal(V9fsPDU *pdu, size_t offset, const char *fmt, ...)
  50 {
  51     ssize_t ret;
  52     va_list ap;
  53
  54     va_start(ap, fmt);
  55     ret = pdu->s->transport->pdu_vmarshal(pdu, offset, fmt, ap);
  56     va_end(ap);
  57
  58     return ret;
  59 }
  60
  61 static ssize_t pdu_unmarshal(V9fsPDU *pdu, size_t offset, const char *fmt, ...)
  62 {
  63     ssize_t ret;
  64     va_list ap;
  65
  66     va_start(ap, fmt);
  67     ret = pdu->s->transport->pdu_vunmarshal(pdu, offset, fmt, ap);
  68     va_end(ap);
  69
  70     return ret;
  71 }
  72
  73 static int omode_to_uflags(int8_t mode)
  74 {
  75     int ret = 0;
  76
  77     switch (mode & 3) {
  78     case Oread:
  79         ret = O_RDONLY;
  80         break;
  81     case Ordwr:
  82         ret = O_RDWR;
  83         break;
  84     case Owrite:
  85         ret = O_WRONLY;
  86         break;
  87     case Oexec:
  88         ret = O_RDONLY;
  89         break;
  90     }
  91
  92     if (mode & Otrunc) {
  93         ret |= O_TRUNC;
  94     }
  95
  96     if (mode & Oappend) {
  97         ret |= O_APPEND;
  98     }
  99
 100     if (mode & Oexcl) {
 101         ret |= O_EXCL;
 102     }
 103
 104     return ret;
 105 }
 106
 107 typedef struct DotlOpenflagMap {
 108     int dotl_flag;
 109     int open_flag;
 110 } DotlOpenflagMap;
 111
 112 static int dotl_to_open_flags(int flags)
 113 {
 114     int i;
 115     /*
 116      * We have same bits for P9_DOTL_READONLY, P9_DOTL_WRONLY
 117      * and P9_DOTL_NOACCESS
 118      */
 119     int oflags = flags & O_ACCMODE;
 120
 121     DotlOpenflagMap dotl_oflag_map[] = {
 122         { P9_DOTL_CREATE, O_CREAT },
 123         { P9_DOTL_EXCL, O_EXCL },
 124         { P9_DOTL_NOCTTY , O_NOCTTY },
 125         { P9_DOTL_TRUNC, O_TRUNC },
 126         { P9_DOTL_APPEND, O_APPEND },
 127         { P9_DOTL_NONBLOCK, O_NONBLOCK } ,
 128         { P9_DOTL_DSYNC, O_DSYNC },
 129         { P9_DOTL_FASYNC, FASYNC },
 130         { P9_DOTL_DIRECT, O_DIRECT },
 131         { P9_DOTL_LARGEFILE, O_LARGEFILE },
 132         { P9_DOTL_DIRECTORY, O_DIRECTORY },
 133         { P9_DOTL_NOFOLLOW, O_NOFOLLOW },
 134         { P9_DOTL_NOATIME, O_NOATIME },
 135         { P9_DOTL_SYNC, O_SYNC },
 136     };
 137
 138     for (i = 0; i < ARRAY_SIZE(dotl_oflag_map); i++) {
 139         if (flags & dotl_oflag_map[i].dotl_flag) {
 140             oflags |= dotl_oflag_map[i].open_flag;
 141         }
 142     }
 143
 144     return oflags;
 145 }
 146
 147 void cred_init(FsCred *credp)
 148 {
 149     credp->fc_uid = -1;
 150     credp->fc_gid = -1;
 151     credp->fc_mode = -1;
 152     credp->fc_rdev = -1;
 153 }
 154
 155 static int get_dotl_openflags(V9fsState *s, int oflags)
 156 {
 157     int flags;
 158     /*
 159      * Filter the client open flags
 160      */
 161     flags = dotl_to_open_flags(oflags);
 162     flags &= ~(O_NOCTTY | O_ASYNC | O_CREAT);
 163     /*
 164      * Ignore direct disk access hint until the server supports it.
 165      */
 166     flags &= ~O_DIRECT;
 167     return flags;
 168 }
 169
 170 void v9fs_path_init(V9fsPath *path)
 171 {
 172     path->data = NULL;
 173     path->size = 0;
 174 }
 175
 176 void v9fs_path_free(V9fsPath *path)
 177 {
 178     g_free(path->data);
 179     path->data = NULL;
 180     path->size = 0;
 181 }
 182
 183
 184 void GCC_FMT_ATTR(2, 3)
 185 v9fs_path_sprintf(V9fsPath *path, const char *fmt, ...)
 186 {
 187     va_list ap;
 188
 189     v9fs_path_free(path);
 190
 191     va_start(ap, fmt);
 192     /* Bump the size for including terminating NULL */
 193     path->size = g_vasprintf(&path->data, fmt, ap) + 1;
 194     va_end(ap);
 195 }
 196
 197 void v9fs_path_copy(V9fsPath *dst, const V9fsPath *src)
 198 {
 199     v9fs_path_free(dst);
 200     dst->size = src->size;
 201     dst->data = g_memdup(src->data, src->size);
 202 }
 203
 204 int v9fs_name_to_path(V9fsState *s, V9fsPath *dirpath,
 205                       const char *name, V9fsPath *path)
 206 {
 207     int err;
 208     err = s->ops->name_to_path(&s->ctx, dirpath, name, path);
 209     if (err < 0) {
 210         err = -errno;
 211     }
 212     return err;
 213 }
 214
 215 /*
 216  * Return TRUE if s1 is an ancestor of s2.
 217  *
 218  * E.g. "a/b" is an ancestor of "a/b/c" but not of "a/bc/d".
 219  * As a special case, We treat s1 as ancestor of s2 if they are same!
 220  */
 221 static int v9fs_path_is_ancestor(V9fsPath *s1, V9fsPath *s2)
 222 {
 223     if (!strncmp(s1->data, s2->data, s1->size - 1)) {
 224         if (s2->data[s1->size - 1] == '\0' || s2->data[s1->size - 1] == '/') {
 225             return 1;
 226         }
 227     }
 228     return 0;
 229 }
 230
 231 static size_t v9fs_string_size(V9fsString *str)
 232 {
 233     return str->size;
 234 }
 235
 236 /*
 237  * returns 0 if fid got re-opened, 1 if not, < 0 on error */
 238 static int coroutine_fn v9fs_reopen_fid(V9fsPDU *pdu, V9fsFidState *f)
 239 {
 240     int err = 1;
 241     if (f->fid_type == P9_FID_FILE) {
 242         if (f->fs.fd == -1) {
 243             do {
 244                 err = v9fs_co_open(pdu, f, f->open_flags);
 245             } while (err == -EINTR && !pdu->cancelled);
 246         }
 247     } else if (f->fid_type == P9_FID_DIR) {
 248         if (f->fs.dir.stream == NULL) {
 249             do {
 250                 err = v9fs_co_opendir(pdu, f);
 251             } while (err == -EINTR && !pdu->cancelled);
 252         }
 253     }
 254     return err;
 255 }
 256
 257 static V9fsFidState *coroutine_fn get_fid(V9fsPDU *pdu, int32_t fid)
 258 {
 259     int err;
 260     V9fsFidState *f;
 261     V9fsState *s = pdu->s;
 262
 263     for (f = s->fid_list; f; f = f->next) {
 264         BUG_ON(f->clunked);
 265         if (f->fid == fid) {
 266             /*
 267              * Update the fid ref upfront so that
 268              * we don't get reclaimed when we yield
 269              * in open later.
 270              */
 271             f->ref++;
 272             /*
 273              * check whether we need to reopen the
 274              * file. We might have closed the fd
 275              * while trying to free up some file
 276              * descriptors.
 277              */
 278             err = v9fs_reopen_fid(pdu, f);
 279             if (err < 0) {
 280                 f->ref--;
 281                 return NULL;
 282             }
 283             /*
 284              * Mark the fid as referenced so that the LRU
 285              * reclaim won't close the file descriptor
 286              */
 287             f->flags |= FID_REFERENCED;
 288             return f;
 289         }
 290     }
 291     return NULL;
 292 }
 293
 294 static V9fsFidState *alloc_fid(V9fsState *s, int32_t fid)
 295 {
 296     V9fsFidState *f;
 297
 298     for (f = s->fid_list; f; f = f->next) {
 299         /* If fid is already there return NULL */
 300         BUG_ON(f->clunked);
 301         if (f->fid == fid) {
 302             return NULL;
 303         }
 304     }
 305     f = g_malloc0(sizeof(V9fsFidState));
 306     f->fid = fid;
 307     f->fid_type = P9_FID_NONE;
 308     f->ref = 1;
 309     /*
 310      * Mark the fid as referenced so that the LRU
 311      * reclaim won't close the file descriptor
 312      */
 313     f->flags |= FID_REFERENCED;
 314     f->next = s->fid_list;
 315     s->fid_list = f;
 316
 317     v9fs_readdir_init(s->proto_version, &f->fs.dir);
 318     v9fs_readdir_init(s->proto_version, &f->fs_reclaim.dir);
 319
 320     return f;
 321 }
 322
 323 static int coroutine_fn v9fs_xattr_fid_clunk(V9fsPDU *pdu, V9fsFidState *fidp)
 324 {
 325     int retval = 0;
 326
 327     if (fidp->fs.xattr.xattrwalk_fid) {
 328         /* getxattr/listxattr fid */
 329         goto free_value;
 330     }
 331     /*
 332      * if this is fid for setxattr. clunk should
 333      * result in setxattr localcall
 334      */
 335     if (fidp->fs.xattr.len != fidp->fs.xattr.copied_len) {
 336         /* clunk after partial write */
 337         retval = -EINVAL;
 338         goto free_out;
 339     }
 340     if (fidp->fs.xattr.len) {
 341         retval = v9fs_co_lsetxattr(pdu, &fidp->path, &fidp->fs.xattr.name,
 342                                    fidp->fs.xattr.value,
 343                                    fidp->fs.xattr.len,
 344                                    fidp->fs.xattr.flags);
 345     } else {
 346         retval = v9fs_co_lremovexattr(pdu, &fidp->path, &fidp->fs.xattr.name);
 347     }
 348 free_out:
 349     v9fs_string_free(&fidp->fs.xattr.name);
 350 free_value:
 351     g_free(fidp->fs.xattr.value);
 352     return retval;
 353 }
 354
 355 static int coroutine_fn free_fid(V9fsPDU *pdu, V9fsFidState *fidp)
 356 {
 357     int retval = 0;
 358
 359     if (fidp->fid_type == P9_FID_FILE) {
 360         /* If we reclaimed the fd no need to close */
 361         if (fidp->fs.fd != -1) {
 362             retval = v9fs_co_close(pdu, &fidp->fs);
 363         }
 364     } else if (fidp->fid_type == P9_FID_DIR) {
 365         if (fidp->fs.dir.stream != NULL) {
 366             retval = v9fs_co_closedir(pdu, &fidp->fs);
 367         }
 368     } else if (fidp->fid_type == P9_FID_XATTR) {
 369         retval = v9fs_xattr_fid_clunk(pdu, fidp);
 370     }
 371     v9fs_path_free(&fidp->path);
 372     g_free(fidp);
 373     return retval;
 374 }
 375
 376 static int coroutine_fn put_fid(V9fsPDU *pdu, V9fsFidState *fidp)
 377 {
 378     BUG_ON(!fidp->ref);
 379     fidp->ref--;
 380     /*
 381      * Don't free the fid if it is in reclaim list
 382      */
 383     if (!fidp->ref && fidp->clunked) {
 384         if (fidp->fid == pdu->s->root_fid) {
 385             /*
 386              * if the clunked fid is root fid then we
 387              * have unmounted the fs on the client side.
 388              * delete the migration blocker. Ideally, this
 389              * should be hooked to transport close notification
 390              */
 391             if (pdu->s->migration_blocker) {
 392                 migrate_del_blocker(pdu->s->migration_blocker);
 393                 error_free(pdu->s->migration_blocker);
 394                 pdu->s->migration_blocker = NULL;
 395             }
 396         }
 397         return free_fid(pdu, fidp);
 398     }
 399     return 0;
 400 }
 401
 402 static V9fsFidState *clunk_fid(V9fsState *s, int32_t fid)
 403 {
 404     V9fsFidState **fidpp, *fidp;
 405
 406     for (fidpp = &s->fid_list; *fidpp; fidpp = &(*fidpp)->next) {
 407         if ((*fidpp)->fid == fid) {
 408             break;
 409         }
 410     }
 411     if (*fidpp == NULL) {
 412         return NULL;
 413     }
 414     fidp = *fidpp;
 415     *fidpp = fidp->next;
 416     fidp->clunked = 1;
 417     return fidp;
 418 }
 419
 420 void coroutine_fn v9fs_reclaim_fd(V9fsPDU *pdu)
 421 {
 422     int reclaim_count = 0;
 423     V9fsState *s = pdu->s;
 424     V9fsFidState *f, *reclaim_list = NULL;
 425
 426     for (f = s->fid_list; f; f = f->next) {
 427         /*
 428          * Unlink fids cannot be reclaimed. Check
 429          * for them and skip them. Also skip fids
 430          * currently being operated on.
 431          */
 432         if (f->ref || f->flags & FID_NON_RECLAIMABLE) {
 433             continue;
 434         }
 435         /*
 436          * if it is a recently referenced fid
 437          * we leave the fid untouched and clear the
 438          * reference bit. We come back to it later
 439          * in the next iteration. (a simple LRU without
 440          * moving list elements around)
 441          */
 442         if (f->flags & FID_REFERENCED) {
 443             f->flags &= ~FID_REFERENCED;
 444             continue;
 445         }
 446         /*
 447          * Add fids to reclaim list.
 448          */
 449         if (f->fid_type == P9_FID_FILE) {
 450             if (f->fs.fd != -1) {
 451                 /*
 452                  * Up the reference count so that
 453                  * a clunk request won't free this fid
 454                  */
 455                 f->ref++;
 456                 f->rclm_lst = reclaim_list;
 457                 reclaim_list = f;
 458                 f->fs_reclaim.fd = f->fs.fd;
 459                 f->fs.fd = -1;
 460                 reclaim_count++;
 461             }
 462         } else if (f->fid_type == P9_FID_DIR) {
 463             if (f->fs.dir.stream != NULL) {
 464                 /*
 465                  * Up the reference count so that
 466                  * a clunk request won't free this fid
 467                  */
 468                 f->ref++;
 469                 f->rclm_lst = reclaim_list;
 470                 reclaim_list = f;
 471                 f->fs_reclaim.dir.stream = f->fs.dir.stream;
 472                 f->fs.dir.stream = NULL;
 473                 reclaim_count++;
 474             }
 475         }
 476         if (reclaim_count >= open_fd_rc) {
 477             break;
 478         }
 479     }
 480     /*
 481      * Now close the fid in reclaim list. Free them if they
 482      * are already clunked.
 483      */
 484     while (reclaim_list) {
 485         f = reclaim_list;
 486         reclaim_list = f->rclm_lst;
 487         if (f->fid_type == P9_FID_FILE) {
 488             v9fs_co_close(pdu, &f->fs_reclaim);
 489         } else if (f->fid_type == P9_FID_DIR) {
 490             v9fs_co_closedir(pdu, &f->fs_reclaim);
 491         }
 492         f->rclm_lst = NULL;
 493         /*
 494          * Now drop the fid reference, free it
 495          * if clunked.
 496          */
 497         put_fid(pdu, f);
 498     }
 499 }
 500
 501 static int coroutine_fn v9fs_mark_fids_unreclaim(V9fsPDU *pdu, V9fsPath *path)
 502 {
 503     int err;
 504     V9fsState *s = pdu->s;
 505     V9fsFidState *fidp, head_fid;
 506
 507     head_fid.next = s->fid_list;
 508     for (fidp = s->fid_list; fidp; fidp = fidp->next) {
 509         if (fidp->path.size != path->size) {
 510             continue;
 511         }
 512         if (!memcmp(fidp->path.data, path->data, path->size)) {
 513             /* Mark the fid non reclaimable. */
 514             fidp->flags |= FID_NON_RECLAIMABLE;
 515
 516             /* reopen the file/dir if already closed */
 517             err = v9fs_reopen_fid(pdu, fidp);
 518             if (err < 0) {
 519                 return err;
 520             }
 521             /*
 522              * Go back to head of fid list because
 523              * the list could have got updated when
 524              * switched to the worker thread
 525              */
 526             if (err == 0) {
 527                 fidp = &head_fid;
 528             }
 529         }
 530     }
 531     return 0;
 532 }
 533
 534 static void coroutine_fn virtfs_reset(V9fsPDU *pdu)
 535 {
 536     V9fsState *s = pdu->s;
 537     V9fsFidState *fidp;
 538
 539     /* Free all fids */
 540     while (s->fid_list) {
 541         /* Get fid */
 542         fidp = s->fid_list;
 543         fidp->ref++;
 544
 545         /* Clunk fid */
 546         s->fid_list = fidp->next;
 547         fidp->clunked = 1;
 548
 549         put_fid(pdu, fidp);
 550     }
 551 }
 552
 553 #define P9_QID_TYPE_DIR         0x80
 554 #define P9_QID_TYPE_SYMLINK     0x02
 555
 556 #define P9_STAT_MODE_DIR        0x80000000
 557 #define P9_STAT_MODE_APPEND     0x40000000
 558 #define P9_STAT_MODE_EXCL       0x20000000
 559 #define P9_STAT_MODE_MOUNT      0x10000000
 560 #define P9_STAT_MODE_AUTH       0x08000000
 561 #define P9_STAT_MODE_TMP        0x04000000
 562 #define P9_STAT_MODE_SYMLINK    0x02000000
 563 #define P9_STAT_MODE_LINK       0x01000000
 564 #define P9_STAT_MODE_DEVICE     0x00800000
 565 #define P9_STAT_MODE_NAMED_PIPE 0x00200000
 566 #define P9_STAT_MODE_SOCKET     0x00100000
 567 #define P9_STAT_MODE_SETUID     0x00080000
 568 #define P9_STAT_MODE_SETGID     0x00040000
 569 #define P9_STAT_MODE_SETVTX     0x00010000
 570
 571 #define P9_STAT_MODE_TYPE_BITS (P9_STAT_MODE_DIR |          \
 572                                 P9_STAT_MODE_SYMLINK |      \
 573                                 P9_STAT_MODE_LINK |         \
 574                                 P9_STAT_MODE_DEVICE |       \
 575                                 P9_STAT_MODE_NAMED_PIPE |   \
 576                                 P9_STAT_MODE_SOCKET)
 577
 578 /* Mirrors all bits of a byte. So e.g. binary 10100000 would become 00000101. */
 579 static inline uint8_t mirror8bit(uint8_t byte)
 580 {
 581     return (byte * 0x0202020202ULL & 0x010884422010ULL) % 1023;
 582 }
 583
 584 /* Same as mirror8bit() just for a 64 bit data type instead for a byte. */
 585 static inline uint64_t mirror64bit(uint64_t value)
 586 {
 587     return ((uint64_t)mirror8bit(value         & 0xff) << 56) |
 588            ((uint64_t)mirror8bit((value >> 8)  & 0xff) << 48) |
 589            ((uint64_t)mirror8bit((value >> 16) & 0xff) << 40) |
 590            ((uint64_t)mirror8bit((value >> 24) & 0xff) << 32) |
 591            ((uint64_t)mirror8bit((value >> 32) & 0xff) << 24) |
 592            ((uint64_t)mirror8bit((value >> 40) & 0xff) << 16) |
 593            ((uint64_t)mirror8bit((value >> 48) & 0xff) << 8)  |
 594            ((uint64_t)mirror8bit((value >> 56) & 0xff));
 595 }
 596
 597 /**
 598  * @brief Parameter k for the Exponential Golomb algorihm to be used.
 599  *
 600  * The smaller this value, the smaller the minimum bit count for the Exp.
 601  * Golomb generated affixes will be (at lowest index) however for the
 602  * price of having higher maximum bit count of generated affixes (at highest
 603  * index). Likewise increasing this parameter yields in smaller maximum bit
 604  * count for the price of having higher minimum bit count.
 605  *
 606  * In practice that means: a good value for k depends on the expected amount
 607  * of devices to be exposed by one export. For a small amount of devices k
 608  * should be small, for a large amount of devices k might be increased
 609  * instead. The default of k=0 should be fine for most users though.
 610  *
 611  * @b IMPORTANT: In case this ever becomes a runtime parameter; the value of
 612  * k should not change as long as guest is still running! Because that would
 613  * cause completely different inode numbers to be generated on guest.
 614  */
 615 #define EXP_GOLOMB_K    0
 616
 617 /**
 618  * @brief Exponential Golomb algorithm for arbitrary k (including k=0).
 619  *
 620  * The Exponential Golomb algorithm generates @b prefixes (@b not suffixes!)
 621  * with growing length and with the mathematical property of being
 622  * "prefix-free". The latter means the generated prefixes can be prepended
 623  * in front of arbitrary numbers and the resulting concatenated numbers are
 624  * guaranteed to be always unique.
 625  *
 626  * This is a minor adjustment to the original Exp. Golomb algorithm in the
 627  * sense that lowest allowed index (@param n) starts with 1, not with zero.
 628  *
 629  * @param n - natural number (or index) of the prefix to be generated
 630  *            (1, 2, 3, ...)
 631  * @param k - parameter k of Exp. Golomb algorithm to be used
 632  *            (see comment on EXP_GOLOMB_K macro for details about k)
 633  */
 634 static VariLenAffix expGolombEncode(uint64_t n, int k)
 635 {
 636     const uint64_t value = n + (1 << k) - 1;
 637     const int bits = (int) log2(value) + 1;
 638     return (VariLenAffix) {
 639         .type = AffixType_Prefix,
 640         .value = value,
 641         .bits = bits + MAX((bits - 1 - k), 0)
 642     };
 643 }
 644
 645 /**
 646  * @brief Converts a suffix into a prefix, or a prefix into a suffix.
 647  *
 648  * Simply mirror all bits of the affix value, for the purpose to preserve
 649  * respectively the mathematical "prefix-free" or "suffix-free" property
 650  * after the conversion.
 651  *
 652  * If a passed prefix is suitable to create unique numbers, then the
 653  * returned suffix is suitable to create unique numbers as well (and vice
 654  * versa).
 655  */
 656 static VariLenAffix invertAffix(const VariLenAffix *affix)
 657 {
 658     return (VariLenAffix) {
 659         .type =
 660             (affix->type == AffixType_Suffix) ?
 661                 AffixType_Prefix : AffixType_Suffix,
 662         .value =
 663             mirror64bit(affix->value) >>
 664             ((sizeof(affix->value) * 8) - affix->bits),
 665         .bits = affix->bits
 666     };
 667 }
 668
 669 /**
 670  * @brief Generates suffix numbers with "suffix-free" property.
 671  *
 672  * This is just a wrapper function on top of the Exp. Golomb algorithm.
 673  *
 674  * Since the Exp. Golomb algorithm generates prefixes, but we need suffixes,
 675  * this function converts the Exp. Golomb prefixes into appropriate suffixes
 676  * which are still suitable for generating unique numbers.
 677  *
 678  * @param n - natural number (or index) of the suffix to be generated
 679  *            (1, 2, 3, ...)
 680  */
 681 static VariLenAffix affixForIndex(uint64_t index)
 682 {
 683     VariLenAffix prefix;
 684     prefix = expGolombEncode(index, EXP_GOLOMB_K);
 685     return invertAffix(&prefix); /* convert prefix to suffix */
 686 }
 687
 688 /* creative abuse of tb_hash_func7, which is based on xxhash */
 689 static uint32_t qpp_hash(QppEntry e)
 690 {
 691     return qemu_xxhash7(e.ino_prefix, e.dev, 0, 0, 0);
 692 }
 693
 694 static uint32_t qpf_hash(QpfEntry e)
 695 {
 696     return qemu_xxhash7(e.ino, e.dev, 0, 0, 0);
 697 }
 698
 699 static bool qpd_cmp_func(const void *obj, const void *userp)
 700 {
 701     const QpdEntry *e1 = obj, *e2 = userp;
 702     return e1->dev == e2->dev;
 703 }
 704
 705 static bool qpp_cmp_func(const void *obj, const void *userp)
 706 {
 707     const QppEntry *e1 = obj, *e2 = userp;
 708     return e1->dev == e2->dev && e1->ino_prefix == e2->ino_prefix;
 709 }
 710
 711 static bool qpf_cmp_func(const void *obj, const void *userp)
 712 {
 713     const QpfEntry *e1 = obj, *e2 = userp;
 714     return e1->dev == e2->dev && e1->ino == e2->ino;
 715 }
 716
 717 static void qp_table_remove(void *p, uint32_t h, void *up)
 718 {
 719     g_free(p);
 720 }
 721
 722 static void qp_table_destroy(struct qht *ht)
 723 {
 724     if (!ht || !ht->map) {
 725         return;
 726     }
 727     qht_iter(ht, qp_table_remove, NULL);
 728     qht_destroy(ht);
 729 }
 730
 731 static void qpd_table_init(struct qht *ht)
 732 {
 733     qht_init(ht, qpd_cmp_func, 1, QHT_MODE_AUTO_RESIZE);
 734 }
 735
 736 static void qpp_table_init(struct qht *ht)
 737 {
 738     qht_init(ht, qpp_cmp_func, 1, QHT_MODE_AUTO_RESIZE);
 739 }
 740
 741 static void qpf_table_init(struct qht *ht)
 742 {
 743     qht_init(ht, qpf_cmp_func, 1 << 16, QHT_MODE_AUTO_RESIZE);
 744 }
 745
 746 /*
 747  * Returns how many (high end) bits of inode numbers of the passed fs
 748  * device shall be used (in combination with the device number) to
 749  * generate hash values for qpp_table entries.
 750  *
 751  * This function is required if variable length suffixes are used for inode
 752  * number mapping on guest level. Since a device may end up having multiple
 753  * entries in qpp_table, each entry most probably with a different suffix
 754  * length, we thus need this function in conjunction with qpd_table to
 755  * "agree" about a fix amount of bits (per device) to be always used for
 756  * generating hash values for the purpose of accessing qpp_table in order
 757  * get consistent behaviour when accessing qpp_table.
 758  */
 759 static int qid_inode_prefix_hash_bits(V9fsPDU *pdu, dev_t dev)
 760 {
 761     QpdEntry lookup = {
 762         .dev = dev
 763     }, *val;
 764     uint32_t hash = dev;
 765     VariLenAffix affix;
 766
 767     val = qht_lookup(&pdu->s->qpd_table, &lookup, hash);
 768     if (!val) {
 769         val = g_malloc0(sizeof(QpdEntry));
 770         *val = lookup;
 771         affix = affixForIndex(pdu->s->qp_affix_next);
 772         val->prefix_bits = affix.bits;
 773         qht_insert(&pdu->s->qpd_table, val, hash, NULL);
 774         pdu->s->qp_ndevices++;
 775     }
 776     return val->prefix_bits;
 777 }
 778
 779 /**
 780  * @brief Slow / full mapping host inode nr -> guest inode nr.
 781  *
 782  * This function performs a slower and much more costly remapping of an
 783  * original file inode number on host to an appropriate different inode
 784  * number on guest. For every (dev, inode) combination on host a new
 785  * sequential number is generated, cached and exposed as inode number on
 786  * guest.
 787  *
 788  * This is just a "last resort" fallback solution if the much faster/cheaper
 789  * qid_path_suffixmap() failed. In practice this slow / full mapping is not
 790  * expected ever to be used at all though.
 791  *
 792  * @see qid_path_suffixmap() for details
 793  *
 794  */
 795 static int qid_path_fullmap(V9fsPDU *pdu, const struct stat *stbuf,
 796                             uint64_t *path)
 797 {
 798     QpfEntry lookup = {
 799         .dev = stbuf->st_dev,
 800         .ino = stbuf->st_ino
 801     }, *val;
 802     uint32_t hash = qpf_hash(lookup);
 803     VariLenAffix affix;
 804
 805     val = qht_lookup(&pdu->s->qpf_table, &lookup, hash);
 806
 807     if (!val) {
 808         if (pdu->s->qp_fullpath_next == 0) {
 809             /* no more files can be mapped :'( */
 810             error_report_once(
 811                 "9p: No more prefixes available for remapping inodes from "
 812                 "host to guest."
 813             );
 814             return -ENFILE;
 815         }
 816
 817         val = g_malloc0(sizeof(QppEntry));
 818         *val = lookup;
 819
 820         /* new unique inode and device combo */
 821         affix = affixForIndex(
 822             1ULL << (sizeof(pdu->s->qp_affix_next) * 8)
 823         );
 824         val->path = (pdu->s->qp_fullpath_next++ << affix.bits) | affix.value;
 825         pdu->s->qp_fullpath_next &= ((1ULL << (64 - affix.bits)) - 1);
 826         qht_insert(&pdu->s->qpf_table, val, hash, NULL);
 827     }
 828
 829     *path = val->path;
 830     return 0;
 831 }
 832
 833 /**
 834  * @brief Quick mapping host inode nr -> guest inode nr.
 835  *
 836  * This function performs quick remapping of an original file inode number
 837  * on host to an appropriate different inode number on guest. This remapping
 838  * of inodes is required to avoid inode nr collisions on guest which would
 839  * happen if the 9p export contains more than 1 exported file system (or
 840  * more than 1 file system data set), because unlike on host level where the
 841  * files would have different device nrs, all files exported by 9p would
 842  * share the same device nr on guest (the device nr of the virtual 9p device
 843  * that is).
 844  *
 845  * Inode remapping is performed by chopping off high end bits of the original
 846  * inode number from host, shifting the result upwards and then assigning a
 847  * generated suffix number for the low end bits, where the same suffix number
 848  * will be shared by all inodes with the same device id AND the same high end
 849  * bits that have been chopped off. That approach utilizes the fact that inode
 850  * numbers very likely share the same high end bits (i.e. due to their common
 851  * sequential generation by file systems) and hence we only have to generate
 852  * and track a very limited amount of suffixes in practice due to that.
 853  *
 854  * We generate variable size suffixes for that purpose. The 1st generated
 855  * suffix will only have 1 bit and hence we only need to chop off 1 bit from
 856  * the original inode number. The subsequent suffixes being generated will
 857  * grow in (bit) size subsequently, i.e. the 2nd and 3rd suffix being
 858  * generated will have 3 bits and hence we have to chop off 3 bits from their
 859  * original inodes, and so on. That approach of using variable length suffixes
 860  * (i.e. over fixed size ones) utilizes the fact that in practice only a very
 861  * limited amount of devices are shared by the same export (e.g. typically
 862  * less than 2 dozen devices per 9p export), so in practice we need to chop
 863  * off less bits than with fixed size prefixes and yet are flexible to add
 864  * new devices at runtime below host's export directory at any time without
 865  * having to reboot guest nor requiring to reconfigure guest for that. And due
 866  * to the very limited amount of original high end bits that we chop off that
 867  * way, the total amount of suffixes we need to generate is less than by using
 868  * fixed size prefixes and hence it also improves performance of the inode
 869  * remapping algorithm, and finally has the nice side effect that the inode
 870  * numbers on guest will be much smaller & human friendly. ;-)
 871  */
 872 static int qid_path_suffixmap(V9fsPDU *pdu, const struct stat *stbuf,
 873                               uint64_t *path)
 874 {
 875     const int ino_hash_bits = qid_inode_prefix_hash_bits(pdu, stbuf->st_dev);
 876     QppEntry lookup = {
 877         .dev = stbuf->st_dev,
 878         .ino_prefix = (uint16_t) (stbuf->st_ino >> (64 - ino_hash_bits))
 879     }, *val;
 880     uint32_t hash = qpp_hash(lookup);
 881
 882     val = qht_lookup(&pdu->s->qpp_table, &lookup, hash);
 883
 884     if (!val) {
 885         if (pdu->s->qp_affix_next == 0) {
 886             /* we ran out of affixes */
 887             warn_report_once(
 888                 "9p: Potential degraded performance of inode remapping"
 889             );
 890             return -ENFILE;
 891         }
 892
 893         val = g_malloc0(sizeof(QppEntry));
 894         *val = lookup;
 895
 896         /* new unique inode affix and device combo */
 897         val->qp_affix_index = pdu->s->qp_affix_next++;
 898         val->qp_affix = affixForIndex(val->qp_affix_index);
 899         qht_insert(&pdu->s->qpp_table, val, hash, NULL);
 900     }
 901     /* assuming generated affix to be suffix type, not prefix */
 902     *path = (stbuf->st_ino << val->qp_affix.bits) | val->qp_affix.value;
 903     return 0;
 904 }
 905
 906 static int stat_to_qid(V9fsPDU *pdu, const struct stat *stbuf, V9fsQID *qidp)
 907 {
 908     int err;
 909     size_t size;
 910
 911     if (pdu->s->ctx.export_flags & V9FS_REMAP_INODES) {
 912         /* map inode+device to qid path (fast path) */
 913         err = qid_path_suffixmap(pdu, stbuf, &qidp->path);
 914         if (err == -ENFILE) {
 915             /* fast path didn't work, fall back to full map */
 916             err = qid_path_fullmap(pdu, stbuf, &qidp->path);
 917         }
 918         if (err) {
 919             return err;
 920         }
 921     } else {
 922         if (pdu->s->dev_id != stbuf->st_dev) {
 923             if (pdu->s->ctx.export_flags & V9FS_FORBID_MULTIDEVS) {
 924                 error_report_once(
 925                     "9p: Multiple devices detected in same VirtFS export. "
 926                     "Access of guest to additional devices is (partly) "
 927                     "denied due to virtfs option 'multidevs=forbid' being "
 928                     "effective."
 929                 );
 930                 return -ENODEV;
 931             } else {
 932                 warn_report_once(
 933                     "9p: Multiple devices detected in same VirtFS export, "
 934                     "which might lead to file ID collisions and severe "
 935                     "misbehaviours on guest! You should either use a "
 936                     "separate export for each device shared from host or "
 937                     "use virtfs option 'multidevs=remap'!"
 938                 );
 939             }
 940         }
 941         memset(&qidp->path, 0, sizeof(qidp->path));
 942         size = MIN(sizeof(stbuf->st_ino), sizeof(qidp->path));
 943         memcpy(&qidp->path, &stbuf->st_ino, size);
 944     }
 945
 946     qidp->version = stbuf->st_mtime ^ (stbuf->st_size << 8);
 947     qidp->type = 0;
 948     if (S_ISDIR(stbuf->st_mode)) {
 949         qidp->type |= P9_QID_TYPE_DIR;
 950     }
 951     if (S_ISLNK(stbuf->st_mode)) {
 952         qidp->type |= P9_QID_TYPE_SYMLINK;
 953     }
 954
 955     return 0;
 956 }
 957
 958 static int coroutine_fn fid_to_qid(V9fsPDU *pdu, V9fsFidState *fidp,
 959                                    V9fsQID *qidp)
 960 {
 961     struct stat stbuf;
 962     int err;
 963
 964     err = v9fs_co_lstat(pdu, &fidp->path, &stbuf);
 965     if (err < 0) {
 966         return err;
 967     }
 968     err = stat_to_qid(pdu, &stbuf, qidp);
 969     if (err < 0) {
 970         return err;
 971     }
 972     return 0;
 973 }
 974
 975 V9fsPDU *pdu_alloc(V9fsState *s)
 976 {
 977     V9fsPDU *pdu = NULL;
 978
 979     if (!QLIST_EMPTY(&s->free_list)) {
 980         pdu = QLIST_FIRST(&s->free_list);
 981         QLIST_REMOVE(pdu, next);
 982         QLIST_INSERT_HEAD(&s->active_list, pdu, next);
 983     }
 984     return pdu;
 985 }
 986
 987 void pdu_free(V9fsPDU *pdu)
 988 {
 989     V9fsState *s = pdu->s;
 990
 991     g_assert(!pdu->cancelled);
 992     QLIST_REMOVE(pdu, next);
 993     QLIST_INSERT_HEAD(&s->free_list, pdu, next);
 994 }
 995
 996 static void coroutine_fn pdu_complete(V9fsPDU *pdu, ssize_t len)
 997 {
 998     int8_t id = pdu->id + 1; /* Response */
 999     V9fsState *s = pdu->s;
1000     int ret;
1001
1002     /*
1003      * The 9p spec requires that successfully cancelled pdus receive no reply.
1004      * Sending a reply would confuse clients because they would
1005      * assume that any EINTR is the actual result of the operation,
1006      * rather than a consequence of the cancellation. However, if
1007      * the operation completed (succesfully or with an error other
1008      * than caused be cancellation), we do send out that reply, both
1009      * for efficiency and to avoid confusing the rest of the state machine
1010      * that assumes passing a non-error here will mean a successful
1011      * transmission of the reply.
1012      */
1013     bool discard = pdu->cancelled && len == -EINTR;
1014     if (discard) {
1015         trace_v9fs_rcancel(pdu->tag, pdu->id);
1016         pdu->size = 0;
1017         goto out_notify;
1018     }
1019
1020     if (len < 0) {
1021         int err = -len;
1022         len = 7;
1023
1024         if (s->proto_version != V9FS_PROTO_2000L) {
1025             V9fsString str;
1026
1027             str.data = strerror(err);
1028             str.size = strlen(str.data);
1029
1030             ret = pdu_marshal(pdu, len, "s", &str);
1031             if (ret < 0) {
1032                 goto out_notify;
1033             }
1034             len += ret;
1035             id = P9_RERROR;
1036         }
1037
1038         ret = pdu_marshal(pdu, len, "d", err);
1039         if (ret < 0) {
1040             goto out_notify;
1041         }
1042         len += ret;
1043
1044         if (s->proto_version == V9FS_PROTO_2000L) {
1045             id = P9_RLERROR;
1046         }
1047         trace_v9fs_rerror(pdu->tag, pdu->id, err); /* Trace ERROR */
1048     }
1049
1050     /* fill out the header */
1051     if (pdu_marshal(pdu, 0, "dbw", (int32_t)len, id, pdu->tag) < 0) {
1052         goto out_notify;
1053     }
1054
1055     /* keep these in sync */
1056     pdu->size = len;
1057     pdu->id = id;
1058
1059 out_notify:
1060     pdu->s->transport->push_and_notify(pdu);
1061
1062     /* Now wakeup anybody waiting in flush for this request */
1063     if (!qemu_co_queue_next(&pdu->complete)) {
1064         pdu_free(pdu);
1065     }
1066 }
1067
1068 static mode_t v9mode_to_mode(uint32_t mode, V9fsString *extension)
1069 {
1070     mode_t ret;
1071
1072     ret = mode & 0777;
1073     if (mode & P9_STAT_MODE_DIR) {
1074         ret |= S_IFDIR;
1075     }
1076
1077     if (mode & P9_STAT_MODE_SYMLINK) {
1078         ret |= S_IFLNK;
1079     }
1080     if (mode & P9_STAT_MODE_SOCKET) {
1081         ret |= S_IFSOCK;
1082     }
1083     if (mode & P9_STAT_MODE_NAMED_PIPE) {
1084         ret |= S_IFIFO;
1085     }
1086     if (mode & P9_STAT_MODE_DEVICE) {
1087         if (extension->size && extension->data[0] == 'c') {
1088             ret |= S_IFCHR;
1089         } else {
1090             ret |= S_IFBLK;
1091         }
1092     }
1093
1094     if (!(ret&~0777)) {
1095         ret |= S_IFREG;
1096     }
1097
1098     if (mode & P9_STAT_MODE_SETUID) {
1099         ret |= S_ISUID;
1100     }
1101     if (mode & P9_STAT_MODE_SETGID) {
1102         ret |= S_ISGID;
1103     }
1104     if (mode & P9_STAT_MODE_SETVTX) {
1105         ret |= S_ISVTX;
1106     }
1107
1108     return ret;
1109 }
1110
1111 static int donttouch_stat(V9fsStat *stat)
1112 {
1113     if (stat->type == -1 &&
1114         stat->dev == -1 &&
1115         stat->qid.type == 0xff &&
1116         stat->qid.version == (uint32_t) -1 &&
1117         stat->qid.path == (uint64_t) -1 &&
1118         stat->mode == -1 &&
1119         stat->atime == -1 &&
1120         stat->mtime == -1 &&
1121         stat->length == -1 &&
1122         !stat->name.size &&
1123         !stat->uid.size &&
1124         !stat->gid.size &&
1125         !stat->muid.size &&
1126         stat->n_uid == -1 &&
1127         stat->n_gid == -1 &&
1128         stat->n_muid == -1) {
1129         return 1;
1130     }
1131
1132     return 0;
1133 }
1134
1135 static void v9fs_stat_init(V9fsStat *stat)
1136 {
1137     v9fs_string_init(&stat->name);
1138     v9fs_string_init(&stat->uid);
1139     v9fs_string_init(&stat->gid);
1140     v9fs_string_init(&stat->muid);
1141     v9fs_string_init(&stat->extension);
1142 }
1143
1144 static void v9fs_stat_free(V9fsStat *stat)
1145 {
1146     v9fs_string_free(&stat->name);
1147     v9fs_string_free(&stat->uid);
1148     v9fs_string_free(&stat->gid);
1149     v9fs_string_free(&stat->muid);
1150     v9fs_string_free(&stat->extension);
1151 }
1152
1153 static uint32_t stat_to_v9mode(const struct stat *stbuf)
1154 {
1155     uint32_t mode;
1156
1157     mode = stbuf->st_mode & 0777;
1158     if (S_ISDIR(stbuf->st_mode)) {
1159         mode |= P9_STAT_MODE_DIR;
1160     }
1161
1162     if (S_ISLNK(stbuf->st_mode)) {
1163         mode |= P9_STAT_MODE_SYMLINK;
1164     }
1165
1166     if (S_ISSOCK(stbuf->st_mode)) {
1167         mode |= P9_STAT_MODE_SOCKET;
1168     }
1169
1170     if (S_ISFIFO(stbuf->st_mode)) {
1171         mode |= P9_STAT_MODE_NAMED_PIPE;
1172     }
1173
1174     if (S_ISBLK(stbuf->st_mode) || S_ISCHR(stbuf->st_mode)) {
1175         mode |= P9_STAT_MODE_DEVICE;
1176     }
1177
1178     if (stbuf->st_mode & S_ISUID) {
1179         mode |= P9_STAT_MODE_SETUID;
1180     }
1181
1182     if (stbuf->st_mode & S_ISGID) {
1183         mode |= P9_STAT_MODE_SETGID;
1184     }
1185
1186     if (stbuf->st_mode & S_ISVTX) {
1187         mode |= P9_STAT_MODE_SETVTX;
1188     }
1189
1190     return mode;
1191 }
1192
1193 static int coroutine_fn stat_to_v9stat(V9fsPDU *pdu, V9fsPath *path,
1194                                        const char *basename,
1195                                        const struct stat *stbuf,
1196                                        V9fsStat *v9stat)
1197 {
1198     int err;
1199
1200     memset(v9stat, 0, sizeof(*v9stat));
1201
1202     err = stat_to_qid(pdu, stbuf, &v9stat->qid);
1203     if (err < 0) {
1204         return err;
1205     }
1206     v9stat->mode = stat_to_v9mode(stbuf);
1207     v9stat->atime = stbuf->st_atime;
1208     v9stat->mtime = stbuf->st_mtime;
1209     v9stat->length = stbuf->st_size;
1210
1211     v9fs_string_free(&v9stat->uid);
1212     v9fs_string_free(&v9stat->gid);
1213     v9fs_string_free(&v9stat->muid);
1214
1215     v9stat->n_uid = stbuf->st_uid;
1216     v9stat->n_gid = stbuf->st_gid;
1217     v9stat->n_muid = 0;
1218
1219     v9fs_string_free(&v9stat->extension);
1220
1221     if (v9stat->mode & P9_STAT_MODE_SYMLINK) {
1222         err = v9fs_co_readlink(pdu, path, &v9stat->extension);
1223         if (err < 0) {
1224             return err;
1225         }
1226     } else if (v9stat->mode & P9_STAT_MODE_DEVICE) {
1227         v9fs_string_sprintf(&v9stat->extension, "%c %u %u",
1228                 S_ISCHR(stbuf->st_mode) ? 'c' : 'b',
1229                 major(stbuf->st_rdev), minor(stbuf->st_rdev));
1230     } else if (S_ISDIR(stbuf->st_mode) || S_ISREG(stbuf->st_mode)) {
1231         v9fs_string_sprintf(&v9stat->extension, "%s %lu",
1232                 "HARDLINKCOUNT", (unsigned long)stbuf->st_nlink);
1233     }
1234
1235     v9fs_string_sprintf(&v9stat->name, "%s", basename);
1236
1237     v9stat->size = 61 +
1238         v9fs_string_size(&v9stat->name) +
1239         v9fs_string_size(&v9stat->uid) +
1240         v9fs_string_size(&v9stat->gid) +
1241         v9fs_string_size(&v9stat->muid) +
1242         v9fs_string_size(&v9stat->extension);
1243     return 0;
1244 }
1245
1246 #define P9_STATS_MODE          0x00000001ULL
1247 #define P9_STATS_NLINK         0x00000002ULL
1248 #define P9_STATS_UID           0x00000004ULL
1249 #define P9_STATS_GID           0x00000008ULL
1250 #define P9_STATS_RDEV          0x00000010ULL
1251 #define P9_STATS_ATIME         0x00000020ULL
1252 #define P9_STATS_MTIME         0x00000040ULL
1253 #define P9_STATS_CTIME         0x00000080ULL
1254 #define P9_STATS_INO           0x00000100ULL
1255 #define P9_STATS_SIZE          0x00000200ULL
1256 #define P9_STATS_BLOCKS        0x00000400ULL
1257
1258 #define P9_STATS_BTIME         0x00000800ULL
1259 #define P9_STATS_GEN           0x00001000ULL
1260 #define P9_STATS_DATA_VERSION  0x00002000ULL
1261
1262 #define P9_STATS_BASIC         0x000007ffULL /* Mask for fields up to BLOCKS */
1263 #define P9_STATS_ALL           0x00003fffULL /* Mask for All fields above */
1264
1265
1266 static int stat_to_v9stat_dotl(V9fsPDU *pdu, const struct stat *stbuf,
1267                                 V9fsStatDotl *v9lstat)
1268 {
1269     memset(v9lstat, 0, sizeof(*v9lstat));
1270
1271     v9lstat->st_mode = stbuf->st_mode;
1272     v9lstat->st_nlink = stbuf->st_nlink;
1273     v9lstat->st_uid = stbuf->st_uid;
1274     v9lstat->st_gid = stbuf->st_gid;
1275     v9lstat->st_rdev = stbuf->st_rdev;
1276     v9lstat->st_size = stbuf->st_size;
1277     v9lstat->st_blksize = stbuf->st_blksize;
1278     v9lstat->st_blocks = stbuf->st_blocks;
1279     v9lstat->st_atime_sec = stbuf->st_atime;
1280     v9lstat->st_atime_nsec = stbuf->st_atim.tv_nsec;
1281     v9lstat->st_mtime_sec = stbuf->st_mtime;
1282     v9lstat->st_mtime_nsec = stbuf->st_mtim.tv_nsec;
1283     v9lstat->st_ctime_sec = stbuf->st_ctime;
1284     v9lstat->st_ctime_nsec = stbuf->st_ctim.tv_nsec;
1285     /* Currently we only support BASIC fields in stat */
1286     v9lstat->st_result_mask = P9_STATS_BASIC;
1287
1288     return stat_to_qid(pdu, stbuf, &v9lstat->qid);
1289 }
1290
1291 static void print_sg(struct iovec *sg, int cnt)
1292 {
1293     int i;
1294
1295     printf("sg[%d]: {", cnt);
1296     for (i = 0; i < cnt; i++) {
1297         if (i) {
1298             printf(", ");
1299         }
1300         printf("(%p, %zd)", sg[i].iov_base, sg[i].iov_len);
1301     }
1302     printf("}\n");
1303 }
1304
1305 /* Will call this only for path name based fid */
1306 static void v9fs_fix_path(V9fsPath *dst, V9fsPath *src, int len)
1307 {
1308     V9fsPath str;
1309     v9fs_path_init(&str);
1310     v9fs_path_copy(&str, dst);
1311     v9fs_path_sprintf(dst, "%s%s", src->data, str.data + len);
1312     v9fs_path_free(&str);
1313 }
1314
1315 static inline bool is_ro_export(FsContext *ctx)
1316 {
1317     return ctx->export_flags & V9FS_RDONLY;
1318 }
1319
1320 static void coroutine_fn v9fs_version(void *opaque)
1321 {
1322     ssize_t err;
1323     V9fsPDU *pdu = opaque;
1324     V9fsState *s = pdu->s;
1325     V9fsString version;
1326     size_t offset = 7;
1327
1328     v9fs_string_init(&version);
1329     err = pdu_unmarshal(pdu, offset, "ds", &s->msize, &version);
1330     if (err < 0) {
1331         goto out;
1332     }
1333     trace_v9fs_version(pdu->tag, pdu->id, s->msize, version.data);
1334
1335     virtfs_reset(pdu);
1336
1337     if (!strcmp(version.data, "9P2000.u")) {
1338         s->proto_version = V9FS_PROTO_2000U;
1339     } else if (!strcmp(version.data, "9P2000.L")) {
1340         s->proto_version = V9FS_PROTO_2000L;
1341     } else {
1342         v9fs_string_sprintf(&version, "unknown");
1343         /* skip min. msize check, reporting invalid version has priority */
1344         goto marshal;
1345     }
1346
1347     if (s->msize < P9_MIN_MSIZE) {
1348         err = -EMSGSIZE;
1349         error_report(
1350             "9pfs: Client requested msize < minimum msize ("
1351             stringify(P9_MIN_MSIZE) ") supported by this server."
1352         );
1353         goto out;
1354     }
1355
1356     /* 8192 is the default msize of Linux clients */
1357     if (s->msize <= 8192 && !(s->ctx.export_flags & V9FS_NO_PERF_WARN)) {
1358         warn_report_once(
1359             "9p: degraded performance: a reasonable high msize should be "
1360             "chosen on client/guest side (chosen msize is <= 8192). See "
1361             "https://wiki.qemu.org/Documentation/9psetup#msize for details."
1362         );
1363     }
1364
1365 marshal:
1366     err = pdu_marshal(pdu, offset, "ds", s->msize, &version);
1367     if (err < 0) {
1368         goto out;
1369     }
1370     err += offset;
1371     trace_v9fs_version_return(pdu->tag, pdu->id, s->msize, version.data);
1372 out:
1373     pdu_complete(pdu, err);
1374     v9fs_string_free(&version);
1375 }
1376
1377 static void coroutine_fn v9fs_attach(void *opaque)
1378 {
1379     V9fsPDU *pdu = opaque;
1380     V9fsState *s = pdu->s;
1381     int32_t fid, afid, n_uname;
1382     V9fsString uname, aname;
1383     V9fsFidState *fidp;
1384     size_t offset = 7;
1385     V9fsQID qid;
1386     ssize_t err;
1387
1388     v9fs_string_init(&uname);
1389     v9fs_string_init(&aname);
1390     err = pdu_unmarshal(pdu, offset, "ddssd", &fid,
1391                         &afid, &uname, &aname, &n_uname);
1392     if (err < 0) {
1393         goto out_nofid;
1394     }
1395     trace_v9fs_attach(pdu->tag, pdu->id, fid, afid, uname.data, aname.data);
1396
1397     fidp = alloc_fid(s, fid);
1398     if (fidp == NULL) {
1399         err = -EINVAL;
1400         goto out_nofid;
1401     }
1402     fidp->uid = n_uname;
1403     err = v9fs_co_name_to_path(pdu, NULL, "/", &fidp->path);
1404     if (err < 0) {
1405         err = -EINVAL;
1406         clunk_fid(s, fid);
1407         goto out;
1408     }
1409     err = fid_to_qid(pdu, fidp, &qid);
1410     if (err < 0) {
1411         err = -EINVAL;
1412         clunk_fid(s, fid);
1413         goto out;
1414     }
1415
1416     /*
1417      * disable migration if we haven't done already.
1418      * attach could get called multiple times for the same export.
1419      */
1420     if (!s->migration_blocker) {
1421         error_setg(&s->migration_blocker,
1422                    "Migration is disabled when VirtFS export path '%s' is mounted in the guest using mount_tag '%s'",
1423                    s->ctx.fs_root ? s->ctx.fs_root : "NULL", s->tag);
1424         err = migrate_add_blocker(s->migration_blocker, NULL);
1425         if (err < 0) {
1426             error_free(s->migration_blocker);
1427             s->migration_blocker = NULL;
1428             clunk_fid(s, fid);
1429             goto out;
1430         }
1431         s->root_fid = fid;
1432     }
1433
1434     err = pdu_marshal(pdu, offset, "Q", &qid);
1435     if (err < 0) {
1436         clunk_fid(s, fid);
1437         goto out;
1438     }
1439     err += offset;
1440
1441     memcpy(&s->root_qid, &qid, sizeof(qid));
1442     trace_v9fs_attach_return(pdu->tag, pdu->id,
1443                              qid.type, qid.version, qid.path);
1444 out:
1445     put_fid(pdu, fidp);
1446 out_nofid:
1447     pdu_complete(pdu, err);
1448     v9fs_string_free(&uname);
1449     v9fs_string_free(&aname);
1450 }
1451
1452 static void coroutine_fn v9fs_stat(void *opaque)
1453 {
1454     int32_t fid;
1455     V9fsStat v9stat;
1456     ssize_t err = 0;
1457     size_t offset = 7;
1458     struct stat stbuf;
1459     V9fsFidState *fidp;
1460     V9fsPDU *pdu = opaque;
1461     char *basename;
1462
1463     err = pdu_unmarshal(pdu, offset, "d", &fid);
1464     if (err < 0) {
1465         goto out_nofid;
1466     }
1467     trace_v9fs_stat(pdu->tag, pdu->id, fid);
1468
1469     fidp = get_fid(pdu, fid);
1470     if (fidp == NULL) {
1471         err = -ENOENT;
1472         goto out_nofid;
1473     }
1474     err = v9fs_co_lstat(pdu, &fidp->path, &stbuf);
1475     if (err < 0) {
1476         goto out;
1477     }
1478     basename = g_path_get_basename(fidp->path.data);
1479     err = stat_to_v9stat(pdu, &fidp->path, basename, &stbuf, &v9stat);
1480     g_free(basename);
1481     if (err < 0) {
1482         goto out;
1483     }
1484     err = pdu_marshal(pdu, offset, "wS", 0, &v9stat);
1485     if (err < 0) {
1486         v9fs_stat_free(&v9stat);
1487         goto out;
1488     }
1489     trace_v9fs_stat_return(pdu->tag, pdu->id, v9stat.mode,
1490                            v9stat.atime, v9stat.mtime, v9stat.length);
1491     err += offset;
1492     v9fs_stat_free(&v9stat);
1493 out:
1494     put_fid(pdu, fidp);
1495 out_nofid:
1496     pdu_complete(pdu, err);
1497 }
1498
1499 static void coroutine_fn v9fs_getattr(void *opaque)
1500 {
1501     int32_t fid;
1502     size_t offset = 7;
1503     ssize_t retval = 0;
1504     struct stat stbuf;
1505     V9fsFidState *fidp;
1506     uint64_t request_mask;
1507     V9fsStatDotl v9stat_dotl;
1508     V9fsPDU *pdu = opaque;
1509
1510     retval = pdu_unmarshal(pdu, offset, "dq", &fid, &request_mask);
1511     if (retval < 0) {
1512         goto out_nofid;
1513     }
1514     trace_v9fs_getattr(pdu->tag, pdu->id, fid, request_mask);
1515
1516     fidp = get_fid(pdu, fid);
1517     if (fidp == NULL) {
1518         retval = -ENOENT;
1519         goto out_nofid;
1520     }
1521     /*
1522      * Currently we only support BASIC fields in stat, so there is no
1523      * need to look at request_mask.
1524      */
1525     retval = v9fs_co_lstat(pdu, &fidp->path, &stbuf);
1526     if (retval < 0) {
1527         goto out;
1528     }
1529     retval = stat_to_v9stat_dotl(pdu, &stbuf, &v9stat_dotl);
1530     if (retval < 0) {
1531         goto out;
1532     }
1533
1534     /*  fill st_gen if requested and supported by underlying fs */
1535     if (request_mask & P9_STATS_GEN) {
1536         retval = v9fs_co_st_gen(pdu, &fidp->path, stbuf.st_mode, &v9stat_dotl);
1537         switch (retval) {
1538         case 0:
1539             /* we have valid st_gen: update result mask */
1540             v9stat_dotl.st_result_mask |= P9_STATS_GEN;
1541             break;
1542         case -EINTR:
1543             /* request cancelled, e.g. by Tflush */
1544             goto out;
1545         default:
1546             /* failed to get st_gen: not fatal, ignore */
1547             break;
1548         }
1549     }
1550     retval = pdu_marshal(pdu, offset, "A", &v9stat_dotl);
1551     if (retval < 0) {
1552         goto out;
1553     }
1554     retval += offset;
1555     trace_v9fs_getattr_return(pdu->tag, pdu->id, v9stat_dotl.st_result_mask,
1556                               v9stat_dotl.st_mode, v9stat_dotl.st_uid,
1557                               v9stat_dotl.st_gid);
1558 out:
1559     put_fid(pdu, fidp);
1560 out_nofid:
1561     pdu_complete(pdu, retval);
1562 }
1563
1564 /* Attribute flags */
1565 #define P9_ATTR_MODE       (1 << 0)
1566 #define P9_ATTR_UID        (1 << 1)
1567 #define P9_ATTR_GID        (1 << 2)
1568 #define P9_ATTR_SIZE       (1 << 3)
1569 #define P9_ATTR_ATIME      (1 << 4)
1570 #define P9_ATTR_MTIME      (1 << 5)
1571 #define P9_ATTR_CTIME      (1 << 6)
1572 #define P9_ATTR_ATIME_SET  (1 << 7)
1573 #define P9_ATTR_MTIME_SET  (1 << 8)
1574
1575 #define P9_ATTR_MASK    127
1576
1577 static void coroutine_fn v9fs_setattr(void *opaque)
1578 {
1579     int err = 0;
1580     int32_t fid;
1581     V9fsFidState *fidp;
1582     size_t offset = 7;
1583     V9fsIattr v9iattr;
1584     V9fsPDU *pdu = opaque;
1585
1586     err = pdu_unmarshal(pdu, offset, "dI", &fid, &v9iattr);
1587     if (err < 0) {
1588         goto out_nofid;
1589     }
1590
1591     trace_v9fs_setattr(pdu->tag, pdu->id, fid,
1592                        v9iattr.valid, v9iattr.mode, v9iattr.uid, v9iattr.gid,
1593                        v9iattr.size, v9iattr.atime_sec, v9iattr.mtime_sec);
1594
1595     fidp = get_fid(pdu, fid);
1596     if (fidp == NULL) {
1597         err = -EINVAL;
1598         goto out_nofid;
1599     }
1600     if (v9iattr.valid & P9_ATTR_MODE) {
1601         err = v9fs_co_chmod(pdu, &fidp->path, v9iattr.mode);
1602         if (err < 0) {
1603             goto out;
1604         }
1605     }
1606     if (v9iattr.valid & (P9_ATTR_ATIME | P9_ATTR_MTIME)) {
1607         struct timespec times[2];
1608         if (v9iattr.valid & P9_ATTR_ATIME) {
1609             if (v9iattr.valid & P9_ATTR_ATIME_SET) {
1610                 times[0].tv_sec = v9iattr.atime_sec;
1611                 times[0].tv_nsec = v9iattr.atime_nsec;
1612             } else {
1613                 times[0].tv_nsec = UTIME_NOW;
1614             }
1615         } else {
1616             times[0].tv_nsec = UTIME_OMIT;
1617         }
1618         if (v9iattr.valid & P9_ATTR_MTIME) {
1619             if (v9iattr.valid & P9_ATTR_MTIME_SET) {
1620                 times[1].tv_sec = v9iattr.mtime_sec;
1621                 times[1].tv_nsec = v9iattr.mtime_nsec;
1622             } else {
1623                 times[1].tv_nsec = UTIME_NOW;
1624             }
1625         } else {
1626             times[1].tv_nsec = UTIME_OMIT;
1627         }
1628         err = v9fs_co_utimensat(pdu, &fidp->path, times);
1629         if (err < 0) {
1630             goto out;
1631         }
1632     }
1633     /*
1634      * If the only valid entry in iattr is ctime we can call
1635      * chown(-1,-1) to update the ctime of the file
1636      */
1637     if ((v9iattr.valid & (P9_ATTR_UID | P9_ATTR_GID)) ||
1638         ((v9iattr.valid & P9_ATTR_CTIME)
1639          && !((v9iattr.valid & P9_ATTR_MASK) & ~P9_ATTR_CTIME))) {
1640         if (!(v9iattr.valid & P9_ATTR_UID)) {
1641             v9iattr.uid = -1;
1642         }
1643         if (!(v9iattr.valid & P9_ATTR_GID)) {
1644             v9iattr.gid = -1;
1645         }
1646         err = v9fs_co_chown(pdu, &fidp->path, v9iattr.uid,
1647                             v9iattr.gid);
1648         if (err < 0) {
1649             goto out;
1650         }
1651     }
1652     if (v9iattr.valid & (P9_ATTR_SIZE)) {
1653         err = v9fs_co_truncate(pdu, &fidp->path, v9iattr.size);
1654         if (err < 0) {
1655             goto out;
1656         }
1657     }
1658     err = offset;
1659     trace_v9fs_setattr_return(pdu->tag, pdu->id);
1660 out:
1661     put_fid(pdu, fidp);
1662 out_nofid:
1663     pdu_complete(pdu, err);
1664 }
1665
1666 static int v9fs_walk_marshal(V9fsPDU *pdu, uint16_t nwnames, V9fsQID *qids)
1667 {
1668     int i;
1669     ssize_t err;
1670     size_t offset = 7;
1671
1672     err = pdu_marshal(pdu, offset, "w", nwnames);
1673     if (err < 0) {
1674         return err;
1675     }
1676     offset += err;
1677     for (i = 0; i < nwnames; i++) {
1678         err = pdu_marshal(pdu, offset, "Q", &qids[i]);
1679         if (err < 0) {
1680             return err;
1681         }
1682         offset += err;
1683     }
1684     return offset;
1685 }
1686
1687 static bool name_is_illegal(const char *name)
1688 {
1689     return !*name || strchr(name, '/') != NULL;
1690 }
1691
1692 static bool not_same_qid(const V9fsQID *qid1, const V9fsQID *qid2)
1693 {
1694     return
1695         qid1->type != qid2->type ||
1696         qid1->version != qid2->version ||
1697         qid1->path != qid2->path;
1698 }
1699
1700 static void coroutine_fn v9fs_walk(void *opaque)
1701 {
1702     int name_idx;
1703     V9fsQID *qids = NULL;
1704     int i, err = 0;
1705     V9fsPath dpath, path;
1706     uint16_t nwnames;
1707     struct stat stbuf;
1708     size_t offset = 7;
1709     int32_t fid, newfid;
1710     V9fsString *wnames = NULL;
1711     V9fsFidState *fidp;
1712     V9fsFidState *newfidp = NULL;
1713     V9fsPDU *pdu = opaque;
1714     V9fsState *s = pdu->s;
1715     V9fsQID qid;
1716
1717     err = pdu_unmarshal(pdu, offset, "ddw", &fid, &newfid, &nwnames);
1718     if (err < 0) {
1719         pdu_complete(pdu, err);
1720         return ;
1721     }
1722     offset += err;
1723
1724     trace_v9fs_walk(pdu->tag, pdu->id, fid, newfid, nwnames);
1725
1726     if (nwnames && nwnames <= P9_MAXWELEM) {
1727         wnames = g_new0(V9fsString, nwnames);
1728         qids   = g_new0(V9fsQID, nwnames);
1729         for (i = 0; i < nwnames; i++) {
1730             err = pdu_unmarshal(pdu, offset, "s", &wnames[i]);
1731             if (err < 0) {
1732                 goto out_nofid;
1733             }
1734             if (name_is_illegal(wnames[i].data)) {
1735                 err = -ENOENT;
1736                 goto out_nofid;
1737             }
1738             offset += err;
1739         }
1740     } else if (nwnames > P9_MAXWELEM) {
1741         err = -EINVAL;
1742         goto out_nofid;
1743     }
1744     fidp = get_fid(pdu, fid);
1745     if (fidp == NULL) {
1746         err = -ENOENT;
1747         goto out_nofid;
1748     }
1749
1750     v9fs_path_init(&dpath);
1751     v9fs_path_init(&path);
1752
1753     err = fid_to_qid(pdu, fidp, &qid);
1754     if (err < 0) {
1755         goto out;
1756     }
1757
1758     /*
1759      * Both dpath and path initially poin to fidp.
1760      * Needed to handle request with nwnames == 0
1761      */
1762     v9fs_path_copy(&dpath, &fidp->path);
1763     v9fs_path_copy(&path, &fidp->path);
1764     for (name_idx = 0; name_idx < nwnames; name_idx++) {
1765         if (not_same_qid(&pdu->s->root_qid, &qid) ||
1766             strcmp("..", wnames[name_idx].data)) {
1767             err = v9fs_co_name_to_path(pdu, &dpath, wnames[name_idx].data,
1768                                        &path);
1769             if (err < 0) {
1770                 goto out;
1771             }
1772
1773             err = v9fs_co_lstat(pdu, &path, &stbuf);
1774             if (err < 0) {
1775                 goto out;
1776             }
1777             err = stat_to_qid(pdu, &stbuf, &qid);
1778             if (err < 0) {
1779                 goto out;
1780             }
1781             v9fs_path_copy(&dpath, &path);
1782         }
1783         memcpy(&qids[name_idx], &qid, sizeof(qid));
1784     }
1785     if (fid == newfid) {
1786         if (fidp->fid_type != P9_FID_NONE) {
1787             err = -EINVAL;
1788             goto out;
1789         }
1790         v9fs_path_write_lock(s);
1791         v9fs_path_copy(&fidp->path, &path);
1792         v9fs_path_unlock(s);
1793     } else {
1794         newfidp = alloc_fid(s, newfid);
1795         if (newfidp == NULL) {
1796             err = -EINVAL;
1797             goto out;
1798         }
1799         newfidp->uid = fidp->uid;
1800         v9fs_path_copy(&newfidp->path, &path);
1801     }
1802     err = v9fs_walk_marshal(pdu, nwnames, qids);
1803     trace_v9fs_walk_return(pdu->tag, pdu->id, nwnames, qids);
1804 out:
1805     put_fid(pdu, fidp);
1806     if (newfidp) {
1807         put_fid(pdu, newfidp);
1808     }
1809     v9fs_path_free(&dpath);
1810     v9fs_path_free(&path);
1811 out_nofid:
1812     pdu_complete(pdu, err);
1813     if (nwnames && nwnames <= P9_MAXWELEM) {
1814         for (name_idx = 0; name_idx < nwnames; name_idx++) {
1815             v9fs_string_free(&wnames[name_idx]);
1816         }
1817         g_free(wnames);
1818         g_free(qids);
1819     }
1820 }
1821
1822 static int32_t coroutine_fn get_iounit(V9fsPDU *pdu, V9fsPath *path)
1823 {
1824     struct statfs stbuf;
1825     int32_t iounit = 0;
1826     V9fsState *s = pdu->s;
1827
1828     /*
1829      * iounit should be multiples of f_bsize (host filesystem block size
1830      * and as well as less than (client msize - P9_IOHDRSZ))
1831      */
1832     if (!v9fs_co_statfs(pdu, path, &stbuf)) {
1833         if (stbuf.f_bsize) {
1834             iounit = stbuf.f_bsize;
1835             iounit *= (s->msize - P9_IOHDRSZ) / stbuf.f_bsize;
1836         }
1837     }
1838     if (!iounit) {
1839         iounit = s->msize - P9_IOHDRSZ;
1840     }
1841     return iounit;
1842 }
1843
1844 static void coroutine_fn v9fs_open(void *opaque)
1845 {
1846     int flags;
1847     int32_t fid;
1848     int32_t mode;
1849     V9fsQID qid;
1850     int iounit = 0;
1851     ssize_t err = 0;
1852     size_t offset = 7;
1853     struct stat stbuf;
1854     V9fsFidState *fidp;
1855     V9fsPDU *pdu = opaque;
1856     V9fsState *s = pdu->s;
1857
1858     if (s->proto_version == V9FS_PROTO_2000L) {
1859         err = pdu_unmarshal(pdu, offset, "dd", &fid, &mode);
1860     } else {
1861         uint8_t modebyte;
1862         err = pdu_unmarshal(pdu, offset, "db", &fid, &modebyte);
1863         mode = modebyte;
1864     }
1865     if (err < 0) {
1866         goto out_nofid;
1867     }
1868     trace_v9fs_open(pdu->tag, pdu->id, fid, mode);
1869
1870     fidp = get_fid(pdu, fid);
1871     if (fidp == NULL) {
1872         err = -ENOENT;
1873         goto out_nofid;
1874     }
1875     if (fidp->fid_type != P9_FID_NONE) {
1876         err = -EINVAL;
1877         goto out;
1878     }
1879
1880     err = v9fs_co_lstat(pdu, &fidp->path, &stbuf);
1881     if (err < 0) {
1882         goto out;
1883     }
1884     err = stat_to_qid(pdu, &stbuf, &qid);
1885     if (err < 0) {
1886         goto out;
1887     }
1888     if (S_ISDIR(stbuf.st_mode)) {
1889         err = v9fs_co_opendir(pdu, fidp);
1890         if (err < 0) {
1891             goto out;
1892         }
1893         fidp->fid_type = P9_FID_DIR;
1894         err = pdu_marshal(pdu, offset, "Qd", &qid, 0);
1895         if (err < 0) {
1896             goto out;
1897         }
1898         err += offset;
1899     } else {
1900         if (s->proto_version == V9FS_PROTO_2000L) {
1901             flags = get_dotl_openflags(s, mode);
1902         } else {
1903             flags = omode_to_uflags(mode);
1904         }
1905         if (is_ro_export(&s->ctx)) {
1906             if (mode & O_WRONLY || mode & O_RDWR ||
1907                 mode & O_APPEND || mode & O_TRUNC) {
1908                 err = -EROFS;
1909                 goto out;
1910             }
1911         }
1912         err = v9fs_co_open(pdu, fidp, flags);
1913         if (err < 0) {
1914             goto out;
1915         }
1916         fidp->fid_type = P9_FID_FILE;
1917         fidp->open_flags = flags;
1918         if (flags & O_EXCL) {
1919             /*
1920              * We let the host file system do O_EXCL check
1921              * We should not reclaim such fd
1922              */
1923             fidp->flags |= FID_NON_RECLAIMABLE;
1924         }
1925         iounit = get_iounit(pdu, &fidp->path);
1926         err = pdu_marshal(pdu, offset, "Qd", &qid, iounit);
1927         if (err < 0) {
1928             goto out;
1929         }
1930         err += offset;
1931     }
1932     trace_v9fs_open_return(pdu->tag, pdu->id,
1933                            qid.type, qid.version, qid.path, iounit);
1934 out:
1935     put_fid(pdu, fidp);
1936 out_nofid:
1937     pdu_complete(pdu, err);
1938 }
1939
1940 static void coroutine_fn v9fs_lcreate(void *opaque)
1941 {
1942     int32_t dfid, flags, mode;
1943     gid_t gid;
1944     ssize_t err = 0;
1945     ssize_t offset = 7;
1946     V9fsString name;
1947     V9fsFidState *fidp;
1948     struct stat stbuf;
1949     V9fsQID qid;
1950     int32_t iounit;
1951     V9fsPDU *pdu = opaque;
1952
1953     v9fs_string_init(&name);
1954     err = pdu_unmarshal(pdu, offset, "dsddd", &dfid,
1955                         &name, &flags, &mode, &gid);
1956     if (err < 0) {
1957         goto out_nofid;
1958     }
1959     trace_v9fs_lcreate(pdu->tag, pdu->id, dfid, flags, mode, gid);
1960
1961     if (name_is_illegal(name.data)) {
1962         err = -ENOENT;
1963         goto out_nofid;
1964     }
1965
1966     if (!strcmp(".", name.data) || !strcmp("..", name.data)) {
1967         err = -EEXIST;
1968         goto out_nofid;
1969     }
1970
1971     fidp = get_fid(pdu, dfid);
1972     if (fidp == NULL) {
1973         err = -ENOENT;
1974         goto out_nofid;
1975     }
1976     if (fidp->fid_type != P9_FID_NONE) {
1977         err = -EINVAL;
1978         goto out;
1979     }
1980
1981     flags = get_dotl_openflags(pdu->s, flags);
1982     err = v9fs_co_open2(pdu, fidp, &name, gid,
1983                         flags | O_CREAT, mode, &stbuf);
1984     if (err < 0) {
1985         goto out;
1986     }
1987     fidp->fid_type = P9_FID_FILE;
1988     fidp->open_flags = flags;
1989     if (flags & O_EXCL) {
1990         /*
1991          * We let the host file system do O_EXCL check
1992          * We should not reclaim such fd
1993          */
1994         fidp->flags |= FID_NON_RECLAIMABLE;
1995     }
1996     iounit =  get_iounit(pdu, &fidp->path);
1997     err = stat_to_qid(pdu, &stbuf, &qid);
1998     if (err < 0) {
1999         goto out;
2000     }
2001     err = pdu_marshal(pdu, offset, "Qd", &qid, iounit);
2002     if (err < 0) {
2003         goto out;
2004     }
2005     err += offset;
2006     trace_v9fs_lcreate_return(pdu->tag, pdu->id,
2007                               qid.type, qid.version, qid.path, iounit);
2008 out:
2009     put_fid(pdu, fidp);
2010 out_nofid:
2011     pdu_complete(pdu, err);
2012     v9fs_string_free(&name);
2013 }
2014
2015 static void coroutine_fn v9fs_fsync(void *opaque)
2016 {
2017     int err;
2018     int32_t fid;
2019     int datasync;
2020     size_t offset = 7;
2021     V9fsFidState *fidp;
2022     V9fsPDU *pdu = opaque;
2023
2024     err = pdu_unmarshal(pdu, offset, "dd", &fid, &datasync);
2025     if (err < 0) {
2026         goto out_nofid;
2027     }
2028     trace_v9fs_fsync(pdu->tag, pdu->id, fid, datasync);
2029
2030     fidp = get_fid(pdu, fid);
2031     if (fidp == NULL) {
2032         err = -ENOENT;
2033         goto out_nofid;
2034     }
2035     err = v9fs_co_fsync(pdu, fidp, datasync);
2036     if (!err) {
2037         err = offset;
2038     }
2039     put_fid(pdu, fidp);
2040 out_nofid:
2041     pdu_complete(pdu, err);
2042 }
2043
2044 static void coroutine_fn v9fs_clunk(void *opaque)
2045 {
2046     int err;
2047     int32_t fid;
2048     size_t offset = 7;
2049     V9fsFidState *fidp;
2050     V9fsPDU *pdu = opaque;
2051     V9fsState *s = pdu->s;
2052
2053     err = pdu_unmarshal(pdu, offset, "d", &fid);
2054     if (err < 0) {
2055         goto out_nofid;
2056     }
2057     trace_v9fs_clunk(pdu->tag, pdu->id, fid);
2058
2059     fidp = clunk_fid(s, fid);
2060     if (fidp == NULL) {
2061         err = -ENOENT;
2062         goto out_nofid;
2063     }
2064     /*
2065      * Bump the ref so that put_fid will
2066      * free the fid.
2067      */
2068     fidp->ref++;
2069     err = put_fid(pdu, fidp);
2070     if (!err) {
2071         err = offset;
2072     }
2073 out_nofid:
2074     pdu_complete(pdu, err);
2075 }
2076
2077 /*
2078  * Create a QEMUIOVector for a sub-region of PDU iovecs
2079  *
2080  * @qiov:       uninitialized QEMUIOVector
2081  * @skip:       number of bytes to skip from beginning of PDU
2082  * @size:       number of bytes to include
2083  * @is_write:   true - write, false - read
2084  *
2085  * The resulting QEMUIOVector has heap-allocated iovecs and must be cleaned up
2086  * with qemu_iovec_destroy().
2087  */
2088 static void v9fs_init_qiov_from_pdu(QEMUIOVector *qiov, V9fsPDU *pdu,
2089                                     size_t skip, size_t size,
2090                                     bool is_write)
2091 {
2092     QEMUIOVector elem;
2093     struct iovec *iov;
2094     unsigned int niov;
2095
2096     if (is_write) {
2097         pdu->s->transport->init_out_iov_from_pdu(pdu, &iov, &niov, size + skip);
2098     } else {
2099         pdu->s->transport->init_in_iov_from_pdu(pdu, &iov, &niov, size + skip);
2100     }
2101
2102     qemu_iovec_init_external(&elem, iov, niov);
2103     qemu_iovec_init(qiov, niov);
2104     qemu_iovec_concat(qiov, &elem, skip, size);
2105 }
2106
2107 static int v9fs_xattr_read(V9fsState *s, V9fsPDU *pdu, V9fsFidState *fidp,
2108                            uint64_t off, uint32_t max_count)
2109 {
2110     ssize_t err;
2111     size_t offset = 7;
2112     uint64_t read_count;
2113     QEMUIOVector qiov_full;
2114
2115     if (fidp->fs.xattr.len < off) {
2116         read_count = 0;
2117     } else {
2118         read_count = fidp->fs.xattr.len - off;
2119     }
2120     if (read_count > max_count) {
2121         read_count = max_count;
2122     }
2123     err = pdu_marshal(pdu, offset, "d", read_count);
2124     if (err < 0) {
2125         return err;
2126     }
2127     offset += err;
2128
2129     v9fs_init_qiov_from_pdu(&qiov_full, pdu, offset, read_count, false);
2130     err = v9fs_pack(qiov_full.iov, qiov_full.niov, 0,
2131                     ((char *)fidp->fs.xattr.value) + off,
2132                     read_count);
2133     qemu_iovec_destroy(&qiov_full);
2134     if (err < 0) {
2135         return err;
2136     }
2137     offset += err;
2138     return offset;
2139 }
2140
2141 static int coroutine_fn v9fs_do_readdir_with_stat(V9fsPDU *pdu,
2142                                                   V9fsFidState *fidp,
2143                                                   uint32_t max_count)
2144 {
2145     V9fsPath path;
2146     V9fsStat v9stat;
2147     int len, err = 0;
2148     int32_t count = 0;
2149     struct stat stbuf;
2150     off_t saved_dir_pos;
2151     struct dirent *dent;
2152
2153     /* save the directory position */
2154     saved_dir_pos = v9fs_co_telldir(pdu, fidp);
2155     if (saved_dir_pos < 0) {
2156         return saved_dir_pos;
2157     }
2158
2159     while (1) {
2160         v9fs_path_init(&path);
2161
2162         v9fs_readdir_lock(&fidp->fs.dir);
2163
2164         err = v9fs_co_readdir(pdu, fidp, &dent);
2165         if (err || !dent) {
2166             break;
2167         }
2168         err = v9fs_co_name_to_path(pdu, &fidp->path, dent->d_name, &path);
2169         if (err < 0) {
2170             break;
2171         }
2172         err = v9fs_co_lstat(pdu, &path, &stbuf);
2173         if (err < 0) {
2174             break;
2175         }
2176         err = stat_to_v9stat(pdu, &path, dent->d_name, &stbuf, &v9stat);
2177         if (err < 0) {
2178             break;
2179         }
2180         if ((count + v9stat.size + 2) > max_count) {
2181             v9fs_readdir_unlock(&fidp->fs.dir);
2182
2183             /* Ran out of buffer. Set dir back to old position and return */
2184             v9fs_co_seekdir(pdu, fidp, saved_dir_pos);
2185             v9fs_stat_free(&v9stat);
2186             v9fs_path_free(&path);
2187             return count;
2188         }
2189
2190         /* 11 = 7 + 4 (7 = start offset, 4 = space for storing count) */
2191         len = pdu_marshal(pdu, 11 + count, "S", &v9stat);
2192
2193         v9fs_readdir_unlock(&fidp->fs.dir);
2194
2195         if (len < 0) {
2196             v9fs_co_seekdir(pdu, fidp, saved_dir_pos);
2197             v9fs_stat_free(&v9stat);
2198             v9fs_path_free(&path);
2199             return len;
2200         }
2201         count += len;
2202         v9fs_stat_free(&v9stat);
2203         v9fs_path_free(&path);
2204         saved_dir_pos = dent->d_off;
2205     }
2206
2207     v9fs_readdir_unlock(&fidp->fs.dir);
2208
2209     v9fs_path_free(&path);
2210     if (err < 0) {
2211         return err;
2212     }
2213     return count;
2214 }
2215
2216 static void coroutine_fn v9fs_read(void *opaque)
2217 {
2218     int32_t fid;
2219     uint64_t off;
2220     ssize_t err = 0;
2221     int32_t count = 0;
2222     size_t offset = 7;
2223     uint32_t max_count;
2224     V9fsFidState *fidp;
2225     V9fsPDU *pdu = opaque;
2226     V9fsState *s = pdu->s;
2227
2228     err = pdu_unmarshal(pdu, offset, "dqd", &fid, &off, &max_count);
2229     if (err < 0) {
2230         goto out_nofid;
2231     }
2232     trace_v9fs_read(pdu->tag, pdu->id, fid, off, max_count);
2233
2234     fidp = get_fid(pdu, fid);
2235     if (fidp == NULL) {
2236         err = -EINVAL;
2237         goto out_nofid;
2238     }
2239     if (fidp->fid_type == P9_FID_DIR) {
2240         if (s->proto_version != V9FS_PROTO_2000U) {
2241             warn_report_once(
2242                 "9p: bad client: T_read request on directory only expected "
2243                 "with 9P2000.u protocol version"
2244             );
2245             err = -EOPNOTSUPP;
2246             goto out;
2247         }
2248         if (off == 0) {
2249             v9fs_co_rewinddir(pdu, fidp);
2250         }
2251         count = v9fs_do_readdir_with_stat(pdu, fidp, max_count);
2252         if (count < 0) {
2253             err = count;
2254             goto out;
2255         }
2256         err = pdu_marshal(pdu, offset, "d", count);
2257         if (err < 0) {
2258             goto out;
2259         }
2260         err += offset + count;
2261     } else if (fidp->fid_type == P9_FID_FILE) {
2262         QEMUIOVector qiov_full;
2263         QEMUIOVector qiov;
2264         int32_t len;
2265
2266         v9fs_init_qiov_from_pdu(&qiov_full, pdu, offset + 4, max_count, false);
2267         qemu_iovec_init(&qiov, qiov_full.niov);
2268         do {
2269             qemu_iovec_reset(&qiov);
2270             qemu_iovec_concat(&qiov, &qiov_full, count, qiov_full.size - count);
2271             if (0) {
2272                 print_sg(qiov.iov, qiov.niov);
2273             }
2274             /* Loop in case of EINTR */
2275             do {
2276                 len = v9fs_co_preadv(pdu, fidp, qiov.iov, qiov.niov, off);
2277                 if (len >= 0) {
2278                     off   += len;
2279                     count += len;
2280                 }
2281             } while (len == -EINTR && !pdu->cancelled);
2282             if (len < 0) {
2283                 /* IO error return the error */
2284                 err = len;
2285                 goto out_free_iovec;
2286             }
2287         } while (count < max_count && len > 0);
2288         err = pdu_marshal(pdu, offset, "d", count);
2289         if (err < 0) {
2290             goto out_free_iovec;
2291         }
2292         err += offset + count;
2293 out_free_iovec:
2294         qemu_iovec_destroy(&qiov);
2295         qemu_iovec_destroy(&qiov_full);
2296     } else if (fidp->fid_type == P9_FID_XATTR) {
2297         err = v9fs_xattr_read(s, pdu, fidp, off, max_count);
2298     } else {
2299         err = -EINVAL;
2300     }
2301     trace_v9fs_read_return(pdu->tag, pdu->id, count, err);
2302 out:
2303     put_fid(pdu, fidp);
2304 out_nofid:
2305     pdu_complete(pdu, err);
2306 }
2307
2308 /**
2309  * Returns size required in Rreaddir response for the passed dirent @p name.
2310  *
2311  * @param name - directory entry's name (i.e. file name, directory name)
2312  * @returns required size in bytes
2313  */
2314 size_t v9fs_readdir_response_size(V9fsString *name)
2315 {
2316     /*
2317      * Size of each dirent on the wire: size of qid (13) + size of offset (8)
2318      * size of type (1) + size of name.size (2) + strlen(name.data)
2319      */
2320     return 24 + v9fs_string_size(name);
2321 }
2322
2323 static void v9fs_free_dirents(struct V9fsDirEnt *e)
2324 {
2325     struct V9fsDirEnt *next = NULL;
2326
2327     for (; e; e = next) {
2328         next = e->next;
2329         g_free(e->dent);
2330         g_free(e->st);
2331         g_free(e);
2332     }
2333 }
2334
2335 static int coroutine_fn v9fs_do_readdir(V9fsPDU *pdu, V9fsFidState *fidp,
2336                                         off_t offset, int32_t max_count)
2337 {
2338     size_t size;
2339     V9fsQID qid;
2340     V9fsString name;
2341     int len, err = 0;
2342     int32_t count = 0;
2343     struct dirent *dent;
2344     struct stat *st;
2345     struct V9fsDirEnt *entries = NULL;
2346
2347     /*
2348      * inode remapping requires the device id, which in turn might be
2349      * different for different directory entries, so if inode remapping is
2350      * enabled we have to make a full stat for each directory entry
2351      */
2352     const bool dostat = pdu->s->ctx.export_flags & V9FS_REMAP_INODES;
2353
2354     /*
2355      * Fetch all required directory entries altogether on a background IO
2356      * thread from fs driver. We don't want to do that for each entry
2357      * individually, because hopping between threads (this main IO thread
2358      * and background IO driver thread) would sum up to huge latencies.
2359      */
2360     count = v9fs_co_readdir_many(pdu, fidp, &entries, offset, max_count,
2361                                  dostat);
2362     if (count < 0) {
2363         err = count;
2364         count = 0;
2365         goto out;
2366     }
2367     count = 0;
2368
2369     for (struct V9fsDirEnt *e = entries; e; e = e->next) {
2370         dent = e->dent;
2371
2372         if (pdu->s->ctx.export_flags & V9FS_REMAP_INODES) {
2373             st = e->st;
2374             /* e->st should never be NULL, but just to be sure */
2375             if (!st) {
2376                 err = -1;
2377                 break;
2378             }
2379
2380             /* remap inode */
2381             err = stat_to_qid(pdu, st, &qid);
2382             if (err < 0) {
2383                 break;
2384             }
2385         } else {
2386             /*
2387              * Fill up just the path field of qid because the client uses
2388              * only that. To fill the entire qid structure we will have
2389              * to stat each dirent found, which is expensive. For the
2390              * latter reason we don't call stat_to_qid() here. Only drawback
2391              * is that no multi-device export detection of stat_to_qid()
2392              * would be done and provided as error to the user here. But
2393              * user would get that error anyway when accessing those
2394              * files/dirs through other ways.
2395              */
2396             size = MIN(sizeof(dent->d_ino), sizeof(qid.path));
2397             memcpy(&qid.path, &dent->d_ino, size);
2398             /* Fill the other fields with dummy values */
2399             qid.type = 0;
2400             qid.version = 0;
2401         }
2402
2403         v9fs_string_init(&name);
2404         v9fs_string_sprintf(&name, "%s", dent->d_name);
2405
2406         /* 11 = 7 + 4 (7 = start offset, 4 = space for storing count) */
2407         len = pdu_marshal(pdu, 11 + count, "Qqbs",
2408                           &qid, dent->d_off,
2409                           dent->d_type, &name);
2410
2411         v9fs_string_free(&name);
2412
2413         if (len < 0) {
2414             err = len;
2415             break;
2416         }
2417
2418         count += len;
2419     }
2420
2421 out:
2422     v9fs_free_dirents(entries);
2423     if (err < 0) {
2424         return err;
2425     }
2426     return count;
2427 }
2428
2429 static void coroutine_fn v9fs_readdir(void *opaque)
2430 {
2431     int32_t fid;
2432     V9fsFidState *fidp;
2433     ssize_t retval = 0;
2434     size_t offset = 7;
2435     uint64_t initial_offset;
2436     int32_t count;
2437     uint32_t max_count;
2438     V9fsPDU *pdu = opaque;
2439     V9fsState *s = pdu->s;
2440
2441     retval = pdu_unmarshal(pdu, offset, "dqd", &fid,
2442                            &initial_offset, &max_count);
2443     if (retval < 0) {
2444         goto out_nofid;
2445     }
2446     trace_v9fs_readdir(pdu->tag, pdu->id, fid, initial_offset, max_count);
2447
2448     /* Enough space for a R_readdir header: size[4] Rreaddir tag[2] count[4] */
2449     if (max_count > s->msize - 11) {
2450         max_count = s->msize - 11;
2451         warn_report_once(
2452             "9p: bad client: T_readdir with count > msize - 11"
2453         );
2454     }
2455
2456     fidp = get_fid(pdu, fid);
2457     if (fidp == NULL) {
2458         retval = -EINVAL;
2459         goto out_nofid;
2460     }
2461     if (!fidp->fs.dir.stream) {
2462         retval = -EINVAL;
2463         goto out;
2464     }
2465     if (s->proto_version != V9FS_PROTO_2000L) {
2466         warn_report_once(
2467             "9p: bad client: T_readdir request only expected with 9P2000.L "
2468             "protocol version"
2469         );
2470         retval = -EOPNOTSUPP;
2471         goto out;
2472     }
2473     count = v9fs_do_readdir(pdu, fidp, (off_t) initial_offset, max_count);
2474     if (count < 0) {
2475         retval = count;
2476         goto out;
2477     }
2478     retval = pdu_marshal(pdu, offset, "d", count);
2479     if (retval < 0) {
2480         goto out;
2481     }
2482     retval += count + offset;
2483     trace_v9fs_readdir_return(pdu->tag, pdu->id, count, retval);
2484 out:
2485     put_fid(pdu, fidp);
2486 out_nofid:
2487     pdu_complete(pdu, retval);
2488 }
2489
2490 static int v9fs_xattr_write(V9fsState *s, V9fsPDU *pdu, V9fsFidState *fidp,
2491                             uint64_t off, uint32_t count,
2492                             struct iovec *sg, int cnt)
2493 {
2494     int i, to_copy;
2495     ssize_t err = 0;
2496     uint64_t write_count;
2497     size_t offset = 7;
2498
2499
2500     if (fidp->fs.xattr.len < off) {
2501         return -ENOSPC;
2502     }
2503     write_count = fidp->fs.xattr.len - off;
2504     if (write_count > count) {
2505         write_count = count;
2506     }
2507     err = pdu_marshal(pdu, offset, "d", write_count);
2508     if (err < 0) {
2509         return err;
2510     }
2511     err += offset;
2512     fidp->fs.xattr.copied_len += write_count;
2513     /*
2514      * Now copy the content from sg list
2515      */
2516     for (i = 0; i < cnt; i++) {
2517         if (write_count > sg[i].iov_len) {
2518             to_copy = sg[i].iov_len;
2519         } else {
2520             to_copy = write_count;
2521         }
2522         memcpy((char *)fidp->fs.xattr.value + off, sg[i].iov_base, to_copy);
2523         /* updating vs->off since we are not using below */
2524         off += to_copy;
2525         write_count -= to_copy;
2526     }
2527
2528     return err;
2529 }
2530
2531 static void coroutine_fn v9fs_write(void *opaque)
2532 {
2533     ssize_t err;
2534     int32_t fid;
2535     uint64_t off;
2536     uint32_t count;
2537     int32_t len = 0;
2538     int32_t total = 0;
2539     size_t offset = 7;
2540     V9fsFidState *fidp;
2541     V9fsPDU *pdu = opaque;
2542     V9fsState *s = pdu->s;
2543     QEMUIOVector qiov_full;
2544     QEMUIOVector qiov;
2545
2546     err = pdu_unmarshal(pdu, offset, "dqd", &fid, &off, &count);
2547     if (err < 0) {
2548         pdu_complete(pdu, err);
2549         return;
2550     }
2551     offset += err;
2552     v9fs_init_qiov_from_pdu(&qiov_full, pdu, offset, count, true);
2553     trace_v9fs_write(pdu->tag, pdu->id, fid, off, count, qiov_full.niov);
2554
2555     fidp = get_fid(pdu, fid);
2556     if (fidp == NULL) {
2557         err = -EINVAL;
2558         goto out_nofid;
2559     }
2560     if (fidp->fid_type == P9_FID_FILE) {
2561         if (fidp->fs.fd == -1) {
2562             err = -EINVAL;
2563             goto out;
2564         }
2565     } else if (fidp->fid_type == P9_FID_XATTR) {
2566         /*
2567          * setxattr operation
2568          */
2569         err = v9fs_xattr_write(s, pdu, fidp, off, count,
2570                                qiov_full.iov, qiov_full.niov);
2571         goto out;
2572     } else {
2573         err = -EINVAL;
2574         goto out;
2575     }
2576     qemu_iovec_init(&qiov, qiov_full.niov);
2577     do {
2578         qemu_iovec_reset(&qiov);
2579         qemu_iovec_concat(&qiov, &qiov_full, total, qiov_full.size - total);
2580         if (0) {
2581             print_sg(qiov.iov, qiov.niov);
2582         }
2583         /* Loop in case of EINTR */
2584         do {
2585             len = v9fs_co_pwritev(pdu, fidp, qiov.iov, qiov.niov, off);
2586             if (len >= 0) {
2587                 off   += len;
2588                 total += len;
2589             }
2590         } while (len == -EINTR && !pdu->cancelled);
2591         if (len < 0) {
2592             /* IO error return the error */
2593             err = len;
2594             goto out_qiov;
2595         }
2596     } while (total < count && len > 0);
2597
2598     offset = 7;
2599     err = pdu_marshal(pdu, offset, "d", total);
2600     if (err < 0) {
2601         goto out_qiov;
2602     }
2603     err += offset;
2604     trace_v9fs_write_return(pdu->tag, pdu->id, total, err);
2605 out_qiov:
2606     qemu_iovec_destroy(&qiov);
2607 out:
2608     put_fid(pdu, fidp);
2609 out_nofid:
2610     qemu_iovec_destroy(&qiov_full);
2611     pdu_complete(pdu, err);
2612 }
2613
2614 static void coroutine_fn v9fs_create(void *opaque)
2615 {
2616     int32_t fid;
2617     int err = 0;
2618     size_t offset = 7;
2619     V9fsFidState *fidp;
2620     V9fsQID qid;
2621     int32_t perm;
2622     int8_t mode;
2623     V9fsPath path;
2624     struct stat stbuf;
2625     V9fsString name;
2626     V9fsString extension;
2627     int iounit;
2628     V9fsPDU *pdu = opaque;
2629     V9fsState *s = pdu->s;
2630
2631     v9fs_path_init(&path);
2632     v9fs_string_init(&name);
2633     v9fs_string_init(&extension);
2634     err = pdu_unmarshal(pdu, offset, "dsdbs", &fid, &name,
2635                         &perm, &mode, &extension);
2636     if (err < 0) {
2637         goto out_nofid;
2638     }
2639     trace_v9fs_create(pdu->tag, pdu->id, fid, name.data, perm, mode);
2640
2641     if (name_is_illegal(name.data)) {
2642         err = -ENOENT;
2643         goto out_nofid;
2644     }
2645
2646     if (!strcmp(".", name.data) || !strcmp("..", name.data)) {
2647         err = -EEXIST;
2648         goto out_nofid;
2649     }
2650
2651     fidp = get_fid(pdu, fid);
2652     if (fidp == NULL) {
2653         err = -EINVAL;
2654         goto out_nofid;
2655     }
2656     if (fidp->fid_type != P9_FID_NONE) {
2657         err = -EINVAL;
2658         goto out;
2659     }
2660     if (perm & P9_STAT_MODE_DIR) {
2661         err = v9fs_co_mkdir(pdu, fidp, &name, perm & 0777,
2662                             fidp->uid, -1, &stbuf);
2663         if (err < 0) {
2664             goto out;
2665         }
2666         err = v9fs_co_name_to_path(pdu, &fidp->path, name.data, &path);
2667         if (err < 0) {
2668             goto out;
2669         }
2670         v9fs_path_write_lock(s);
2671         v9fs_path_copy(&fidp->path, &path);
2672         v9fs_path_unlock(s);
2673         err = v9fs_co_opendir(pdu, fidp);
2674         if (err < 0) {
2675             goto out;
2676         }
2677         fidp->fid_type = P9_FID_DIR;
2678     } else if (perm & P9_STAT_MODE_SYMLINK) {
2679         err = v9fs_co_symlink(pdu, fidp, &name,
2680                               extension.data, -1 , &stbuf);
2681         if (err < 0) {
2682             goto out;
2683         }
2684         err = v9fs_co_name_to_path(pdu, &fidp->path, name.data, &path);
2685         if (err < 0) {
2686             goto out;
2687         }
2688         v9fs_path_write_lock(s);
2689         v9fs_path_copy(&fidp->path, &path);
2690         v9fs_path_unlock(s);
2691     } else if (perm & P9_STAT_MODE_LINK) {
2692         int32_t ofid = atoi(extension.data);
2693         V9fsFidState *ofidp = get_fid(pdu, ofid);
2694         if (ofidp == NULL) {
2695             err = -EINVAL;
2696             goto out;
2697         }
2698         err = v9fs_co_link(pdu, ofidp, fidp, &name);
2699         put_fid(pdu, ofidp);
2700         if (err < 0) {
2701             goto out;
2702         }
2703         err = v9fs_co_name_to_path(pdu, &fidp->path, name.data, &path);
2704         if (err < 0) {
2705             fidp->fid_type = P9_FID_NONE;
2706             goto out;
2707         }
2708         v9fs_path_write_lock(s);
2709         v9fs_path_copy(&fidp->path, &path);
2710         v9fs_path_unlock(s);
2711         err = v9fs_co_lstat(pdu, &fidp->path, &stbuf);
2712         if (err < 0) {
2713             fidp->fid_type = P9_FID_NONE;
2714             goto out;
2715         }
2716     } else if (perm & P9_STAT_MODE_DEVICE) {
2717         char ctype;
2718         uint32_t major, minor;
2719         mode_t nmode = 0;
2720
2721         if (sscanf(extension.data, "%c %u %u", &ctype, &major, &minor) != 3) {
2722             err = -errno;
2723             goto out;
2724         }
2725
2726         switch (ctype) {
2727         case 'c':
2728             nmode = S_IFCHR;
2729             break;
2730         case 'b':
2731             nmode = S_IFBLK;
2732             break;
2733         default:
2734             err = -EIO;
2735             goto out;
2736         }
2737
2738         nmode |= perm & 0777;
2739         err = v9fs_co_mknod(pdu, fidp, &name, fidp->uid, -1,
2740                             makedev(major, minor), nmode, &stbuf);
2741         if (err < 0) {
2742             goto out;
2743         }
2744         err = v9fs_co_name_to_path(pdu, &fidp->path, name.data, &path);
2745         if (err < 0) {
2746             goto out;
2747         }
2748         v9fs_path_write_lock(s);
2749         v9fs_path_copy(&fidp->path, &path);
2750         v9fs_path_unlock(s);
2751     } else if (perm & P9_STAT_MODE_NAMED_PIPE) {
2752         err = v9fs_co_mknod(pdu, fidp, &name, fidp->uid, -1,
2753                             0, S_IFIFO | (perm & 0777), &stbuf);
2754         if (err < 0) {
2755             goto out;
2756         }
2757         err = v9fs_co_name_to_path(pdu, &fidp->path, name.data, &path);
2758         if (err < 0) {
2759             goto out;
2760         }
2761         v9fs_path_write_lock(s);
2762         v9fs_path_copy(&fidp->path, &path);
2763         v9fs_path_unlock(s);
2764     } else if (perm & P9_STAT_MODE_SOCKET) {
2765         err = v9fs_co_mknod(pdu, fidp, &name, fidp->uid, -1,
2766                             0, S_IFSOCK | (perm & 0777), &stbuf);
2767         if (err < 0) {
2768             goto out;
2769         }
2770         err = v9fs_co_name_to_path(pdu, &fidp->path, name.data, &path);
2771         if (err < 0) {
2772             goto out;
2773         }
2774         v9fs_path_write_lock(s);
2775         v9fs_path_copy(&fidp->path, &path);
2776         v9fs_path_unlock(s);
2777     } else {
2778         err = v9fs_co_open2(pdu, fidp, &name, -1,
2779                             omode_to_uflags(mode)|O_CREAT, perm, &stbuf);
2780         if (err < 0) {
2781             goto out;
2782         }
2783         fidp->fid_type = P9_FID_FILE;
2784         fidp->open_flags = omode_to_uflags(mode);
2785         if (fidp->open_flags & O_EXCL) {
2786             /*
2787              * We let the host file system do O_EXCL check
2788              * We should not reclaim such fd
2789              */
2790             fidp->flags |= FID_NON_RECLAIMABLE;
2791         }
2792     }
2793     iounit = get_iounit(pdu, &fidp->path);
2794     err = stat_to_qid(pdu, &stbuf, &qid);
2795     if (err < 0) {
2796         goto out;
2797     }
2798     err = pdu_marshal(pdu, offset, "Qd", &qid, iounit);
2799     if (err < 0) {
2800         goto out;
2801     }
2802     err += offset;
2803     trace_v9fs_create_return(pdu->tag, pdu->id,
2804                              qid.type, qid.version, qid.path, iounit);
2805 out:
2806     put_fid(pdu, fidp);
2807 out_nofid:
2808    pdu_complete(pdu, err);
2809    v9fs_string_free(&name);
2810    v9fs_string_free(&extension);
2811    v9fs_path_free(&path);
2812 }
2813
2814 static void coroutine_fn v9fs_symlink(void *opaque)
2815 {
2816     V9fsPDU *pdu = opaque;
2817     V9fsString name;
2818     V9fsString symname;
2819     V9fsFidState *dfidp;
2820     V9fsQID qid;
2821     struct stat stbuf;
2822     int32_t dfid;
2823     int err = 0;
2824     gid_t gid;
2825     size_t offset = 7;
2826
2827     v9fs_string_init(&name);
2828     v9fs_string_init(&symname);
2829     err = pdu_unmarshal(pdu, offset, "dssd", &dfid, &name, &symname, &gid);
2830     if (err < 0) {
2831         goto out_nofid;
2832     }
2833     trace_v9fs_symlink(pdu->tag, pdu->id, dfid, name.data, symname.data, gid);
2834
2835     if (name_is_illegal(name.data)) {
2836         err = -ENOENT;
2837         goto out_nofid;
2838     }
2839
2840     if (!strcmp(".", name.data) || !strcmp("..", name.data)) {
2841         err = -EEXIST;
2842         goto out_nofid;
2843     }
2844
2845     dfidp = get_fid(pdu, dfid);
2846     if (dfidp == NULL) {
2847         err = -EINVAL;
2848         goto out_nofid;
2849     }
2850     err = v9fs_co_symlink(pdu, dfidp, &name, symname.data, gid, &stbuf);
2851     if (err < 0) {
2852         goto out;
2853     }
2854     err = stat_to_qid(pdu, &stbuf, &qid);
2855     if (err < 0) {
2856         goto out;
2857     }
2858     err =  pdu_marshal(pdu, offset, "Q", &qid);
2859     if (err < 0) {
2860         goto out;
2861     }
2862     err += offset;
2863     trace_v9fs_symlink_return(pdu->tag, pdu->id,
2864                               qid.type, qid.version, qid.path);
2865 out:
2866     put_fid(pdu, dfidp);
2867 out_nofid:
2868     pdu_complete(pdu, err);
2869     v9fs_string_free(&name);
2870     v9fs_string_free(&symname);
2871 }
2872
2873 static void coroutine_fn v9fs_flush(void *opaque)
2874 {
2875     ssize_t err;
2876     int16_t tag;
2877     size_t offset = 7;
2878     V9fsPDU *cancel_pdu = NULL;
2879     V9fsPDU *pdu = opaque;
2880     V9fsState *s = pdu->s;
2881
2882     err = pdu_unmarshal(pdu, offset, "w", &tag);
2883     if (err < 0) {
2884         pdu_complete(pdu, err);
2885         return;
2886     }
2887     trace_v9fs_flush(pdu->tag, pdu->id, tag);
2888
2889     if (pdu->tag == tag) {
2890         warn_report("the guest sent a self-referencing 9P flush request");
2891     } else {
2892         QLIST_FOREACH(cancel_pdu, &s->active_list, next) {
2893             if (cancel_pdu->tag == tag) {
2894                 break;
2895             }
2896         }
2897     }
2898     if (cancel_pdu) {
2899         cancel_pdu->cancelled = 1;
2900         /*
2901          * Wait for pdu to complete.
2902          */
2903         qemu_co_queue_wait(&cancel_pdu->complete, NULL);
2904         if (!qemu_co_queue_next(&cancel_pdu->complete)) {
2905             cancel_pdu->cancelled = 0;
2906             pdu_free(cancel_pdu);
2907         }
2908     }
2909     pdu_complete(pdu, 7);
2910 }
2911
2912 static void coroutine_fn v9fs_link(void *opaque)
2913 {
2914     V9fsPDU *pdu = opaque;
2915     int32_t dfid, oldfid;
2916     V9fsFidState *dfidp, *oldfidp;
2917     V9fsString name;
2918     size_t offset = 7;
2919     int err = 0;
2920
2921     v9fs_string_init(&name);
2922     err = pdu_unmarshal(pdu, offset, "dds", &dfid, &oldfid, &name);
2923     if (err < 0) {
2924         goto out_nofid;
2925     }
2926     trace_v9fs_link(pdu->tag, pdu->id, dfid, oldfid, name.data);
2927
2928     if (name_is_illegal(name.data)) {
2929         err = -ENOENT;
2930         goto out_nofid;
2931     }
2932
2933     if (!strcmp(".", name.data) || !strcmp("..", name.data)) {
2934         err = -EEXIST;
2935         goto out_nofid;
2936     }
2937
2938     dfidp = get_fid(pdu, dfid);
2939     if (dfidp == NULL) {
2940         err = -ENOENT;
2941         goto out_nofid;
2942     }
2943
2944     oldfidp = get_fid(pdu, oldfid);
2945     if (oldfidp == NULL) {
2946         err = -ENOENT;
2947         goto out;
2948     }
2949     err = v9fs_co_link(pdu, oldfidp, dfidp, &name);
2950     if (!err) {
2951         err = offset;
2952     }
2953     put_fid(pdu, oldfidp);
2954 out:
2955     put_fid(pdu, dfidp);
2956 out_nofid:
2957     v9fs_string_free(&name);
2958     pdu_complete(pdu, err);
2959 }
2960
2961 /* Only works with path name based fid */
2962 static void coroutine_fn v9fs_remove(void *opaque)
2963 {
2964     int32_t fid;
2965     int err = 0;
2966     size_t offset = 7;
2967     V9fsFidState *fidp;
2968     V9fsPDU *pdu = opaque;
2969
2970     err = pdu_unmarshal(pdu, offset, "d", &fid);
2971     if (err < 0) {
2972         goto out_nofid;
2973     }
2974     trace_v9fs_remove(pdu->tag, pdu->id, fid);
2975
2976     fidp = get_fid(pdu, fid);
2977     if (fidp == NULL) {
2978         err = -EINVAL;
2979         goto out_nofid;
2980     }
2981     /* if fs driver is not path based, return EOPNOTSUPP */
2982     if (!(pdu->s->ctx.export_flags & V9FS_PATHNAME_FSCONTEXT)) {
2983         err = -EOPNOTSUPP;
2984         goto out_err;
2985     }
2986     /*
2987      * IF the file is unlinked, we cannot reopen
2988      * the file later. So don't reclaim fd
2989      */
2990     err = v9fs_mark_fids_unreclaim(pdu, &fidp->path);
2991     if (err < 0) {
2992         goto out_err;
2993     }
2994     err = v9fs_co_remove(pdu, &fidp->path);
2995     if (!err) {
2996         err = offset;
2997     }
2998 out_err:
2999     /* For TREMOVE we need to clunk the fid even on failed remove */
3000     clunk_fid(pdu->s, fidp->fid);
3001     put_fid(pdu, fidp);
3002 out_nofid:
3003     pdu_complete(pdu, err);
3004 }
3005
3006 static void coroutine_fn v9fs_unlinkat(void *opaque)
3007 {
3008     int err = 0;
3009     V9fsString name;
3010     int32_t dfid, flags, rflags = 0;
3011     size_t offset = 7;
3012     V9fsPath path;
3013     V9fsFidState *dfidp;
3014     V9fsPDU *pdu = opaque;
3015
3016     v9fs_string_init(&name);
3017     err = pdu_unmarshal(pdu, offset, "dsd", &dfid, &name, &flags);
3018     if (err < 0) {
3019         goto out_nofid;
3020     }
3021
3022     if (name_is_illegal(name.data)) {
3023         err = -ENOENT;
3024         goto out_nofid;
3025     }
3026
3027     if (!strcmp(".", name.data)) {
3028         err = -EINVAL;
3029         goto out_nofid;
3030     }
3031
3032     if (!strcmp("..", name.data)) {
3033         err = -ENOTEMPTY;
3034         goto out_nofid;
3035     }
3036
3037     if (flags & ~P9_DOTL_AT_REMOVEDIR) {
3038         err = -EINVAL;
3039         goto out_nofid;
3040     }
3041
3042     if (flags & P9_DOTL_AT_REMOVEDIR) {
3043         rflags |= AT_REMOVEDIR;
3044     }
3045
3046     dfidp = get_fid(pdu, dfid);
3047     if (dfidp == NULL) {
3048         err = -EINVAL;
3049         goto out_nofid;
3050     }
3051     /*
3052      * IF the file is unlinked, we cannot reopen
3053      * the file later. So don't reclaim fd
3054      */
3055     v9fs_path_init(&path);
3056     err = v9fs_co_name_to_path(pdu, &dfidp->path, name.data, &path);
3057     if (err < 0) {
3058         goto out_err;
3059     }
3060     err = v9fs_mark_fids_unreclaim(pdu, &path);
3061     if (err < 0) {
3062         goto out_err;
3063     }
3064     err = v9fs_co_unlinkat(pdu, &dfidp->path, &name, rflags);
3065     if (!err) {
3066         err = offset;
3067     }
3068 out_err:
3069     put_fid(pdu, dfidp);
3070     v9fs_path_free(&path);
3071 out_nofid:
3072     pdu_complete(pdu, err);
3073     v9fs_string_free(&name);
3074 }
3075
3076
3077 /* Only works with path name based fid */
3078 static int coroutine_fn v9fs_complete_rename(V9fsPDU *pdu, V9fsFidState *fidp,
3079                                              int32_t newdirfid,
3080                                              V9fsString *name)
3081 {
3082     int err = 0;
3083     V9fsPath new_path;
3084     V9fsFidState *tfidp;
3085     V9fsState *s = pdu->s;
3086     V9fsFidState *dirfidp = NULL;
3087
3088     v9fs_path_init(&new_path);
3089     if (newdirfid != -1) {
3090         dirfidp = get_fid(pdu, newdirfid);
3091         if (dirfidp == NULL) {
3092             return -ENOENT;
3093         }
3094         if (fidp->fid_type != P9_FID_NONE) {
3095             err = -EINVAL;
3096             goto out;
3097         }
3098         err = v9fs_co_name_to_path(pdu, &dirfidp->path, name->data, &new_path);
3099         if (err < 0) {
3100             goto out;
3101         }
3102     } else {
3103         char *dir_name = g_path_get_dirname(fidp->path.data);
3104         V9fsPath dir_path;
3105
3106         v9fs_path_init(&dir_path);
3107         v9fs_path_sprintf(&dir_path, "%s", dir_name);
3108         g_free(dir_name);
3109
3110         err = v9fs_co_name_to_path(pdu, &dir_path, name->data, &new_path);
3111         v9fs_path_free(&dir_path);
3112         if (err < 0) {
3113             goto out;
3114         }
3115     }
3116     err = v9fs_co_rename(pdu, &fidp->path, &new_path);
3117     if (err < 0) {
3118         goto out;
3119     }
3120     /*
3121      * Fixup fid's pointing to the old name to
3122      * start pointing to the new name
3123      */
3124     for (tfidp = s->fid_list; tfidp; tfidp = tfidp->next) {
3125         if (v9fs_path_is_ancestor(&fidp->path, &tfidp->path)) {
3126             /* replace the name */
3127             v9fs_fix_path(&tfidp->path, &new_path, strlen(fidp->path.data));
3128         }
3129     }
3130 out:
3131     if (dirfidp) {
3132         put_fid(pdu, dirfidp);
3133     }
3134     v9fs_path_free(&new_path);
3135     return err;
3136 }
3137
3138 /* Only works with path name based fid */
3139 static void coroutine_fn v9fs_rename(void *opaque)
3140 {
3141     int32_t fid;
3142     ssize_t err = 0;
3143     size_t offset = 7;
3144     V9fsString name;
3145     int32_t newdirfid;
3146     V9fsFidState *fidp;
3147     V9fsPDU *pdu = opaque;
3148     V9fsState *s = pdu->s;
3149
3150     v9fs_string_init(&name);
3151     err = pdu_unmarshal(pdu, offset, "dds", &fid, &newdirfid, &name);
3152     if (err < 0) {
3153         goto out_nofid;
3154     }
3155
3156     if (name_is_illegal(name.data)) {
3157         err = -ENOENT;
3158         goto out_nofid;
3159     }
3160
3161     if (!strcmp(".", name.data) || !strcmp("..", name.data)) {
3162         err = -EISDIR;
3163         goto out_nofid;
3164     }
3165
3166     fidp = get_fid(pdu, fid);
3167     if (fidp == NULL) {
3168         err = -ENOENT;
3169         goto out_nofid;
3170     }
3171     if (fidp->fid_type != P9_FID_NONE) {
3172         err = -EINVAL;
3173         goto out;
3174     }
3175     /* if fs driver is not path based, return EOPNOTSUPP */
3176     if (!(pdu->s->ctx.export_flags & V9FS_PATHNAME_FSCONTEXT)) {
3177         err = -EOPNOTSUPP;
3178         goto out;
3179     }
3180     v9fs_path_write_lock(s);
3181     err = v9fs_complete_rename(pdu, fidp, newdirfid, &name);
3182     v9fs_path_unlock(s);
3183     if (!err) {
3184         err = offset;
3185     }
3186 out:
3187     put_fid(pdu, fidp);
3188 out_nofid:
3189     pdu_complete(pdu, err);
3190     v9fs_string_free(&name);
3191 }
3192
3193 static int coroutine_fn v9fs_fix_fid_paths(V9fsPDU *pdu, V9fsPath *olddir,
3194                                            V9fsString *old_name,
3195                                            V9fsPath *newdir,
3196                                            V9fsString *new_name)
3197 {
3198     V9fsFidState *tfidp;
3199     V9fsPath oldpath, newpath;
3200     V9fsState *s = pdu->s;
3201     int err;
3202
3203     v9fs_path_init(&oldpath);
3204     v9fs_path_init(&newpath);
3205     err = v9fs_co_name_to_path(pdu, olddir, old_name->data, &oldpath);
3206     if (err < 0) {
3207         goto out;
3208     }
3209     err = v9fs_co_name_to_path(pdu, newdir, new_name->data, &newpath);
3210     if (err < 0) {
3211         goto out;
3212     }
3213
3214     /*
3215      * Fixup fid's pointing to the old name to
3216      * start pointing to the new name
3217      */
3218     for (tfidp = s->fid_list; tfidp; tfidp = tfidp->next) {
3219         if (v9fs_path_is_ancestor(&oldpath, &tfidp->path)) {
3220             /* replace the name */
3221             v9fs_fix_path(&tfidp->path, &newpath, strlen(oldpath.data));
3222         }
3223     }
3224 out:
3225     v9fs_path_free(&oldpath);
3226     v9fs_path_free(&newpath);
3227     return err;
3228 }
3229
3230 static int coroutine_fn v9fs_complete_renameat(V9fsPDU *pdu, int32_t olddirfid,
3231                                                V9fsString *old_name,
3232                                                int32_t newdirfid,
3233                                                V9fsString *new_name)
3234 {
3235     int err = 0;
3236     V9fsState *s = pdu->s;
3237     V9fsFidState *newdirfidp = NULL, *olddirfidp = NULL;
3238
3239     olddirfidp = get_fid(pdu, olddirfid);
3240     if (olddirfidp == NULL) {
3241         err = -ENOENT;
3242         goto out;
3243     }
3244     if (newdirfid != -1) {
3245         newdirfidp = get_fid(pdu, newdirfid);
3246         if (newdirfidp == NULL) {
3247             err = -ENOENT;
3248             goto out;
3249         }
3250     } else {
3251         newdirfidp = get_fid(pdu, olddirfid);
3252     }
3253
3254     err = v9fs_co_renameat(pdu, &olddirfidp->path, old_name,
3255                            &newdirfidp->path, new_name);
3256     if (err < 0) {
3257         goto out;
3258     }
3259     if (s->ctx.export_flags & V9FS_PATHNAME_FSCONTEXT) {
3260         /* Only for path based fid  we need to do the below fixup */
3261         err = v9fs_fix_fid_paths(pdu, &olddirfidp->path, old_name,
3262                                  &newdirfidp->path, new_name);
3263     }
3264 out:
3265     if (olddirfidp) {
3266         put_fid(pdu, olddirfidp);
3267     }
3268     if (newdirfidp) {
3269         put_fid(pdu, newdirfidp);
3270     }
3271     return err;
3272 }
3273
3274 static void coroutine_fn v9fs_renameat(void *opaque)
3275 {
3276     ssize_t err = 0;
3277     size_t offset = 7;
3278     V9fsPDU *pdu = opaque;
3279     V9fsState *s = pdu->s;
3280     int32_t olddirfid, newdirfid;
3281     V9fsString old_name, new_name;
3282
3283     v9fs_string_init(&old_name);
3284     v9fs_string_init(&new_name);
3285     err = pdu_unmarshal(pdu, offset, "dsds", &olddirfid,
3286                         &old_name, &newdirfid, &new_name);
3287     if (err < 0) {
3288         goto out_err;
3289     }
3290
3291     if (name_is_illegal(old_name.data) || name_is_illegal(new_name.data)) {
3292         err = -ENOENT;
3293         goto out_err;
3294     }
3295
3296     if (!strcmp(".", old_name.data) || !strcmp("..", old_name.data) ||
3297         !strcmp(".", new_name.data) || !strcmp("..", new_name.data)) {
3298         err = -EISDIR;
3299         goto out_err;
3300     }
3301
3302     v9fs_path_write_lock(s);
3303     err = v9fs_complete_renameat(pdu, olddirfid,
3304                                  &old_name, newdirfid, &new_name);
3305     v9fs_path_unlock(s);
3306     if (!err) {
3307         err = offset;
3308     }
3309
3310 out_err:
3311     pdu_complete(pdu, err);
3312     v9fs_string_free(&old_name);
3313     v9fs_string_free(&new_name);
3314 }
3315
3316 static void coroutine_fn v9fs_wstat(void *opaque)
3317 {
3318     int32_t fid;
3319     int err = 0;
3320     int16_t unused;
3321     V9fsStat v9stat;
3322     size_t offset = 7;
3323     struct stat stbuf;
3324     V9fsFidState *fidp;
3325     V9fsPDU *pdu = opaque;
3326     V9fsState *s = pdu->s;
3327
3328     v9fs_stat_init(&v9stat);
3329     err = pdu_unmarshal(pdu, offset, "dwS", &fid, &unused, &v9stat);
3330     if (err < 0) {
3331         goto out_nofid;
3332     }
3333     trace_v9fs_wstat(pdu->tag, pdu->id, fid,
3334                      v9stat.mode, v9stat.atime, v9stat.mtime);
3335
3336     fidp = get_fid(pdu, fid);
3337     if (fidp == NULL) {
3338         err = -EINVAL;
3339         goto out_nofid;
3340     }
3341     /* do we need to sync the file? */
3342     if (donttouch_stat(&v9stat)) {
3343         err = v9fs_co_fsync(pdu, fidp, 0);
3344         goto out;
3345     }
3346     if (v9stat.mode != -1) {
3347         uint32_t v9_mode;
3348         err = v9fs_co_lstat(pdu, &fidp->path, &stbuf);
3349         if (err < 0) {
3350             goto out;
3351         }
3352         v9_mode = stat_to_v9mode(&stbuf);
3353         if ((v9stat.mode & P9_STAT_MODE_TYPE_BITS) !=
3354             (v9_mode & P9_STAT_MODE_TYPE_BITS)) {
3355             /* Attempting to change the type */
3356             err = -EIO;
3357             goto out;
3358         }
3359         err = v9fs_co_chmod(pdu, &fidp->path,
3360                             v9mode_to_mode(v9stat.mode,
3361                                            &v9stat.extension));
3362         if (err < 0) {
3363             goto out;
3364         }
3365     }
3366     if (v9stat.mtime != -1 || v9stat.atime != -1) {
3367         struct timespec times[2];
3368         if (v9stat.atime != -1) {
3369             times[0].tv_sec = v9stat.atime;
3370             times[0].tv_nsec = 0;
3371         } else {
3372             times[0].tv_nsec = UTIME_OMIT;
3373         }
3374         if (v9stat.mtime != -1) {
3375             times[1].tv_sec = v9stat.mtime;
3376             times[1].tv_nsec = 0;
3377         } else {
3378             times[1].tv_nsec = UTIME_OMIT;
3379         }
3380         err = v9fs_co_utimensat(pdu, &fidp->path, times);
3381         if (err < 0) {
3382             goto out;
3383         }
3384     }
3385     if (v9stat.n_gid != -1 || v9stat.n_uid != -1) {
3386         err = v9fs_co_chown(pdu, &fidp->path, v9stat.n_uid, v9stat.n_gid);
3387         if (err < 0) {
3388             goto out;
3389         }
3390     }
3391     if (v9stat.name.size != 0) {
3392         v9fs_path_write_lock(s);
3393         err = v9fs_complete_rename(pdu, fidp, -1, &v9stat.name);
3394         v9fs_path_unlock(s);
3395         if (err < 0) {
3396             goto out;
3397         }
3398     }
3399     if (v9stat.length != -1) {
3400         err = v9fs_co_truncate(pdu, &fidp->path, v9stat.length);
3401         if (err < 0) {
3402             goto out;
3403         }
3404     }
3405     err = offset;
3406 out:
3407     put_fid(pdu, fidp);
3408 out_nofid:
3409     v9fs_stat_free(&v9stat);
3410     pdu_complete(pdu, err);
3411 }
3412
3413 static int v9fs_fill_statfs(V9fsState *s, V9fsPDU *pdu, struct statfs *stbuf)
3414 {
3415     uint32_t f_type;
3416     uint32_t f_bsize;
3417     uint64_t f_blocks;
3418     uint64_t f_bfree;
3419     uint64_t f_bavail;
3420     uint64_t f_files;
3421     uint64_t f_ffree;
3422     uint64_t fsid_val;
3423     uint32_t f_namelen;
3424     size_t offset = 7;
3425     int32_t bsize_factor;
3426
3427     /*
3428      * compute bsize factor based on host file system block size
3429      * and client msize
3430      */
3431     bsize_factor = (s->msize - P9_IOHDRSZ)/stbuf->f_bsize;
3432     if (!bsize_factor) {
3433         bsize_factor = 1;
3434     }
3435     f_type  = stbuf->f_type;
3436     f_bsize = stbuf->f_bsize;
3437     f_bsize *= bsize_factor;
3438     /*
3439      * f_bsize is adjusted(multiplied) by bsize factor, so we need to
3440      * adjust(divide) the number of blocks, free blocks and available
3441      * blocks by bsize factor
3442      */
3443     f_blocks = stbuf->f_blocks/bsize_factor;
3444     f_bfree  = stbuf->f_bfree/bsize_factor;
3445     f_bavail = stbuf->f_bavail/bsize_factor;
3446     f_files  = stbuf->f_files;
3447     f_ffree  = stbuf->f_ffree;
3448     fsid_val = (unsigned int) stbuf->f_fsid.__val[0] |
3449                (unsigned long long)stbuf->f_fsid.__val[1] << 32;
3450     f_namelen = stbuf->f_namelen;
3451
3452     return pdu_marshal(pdu, offset, "ddqqqqqqd",
3453                        f_type, f_bsize, f_blocks, f_bfree,
3454                        f_bavail, f_files, f_ffree,
3455                        fsid_val, f_namelen);
3456 }
3457
3458 static void coroutine_fn v9fs_statfs(void *opaque)
3459 {
3460     int32_t fid;
3461     ssize_t retval = 0;
3462     size_t offset = 7;
3463     V9fsFidState *fidp;
3464     struct statfs stbuf;
3465     V9fsPDU *pdu = opaque;
3466     V9fsState *s = pdu->s;
3467
3468     retval = pdu_unmarshal(pdu, offset, "d", &fid);
3469     if (retval < 0) {
3470         goto out_nofid;
3471     }
3472     fidp = get_fid(pdu, fid);
3473     if (fidp == NULL) {
3474         retval = -ENOENT;
3475         goto out_nofid;
3476     }
3477     retval = v9fs_co_statfs(pdu, &fidp->path, &stbuf);
3478     if (retval < 0) {
3479         goto out;
3480     }
3481     retval = v9fs_fill_statfs(s, pdu, &stbuf);
3482     if (retval < 0) {
3483         goto out;
3484     }
3485     retval += offset;
3486 out:
3487     put_fid(pdu, fidp);
3488 out_nofid:
3489     pdu_complete(pdu, retval);
3490 }
3491
3492 static void coroutine_fn v9fs_mknod(void *opaque)
3493 {
3494
3495     int mode;
3496     gid_t gid;
3497     int32_t fid;
3498     V9fsQID qid;
3499     int err = 0;
3500     int major, minor;
3501     size_t offset = 7;
3502     V9fsString name;
3503     struct stat stbuf;
3504     V9fsFidState *fidp;
3505     V9fsPDU *pdu = opaque;
3506
3507     v9fs_string_init(&name);
3508     err = pdu_unmarshal(pdu, offset, "dsdddd", &fid, &name, &mode,
3509                         &major, &minor, &gid);
3510     if (err < 0) {
3511         goto out_nofid;
3512     }
3513     trace_v9fs_mknod(pdu->tag, pdu->id, fid, mode, major, minor);
3514
3515     if (name_is_illegal(name.data)) {
3516         err = -ENOENT;
3517         goto out_nofid;
3518     }
3519
3520     if (!strcmp(".", name.data) || !strcmp("..", name.data)) {
3521         err = -EEXIST;
3522         goto out_nofid;
3523     }
3524
3525     fidp = get_fid(pdu, fid);
3526     if (fidp == NULL) {
3527         err = -ENOENT;
3528         goto out_nofid;
3529     }
3530     err = v9fs_co_mknod(pdu, fidp, &name, fidp->uid, gid,
3531                         makedev(major, minor), mode, &stbuf);
3532     if (err < 0) {
3533         goto out;
3534     }
3535     err = stat_to_qid(pdu, &stbuf, &qid);
3536     if (err < 0) {
3537         goto out;
3538     }
3539     err = pdu_marshal(pdu, offset, "Q", &qid);
3540     if (err < 0) {
3541         goto out;
3542     }
3543     err += offset;
3544     trace_v9fs_mknod_return(pdu->tag, pdu->id,
3545                             qid.type, qid.version, qid.path);
3546 out:
3547     put_fid(pdu, fidp);
3548 out_nofid:
3549     pdu_complete(pdu, err);
3550     v9fs_string_free(&name);
3551 }
3552
3553 /*
3554  * Implement posix byte range locking code
3555  * Server side handling of locking code is very simple, because 9p server in
3556  * QEMU can handle only one client. And most of the lock handling
3557  * (like conflict, merging) etc is done by the VFS layer itself, so no need to
3558  * do any thing in * qemu 9p server side lock code path.
3559  * So when a TLOCK request comes, always return success
3560  */
3561 static void coroutine_fn v9fs_lock(void *opaque)
3562 {
3563     V9fsFlock flock;
3564     size_t offset = 7;
3565     struct stat stbuf;
3566     V9fsFidState *fidp;
3567     int32_t fid, err = 0;
3568     V9fsPDU *pdu = opaque;
3569
3570     v9fs_string_init(&flock.client_id);
3571     err = pdu_unmarshal(pdu, offset, "dbdqqds", &fid, &flock.type,
3572                         &flock.flags, &flock.start, &flock.length,
3573                         &flock.proc_id, &flock.client_id);
3574     if (err < 0) {
3575         goto out_nofid;
3576     }
3577     trace_v9fs_lock(pdu->tag, pdu->id, fid,
3578                     flock.type, flock.start, flock.length);
3579
3580
3581     /* We support only block flag now (that too ignored currently) */
3582     if (flock.flags & ~P9_LOCK_FLAGS_BLOCK) {
3583         err = -EINVAL;
3584         goto out_nofid;
3585     }
3586     fidp = get_fid(pdu, fid);
3587     if (fidp == NULL) {
3588         err = -ENOENT;
3589         goto out_nofid;
3590     }
3591     err = v9fs_co_fstat(pdu, fidp, &stbuf);
3592     if (err < 0) {
3593         goto out;
3594     }
3595     err = pdu_marshal(pdu, offset, "b", P9_LOCK_SUCCESS);
3596     if (err < 0) {
3597         goto out;
3598     }
3599     err += offset;
3600     trace_v9fs_lock_return(pdu->tag, pdu->id, P9_LOCK_SUCCESS);
3601 out:
3602     put_fid(pdu, fidp);
3603 out_nofid:
3604     pdu_complete(pdu, err);
3605     v9fs_string_free(&flock.client_id);
3606 }
3607
3608 /*
3609  * When a TGETLOCK request comes, always return success because all lock
3610  * handling is done by client's VFS layer.
3611  */
3612 static void coroutine_fn v9fs_getlock(void *opaque)
3613 {
3614     size_t offset = 7;
3615     struct stat stbuf;
3616     V9fsFidState *fidp;
3617     V9fsGetlock glock;
3618     int32_t fid, err = 0;
3619     V9fsPDU *pdu = opaque;
3620
3621     v9fs_string_init(&glock.client_id);
3622     err = pdu_unmarshal(pdu, offset, "dbqqds", &fid, &glock.type,
3623                         &glock.start, &glock.length, &glock.proc_id,
3624                         &glock.client_id);
3625     if (err < 0) {
3626         goto out_nofid;
3627     }
3628     trace_v9fs_getlock(pdu->tag, pdu->id, fid,
3629                        glock.type, glock.start, glock.length);
3630
3631     fidp = get_fid(pdu, fid);
3632     if (fidp == NULL) {
3633         err = -ENOENT;
3634         goto out_nofid;
3635     }
3636     err = v9fs_co_fstat(pdu, fidp, &stbuf);
3637     if (err < 0) {
3638         goto out;
3639     }
3640     glock.type = P9_LOCK_TYPE_UNLCK;
3641     err = pdu_marshal(pdu, offset, "bqqds", glock.type,
3642                           glock.start, glock.length, glock.proc_id,
3643                           &glock.client_id);
3644     if (err < 0) {
3645         goto out;
3646     }
3647     err += offset;
3648     trace_v9fs_getlock_return(pdu->tag, pdu->id, glock.type, glock.start,
3649                               glock.length, glock.proc_id);
3650 out:
3651     put_fid(pdu, fidp);
3652 out_nofid:
3653     pdu_complete(pdu, err);
3654     v9fs_string_free(&glock.client_id);
3655 }
3656
3657 static void coroutine_fn v9fs_mkdir(void *opaque)
3658 {
3659     V9fsPDU *pdu = opaque;
3660     size_t offset = 7;
3661     int32_t fid;
3662     struct stat stbuf;
3663     V9fsQID qid;
3664     V9fsString name;
3665     V9fsFidState *fidp;
3666     gid_t gid;
3667     int mode;
3668     int err = 0;
3669
3670     v9fs_string_init(&name);
3671     err = pdu_unmarshal(pdu, offset, "dsdd", &fid, &name, &mode, &gid);
3672     if (err < 0) {
3673         goto out_nofid;
3674     }
3675     trace_v9fs_mkdir(pdu->tag, pdu->id, fid, name.data, mode, gid);
3676
3677     if (name_is_illegal(name.data)) {
3678         err = -ENOENT;
3679         goto out_nofid;
3680     }
3681
3682     if (!strcmp(".", name.data) || !strcmp("..", name.data)) {
3683         err = -EEXIST;
3684         goto out_nofid;
3685     }
3686
3687     fidp = get_fid(pdu, fid);
3688     if (fidp == NULL) {
3689         err = -ENOENT;
3690         goto out_nofid;
3691     }
3692     err = v9fs_co_mkdir(pdu, fidp, &name, mode, fidp->uid, gid, &stbuf);
3693     if (err < 0) {
3694         goto out;
3695     }
3696     err = stat_to_qid(pdu, &stbuf, &qid);
3697     if (err < 0) {
3698         goto out;
3699     }
3700     err = pdu_marshal(pdu, offset, "Q", &qid);
3701     if (err < 0) {
3702         goto out;
3703     }
3704     err += offset;
3705     trace_v9fs_mkdir_return(pdu->tag, pdu->id,
3706                             qid.type, qid.version, qid.path, err);
3707 out:
3708     put_fid(pdu, fidp);
3709 out_nofid:
3710     pdu_complete(pdu, err);
3711     v9fs_string_free(&name);
3712 }
3713
3714 static void coroutine_fn v9fs_xattrwalk(void *opaque)
3715 {
3716     int64_t size;
3717     V9fsString name;
3718     ssize_t err = 0;
3719     size_t offset = 7;
3720     int32_t fid, newfid;
3721     V9fsFidState *file_fidp;
3722     V9fsFidState *xattr_fidp = NULL;
3723     V9fsPDU *pdu = opaque;
3724     V9fsState *s = pdu->s;
3725
3726     v9fs_string_init(&name);
3727     err = pdu_unmarshal(pdu, offset, "dds", &fid, &newfid, &name);
3728     if (err < 0) {
3729         goto out_nofid;
3730     }
3731     trace_v9fs_xattrwalk(pdu->tag, pdu->id, fid, newfid, name.data);
3732
3733     file_fidp = get_fid(pdu, fid);
3734     if (file_fidp == NULL) {
3735         err = -ENOENT;
3736         goto out_nofid;
3737     }
3738     xattr_fidp = alloc_fid(s, newfid);
3739     if (xattr_fidp == NULL) {
3740         err = -EINVAL;
3741         goto out;
3742     }
3743     v9fs_path_copy(&xattr_fidp->path, &file_fidp->path);
3744     if (!v9fs_string_size(&name)) {
3745         /*
3746          * listxattr request. Get the size first
3747          */
3748         size = v9fs_co_llistxattr(pdu, &xattr_fidp->path, NULL, 0);
3749         if (size < 0) {
3750             err = size;
3751             clunk_fid(s, xattr_fidp->fid);
3752             goto out;
3753         }
3754         /*
3755          * Read the xattr value
3756          */
3757         xattr_fidp->fs.xattr.len = size;
3758         xattr_fidp->fid_type = P9_FID_XATTR;
3759         xattr_fidp->fs.xattr.xattrwalk_fid = true;
3760         xattr_fidp->fs.xattr.value = g_malloc0(size);
3761         if (size) {
3762             err = v9fs_co_llistxattr(pdu, &xattr_fidp->path,
3763                                      xattr_fidp->fs.xattr.value,
3764                                      xattr_fidp->fs.xattr.len);
3765             if (err < 0) {
3766                 clunk_fid(s, xattr_fidp->fid);
3767                 goto out;
3768             }
3769         }
3770         err = pdu_marshal(pdu, offset, "q", size);
3771         if (err < 0) {
3772             goto out;
3773         }
3774         err += offset;
3775     } else {
3776         /*
3777          * specific xattr fid. We check for xattr
3778          * presence also collect the xattr size
3779          */
3780         size = v9fs_co_lgetxattr(pdu, &xattr_fidp->path,
3781                                  &name, NULL, 0);
3782         if (size < 0) {
3783             err = size;
3784             clunk_fid(s, xattr_fidp->fid);
3785             goto out;
3786         }
3787         /*
3788          * Read the xattr value
3789          */
3790         xattr_fidp->fs.xattr.len = size;
3791         xattr_fidp->fid_type = P9_FID_XATTR;
3792         xattr_fidp->fs.xattr.xattrwalk_fid = true;
3793         xattr_fidp->fs.xattr.value = g_malloc0(size);
3794         if (size) {
3795             err = v9fs_co_lgetxattr(pdu, &xattr_fidp->path,
3796                                     &name, xattr_fidp->fs.xattr.value,
3797                                     xattr_fidp->fs.xattr.len);
3798             if (err < 0) {
3799                 clunk_fid(s, xattr_fidp->fid);
3800                 goto out;
3801             }
3802         }
3803         err = pdu_marshal(pdu, offset, "q", size);
3804         if (err < 0) {
3805             goto out;
3806         }
3807         err += offset;
3808     }
3809     trace_v9fs_xattrwalk_return(pdu->tag, pdu->id, size);
3810 out:
3811     put_fid(pdu, file_fidp);
3812     if (xattr_fidp) {
3813         put_fid(pdu, xattr_fidp);
3814     }
3815 out_nofid:
3816     pdu_complete(pdu, err);
3817     v9fs_string_free(&name);
3818 }
3819
3820 static void coroutine_fn v9fs_xattrcreate(void *opaque)
3821 {
3822     int flags, rflags = 0;
3823     int32_t fid;
3824     uint64_t size;
3825     ssize_t err = 0;
3826     V9fsString name;
3827     size_t offset = 7;
3828     V9fsFidState *file_fidp;
3829     V9fsFidState *xattr_fidp;
3830     V9fsPDU *pdu = opaque;
3831
3832     v9fs_string_init(&name);
3833     err = pdu_unmarshal(pdu, offset, "dsqd", &fid, &name, &size, &flags);
3834     if (err < 0) {
3835         goto out_nofid;
3836     }
3837     trace_v9fs_xattrcreate(pdu->tag, pdu->id, fid, name.data, size, flags);
3838
3839     if (flags & ~(P9_XATTR_CREATE | P9_XATTR_REPLACE)) {
3840         err = -EINVAL;
3841         goto out_nofid;
3842     }
3843
3844     if (flags & P9_XATTR_CREATE) {
3845         rflags |= XATTR_CREATE;
3846     }
3847
3848     if (flags & P9_XATTR_REPLACE) {
3849         rflags |= XATTR_REPLACE;
3850     }
3851
3852     if (size > XATTR_SIZE_MAX) {
3853         err = -E2BIG;
3854         goto out_nofid;
3855     }
3856
3857     file_fidp = get_fid(pdu, fid);
3858     if (file_fidp == NULL) {
3859         err = -EINVAL;
3860         goto out_nofid;
3861     }
3862     if (file_fidp->fid_type != P9_FID_NONE) {
3863         err = -EINVAL;
3864         goto out_put_fid;
3865     }
3866
3867     /* Make the file fid point to xattr */
3868     xattr_fidp = file_fidp;
3869     xattr_fidp->fid_type = P9_FID_XATTR;
3870     xattr_fidp->fs.xattr.copied_len = 0;
3871     xattr_fidp->fs.xattr.xattrwalk_fid = false;
3872     xattr_fidp->fs.xattr.len = size;
3873     xattr_fidp->fs.xattr.flags = rflags;
3874     v9fs_string_init(&xattr_fidp->fs.xattr.name);
3875     v9fs_string_copy(&xattr_fidp->fs.xattr.name, &name);
3876     xattr_fidp->fs.xattr.value = g_malloc0(size);
3877     err = offset;
3878 out_put_fid:
3879     put_fid(pdu, file_fidp);
3880 out_nofid:
3881     pdu_complete(pdu, err);
3882     v9fs_string_free(&name);
3883 }
3884
3885 static void coroutine_fn v9fs_readlink(void *opaque)
3886 {
3887     V9fsPDU *pdu = opaque;
3888     size_t offset = 7;
3889     V9fsString target;
3890     int32_t fid;
3891     int err = 0;
3892     V9fsFidState *fidp;
3893
3894     err = pdu_unmarshal(pdu, offset, "d", &fid);
3895     if (err < 0) {
3896         goto out_nofid;
3897     }
3898     trace_v9fs_readlink(pdu->tag, pdu->id, fid);
3899     fidp = get_fid(pdu, fid);
3900     if (fidp == NULL) {
3901         err = -ENOENT;
3902         goto out_nofid;
3903     }
3904
3905     v9fs_string_init(&target);
3906     err = v9fs_co_readlink(pdu, &fidp->path, &target);
3907     if (err < 0) {
3908         goto out;
3909     }
3910     err = pdu_marshal(pdu, offset, "s", &target);
3911     if (err < 0) {
3912         v9fs_string_free(&target);
3913         goto out;
3914     }
3915     err += offset;
3916     trace_v9fs_readlink_return(pdu->tag, pdu->id, target.data);
3917     v9fs_string_free(&target);
3918 out:
3919     put_fid(pdu, fidp);
3920 out_nofid:
3921     pdu_complete(pdu, err);
3922 }
3923
3924 static CoroutineEntry *pdu_co_handlers[] = {
3925     [P9_TREADDIR] = v9fs_readdir,
3926     [P9_TSTATFS] = v9fs_statfs,
3927     [P9_TGETATTR] = v9fs_getattr,
3928     [P9_TSETATTR] = v9fs_setattr,
3929     [P9_TXATTRWALK] = v9fs_xattrwalk,
3930     [P9_TXATTRCREATE] = v9fs_xattrcreate,
3931     [P9_TMKNOD] = v9fs_mknod,
3932     [P9_TRENAME] = v9fs_rename,
3933     [P9_TLOCK] = v9fs_lock,
3934     [P9_TGETLOCK] = v9fs_getlock,
3935     [P9_TRENAMEAT] = v9fs_renameat,
3936     [P9_TREADLINK] = v9fs_readlink,
3937     [P9_TUNLINKAT] = v9fs_unlinkat,
3938     [P9_TMKDIR] = v9fs_mkdir,
3939     [P9_TVERSION] = v9fs_version,
3940     [P9_TLOPEN] = v9fs_open,
3941     [P9_TATTACH] = v9fs_attach,
3942     [P9_TSTAT] = v9fs_stat,
3943     [P9_TWALK] = v9fs_walk,
3944     [P9_TCLUNK] = v9fs_clunk,
3945     [P9_TFSYNC] = v9fs_fsync,
3946     [P9_TOPEN] = v9fs_open,
3947     [P9_TREAD] = v9fs_read,
3948 #if 0
3949     [P9_TAUTH] = v9fs_auth,
3950 #endif
3951     [P9_TFLUSH] = v9fs_flush,
3952     [P9_TLINK] = v9fs_link,
3953     [P9_TSYMLINK] = v9fs_symlink,
3954     [P9_TCREATE] = v9fs_create,
3955     [P9_TLCREATE] = v9fs_lcreate,
3956     [P9_TWRITE] = v9fs_write,
3957     [P9_TWSTAT] = v9fs_wstat,
3958     [P9_TREMOVE] = v9fs_remove,
3959 };
3960
3961 static void coroutine_fn v9fs_op_not_supp(void *opaque)
3962 {
3963     V9fsPDU *pdu = opaque;
3964     pdu_complete(pdu, -EOPNOTSUPP);
3965 }
3966
3967 static void coroutine_fn v9fs_fs_ro(void *opaque)
3968 {
3969     V9fsPDU *pdu = opaque;
3970     pdu_complete(pdu, -EROFS);
3971 }
3972
3973 static inline bool is_read_only_op(V9fsPDU *pdu)
3974 {
3975     switch (pdu->id) {
3976     case P9_TREADDIR:
3977     case P9_TSTATFS:
3978     case P9_TGETATTR:
3979     case P9_TXATTRWALK:
3980     case P9_TLOCK:
3981     case P9_TGETLOCK:
3982     case P9_TREADLINK:
3983     case P9_TVERSION:
3984     case P9_TLOPEN:
3985     case P9_TATTACH:
3986     case P9_TSTAT:
3987     case P9_TWALK:
3988     case P9_TCLUNK:
3989     case P9_TFSYNC:
3990     case P9_TOPEN:
3991     case P9_TREAD:
3992     case P9_TAUTH:
3993     case P9_TFLUSH:
3994         return 1;
3995     default:
3996         return 0;
3997     }
3998 }
3999
4000 void pdu_submit(V9fsPDU *pdu, P9MsgHeader *hdr)
4001 {
4002     Coroutine *co;
4003     CoroutineEntry *handler;
4004     V9fsState *s = pdu->s;
4005
4006     pdu->size = le32_to_cpu(hdr->size_le);
4007     pdu->id = hdr->id;
4008     pdu->tag = le16_to_cpu(hdr->tag_le);
4009
4010     if (pdu->id >= ARRAY_SIZE(pdu_co_handlers) ||
4011         (pdu_co_handlers[pdu->id] == NULL)) {
4012         handler = v9fs_op_not_supp;
4013     } else if (is_ro_export(&s->ctx) && !is_read_only_op(pdu)) {
4014         handler = v9fs_fs_ro;
4015     } else {
4016         handler = pdu_co_handlers[pdu->id];
4017     }
4018
4019     qemu_co_queue_init(&pdu->complete);
4020     co = qemu_coroutine_create(handler, pdu);
4021     qemu_coroutine_enter(co);
4022 }
4023
4024 /* Returns 0 on success, 1 on failure. */
4025 int v9fs_device_realize_common(V9fsState *s, const V9fsTransport *t,
4026                                Error **errp)
4027 {
4028     ERRP_GUARD();
4029     int i, len;
4030     struct stat stat;
4031     FsDriverEntry *fse;
4032     V9fsPath path;
4033     int rc = 1;
4034
4035     assert(!s->transport);
4036     s->transport = t;
4037
4038     /* initialize pdu allocator */
4039     QLIST_INIT(&s->free_list);
4040     QLIST_INIT(&s->active_list);
4041     for (i = 0; i < MAX_REQ; i++) {
4042         QLIST_INSERT_HEAD(&s->free_list, &s->pdus[i], next);
4043         s->pdus[i].s = s;
4044         s->pdus[i].idx = i;
4045     }
4046
4047     v9fs_path_init(&path);
4048
4049     fse = get_fsdev_fsentry(s->fsconf.fsdev_id);
4050
4051     if (!fse) {
4052         /* We don't have a fsdev identified by fsdev_id */
4053         error_setg(errp, "9pfs device couldn't find fsdev with the "
4054                    "id = %s",
4055                    s->fsconf.fsdev_id ? s->fsconf.fsdev_id : "NULL");
4056         goto out;
4057     }
4058
4059     if (!s->fsconf.tag) {
4060         /* we haven't specified a mount_tag */
4061         error_setg(errp, "fsdev with id %s needs mount_tag arguments",
4062                    s->fsconf.fsdev_id);
4063         goto out;
4064     }
4065
4066     s->ctx.export_flags = fse->export_flags;
4067     s->ctx.fs_root = g_strdup(fse->path);
4068     s->ctx.exops.get_st_gen = NULL;
4069     len = strlen(s->fsconf.tag);
4070     if (len > MAX_TAG_LEN - 1) {
4071         error_setg(errp, "mount tag '%s' (%d bytes) is longer than "
4072                    "maximum (%d bytes)", s->fsconf.tag, len, MAX_TAG_LEN - 1);
4073         goto out;
4074     }
4075
4076     s->tag = g_strdup(s->fsconf.tag);
4077     s->ctx.uid = -1;
4078
4079     s->ops = fse->ops;
4080
4081     s->ctx.fmode = fse->fmode;
4082     s->ctx.dmode = fse->dmode;
4083
4084     s->fid_list = NULL;
4085     qemu_co_rwlock_init(&s->rename_lock);
4086
4087     if (s->ops->init(&s->ctx, errp) < 0) {
4088         error_prepend(errp, "cannot initialize fsdev '%s': ",
4089                       s->fsconf.fsdev_id);
4090         goto out;
4091     }
4092
4093     /*
4094      * Check details of export path, We need to use fs driver
4095      * call back to do that. Since we are in the init path, we don't
4096      * use co-routines here.
4097      */
4098     if (s->ops->name_to_path(&s->ctx, NULL, "/", &path) < 0) {
4099         error_setg(errp,
4100                    "error in converting name to path %s", strerror(errno));
4101         goto out;
4102     }
4103     if (s->ops->lstat(&s->ctx, &path, &stat)) {
4104         error_setg(errp, "share path %s does not exist", fse->path);
4105         goto out;
4106     } else if (!S_ISDIR(stat.st_mode)) {
4107         error_setg(errp, "share path %s is not a directory", fse->path);
4108         goto out;
4109     }
4110
4111     s->dev_id = stat.st_dev;
4112
4113     /* init inode remapping : */
4114     /* hash table for variable length inode suffixes */
4115     qpd_table_init(&s->qpd_table);
4116     /* hash table for slow/full inode remapping (most users won't need it) */
4117     qpf_table_init(&s->qpf_table);
4118     /* hash table for quick inode remapping */
4119     qpp_table_init(&s->qpp_table);
4120     s->qp_ndevices = 0;
4121     s->qp_affix_next = 1; /* reserve 0 to detect overflow */
4122     s->qp_fullpath_next = 1;
4123
4124     s->ctx.fst = &fse->fst;
4125     fsdev_throttle_init(s->ctx.fst);
4126
4127     rc = 0;
4128 out:
4129     if (rc) {
4130         v9fs_device_unrealize_common(s);
4131     }
4132     v9fs_path_free(&path);
4133     return rc;
4134 }
4135
4136 void v9fs_device_unrealize_common(V9fsState *s)
4137 {
4138     if (s->ops && s->ops->cleanup) {
4139         s->ops->cleanup(&s->ctx);
4140     }
4141     if (s->ctx.fst) {
4142         fsdev_throttle_cleanup(s->ctx.fst);
4143     }
4144     g_free(s->tag);
4145     qp_table_destroy(&s->qpd_table);
4146     qp_table_destroy(&s->qpp_table);
4147     qp_table_destroy(&s->qpf_table);
4148     g_free(s->ctx.fs_root);
4149 }
4150
4151 typedef struct VirtfsCoResetData {
4152     V9fsPDU pdu;
4153     bool done;
4154 } VirtfsCoResetData;
4155
4156 static void coroutine_fn virtfs_co_reset(void *opaque)
4157 {
4158     VirtfsCoResetData *data = opaque;
4159
4160     virtfs_reset(&data->pdu);
4161     data->done = true;
4162 }
4163
4164 void v9fs_reset(V9fsState *s)
4165 {
4166     VirtfsCoResetData data = { .pdu = { .s = s }, .done = false };
4167     Coroutine *co;
4168
4169     while (!QLIST_EMPTY(&s->active_list)) {
4170         aio_poll(qemu_get_aio_context(), true);
4171     }
4172
4173     co = qemu_coroutine_create(virtfs_co_reset, &data);
4174     qemu_coroutine_enter(co);
4175
4176     while (!data.done) {
4177         aio_poll(qemu_get_aio_context(), true);
4178     }
4179 }
4180
4181 static void __attribute__((__constructor__)) v9fs_set_fd_limit(void)
4182 {
4183     struct rlimit rlim;
4184     if (getrlimit(RLIMIT_NOFILE, &rlim) < 0) {
4185         error_report("Failed to get the resource limit");
4186         exit(1);
4187     }
4188     open_fd_hw = rlim.rlim_cur - MIN(400, rlim.rlim_cur/3);
4189     open_fd_rc = rlim.rlim_cur/2;
4190 }