Remove pointless #undefs of previously forbidden functions.
[ffmpeg.git] / libavutil / opt.c
1 /*
2  * AVOptions
3  * Copyright (c) 2005 Michael Niedermayer <michaelni@gmx.at>
4  *
5  * This file is part of Libav.
6  *
7  * Libav is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * Libav is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with Libav; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 /**
23  * @file
24  * AVOptions
25  * @author Michael Niedermayer <michaelni@gmx.at>
26  */
27
28 #include "avutil.h"
29 #include "avstring.h"
30 #include "common.h"
31 #include "opt.h"
32 #include "eval.h"
33 #include "dict.h"
34 #include "log.h"
35 #include "mathematics.h"
36
37 const AVOption *av_opt_next(void *obj, const AVOption *last)
38 {
39     AVClass *class = *(AVClass**)obj;
40     if (!last && class->option[0].name) return class->option;
41     if (last && last[1].name)           return ++last;
42     return NULL;
43 }
44
45 static int read_number(const AVOption *o, void *dst, double *num, int *den, int64_t *intnum)
46 {
47     switch (o->type) {
48     case AV_OPT_TYPE_FLAGS:     *intnum = *(unsigned int*)dst;return 0;
49     case AV_OPT_TYPE_INT:       *intnum = *(int         *)dst;return 0;
50     case AV_OPT_TYPE_INT64:     *intnum = *(int64_t     *)dst;return 0;
51     case AV_OPT_TYPE_FLOAT:     *num    = *(float       *)dst;return 0;
52     case AV_OPT_TYPE_DOUBLE:    *num    = *(double      *)dst;return 0;
53     case AV_OPT_TYPE_RATIONAL:  *intnum = ((AVRational*)dst)->num;
54                                 *den    = ((AVRational*)dst)->den;
55                                                         return 0;
56     }
57     return AVERROR(EINVAL);
58 }
59
60 static int write_number(void *obj, const AVOption *o, void *dst, double num, int den, int64_t intnum)
61 {
62     if (o->max*den < num*intnum || o->min*den > num*intnum) {
63         av_log(obj, AV_LOG_ERROR, "Value %lf for parameter '%s' out of range\n",
64                num*intnum/den, o->name);
65         return AVERROR(ERANGE);
66     }
67
68     switch (o->type) {
69     case AV_OPT_TYPE_FLAGS:
70     case AV_OPT_TYPE_INT:   *(int       *)dst= llrint(num/den)*intnum; break;
71     case AV_OPT_TYPE_INT64: *(int64_t   *)dst= llrint(num/den)*intnum; break;
72     case AV_OPT_TYPE_FLOAT: *(float     *)dst= num*intnum/den;         break;
73     case AV_OPT_TYPE_DOUBLE:*(double    *)dst= num*intnum/den;         break;
74     case AV_OPT_TYPE_RATIONAL:
75         if ((int)num == num) *(AVRational*)dst= (AVRational){num*intnum, den};
76         else                 *(AVRational*)dst= av_d2q(num*intnum/den, 1<<24);
77         break;
78     default:
79         return AVERROR(EINVAL);
80     }
81     return 0;
82 }
83
84 static const double const_values[] = {
85     M_PI,
86     M_E,
87     FF_QP2LAMBDA,
88     0
89 };
90
91 static const char * const const_names[] = {
92     "PI",
93     "E",
94     "QP2LAMBDA",
95     0
96 };
97
98 static int hexchar2int(char c) {
99     if (c >= '0' && c <= '9') return c - '0';
100     if (c >= 'a' && c <= 'f') return c - 'a' + 10;
101     if (c >= 'A' && c <= 'F') return c - 'A' + 10;
102     return -1;
103 }
104
105 static int set_string_binary(void *obj, const AVOption *o, const char *val, uint8_t **dst)
106 {
107     int *lendst = (int *)(dst + 1);
108     uint8_t *bin, *ptr;
109     int len = strlen(val);
110
111     av_freep(dst);
112     *lendst = 0;
113
114     if (len & 1)
115         return AVERROR(EINVAL);
116     len /= 2;
117
118     ptr = bin = av_malloc(len);
119     while (*val) {
120         int a = hexchar2int(*val++);
121         int b = hexchar2int(*val++);
122         if (a < 0 || b < 0) {
123             av_free(bin);
124             return AVERROR(EINVAL);
125         }
126         *ptr++ = (a << 4) | b;
127     }
128     *dst = bin;
129     *lendst = len;
130
131     return 0;
132 }
133
134 static int set_string(void *obj, const AVOption *o, const char *val, uint8_t **dst)
135 {
136     av_freep(dst);
137     *dst = av_strdup(val);
138     return 0;
139 }
140
141 #define DEFAULT_NUMVAL(opt) ((opt->type == AV_OPT_TYPE_INT64 || \
142                               opt->type == AV_OPT_TYPE_CONST || \
143                               opt->type == AV_OPT_TYPE_FLAGS || \
144                               opt->type == AV_OPT_TYPE_INT) ? \
145                              opt->default_val.i64 : opt->default_val.dbl)
146
147 static int set_string_number(void *obj, const AVOption *o, const char *val, void *dst)
148 {
149     int ret = 0, notfirst = 0;
150     for (;;) {
151         int i, den = 1;
152         char buf[256];
153         int cmd = 0;
154         double d, num = 1;
155         int64_t intnum = 1;
156
157         if (*val == '+' || *val == '-')
158             cmd = *(val++);
159
160         for (i = 0; i < sizeof(buf) - 1 && val[i] && val[i] != '+' && val[i] != '-'; i++)
161             buf[i] = val[i];
162         buf[i] = 0;
163
164         {
165             const AVOption *o_named = av_opt_find(obj, buf, o->unit, 0, 0);
166             if (o_named && o_named->type == AV_OPT_TYPE_CONST)
167                 d = DEFAULT_NUMVAL(o_named);
168             else if (!strcmp(buf, "default")) d = DEFAULT_NUMVAL(o);
169             else if (!strcmp(buf, "max"    )) d = o->max;
170             else if (!strcmp(buf, "min"    )) d = o->min;
171             else if (!strcmp(buf, "none"   )) d = 0;
172             else if (!strcmp(buf, "all"    )) d = ~0;
173             else {
174                 int res = av_expr_parse_and_eval(&d, buf, const_names, const_values, NULL, NULL, NULL, NULL, NULL, 0, obj);
175                 if (res < 0) {
176                     av_log(obj, AV_LOG_ERROR, "Unable to parse option value \"%s\"\n", val);
177                     return res;
178                 }
179             }
180         }
181         if (o->type == AV_OPT_TYPE_FLAGS) {
182             read_number(o, dst, NULL, NULL, &intnum);
183             if      (cmd == '+') d = intnum | (int64_t)d;
184             else if (cmd == '-') d = intnum &~(int64_t)d;
185         } else {
186             read_number(o, dst, &num, &den, &intnum);
187             if      (cmd == '+') d = notfirst*num*intnum/den + d;
188             else if (cmd == '-') d = notfirst*num*intnum/den - d;
189         }
190
191         if ((ret = write_number(obj, o, dst, d, 1, 1)) < 0)
192             return ret;
193         val += i;
194         if (!*val)
195             return 0;
196         notfirst = 1;
197     }
198
199     return 0;
200 }
201
202 int av_opt_set(void *obj, const char *name, const char *val, int search_flags)
203 {
204     void *dst, *target_obj;
205     const AVOption *o = av_opt_find2(obj, name, NULL, 0, search_flags, &target_obj);
206     if (!o || !target_obj)
207         return AVERROR_OPTION_NOT_FOUND;
208     if (!val)
209         return AVERROR(EINVAL);
210
211     dst = ((uint8_t*)target_obj) + o->offset;
212     switch (o->type) {
213     case AV_OPT_TYPE_STRING:   return set_string(obj, o, val, dst);
214     case AV_OPT_TYPE_BINARY:   return set_string_binary(obj, o, val, dst);
215     case AV_OPT_TYPE_FLAGS:
216     case AV_OPT_TYPE_INT:
217     case AV_OPT_TYPE_INT64:
218     case AV_OPT_TYPE_FLOAT:
219     case AV_OPT_TYPE_DOUBLE:
220     case AV_OPT_TYPE_RATIONAL: return set_string_number(obj, o, val, dst);
221     }
222
223     av_log(obj, AV_LOG_ERROR, "Invalid option type.\n");
224     return AVERROR(EINVAL);
225 }
226
227 #define OPT_EVAL_NUMBER(name, opttype, vartype)\
228     int av_opt_eval_ ## name(void *obj, const AVOption *o, const char *val, vartype *name ## _out)\
229     {\
230         if (!o || o->type != opttype)\
231             return AVERROR(EINVAL);\
232         return set_string_number(obj, o, val, name ## _out);\
233     }
234
235 OPT_EVAL_NUMBER(flags,  AV_OPT_TYPE_FLAGS,    int)
236 OPT_EVAL_NUMBER(int,    AV_OPT_TYPE_INT,      int)
237 OPT_EVAL_NUMBER(int64,  AV_OPT_TYPE_INT64,    int64_t)
238 OPT_EVAL_NUMBER(float,  AV_OPT_TYPE_FLOAT,    float)
239 OPT_EVAL_NUMBER(double, AV_OPT_TYPE_DOUBLE,   double)
240 OPT_EVAL_NUMBER(q,      AV_OPT_TYPE_RATIONAL, AVRational)
241
242 static int set_number(void *obj, const char *name, double num, int den, int64_t intnum,
243                                   int search_flags)
244 {
245     void *dst, *target_obj;
246     const AVOption *o = av_opt_find2(obj, name, NULL, 0, search_flags, &target_obj);
247
248     if (!o || !target_obj)
249         return AVERROR_OPTION_NOT_FOUND;
250
251     dst = ((uint8_t*)target_obj) + o->offset;
252     return write_number(obj, o, dst, num, den, intnum);
253 }
254
255 int av_opt_set_int(void *obj, const char *name, int64_t val, int search_flags)
256 {
257     return set_number(obj, name, 1, 1, val, search_flags);
258 }
259
260 int av_opt_set_double(void *obj, const char *name, double val, int search_flags)
261 {
262     return set_number(obj, name, val, 1, 1, search_flags);
263 }
264
265 int av_opt_set_q(void *obj, const char *name, AVRational val, int search_flags)
266 {
267     return set_number(obj, name, val.num, val.den, 1, search_flags);
268 }
269
270 int av_opt_set_bin(void *obj, const char *name, const uint8_t *val, int len, int search_flags)
271 {
272     void *target_obj;
273     const AVOption *o = av_opt_find2(obj, name, NULL, 0, search_flags, &target_obj);
274     uint8_t *ptr;
275     uint8_t **dst;
276     int *lendst;
277
278     if (!o || !target_obj)
279         return AVERROR_OPTION_NOT_FOUND;
280
281     if (o->type != AV_OPT_TYPE_BINARY)
282         return AVERROR(EINVAL);
283
284     ptr = av_malloc(len);
285     if (!ptr)
286         return AVERROR(ENOMEM);
287
288     dst = (uint8_t **)(((uint8_t *)target_obj) + o->offset);
289     lendst = (int *)(dst + 1);
290
291     av_free(*dst);
292     *dst = ptr;
293     *lendst = len;
294     memcpy(ptr, val, len);
295
296     return 0;
297 }
298
299 int av_opt_get(void *obj, const char *name, int search_flags, uint8_t **out_val)
300 {
301     void *dst, *target_obj;
302     const AVOption *o = av_opt_find2(obj, name, NULL, 0, search_flags, &target_obj);
303     uint8_t *bin, buf[128];
304     int len, i, ret;
305
306     if (!o || !target_obj)
307         return AVERROR_OPTION_NOT_FOUND;
308
309     dst = (uint8_t*)target_obj + o->offset;
310
311     buf[0] = 0;
312     switch (o->type) {
313     case AV_OPT_TYPE_FLAGS:     ret = snprintf(buf, sizeof(buf), "0x%08X",  *(int    *)dst);break;
314     case AV_OPT_TYPE_INT:       ret = snprintf(buf, sizeof(buf), "%d" ,     *(int    *)dst);break;
315     case AV_OPT_TYPE_INT64:     ret = snprintf(buf, sizeof(buf), "%"PRId64, *(int64_t*)dst);break;
316     case AV_OPT_TYPE_FLOAT:     ret = snprintf(buf, sizeof(buf), "%f" ,     *(float  *)dst);break;
317     case AV_OPT_TYPE_DOUBLE:    ret = snprintf(buf, sizeof(buf), "%f" ,     *(double *)dst);break;
318     case AV_OPT_TYPE_RATIONAL:  ret = snprintf(buf, sizeof(buf), "%d/%d",   ((AVRational*)dst)->num, ((AVRational*)dst)->den);break;
319     case AV_OPT_TYPE_STRING:
320         if (*(uint8_t**)dst)
321             *out_val = av_strdup(*(uint8_t**)dst);
322         else
323             *out_val = av_strdup("");
324         return 0;
325     case AV_OPT_TYPE_BINARY:
326         len = *(int*)(((uint8_t *)dst) + sizeof(uint8_t *));
327         if ((uint64_t)len*2 + 1 > INT_MAX)
328             return AVERROR(EINVAL);
329         if (!(*out_val = av_malloc(len*2 + 1)))
330             return AVERROR(ENOMEM);
331         bin = *(uint8_t**)dst;
332         for (i = 0; i < len; i++)
333             snprintf(*out_val + i*2, 3, "%02X", bin[i]);
334         return 0;
335     default:
336         return AVERROR(EINVAL);
337     }
338
339     if (ret >= sizeof(buf))
340         return AVERROR(EINVAL);
341     *out_val = av_strdup(buf);
342     return 0;
343 }
344
345 static int get_number(void *obj, const char *name, const AVOption **o_out, double *num, int *den, int64_t *intnum,
346                       int search_flags)
347 {
348     void *dst, *target_obj;
349     const AVOption *o = av_opt_find2(obj, name, NULL, 0, search_flags, &target_obj);
350     if (!o || !target_obj)
351         goto error;
352
353     dst = ((uint8_t*)target_obj) + o->offset;
354
355     if (o_out) *o_out= o;
356
357     return read_number(o, dst, num, den, intnum);
358
359 error:
360     *den=*intnum=0;
361     return -1;
362 }
363
364 int av_opt_get_int(void *obj, const char *name, int search_flags, int64_t *out_val)
365 {
366     int64_t intnum = 1;
367     double     num = 1;
368     int   ret, den = 1;
369
370     if ((ret = get_number(obj, name, NULL, &num, &den, &intnum, search_flags)) < 0)
371         return ret;
372     *out_val = num*intnum/den;
373     return 0;
374 }
375
376 int av_opt_get_double(void *obj, const char *name, int search_flags, double *out_val)
377 {
378     int64_t intnum = 1;
379     double     num = 1;
380     int   ret, den = 1;
381
382     if ((ret = get_number(obj, name, NULL, &num, &den, &intnum, search_flags)) < 0)
383         return ret;
384     *out_val = num*intnum/den;
385     return 0;
386 }
387
388 int av_opt_get_q(void *obj, const char *name, int search_flags, AVRational *out_val)
389 {
390     int64_t intnum = 1;
391     double     num = 1;
392     int   ret, den = 1;
393
394     if ((ret = get_number(obj, name, NULL, &num, &den, &intnum, search_flags)) < 0)
395         return ret;
396
397     if (num == 1.0 && (int)intnum == intnum)
398         *out_val = (AVRational){intnum, den};
399     else
400         *out_val = av_d2q(num*intnum/den, 1<<24);
401     return 0;
402 }
403
404 int av_opt_flag_is_set(void *obj, const char *field_name, const char *flag_name)
405 {
406     const AVOption *field = av_opt_find(obj, field_name, NULL, 0, 0);
407     const AVOption *flag  = av_opt_find(obj, flag_name,
408                                         field ? field->unit : NULL, 0, 0);
409     int64_t res;
410
411     if (!field || !flag || flag->type != AV_OPT_TYPE_CONST ||
412         av_opt_get_int(obj, field_name, 0, &res) < 0)
413         return 0;
414     return res & flag->default_val.i64;
415 }
416
417 static void opt_list(void *obj, void *av_log_obj, const char *unit,
418                      int req_flags, int rej_flags)
419 {
420     const AVOption *opt=NULL;
421
422     while ((opt = av_opt_next(obj, opt))) {
423         if (!(opt->flags & req_flags) || (opt->flags & rej_flags))
424             continue;
425
426         /* Don't print CONST's on level one.
427          * Don't print anything but CONST's on level two.
428          * Only print items from the requested unit.
429          */
430         if (!unit && opt->type==AV_OPT_TYPE_CONST)
431             continue;
432         else if (unit && opt->type!=AV_OPT_TYPE_CONST)
433             continue;
434         else if (unit && opt->type==AV_OPT_TYPE_CONST && strcmp(unit, opt->unit))
435             continue;
436         else if (unit && opt->type == AV_OPT_TYPE_CONST)
437             av_log(av_log_obj, AV_LOG_INFO, "   %-15s ", opt->name);
438         else
439             av_log(av_log_obj, AV_LOG_INFO, "-%-17s ", opt->name);
440
441         switch (opt->type) {
442             case AV_OPT_TYPE_FLAGS:
443                 av_log(av_log_obj, AV_LOG_INFO, "%-7s ", "<flags>");
444                 break;
445             case AV_OPT_TYPE_INT:
446                 av_log(av_log_obj, AV_LOG_INFO, "%-7s ", "<int>");
447                 break;
448             case AV_OPT_TYPE_INT64:
449                 av_log(av_log_obj, AV_LOG_INFO, "%-7s ", "<int64>");
450                 break;
451             case AV_OPT_TYPE_DOUBLE:
452                 av_log(av_log_obj, AV_LOG_INFO, "%-7s ", "<double>");
453                 break;
454             case AV_OPT_TYPE_FLOAT:
455                 av_log(av_log_obj, AV_LOG_INFO, "%-7s ", "<float>");
456                 break;
457             case AV_OPT_TYPE_STRING:
458                 av_log(av_log_obj, AV_LOG_INFO, "%-7s ", "<string>");
459                 break;
460             case AV_OPT_TYPE_RATIONAL:
461                 av_log(av_log_obj, AV_LOG_INFO, "%-7s ", "<rational>");
462                 break;
463             case AV_OPT_TYPE_BINARY:
464                 av_log(av_log_obj, AV_LOG_INFO, "%-7s ", "<binary>");
465                 break;
466             case AV_OPT_TYPE_CONST:
467             default:
468                 av_log(av_log_obj, AV_LOG_INFO, "%-7s ", "");
469                 break;
470         }
471         av_log(av_log_obj, AV_LOG_INFO, "%c", (opt->flags & AV_OPT_FLAG_ENCODING_PARAM) ? 'E' : '.');
472         av_log(av_log_obj, AV_LOG_INFO, "%c", (opt->flags & AV_OPT_FLAG_DECODING_PARAM) ? 'D' : '.');
473         av_log(av_log_obj, AV_LOG_INFO, "%c", (opt->flags & AV_OPT_FLAG_VIDEO_PARAM   ) ? 'V' : '.');
474         av_log(av_log_obj, AV_LOG_INFO, "%c", (opt->flags & AV_OPT_FLAG_AUDIO_PARAM   ) ? 'A' : '.');
475         av_log(av_log_obj, AV_LOG_INFO, "%c", (opt->flags & AV_OPT_FLAG_SUBTITLE_PARAM) ? 'S' : '.');
476
477         if (opt->help)
478             av_log(av_log_obj, AV_LOG_INFO, " %s", opt->help);
479         av_log(av_log_obj, AV_LOG_INFO, "\n");
480         if (opt->unit && opt->type != AV_OPT_TYPE_CONST) {
481             opt_list(obj, av_log_obj, opt->unit, req_flags, rej_flags);
482         }
483     }
484 }
485
486 int av_opt_show2(void *obj, void *av_log_obj, int req_flags, int rej_flags)
487 {
488     if (!obj)
489         return -1;
490
491     av_log(av_log_obj, AV_LOG_INFO, "%s AVOptions:\n", (*(AVClass**)obj)->class_name);
492
493     opt_list(obj, av_log_obj, NULL, req_flags, rej_flags);
494
495     return 0;
496 }
497
498 void av_opt_set_defaults(void *s)
499 {
500     const AVOption *opt = NULL;
501     while ((opt = av_opt_next(s, opt)) != NULL) {
502         switch (opt->type) {
503             case AV_OPT_TYPE_CONST:
504                 /* Nothing to be done here */
505             break;
506             case AV_OPT_TYPE_FLAGS:
507             case AV_OPT_TYPE_INT:
508             case AV_OPT_TYPE_INT64:
509                 av_opt_set_int(s, opt->name, opt->default_val.i64, 0);
510             break;
511             case AV_OPT_TYPE_DOUBLE:
512             case AV_OPT_TYPE_FLOAT: {
513                 double val;
514                 val = opt->default_val.dbl;
515                 av_opt_set_double(s, opt->name, val, 0);
516             }
517             break;
518             case AV_OPT_TYPE_RATIONAL: {
519                 AVRational val;
520                 val = av_d2q(opt->default_val.dbl, INT_MAX);
521                 av_opt_set_q(s, opt->name, val, 0);
522             }
523             break;
524             case AV_OPT_TYPE_STRING:
525                 av_opt_set(s, opt->name, opt->default_val.str, 0);
526                 break;
527             case AV_OPT_TYPE_BINARY:
528                 /* Cannot set default for binary */
529             break;
530             default:
531                 av_log(s, AV_LOG_DEBUG, "AVOption type %d of option %s not implemented yet\n", opt->type, opt->name);
532         }
533     }
534 }
535
536 /**
537  * Store the value in the field in ctx that is named like key.
538  * ctx must be an AVClass context, storing is done using AVOptions.
539  *
540  * @param buf the string to parse, buf will be updated to point at the
541  * separator just after the parsed key/value pair
542  * @param key_val_sep a 0-terminated list of characters used to
543  * separate key from value
544  * @param pairs_sep a 0-terminated list of characters used to separate
545  * two pairs from each other
546  * @return 0 if the key/value pair has been successfully parsed and
547  * set, or a negative value corresponding to an AVERROR code in case
548  * of error:
549  * AVERROR(EINVAL) if the key/value pair cannot be parsed,
550  * the error code issued by av_opt_set() if the key/value pair
551  * cannot be set
552  */
553 static int parse_key_value_pair(void *ctx, const char **buf,
554                                 const char *key_val_sep, const char *pairs_sep)
555 {
556     char *key = av_get_token(buf, key_val_sep);
557     char *val;
558     int ret;
559
560     if (*key && strspn(*buf, key_val_sep)) {
561         (*buf)++;
562         val = av_get_token(buf, pairs_sep);
563     } else {
564         av_log(ctx, AV_LOG_ERROR, "Missing key or no key/value separator found after key '%s'\n", key);
565         av_free(key);
566         return AVERROR(EINVAL);
567     }
568
569     av_log(ctx, AV_LOG_DEBUG, "Setting value '%s' for key '%s'\n", val, key);
570
571     ret = av_opt_set(ctx, key, val, 0);
572     if (ret == AVERROR_OPTION_NOT_FOUND)
573         av_log(ctx, AV_LOG_ERROR, "Key '%s' not found.\n", key);
574
575     av_free(key);
576     av_free(val);
577     return ret;
578 }
579
580 int av_set_options_string(void *ctx, const char *opts,
581                           const char *key_val_sep, const char *pairs_sep)
582 {
583     int ret, count = 0;
584
585     if (!opts)
586         return 0;
587
588     while (*opts) {
589         if ((ret = parse_key_value_pair(ctx, &opts, key_val_sep, pairs_sep)) < 0)
590             return ret;
591         count++;
592
593         if (*opts)
594             opts++;
595     }
596
597     return count;
598 }
599
600 void av_opt_free(void *obj)
601 {
602     const AVOption *o = NULL;
603     while ((o = av_opt_next(obj, o)))
604         if (o->type == AV_OPT_TYPE_STRING || o->type == AV_OPT_TYPE_BINARY)
605             av_freep((uint8_t *)obj + o->offset);
606 }
607
608 int av_opt_set_dict(void *obj, AVDictionary **options)
609 {
610     AVDictionaryEntry *t = NULL;
611     AVDictionary    *tmp = NULL;
612     int ret = 0;
613
614     while ((t = av_dict_get(*options, "", t, AV_DICT_IGNORE_SUFFIX))) {
615         ret = av_opt_set(obj, t->key, t->value, 0);
616         if (ret == AVERROR_OPTION_NOT_FOUND)
617             av_dict_set(&tmp, t->key, t->value, 0);
618         else if (ret < 0) {
619             av_log(obj, AV_LOG_ERROR, "Error setting option %s to value %s.\n", t->key, t->value);
620             break;
621         }
622         ret = 0;
623     }
624     av_dict_free(options);
625     *options = tmp;
626     return ret;
627 }
628
629 const AVOption *av_opt_find(void *obj, const char *name, const char *unit,
630                             int opt_flags, int search_flags)
631 {
632     return av_opt_find2(obj, name, unit, opt_flags, search_flags, NULL);
633 }
634
635 const AVOption *av_opt_find2(void *obj, const char *name, const char *unit,
636                              int opt_flags, int search_flags, void **target_obj)
637 {
638     const AVClass  *c = *(AVClass**)obj;
639     const AVOption *o = NULL;
640
641     if (search_flags & AV_OPT_SEARCH_CHILDREN) {
642         if (search_flags & AV_OPT_SEARCH_FAKE_OBJ) {
643             const AVClass *child = NULL;
644             while (child = av_opt_child_class_next(c, child))
645                 if (o = av_opt_find2(&child, name, unit, opt_flags, search_flags, NULL))
646                     return o;
647         } else {
648             void *child = NULL;
649             while (child = av_opt_child_next(obj, child))
650                 if (o = av_opt_find2(child, name, unit, opt_flags, search_flags, target_obj))
651                     return o;
652         }
653     }
654
655     while (o = av_opt_next(obj, o)) {
656         if (!strcmp(o->name, name) && (o->flags & opt_flags) == opt_flags &&
657             ((!unit && o->type != AV_OPT_TYPE_CONST) ||
658              (unit  && o->unit && !strcmp(o->unit, unit)))) {
659             if (target_obj) {
660                 if (!(search_flags & AV_OPT_SEARCH_FAKE_OBJ))
661                     *target_obj = obj;
662                 else
663                     *target_obj = NULL;
664             }
665             return o;
666         }
667     }
668     return NULL;
669 }
670
671 void *av_opt_child_next(void *obj, void *prev)
672 {
673     const AVClass *c = *(AVClass**)obj;
674     if (c->child_next)
675         return c->child_next(obj, prev);
676     return NULL;
677 }
678
679 const AVClass *av_opt_child_class_next(const AVClass *parent, const AVClass *prev)
680 {
681     if (parent->child_class_next)
682         return parent->child_class_next(prev);
683     return NULL;
684 }
685
686 #ifdef TEST
687
688 typedef struct TestContext
689 {
690     const AVClass *class;
691     int num;
692     int toggle;
693     char *string;
694     int flags;
695     AVRational rational;
696 } TestContext;
697
698 #define OFFSET(x) offsetof(TestContext, x)
699
700 #define TEST_FLAG_COOL 01
701 #define TEST_FLAG_LAME 02
702 #define TEST_FLAG_MU   04
703
704 static const AVOption test_options[]= {
705 {"num",      "set num",        OFFSET(num),      AV_OPT_TYPE_INT,      {.i64 = 0},       0,        100                 },
706 {"toggle",   "set toggle",     OFFSET(toggle),   AV_OPT_TYPE_INT,      {.i64 = 0},       0,        1                   },
707 {"rational", "set rational",   OFFSET(rational), AV_OPT_TYPE_RATIONAL, {.dbl = 0},  0,        10                  },
708 {"string",   "set string",     OFFSET(string),   AV_OPT_TYPE_STRING,   {0},              CHAR_MIN, CHAR_MAX            },
709 {"flags",    "set flags",      OFFSET(flags),    AV_OPT_TYPE_FLAGS,    {.i64 = 0},       0,        INT_MAX, 0, "flags" },
710 {"cool",     "set cool flag ", 0,                AV_OPT_TYPE_CONST,    {.i64 = TEST_FLAG_COOL}, INT_MIN,  INT_MAX, 0, "flags" },
711 {"lame",     "set lame flag ", 0,                AV_OPT_TYPE_CONST,    {.i64 = TEST_FLAG_LAME}, INT_MIN,  INT_MAX, 0, "flags" },
712 {"mu",       "set mu flag ",   0,                AV_OPT_TYPE_CONST,    {.i64 = TEST_FLAG_MU},   INT_MIN,  INT_MAX, 0, "flags" },
713 {NULL},
714 };
715
716 static const char *test_get_name(void *ctx)
717 {
718     return "test";
719 }
720
721 static const AVClass test_class = {
722     "TestContext",
723     test_get_name,
724     test_options
725 };
726
727 int main(void)
728 {
729     int i;
730
731     printf("\nTesting av_set_options_string()\n");
732     {
733         TestContext test_ctx;
734         const char *options[] = {
735             "",
736             ":",
737             "=",
738             "foo=:",
739             ":=foo",
740             "=foo",
741             "foo=",
742             "foo",
743             "foo=val",
744             "foo==val",
745             "toggle=:",
746             "string=:",
747             "toggle=1 : foo",
748             "toggle=100",
749             "toggle==1",
750             "flags=+mu-lame : num=42: toggle=0",
751             "num=42 : string=blahblah",
752             "rational=0 : rational=1/2 : rational=1/-1",
753             "rational=-1/0",
754         };
755
756         test_ctx.class = &test_class;
757         av_opt_set_defaults(&test_ctx);
758         test_ctx.string = av_strdup("default");
759
760         av_log_set_level(AV_LOG_DEBUG);
761
762         for (i=0; i < FF_ARRAY_ELEMS(options); i++) {
763             av_log(&test_ctx, AV_LOG_DEBUG, "Setting options string '%s'\n", options[i]);
764             if (av_set_options_string(&test_ctx, options[i], "=", ":") < 0)
765                 av_log(&test_ctx, AV_LOG_ERROR, "Error setting options string: '%s'\n", options[i]);
766             printf("\n");
767         }
768     }
769
770     return 0;
771 }
772
773 #endif