git.sesse.net Git - ffmpeg/blob - 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 #undef printf
 689
 690 typedef struct TestContext
 691 {
 692     const AVClass *class;
 693     int num;
 694     int toggle;
 695     char *string;
 696     int flags;
 697     AVRational rational;
 698 } TestContext;
 699
 700 #define OFFSET(x) offsetof(TestContext, x)
 701
 702 #define TEST_FLAG_COOL 01
 703 #define TEST_FLAG_LAME 02
 704 #define TEST_FLAG_MU   04
 705
 706 static const AVOption test_options[]= {
 707 {"num",      "set num",        OFFSET(num),      AV_OPT_TYPE_INT,      {.i64 = 0},       0,        100                 },
 708 {"toggle",   "set toggle",     OFFSET(toggle),   AV_OPT_TYPE_INT,      {.i64 = 0},       0,        1                   },
 709 {"rational", "set rational",   OFFSET(rational), AV_OPT_TYPE_RATIONAL, {.dbl = 0},  0,        10                  },
 710 {"string",   "set string",     OFFSET(string),   AV_OPT_TYPE_STRING,   {0},              CHAR_MIN, CHAR_MAX            },
 711 {"flags",    "set flags",      OFFSET(flags),    AV_OPT_TYPE_FLAGS,    {.i64 = 0},       0,        INT_MAX, 0, "flags" },
 712 {"cool",     "set cool flag ", 0,                AV_OPT_TYPE_CONST,    {.i64 = TEST_FLAG_COOL}, INT_MIN,  INT_MAX, 0, "flags" },
 713 {"lame",     "set lame flag ", 0,                AV_OPT_TYPE_CONST,    {.i64 = TEST_FLAG_LAME}, INT_MIN,  INT_MAX, 0, "flags" },
 714 {"mu",       "set mu flag ",   0,                AV_OPT_TYPE_CONST,    {.i64 = TEST_FLAG_MU},   INT_MIN,  INT_MAX, 0, "flags" },
 715 {NULL},
 716 };
 717
 718 static const char *test_get_name(void *ctx)
 719 {
 720     return "test";
 721 }
 722
 723 static const AVClass test_class = {
 724     "TestContext",
 725     test_get_name,
 726     test_options
 727 };
 728
 729 int main(void)
 730 {
 731     int i;
 732
 733     printf("\nTesting av_set_options_string()\n");
 734     {
 735         TestContext test_ctx;
 736         const char *options[] = {
 737             "",
 738             ":",
 739             "=",
 740             "foo=:",
 741             ":=foo",
 742             "=foo",
 743             "foo=",
 744             "foo",
 745             "foo=val",
 746             "foo==val",
 747             "toggle=:",
 748             "string=:",
 749             "toggle=1 : foo",
 750             "toggle=100",
 751             "toggle==1",
 752             "flags=+mu-lame : num=42: toggle=0",
 753             "num=42 : string=blahblah",
 754             "rational=0 : rational=1/2 : rational=1/-1",
 755             "rational=-1/0",
 756         };
 757
 758         test_ctx.class = &test_class;
 759         av_opt_set_defaults(&test_ctx);
 760         test_ctx.string = av_strdup("default");
 761
 762         av_log_set_level(AV_LOG_DEBUG);
 763
 764         for (i=0; i < FF_ARRAY_ELEMS(options); i++) {
 765             av_log(&test_ctx, AV_LOG_DEBUG, "Setting options string '%s'\n", options[i]);
 766             if (av_set_options_string(&test_ctx, options[i], "=", ":") < 0)
 767                 av_log(&test_ctx, AV_LOG_ERROR, "Error setting options string: '%s'\n", options[i]);
 768             printf("\n");
 769         }
 770     }
 771
 772     return 0;
 773 }
 774
 775 #endif