2 * Commandline option parsing functions
4 * Copyright (c) 2003-2008 Fabrice Bellard
5 * Copyright (c) 2009 Kevin Wolf <kwolf@redhat.com>
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:
14 * The above copyright notice and this permission notice shall be included in
15 * all copies or substantial portions of the Software.
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
29 #include "qemu-common.h"
30 #include "qemu-error.h"
31 #include "qemu-objects.h"
32 #include "qemu-option.h"
36 * Extracts the name of an option from the parameter string (p points at the
37 * first byte of the option name)
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.
43 * The return value is the position of the delimiter/zero byte after the option
46 const char *get_opt_name(char *buf
, int buf_size
, const char *p
, char delim
)
51 while (*p
!= '\0' && *p
!= delim
) {
52 if (q
&& (q
- buf
) < buf_size
- 1)
63 * Extracts the value of an option from the parameter string p (p points at the
64 * first byte of the option value)
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.
70 const char *get_opt_value(char *buf
, int buf_size
, const char *p
)
81 if (q
&& (q
- buf
) < buf_size
- 1)
91 int get_next_param_value(char *buf
, int buf_size
,
92 const char *tag
, const char **pstr
)
99 p
= get_opt_name(option
, sizeof(option
), p
, '=');
103 if (!strcmp(tag
, option
)) {
104 *pstr
= get_opt_value(buf
, buf_size
, p
);
110 p
= get_opt_value(NULL
, 0, p
);
119 int get_param_value(char *buf
, int buf_size
,
120 const char *tag
, const char *str
)
122 return get_next_param_value(buf
, buf_size
, tag
, &str
);
125 int check_params(char *buf
, int buf_size
,
126 const char * const *params
, const char *str
)
133 p
= get_opt_name(buf
, buf_size
, p
, '=');
138 for (i
= 0; params
[i
] != NULL
; i
++) {
139 if (!strcmp(params
[i
], buf
)) {
143 if (params
[i
] == NULL
) {
146 p
= get_opt_value(NULL
, 0, p
);
156 * Searches an option list for an option with the given name
158 QEMUOptionParameter
*get_option_parameter(QEMUOptionParameter
*list
,
161 while (list
&& list
->name
) {
162 if (!strcmp(list
->name
, name
)) {
171 static int parse_option_bool(const char *name
, const char *value
, int *ret
)
174 if (!strcmp(value
, "on")) {
176 } else if (!strcmp(value
, "off")) {
179 qerror_report(QERR_INVALID_PARAMETER_VALUE
, name
, "'on' or 'off'");
188 static int parse_option_number(const char *name
, const char *value
, uint64_t *ret
)
194 number
= strtoull(value
, &postfix
, 0);
195 if (*postfix
!= '\0') {
196 qerror_report(QERR_INVALID_PARAMETER_VALUE
, name
, "a number");
201 qerror_report(QERR_INVALID_PARAMETER_VALUE
, name
, "a number");
207 static int parse_option_size(const char *name
, const char *value
, uint64_t *ret
)
213 sizef
= strtod(value
, &postfix
);
226 *ret
= (uint64_t) sizef
;
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");
235 qerror_report(QERR_INVALID_PARAMETER_VALUE
, name
, "a size");
242 * Sets the value of a parameter in a given option list. The parsing of the
243 * value depends on the type of option:
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)
249 * OPT_STRING (uses value.s):
250 * value is strdup()ed and assigned as option value
252 * OPT_SIZE (uses value.n):
253 * The value is converted to an integer. Suffixes for kilobytes etc. are
254 * allowed (powers of 1024).
256 * Returns 0 on succes, -1 in error cases
258 int set_option_parameter(QEMUOptionParameter
*list
, const char *name
,
263 // Find a matching parameter
264 list
= get_option_parameter(list
, name
);
266 fprintf(stderr
, "Unknown option '%s'\n", name
);
271 switch (list
->type
) {
273 if (parse_option_bool(name
, value
, &flag
) == -1)
275 list
->value
.n
= flag
;
280 list
->value
.s
= g_strdup(value
);
282 fprintf(stderr
, "Option '%s' needs a parameter\n", name
);
288 if (parse_option_size(name
, value
, &list
->value
.n
) == -1)
293 fprintf(stderr
, "Bug: Option '%s' has an unknown type\n", name
);
301 * Sets the given parameter to an integer instead of a string.
302 * This function cannot be used to set string options.
304 * Returns 0 on success, -1 in error cases
306 int set_option_parameter_int(QEMUOptionParameter
*list
, const char *name
,
309 // Find a matching parameter
310 list
= get_option_parameter(list
, name
);
312 fprintf(stderr
, "Unknown option '%s'\n", name
);
317 switch (list
->type
) {
321 list
->value
.n
= value
;
332 * Frees a option list. If it contains strings, the strings are freed as well.
334 void free_option_parameters(QEMUOptionParameter
*list
)
336 QEMUOptionParameter
*cur
= list
;
338 while (cur
&& cur
->name
) {
339 if (cur
->type
== OPT_STRING
) {
340 g_free(cur
->value
.s
);
349 * Count valid options in list
351 static size_t count_option_parameters(QEMUOptionParameter
*list
)
353 size_t num_options
= 0;
355 while (list
&& list
->name
) {
364 * Append an option list (list) to an option list (dest).
366 * If dest is NULL, a new copy of list is created.
368 * Returns a pointer to the first element of dest (or the newly allocated copy)
370 QEMUOptionParameter
*append_option_parameters(QEMUOptionParameter
*dest
,
371 QEMUOptionParameter
*list
)
373 size_t num_options
, num_dest_options
;
375 num_options
= count_option_parameters(dest
);
376 num_dest_options
= num_options
;
378 num_options
+= count_option_parameters(list
);
380 dest
= g_realloc(dest
, (num_options
+ 1) * sizeof(QEMUOptionParameter
));
381 dest
[num_dest_options
].name
= NULL
;
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
;
395 * Parses a parameter string (param) into an option list (dest).
397 * list is the template option list. If dest is NULL, a new copy of list is
398 * created. If list is NULL, this function fails.
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
406 * For more details of the parsing see above.
408 * Returns a pointer to the first element of dest (or the newly allocated copy)
409 * or NULL in error cases
411 QEMUOptionParameter
*parse_option_parameters(const char *param
,
412 QEMUOptionParameter
*list
, QEMUOptionParameter
*dest
)
414 QEMUOptionParameter
*allocated
= NULL
;
417 char *param_delim
, *value_delim
;
425 dest
= allocated
= append_option_parameters(NULL
, list
);
430 // Find parameter name and value in the string
431 param_delim
= strchr(param
, ',');
432 value_delim
= strchr(param
, '=');
434 if (value_delim
&& (value_delim
< param_delim
|| !param_delim
)) {
441 param
= get_opt_name(name
, sizeof(name
), param
, next_delim
);
443 param
= get_opt_value(value
, sizeof(value
), param
+ 1);
445 if (*param
!= '\0') {
450 if (set_option_parameter(dest
, name
, value_delim
? value
: NULL
)) {
458 // Only free the list if it was newly allocated
459 free_option_parameters(allocated
);
464 * Prints all options of a list that have a value to stdout
466 void print_option_parameters(QEMUOptionParameter
*list
)
468 while (list
&& list
->name
) {
469 switch (list
->type
) {
471 if (list
->value
.s
!= NULL
) {
472 printf("%s='%s' ", list
->name
, list
->value
.s
);
476 printf("%s=%s ", list
->name
, list
->value
.n
? "on" : "off");
480 printf("%s=%" PRId64
" ", list
->name
, list
->value
.n
);
483 printf("%s=(unkown type) ", list
->name
);
491 * Prints an overview of all available options
493 void print_option_help(QEMUOptionParameter
*list
)
495 printf("Supported options:\n");
496 while (list
&& list
->name
) {
497 printf("%-16s %s\n", list
->name
,
498 list
->help
? list
->help
: "No description available");
503 /* ------------------------------------------------------------------ */
509 const QemuOptDesc
*desc
;
516 QTAILQ_ENTRY(QemuOpt
) next
;
523 QTAILQ_HEAD(QemuOptHead
, QemuOpt
) head
;
524 QTAILQ_ENTRY(QemuOpts
) next
;
527 static QemuOpt
*qemu_opt_find(QemuOpts
*opts
, const char *name
)
531 QTAILQ_FOREACH_REVERSE(opt
, &opts
->head
, QemuOptHead
, next
) {
532 if (strcmp(opt
->name
, name
) != 0)
539 const char *qemu_opt_get(QemuOpts
*opts
, const char *name
)
541 QemuOpt
*opt
= qemu_opt_find(opts
, name
);
542 return opt
? opt
->str
: NULL
;
545 int qemu_opt_get_bool(QemuOpts
*opts
, const char *name
, int defval
)
547 QemuOpt
*opt
= qemu_opt_find(opts
, name
);
551 assert(opt
->desc
&& opt
->desc
->type
== QEMU_OPT_BOOL
);
552 return opt
->value
.boolean
;
555 uint64_t qemu_opt_get_number(QemuOpts
*opts
, const char *name
, uint64_t defval
)
557 QemuOpt
*opt
= qemu_opt_find(opts
, name
);
561 assert(opt
->desc
&& opt
->desc
->type
== QEMU_OPT_NUMBER
);
562 return opt
->value
.uint
;
565 uint64_t qemu_opt_get_size(QemuOpts
*opts
, const char *name
, uint64_t defval
)
567 QemuOpt
*opt
= qemu_opt_find(opts
, name
);
571 assert(opt
->desc
&& opt
->desc
->type
== QEMU_OPT_SIZE
);
572 return opt
->value
.uint
;
575 static int qemu_opt_parse(QemuOpt
*opt
)
577 if (opt
->desc
== NULL
)
579 switch (opt
->desc
->type
) {
580 case QEMU_OPT_STRING
:
584 return parse_option_bool(opt
->name
, opt
->str
, &opt
->value
.boolean
);
585 case QEMU_OPT_NUMBER
:
586 return parse_option_number(opt
->name
, opt
->str
, &opt
->value
.uint
);
588 return parse_option_size(opt
->name
, opt
->str
, &opt
->value
.uint
);
594 static void qemu_opt_del(QemuOpt
*opt
)
596 QTAILQ_REMOVE(&opt
->opts
->head
, opt
, next
);
597 g_free((/* !const */ char*)opt
->name
);
598 g_free((/* !const */ char*)opt
->str
);
602 int qemu_opt_set(QemuOpts
*opts
, const char *name
, const char *value
)
605 const QemuOptDesc
*desc
= opts
->list
->desc
;
608 for (i
= 0; desc
[i
].name
!= NULL
; i
++) {
609 if (strcmp(desc
[i
].name
, name
) == 0) {
613 if (desc
[i
].name
== NULL
) {
615 /* empty list -> allow any */;
617 qerror_report(QERR_INVALID_PARAMETER
, name
);
622 opt
= g_malloc0(sizeof(*opt
));
623 opt
->name
= g_strdup(name
);
625 QTAILQ_INSERT_TAIL(&opts
->head
, opt
, next
);
626 if (desc
[i
].name
!= NULL
) {
630 opt
->str
= g_strdup(value
);
632 if (qemu_opt_parse(opt
) < 0) {
639 int qemu_opt_foreach(QemuOpts
*opts
, qemu_opt_loopfunc func
, void *opaque
,
640 int abort_on_failure
)
645 QTAILQ_FOREACH(opt
, &opts
->head
, next
) {
646 rc
= func(opt
->name
, opt
->str
, opaque
);
647 if (abort_on_failure
&& rc
!= 0)
653 QemuOpts
*qemu_opts_find(QemuOptsList
*list
, const char *id
)
657 QTAILQ_FOREACH(opts
, &list
->head
, next
) {
661 if (strcmp(opts
->id
, id
) != 0) {
669 static int id_wellformed(const char *id
)
673 if (!qemu_isalpha(id
[0])) {
676 for (i
= 1; id
[i
]; i
++) {
677 if (!qemu_isalnum(id
[i
]) && !strchr("-._", id
[i
])) {
684 QemuOpts
*qemu_opts_create(QemuOptsList
*list
, const char *id
, int fail_if_exists
)
686 QemuOpts
*opts
= NULL
;
689 if (!id_wellformed(id
)) {
690 qerror_report(QERR_INVALID_PARAMETER_VALUE
, "id", "an identifier");
691 error_printf_unless_qmp("Identifiers consist of letters, digits, '-', '.', '_', starting with a letter.\n");
694 opts
= qemu_opts_find(list
, id
);
696 if (fail_if_exists
) {
697 qerror_report(QERR_DUPLICATE_ID
, id
, list
->name
);
704 opts
= g_malloc0(sizeof(*opts
));
706 opts
->id
= g_strdup(id
);
709 loc_save(&opts
->loc
);
710 QTAILQ_INIT(&opts
->head
);
711 QTAILQ_INSERT_TAIL(&list
->head
, opts
, next
);
715 void qemu_opts_reset(QemuOptsList
*list
)
717 QemuOpts
*opts
, *next_opts
;
719 QTAILQ_FOREACH_SAFE(opts
, &list
->head
, next
, next_opts
) {
724 void qemu_opts_loc_restore(QemuOpts
*opts
)
726 loc_restore(&opts
->loc
);
729 int qemu_opts_set(QemuOptsList
*list
, const char *id
,
730 const char *name
, const char *value
)
734 opts
= qemu_opts_create(list
, id
, 1);
738 return qemu_opt_set(opts
, name
, value
);
741 const char *qemu_opts_id(QemuOpts
*opts
)
746 void qemu_opts_del(QemuOpts
*opts
)
751 opt
= QTAILQ_FIRST(&opts
->head
);
756 QTAILQ_REMOVE(&opts
->list
->head
, opts
, next
);
761 int qemu_opts_print(QemuOpts
*opts
, void *dummy
)
765 fprintf(stderr
, "%s: %s:", opts
->list
->name
,
766 opts
->id
? opts
->id
: "<noid>");
767 QTAILQ_FOREACH(opt
, &opts
->head
, next
) {
768 fprintf(stderr
, " %s=\"%s\"", opt
->name
, opt
->str
);
770 fprintf(stderr
, "\n");
774 int qemu_opts_do_parse(QemuOpts
*opts
, const char *params
, const char *firstname
)
776 char option
[128], value
[1024];
777 const char *p
,*pe
,*pc
;
779 for (p
= params
; *p
!= '\0'; p
++) {
782 if (!pe
|| (pc
&& pc
< pe
)) {
783 /* found "foo,more" */
784 if (p
== params
&& firstname
) {
785 /* implicitly named first option */
786 pstrcpy(option
, sizeof(option
), firstname
);
787 p
= get_opt_value(value
, sizeof(value
), p
);
789 /* option without value, probably a flag */
790 p
= get_opt_name(option
, sizeof(option
), p
, ',');
791 if (strncmp(option
, "no", 2) == 0) {
792 memmove(option
, option
+2, strlen(option
+2)+1);
793 pstrcpy(value
, sizeof(value
), "off");
795 pstrcpy(value
, sizeof(value
), "on");
799 /* found "foo=bar,more" */
800 p
= get_opt_name(option
, sizeof(option
), p
, '=');
805 p
= get_opt_value(value
, sizeof(value
), p
);
807 if (strcmp(option
, "id") != 0) {
808 /* store and parse */
809 if (qemu_opt_set(opts
, option
, value
) == -1) {
820 QemuOpts
*qemu_opts_parse(QemuOptsList
*list
, const char *params
,
823 const char *firstname
;
824 char value
[1024], *id
= NULL
;
828 assert(!permit_abbrev
|| list
->implied_opt_name
);
829 firstname
= permit_abbrev
? list
->implied_opt_name
: NULL
;
831 if (strncmp(params
, "id=", 3) == 0) {
832 get_opt_value(value
, sizeof(value
), params
+3);
834 } else if ((p
= strstr(params
, ",id=")) != NULL
) {
835 get_opt_value(value
, sizeof(value
), p
+4);
838 opts
= qemu_opts_create(list
, id
, 1);
842 if (qemu_opts_do_parse(opts
, params
, firstname
) != 0) {
850 static void qemu_opts_from_qdict_1(const char *key
, QObject
*obj
, void *opaque
)
856 if (!strcmp(key
, "id")) {
860 switch (qobject_type(obj
)) {
862 value
= qstring_get_str(qobject_to_qstring(obj
));
865 n
= snprintf(buf
, sizeof(buf
), "%" PRId64
,
866 qint_get_int(qobject_to_qint(obj
)));
867 assert(n
< sizeof(buf
));
871 n
= snprintf(buf
, sizeof(buf
), "%.17g",
872 qfloat_get_double(qobject_to_qfloat(obj
)));
873 assert(n
< sizeof(buf
));
877 pstrcpy(buf
, sizeof(buf
),
878 qbool_get_int(qobject_to_qbool(obj
)) ? "on" : "off");
884 qemu_opt_set(opaque
, key
, value
);
888 * Create QemuOpts from a QDict.
889 * Use value of key "id" as ID if it exists and is a QString.
890 * Only QStrings, QInts, QFloats and QBools are copied. Entries with
891 * other types are silently ignored.
893 QemuOpts
*qemu_opts_from_qdict(QemuOptsList
*list
, const QDict
*qdict
)
897 opts
= qemu_opts_create(list
, qdict_get_try_str(qdict
, "id"), 1);
901 qdict_iter(qdict
, qemu_opts_from_qdict_1
, opts
);
906 * Convert from QemuOpts to QDict.
907 * The QDict values are of type QString.
908 * TODO We'll want to use types appropriate for opt->desc->type, but
909 * this is enough for now.
911 QDict
*qemu_opts_to_qdict(QemuOpts
*opts
, QDict
*qdict
)
920 qdict_put(qdict
, "id", qstring_from_str(opts
->id
));
922 QTAILQ_FOREACH(opt
, &opts
->head
, next
) {
923 val
= QOBJECT(qstring_from_str(opt
->str
));
924 qdict_put_obj(qdict
, opt
->name
, val
);
929 /* Validate parsed opts against descriptions where no
930 * descriptions were provided in the QemuOptsList.
932 int qemu_opts_validate(QemuOpts
*opts
, const QemuOptDesc
*desc
)
936 assert(opts
->list
->desc
[0].name
== NULL
);
938 QTAILQ_FOREACH(opt
, &opts
->head
, next
) {
941 for (i
= 0; desc
[i
].name
!= NULL
; i
++) {
942 if (strcmp(desc
[i
].name
, opt
->name
) == 0) {
946 if (desc
[i
].name
== NULL
) {
947 qerror_report(QERR_INVALID_PARAMETER
, opt
->name
);
951 opt
->desc
= &desc
[i
];
953 if (qemu_opt_parse(opt
) < 0) {
961 int qemu_opts_foreach(QemuOptsList
*list
, qemu_opts_loopfunc func
, void *opaque
,
962 int abort_on_failure
)
969 QTAILQ_FOREACH(opts
, &list
->head
, next
) {
970 loc_restore(&opts
->loc
);
971 rc
|= func(opts
, opaque
);
972 if (abort_on_failure
&& rc
!= 0)