Statistics
| Branch: | Revision:

root / qemu-option.c @ bb67ab02

History | View | Annotate | Download (24.4 kB)

1
/*
2
 * Commandline option parsing functions
3
 *
4
 * Copyright (c) 2003-2008 Fabrice Bellard
5
 * Copyright (c) 2009 Kevin Wolf <kwolf@redhat.com>
6
 *
7
 * Permission is hereby granted, free of charge, to any person obtaining a copy
8
 * of this software and associated documentation files (the "Software"), to deal
9
 * in the Software without restriction, including without limitation the rights
10
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
11
 * copies of the Software, and to permit persons to whom the Software is
12
 * furnished to do so, subject to the following conditions:
13
 *
14
 * The above copyright notice and this permission notice shall be included in
15
 * all copies or substantial portions of the Software.
16
 *
17
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
21
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
22
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
23
 * THE SOFTWARE.
24
 */
25

    
26
#include <stdio.h>
27
#include <string.h>
28

    
29
#include "qemu-common.h"
30
#include "qemu-error.h"
31
#include "qemu-objects.h"
32
#include "qemu-option.h"
33
#include "qerror.h"
34

    
35
/*
36
 * Extracts the name of an option from the parameter string (p points at the
37
 * first byte of the option name)
38
 *
39
 * The option name is delimited by delim (usually , or =) or the string end
40
 * and is copied into buf. If the option name is longer than buf_size, it is
41
 * truncated. buf is always zero terminated.
42
 *
43
 * The return value is the position of the delimiter/zero byte after the option
44
 * name in p.
45
 */
46
const char *get_opt_name(char *buf, int buf_size, const char *p, char delim)
47
{
48
    char *q;
49

    
50
    q = buf;
51
    while (*p != '\0' && *p != delim) {
52
        if (q && (q - buf) < buf_size - 1)
53
            *q++ = *p;
54
        p++;
55
    }
56
    if (q)
57
        *q = '\0';
58

    
59
    return p;
60
}
61

    
62
/*
63
 * Extracts the value of an option from the parameter string p (p points at the
64
 * first byte of the option value)
65
 *
66
 * This function is comparable to get_opt_name with the difference that the
67
 * delimiter is fixed to be comma which starts a new option. To specify an
68
 * option value that contains commas, double each comma.
69
 */
70
const char *get_opt_value(char *buf, int buf_size, const char *p)
71
{
72
    char *q;
73

    
74
    q = buf;
75
    while (*p != '\0') {
76
        if (*p == ',') {
77
            if (*(p + 1) != ',')
78
                break;
79
            p++;
80
        }
81
        if (q && (q - buf) < buf_size - 1)
82
            *q++ = *p;
83
        p++;
84
    }
85
    if (q)
86
        *q = '\0';
87

    
88
    return p;
89
}
90

    
91
int get_next_param_value(char *buf, int buf_size,
92
                         const char *tag, const char **pstr)
93
{
94
    const char *p;
95
    char option[128];
96

    
97
    p = *pstr;
98
    for(;;) {
99
        p = get_opt_name(option, sizeof(option), p, '=');
100
        if (*p != '=')
101
            break;
102
        p++;
103
        if (!strcmp(tag, option)) {
104
            *pstr = get_opt_value(buf, buf_size, p);
105
            if (**pstr == ',') {
106
                (*pstr)++;
107
            }
108
            return strlen(buf);
109
        } else {
110
            p = get_opt_value(NULL, 0, p);
111
        }
112
        if (*p != ',')
113
            break;
114
        p++;
115
    }
116
    return 0;
117
}
118

    
119
int get_param_value(char *buf, int buf_size,
120
                    const char *tag, const char *str)
121
{
122
    return get_next_param_value(buf, buf_size, tag, &str);
123
}
124

    
125
int check_params(char *buf, int buf_size,
126
                 const char * const *params, const char *str)
127
{
128
    const char *p;
129
    int i;
130

    
131
    p = str;
132
    while (*p != '\0') {
133
        p = get_opt_name(buf, buf_size, p, '=');
134
        if (*p != '=') {
135
            return -1;
136
        }
137
        p++;
138
        for (i = 0; params[i] != NULL; i++) {
139
            if (!strcmp(params[i], buf)) {
140
                break;
141
            }
142
        }
143
        if (params[i] == NULL) {
144
            return -1;
145
        }
146
        p = get_opt_value(NULL, 0, p);
147
        if (*p != ',') {
148
            break;
149
        }
150
        p++;
151
    }
152
    return 0;
153
}
154

    
155
/*
156
 * Searches an option list for an option with the given name
157
 */
158
QEMUOptionParameter *get_option_parameter(QEMUOptionParameter *list,
159
    const char *name)
160
{
161
    while (list && list->name) {
162
        if (!strcmp(list->name, name)) {
163
            return list;
164
        }
165
        list++;
166
    }
167

    
168
    return NULL;
169
}
170

    
171
static int parse_option_bool(const char *name, const char *value, int *ret)
172
{
173
    if (value != NULL) {
174
        if (!strcmp(value, "on")) {
175
            *ret = 1;
176
        } else if (!strcmp(value, "off")) {
177
            *ret = 0;
178
        } else {
179
            qerror_report(QERR_INVALID_PARAMETER_VALUE, name, "'on' or 'off'");
180
            return -1;
181
        }
182
    } else {
183
        *ret = 1;
184
    }
185
    return 0;
186
}
187

    
188
static int parse_option_number(const char *name, const char *value, uint64_t *ret)
189
{
190
    char *postfix;
191
    uint64_t number;
192

    
193
    if (value != NULL) {
194
        number = strtoull(value, &postfix, 0);
195
        if (*postfix != '\0') {
196
            qerror_report(QERR_INVALID_PARAMETER_VALUE, name, "a number");
197
            return -1;
198
        }
199
        *ret = number;
200
    } else {
201
        qerror_report(QERR_INVALID_PARAMETER_VALUE, name, "a number");
202
        return -1;
203
    }
204
    return 0;
205
}
206

    
207
static int parse_option_size(const char *name, const char *value, uint64_t *ret)
208
{
209
    char *postfix;
210
    double sizef;
211

    
212
    if (value != NULL) {
213
        sizef = strtod(value, &postfix);
214
        switch (*postfix) {
215
        case 'T':
216
            sizef *= 1024;
217
        case 'G':
218
            sizef *= 1024;
219
        case 'M':
220
            sizef *= 1024;
221
        case 'K':
222
        case 'k':
223
            sizef *= 1024;
224
        case 'b':
225
        case '\0':
226
            *ret = (uint64_t) sizef;
227
            break;
228
        default:
229
            qerror_report(QERR_INVALID_PARAMETER_VALUE, name, "a size");
230
            error_printf_unless_qmp("You may use k, M, G or T suffixes for "
231
                    "kilobytes, megabytes, gigabytes and terabytes.\n");
232
            return -1;
233
        }
234
    } else {
235
        qerror_report(QERR_INVALID_PARAMETER_VALUE, name, "a size");
236
        return -1;
237
    }
238
    return 0;
239
}
240

    
241
/*
242
 * Sets the value of a parameter in a given option list. The parsing of the
243
 * value depends on the type of option:
244
 *
245
 * OPT_FLAG (uses value.n):
246
 *      If no value is given, the flag is set to 1.
247
 *      Otherwise the value must be "on" (set to 1) or "off" (set to 0)
248
 *
249
 * OPT_STRING (uses value.s):
250
 *      value is strdup()ed and assigned as option value
251
 *
252
 * OPT_SIZE (uses value.n):
253
 *      The value is converted to an integer. Suffixes for kilobytes etc. are
254
 *      allowed (powers of 1024).
255
 *
256
 * Returns 0 on succes, -1 in error cases
257
 */
258
int set_option_parameter(QEMUOptionParameter *list, const char *name,
259
    const char *value)
260
{
261
    int flag;
262

    
263
    // Find a matching parameter
264
    list = get_option_parameter(list, name);
265
    if (list == NULL) {
266
        fprintf(stderr, "Unknown option '%s'\n", name);
267
        return -1;
268
    }
269

    
270
    // Process parameter
271
    switch (list->type) {
272
    case OPT_FLAG:
273
        if (parse_option_bool(name, value, &flag) == -1)
274
            return -1;
275
        list->value.n = flag;
276
        break;
277

    
278
    case OPT_STRING:
279
        if (value != NULL) {
280
            list->value.s = qemu_strdup(value);
281
        } else {
282
            fprintf(stderr, "Option '%s' needs a parameter\n", name);
283
            return -1;
284
        }
285
        break;
286

    
287
    case OPT_SIZE:
288
        if (parse_option_size(name, value, &list->value.n) == -1)
289
            return -1;
290
        break;
291

    
292
    default:
293
        fprintf(stderr, "Bug: Option '%s' has an unknown type\n", name);
294
        return -1;
295
    }
296

    
297
    return 0;
298
}
299

    
300
/*
301
 * Sets the given parameter to an integer instead of a string.
302
 * This function cannot be used to set string options.
303
 *
304
 * Returns 0 on success, -1 in error cases
305
 */
306
int set_option_parameter_int(QEMUOptionParameter *list, const char *name,
307
    uint64_t value)
308
{
309
    // Find a matching parameter
310
    list = get_option_parameter(list, name);
311
    if (list == NULL) {
312
        fprintf(stderr, "Unknown option '%s'\n", name);
313
        return -1;
314
    }
315

    
316
    // Process parameter
317
    switch (list->type) {
318
    case OPT_FLAG:
319
    case OPT_NUMBER:
320
    case OPT_SIZE:
321
        list->value.n = value;
322
        break;
323

    
324
    default:
325
        return -1;
326
    }
327

    
328
    return 0;
329
}
330

    
331
/*
332
 * Frees a option list. If it contains strings, the strings are freed as well.
333
 */
334
void free_option_parameters(QEMUOptionParameter *list)
335
{
336
    QEMUOptionParameter *cur = list;
337

    
338
    while (cur && cur->name) {
339
        if (cur->type == OPT_STRING) {
340
            qemu_free(cur->value.s);
341
        }
342
        cur++;
343
    }
344

    
345
    qemu_free(list);
346
}
347

    
348
/*
349
 * Count valid options in list
350
 */
351
static size_t count_option_parameters(QEMUOptionParameter *list)
352
{
353
    size_t num_options = 0;
354

    
355
    while (list && list->name) {
356
        num_options++;
357
        list++;
358
    }
359

    
360
    return num_options;
361
}
362

    
363
/*
364
 * Append an option list (list) to an option list (dest).
365
 *
366
 * If dest is NULL, a new copy of list is created.
367
 *
368
 * Returns a pointer to the first element of dest (or the newly allocated copy)
369
 */
370
QEMUOptionParameter *append_option_parameters(QEMUOptionParameter *dest,
371
    QEMUOptionParameter *list)
372
{
373
    size_t num_options, num_dest_options;
374

    
375
    num_options = count_option_parameters(dest);
376
    num_dest_options = num_options;
377

    
378
    num_options += count_option_parameters(list);
379

    
380
    dest = qemu_realloc(dest, (num_options + 1) * sizeof(QEMUOptionParameter));
381
    dest[num_dest_options].name = NULL;
382

    
383
    while (list && list->name) {
384
        if (get_option_parameter(dest, list->name) == NULL) {
385
            dest[num_dest_options++] = *list;
386
            dest[num_dest_options].name = NULL;
387
        }
388
        list++;
389
    }
390

    
391
    return dest;
392
}
393

    
394
/*
395
 * Parses a parameter string (param) into an option list (dest).
396
 *
397
 * list is the templace is. If dest is NULL, a new copy of list is created for
398
 * it. If list is NULL, this function fails.
399
 *
400
 * A parameter string consists of one or more parameters, separated by commas.
401
 * Each parameter consists of its name and possibly of a value. In the latter
402
 * case, the value is delimited by an = character. To specify a value which
403
 * contains commas, double each comma so it won't be recognized as the end of
404
 * the parameter.
405
 *
406
 * For more details of the parsing see above.
407
 *
408
 * Returns a pointer to the first element of dest (or the newly allocated copy)
409
 * or NULL in error cases
410
 */
411
QEMUOptionParameter *parse_option_parameters(const char *param,
412
    QEMUOptionParameter *list, QEMUOptionParameter *dest)
413
{
414
    QEMUOptionParameter *allocated = NULL;
415
    char name[256];
416
    char value[256];
417
    char *param_delim, *value_delim;
418
    char next_delim;
419
    size_t num_options;
420

    
421
    if (list == NULL) {
422
        return NULL;
423
    }
424

    
425
    if (dest == NULL) {
426
        // Count valid options
427
        num_options = count_option_parameters(list);
428

    
429
        // Create a copy of the option list to fill in values
430
        dest = qemu_mallocz((num_options + 1) * sizeof(QEMUOptionParameter));
431
        allocated = dest;
432
        memcpy(dest, list, (num_options + 1) * sizeof(QEMUOptionParameter));
433
    }
434

    
435
    while (*param) {
436

    
437
        // Find parameter name and value in the string
438
        param_delim = strchr(param, ',');
439
        value_delim = strchr(param, '=');
440

    
441
        if (value_delim && (value_delim < param_delim || !param_delim)) {
442
            next_delim = '=';
443
        } else {
444
            next_delim = ',';
445
            value_delim = NULL;
446
        }
447

    
448
        param = get_opt_name(name, sizeof(name), param, next_delim);
449
        if (value_delim) {
450
            param = get_opt_value(value, sizeof(value), param + 1);
451
        }
452
        if (*param != '\0') {
453
            param++;
454
        }
455

    
456
        // Set the parameter
457
        if (set_option_parameter(dest, name, value_delim ? value : NULL)) {
458
            goto fail;
459
        }
460
    }
461

    
462
    return dest;
463

    
464
fail:
465
    // Only free the list if it was newly allocated
466
    free_option_parameters(allocated);
467
    return NULL;
468
}
469

    
470
/*
471
 * Prints all options of a list that have a value to stdout
472
 */
473
void print_option_parameters(QEMUOptionParameter *list)
474
{
475
    while (list && list->name) {
476
        switch (list->type) {
477
            case OPT_STRING:
478
                 if (list->value.s != NULL) {
479
                     printf("%s='%s' ", list->name, list->value.s);
480
                 }
481
                break;
482
            case OPT_FLAG:
483
                printf("%s=%s ", list->name, list->value.n ? "on" : "off");
484
                break;
485
            case OPT_SIZE:
486
            case OPT_NUMBER:
487
                printf("%s=%" PRId64 " ", list->name, list->value.n);
488
                break;
489
            default:
490
                printf("%s=(unkown type) ", list->name);
491
                break;
492
        }
493
        list++;
494
    }
495
}
496

    
497
/*
498
 * Prints an overview of all available options
499
 */
500
void print_option_help(QEMUOptionParameter *list)
501
{
502
    printf("Supported options:\n");
503
    while (list && list->name) {
504
        printf("%-16s %s\n", list->name,
505
            list->help ? list->help : "No description available");
506
        list++;
507
    }
508
}
509

    
510
/* ------------------------------------------------------------------ */
511

    
512
struct QemuOpt {
513
    const char   *name;
514
    const char   *str;
515

    
516
    const QemuOptDesc *desc;
517
    union {
518
        int      boolean;
519
        uint64_t uint;
520
    } value;
521

    
522
    QemuOpts     *opts;
523
    QTAILQ_ENTRY(QemuOpt) next;
524
};
525

    
526
struct QemuOpts {
527
    char *id;
528
    QemuOptsList *list;
529
    Location loc;
530
    QTAILQ_HEAD(QemuOptHead, QemuOpt) head;
531
    QTAILQ_ENTRY(QemuOpts) next;
532
};
533

    
534
static QemuOpt *qemu_opt_find(QemuOpts *opts, const char *name)
535
{
536
    QemuOpt *opt;
537

    
538
    QTAILQ_FOREACH_REVERSE(opt, &opts->head, QemuOptHead, next) {
539
        if (strcmp(opt->name, name) != 0)
540
            continue;
541
        return opt;
542
    }
543
    return NULL;
544
}
545

    
546
const char *qemu_opt_get(QemuOpts *opts, const char *name)
547
{
548
    QemuOpt *opt = qemu_opt_find(opts, name);
549
    return opt ? opt->str : NULL;
550
}
551

    
552
int qemu_opt_get_bool(QemuOpts *opts, const char *name, int defval)
553
{
554
    QemuOpt *opt = qemu_opt_find(opts, name);
555

    
556
    if (opt == NULL)
557
        return defval;
558
    assert(opt->desc && opt->desc->type == QEMU_OPT_BOOL);
559
    return opt->value.boolean;
560
}
561

    
562
uint64_t qemu_opt_get_number(QemuOpts *opts, const char *name, uint64_t defval)
563
{
564
    QemuOpt *opt = qemu_opt_find(opts, name);
565

    
566
    if (opt == NULL)
567
        return defval;
568
    assert(opt->desc && opt->desc->type == QEMU_OPT_NUMBER);
569
    return opt->value.uint;
570
}
571

    
572
uint64_t qemu_opt_get_size(QemuOpts *opts, const char *name, uint64_t defval)
573
{
574
    QemuOpt *opt = qemu_opt_find(opts, name);
575

    
576
    if (opt == NULL)
577
        return defval;
578
    assert(opt->desc && opt->desc->type == QEMU_OPT_SIZE);
579
    return opt->value.uint;
580
}
581

    
582
static int qemu_opt_parse(QemuOpt *opt)
583
{
584
    if (opt->desc == NULL)
585
        return 0;
586
    switch (opt->desc->type) {
587
    case QEMU_OPT_STRING:
588
        /* nothing */
589
        return 0;
590
    case QEMU_OPT_BOOL:
591
        return parse_option_bool(opt->name, opt->str, &opt->value.boolean);
592
    case QEMU_OPT_NUMBER:
593
        return parse_option_number(opt->name, opt->str, &opt->value.uint);
594
    case QEMU_OPT_SIZE:
595
        return parse_option_size(opt->name, opt->str, &opt->value.uint);
596
    default:
597
        abort();
598
    }
599
}
600

    
601
static void qemu_opt_del(QemuOpt *opt)
602
{
603
    QTAILQ_REMOVE(&opt->opts->head, opt, next);
604
    qemu_free((/* !const */ char*)opt->name);
605
    qemu_free((/* !const */ char*)opt->str);
606
    qemu_free(opt);
607
}
608

    
609
int qemu_opt_set(QemuOpts *opts, const char *name, const char *value)
610
{
611
    QemuOpt *opt;
612
    const QemuOptDesc *desc = opts->list->desc;
613
    int i;
614

    
615
    for (i = 0; desc[i].name != NULL; i++) {
616
        if (strcmp(desc[i].name, name) == 0) {
617
            break;
618
        }
619
    }
620
    if (desc[i].name == NULL) {
621
        if (i == 0) {
622
            /* empty list -> allow any */;
623
        } else {
624
            qerror_report(QERR_INVALID_PARAMETER, name);
625
            return -1;
626
        }
627
    }
628

    
629
    opt = qemu_mallocz(sizeof(*opt));
630
    opt->name = qemu_strdup(name);
631
    opt->opts = opts;
632
    QTAILQ_INSERT_TAIL(&opts->head, opt, next);
633
    if (desc[i].name != NULL) {
634
        opt->desc = desc+i;
635
    }
636
    if (value) {
637
        opt->str = qemu_strdup(value);
638
    }
639
    if (qemu_opt_parse(opt) < 0) {
640
        qemu_opt_del(opt);
641
        return -1;
642
    }
643
    return 0;
644
}
645

    
646
int qemu_opt_foreach(QemuOpts *opts, qemu_opt_loopfunc func, void *opaque,
647
                     int abort_on_failure)
648
{
649
    QemuOpt *opt;
650
    int rc = 0;
651

    
652
    QTAILQ_FOREACH(opt, &opts->head, next) {
653
        rc = func(opt->name, opt->str, opaque);
654
        if (abort_on_failure  &&  rc != 0)
655
            break;
656
    }
657
    return rc;
658
}
659

    
660
QemuOpts *qemu_opts_find(QemuOptsList *list, const char *id)
661
{
662
    QemuOpts *opts;
663

    
664
    QTAILQ_FOREACH(opts, &list->head, next) {
665
        if (!opts->id) {
666
            continue;
667
        }
668
        if (strcmp(opts->id, id) != 0) {
669
            continue;
670
        }
671
        return opts;
672
    }
673
    return NULL;
674
}
675

    
676
static int id_wellformed(const char *id)
677
{
678
    int i;
679

    
680
    if (!qemu_isalpha(id[0])) {
681
        return 0;
682
    }
683
    for (i = 1; id[i]; i++) {
684
        if (!qemu_isalnum(id[i]) && !strchr("-._", id[i])) {
685
            return 0;
686
        }
687
    }
688
    return 1;
689
}
690

    
691
QemuOpts *qemu_opts_create(QemuOptsList *list, const char *id, int fail_if_exists)
692
{
693
    QemuOpts *opts = NULL;
694

    
695
    if (id) {
696
        if (!id_wellformed(id)) {
697
            qerror_report(QERR_INVALID_PARAMETER_VALUE, "id", "an identifier");
698
            error_printf_unless_qmp("Identifiers consist of letters, digits, '-', '.', '_', starting with a letter.\n");
699
            return NULL;
700
        }
701
        opts = qemu_opts_find(list, id);
702
        if (opts != NULL) {
703
            if (fail_if_exists) {
704
                qerror_report(QERR_DUPLICATE_ID, id, list->name);
705
                return NULL;
706
            } else {
707
                return opts;
708
            }
709
        }
710
    }
711
    opts = qemu_mallocz(sizeof(*opts));
712
    if (id) {
713
        opts->id = qemu_strdup(id);
714
    }
715
    opts->list = list;
716
    loc_save(&opts->loc);
717
    QTAILQ_INIT(&opts->head);
718
    QTAILQ_INSERT_TAIL(&list->head, opts, next);
719
    return opts;
720
}
721

    
722
void qemu_opts_reset(QemuOptsList *list)
723
{
724
    QemuOpts *opts, *next_opts;
725

    
726
    QTAILQ_FOREACH_SAFE(opts, &list->head, next, next_opts) {
727
        qemu_opts_del(opts);
728
    }
729
}
730

    
731
int qemu_opts_set(QemuOptsList *list, const char *id,
732
                  const char *name, const char *value)
733
{
734
    QemuOpts *opts;
735

    
736
    opts = qemu_opts_create(list, id, 1);
737
    if (opts == NULL) {
738
        return -1;
739
    }
740
    return qemu_opt_set(opts, name, value);
741
}
742

    
743
const char *qemu_opts_id(QemuOpts *opts)
744
{
745
    return opts->id;
746
}
747

    
748
void qemu_opts_del(QemuOpts *opts)
749
{
750
    QemuOpt *opt;
751

    
752
    for (;;) {
753
        opt = QTAILQ_FIRST(&opts->head);
754
        if (opt == NULL)
755
            break;
756
        qemu_opt_del(opt);
757
    }
758
    QTAILQ_REMOVE(&opts->list->head, opts, next);
759
    qemu_free(opts->id);
760
    qemu_free(opts);
761
}
762

    
763
int qemu_opts_print(QemuOpts *opts, void *dummy)
764
{
765
    QemuOpt *opt;
766

    
767
    fprintf(stderr, "%s: %s:", opts->list->name,
768
            opts->id ? opts->id : "<noid>");
769
    QTAILQ_FOREACH(opt, &opts->head, next) {
770
        fprintf(stderr, " %s=\"%s\"", opt->name, opt->str);
771
    }
772
    fprintf(stderr, "\n");
773
    return 0;
774
}
775

    
776
int qemu_opts_do_parse(QemuOpts *opts, const char *params, const char *firstname)
777
{
778
    char option[128], value[1024];
779
    const char *p,*pe,*pc;
780

    
781
    for (p = params; *p != '\0'; p++) {
782
        pe = strchr(p, '=');
783
        pc = strchr(p, ',');
784
        if (!pe || (pc && pc < pe)) {
785
            /* found "foo,more" */
786
            if (p == params && firstname) {
787
                /* implicitly named first option */
788
                pstrcpy(option, sizeof(option), firstname);
789
                p = get_opt_value(value, sizeof(value), p);
790
            } else {
791
                /* option without value, probably a flag */
792
                p = get_opt_name(option, sizeof(option), p, ',');
793
                if (strncmp(option, "no", 2) == 0) {
794
                    memmove(option, option+2, strlen(option+2)+1);
795
                    pstrcpy(value, sizeof(value), "off");
796
                } else {
797
                    pstrcpy(value, sizeof(value), "on");
798
                }
799
            }
800
        } else {
801
            /* found "foo=bar,more" */
802
            p = get_opt_name(option, sizeof(option), p, '=');
803
            if (*p != '=') {
804
                break;
805
            }
806
            p++;
807
            p = get_opt_value(value, sizeof(value), p);
808
        }
809
        if (strcmp(option, "id") != 0) {
810
            /* store and parse */
811
            if (qemu_opt_set(opts, option, value) == -1) {
812
                return -1;
813
            }
814
        }
815
        if (*p != ',') {
816
            break;
817
        }
818
    }
819
    return 0;
820
}
821

    
822
QemuOpts *qemu_opts_parse(QemuOptsList *list, const char *params,
823
                          int permit_abbrev)
824
{
825
    const char *firstname;
826
    char value[1024], *id = NULL;
827
    const char *p;
828
    QemuOpts *opts;
829

    
830
    assert(!permit_abbrev || list->implied_opt_name);
831
    firstname = permit_abbrev ? list->implied_opt_name : NULL;
832

    
833
    if (strncmp(params, "id=", 3) == 0) {
834
        get_opt_value(value, sizeof(value), params+3);
835
        id = value;
836
    } else if ((p = strstr(params, ",id=")) != NULL) {
837
        get_opt_value(value, sizeof(value), p+4);
838
        id = value;
839
    }
840
    opts = qemu_opts_create(list, id, 1);
841
    if (opts == NULL)
842
        return NULL;
843

    
844
    if (qemu_opts_do_parse(opts, params, firstname) != 0) {
845
        qemu_opts_del(opts);
846
        return NULL;
847
    }
848

    
849
    return opts;
850
}
851

    
852
static void qemu_opts_from_qdict_1(const char *key, QObject *obj, void *opaque)
853
{
854
    char buf[32];
855
    const char *value;
856
    int n;
857

    
858
    if (!strcmp(key, "id")) {
859
        return;
860
    }
861

    
862
    switch (qobject_type(obj)) {
863
    case QTYPE_QSTRING:
864
        value = qstring_get_str(qobject_to_qstring(obj));
865
        break;
866
    case QTYPE_QINT:
867
        n = snprintf(buf, sizeof(buf), "%" PRId64,
868
                     qint_get_int(qobject_to_qint(obj)));
869
        assert(n < sizeof(buf));
870
        value = buf;
871
        break;
872
    case QTYPE_QFLOAT:
873
        n = snprintf(buf, sizeof(buf), "%.17g",
874
                     qfloat_get_double(qobject_to_qfloat(obj)));
875
        assert(n < sizeof(buf));
876
        value = buf;
877
        break;
878
    case QTYPE_QBOOL:
879
        pstrcpy(buf, sizeof(buf),
880
                qbool_get_int(qobject_to_qbool(obj)) ? "on" : "off");
881
        value = buf;
882
        break;
883
    default:
884
        return;
885
    }
886
    qemu_opt_set(opaque, key, value);
887
}
888

    
889
/*
890
 * Create QemuOpts from a QDict.
891
 * Use value of key "id" as ID if it exists and is a QString.
892
 * Only QStrings, QInts, QFloats and QBools are copied.  Entries with
893
 * other types are silently ignored.
894
 */
895
QemuOpts *qemu_opts_from_qdict(QemuOptsList *list, const QDict *qdict)
896
{
897
    QemuOpts *opts;
898

    
899
    opts = qemu_opts_create(list, qdict_get_try_str(qdict, "id"), 1);
900
    if (opts == NULL)
901
        return NULL;
902

    
903
    qdict_iter(qdict, qemu_opts_from_qdict_1, opts);
904
    return opts;
905
}
906

    
907
/*
908
 * Convert from QemuOpts to QDict.
909
 * The QDict values are of type QString.
910
 * TODO We'll want to use types appropriate for opt->desc->type, but
911
 * this is enough for now.
912
 */
913
QDict *qemu_opts_to_qdict(QemuOpts *opts, QDict *qdict)
914
{
915
    QemuOpt *opt;
916
    QObject *val;
917

    
918
    if (!qdict) {
919
        qdict = qdict_new();
920
    }
921
    if (opts->id) {
922
        qdict_put(qdict, "id", qstring_from_str(opts->id));
923
    }
924
    QTAILQ_FOREACH(opt, &opts->head, next) {
925
        val = QOBJECT(qstring_from_str(opt->str));
926
        qdict_put_obj(qdict, opt->name, val);
927
    }
928
    return qdict;
929
}
930

    
931
/* Validate parsed opts against descriptions where no
932
 * descriptions were provided in the QemuOptsList.
933
 */
934
int qemu_opts_validate(QemuOpts *opts, const QemuOptDesc *desc)
935
{
936
    QemuOpt *opt;
937

    
938
    assert(opts->list->desc[0].name == NULL);
939

    
940
    QTAILQ_FOREACH(opt, &opts->head, next) {
941
        int i;
942

    
943
        for (i = 0; desc[i].name != NULL; i++) {
944
            if (strcmp(desc[i].name, opt->name) == 0) {
945
                break;
946
            }
947
        }
948
        if (desc[i].name == NULL) {
949
            qerror_report(QERR_INVALID_PARAMETER, opt->name);
950
            return -1;
951
        }
952

    
953
        opt->desc = &desc[i];
954

    
955
        if (qemu_opt_parse(opt) < 0) {
956
            return -1;
957
        }
958
    }
959

    
960
    return 0;
961
}
962

    
963
int qemu_opts_foreach(QemuOptsList *list, qemu_opts_loopfunc func, void *opaque,
964
                      int abort_on_failure)
965
{
966
    Location loc;
967
    QemuOpts *opts;
968
    int rc = 0;
969

    
970
    loc_push_none(&loc);
971
    QTAILQ_FOREACH(opts, &list->head, next) {
972
        loc_restore(&opts->loc);
973
        rc |= func(opts, opaque);
974
        if (abort_on_failure  &&  rc != 0)
975
            break;
976
    }
977
    loc_pop(&loc);
978
    return rc;
979
}