Statistics
| Branch: | Revision:

root / hw / virtio-9p.c @ cf03eb2c

History | View | Annotate | Download (89.6 kB)

1
/*
2
 * Virtio 9p backend
3
 *
4
 * Copyright IBM, Corp. 2010
5
 *
6
 * Authors:
7
 *  Anthony Liguori   <aliguori@us.ibm.com>
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 "virtio.h"
15
#include "pc.h"
16
#include "qemu_socket.h"
17
#include "virtio-9p.h"
18
#include "fsdev/qemu-fsdev.h"
19
#include "virtio-9p-debug.h"
20

    
21
int debug_9p_pdu;
22

    
23
enum {
24
    Oread   = 0x00,
25
    Owrite  = 0x01,
26
    Ordwr   = 0x02,
27
    Oexec   = 0x03,
28
    Oexcl   = 0x04,
29
    Otrunc  = 0x10,
30
    Orexec  = 0x20,
31
    Orclose = 0x40,
32
    Oappend = 0x80,
33
};
34

    
35
static int omode_to_uflags(int8_t mode)
36
{
37
    int ret = 0;
38

    
39
    switch (mode & 3) {
40
    case Oread:
41
        ret = O_RDONLY;
42
        break;
43
    case Ordwr:
44
        ret = O_RDWR;
45
        break;
46
    case Owrite:
47
        ret = O_WRONLY;
48
        break;
49
    case Oexec:
50
        ret = O_RDONLY;
51
        break;
52
    }
53

    
54
    if (mode & Otrunc) {
55
        ret |= O_TRUNC;
56
    }
57

    
58
    if (mode & Oappend) {
59
        ret |= O_APPEND;
60
    }
61

    
62
    if (mode & Oexcl) {
63
        ret |= O_EXCL;
64
    }
65

    
66
    return ret;
67
}
68

    
69
void cred_init(FsCred *credp)
70
{
71
    credp->fc_uid = -1;
72
    credp->fc_gid = -1;
73
    credp->fc_mode = -1;
74
    credp->fc_rdev = -1;
75
}
76

    
77
static int v9fs_do_lstat(V9fsState *s, V9fsString *path, struct stat *stbuf)
78
{
79
    return s->ops->lstat(&s->ctx, path->data, stbuf);
80
}
81

    
82
static ssize_t v9fs_do_readlink(V9fsState *s, V9fsString *path, V9fsString *buf)
83
{
84
    ssize_t len;
85

    
86
    buf->data = qemu_malloc(1024);
87

    
88
    len = s->ops->readlink(&s->ctx, path->data, buf->data, 1024 - 1);
89
    if (len > -1) {
90
        buf->size = len;
91
        buf->data[len] = 0;
92
    }
93

    
94
    return len;
95
}
96

    
97
static int v9fs_do_close(V9fsState *s, int fd)
98
{
99
    return s->ops->close(&s->ctx, fd);
100
}
101

    
102
static int v9fs_do_closedir(V9fsState *s, DIR *dir)
103
{
104
    return s->ops->closedir(&s->ctx, dir);
105
}
106

    
107
static int v9fs_do_open(V9fsState *s, V9fsString *path, int flags)
108
{
109
    return s->ops->open(&s->ctx, path->data, flags);
110
}
111

    
112
static DIR *v9fs_do_opendir(V9fsState *s, V9fsString *path)
113
{
114
    return s->ops->opendir(&s->ctx, path->data);
115
}
116

    
117
static void v9fs_do_rewinddir(V9fsState *s, DIR *dir)
118
{
119
    return s->ops->rewinddir(&s->ctx, dir);
120
}
121

    
122
static off_t v9fs_do_telldir(V9fsState *s, DIR *dir)
123
{
124
    return s->ops->telldir(&s->ctx, dir);
125
}
126

    
127
static struct dirent *v9fs_do_readdir(V9fsState *s, DIR *dir)
128
{
129
    return s->ops->readdir(&s->ctx, dir);
130
}
131

    
132
static void v9fs_do_seekdir(V9fsState *s, DIR *dir, off_t off)
133
{
134
    return s->ops->seekdir(&s->ctx, dir, off);
135
}
136

    
137
static int v9fs_do_readv(V9fsState *s, int fd, const struct iovec *iov,
138
                            int iovcnt)
139
{
140
    return s->ops->readv(&s->ctx, fd, iov, iovcnt);
141
}
142

    
143
static off_t v9fs_do_lseek(V9fsState *s, int fd, off_t offset, int whence)
144
{
145
    return s->ops->lseek(&s->ctx, fd, offset, whence);
146
}
147

    
148
static int v9fs_do_writev(V9fsState *s, int fd, const struct iovec *iov,
149
                       int iovcnt)
150
{
151
    return s->ops->writev(&s->ctx, fd, iov, iovcnt);
152
}
153

    
154
static int v9fs_do_chmod(V9fsState *s, V9fsString *path, mode_t mode)
155
{
156
    FsCred cred;
157
    cred_init(&cred);
158
    cred.fc_mode = mode;
159
    return s->ops->chmod(&s->ctx, path->data, &cred);
160
}
161

    
162
static int v9fs_do_mknod(V9fsState *s, char *name,
163
        mode_t mode, dev_t dev, uid_t uid, gid_t gid)
164
{
165
    FsCred cred;
166
    cred_init(&cred);
167
    cred.fc_uid = uid;
168
    cred.fc_gid = gid;
169
    cred.fc_mode = mode;
170
    cred.fc_rdev = dev;
171
    return s->ops->mknod(&s->ctx, name, &cred);
172
}
173

    
174
static int v9fs_do_mkdir(V9fsState *s, char *name, mode_t mode,
175
                uid_t uid, gid_t gid)
176
{
177
    FsCred cred;
178

    
179
    cred_init(&cred);
180
    cred.fc_uid = uid;
181
    cred.fc_gid = gid;
182
    cred.fc_mode = mode;
183

    
184
    return s->ops->mkdir(&s->ctx, name, &cred);
185
}
186

    
187
static int v9fs_do_fstat(V9fsState *s, int fd, struct stat *stbuf)
188
{
189
    return s->ops->fstat(&s->ctx, fd, stbuf);
190
}
191

    
192
static int v9fs_do_open2(V9fsState *s, char *fullname, uid_t uid, gid_t gid,
193
        int flags, int mode)
194
{
195
    FsCred cred;
196

    
197
    cred_init(&cred);
198
    cred.fc_uid = uid;
199
    cred.fc_gid = gid;
200
    cred.fc_mode = mode & 07777;
201
    flags = flags;
202

    
203
    return s->ops->open2(&s->ctx, fullname, flags, &cred);
204
}
205

    
206
static int v9fs_do_symlink(V9fsState *s, V9fsFidState *fidp,
207
        const char *oldpath, const char *newpath, gid_t gid)
208
{
209
    FsCred cred;
210
    cred_init(&cred);
211
    cred.fc_uid = fidp->uid;
212
    cred.fc_gid = gid;
213
    cred.fc_mode = 0777;
214

    
215
    return s->ops->symlink(&s->ctx, oldpath, newpath, &cred);
216
}
217

    
218
static int v9fs_do_link(V9fsState *s, V9fsString *oldpath, V9fsString *newpath)
219
{
220
    return s->ops->link(&s->ctx, oldpath->data, newpath->data);
221
}
222

    
223
static int v9fs_do_truncate(V9fsState *s, V9fsString *path, off_t size)
224
{
225
    return s->ops->truncate(&s->ctx, path->data, size);
226
}
227

    
228
static int v9fs_do_rename(V9fsState *s, V9fsString *oldpath,
229
                            V9fsString *newpath)
230
{
231
    return s->ops->rename(&s->ctx, oldpath->data, newpath->data);
232
}
233

    
234
static int v9fs_do_chown(V9fsState *s, V9fsString *path, uid_t uid, gid_t gid)
235
{
236
    FsCred cred;
237
    cred_init(&cred);
238
    cred.fc_uid = uid;
239
    cred.fc_gid = gid;
240

    
241
    return s->ops->chown(&s->ctx, path->data, &cred);
242
}
243

    
244
static int v9fs_do_utimensat(V9fsState *s, V9fsString *path,
245
                                           const struct timespec times[2])
246
{
247
    return s->ops->utimensat(&s->ctx, path->data, times);
248
}
249

    
250
static int v9fs_do_remove(V9fsState *s, V9fsString *path)
251
{
252
    return s->ops->remove(&s->ctx, path->data);
253
}
254

    
255
static int v9fs_do_fsync(V9fsState *s, int fd)
256
{
257
    return s->ops->fsync(&s->ctx, fd);
258
}
259

    
260
static int v9fs_do_statfs(V9fsState *s, V9fsString *path, struct statfs *stbuf)
261
{
262
    return s->ops->statfs(&s->ctx, path->data, stbuf);
263
}
264

    
265
static ssize_t v9fs_do_lgetxattr(V9fsState *s, V9fsString *path,
266
                             V9fsString *xattr_name,
267
                             void *value, size_t size)
268
{
269
    return s->ops->lgetxattr(&s->ctx, path->data,
270
                             xattr_name->data, value, size);
271
}
272

    
273
static ssize_t v9fs_do_llistxattr(V9fsState *s, V9fsString *path,
274
                              void *value, size_t size)
275
{
276
    return s->ops->llistxattr(&s->ctx, path->data,
277
                              value, size);
278
}
279

    
280
static int v9fs_do_lsetxattr(V9fsState *s, V9fsString *path,
281
                             V9fsString *xattr_name,
282
                             void *value, size_t size, int flags)
283
{
284
    return s->ops->lsetxattr(&s->ctx, path->data,
285
                             xattr_name->data, value, size, flags);
286
}
287

    
288
static int v9fs_do_lremovexattr(V9fsState *s, V9fsString *path,
289
                                V9fsString *xattr_name)
290
{
291
    return s->ops->lremovexattr(&s->ctx, path->data,
292
                                xattr_name->data);
293
}
294

    
295

    
296
static void v9fs_string_init(V9fsString *str)
297
{
298
    str->data = NULL;
299
    str->size = 0;
300
}
301

    
302
static void v9fs_string_free(V9fsString *str)
303
{
304
    qemu_free(str->data);
305
    str->data = NULL;
306
    str->size = 0;
307
}
308

    
309
static void v9fs_string_null(V9fsString *str)
310
{
311
    v9fs_string_free(str);
312
}
313

    
314
static int number_to_string(void *arg, char type)
315
{
316
    unsigned int ret = 0;
317

    
318
    switch (type) {
319
    case 'u': {
320
        unsigned int num = *(unsigned int *)arg;
321

    
322
        do {
323
            ret++;
324
            num = num/10;
325
        } while (num);
326
        break;
327
    }
328
    default:
329
        printf("Number_to_string: Unknown number format\n");
330
        return -1;
331
    }
332

    
333
    return ret;
334
}
335

    
336
static int v9fs_string_alloc_printf(char **strp, const char *fmt, va_list ap)
337
{
338
    va_list ap2;
339
    char *iter = (char *)fmt;
340
    int len = 0;
341
    int nr_args = 0;
342
    char *arg_char_ptr;
343
    unsigned int arg_uint;
344

    
345
    /* Find the number of %'s that denotes an argument */
346
    for (iter = strstr(iter, "%"); iter; iter = strstr(iter, "%")) {
347
        nr_args++;
348
        iter++;
349
    }
350

    
351
    len = strlen(fmt) - 2*nr_args;
352

    
353
    if (!nr_args) {
354
        goto alloc_print;
355
    }
356

    
357
    va_copy(ap2, ap);
358

    
359
    iter = (char *)fmt;
360

    
361
    /* Now parse the format string */
362
    for (iter = strstr(iter, "%"); iter; iter = strstr(iter, "%")) {
363
        iter++;
364
        switch (*iter) {
365
        case 'u':
366
            arg_uint = va_arg(ap2, unsigned int);
367
            len += number_to_string((void *)&arg_uint, 'u');
368
            break;
369
        case 's':
370
            arg_char_ptr = va_arg(ap2, char *);
371
            len += strlen(arg_char_ptr);
372
            break;
373
        case 'c':
374
            len += 1;
375
            break;
376
        default:
377
            fprintf(stderr,
378
                    "v9fs_string_alloc_printf:Incorrect format %c", *iter);
379
            return -1;
380
        }
381
        iter++;
382
    }
383

    
384
alloc_print:
385
    *strp = qemu_malloc((len + 1) * sizeof(**strp));
386

    
387
    return vsprintf(*strp, fmt, ap);
388
}
389

    
390
static void v9fs_string_sprintf(V9fsString *str, const char *fmt, ...)
391
{
392
    va_list ap;
393
    int err;
394

    
395
    v9fs_string_free(str);
396

    
397
    va_start(ap, fmt);
398
    err = v9fs_string_alloc_printf(&str->data, fmt, ap);
399
    BUG_ON(err == -1);
400
    va_end(ap);
401

    
402
    str->size = err;
403
}
404

    
405
static void v9fs_string_copy(V9fsString *lhs, V9fsString *rhs)
406
{
407
    v9fs_string_free(lhs);
408
    v9fs_string_sprintf(lhs, "%s", rhs->data);
409
}
410

    
411
static size_t v9fs_string_size(V9fsString *str)
412
{
413
    return str->size;
414
}
415

    
416
static V9fsFidState *lookup_fid(V9fsState *s, int32_t fid)
417
{
418
    V9fsFidState *f;
419

    
420
    for (f = s->fid_list; f; f = f->next) {
421
        if (f->fid == fid) {
422
            return f;
423
        }
424
    }
425

    
426
    return NULL;
427
}
428

    
429
static V9fsFidState *alloc_fid(V9fsState *s, int32_t fid)
430
{
431
    V9fsFidState *f;
432

    
433
    f = lookup_fid(s, fid);
434
    if (f) {
435
        return NULL;
436
    }
437

    
438
    f = qemu_mallocz(sizeof(V9fsFidState));
439

    
440
    f->fid = fid;
441
    f->fid_type = P9_FID_NONE;
442

    
443
    f->next = s->fid_list;
444
    s->fid_list = f;
445

    
446
    return f;
447
}
448

    
449
static int v9fs_xattr_fid_clunk(V9fsState *s, V9fsFidState *fidp)
450
{
451
    int retval = 0;
452

    
453
    if (fidp->fs.xattr.copied_len == -1) {
454
        /* getxattr/listxattr fid */
455
        goto free_value;
456
    }
457
    /*
458
     * if this is fid for setxattr. clunk should
459
     * result in setxattr localcall
460
     */
461
    if (fidp->fs.xattr.len != fidp->fs.xattr.copied_len) {
462
        /* clunk after partial write */
463
        retval = -EINVAL;
464
        goto free_out;
465
    }
466
    if (fidp->fs.xattr.len) {
467
        retval = v9fs_do_lsetxattr(s, &fidp->path, &fidp->fs.xattr.name,
468
                                   fidp->fs.xattr.value,
469
                                   fidp->fs.xattr.len,
470
                                   fidp->fs.xattr.flags);
471
    } else {
472
        retval = v9fs_do_lremovexattr(s, &fidp->path, &fidp->fs.xattr.name);
473
    }
474
free_out:
475
    v9fs_string_free(&fidp->fs.xattr.name);
476
free_value:
477
    if (fidp->fs.xattr.value) {
478
        qemu_free(fidp->fs.xattr.value);
479
    }
480
    return retval;
481
}
482

    
483
static int free_fid(V9fsState *s, int32_t fid)
484
{
485
    int retval = 0;
486
    V9fsFidState **fidpp, *fidp;
487

    
488
    for (fidpp = &s->fid_list; *fidpp; fidpp = &(*fidpp)->next) {
489
        if ((*fidpp)->fid == fid) {
490
            break;
491
        }
492
    }
493

    
494
    if (*fidpp == NULL) {
495
        return -ENOENT;
496
    }
497

    
498
    fidp = *fidpp;
499
    *fidpp = fidp->next;
500

    
501
    if (fidp->fid_type == P9_FID_FILE) {
502
        v9fs_do_close(s, fidp->fs.fd);
503
    } else if (fidp->fid_type == P9_FID_DIR) {
504
        v9fs_do_closedir(s, fidp->fs.dir);
505
    } else if (fidp->fid_type == P9_FID_XATTR) {
506
        retval = v9fs_xattr_fid_clunk(s, fidp);
507
    }
508
    v9fs_string_free(&fidp->path);
509
    qemu_free(fidp);
510

    
511
    return retval;
512
}
513

    
514
#define P9_QID_TYPE_DIR         0x80
515
#define P9_QID_TYPE_SYMLINK     0x02
516

    
517
#define P9_STAT_MODE_DIR        0x80000000
518
#define P9_STAT_MODE_APPEND     0x40000000
519
#define P9_STAT_MODE_EXCL       0x20000000
520
#define P9_STAT_MODE_MOUNT      0x10000000
521
#define P9_STAT_MODE_AUTH       0x08000000
522
#define P9_STAT_MODE_TMP        0x04000000
523
#define P9_STAT_MODE_SYMLINK    0x02000000
524
#define P9_STAT_MODE_LINK       0x01000000
525
#define P9_STAT_MODE_DEVICE     0x00800000
526
#define P9_STAT_MODE_NAMED_PIPE 0x00200000
527
#define P9_STAT_MODE_SOCKET     0x00100000
528
#define P9_STAT_MODE_SETUID     0x00080000
529
#define P9_STAT_MODE_SETGID     0x00040000
530
#define P9_STAT_MODE_SETVTX     0x00010000
531

    
532
#define P9_STAT_MODE_TYPE_BITS (P9_STAT_MODE_DIR |          \
533
                                P9_STAT_MODE_SYMLINK |      \
534
                                P9_STAT_MODE_LINK |         \
535
                                P9_STAT_MODE_DEVICE |       \
536
                                P9_STAT_MODE_NAMED_PIPE |   \
537
                                P9_STAT_MODE_SOCKET)
538

    
539
/* This is the algorithm from ufs in spfs */
540
static void stat_to_qid(const struct stat *stbuf, V9fsQID *qidp)
541
{
542
    size_t size;
543

    
544
    size = MIN(sizeof(stbuf->st_ino), sizeof(qidp->path));
545
    memcpy(&qidp->path, &stbuf->st_ino, size);
546
    qidp->version = stbuf->st_mtime ^ (stbuf->st_size << 8);
547
    qidp->type = 0;
548
    if (S_ISDIR(stbuf->st_mode)) {
549
        qidp->type |= P9_QID_TYPE_DIR;
550
    }
551
    if (S_ISLNK(stbuf->st_mode)) {
552
        qidp->type |= P9_QID_TYPE_SYMLINK;
553
    }
554
}
555

    
556
static int fid_to_qid(V9fsState *s, V9fsFidState *fidp, V9fsQID *qidp)
557
{
558
    struct stat stbuf;
559
    int err;
560

    
561
    err = v9fs_do_lstat(s, &fidp->path, &stbuf);
562
    if (err) {
563
        return err;
564
    }
565

    
566
    stat_to_qid(&stbuf, qidp);
567
    return 0;
568
}
569

    
570
static V9fsPDU *alloc_pdu(V9fsState *s)
571
{
572
    V9fsPDU *pdu = NULL;
573

    
574
    if (!QLIST_EMPTY(&s->free_list)) {
575
        pdu = QLIST_FIRST(&s->free_list);
576
        QLIST_REMOVE(pdu, next);
577
    }
578
    return pdu;
579
}
580

    
581
static void free_pdu(V9fsState *s, V9fsPDU *pdu)
582
{
583
    if (pdu) {
584
        QLIST_INSERT_HEAD(&s->free_list, pdu, next);
585
    }
586
}
587

    
588
size_t pdu_packunpack(void *addr, struct iovec *sg, int sg_count,
589
                        size_t offset, size_t size, int pack)
590
{
591
    int i = 0;
592
    size_t copied = 0;
593

    
594
    for (i = 0; size && i < sg_count; i++) {
595
        size_t len;
596
        if (offset >= sg[i].iov_len) {
597
            /* skip this sg */
598
            offset -= sg[i].iov_len;
599
            continue;
600
        } else {
601
            len = MIN(sg[i].iov_len - offset, size);
602
            if (pack) {
603
                memcpy(sg[i].iov_base + offset, addr, len);
604
            } else {
605
                memcpy(addr, sg[i].iov_base + offset, len);
606
            }
607
            size -= len;
608
            copied += len;
609
            addr += len;
610
            if (size) {
611
                offset = 0;
612
                continue;
613
            }
614
        }
615
    }
616

    
617
    return copied;
618
}
619

    
620
static size_t pdu_unpack(void *dst, V9fsPDU *pdu, size_t offset, size_t size)
621
{
622
    return pdu_packunpack(dst, pdu->elem.out_sg, pdu->elem.out_num,
623
                         offset, size, 0);
624
}
625

    
626
static size_t pdu_pack(V9fsPDU *pdu, size_t offset, const void *src,
627
                        size_t size)
628
{
629
    return pdu_packunpack((void *)src, pdu->elem.in_sg, pdu->elem.in_num,
630
                             offset, size, 1);
631
}
632

    
633
static int pdu_copy_sg(V9fsPDU *pdu, size_t offset, int rx, struct iovec *sg)
634
{
635
    size_t pos = 0;
636
    int i, j;
637
    struct iovec *src_sg;
638
    unsigned int num;
639

    
640
    if (rx) {
641
        src_sg = pdu->elem.in_sg;
642
        num = pdu->elem.in_num;
643
    } else {
644
        src_sg = pdu->elem.out_sg;
645
        num = pdu->elem.out_num;
646
    }
647

    
648
    j = 0;
649
    for (i = 0; i < num; i++) {
650
        if (offset <= pos) {
651
            sg[j].iov_base = src_sg[i].iov_base;
652
            sg[j].iov_len = src_sg[i].iov_len;
653
            j++;
654
        } else if (offset < (src_sg[i].iov_len + pos)) {
655
            sg[j].iov_base = src_sg[i].iov_base;
656
            sg[j].iov_len = src_sg[i].iov_len;
657
            sg[j].iov_base += (offset - pos);
658
            sg[j].iov_len -= (offset - pos);
659
            j++;
660
        }
661
        pos += src_sg[i].iov_len;
662
    }
663

    
664
    return j;
665
}
666

    
667
static size_t pdu_unmarshal(V9fsPDU *pdu, size_t offset, const char *fmt, ...)
668
{
669
    size_t old_offset = offset;
670
    va_list ap;
671
    int i;
672

    
673
    va_start(ap, fmt);
674
    for (i = 0; fmt[i]; i++) {
675
        switch (fmt[i]) {
676
        case 'b': {
677
            uint8_t *valp = va_arg(ap, uint8_t *);
678
            offset += pdu_unpack(valp, pdu, offset, sizeof(*valp));
679
            break;
680
        }
681
        case 'w': {
682
            uint16_t val, *valp;
683
            valp = va_arg(ap, uint16_t *);
684
            val = le16_to_cpupu(valp);
685
            offset += pdu_unpack(&val, pdu, offset, sizeof(val));
686
            *valp = val;
687
            break;
688
        }
689
        case 'd': {
690
            uint32_t val, *valp;
691
            valp = va_arg(ap, uint32_t *);
692
            val = le32_to_cpupu(valp);
693
            offset += pdu_unpack(&val, pdu, offset, sizeof(val));
694
            *valp = val;
695
            break;
696
        }
697
        case 'q': {
698
            uint64_t val, *valp;
699
            valp = va_arg(ap, uint64_t *);
700
            val = le64_to_cpup(valp);
701
            offset += pdu_unpack(&val, pdu, offset, sizeof(val));
702
            *valp = val;
703
            break;
704
        }
705
        case 'v': {
706
            struct iovec *iov = va_arg(ap, struct iovec *);
707
            int *iovcnt = va_arg(ap, int *);
708
            *iovcnt = pdu_copy_sg(pdu, offset, 0, iov);
709
            break;
710
        }
711
        case 's': {
712
            V9fsString *str = va_arg(ap, V9fsString *);
713
            offset += pdu_unmarshal(pdu, offset, "w", &str->size);
714
            /* FIXME: sanity check str->size */
715
            str->data = qemu_malloc(str->size + 1);
716
            offset += pdu_unpack(str->data, pdu, offset, str->size);
717
            str->data[str->size] = 0;
718
            break;
719
        }
720
        case 'Q': {
721
            V9fsQID *qidp = va_arg(ap, V9fsQID *);
722
            offset += pdu_unmarshal(pdu, offset, "bdq",
723
                        &qidp->type, &qidp->version, &qidp->path);
724
            break;
725
        }
726
        case 'S': {
727
            V9fsStat *statp = va_arg(ap, V9fsStat *);
728
            offset += pdu_unmarshal(pdu, offset, "wwdQdddqsssssddd",
729
                        &statp->size, &statp->type, &statp->dev,
730
                        &statp->qid, &statp->mode, &statp->atime,
731
                        &statp->mtime, &statp->length,
732
                        &statp->name, &statp->uid, &statp->gid,
733
                        &statp->muid, &statp->extension,
734
                        &statp->n_uid, &statp->n_gid,
735
                        &statp->n_muid);
736
            break;
737
        }
738
        case 'I': {
739
            V9fsIattr *iattr = va_arg(ap, V9fsIattr *);
740
            offset += pdu_unmarshal(pdu, offset, "ddddqqqqq",
741
                        &iattr->valid, &iattr->mode,
742
                        &iattr->uid, &iattr->gid, &iattr->size,
743
                        &iattr->atime_sec, &iattr->atime_nsec,
744
                        &iattr->mtime_sec, &iattr->mtime_nsec);
745
            break;
746
        }
747
        default:
748
            break;
749
        }
750
    }
751

    
752
    va_end(ap);
753

    
754
    return offset - old_offset;
755
}
756

    
757
static size_t pdu_marshal(V9fsPDU *pdu, size_t offset, const char *fmt, ...)
758
{
759
    size_t old_offset = offset;
760
    va_list ap;
761
    int i;
762

    
763
    va_start(ap, fmt);
764
    for (i = 0; fmt[i]; i++) {
765
        switch (fmt[i]) {
766
        case 'b': {
767
            uint8_t val = va_arg(ap, int);
768
            offset += pdu_pack(pdu, offset, &val, sizeof(val));
769
            break;
770
        }
771
        case 'w': {
772
            uint16_t val;
773
            cpu_to_le16w(&val, va_arg(ap, int));
774
            offset += pdu_pack(pdu, offset, &val, sizeof(val));
775
            break;
776
        }
777
        case 'd': {
778
            uint32_t val;
779
            cpu_to_le32w(&val, va_arg(ap, uint32_t));
780
            offset += pdu_pack(pdu, offset, &val, sizeof(val));
781
            break;
782
        }
783
        case 'q': {
784
            uint64_t val;
785
            cpu_to_le64w(&val, va_arg(ap, uint64_t));
786
            offset += pdu_pack(pdu, offset, &val, sizeof(val));
787
            break;
788
        }
789
        case 'v': {
790
            struct iovec *iov = va_arg(ap, struct iovec *);
791
            int *iovcnt = va_arg(ap, int *);
792
            *iovcnt = pdu_copy_sg(pdu, offset, 1, iov);
793
            break;
794
        }
795
        case 's': {
796
            V9fsString *str = va_arg(ap, V9fsString *);
797
            offset += pdu_marshal(pdu, offset, "w", str->size);
798
            offset += pdu_pack(pdu, offset, str->data, str->size);
799
            break;
800
        }
801
        case 'Q': {
802
            V9fsQID *qidp = va_arg(ap, V9fsQID *);
803
            offset += pdu_marshal(pdu, offset, "bdq",
804
                        qidp->type, qidp->version, qidp->path);
805
            break;
806
        }
807
        case 'S': {
808
            V9fsStat *statp = va_arg(ap, V9fsStat *);
809
            offset += pdu_marshal(pdu, offset, "wwdQdddqsssssddd",
810
                        statp->size, statp->type, statp->dev,
811
                        &statp->qid, statp->mode, statp->atime,
812
                        statp->mtime, statp->length, &statp->name,
813
                        &statp->uid, &statp->gid, &statp->muid,
814
                        &statp->extension, statp->n_uid,
815
                        statp->n_gid, statp->n_muid);
816
            break;
817
        }
818
        case 'A': {
819
            V9fsStatDotl *statp = va_arg(ap, V9fsStatDotl *);
820
            offset += pdu_marshal(pdu, offset, "qQdddqqqqqqqqqqqqqqq",
821
                        statp->st_result_mask,
822
                        &statp->qid, statp->st_mode,
823
                        statp->st_uid, statp->st_gid,
824
                        statp->st_nlink, statp->st_rdev,
825
                        statp->st_size, statp->st_blksize, statp->st_blocks,
826
                        statp->st_atime_sec, statp->st_atime_nsec,
827
                        statp->st_mtime_sec, statp->st_mtime_nsec,
828
                        statp->st_ctime_sec, statp->st_ctime_nsec,
829
                        statp->st_btime_sec, statp->st_btime_nsec,
830
                        statp->st_gen, statp->st_data_version);
831
            break;
832
        }
833
        default:
834
            break;
835
        }
836
    }
837
    va_end(ap);
838

    
839
    return offset - old_offset;
840
}
841

    
842
static void complete_pdu(V9fsState *s, V9fsPDU *pdu, ssize_t len)
843
{
844
    int8_t id = pdu->id + 1; /* Response */
845

    
846
    if (len < 0) {
847
        V9fsString str;
848
        int err = -len;
849

    
850
        str.data = strerror(err);
851
        str.size = strlen(str.data);
852

    
853
        len = 7;
854
        len += pdu_marshal(pdu, len, "s", &str);
855
        len += pdu_marshal(pdu, len, "d", err);
856

    
857
        id = P9_RERROR;
858
    }
859

    
860
    /* fill out the header */
861
    pdu_marshal(pdu, 0, "dbw", (int32_t)len, id, pdu->tag);
862

    
863
    /* keep these in sync */
864
    pdu->size = len;
865
    pdu->id = id;
866

    
867
    /* push onto queue and notify */
868
    virtqueue_push(s->vq, &pdu->elem, len);
869

    
870
    /* FIXME: we should batch these completions */
871
    virtio_notify(&s->vdev, s->vq);
872

    
873
    free_pdu(s, pdu);
874
}
875

    
876
static mode_t v9mode_to_mode(uint32_t mode, V9fsString *extension)
877
{
878
    mode_t ret;
879

    
880
    ret = mode & 0777;
881
    if (mode & P9_STAT_MODE_DIR) {
882
        ret |= S_IFDIR;
883
    }
884

    
885
    if (mode & P9_STAT_MODE_SYMLINK) {
886
        ret |= S_IFLNK;
887
    }
888
    if (mode & P9_STAT_MODE_SOCKET) {
889
        ret |= S_IFSOCK;
890
    }
891
    if (mode & P9_STAT_MODE_NAMED_PIPE) {
892
        ret |= S_IFIFO;
893
    }
894
    if (mode & P9_STAT_MODE_DEVICE) {
895
        if (extension && extension->data[0] == 'c') {
896
            ret |= S_IFCHR;
897
        } else {
898
            ret |= S_IFBLK;
899
        }
900
    }
901

    
902
    if (!(ret&~0777)) {
903
        ret |= S_IFREG;
904
    }
905

    
906
    if (mode & P9_STAT_MODE_SETUID) {
907
        ret |= S_ISUID;
908
    }
909
    if (mode & P9_STAT_MODE_SETGID) {
910
        ret |= S_ISGID;
911
    }
912
    if (mode & P9_STAT_MODE_SETVTX) {
913
        ret |= S_ISVTX;
914
    }
915

    
916
    return ret;
917
}
918

    
919
static int donttouch_stat(V9fsStat *stat)
920
{
921
    if (stat->type == -1 &&
922
        stat->dev == -1 &&
923
        stat->qid.type == -1 &&
924
        stat->qid.version == -1 &&
925
        stat->qid.path == -1 &&
926
        stat->mode == -1 &&
927
        stat->atime == -1 &&
928
        stat->mtime == -1 &&
929
        stat->length == -1 &&
930
        !stat->name.size &&
931
        !stat->uid.size &&
932
        !stat->gid.size &&
933
        !stat->muid.size &&
934
        stat->n_uid == -1 &&
935
        stat->n_gid == -1 &&
936
        stat->n_muid == -1) {
937
        return 1;
938
    }
939

    
940
    return 0;
941
}
942

    
943
static void v9fs_stat_free(V9fsStat *stat)
944
{
945
    v9fs_string_free(&stat->name);
946
    v9fs_string_free(&stat->uid);
947
    v9fs_string_free(&stat->gid);
948
    v9fs_string_free(&stat->muid);
949
    v9fs_string_free(&stat->extension);
950
}
951

    
952
static uint32_t stat_to_v9mode(const struct stat *stbuf)
953
{
954
    uint32_t mode;
955

    
956
    mode = stbuf->st_mode & 0777;
957
    if (S_ISDIR(stbuf->st_mode)) {
958
        mode |= P9_STAT_MODE_DIR;
959
    }
960

    
961
    if (S_ISLNK(stbuf->st_mode)) {
962
        mode |= P9_STAT_MODE_SYMLINK;
963
    }
964

    
965
    if (S_ISSOCK(stbuf->st_mode)) {
966
        mode |= P9_STAT_MODE_SOCKET;
967
    }
968

    
969
    if (S_ISFIFO(stbuf->st_mode)) {
970
        mode |= P9_STAT_MODE_NAMED_PIPE;
971
    }
972

    
973
    if (S_ISBLK(stbuf->st_mode) || S_ISCHR(stbuf->st_mode)) {
974
        mode |= P9_STAT_MODE_DEVICE;
975
    }
976

    
977
    if (stbuf->st_mode & S_ISUID) {
978
        mode |= P9_STAT_MODE_SETUID;
979
    }
980

    
981
    if (stbuf->st_mode & S_ISGID) {
982
        mode |= P9_STAT_MODE_SETGID;
983
    }
984

    
985
    if (stbuf->st_mode & S_ISVTX) {
986
        mode |= P9_STAT_MODE_SETVTX;
987
    }
988

    
989
    return mode;
990
}
991

    
992
static int stat_to_v9stat(V9fsState *s, V9fsString *name,
993
                            const struct stat *stbuf,
994
                            V9fsStat *v9stat)
995
{
996
    int err;
997
    const char *str;
998

    
999
    memset(v9stat, 0, sizeof(*v9stat));
1000

    
1001
    stat_to_qid(stbuf, &v9stat->qid);
1002
    v9stat->mode = stat_to_v9mode(stbuf);
1003
    v9stat->atime = stbuf->st_atime;
1004
    v9stat->mtime = stbuf->st_mtime;
1005
    v9stat->length = stbuf->st_size;
1006

    
1007
    v9fs_string_null(&v9stat->uid);
1008
    v9fs_string_null(&v9stat->gid);
1009
    v9fs_string_null(&v9stat->muid);
1010

    
1011
    v9stat->n_uid = stbuf->st_uid;
1012
    v9stat->n_gid = stbuf->st_gid;
1013
    v9stat->n_muid = 0;
1014

    
1015
    v9fs_string_null(&v9stat->extension);
1016

    
1017
    if (v9stat->mode & P9_STAT_MODE_SYMLINK) {
1018
        err = v9fs_do_readlink(s, name, &v9stat->extension);
1019
        if (err == -1) {
1020
            err = -errno;
1021
            return err;
1022
        }
1023
        v9stat->extension.data[err] = 0;
1024
        v9stat->extension.size = err;
1025
    } else if (v9stat->mode & P9_STAT_MODE_DEVICE) {
1026
        v9fs_string_sprintf(&v9stat->extension, "%c %u %u",
1027
                S_ISCHR(stbuf->st_mode) ? 'c' : 'b',
1028
                major(stbuf->st_rdev), minor(stbuf->st_rdev));
1029
    } else if (S_ISDIR(stbuf->st_mode) || S_ISREG(stbuf->st_mode)) {
1030
        v9fs_string_sprintf(&v9stat->extension, "%s %u",
1031
                "HARDLINKCOUNT", stbuf->st_nlink);
1032
    }
1033

    
1034
    str = strrchr(name->data, '/');
1035
    if (str) {
1036
        str += 1;
1037
    } else {
1038
        str = name->data;
1039
    }
1040

    
1041
    v9fs_string_sprintf(&v9stat->name, "%s", str);
1042

    
1043
    v9stat->size = 61 +
1044
        v9fs_string_size(&v9stat->name) +
1045
        v9fs_string_size(&v9stat->uid) +
1046
        v9fs_string_size(&v9stat->gid) +
1047
        v9fs_string_size(&v9stat->muid) +
1048
        v9fs_string_size(&v9stat->extension);
1049
    return 0;
1050
}
1051

    
1052
#define P9_STATS_MODE          0x00000001ULL
1053
#define P9_STATS_NLINK         0x00000002ULL
1054
#define P9_STATS_UID           0x00000004ULL
1055
#define P9_STATS_GID           0x00000008ULL
1056
#define P9_STATS_RDEV          0x00000010ULL
1057
#define P9_STATS_ATIME         0x00000020ULL
1058
#define P9_STATS_MTIME         0x00000040ULL
1059
#define P9_STATS_CTIME         0x00000080ULL
1060
#define P9_STATS_INO           0x00000100ULL
1061
#define P9_STATS_SIZE          0x00000200ULL
1062
#define P9_STATS_BLOCKS        0x00000400ULL
1063

    
1064
#define P9_STATS_BTIME         0x00000800ULL
1065
#define P9_STATS_GEN           0x00001000ULL
1066
#define P9_STATS_DATA_VERSION  0x00002000ULL
1067

    
1068
#define P9_STATS_BASIC         0x000007ffULL /* Mask for fields up to BLOCKS */
1069
#define P9_STATS_ALL           0x00003fffULL /* Mask for All fields above */
1070

    
1071

    
1072
static void stat_to_v9stat_dotl(V9fsState *s, const struct stat *stbuf,
1073
                            V9fsStatDotl *v9lstat)
1074
{
1075
    memset(v9lstat, 0, sizeof(*v9lstat));
1076

    
1077
    v9lstat->st_mode = stbuf->st_mode;
1078
    v9lstat->st_nlink = stbuf->st_nlink;
1079
    v9lstat->st_uid = stbuf->st_uid;
1080
    v9lstat->st_gid = stbuf->st_gid;
1081
    v9lstat->st_rdev = stbuf->st_rdev;
1082
    v9lstat->st_size = stbuf->st_size;
1083
    v9lstat->st_blksize = stbuf->st_blksize;
1084
    v9lstat->st_blocks = stbuf->st_blocks;
1085
    v9lstat->st_atime_sec = stbuf->st_atime;
1086
    v9lstat->st_atime_nsec = stbuf->st_atim.tv_nsec;
1087
    v9lstat->st_mtime_sec = stbuf->st_mtime;
1088
    v9lstat->st_mtime_nsec = stbuf->st_mtim.tv_nsec;
1089
    v9lstat->st_ctime_sec = stbuf->st_ctime;
1090
    v9lstat->st_ctime_nsec = stbuf->st_ctim.tv_nsec;
1091
    /* Currently we only support BASIC fields in stat */
1092
    v9lstat->st_result_mask = P9_STATS_BASIC;
1093

    
1094
    stat_to_qid(stbuf, &v9lstat->qid);
1095
}
1096

    
1097
static struct iovec *adjust_sg(struct iovec *sg, int len, int *iovcnt)
1098
{
1099
    while (len && *iovcnt) {
1100
        if (len < sg->iov_len) {
1101
            sg->iov_len -= len;
1102
            sg->iov_base += len;
1103
            len = 0;
1104
        } else {
1105
            len -= sg->iov_len;
1106
            sg++;
1107
            *iovcnt -= 1;
1108
        }
1109
    }
1110

    
1111
    return sg;
1112
}
1113

    
1114
static struct iovec *cap_sg(struct iovec *sg, int cap, int *cnt)
1115
{
1116
    int i;
1117
    int total = 0;
1118

    
1119
    for (i = 0; i < *cnt; i++) {
1120
        if ((total + sg[i].iov_len) > cap) {
1121
            sg[i].iov_len -= ((total + sg[i].iov_len) - cap);
1122
            i++;
1123
            break;
1124
        }
1125
        total += sg[i].iov_len;
1126
    }
1127

    
1128
    *cnt = i;
1129

    
1130
    return sg;
1131
}
1132

    
1133
static void print_sg(struct iovec *sg, int cnt)
1134
{
1135
    int i;
1136

    
1137
    printf("sg[%d]: {", cnt);
1138
    for (i = 0; i < cnt; i++) {
1139
        if (i) {
1140
            printf(", ");
1141
        }
1142
        printf("(%p, %zd)", sg[i].iov_base, sg[i].iov_len);
1143
    }
1144
    printf("}\n");
1145
}
1146

    
1147
static void v9fs_fix_path(V9fsString *dst, V9fsString *src, int len)
1148
{
1149
    V9fsString str;
1150
    v9fs_string_init(&str);
1151
    v9fs_string_copy(&str, dst);
1152
    v9fs_string_sprintf(dst, "%s%s", src->data, str.data+len);
1153
    v9fs_string_free(&str);
1154
}
1155

    
1156
static void v9fs_version(V9fsState *s, V9fsPDU *pdu)
1157
{
1158
    V9fsString version;
1159
    size_t offset = 7;
1160

    
1161
    pdu_unmarshal(pdu, offset, "ds", &s->msize, &version);
1162

    
1163
    if (!strcmp(version.data, "9P2000.u")) {
1164
        s->proto_version = V9FS_PROTO_2000U;
1165
    } else if (!strcmp(version.data, "9P2000.L")) {
1166
        s->proto_version = V9FS_PROTO_2000L;
1167
    } else {
1168
        v9fs_string_sprintf(&version, "unknown");
1169
    }
1170

    
1171
    offset += pdu_marshal(pdu, offset, "ds", s->msize, &version);
1172
    complete_pdu(s, pdu, offset);
1173

    
1174
    v9fs_string_free(&version);
1175
}
1176

    
1177
static void v9fs_attach(V9fsState *s, V9fsPDU *pdu)
1178
{
1179
    int32_t fid, afid, n_uname;
1180
    V9fsString uname, aname;
1181
    V9fsFidState *fidp;
1182
    V9fsQID qid;
1183
    size_t offset = 7;
1184
    ssize_t err;
1185

    
1186
    pdu_unmarshal(pdu, offset, "ddssd", &fid, &afid, &uname, &aname, &n_uname);
1187

    
1188
    fidp = alloc_fid(s, fid);
1189
    if (fidp == NULL) {
1190
        err = -EINVAL;
1191
        goto out;
1192
    }
1193

    
1194
    fidp->uid = n_uname;
1195

    
1196
    v9fs_string_sprintf(&fidp->path, "%s", "/");
1197
    err = fid_to_qid(s, fidp, &qid);
1198
    if (err) {
1199
        err = -EINVAL;
1200
        free_fid(s, fid);
1201
        goto out;
1202
    }
1203

    
1204
    offset += pdu_marshal(pdu, offset, "Q", &qid);
1205

    
1206
    err = offset;
1207
out:
1208
    complete_pdu(s, pdu, err);
1209
    v9fs_string_free(&uname);
1210
    v9fs_string_free(&aname);
1211
}
1212

    
1213
static void v9fs_stat_post_lstat(V9fsState *s, V9fsStatState *vs, int err)
1214
{
1215
    if (err == -1) {
1216
        err = -errno;
1217
        goto out;
1218
    }
1219

    
1220
    err = stat_to_v9stat(s, &vs->fidp->path, &vs->stbuf, &vs->v9stat);
1221
    if (err) {
1222
        goto out;
1223
    }
1224
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "wS", 0, &vs->v9stat);
1225
    err = vs->offset;
1226

    
1227
out:
1228
    complete_pdu(s, vs->pdu, err);
1229
    v9fs_stat_free(&vs->v9stat);
1230
    qemu_free(vs);
1231
}
1232

    
1233
static void v9fs_stat(V9fsState *s, V9fsPDU *pdu)
1234
{
1235
    int32_t fid;
1236
    V9fsStatState *vs;
1237
    ssize_t err = 0;
1238

    
1239
    vs = qemu_malloc(sizeof(*vs));
1240
    vs->pdu = pdu;
1241
    vs->offset = 7;
1242

    
1243
    memset(&vs->v9stat, 0, sizeof(vs->v9stat));
1244

    
1245
    pdu_unmarshal(vs->pdu, vs->offset, "d", &fid);
1246

    
1247
    vs->fidp = lookup_fid(s, fid);
1248
    if (vs->fidp == NULL) {
1249
        err = -ENOENT;
1250
        goto out;
1251
    }
1252

    
1253
    err = v9fs_do_lstat(s, &vs->fidp->path, &vs->stbuf);
1254
    v9fs_stat_post_lstat(s, vs, err);
1255
    return;
1256

    
1257
out:
1258
    complete_pdu(s, vs->pdu, err);
1259
    v9fs_stat_free(&vs->v9stat);
1260
    qemu_free(vs);
1261
}
1262

    
1263
static void v9fs_getattr_post_lstat(V9fsState *s, V9fsStatStateDotl *vs,
1264
                                                                int err)
1265
{
1266
    if (err == -1) {
1267
        err = -errno;
1268
        goto out;
1269
    }
1270

    
1271
    stat_to_v9stat_dotl(s, &vs->stbuf, &vs->v9stat_dotl);
1272
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "A", &vs->v9stat_dotl);
1273
    err = vs->offset;
1274

    
1275
out:
1276
    complete_pdu(s, vs->pdu, err);
1277
    qemu_free(vs);
1278
}
1279

    
1280
static void v9fs_getattr(V9fsState *s, V9fsPDU *pdu)
1281
{
1282
    int32_t fid;
1283
    V9fsStatStateDotl *vs;
1284
    ssize_t err = 0;
1285
    V9fsFidState *fidp;
1286
    uint64_t request_mask;
1287

    
1288
    vs = qemu_malloc(sizeof(*vs));
1289
    vs->pdu = pdu;
1290
    vs->offset = 7;
1291

    
1292
    memset(&vs->v9stat_dotl, 0, sizeof(vs->v9stat_dotl));
1293

    
1294
    pdu_unmarshal(vs->pdu, vs->offset, "dq", &fid, &request_mask);
1295

    
1296
    fidp = lookup_fid(s, fid);
1297
    if (fidp == NULL) {
1298
        err = -ENOENT;
1299
        goto out;
1300
    }
1301

    
1302
    /* Currently we only support BASIC fields in stat, so there is no
1303
     * need to look at request_mask.
1304
     */
1305
    err = v9fs_do_lstat(s, &fidp->path, &vs->stbuf);
1306
    v9fs_getattr_post_lstat(s, vs, err);
1307
    return;
1308

    
1309
out:
1310
    complete_pdu(s, vs->pdu, err);
1311
    qemu_free(vs);
1312
}
1313

    
1314
/* From Linux kernel code */
1315
#define ATTR_MODE    (1 << 0)
1316
#define ATTR_UID     (1 << 1)
1317
#define ATTR_GID     (1 << 2)
1318
#define ATTR_SIZE    (1 << 3)
1319
#define ATTR_ATIME   (1 << 4)
1320
#define ATTR_MTIME   (1 << 5)
1321
#define ATTR_CTIME   (1 << 6)
1322
#define ATTR_MASK    127
1323
#define ATTR_ATIME_SET  (1 << 7)
1324
#define ATTR_MTIME_SET  (1 << 8)
1325

    
1326
static void v9fs_setattr_post_truncate(V9fsState *s, V9fsSetattrState *vs,
1327
                                                                  int err)
1328
{
1329
    if (err == -1) {
1330
        err = -errno;
1331
        goto out;
1332
    }
1333
    err = vs->offset;
1334

    
1335
out:
1336
    complete_pdu(s, vs->pdu, err);
1337
    qemu_free(vs);
1338
}
1339

    
1340
static void v9fs_setattr_post_chown(V9fsState *s, V9fsSetattrState *vs, int err)
1341
{
1342
    if (err == -1) {
1343
        err = -errno;
1344
        goto out;
1345
    }
1346

    
1347
    if (vs->v9iattr.valid & (ATTR_SIZE)) {
1348
        err = v9fs_do_truncate(s, &vs->fidp->path, vs->v9iattr.size);
1349
    }
1350
    v9fs_setattr_post_truncate(s, vs, err);
1351
    return;
1352

    
1353
out:
1354
    complete_pdu(s, vs->pdu, err);
1355
    qemu_free(vs);
1356
}
1357

    
1358
static void v9fs_setattr_post_utimensat(V9fsState *s, V9fsSetattrState *vs,
1359
                                                                   int err)
1360
{
1361
    if (err == -1) {
1362
        err = -errno;
1363
        goto out;
1364
    }
1365

    
1366
    /* If the only valid entry in iattr is ctime we can call
1367
     * chown(-1,-1) to update the ctime of the file
1368
     */
1369
    if ((vs->v9iattr.valid & (ATTR_UID | ATTR_GID)) ||
1370
            ((vs->v9iattr.valid & ATTR_CTIME)
1371
            && !((vs->v9iattr.valid & ATTR_MASK) & ~ATTR_CTIME))) {
1372
        if (!(vs->v9iattr.valid & ATTR_UID)) {
1373
            vs->v9iattr.uid = -1;
1374
        }
1375
        if (!(vs->v9iattr.valid & ATTR_GID)) {
1376
            vs->v9iattr.gid = -1;
1377
        }
1378
        err = v9fs_do_chown(s, &vs->fidp->path, vs->v9iattr.uid,
1379
                                                vs->v9iattr.gid);
1380
    }
1381
    v9fs_setattr_post_chown(s, vs, err);
1382
    return;
1383

    
1384
out:
1385
    complete_pdu(s, vs->pdu, err);
1386
    qemu_free(vs);
1387
}
1388

    
1389
static void v9fs_setattr_post_chmod(V9fsState *s, V9fsSetattrState *vs, int err)
1390
{
1391
    if (err == -1) {
1392
        err = -errno;
1393
        goto out;
1394
    }
1395

    
1396
    if (vs->v9iattr.valid & (ATTR_ATIME | ATTR_MTIME)) {
1397
        struct timespec times[2];
1398
        if (vs->v9iattr.valid & ATTR_ATIME) {
1399
            if (vs->v9iattr.valid & ATTR_ATIME_SET) {
1400
                times[0].tv_sec = vs->v9iattr.atime_sec;
1401
                times[0].tv_nsec = vs->v9iattr.atime_nsec;
1402
            } else {
1403
                times[0].tv_nsec = UTIME_NOW;
1404
            }
1405
        } else {
1406
            times[0].tv_nsec = UTIME_OMIT;
1407
        }
1408

    
1409
        if (vs->v9iattr.valid & ATTR_MTIME) {
1410
            if (vs->v9iattr.valid & ATTR_MTIME_SET) {
1411
                times[1].tv_sec = vs->v9iattr.mtime_sec;
1412
                times[1].tv_nsec = vs->v9iattr.mtime_nsec;
1413
            } else {
1414
                times[1].tv_nsec = UTIME_NOW;
1415
            }
1416
        } else {
1417
            times[1].tv_nsec = UTIME_OMIT;
1418
        }
1419
        err = v9fs_do_utimensat(s, &vs->fidp->path, times);
1420
    }
1421
    v9fs_setattr_post_utimensat(s, vs, err);
1422
    return;
1423

    
1424
out:
1425
    complete_pdu(s, vs->pdu, err);
1426
    qemu_free(vs);
1427
}
1428

    
1429
static void v9fs_setattr(V9fsState *s, V9fsPDU *pdu)
1430
{
1431
    int32_t fid;
1432
    V9fsSetattrState *vs;
1433
    int err = 0;
1434

    
1435
    vs = qemu_malloc(sizeof(*vs));
1436
    vs->pdu = pdu;
1437
    vs->offset = 7;
1438

    
1439
    pdu_unmarshal(pdu, vs->offset, "dI", &fid, &vs->v9iattr);
1440

    
1441
    vs->fidp = lookup_fid(s, fid);
1442
    if (vs->fidp == NULL) {
1443
        err = -EINVAL;
1444
        goto out;
1445
    }
1446

    
1447
    if (vs->v9iattr.valid & ATTR_MODE) {
1448
        err = v9fs_do_chmod(s, &vs->fidp->path, vs->v9iattr.mode);
1449
    }
1450

    
1451
    v9fs_setattr_post_chmod(s, vs, err);
1452
    return;
1453

    
1454
out:
1455
    complete_pdu(s, vs->pdu, err);
1456
    qemu_free(vs);
1457
}
1458

    
1459
static void v9fs_walk_complete(V9fsState *s, V9fsWalkState *vs, int err)
1460
{
1461
    complete_pdu(s, vs->pdu, err);
1462

    
1463
    if (vs->nwnames) {
1464
        for (vs->name_idx = 0; vs->name_idx < vs->nwnames; vs->name_idx++) {
1465
            v9fs_string_free(&vs->wnames[vs->name_idx]);
1466
        }
1467

    
1468
        qemu_free(vs->wnames);
1469
        qemu_free(vs->qids);
1470
    }
1471
}
1472

    
1473
static void v9fs_walk_marshal(V9fsWalkState *vs)
1474
{
1475
    int i;
1476
    vs->offset = 7;
1477
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "w", vs->nwnames);
1478

    
1479
    for (i = 0; i < vs->nwnames; i++) {
1480
        vs->offset += pdu_marshal(vs->pdu, vs->offset, "Q", &vs->qids[i]);
1481
    }
1482
}
1483

    
1484
static void v9fs_walk_post_newfid_lstat(V9fsState *s, V9fsWalkState *vs,
1485
                                                                int err)
1486
{
1487
    if (err == -1) {
1488
        free_fid(s, vs->newfidp->fid);
1489
        v9fs_string_free(&vs->path);
1490
        err = -ENOENT;
1491
        goto out;
1492
    }
1493

    
1494
    stat_to_qid(&vs->stbuf, &vs->qids[vs->name_idx]);
1495

    
1496
    vs->name_idx++;
1497
    if (vs->name_idx < vs->nwnames) {
1498
        v9fs_string_sprintf(&vs->path, "%s/%s", vs->newfidp->path.data,
1499
                                            vs->wnames[vs->name_idx].data);
1500
        v9fs_string_copy(&vs->newfidp->path, &vs->path);
1501

    
1502
        err = v9fs_do_lstat(s, &vs->newfidp->path, &vs->stbuf);
1503
        v9fs_walk_post_newfid_lstat(s, vs, err);
1504
        return;
1505
    }
1506

    
1507
    v9fs_string_free(&vs->path);
1508
    v9fs_walk_marshal(vs);
1509
    err = vs->offset;
1510
out:
1511
    v9fs_walk_complete(s, vs, err);
1512
}
1513

    
1514
static void v9fs_walk_post_oldfid_lstat(V9fsState *s, V9fsWalkState *vs,
1515
        int err)
1516
{
1517
    if (err == -1) {
1518
        v9fs_string_free(&vs->path);
1519
        err = -ENOENT;
1520
        goto out;
1521
    }
1522

    
1523
    stat_to_qid(&vs->stbuf, &vs->qids[vs->name_idx]);
1524
    vs->name_idx++;
1525
    if (vs->name_idx < vs->nwnames) {
1526

    
1527
        v9fs_string_sprintf(&vs->path, "%s/%s",
1528
                vs->fidp->path.data, vs->wnames[vs->name_idx].data);
1529
        v9fs_string_copy(&vs->fidp->path, &vs->path);
1530

    
1531
        err = v9fs_do_lstat(s, &vs->fidp->path, &vs->stbuf);
1532
        v9fs_walk_post_oldfid_lstat(s, vs, err);
1533
        return;
1534
    }
1535

    
1536
    v9fs_string_free(&vs->path);
1537
    v9fs_walk_marshal(vs);
1538
    err = vs->offset;
1539
out:
1540
    v9fs_walk_complete(s, vs, err);
1541
}
1542

    
1543
static void v9fs_walk(V9fsState *s, V9fsPDU *pdu)
1544
{
1545
    int32_t fid, newfid;
1546
    V9fsWalkState *vs;
1547
    int err = 0;
1548
    int i;
1549

    
1550
    vs = qemu_malloc(sizeof(*vs));
1551
    vs->pdu = pdu;
1552
    vs->wnames = NULL;
1553
    vs->qids = NULL;
1554
    vs->offset = 7;
1555

    
1556
    vs->offset += pdu_unmarshal(vs->pdu, vs->offset, "ddw", &fid,
1557
                                            &newfid, &vs->nwnames);
1558

    
1559
    if (vs->nwnames) {
1560
        vs->wnames = qemu_mallocz(sizeof(vs->wnames[0]) * vs->nwnames);
1561

    
1562
        vs->qids = qemu_mallocz(sizeof(vs->qids[0]) * vs->nwnames);
1563

    
1564
        for (i = 0; i < vs->nwnames; i++) {
1565
            vs->offset += pdu_unmarshal(vs->pdu, vs->offset, "s",
1566
                                            &vs->wnames[i]);
1567
        }
1568
    }
1569

    
1570
    vs->fidp = lookup_fid(s, fid);
1571
    if (vs->fidp == NULL) {
1572
        err = -ENOENT;
1573
        goto out;
1574
    }
1575

    
1576
    /* FIXME: is this really valid? */
1577
    if (fid == newfid) {
1578

    
1579
        BUG_ON(vs->fidp->fid_type != P9_FID_NONE);
1580
        v9fs_string_init(&vs->path);
1581
        vs->name_idx = 0;
1582

    
1583
        if (vs->name_idx < vs->nwnames) {
1584
            v9fs_string_sprintf(&vs->path, "%s/%s",
1585
                vs->fidp->path.data, vs->wnames[vs->name_idx].data);
1586
            v9fs_string_copy(&vs->fidp->path, &vs->path);
1587

    
1588
            err = v9fs_do_lstat(s, &vs->fidp->path, &vs->stbuf);
1589
            v9fs_walk_post_oldfid_lstat(s, vs, err);
1590
            return;
1591
        }
1592
    } else {
1593
        vs->newfidp = alloc_fid(s, newfid);
1594
        if (vs->newfidp == NULL) {
1595
            err = -EINVAL;
1596
            goto out;
1597
        }
1598

    
1599
        vs->newfidp->uid = vs->fidp->uid;
1600
        v9fs_string_init(&vs->path);
1601
        vs->name_idx = 0;
1602
        v9fs_string_copy(&vs->newfidp->path, &vs->fidp->path);
1603

    
1604
        if (vs->name_idx < vs->nwnames) {
1605
            v9fs_string_sprintf(&vs->path, "%s/%s", vs->newfidp->path.data,
1606
                                vs->wnames[vs->name_idx].data);
1607
            v9fs_string_copy(&vs->newfidp->path, &vs->path);
1608

    
1609
            err = v9fs_do_lstat(s, &vs->newfidp->path, &vs->stbuf);
1610
            v9fs_walk_post_newfid_lstat(s, vs, err);
1611
            return;
1612
        }
1613
    }
1614

    
1615
    v9fs_walk_marshal(vs);
1616
    err = vs->offset;
1617
out:
1618
    v9fs_walk_complete(s, vs, err);
1619
}
1620

    
1621
static int32_t get_iounit(V9fsState *s, V9fsString *name)
1622
{
1623
    struct statfs stbuf;
1624
    int32_t iounit = 0;
1625

    
1626
    /*
1627
     * iounit should be multiples of f_bsize (host filesystem block size
1628
     * and as well as less than (client msize - P9_IOHDRSZ))
1629
     */
1630
    if (!v9fs_do_statfs(s, name, &stbuf)) {
1631
        iounit = stbuf.f_bsize;
1632
        iounit *= (s->msize - P9_IOHDRSZ)/stbuf.f_bsize;
1633
    }
1634

    
1635
    if (!iounit) {
1636
        iounit = s->msize - P9_IOHDRSZ;
1637
    }
1638
    return iounit;
1639
}
1640

    
1641
static void v9fs_open_post_opendir(V9fsState *s, V9fsOpenState *vs, int err)
1642
{
1643
    if (vs->fidp->fs.dir == NULL) {
1644
        err = -errno;
1645
        goto out;
1646
    }
1647
    vs->fidp->fid_type = P9_FID_DIR;
1648
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "Qd", &vs->qid, 0);
1649
    err = vs->offset;
1650
out:
1651
    complete_pdu(s, vs->pdu, err);
1652
    qemu_free(vs);
1653

    
1654
}
1655

    
1656
static void v9fs_open_post_getiounit(V9fsState *s, V9fsOpenState *vs)
1657
{
1658
    int err;
1659
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "Qd", &vs->qid, vs->iounit);
1660
    err = vs->offset;
1661
    complete_pdu(s, vs->pdu, err);
1662
    qemu_free(vs);
1663
}
1664

    
1665
static void v9fs_open_post_open(V9fsState *s, V9fsOpenState *vs, int err)
1666
{
1667
    if (vs->fidp->fs.fd == -1) {
1668
        err = -errno;
1669
        goto out;
1670
    }
1671
    vs->fidp->fid_type = P9_FID_FILE;
1672
    vs->iounit = get_iounit(s, &vs->fidp->path);
1673
    v9fs_open_post_getiounit(s, vs);
1674
    return;
1675
out:
1676
    complete_pdu(s, vs->pdu, err);
1677
    qemu_free(vs);
1678
}
1679

    
1680
static inline int valid_flags(int flag)
1681
{
1682
    if (flag & O_NOCTTY || flag & O_NONBLOCK || flag & O_ASYNC ||
1683
            flag & O_CLOEXEC)
1684
        return 0;
1685
    else
1686
        return 1;
1687
}
1688

    
1689
static void v9fs_open_post_lstat(V9fsState *s, V9fsOpenState *vs, int err)
1690
{
1691
    int flags;
1692

    
1693
    if (err) {
1694
        err = -errno;
1695
        goto out;
1696
    }
1697

    
1698
    stat_to_qid(&vs->stbuf, &vs->qid);
1699

    
1700
    if (S_ISDIR(vs->stbuf.st_mode)) {
1701
        vs->fidp->fs.dir = v9fs_do_opendir(s, &vs->fidp->path);
1702
        v9fs_open_post_opendir(s, vs, err);
1703
    } else {
1704
        if (s->proto_version == V9FS_PROTO_2000L) {
1705
            if (!valid_flags(vs->mode)) {
1706
                err = -EINVAL;
1707
                goto out;
1708
            }
1709
            flags = vs->mode;
1710
        } else {
1711
            flags = omode_to_uflags(vs->mode);
1712
        }
1713
        vs->fidp->fs.fd = v9fs_do_open(s, &vs->fidp->path, flags);
1714
        v9fs_open_post_open(s, vs, err);
1715
    }
1716
    return;
1717
out:
1718
    complete_pdu(s, vs->pdu, err);
1719
    qemu_free(vs);
1720
}
1721

    
1722
static void v9fs_open(V9fsState *s, V9fsPDU *pdu)
1723
{
1724
    int32_t fid;
1725
    V9fsOpenState *vs;
1726
    ssize_t err = 0;
1727

    
1728
    vs = qemu_malloc(sizeof(*vs));
1729
    vs->pdu = pdu;
1730
    vs->offset = 7;
1731
    vs->mode = 0;
1732

    
1733
    if (s->proto_version == V9FS_PROTO_2000L) {
1734
        pdu_unmarshal(vs->pdu, vs->offset, "dd", &fid, &vs->mode);
1735
    } else {
1736
        pdu_unmarshal(vs->pdu, vs->offset, "db", &fid, &vs->mode);
1737
    }
1738

    
1739
    vs->fidp = lookup_fid(s, fid);
1740
    if (vs->fidp == NULL) {
1741
        err = -ENOENT;
1742
        goto out;
1743
    }
1744

    
1745
    BUG_ON(vs->fidp->fid_type != P9_FID_NONE);
1746

    
1747
    err = v9fs_do_lstat(s, &vs->fidp->path, &vs->stbuf);
1748

    
1749
    v9fs_open_post_lstat(s, vs, err);
1750
    return;
1751
out:
1752
    complete_pdu(s, pdu, err);
1753
    qemu_free(vs);
1754
}
1755

    
1756
static void v9fs_post_lcreate(V9fsState *s, V9fsLcreateState *vs, int err)
1757
{
1758
    if (err == 0) {
1759
        v9fs_string_copy(&vs->fidp->path, &vs->fullname);
1760
        stat_to_qid(&vs->stbuf, &vs->qid);
1761
        vs->offset += pdu_marshal(vs->pdu, vs->offset, "Qd", &vs->qid,
1762
                &vs->iounit);
1763
        err = vs->offset;
1764
    } else {
1765
        vs->fidp->fid_type = P9_FID_NONE;
1766
        close(vs->fidp->fs.fd);
1767
        err = -errno;
1768
    }
1769

    
1770
    complete_pdu(s, vs->pdu, err);
1771
    v9fs_string_free(&vs->name);
1772
    v9fs_string_free(&vs->fullname);
1773
    qemu_free(vs);
1774
}
1775

    
1776
static void v9fs_lcreate_post_get_iounit(V9fsState *s, V9fsLcreateState *vs,
1777
        int err)
1778
{
1779
    if (err) {
1780
        err = -errno;
1781
        goto out;
1782
    }
1783
    err = v9fs_do_lstat(s, &vs->fullname, &vs->stbuf);
1784

    
1785
out:
1786
    v9fs_post_lcreate(s, vs, err);
1787
}
1788

    
1789
static void v9fs_lcreate_post_do_open2(V9fsState *s, V9fsLcreateState *vs,
1790
        int err)
1791
{
1792
    if (vs->fidp->fs.fd == -1) {
1793
        err = -errno;
1794
        goto out;
1795
    }
1796
    vs->fidp->fid_type = P9_FID_FILE;
1797
    vs->iounit =  get_iounit(s, &vs->fullname);
1798
    v9fs_lcreate_post_get_iounit(s, vs, err);
1799
    return;
1800

    
1801
out:
1802
    v9fs_post_lcreate(s, vs, err);
1803
}
1804

    
1805
static void v9fs_lcreate(V9fsState *s, V9fsPDU *pdu)
1806
{
1807
    int32_t dfid, flags, mode;
1808
    gid_t gid;
1809
    V9fsLcreateState *vs;
1810
    ssize_t err = 0;
1811

    
1812
    vs = qemu_malloc(sizeof(*vs));
1813
    vs->pdu = pdu;
1814
    vs->offset = 7;
1815

    
1816
    v9fs_string_init(&vs->fullname);
1817

    
1818
    pdu_unmarshal(vs->pdu, vs->offset, "dsddd", &dfid, &vs->name, &flags,
1819
            &mode, &gid);
1820

    
1821
    vs->fidp = lookup_fid(s, dfid);
1822
    if (vs->fidp == NULL) {
1823
        err = -ENOENT;
1824
        goto out;
1825
    }
1826

    
1827
    v9fs_string_sprintf(&vs->fullname, "%s/%s", vs->fidp->path.data,
1828
             vs->name.data);
1829

    
1830
    vs->fidp->fs.fd = v9fs_do_open2(s, vs->fullname.data, vs->fidp->uid,
1831
            gid, flags, mode);
1832
    v9fs_lcreate_post_do_open2(s, vs, err);
1833
    return;
1834

    
1835
out:
1836
    complete_pdu(s, vs->pdu, err);
1837
    v9fs_string_free(&vs->name);
1838
    qemu_free(vs);
1839
}
1840

    
1841
static void v9fs_clunk(V9fsState *s, V9fsPDU *pdu)
1842
{
1843
    int32_t fid;
1844
    size_t offset = 7;
1845
    int err;
1846

    
1847
    pdu_unmarshal(pdu, offset, "d", &fid);
1848

    
1849
    err = free_fid(s, fid);
1850
    if (err < 0) {
1851
        goto out;
1852
    }
1853

    
1854
    offset = 7;
1855
    err = offset;
1856
out:
1857
    complete_pdu(s, pdu, err);
1858
}
1859

    
1860
static void v9fs_read_post_readdir(V9fsState *, V9fsReadState *, ssize_t);
1861

    
1862
static void v9fs_read_post_seekdir(V9fsState *s, V9fsReadState *vs, ssize_t err)
1863
{
1864
    if (err) {
1865
        goto out;
1866
    }
1867
    v9fs_stat_free(&vs->v9stat);
1868
    v9fs_string_free(&vs->name);
1869
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "d", vs->count);
1870
    vs->offset += vs->count;
1871
    err = vs->offset;
1872
out:
1873
    complete_pdu(s, vs->pdu, err);
1874
    qemu_free(vs);
1875
    return;
1876
}
1877

    
1878
static void v9fs_read_post_dir_lstat(V9fsState *s, V9fsReadState *vs,
1879
                                    ssize_t err)
1880
{
1881
    if (err) {
1882
        err = -errno;
1883
        goto out;
1884
    }
1885
    err = stat_to_v9stat(s, &vs->name, &vs->stbuf, &vs->v9stat);
1886
    if (err) {
1887
        goto out;
1888
    }
1889

    
1890
    vs->len = pdu_marshal(vs->pdu, vs->offset + 4 + vs->count, "S",
1891
                            &vs->v9stat);
1892
    if ((vs->len != (vs->v9stat.size + 2)) ||
1893
            ((vs->count + vs->len) > vs->max_count)) {
1894
        v9fs_do_seekdir(s, vs->fidp->fs.dir, vs->dir_pos);
1895
        v9fs_read_post_seekdir(s, vs, err);
1896
        return;
1897
    }
1898
    vs->count += vs->len;
1899
    v9fs_stat_free(&vs->v9stat);
1900
    v9fs_string_free(&vs->name);
1901
    vs->dir_pos = vs->dent->d_off;
1902
    vs->dent = v9fs_do_readdir(s, vs->fidp->fs.dir);
1903
    v9fs_read_post_readdir(s, vs, err);
1904
    return;
1905
out:
1906
    v9fs_do_seekdir(s, vs->fidp->fs.dir, vs->dir_pos);
1907
    v9fs_read_post_seekdir(s, vs, err);
1908
    return;
1909

    
1910
}
1911

    
1912
static void v9fs_read_post_readdir(V9fsState *s, V9fsReadState *vs, ssize_t err)
1913
{
1914
    if (vs->dent) {
1915
        memset(&vs->v9stat, 0, sizeof(vs->v9stat));
1916
        v9fs_string_init(&vs->name);
1917
        v9fs_string_sprintf(&vs->name, "%s/%s", vs->fidp->path.data,
1918
                            vs->dent->d_name);
1919
        err = v9fs_do_lstat(s, &vs->name, &vs->stbuf);
1920
        v9fs_read_post_dir_lstat(s, vs, err);
1921
        return;
1922
    }
1923

    
1924
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "d", vs->count);
1925
    vs->offset += vs->count;
1926
    err = vs->offset;
1927
    complete_pdu(s, vs->pdu, err);
1928
    qemu_free(vs);
1929
    return;
1930
}
1931

    
1932
static void v9fs_read_post_telldir(V9fsState *s, V9fsReadState *vs, ssize_t err)
1933
{
1934
    vs->dent = v9fs_do_readdir(s, vs->fidp->fs.dir);
1935
    v9fs_read_post_readdir(s, vs, err);
1936
    return;
1937
}
1938

    
1939
static void v9fs_read_post_rewinddir(V9fsState *s, V9fsReadState *vs,
1940
                                       ssize_t err)
1941
{
1942
    vs->dir_pos = v9fs_do_telldir(s, vs->fidp->fs.dir);
1943
    v9fs_read_post_telldir(s, vs, err);
1944
    return;
1945
}
1946

    
1947
static void v9fs_read_post_readv(V9fsState *s, V9fsReadState *vs, ssize_t err)
1948
{
1949
    if (err  < 0) {
1950
        /* IO error return the error */
1951
        err = -errno;
1952
        goto out;
1953
    }
1954
    vs->total += vs->len;
1955
    vs->sg = adjust_sg(vs->sg, vs->len, &vs->cnt);
1956
    if (vs->total < vs->count && vs->len > 0) {
1957
        do {
1958
            if (0) {
1959
                print_sg(vs->sg, vs->cnt);
1960
            }
1961
            vs->len = v9fs_do_readv(s, vs->fidp->fs.fd, vs->sg, vs->cnt);
1962
        } while (vs->len == -1 && errno == EINTR);
1963
        if (vs->len == -1) {
1964
            err  = -errno;
1965
        }
1966
        v9fs_read_post_readv(s, vs, err);
1967
        return;
1968
    }
1969
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "d", vs->total);
1970
    vs->offset += vs->count;
1971
    err = vs->offset;
1972

    
1973
out:
1974
    complete_pdu(s, vs->pdu, err);
1975
    qemu_free(vs);
1976
}
1977

    
1978
static void v9fs_read_post_lseek(V9fsState *s, V9fsReadState *vs, ssize_t err)
1979
{
1980
    if (err == -1) {
1981
        err = -errno;
1982
        goto out;
1983
    }
1984
    vs->sg = cap_sg(vs->sg, vs->count, &vs->cnt);
1985

    
1986
    if (vs->total < vs->count) {
1987
        do {
1988
            if (0) {
1989
                print_sg(vs->sg, vs->cnt);
1990
            }
1991
            vs->len = v9fs_do_readv(s, vs->fidp->fs.fd, vs->sg, vs->cnt);
1992
        } while (vs->len == -1 && errno == EINTR);
1993
        if (vs->len == -1) {
1994
            err  = -errno;
1995
        }
1996
        v9fs_read_post_readv(s, vs, err);
1997
        return;
1998
    }
1999
out:
2000
    complete_pdu(s, vs->pdu, err);
2001
    qemu_free(vs);
2002
}
2003

    
2004
static void v9fs_xattr_read(V9fsState *s, V9fsReadState *vs)
2005
{
2006
    ssize_t err = 0;
2007
    int read_count;
2008
    int64_t xattr_len;
2009

    
2010
    xattr_len = vs->fidp->fs.xattr.len;
2011
    read_count = xattr_len - vs->off;
2012
    if (read_count > vs->count) {
2013
        read_count = vs->count;
2014
    } else if (read_count < 0) {
2015
        /*
2016
         * read beyond XATTR value
2017
         */
2018
        read_count = 0;
2019
    }
2020
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "d", read_count);
2021
    vs->offset += pdu_pack(vs->pdu, vs->offset,
2022
                           ((char *)vs->fidp->fs.xattr.value) + vs->off,
2023
                           read_count);
2024
    err = vs->offset;
2025
    complete_pdu(s, vs->pdu, err);
2026
    qemu_free(vs);
2027
}
2028

    
2029
static void v9fs_read(V9fsState *s, V9fsPDU *pdu)
2030
{
2031
    int32_t fid;
2032
    V9fsReadState *vs;
2033
    ssize_t err = 0;
2034

    
2035
    vs = qemu_malloc(sizeof(*vs));
2036
    vs->pdu = pdu;
2037
    vs->offset = 7;
2038
    vs->total = 0;
2039
    vs->len = 0;
2040
    vs->count = 0;
2041

    
2042
    pdu_unmarshal(vs->pdu, vs->offset, "dqd", &fid, &vs->off, &vs->count);
2043

    
2044
    vs->fidp = lookup_fid(s, fid);
2045
    if (vs->fidp == NULL) {
2046
        err = -EINVAL;
2047
        goto out;
2048
    }
2049

    
2050
    if (vs->fidp->fid_type == P9_FID_DIR) {
2051
        vs->max_count = vs->count;
2052
        vs->count = 0;
2053
        if (vs->off == 0) {
2054
            v9fs_do_rewinddir(s, vs->fidp->fs.dir);
2055
        }
2056
        v9fs_read_post_rewinddir(s, vs, err);
2057
        return;
2058
    } else if (vs->fidp->fid_type == P9_FID_FILE) {
2059
        vs->sg = vs->iov;
2060
        pdu_marshal(vs->pdu, vs->offset + 4, "v", vs->sg, &vs->cnt);
2061
        err = v9fs_do_lseek(s, vs->fidp->fs.fd, vs->off, SEEK_SET);
2062
        v9fs_read_post_lseek(s, vs, err);
2063
        return;
2064
    } else if (vs->fidp->fid_type == P9_FID_XATTR) {
2065
        v9fs_xattr_read(s, vs);
2066
        return;
2067
    } else {
2068
        err = -EINVAL;
2069
    }
2070
out:
2071
    complete_pdu(s, pdu, err);
2072
    qemu_free(vs);
2073
}
2074

    
2075
typedef struct V9fsReadDirState {
2076
    V9fsPDU *pdu;
2077
    V9fsFidState *fidp;
2078
    V9fsQID qid;
2079
    off_t saved_dir_pos;
2080
    struct dirent *dent;
2081
    int32_t count;
2082
    int32_t max_count;
2083
    size_t offset;
2084
    int64_t initial_offset;
2085
    V9fsString name;
2086
} V9fsReadDirState;
2087

    
2088
static void v9fs_readdir_post_seekdir(V9fsState *s, V9fsReadDirState *vs)
2089
{
2090
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "d", vs->count);
2091
    vs->offset += vs->count;
2092
    complete_pdu(s, vs->pdu, vs->offset);
2093
    qemu_free(vs);
2094
    return;
2095
}
2096

    
2097
/* Size of each dirent on the wire: size of qid (13) + size of offset (8)
2098
 * size of type (1) + size of name.size (2) + strlen(name.data)
2099
 */
2100
#define V9_READDIR_DATA_SZ (24 + strlen(vs->name.data))
2101

    
2102
static void v9fs_readdir_post_readdir(V9fsState *s, V9fsReadDirState *vs)
2103
{
2104
    int len;
2105
    size_t size;
2106

    
2107
    if (vs->dent) {
2108
        v9fs_string_init(&vs->name);
2109
        v9fs_string_sprintf(&vs->name, "%s", vs->dent->d_name);
2110

    
2111
        if ((vs->count + V9_READDIR_DATA_SZ) > vs->max_count) {
2112
            /* Ran out of buffer. Set dir back to old position and return */
2113
            v9fs_do_seekdir(s, vs->fidp->fs.dir, vs->saved_dir_pos);
2114
            v9fs_readdir_post_seekdir(s, vs);
2115
            return;
2116
        }
2117

    
2118
        /* Fill up just the path field of qid because the client uses
2119
         * only that. To fill the entire qid structure we will have
2120
         * to stat each dirent found, which is expensive
2121
         */
2122
        size = MIN(sizeof(vs->dent->d_ino), sizeof(vs->qid.path));
2123
        memcpy(&vs->qid.path, &vs->dent->d_ino, size);
2124
        /* Fill the other fields with dummy values */
2125
        vs->qid.type = 0;
2126
        vs->qid.version = 0;
2127

    
2128
        len = pdu_marshal(vs->pdu, vs->offset+4+vs->count, "Qqbs",
2129
                              &vs->qid, vs->dent->d_off,
2130
                              vs->dent->d_type, &vs->name);
2131
        vs->count += len;
2132
        v9fs_string_free(&vs->name);
2133
        vs->saved_dir_pos = vs->dent->d_off;
2134
        vs->dent = v9fs_do_readdir(s, vs->fidp->fs.dir);
2135
        v9fs_readdir_post_readdir(s, vs);
2136
        return;
2137
    }
2138

    
2139
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "d", vs->count);
2140
    vs->offset += vs->count;
2141
    complete_pdu(s, vs->pdu, vs->offset);
2142
    qemu_free(vs);
2143
    return;
2144
}
2145

    
2146
static void v9fs_readdir_post_telldir(V9fsState *s, V9fsReadDirState *vs)
2147
{
2148
    vs->dent = v9fs_do_readdir(s, vs->fidp->fs.dir);
2149
    v9fs_readdir_post_readdir(s, vs);
2150
    return;
2151
}
2152

    
2153
static void v9fs_readdir_post_setdir(V9fsState *s, V9fsReadDirState *vs)
2154
{
2155
    vs->saved_dir_pos = v9fs_do_telldir(s, vs->fidp->fs.dir);
2156
    v9fs_readdir_post_telldir(s, vs);
2157
    return;
2158
}
2159

    
2160
static void v9fs_readdir(V9fsState *s, V9fsPDU *pdu)
2161
{
2162
    int32_t fid;
2163
    V9fsReadDirState *vs;
2164
    ssize_t err = 0;
2165
    size_t offset = 7;
2166

    
2167
    vs = qemu_malloc(sizeof(*vs));
2168
    vs->pdu = pdu;
2169
    vs->offset = 7;
2170
    vs->count = 0;
2171

    
2172
    pdu_unmarshal(vs->pdu, offset, "dqd", &fid, &vs->initial_offset,
2173
                                                        &vs->max_count);
2174

    
2175
    vs->fidp = lookup_fid(s, fid);
2176
    if (vs->fidp == NULL || !(vs->fidp->fs.dir)) {
2177
        err = -EINVAL;
2178
        goto out;
2179
    }
2180

    
2181
    if (vs->initial_offset == 0) {
2182
        v9fs_do_rewinddir(s, vs->fidp->fs.dir);
2183
    } else {
2184
        v9fs_do_seekdir(s, vs->fidp->fs.dir, vs->initial_offset);
2185
    }
2186

    
2187
    v9fs_readdir_post_setdir(s, vs);
2188
    return;
2189

    
2190
out:
2191
    complete_pdu(s, pdu, err);
2192
    qemu_free(vs);
2193
    return;
2194
}
2195

    
2196
static void v9fs_write_post_writev(V9fsState *s, V9fsWriteState *vs,
2197
                                   ssize_t err)
2198
{
2199
    if (err  < 0) {
2200
        /* IO error return the error */
2201
        err = -errno;
2202
        goto out;
2203
    }
2204
    vs->total += vs->len;
2205
    vs->sg = adjust_sg(vs->sg, vs->len, &vs->cnt);
2206
    if (vs->total < vs->count && vs->len > 0) {
2207
        do {
2208
            if (0) {
2209
                print_sg(vs->sg, vs->cnt);
2210
            }
2211
            vs->len =  v9fs_do_writev(s, vs->fidp->fs.fd, vs->sg, vs->cnt);
2212
        } while (vs->len == -1 && errno == EINTR);
2213
        if (vs->len == -1) {
2214
            err  = -errno;
2215
        }
2216
        v9fs_write_post_writev(s, vs, err);
2217
        return;
2218
    }
2219
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "d", vs->total);
2220

    
2221
    err = vs->offset;
2222
out:
2223
    complete_pdu(s, vs->pdu, err);
2224
    qemu_free(vs);
2225
}
2226

    
2227
static void v9fs_write_post_lseek(V9fsState *s, V9fsWriteState *vs, ssize_t err)
2228
{
2229
    if (err == -1) {
2230
        err = -errno;
2231
        goto out;
2232
    }
2233
    vs->sg = cap_sg(vs->sg, vs->count, &vs->cnt);
2234

    
2235
    if (vs->total < vs->count) {
2236
        do {
2237
            if (0) {
2238
                print_sg(vs->sg, vs->cnt);
2239
            }
2240
            vs->len = v9fs_do_writev(s, vs->fidp->fs.fd, vs->sg, vs->cnt);
2241
        } while (vs->len == -1 && errno == EINTR);
2242
        if (vs->len == -1) {
2243
            err  = -errno;
2244
        }
2245
        v9fs_write_post_writev(s, vs, err);
2246
        return;
2247
    }
2248

    
2249
out:
2250
    complete_pdu(s, vs->pdu, err);
2251
    qemu_free(vs);
2252
}
2253

    
2254
static void v9fs_xattr_write(V9fsState *s, V9fsWriteState *vs)
2255
{
2256
    int i, to_copy;
2257
    ssize_t err = 0;
2258
    int write_count;
2259
    int64_t xattr_len;
2260

    
2261
    xattr_len = vs->fidp->fs.xattr.len;
2262
    write_count = xattr_len - vs->off;
2263
    if (write_count > vs->count) {
2264
        write_count = vs->count;
2265
    } else if (write_count < 0) {
2266
        /*
2267
         * write beyond XATTR value len specified in
2268
         * xattrcreate
2269
         */
2270
        err = -ENOSPC;
2271
        goto out;
2272
    }
2273
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "d", write_count);
2274
    err = vs->offset;
2275
    vs->fidp->fs.xattr.copied_len += write_count;
2276
    /*
2277
     * Now copy the content from sg list
2278
     */
2279
    for (i = 0; i < vs->cnt; i++) {
2280
        if (write_count > vs->sg[i].iov_len) {
2281
            to_copy = vs->sg[i].iov_len;
2282
        } else {
2283
            to_copy = write_count;
2284
        }
2285
        memcpy((char *)vs->fidp->fs.xattr.value + vs->off,
2286
               vs->sg[i].iov_base, to_copy);
2287
        /* updating vs->off since we are not using below */
2288
        vs->off += to_copy;
2289
        write_count -= to_copy;
2290
    }
2291
out:
2292
    complete_pdu(s, vs->pdu, err);
2293
    qemu_free(vs);
2294
}
2295

    
2296
static void v9fs_write(V9fsState *s, V9fsPDU *pdu)
2297
{
2298
    int32_t fid;
2299
    V9fsWriteState *vs;
2300
    ssize_t err;
2301

    
2302
    vs = qemu_malloc(sizeof(*vs));
2303

    
2304
    vs->pdu = pdu;
2305
    vs->offset = 7;
2306
    vs->sg = vs->iov;
2307
    vs->total = 0;
2308
    vs->len = 0;
2309

    
2310
    pdu_unmarshal(vs->pdu, vs->offset, "dqdv", &fid, &vs->off, &vs->count,
2311
                  vs->sg, &vs->cnt);
2312

    
2313
    vs->fidp = lookup_fid(s, fid);
2314
    if (vs->fidp == NULL) {
2315
        err = -EINVAL;
2316
        goto out;
2317
    }
2318

    
2319
    if (vs->fidp->fid_type == P9_FID_FILE) {
2320
        if (vs->fidp->fs.fd == -1) {
2321
            err = -EINVAL;
2322
            goto out;
2323
        }
2324
    } else if (vs->fidp->fid_type == P9_FID_XATTR) {
2325
        /*
2326
         * setxattr operation
2327
         */
2328
        v9fs_xattr_write(s, vs);
2329
        return;
2330
    } else {
2331
        err = -EINVAL;
2332
        goto out;
2333
    }
2334
    err = v9fs_do_lseek(s, vs->fidp->fs.fd, vs->off, SEEK_SET);
2335

    
2336
    v9fs_write_post_lseek(s, vs, err);
2337
    return;
2338

    
2339
out:
2340
    complete_pdu(s, vs->pdu, err);
2341
    qemu_free(vs);
2342
}
2343

    
2344
static void v9fs_create_post_getiounit(V9fsState *s, V9fsCreateState *vs)
2345
{
2346
    int err;
2347
    v9fs_string_copy(&vs->fidp->path, &vs->fullname);
2348
    stat_to_qid(&vs->stbuf, &vs->qid);
2349

    
2350
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "Qd", &vs->qid, vs->iounit);
2351
    err = vs->offset;
2352

    
2353
    complete_pdu(s, vs->pdu, err);
2354
    v9fs_string_free(&vs->name);
2355
    v9fs_string_free(&vs->extension);
2356
    v9fs_string_free(&vs->fullname);
2357
    qemu_free(vs);
2358
}
2359

    
2360
static void v9fs_post_create(V9fsState *s, V9fsCreateState *vs, int err)
2361
{
2362
    if (err == 0) {
2363
        vs->iounit = get_iounit(s, &vs->fidp->path);
2364
        v9fs_create_post_getiounit(s, vs);
2365
        return;
2366
    }
2367

    
2368
    complete_pdu(s, vs->pdu, err);
2369
    v9fs_string_free(&vs->name);
2370
    v9fs_string_free(&vs->extension);
2371
    v9fs_string_free(&vs->fullname);
2372
    qemu_free(vs);
2373
}
2374

    
2375
static void v9fs_create_post_perms(V9fsState *s, V9fsCreateState *vs, int err)
2376
{
2377
    if (err) {
2378
        err = -errno;
2379
    }
2380
    v9fs_post_create(s, vs, err);
2381
}
2382

    
2383
static void v9fs_create_post_opendir(V9fsState *s, V9fsCreateState *vs,
2384
                                                                    int err)
2385
{
2386
    if (!vs->fidp->fs.dir) {
2387
        err = -errno;
2388
    }
2389
    vs->fidp->fid_type = P9_FID_DIR;
2390
    v9fs_post_create(s, vs, err);
2391
}
2392

    
2393
static void v9fs_create_post_dir_lstat(V9fsState *s, V9fsCreateState *vs,
2394
                                                                    int err)
2395
{
2396
    if (err) {
2397
        err = -errno;
2398
        goto out;
2399
    }
2400

    
2401
    vs->fidp->fs.dir = v9fs_do_opendir(s, &vs->fullname);
2402
    v9fs_create_post_opendir(s, vs, err);
2403
    return;
2404

    
2405
out:
2406
    v9fs_post_create(s, vs, err);
2407
}
2408

    
2409
static void v9fs_create_post_mkdir(V9fsState *s, V9fsCreateState *vs, int err)
2410
{
2411
    if (err) {
2412
        err = -errno;
2413
        goto out;
2414
    }
2415

    
2416
    err = v9fs_do_lstat(s, &vs->fullname, &vs->stbuf);
2417
    v9fs_create_post_dir_lstat(s, vs, err);
2418
    return;
2419

    
2420
out:
2421
    v9fs_post_create(s, vs, err);
2422
}
2423

    
2424
static void v9fs_create_post_fstat(V9fsState *s, V9fsCreateState *vs, int err)
2425
{
2426
    if (err) {
2427
        vs->fidp->fid_type = P9_FID_NONE;
2428
        close(vs->fidp->fs.fd);
2429
        err = -errno;
2430
    }
2431
    v9fs_post_create(s, vs, err);
2432
    return;
2433
}
2434

    
2435
static void v9fs_create_post_open2(V9fsState *s, V9fsCreateState *vs, int err)
2436
{
2437
    if (vs->fidp->fs.fd == -1) {
2438
        err = -errno;
2439
        goto out;
2440
    }
2441
    vs->fidp->fid_type = P9_FID_FILE;
2442
    err = v9fs_do_fstat(s, vs->fidp->fs.fd, &vs->stbuf);
2443
    v9fs_create_post_fstat(s, vs, err);
2444

    
2445
    return;
2446

    
2447
out:
2448
    v9fs_post_create(s, vs, err);
2449

    
2450
}
2451

    
2452
static void v9fs_create_post_lstat(V9fsState *s, V9fsCreateState *vs, int err)
2453
{
2454

    
2455
    if (err == 0 || errno != ENOENT) {
2456
        err = -errno;
2457
        goto out;
2458
    }
2459

    
2460
    if (vs->perm & P9_STAT_MODE_DIR) {
2461
        err = v9fs_do_mkdir(s, vs->fullname.data, vs->perm & 0777,
2462
                vs->fidp->uid, -1);
2463
        v9fs_create_post_mkdir(s, vs, err);
2464
    } else if (vs->perm & P9_STAT_MODE_SYMLINK) {
2465
        err = v9fs_do_symlink(s, vs->fidp, vs->extension.data,
2466
                vs->fullname.data, -1);
2467
        v9fs_create_post_perms(s, vs, err);
2468
    } else if (vs->perm & P9_STAT_MODE_LINK) {
2469
        int32_t nfid = atoi(vs->extension.data);
2470
        V9fsFidState *nfidp = lookup_fid(s, nfid);
2471
        if (nfidp == NULL) {
2472
            err = -errno;
2473
            v9fs_post_create(s, vs, err);
2474
        }
2475
        err = v9fs_do_link(s, &nfidp->path, &vs->fullname);
2476
        v9fs_create_post_perms(s, vs, err);
2477
    } else if (vs->perm & P9_STAT_MODE_DEVICE) {
2478
        char ctype;
2479
        uint32_t major, minor;
2480
        mode_t nmode = 0;
2481

    
2482
        if (sscanf(vs->extension.data, "%c %u %u", &ctype, &major,
2483
                                        &minor) != 3) {
2484
            err = -errno;
2485
            v9fs_post_create(s, vs, err);
2486
        }
2487

    
2488
        switch (ctype) {
2489
        case 'c':
2490
            nmode = S_IFCHR;
2491
            break;
2492
        case 'b':
2493
            nmode = S_IFBLK;
2494
            break;
2495
        default:
2496
            err = -EIO;
2497
            v9fs_post_create(s, vs, err);
2498
        }
2499

    
2500
        nmode |= vs->perm & 0777;
2501
        err = v9fs_do_mknod(s, vs->fullname.data, nmode,
2502
                makedev(major, minor), vs->fidp->uid, -1);
2503
        v9fs_create_post_perms(s, vs, err);
2504
    } else if (vs->perm & P9_STAT_MODE_NAMED_PIPE) {
2505
        err = v9fs_do_mknod(s, vs->fullname.data, S_IFIFO | (vs->perm & 0777),
2506
                0, vs->fidp->uid, -1);
2507
        v9fs_post_create(s, vs, err);
2508
    } else if (vs->perm & P9_STAT_MODE_SOCKET) {
2509
        err = v9fs_do_mknod(s, vs->fullname.data, S_IFSOCK | (vs->perm & 0777),
2510
                0, vs->fidp->uid, -1);
2511
        v9fs_post_create(s, vs, err);
2512
    } else {
2513
        vs->fidp->fs.fd = v9fs_do_open2(s, vs->fullname.data, vs->fidp->uid,
2514
                -1, omode_to_uflags(vs->mode)|O_CREAT, vs->perm);
2515

    
2516
        v9fs_create_post_open2(s, vs, err);
2517
    }
2518

    
2519
    return;
2520

    
2521
out:
2522
    v9fs_post_create(s, vs, err);
2523
}
2524

    
2525
static void v9fs_create(V9fsState *s, V9fsPDU *pdu)
2526
{
2527
    int32_t fid;
2528
    V9fsCreateState *vs;
2529
    int err = 0;
2530

    
2531
    vs = qemu_malloc(sizeof(*vs));
2532
    vs->pdu = pdu;
2533
    vs->offset = 7;
2534

    
2535
    v9fs_string_init(&vs->fullname);
2536

    
2537
    pdu_unmarshal(vs->pdu, vs->offset, "dsdbs", &fid, &vs->name,
2538
                                &vs->perm, &vs->mode, &vs->extension);
2539

    
2540
    vs->fidp = lookup_fid(s, fid);
2541
    if (vs->fidp == NULL) {
2542
        err = -EINVAL;
2543
        goto out;
2544
    }
2545

    
2546
    v9fs_string_sprintf(&vs->fullname, "%s/%s", vs->fidp->path.data,
2547
                                                        vs->name.data);
2548

    
2549
    err = v9fs_do_lstat(s, &vs->fullname, &vs->stbuf);
2550
    v9fs_create_post_lstat(s, vs, err);
2551
    return;
2552

    
2553
out:
2554
    complete_pdu(s, vs->pdu, err);
2555
    v9fs_string_free(&vs->name);
2556
    v9fs_string_free(&vs->extension);
2557
    qemu_free(vs);
2558
}
2559

    
2560
static void v9fs_post_symlink(V9fsState *s, V9fsSymlinkState *vs, int err)
2561
{
2562
    if (err == 0) {
2563
        stat_to_qid(&vs->stbuf, &vs->qid);
2564
        vs->offset += pdu_marshal(vs->pdu, vs->offset, "Q", &vs->qid);
2565
        err = vs->offset;
2566
    } else {
2567
        err = -errno;
2568
    }
2569
    complete_pdu(s, vs->pdu, err);
2570
    v9fs_string_free(&vs->name);
2571
    v9fs_string_free(&vs->symname);
2572
    v9fs_string_free(&vs->fullname);
2573
    qemu_free(vs);
2574
}
2575

    
2576
static void v9fs_symlink_post_do_symlink(V9fsState *s, V9fsSymlinkState *vs,
2577
        int err)
2578
{
2579
    if (err) {
2580
        goto out;
2581
    }
2582
    err = v9fs_do_lstat(s, &vs->fullname, &vs->stbuf);
2583
out:
2584
    v9fs_post_symlink(s, vs, err);
2585
}
2586

    
2587
static void v9fs_symlink(V9fsState *s, V9fsPDU *pdu)
2588
{
2589
    int32_t dfid;
2590
    V9fsSymlinkState *vs;
2591
    int err = 0;
2592
    gid_t gid;
2593

    
2594
    vs = qemu_malloc(sizeof(*vs));
2595
    vs->pdu = pdu;
2596
    vs->offset = 7;
2597

    
2598
    v9fs_string_init(&vs->fullname);
2599

    
2600
    pdu_unmarshal(vs->pdu, vs->offset, "dssd", &dfid, &vs->name,
2601
            &vs->symname, &gid);
2602

    
2603
    vs->dfidp = lookup_fid(s, dfid);
2604
    if (vs->dfidp == NULL) {
2605
        err = -EINVAL;
2606
        goto out;
2607
    }
2608

    
2609
    v9fs_string_sprintf(&vs->fullname, "%s/%s", vs->dfidp->path.data,
2610
            vs->name.data);
2611
    err = v9fs_do_symlink(s, vs->dfidp, vs->symname.data,
2612
            vs->fullname.data, gid);
2613
    v9fs_symlink_post_do_symlink(s, vs, err);
2614
    return;
2615

    
2616
out:
2617
    complete_pdu(s, vs->pdu, err);
2618
    v9fs_string_free(&vs->name);
2619
    v9fs_string_free(&vs->symname);
2620
    qemu_free(vs);
2621
}
2622

    
2623
static void v9fs_flush(V9fsState *s, V9fsPDU *pdu)
2624
{
2625
    /* A nop call with no return */
2626
    complete_pdu(s, pdu, 7);
2627
}
2628

    
2629
static void v9fs_link(V9fsState *s, V9fsPDU *pdu)
2630
{
2631
    int32_t dfid, oldfid;
2632
    V9fsFidState *dfidp, *oldfidp;
2633
    V9fsString name, fullname;
2634
    size_t offset = 7;
2635
    int err = 0;
2636

    
2637
    v9fs_string_init(&fullname);
2638

    
2639
    pdu_unmarshal(pdu, offset, "dds", &dfid, &oldfid, &name);
2640

    
2641
    dfidp = lookup_fid(s, dfid);
2642
    if (dfidp == NULL) {
2643
        err = -errno;
2644
        goto out;
2645
    }
2646

    
2647
    oldfidp = lookup_fid(s, oldfid);
2648
    if (oldfidp == NULL) {
2649
        err = -errno;
2650
        goto out;
2651
    }
2652

    
2653
    v9fs_string_sprintf(&fullname, "%s/%s", dfidp->path.data, name.data);
2654
    err = offset;
2655
    err = v9fs_do_link(s, &oldfidp->path, &fullname);
2656
    if (err) {
2657
        err = -errno;
2658
    }
2659
    v9fs_string_free(&fullname);
2660

    
2661
out:
2662
    v9fs_string_free(&name);
2663
    complete_pdu(s, pdu, err);
2664
}
2665

    
2666
static void v9fs_remove_post_remove(V9fsState *s, V9fsRemoveState *vs,
2667
                                                                int err)
2668
{
2669
    if (err < 0) {
2670
        err = -errno;
2671
    } else {
2672
        err = vs->offset;
2673
    }
2674

    
2675
    /* For TREMOVE we need to clunk the fid even on failed remove */
2676
    free_fid(s, vs->fidp->fid);
2677

    
2678
    complete_pdu(s, vs->pdu, err);
2679
    qemu_free(vs);
2680
}
2681

    
2682
static void v9fs_remove(V9fsState *s, V9fsPDU *pdu)
2683
{
2684
    int32_t fid;
2685
    V9fsRemoveState *vs;
2686
    int err = 0;
2687

    
2688
    vs = qemu_malloc(sizeof(*vs));
2689
    vs->pdu = pdu;
2690
    vs->offset = 7;
2691

    
2692
    pdu_unmarshal(vs->pdu, vs->offset, "d", &fid);
2693

    
2694
    vs->fidp = lookup_fid(s, fid);
2695
    if (vs->fidp == NULL) {
2696
        err = -EINVAL;
2697
        goto out;
2698
    }
2699

    
2700
    err = v9fs_do_remove(s, &vs->fidp->path);
2701
    v9fs_remove_post_remove(s, vs, err);
2702
    return;
2703

    
2704
out:
2705
    complete_pdu(s, pdu, err);
2706
    qemu_free(vs);
2707
}
2708

    
2709
static void v9fs_wstat_post_truncate(V9fsState *s, V9fsWstatState *vs, int err)
2710
{
2711
    if (err < 0) {
2712
        goto out;
2713
    }
2714

    
2715
    err = vs->offset;
2716

    
2717
out:
2718
    v9fs_stat_free(&vs->v9stat);
2719
    complete_pdu(s, vs->pdu, err);
2720
    qemu_free(vs);
2721
}
2722

    
2723
static void v9fs_wstat_post_rename(V9fsState *s, V9fsWstatState *vs, int err)
2724
{
2725
    if (err < 0) {
2726
        goto out;
2727
    }
2728
    if (vs->v9stat.length != -1) {
2729
        if (v9fs_do_truncate(s, &vs->fidp->path, vs->v9stat.length) < 0) {
2730
            err = -errno;
2731
        }
2732
    }
2733
    v9fs_wstat_post_truncate(s, vs, err);
2734
    return;
2735

    
2736
out:
2737
    v9fs_stat_free(&vs->v9stat);
2738
    complete_pdu(s, vs->pdu, err);
2739
    qemu_free(vs);
2740
}
2741

    
2742
static int v9fs_complete_rename(V9fsState *s, V9fsRenameState *vs)
2743
{
2744
    int err = 0;
2745
    char *old_name, *new_name;
2746
    char *end;
2747

    
2748
    if (vs->newdirfid != -1) {
2749
        V9fsFidState *dirfidp;
2750
        dirfidp = lookup_fid(s, vs->newdirfid);
2751

    
2752
        if (dirfidp == NULL) {
2753
            err = -ENOENT;
2754
            goto out;
2755
        }
2756

    
2757
        BUG_ON(dirfidp->fid_type != P9_FID_NONE);
2758

    
2759
        new_name = qemu_mallocz(dirfidp->path.size + vs->name.size + 2);
2760

    
2761
        strcpy(new_name, dirfidp->path.data);
2762
        strcat(new_name, "/");
2763
        strcat(new_name + dirfidp->path.size, vs->name.data);
2764
    } else {
2765
        old_name = vs->fidp->path.data;
2766
        end = strrchr(old_name, '/');
2767
        if (end) {
2768
            end++;
2769
        } else {
2770
            end = old_name;
2771
        }
2772
        new_name = qemu_mallocz(end - old_name + vs->name.size + 1);
2773

    
2774
        strncat(new_name, old_name, end - old_name);
2775
        strncat(new_name + (end - old_name), vs->name.data, vs->name.size);
2776
    }
2777

    
2778
    v9fs_string_free(&vs->name);
2779
    vs->name.data = qemu_strdup(new_name);
2780
    vs->name.size = strlen(new_name);
2781

    
2782
    if (strcmp(new_name, vs->fidp->path.data) != 0) {
2783
        if (v9fs_do_rename(s, &vs->fidp->path, &vs->name)) {
2784
            err = -errno;
2785
        } else {
2786
            V9fsFidState *fidp;
2787
            /*
2788
            * Fixup fid's pointing to the old name to
2789
            * start pointing to the new name
2790
            */
2791
            for (fidp = s->fid_list; fidp; fidp = fidp->next) {
2792
                if (vs->fidp == fidp) {
2793
                    /*
2794
                    * we replace name of this fid towards the end
2795
                    * so that our below strcmp will work
2796
                    */
2797
                    continue;
2798
                }
2799
                if (!strncmp(vs->fidp->path.data, fidp->path.data,
2800
                    strlen(vs->fidp->path.data))) {
2801
                    /* replace the name */
2802
                    v9fs_fix_path(&fidp->path, &vs->name,
2803
                                  strlen(vs->fidp->path.data));
2804
                }
2805
            }
2806
            v9fs_string_copy(&vs->fidp->path, &vs->name);
2807
        }
2808
    }
2809
out:
2810
    v9fs_string_free(&vs->name);
2811
    return err;
2812
}
2813

    
2814
static void v9fs_rename_post_rename(V9fsState *s, V9fsRenameState *vs, int err)
2815
{
2816
    complete_pdu(s, vs->pdu, err);
2817
    qemu_free(vs);
2818
}
2819

    
2820
static void v9fs_wstat_post_chown(V9fsState *s, V9fsWstatState *vs, int err)
2821
{
2822
    if (err < 0) {
2823
        goto out;
2824
    }
2825

    
2826
    if (vs->v9stat.name.size != 0) {
2827
        V9fsRenameState *vr;
2828

    
2829
        vr = qemu_mallocz(sizeof(V9fsRenameState));
2830
        vr->newdirfid = -1;
2831
        vr->pdu = vs->pdu;
2832
        vr->fidp = vs->fidp;
2833
        vr->offset = vs->offset;
2834
        vr->name.size = vs->v9stat.name.size;
2835
        vr->name.data = qemu_strdup(vs->v9stat.name.data);
2836

    
2837
        err = v9fs_complete_rename(s, vr);
2838
        qemu_free(vr);
2839
    }
2840
    v9fs_wstat_post_rename(s, vs, err);
2841
    return;
2842

    
2843
out:
2844
    v9fs_stat_free(&vs->v9stat);
2845
    complete_pdu(s, vs->pdu, err);
2846
    qemu_free(vs);
2847
}
2848

    
2849
static void v9fs_rename(V9fsState *s, V9fsPDU *pdu)
2850
{
2851
    int32_t fid;
2852
    V9fsRenameState *vs;
2853
    ssize_t err = 0;
2854

    
2855
    vs = qemu_malloc(sizeof(*vs));
2856
    vs->pdu = pdu;
2857
    vs->offset = 7;
2858

    
2859
    pdu_unmarshal(vs->pdu, vs->offset, "dds", &fid, &vs->newdirfid, &vs->name);
2860

    
2861
    vs->fidp = lookup_fid(s, fid);
2862
    if (vs->fidp == NULL) {
2863
        err = -ENOENT;
2864
        goto out;
2865
    }
2866

    
2867
    BUG_ON(vs->fidp->fid_type != P9_FID_NONE);
2868

    
2869
    err = v9fs_complete_rename(s, vs);
2870
    v9fs_rename_post_rename(s, vs, err);
2871
    return;
2872
out:
2873
    complete_pdu(s, vs->pdu, err);
2874
    qemu_free(vs);
2875
}
2876

    
2877
static void v9fs_wstat_post_utime(V9fsState *s, V9fsWstatState *vs, int err)
2878
{
2879
    if (err < 0) {
2880
        goto out;
2881
    }
2882

    
2883
    if (vs->v9stat.n_gid != -1 || vs->v9stat.n_uid != -1) {
2884
        if (v9fs_do_chown(s, &vs->fidp->path, vs->v9stat.n_uid,
2885
                    vs->v9stat.n_gid)) {
2886
            err = -errno;
2887
        }
2888
    }
2889
    v9fs_wstat_post_chown(s, vs, err);
2890
    return;
2891

    
2892
out:
2893
    v9fs_stat_free(&vs->v9stat);
2894
    complete_pdu(s, vs->pdu, err);
2895
    qemu_free(vs);
2896
}
2897

    
2898
static void v9fs_wstat_post_chmod(V9fsState *s, V9fsWstatState *vs, int err)
2899
{
2900
    if (err < 0) {
2901
        goto out;
2902
    }
2903

    
2904
    if (vs->v9stat.mtime != -1 || vs->v9stat.atime != -1) {
2905
        struct timespec times[2];
2906
        if (vs->v9stat.atime != -1) {
2907
            times[0].tv_sec = vs->v9stat.atime;
2908
            times[0].tv_nsec = 0;
2909
        } else {
2910
            times[0].tv_nsec = UTIME_OMIT;
2911
        }
2912
        if (vs->v9stat.mtime != -1) {
2913
            times[1].tv_sec = vs->v9stat.mtime;
2914
            times[1].tv_nsec = 0;
2915
        } else {
2916
            times[1].tv_nsec = UTIME_OMIT;
2917
        }
2918

    
2919
        if (v9fs_do_utimensat(s, &vs->fidp->path, times)) {
2920
            err = -errno;
2921
        }
2922
    }
2923

    
2924
    v9fs_wstat_post_utime(s, vs, err);
2925
    return;
2926

    
2927
out:
2928
    v9fs_stat_free(&vs->v9stat);
2929
    complete_pdu(s, vs->pdu, err);
2930
    qemu_free(vs);
2931
}
2932

    
2933
static void v9fs_wstat_post_fsync(V9fsState *s, V9fsWstatState *vs, int err)
2934
{
2935
    if (err == -1) {
2936
        err = -errno;
2937
    }
2938
    v9fs_stat_free(&vs->v9stat);
2939
    complete_pdu(s, vs->pdu, err);
2940
    qemu_free(vs);
2941
}
2942

    
2943
static void v9fs_wstat_post_lstat(V9fsState *s, V9fsWstatState *vs, int err)
2944
{
2945
    uint32_t v9_mode;
2946

    
2947
    if (err == -1) {
2948
        err = -errno;
2949
        goto out;
2950
    }
2951

    
2952
    v9_mode = stat_to_v9mode(&vs->stbuf);
2953

    
2954
    if ((vs->v9stat.mode & P9_STAT_MODE_TYPE_BITS) !=
2955
        (v9_mode & P9_STAT_MODE_TYPE_BITS)) {
2956
            /* Attempting to change the type */
2957
            err = -EIO;
2958
            goto out;
2959
    }
2960

    
2961
    if (v9fs_do_chmod(s, &vs->fidp->path, v9mode_to_mode(vs->v9stat.mode,
2962
                    &vs->v9stat.extension))) {
2963
            err = -errno;
2964
     }
2965
    v9fs_wstat_post_chmod(s, vs, err);
2966
    return;
2967

    
2968
out:
2969
    v9fs_stat_free(&vs->v9stat);
2970
    complete_pdu(s, vs->pdu, err);
2971
    qemu_free(vs);
2972
}
2973

    
2974
static void v9fs_wstat(V9fsState *s, V9fsPDU *pdu)
2975
{
2976
    int32_t fid;
2977
    V9fsWstatState *vs;
2978
    int err = 0;
2979

    
2980
    vs = qemu_malloc(sizeof(*vs));
2981
    vs->pdu = pdu;
2982
    vs->offset = 7;
2983

    
2984
    pdu_unmarshal(pdu, vs->offset, "dwS", &fid, &vs->unused, &vs->v9stat);
2985

    
2986
    vs->fidp = lookup_fid(s, fid);
2987
    if (vs->fidp == NULL) {
2988
        err = -EINVAL;
2989
        goto out;
2990
    }
2991

    
2992
    /* do we need to sync the file? */
2993
    if (donttouch_stat(&vs->v9stat)) {
2994
        err = v9fs_do_fsync(s, vs->fidp->fs.fd);
2995
        v9fs_wstat_post_fsync(s, vs, err);
2996
        return;
2997
    }
2998

    
2999
    if (vs->v9stat.mode != -1) {
3000
        err = v9fs_do_lstat(s, &vs->fidp->path, &vs->stbuf);
3001
        v9fs_wstat_post_lstat(s, vs, err);
3002
        return;
3003
    }
3004

    
3005
    v9fs_wstat_post_chmod(s, vs, err);
3006
    return;
3007

    
3008
out:
3009
    v9fs_stat_free(&vs->v9stat);
3010
    complete_pdu(s, vs->pdu, err);
3011
    qemu_free(vs);
3012
}
3013

    
3014
static void v9fs_statfs_post_statfs(V9fsState *s, V9fsStatfsState *vs, int err)
3015
{
3016
    int32_t bsize_factor;
3017

    
3018
    if (err) {
3019
        err = -errno;
3020
        goto out;
3021
    }
3022

    
3023
    /*
3024
     * compute bsize factor based on host file system block size
3025
     * and client msize
3026
     */
3027
    bsize_factor = (s->msize - P9_IOHDRSZ)/vs->stbuf.f_bsize;
3028
    if (!bsize_factor) {
3029
        bsize_factor = 1;
3030
    }
3031
    vs->v9statfs.f_type = vs->stbuf.f_type;
3032
    vs->v9statfs.f_bsize = vs->stbuf.f_bsize;
3033
    vs->v9statfs.f_bsize *= bsize_factor;
3034
    /*
3035
     * f_bsize is adjusted(multiplied) by bsize factor, so we need to
3036
     * adjust(divide) the number of blocks, free blocks and available
3037
     * blocks by bsize factor
3038
     */
3039
    vs->v9statfs.f_blocks = vs->stbuf.f_blocks/bsize_factor;
3040
    vs->v9statfs.f_bfree = vs->stbuf.f_bfree/bsize_factor;
3041
    vs->v9statfs.f_bavail = vs->stbuf.f_bavail/bsize_factor;
3042
    vs->v9statfs.f_files = vs->stbuf.f_files;
3043
    vs->v9statfs.f_ffree = vs->stbuf.f_ffree;
3044
    vs->v9statfs.fsid_val = (unsigned int) vs->stbuf.f_fsid.__val[0] |
3045
                        (unsigned long long)vs->stbuf.f_fsid.__val[1] << 32;
3046
    vs->v9statfs.f_namelen = vs->stbuf.f_namelen;
3047

    
3048
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "ddqqqqqqd",
3049
         vs->v9statfs.f_type, vs->v9statfs.f_bsize, vs->v9statfs.f_blocks,
3050
         vs->v9statfs.f_bfree, vs->v9statfs.f_bavail, vs->v9statfs.f_files,
3051
         vs->v9statfs.f_ffree, vs->v9statfs.fsid_val,
3052
         vs->v9statfs.f_namelen);
3053

    
3054
out:
3055
    complete_pdu(s, vs->pdu, vs->offset);
3056
    qemu_free(vs);
3057
}
3058

    
3059
static void v9fs_statfs(V9fsState *s, V9fsPDU *pdu)
3060
{
3061
    V9fsStatfsState *vs;
3062
    ssize_t err = 0;
3063

    
3064
    vs = qemu_malloc(sizeof(*vs));
3065
    vs->pdu = pdu;
3066
    vs->offset = 7;
3067

    
3068
    memset(&vs->v9statfs, 0, sizeof(vs->v9statfs));
3069

    
3070
    pdu_unmarshal(vs->pdu, vs->offset, "d", &vs->fid);
3071

    
3072
    vs->fidp = lookup_fid(s, vs->fid);
3073
    if (vs->fidp == NULL) {
3074
        err = -ENOENT;
3075
        goto out;
3076
    }
3077

    
3078
    err = v9fs_do_statfs(s, &vs->fidp->path, &vs->stbuf);
3079
    v9fs_statfs_post_statfs(s, vs, err);
3080
    return;
3081

    
3082
out:
3083
    complete_pdu(s, vs->pdu, err);
3084
    qemu_free(vs);
3085
}
3086

    
3087
static void v9fs_mknod_post_lstat(V9fsState *s, V9fsMkState *vs, int err)
3088
{
3089
    if (err == -1) {
3090
        err = -errno;
3091
        goto out;
3092
    }
3093

    
3094
    stat_to_qid(&vs->stbuf, &vs->qid);
3095
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "Q", &vs->qid);
3096
    err = vs->offset;
3097
out:
3098
    complete_pdu(s, vs->pdu, err);
3099
    v9fs_string_free(&vs->fullname);
3100
    v9fs_string_free(&vs->name);
3101
    qemu_free(vs);
3102
}
3103

    
3104
static void v9fs_mknod_post_mknod(V9fsState *s, V9fsMkState *vs, int err)
3105
{
3106
    if (err == -1) {
3107
        err = -errno;
3108
        goto out;
3109
    }
3110

    
3111
    err = v9fs_do_lstat(s, &vs->fullname, &vs->stbuf);
3112
    v9fs_mknod_post_lstat(s, vs, err);
3113
    return;
3114
out:
3115
    complete_pdu(s, vs->pdu, err);
3116
    v9fs_string_free(&vs->fullname);
3117
    v9fs_string_free(&vs->name);
3118
    qemu_free(vs);
3119
}
3120

    
3121
static void v9fs_mknod(V9fsState *s, V9fsPDU *pdu)
3122
{
3123
    int32_t fid;
3124
    V9fsMkState *vs;
3125
    int err = 0;
3126
    V9fsFidState *fidp;
3127
    gid_t gid;
3128
    int mode;
3129
    int major, minor;
3130

    
3131
    vs = qemu_malloc(sizeof(*vs));
3132
    vs->pdu = pdu;
3133
    vs->offset = 7;
3134

    
3135
    v9fs_string_init(&vs->fullname);
3136
    pdu_unmarshal(vs->pdu, vs->offset, "dsdddd", &fid, &vs->name, &mode,
3137
        &major, &minor, &gid);
3138

    
3139
    fidp = lookup_fid(s, fid);
3140
    if (fidp == NULL) {
3141
        err = -ENOENT;
3142
        goto out;
3143
    }
3144

    
3145
    v9fs_string_sprintf(&vs->fullname, "%s/%s", fidp->path.data, vs->name.data);
3146
    err = v9fs_do_mknod(s, vs->fullname.data, mode, makedev(major, minor),
3147
        fidp->uid, gid);
3148
    v9fs_mknod_post_mknod(s, vs, err);
3149
    return;
3150

    
3151
out:
3152
    complete_pdu(s, vs->pdu, err);
3153
    v9fs_string_free(&vs->fullname);
3154
    v9fs_string_free(&vs->name);
3155
    qemu_free(vs);
3156
}
3157

    
3158
static void v9fs_mkdir_post_lstat(V9fsState *s, V9fsMkState *vs, int err)
3159
{
3160
    if (err == -1) {
3161
        err = -errno;
3162
        goto out;
3163
    }
3164

    
3165
    stat_to_qid(&vs->stbuf, &vs->qid);
3166
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "Q", &vs->qid);
3167
    err = vs->offset;
3168
out:
3169
    complete_pdu(s, vs->pdu, err);
3170
    v9fs_string_free(&vs->fullname);
3171
    v9fs_string_free(&vs->name);
3172
    qemu_free(vs);
3173
}
3174

    
3175
static void v9fs_mkdir_post_mkdir(V9fsState *s, V9fsMkState *vs, int err)
3176
{
3177
    if (err == -1) {
3178
        err = -errno;
3179
        goto out;
3180
    }
3181

    
3182
    err = v9fs_do_lstat(s, &vs->fullname, &vs->stbuf);
3183
    v9fs_mkdir_post_lstat(s, vs, err);
3184
    return;
3185
out:
3186
    complete_pdu(s, vs->pdu, err);
3187
    v9fs_string_free(&vs->fullname);
3188
    v9fs_string_free(&vs->name);
3189
    qemu_free(vs);
3190
}
3191

    
3192
static void v9fs_mkdir(V9fsState *s, V9fsPDU *pdu)
3193
{
3194
    int32_t fid;
3195
    V9fsMkState *vs;
3196
    int err = 0;
3197
    V9fsFidState *fidp;
3198
    gid_t gid;
3199
    int mode;
3200

    
3201
    vs = qemu_malloc(sizeof(*vs));
3202
    vs->pdu = pdu;
3203
    vs->offset = 7;
3204

    
3205
    v9fs_string_init(&vs->fullname);
3206
    pdu_unmarshal(vs->pdu, vs->offset, "dsdd", &fid, &vs->name, &mode,
3207
        &gid);
3208

    
3209
    fidp = lookup_fid(s, fid);
3210
    if (fidp == NULL) {
3211
        err = -ENOENT;
3212
        goto out;
3213
    }
3214

    
3215
    v9fs_string_sprintf(&vs->fullname, "%s/%s", fidp->path.data, vs->name.data);
3216
    err = v9fs_do_mkdir(s, vs->fullname.data, mode, fidp->uid, gid);
3217
    v9fs_mkdir_post_mkdir(s, vs, err);
3218
    return;
3219

    
3220
out:
3221
    complete_pdu(s, vs->pdu, err);
3222
    v9fs_string_free(&vs->fullname);
3223
    v9fs_string_free(&vs->name);
3224
    qemu_free(vs);
3225
}
3226

    
3227
static void v9fs_post_xattr_getvalue(V9fsState *s, V9fsXattrState *vs, int err)
3228
{
3229

    
3230
    if (err < 0) {
3231
        err = -errno;
3232
        free_fid(s, vs->xattr_fidp->fid);
3233
        goto out;
3234
    }
3235
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "q", vs->size);
3236
    err = vs->offset;
3237
out:
3238
    complete_pdu(s, vs->pdu, err);
3239
    v9fs_string_free(&vs->name);
3240
    qemu_free(vs);
3241
    return;
3242
}
3243

    
3244
static void v9fs_post_xattr_check(V9fsState *s, V9fsXattrState *vs, ssize_t err)
3245
{
3246
    if (err < 0) {
3247
        err = -errno;
3248
        free_fid(s, vs->xattr_fidp->fid);
3249
        goto out;
3250
    }
3251
    /*
3252
     * Read the xattr value
3253
     */
3254
    vs->xattr_fidp->fs.xattr.len = vs->size;
3255
    vs->xattr_fidp->fid_type = P9_FID_XATTR;
3256
    vs->xattr_fidp->fs.xattr.copied_len = -1;
3257
    if (vs->size) {
3258
        vs->xattr_fidp->fs.xattr.value = qemu_malloc(vs->size);
3259
        err = v9fs_do_lgetxattr(s, &vs->xattr_fidp->path,
3260
                                &vs->name, vs->xattr_fidp->fs.xattr.value,
3261
                                vs->xattr_fidp->fs.xattr.len);
3262
    }
3263
    v9fs_post_xattr_getvalue(s, vs, err);
3264
    return;
3265
out:
3266
    complete_pdu(s, vs->pdu, err);
3267
    v9fs_string_free(&vs->name);
3268
    qemu_free(vs);
3269
}
3270

    
3271
static void v9fs_post_lxattr_getvalue(V9fsState *s,
3272
                                      V9fsXattrState *vs, int err)
3273
{
3274
    if (err < 0) {
3275
        err = -errno;
3276
        free_fid(s, vs->xattr_fidp->fid);
3277
        goto out;
3278
    }
3279
    vs->offset += pdu_marshal(vs->pdu, vs->offset, "q", vs->size);
3280
    err = vs->offset;
3281
out:
3282
    complete_pdu(s, vs->pdu, err);
3283
    v9fs_string_free(&vs->name);
3284
    qemu_free(vs);
3285
    return;
3286
}
3287

    
3288
static void v9fs_post_lxattr_check(V9fsState *s,
3289
                                   V9fsXattrState *vs, ssize_t err)
3290
{
3291
    if (err < 0) {
3292
        err = -errno;
3293
        free_fid(s, vs->xattr_fidp->fid);
3294
        goto out;
3295
    }
3296
    /*
3297
     * Read the xattr value
3298
     */
3299
    vs->xattr_fidp->fs.xattr.len = vs->size;
3300
    vs->xattr_fidp->fid_type = P9_FID_XATTR;
3301
    vs->xattr_fidp->fs.xattr.copied_len = -1;
3302
    if (vs->size) {
3303
        vs->xattr_fidp->fs.xattr.value = qemu_malloc(vs->size);
3304
        err = v9fs_do_llistxattr(s, &vs->xattr_fidp->path,
3305
                                 vs->xattr_fidp->fs.xattr.value,
3306
                                 vs->xattr_fidp->fs.xattr.len);
3307
    }
3308
    v9fs_post_lxattr_getvalue(s, vs, err);
3309
    return;
3310
out:
3311
    complete_pdu(s, vs->pdu, err);
3312
    v9fs_string_free(&vs->name);
3313
    qemu_free(vs);
3314
}
3315

    
3316
static void v9fs_xattrwalk(V9fsState *s, V9fsPDU *pdu)
3317
{
3318
    ssize_t err = 0;
3319
    V9fsXattrState *vs;
3320
    int32_t fid, newfid;
3321

    
3322
    vs = qemu_malloc(sizeof(*vs));
3323
    vs->pdu = pdu;
3324
    vs->offset = 7;
3325

    
3326
    pdu_unmarshal(vs->pdu, vs->offset, "dds", &fid, &newfid, &vs->name);
3327
    vs->file_fidp = lookup_fid(s, fid);
3328
    if (vs->file_fidp == NULL) {
3329
        err = -ENOENT;
3330
        goto out;
3331
    }
3332

    
3333
    vs->xattr_fidp = alloc_fid(s, newfid);
3334
    if (vs->xattr_fidp == NULL) {
3335
        err = -EINVAL;
3336
        goto out;
3337
    }
3338

    
3339
    v9fs_string_copy(&vs->xattr_fidp->path, &vs->file_fidp->path);
3340
    if (vs->name.data[0] == 0) {
3341
        /*
3342
         * listxattr request. Get the size first
3343
         */
3344
        vs->size = v9fs_do_llistxattr(s, &vs->xattr_fidp->path,
3345
                                      NULL, 0);
3346
        if (vs->size < 0) {
3347
            err = vs->size;
3348
        }
3349
        v9fs_post_lxattr_check(s, vs, err);
3350
        return;
3351
    } else {
3352
        /*
3353
         * specific xattr fid. We check for xattr
3354
         * presence also collect the xattr size
3355
         */
3356
        vs->size = v9fs_do_lgetxattr(s, &vs->xattr_fidp->path,
3357
                                     &vs->name, NULL, 0);
3358
        if (vs->size < 0) {
3359
            err = vs->size;
3360
        }
3361
        v9fs_post_xattr_check(s, vs, err);
3362
        return;
3363
    }
3364
out:
3365
    complete_pdu(s, vs->pdu, err);
3366
    v9fs_string_free(&vs->name);
3367
    qemu_free(vs);
3368
}
3369

    
3370
static void v9fs_xattrcreate(V9fsState *s, V9fsPDU *pdu)
3371
{
3372
    int flags;
3373
    int32_t fid;
3374
    ssize_t err = 0;
3375
    V9fsXattrState *vs;
3376

    
3377
    vs = qemu_malloc(sizeof(*vs));
3378
    vs->pdu = pdu;
3379
    vs->offset = 7;
3380

    
3381
    pdu_unmarshal(vs->pdu, vs->offset, "dsqd",
3382
                  &fid, &vs->name, &vs->size, &flags);
3383

    
3384
    vs->file_fidp = lookup_fid(s, fid);
3385
    if (vs->file_fidp == NULL) {
3386
        err = -EINVAL;
3387
        goto out;
3388
    }
3389

    
3390
    /* Make the file fid point to xattr */
3391
    vs->xattr_fidp = vs->file_fidp;
3392
    vs->xattr_fidp->fid_type = P9_FID_XATTR;
3393
    vs->xattr_fidp->fs.xattr.copied_len = 0;
3394
    vs->xattr_fidp->fs.xattr.len = vs->size;
3395
    vs->xattr_fidp->fs.xattr.flags = flags;
3396
    v9fs_string_init(&vs->xattr_fidp->fs.xattr.name);
3397
    v9fs_string_copy(&vs->xattr_fidp->fs.xattr.name, &vs->name);
3398
    if (vs->size)
3399
        vs->xattr_fidp->fs.xattr.value = qemu_malloc(vs->size);
3400
    else
3401
        vs->xattr_fidp->fs.xattr.value = NULL;
3402

    
3403
out:
3404
    complete_pdu(s, vs->pdu, err);
3405
    v9fs_string_free(&vs->name);
3406
    qemu_free(vs);
3407
}
3408

    
3409
typedef void (pdu_handler_t)(V9fsState *s, V9fsPDU *pdu);
3410

    
3411
static pdu_handler_t *pdu_handlers[] = {
3412
    [P9_TREADDIR] = v9fs_readdir,
3413
    [P9_TSTATFS] = v9fs_statfs,
3414
    [P9_TGETATTR] = v9fs_getattr,
3415
    [P9_TSETATTR] = v9fs_setattr,
3416
    [P9_TXATTRWALK] = v9fs_xattrwalk,
3417
    [P9_TXATTRCREATE] = v9fs_xattrcreate,
3418
    [P9_TMKNOD] = v9fs_mknod,
3419
    [P9_TRENAME] = v9fs_rename,
3420
    [P9_TMKDIR] = v9fs_mkdir,
3421
    [P9_TVERSION] = v9fs_version,
3422
    [P9_TLOPEN] = v9fs_open,
3423
    [P9_TATTACH] = v9fs_attach,
3424
    [P9_TSTAT] = v9fs_stat,
3425
    [P9_TWALK] = v9fs_walk,
3426
    [P9_TCLUNK] = v9fs_clunk,
3427
    [P9_TOPEN] = v9fs_open,
3428
    [P9_TREAD] = v9fs_read,
3429
#if 0
3430
    [P9_TAUTH] = v9fs_auth,
3431
#endif
3432
    [P9_TFLUSH] = v9fs_flush,
3433
    [P9_TLINK] = v9fs_link,
3434
    [P9_TSYMLINK] = v9fs_symlink,
3435
    [P9_TCREATE] = v9fs_create,
3436
    [P9_TLCREATE] = v9fs_lcreate,
3437
    [P9_TWRITE] = v9fs_write,
3438
    [P9_TWSTAT] = v9fs_wstat,
3439
    [P9_TREMOVE] = v9fs_remove,
3440
};
3441

    
3442
static void submit_pdu(V9fsState *s, V9fsPDU *pdu)
3443
{
3444
    pdu_handler_t *handler;
3445

    
3446
    if (debug_9p_pdu) {
3447
        pprint_pdu(pdu);
3448
    }
3449

    
3450
    BUG_ON(pdu->id >= ARRAY_SIZE(pdu_handlers));
3451

    
3452
    handler = pdu_handlers[pdu->id];
3453
    BUG_ON(handler == NULL);
3454

    
3455
    handler(s, pdu);
3456
}
3457

    
3458
static void handle_9p_output(VirtIODevice *vdev, VirtQueue *vq)
3459
{
3460
    V9fsState *s = (V9fsState *)vdev;
3461
    V9fsPDU *pdu;
3462
    ssize_t len;
3463

    
3464
    while ((pdu = alloc_pdu(s)) &&
3465
            (len = virtqueue_pop(vq, &pdu->elem)) != 0) {
3466
        uint8_t *ptr;
3467

    
3468
        BUG_ON(pdu->elem.out_num == 0 || pdu->elem.in_num == 0);
3469
        BUG_ON(pdu->elem.out_sg[0].iov_len < 7);
3470

    
3471
        ptr = pdu->elem.out_sg[0].iov_base;
3472

    
3473
        memcpy(&pdu->size, ptr, 4);
3474
        pdu->id = ptr[4];
3475
        memcpy(&pdu->tag, ptr + 5, 2);
3476

    
3477
        submit_pdu(s, pdu);
3478
    }
3479

    
3480
    free_pdu(s, pdu);
3481
}
3482

    
3483
static uint32_t virtio_9p_get_features(VirtIODevice *vdev, uint32_t features)
3484
{
3485
    features |= 1 << VIRTIO_9P_MOUNT_TAG;
3486
    return features;
3487
}
3488

    
3489
static V9fsState *to_virtio_9p(VirtIODevice *vdev)
3490
{
3491
    return (V9fsState *)vdev;
3492
}
3493

    
3494
static void virtio_9p_get_config(VirtIODevice *vdev, uint8_t *config)
3495
{
3496
    struct virtio_9p_config *cfg;
3497
    V9fsState *s = to_virtio_9p(vdev);
3498

    
3499
    cfg = qemu_mallocz(sizeof(struct virtio_9p_config) +
3500
                        s->tag_len);
3501
    stw_raw(&cfg->tag_len, s->tag_len);
3502
    memcpy(cfg->tag, s->tag, s->tag_len);
3503
    memcpy(config, cfg, s->config_size);
3504
    qemu_free(cfg);
3505
}
3506

    
3507
VirtIODevice *virtio_9p_init(DeviceState *dev, V9fsConf *conf)
3508
 {
3509
    V9fsState *s;
3510
    int i, len;
3511
    struct stat stat;
3512
    FsTypeEntry *fse;
3513

    
3514

    
3515
    s = (V9fsState *)virtio_common_init("virtio-9p",
3516
                                    VIRTIO_ID_9P,
3517
                                    sizeof(struct virtio_9p_config)+
3518
                                    MAX_TAG_LEN,
3519
                                    sizeof(V9fsState));
3520

    
3521
    /* initialize pdu allocator */
3522
    QLIST_INIT(&s->free_list);
3523
    for (i = 0; i < (MAX_REQ - 1); i++) {
3524
        QLIST_INSERT_HEAD(&s->free_list, &s->pdus[i], next);
3525
    }
3526

    
3527
    s->vq = virtio_add_queue(&s->vdev, MAX_REQ, handle_9p_output);
3528

    
3529
    fse = get_fsdev_fsentry(conf->fsdev_id);
3530

    
3531
    if (!fse) {
3532
        /* We don't have a fsdev identified by fsdev_id */
3533
        fprintf(stderr, "Virtio-9p device couldn't find fsdev "
3534
                    "with the id %s\n", conf->fsdev_id);
3535
        exit(1);
3536
    }
3537

    
3538
    if (!fse->path || !conf->tag) {
3539
        /* we haven't specified a mount_tag or the path */
3540
        fprintf(stderr, "fsdev with id %s needs path "
3541
                "and Virtio-9p device needs mount_tag arguments\n",
3542
                conf->fsdev_id);
3543
        exit(1);
3544
    }
3545

    
3546
    if (!strcmp(fse->security_model, "passthrough")) {
3547
        /* Files on the Fileserver set to client user credentials */
3548
        s->ctx.fs_sm = SM_PASSTHROUGH;
3549
    } else if (!strcmp(fse->security_model, "mapped")) {
3550
        /* Files on the fileserver are set to QEMU credentials.
3551
         * Client user credentials are saved in extended attributes.
3552
         */
3553
        s->ctx.fs_sm = SM_MAPPED;
3554
    } else if (!strcmp(fse->security_model, "none")) {
3555
        /*
3556
         * Files on the fileserver are set to QEMU credentials.
3557
         */
3558
        s->ctx.fs_sm = SM_NONE;
3559

    
3560
    } else {
3561
        fprintf(stderr, "Default to security_model=none. You may want"
3562
                " enable advanced security model using "
3563
                "security option:\n\t security_model=passthrough \n\t "
3564
                "security_model=mapped\n");
3565
        s->ctx.fs_sm = SM_NONE;
3566
    }
3567

    
3568
    if (lstat(fse->path, &stat)) {
3569
        fprintf(stderr, "share path %s does not exist\n", fse->path);
3570
        exit(1);
3571
    } else if (!S_ISDIR(stat.st_mode)) {
3572
        fprintf(stderr, "share path %s is not a directory \n", fse->path);
3573
        exit(1);
3574
    }
3575

    
3576
    s->ctx.fs_root = qemu_strdup(fse->path);
3577
    len = strlen(conf->tag);
3578
    if (len > MAX_TAG_LEN) {
3579
        len = MAX_TAG_LEN;
3580
    }
3581
    /* s->tag is non-NULL terminated string */
3582
    s->tag = qemu_malloc(len);
3583
    memcpy(s->tag, conf->tag, len);
3584
    s->tag_len = len;
3585
    s->ctx.uid = -1;
3586

    
3587
    s->ops = fse->ops;
3588
    s->vdev.get_features = virtio_9p_get_features;
3589
    s->config_size = sizeof(struct virtio_9p_config) +
3590
                        s->tag_len;
3591
    s->vdev.get_config = virtio_9p_get_config;
3592

    
3593
    return &s->vdev;
3594
}