12 //#include "m_config.h"
14 #include "libmpdemux/url.h"
16 // Don't free for 'production' atm
21 m_option_t
* m_option_list_find(m_option_t
* list
,char* name
) {
24 for(i
= 0 ; list
[i
].name
; i
++) {
25 int l
= strlen(list
[i
].name
) - 1;
26 if((list
[i
].type
->flags
& M_OPT_TYPE_ALLOW_WILDCARD
) &&
27 (l
> 0) && (list
[i
].name
[l
] == '*')) {
28 if(strncasecmp(list
[i
].name
,name
,l
) == 0)
30 } else if(strcasecmp(list
[i
].name
,name
) == 0)
36 // Default function that just does a memcpy
38 static void copy_opt(m_option_t
* opt
,void* dst
,void* src
) {
40 memcpy(dst
,src
,opt
->type
->size
);
43 // Helper for the print funcs (from man printf)
44 static char* dup_printf(const char *fmt
, ...) {
45 /* Guess we need no more than 50 bytes. */
49 if ((p
= malloc (size
)) == NULL
)
52 /* Try to print in the allocated space. */
54 n
= vsnprintf (p
, size
, fmt
, ap
);
56 /* If that worked, return the string. */
57 if (n
> -1 && n
< size
)
59 /* Else try again with more space. */
60 if (n
> -1) /* glibc 2.1 */
61 size
= n
+1; /* precisely what is needed */
63 size
*= 2; /* twice the old size */
64 if ((p
= realloc (p
, size
)) == NULL
)
72 #define VAL(x) (*(int*)(x))
74 static int parse_flag(m_option_t
* opt
,char *name
, char *param
, void* dst
, int src
) {
75 if (src
== M_CONFIG_FILE
) {
76 if(!param
) return M_OPT_MISSING_PARAM
;
77 if (!strcasecmp(param
, "yes") || /* any other language? */
78 !strcasecmp(param
, "on") ||
79 !strcasecmp(param
, "ja") ||
80 !strcasecmp(param
, "si") ||
81 !strcasecmp(param
, "igen") ||
82 !strcasecmp(param
, "y") ||
83 !strcasecmp(param
, "j") ||
84 !strcasecmp(param
, "i") ||
85 !strcmp(param
, "1")) {
86 if(dst
) VAL(dst
) = opt
->max
;
87 } else if (!strcasecmp(param
, "no") ||
88 !strcasecmp(param
, "off") ||
89 !strcasecmp(param
, "nein") ||
90 !strcasecmp(param
, "nicht") ||
91 !strcasecmp(param
, "nem") ||
92 !strcasecmp(param
, "n") ||
93 !strcmp(param
, "0")) {
94 if(dst
) VAL(dst
) = opt
->min
;
96 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Invalid parameter for %s flag: %s\n",name
, param
);
101 if(dst
) VAL(dst
) = opt
->max
;
106 static char* print_flag(m_option_t
* opt
, void* val
) {
107 if(VAL(val
) == opt
->min
)
110 return strdup("yes");
113 m_option_type_t m_option_type_flag
= {
115 "need yes or no in config files",
128 static int parse_int(m_option_t
* opt
,char *name
, char *param
, void* dst
, int src
) {
134 return M_OPT_MISSING_PARAM
;
136 tmp_int
= strtol(param
, &endptr
, 0);
138 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "The %s option must be an integer: %s\n",name
, param
);
139 return M_OPT_INVALID
;
142 if ((opt
->flags
& M_OPT_MIN
) && (tmp_int
< opt
->min
)) {
143 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "The %s option must be >= %d: %s\n", name
, (int) opt
->min
, param
);
144 return M_OPT_OUT_OF_RANGE
;
147 if ((opt
->flags
& M_OPT_MAX
) && (tmp_int
> opt
->max
)) {
148 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "The %s option must be <= %d: %s\n",name
, (int) opt
->max
, param
);
149 return M_OPT_OUT_OF_RANGE
;
152 if(dst
) VAL(dst
) = tmp_int
;
157 static char* print_int(m_option_t
* opt
, void* val
) {
159 return dup_printf("%d",VAL(val
));
162 m_option_type_t m_option_type_int
= {
178 #define VAL(x) (*(float*)(x))
180 static int parse_float(m_option_t
* opt
,char *name
, char *param
, void* dst
, int src
) {
186 return M_OPT_MISSING_PARAM
;
188 tmp_float
= strtod(param
, &endptr
);
193 tmp_float
/= strtod(endptr
+1, &endptr
);
197 /* we also handle floats specified with
198 * non-locale decimal point ::atmos
201 tmp_float
-= 1.0/pow(10,strlen(endptr
+1)) * strtod(endptr
+1, &endptr
);
203 tmp_float
+= 1.0/pow(10,strlen(endptr
+1)) * strtod(endptr
+1, &endptr
);
208 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "The %s option must be a floating point "
209 "number or a ratio (numerator[:/]denominator): %s\n",name
, param
);
210 return M_OPT_INVALID
;
213 if (opt
->flags
& M_OPT_MIN
)
214 if (tmp_float
< opt
->min
) {
215 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "The %s option must be >= %f: %s\n", name
, opt
->min
, param
);
216 return M_OPT_OUT_OF_RANGE
;
219 if (opt
->flags
& M_OPT_MAX
)
220 if (tmp_float
> opt
->max
) {
221 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "The %s option must be <= %f: %s\n", name
, opt
->max
, param
);
222 return M_OPT_OUT_OF_RANGE
;
225 if(dst
) VAL(dst
) = tmp_float
;
229 static char* print_float(m_option_t
* opt
, void* val
) {
231 return dup_printf("%f",VAL(val
));
234 m_option_type_t m_option_type_float
= {
236 "floating point number or ratio (numerator[:/]denominator)",
247 ///////////// Position
249 #define VAL(x) (*(off_t*)(x))
251 static int parse_position(m_option_t
* opt
,char *name
, char *param
, void* dst
, int src
) {
256 return M_OPT_MISSING_PARAM
;
257 if (sscanf(param
, sizeof(off_t
) == sizeof(int) ?
258 "%d%c" : "%lld%c", &tmp_off
, &dummy
) != 1) {
259 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "The %s option must be an integer: %s\n",opt
->name
,param
);
260 return M_OPT_INVALID
;
263 if (opt
->flags
& M_OPT_MIN
)
264 if (tmp_off
< opt
->min
) {
265 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
,
266 (sizeof(off_t
) == sizeof(int) ?
267 "The %s option must be >= %d: %s\n" :
268 "The %s option must be >= %lld: %s\n"),
269 name
, (off_t
) opt
->min
, param
);
270 return M_OPT_OUT_OF_RANGE
;
273 if (opt
->flags
& M_OPT_MAX
)
274 if (tmp_off
> opt
->max
) {
275 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
,
276 (sizeof(off_t
) == sizeof(int) ?
277 "The %s option must be <= %d: %s\n" :
278 "The %s option must be <= %lld: %s\n"),
279 name
, (off_t
) opt
->max
, param
);
280 return M_OPT_OUT_OF_RANGE
;
288 static char* print_position(m_option_t
* opt
, void* val
) {
289 return dup_printf(sizeof(off_t
) == sizeof(int) ? "%d" : "%lld",VAL(val
));
292 m_option_type_t m_option_type_position
= {
309 #define VAL(x) (*(char**)(x))
311 static int parse_str(m_option_t
* opt
,char *name
, char *param
, void* dst
, int src
) {
315 return M_OPT_MISSING_PARAM
;
317 if ((opt
->flags
& M_OPT_MIN
) && (strlen(param
) < opt
->min
)) {
318 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Parameter must be >= %d chars: %s\n",
319 (int) opt
->min
, param
);
320 return M_OPT_OUT_OF_RANGE
;
323 if ((opt
->flags
& M_OPT_MAX
) && (strlen(param
) > opt
->max
)) {
324 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Parameter must be <= %d chars: %s\n",
325 (int) opt
->max
, param
);
326 return M_OPT_OUT_OF_RANGE
;
332 VAL(dst
) = strdup(param
);
339 static char* print_str(m_option_t
* opt
, void* val
) {
340 return (val
&& VAL(val
) && strlen(VAL(val
)) > 0) ? strdup(VAL(val
)) : NULL
;
343 static void copy_str(m_option_t
* opt
,void* dst
, void* src
) {
346 if(VAL(dst
)) free(VAL(dst
)); //FIXME!!!
348 VAL(dst
) = VAL(src
) ? strdup(VAL(src
)) : NULL
;
352 static void free_str(void* src
) {
355 free(VAL(src
)); //FIXME!!!
361 m_option_type_t m_option_type_string
= {
374 //////////// String list
376 #define LIST_SEPARATOR ','
378 #define VAL(x) (*(char***)(x))
386 static void free_str_list(void* dst
) {
390 if(!dst
|| !VAL(dst
)) return;
395 for(i
= 0 ; d
[i
] != NULL
; i
++)
402 static int str_list_add(char** add
, int n
,void* dst
,int pre
) {
403 char** lst
= VAL(dst
);
406 if(!dst
) return M_OPT_PARSER_ERR
;
409 for(ln
= 0 ; lst
&& lst
[ln
] ; ln
++)
412 lst
= realloc(lst
,(n
+ln
+1)*sizeof(char*));
415 memmove(&lst
[n
],lst
,(ln
+1)*sizeof(char*));
416 memcpy(lst
,add
,n
*sizeof(char*));
418 memcpy(&lst
[ln
],add
,(n
+1)*sizeof(char*));
427 static int str_list_del(char** del
, int n
,void* dst
) {
432 if(!dst
) return M_OPT_PARSER_ERR
;
435 for(ln
= 0 ; lst
&& lst
[ln
] ; ln
++)
439 for(i
= 0 ; del
[i
] != NULL
; i
++) {
440 idx
= strtol(del
[i
], &ep
, 0);
442 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Invalid index: %s\n",del
[i
]);
447 if(idx
< 0 || idx
>= ln
) {
448 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Index %ld is out of range.\n",idx
);
464 d
= calloc(s
+1,sizeof(char*));
465 for(i
= 0, n
= 0 ; i
< ln
; i
++) {
466 if(!lst
[i
]) continue;
479 static int parse_str_list(m_option_t
* opt
,char *name
, char *param
, void* dst
, int src
) {
480 int n
= 0,len
= strlen(opt
->name
);
481 char *ptr
= param
, *last_ptr
, **res
;
484 if(opt
->name
[len
-1] == '*' && ((int)strlen(name
) > len
- 1)) {
485 char* n
= &name
[len
-1];
486 if(strcasecmp(n
,"-add") == 0)
488 else if(strcasecmp(n
,"-pre") == 0)
490 else if(strcasecmp(n
,"-del") == 0)
492 else if(strcasecmp(n
,"-clr") == 0)
495 return M_OPT_UNKNOWN
;
505 // All other ops need a param
506 if (param
== NULL
|| strlen(param
) == 0)
507 return M_OPT_MISSING_PARAM
;
510 while(ptr
[0] != '\0') {
512 ptr
= strchr(ptr
,LIST_SEPARATOR
);
521 return M_OPT_INVALID
;
522 if( ((opt
->flags
& M_OPT_MIN
) && (n
< opt
->min
)) ||
523 ((opt
->flags
& M_OPT_MAX
) && (n
> opt
->max
)) )
524 return M_OPT_OUT_OF_RANGE
;
528 res
= malloc((n
+2)*sizeof(char*));
534 ptr
= strchr(ptr
,LIST_SEPARATOR
);
536 res
[n
] = strdup(last_ptr
);
540 len
= ptr
- last_ptr
;
541 res
[n
] = (char*)malloc(len
+ 1);
542 if(len
) strncpy(res
[n
],last_ptr
,len
);
551 return str_list_add(res
,n
,dst
,0);
553 return str_list_add(res
,n
,dst
,1);
555 return str_list_del(res
,n
,dst
);
565 static void copy_str_list(m_option_t
* opt
,void* dst
, void* src
) {
569 if(!(dst
&& src
)) return;
580 for(n
= 0 ; s
[n
] != NULL
; n
++)
582 d
= (char**)malloc((n
+1)*sizeof(char*));
584 d
[n
] = s
[n
] ? strdup(s
[n
]) : NULL
;
589 static char* print_str_list(m_option_t
* opt
, void* src
) {
591 char *ret
= NULL
,*last
= NULL
;
594 if(!(src
&& VAL(src
))) return NULL
;
597 for(i
= 0 ; lst
[i
] ; i
++) {
599 ret
= dup_printf("%s,%s",last
,lst
[i
]);
602 ret
= strdup(lst
[i
]);
605 if(last
&& last
!= ret
) free(last
);
609 m_option_type_t m_option_type_string_list
= {
611 "A list of strings separated by ','\n"
612 "Option with a name ending in an * permits using the following suffix: \n"
613 "\t-add: Add the given parameters at the end of the list.\n"
614 "\t-pre: Add the given parameters at the begining of the list.\n"
615 "\t-del: Remove the entry at the given indices.\n"
616 "\t-clr: Clear the list.\n"
617 "e.g: -vf-add flip,mirror -vf-del 2,5\n",
619 M_OPT_TYPE_DYNAMIC
| M_OPT_TYPE_ALLOW_WILDCARD
,
629 /////////////////// Func based options
631 // A chained list to save the various calls for func_param and func_full
632 typedef struct m_func_save m_func_save_t
;
640 #define VAL(x) (*(m_func_save_t**)(x))
642 static void free_func_pf(void* src
) {
652 if(s
->param
) free(s
->param
);
659 // Parser for func_param and func_full
660 static int parse_func_pf(m_option_t
* opt
,char *name
, char *param
, void* dst
, int src
) {
666 s
= (m_func_save_t
*)calloc(1,sizeof(m_func_save_t
));
667 s
->name
= strdup(name
);
668 s
->param
= param
? strdup(param
) : NULL
;
672 for( ; p
->next
!= NULL
; p
= p
->next
)
681 static void copy_func_pf(m_option_t
* opt
,void* dst
, void* src
) {
682 m_func_save_t
*d
= NULL
, *s
,* last
= NULL
;
684 if(!(dst
&& src
)) return;
691 d
= (m_func_save_t
*)malloc(sizeof(m_func_save_t
));
692 d
->name
= strdup(s
->name
);
693 d
->param
= s
->param
? strdup(s
->param
) : NULL
;
705 /////////////////// Func_param
707 static void set_func_param(m_option_t
* opt
, void* dst
, void* src
) {
716 if(opt
->priv
) ((m_opt_default_func_t
)opt
->priv
)(opt
,opt
->name
);
717 for( ; s
!= NULL
; s
= s
->next
)
718 ((m_opt_func_param_t
) opt
->p
)(opt
,s
->param
);
721 m_option_type_t m_option_type_func_param
= {
724 sizeof(m_func_save_t
*),
728 NULL
, // Nothing to do on save
734 /////////////////// Func_full
736 static void set_func_full(m_option_t
* opt
, void* dst
, void* src
) {
741 for(s
= VAL(src
) ; s
; s
= s
->next
) {
743 if(opt
->priv
) ((m_opt_default_func_t
)opt
->priv
)(opt
,s
->name
);
744 ((m_opt_func_full_t
) opt
->p
)(opt
,s
->name
,s
->param
);
748 m_option_type_t m_option_type_func_full
= {
751 sizeof(m_func_save_t
*),
752 M_OPT_TYPE_ALLOW_WILDCARD
|M_OPT_TYPE_INDIRECT
,
755 NULL
, // Nothing to do on save
764 #define VAL(x) (*(int*)(x))
766 static int parse_func(m_option_t
* opt
,char *name
, char *param
, void* dst
, int src
) {
772 static void set_func(m_option_t
* opt
,void* dst
, void* src
) {
774 if(opt
->priv
) ((m_opt_default_func_t
)opt
->priv
)(opt
,opt
->name
);
775 for(i
= 0 ; i
< VAL(src
) ; i
++)
776 ((m_opt_func_t
) opt
->p
)(opt
);
779 m_option_type_t m_option_type_func
= {
786 NULL
, // Nothing to do on save
792 /////////////////// Print
794 static int parse_print(m_option_t
* opt
,char *name
, char *param
, void* dst
, int src
) {
795 if(opt
->type
->flags
&M_OPT_TYPE_INDIRECT
)
796 mp_msg(MSGT_CFGPARSER
, MSGL_INFO
, "%s", *(char **) opt
->p
);
798 mp_msg(MSGT_CFGPARSER
, MSGL_INFO
, "%s", (char *) opt
->p
);
800 if(opt
->priv
== NULL
)
805 m_option_type_t m_option_type_print
= {
818 m_option_type_t m_option_type_print_indirect
= {
832 /////////////////////// Subconfig
834 #define VAL(x) (*(char***)(x))
836 static int parse_subconf(m_option_t
* opt
,char *name
, char *param
, void* dst
, int src
) {
845 if (param
== NULL
|| strlen(param
) == 0)
846 return M_OPT_MISSING_PARAM
;
848 subparam
= malloc(strlen(param
)+1);
849 subopt
= malloc(strlen(param
)+1);
850 p
= strdup(param
); // In case that param is a static string (cf man strtok)
854 token
= strtok(p
, (char *)&(":"));
859 subopt
[0] = subparam
[0] = 0;
861 sscanf_ret
= sscanf(token
, "%[^=]=%[^:]", subopt
, subparam
);
863 mp_msg(MSGT_CFGPARSER
, MSGL_DBG3
, "token: '%s', subopt='%s', subparam='%s' (ret: %d)\n", token
, subopt
, subparam
, sscanf_ret
);
869 for(i
= 0 ; subopts
[i
].name
; i
++) {
870 if(!strcmp(subopts
[i
].name
,subopt
)) break;
872 if(!subopts
[i
].name
) {
873 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Unknown suboption %s\n",name
,subopt
);
874 return M_OPT_UNKNOWN
;
876 r
= m_option_parse(&subopts
[i
],subopt
,
877 subparam
[0] == 0 ? NULL
: subparam
,NULL
,src
);
880 lst
= (char**)realloc(lst
,2 * (nr
+2) * sizeof(char*));
881 lst
[2*nr
] = strdup(subopt
);
882 lst
[2*nr
+1] = subparam
[0] == 0 ? NULL
: strdup(subparam
);
883 memset(&lst
[2*(nr
+1)],0,2*sizeof(char*));
888 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Invalid subconfig argument! ('%s')\n", token
);
889 return M_OPT_INVALID
;
891 token
= strtok(NULL
, (char *)&(":"));
903 m_option_type_t m_option_type_subconfig
= {
905 "The syntax is -option opt1=foo:flag:opt2=blah",
907 M_OPT_TYPE_HAS_CHILD
,
916 #include "libmpcodecs/img_format.h"
918 /* FIXME: snyc with img_format.h */
922 } mp_imgfmt_list
[] = {
923 {"444p", IMGFMT_444P
},
924 {"422p", IMGFMT_422P
},
925 {"411p", IMGFMT_411P
},
926 {"yuy2", IMGFMT_YUY2
},
927 {"uyvy", IMGFMT_UYVY
},
928 {"yvu9", IMGFMT_YVU9
},
929 {"if09", IMGFMT_IF09
},
930 {"yv12", IMGFMT_YV12
},
931 {"i420", IMGFMT_I420
},
932 {"iyuv", IMGFMT_IYUV
},
933 {"clpl", IMGFMT_CLPL
},
934 {"hm12", IMGFMT_NV12
},
935 {"y800", IMGFMT_Y800
},
937 {"nv12", IMGFMT_NV12
},
938 {"nv21", IMGFMT_NV21
},
939 {"bgr24", IMGFMT_BGR24
},
940 {"bgr32", IMGFMT_BGR32
},
941 {"bgr16", IMGFMT_BGR16
},
942 {"bgr15", IMGFMT_BGR15
},
943 {"bgr8", IMGFMT_BGR8
},
944 {"bgr4", IMGFMT_BGR4
},
945 {"bg4b", IMGFMT_BG4B
},
946 {"bgr1", IMGFMT_BGR1
},
947 {"rgb24", IMGFMT_RGB24
},
948 {"rgb32", IMGFMT_RGB32
},
949 {"rgb16", IMGFMT_RGB16
},
950 {"rgb15", IMGFMT_RGB15
},
951 {"rgb8", IMGFMT_RGB8
},
952 {"rgb4", IMGFMT_RGB4
},
953 {"rg4b", IMGFMT_RG4B
},
954 {"rgb1", IMGFMT_RGB1
},
958 static int parse_imgfmt(m_option_t
* opt
,char *name
, char *param
, void* dst
, int src
) {
962 if (param
== NULL
|| strlen(param
) == 0)
963 return M_OPT_MISSING_PARAM
;
965 if(!strcmp(param
,"help")) {
966 mp_msg(MSGT_CFGPARSER
, MSGL_INFO
, "Available formats:");
967 for(i
= 0 ; mp_imgfmt_list
[i
].name
; i
++)
968 mp_msg(MSGT_CFGPARSER
, MSGL_INFO
, " %s",mp_imgfmt_list
[i
].name
);
969 mp_msg(MSGT_CFGPARSER
, MSGL_INFO
, "\n");
973 if (sscanf(param
, "0x%x", &fmt
) != 1)
975 for(i
= 0 ; mp_imgfmt_list
[i
].name
; i
++) {
976 if(!strcasecmp(param
,mp_imgfmt_list
[i
].name
)) {
977 fmt
=mp_imgfmt_list
[i
].fmt
;
981 if(!mp_imgfmt_list
[i
].name
) {
982 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: unknown format name: '%s'\n",name
,param
);
983 return M_OPT_INVALID
;
988 *((uint32_t*)dst
) = fmt
;
993 m_option_type_t m_option_type_imgfmt
= {
995 "Please report any missing colorspaces.",
1006 //// Objects (i.e. filters, etc) settings
1008 #include "m_struct.h"
1011 #define VAL(x) (*(m_obj_settings_t**)(x))
1013 static int find_obj_desc(char* name
,m_obj_list_t
* l
,m_struct_t
** ret
) {
1017 for(i
= 0 ; l
->list
[i
] ; i
++) {
1018 n
= M_ST_MB(char*,l
->list
[i
],l
->name_off
);
1019 if(!strcmp(n
,name
)) {
1020 *ret
= M_ST_MB(m_struct_t
*,l
->list
[i
],l
->desc_off
);
1027 static int get_obj_param(char* opt_name
,char* obj_name
, m_struct_t
* desc
,
1028 char* str
,int* nold
,int oldmax
,char** dst
) {
1033 eq
= strchr(str
,'=');
1039 if(p
[0] == '\0') p
= NULL
;
1041 opt
= m_option_list_find(desc
->fields
,str
);
1043 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: %s doesn't have a %s parameter.\n",opt_name
,obj_name
,str
);
1044 return M_OPT_UNKNOWN
;
1046 r
= m_option_parse(opt
,str
,p
,NULL
,M_CONFIG_FILE
);
1048 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Error while parsing %s parameter %s (%s)\n",opt_name
,obj_name
,str
,p
);
1053 dst
[0] = strdup(str
);
1054 dst
[1] = p
? strdup(p
) : NULL
;
1058 if((*nold
) >= oldmax
) {
1059 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: %s has only %d params, so you can't give more than %d unnamed params.\n",
1060 opt_name
,obj_name
,oldmax
,oldmax
);
1061 return M_OPT_OUT_OF_RANGE
;
1063 opt
= &desc
->fields
[(*nold
)];
1064 r
= m_option_parse(opt
,opt
->name
,str
,NULL
,M_CONFIG_FILE
);
1066 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Error while parsing %s parameter %s (%s)\n",opt_name
,obj_name
,opt
->name
,str
);
1070 dst
[0] = strdup(opt
->name
);
1071 dst
[1] = strdup(str
);
1078 static int get_obj_params(char* opt_name
, char* name
,char* params
,
1079 m_struct_t
* desc
,char separator
, char*** _ret
) {
1080 int n
= 0,nold
= 0, nopts
,r
;
1081 char* ptr
,*last_ptr
= params
,*eq
;
1084 if(!strcmp(params
,"help")) { // Help
1085 char min
[50],max
[50];
1087 printf("%s doesn't have any options.\n\n",name
);
1090 printf("\n Name Type Min Max\n\n");
1091 for(n
= 0 ; desc
->fields
[n
].name
; n
++) {
1092 m_option_t
* opt
= &desc
->fields
[n
];
1093 if(opt
->type
->flags
& M_OPT_TYPE_HAS_CHILD
) continue;
1094 if(opt
->flags
& M_OPT_MIN
)
1095 sprintf(min
,"%-8.0f",opt
->min
);
1098 if(opt
->flags
& M_OPT_MAX
)
1099 sprintf(max
,"%-8.0f",opt
->max
);
1102 printf(" %-20.20s %-15.15s %-10.10s %-10.10s\n",
1112 for(nopts
= 0 ; desc
->fields
[nopts
].name
; nopts
++)
1115 // TODO : Check that each opt can be parsed
1117 while(last_ptr
&& last_ptr
[0] != '\0') {
1118 ptr
= strchr(last_ptr
,separator
);
1120 r
= get_obj_param(opt_name
,name
,desc
,last_ptr
,&nold
,nopts
,NULL
);
1124 if(ptr
== last_ptr
) { // Empty field, count it and go on
1130 r
= get_obj_param(opt_name
,name
,desc
,last_ptr
,&nold
,nopts
,NULL
);
1137 if(!_ret
) // Just test
1140 ret
= malloc((n
+2)*2*sizeof(char*));
1144 while(last_ptr
&& last_ptr
[0] != '\0') {
1145 ptr
= strchr(last_ptr
,separator
);
1147 get_obj_param(opt_name
,name
,desc
,last_ptr
,&nold
,nopts
,&ret
[n
*2]);
1151 if(ptr
== last_ptr
) { // Empty field, count it and go on
1157 get_obj_param(opt_name
,name
,desc
,last_ptr
,&nold
,nopts
,&ret
[n
*2]);
1161 ret
[n
*2] = ret
[n
*2+1] = NULL
;
1167 static int parse_obj_params(m_option_t
* opt
,char *name
,
1168 char *param
, void* dst
, int src
) {
1171 m_obj_params_t
* p
= opt
->priv
;
1172 m_struct_t
* desc
= p
->desc
;
1173 char* cpy
= strdup(param
);
1175 // We need the object desc
1177 return M_OPT_INVALID
;
1179 r
= get_obj_params(name
,desc
->name
,cpy
,desc
,p
->separator
,&opts
);
1186 for(r
= 0 ; opts
[r
] ; r
+= 2)
1187 m_struct_set(desc
,dst
,opts
[r
],opts
[r
+1]);
1193 m_option_type_t m_option_type_obj_params
= {
1206 /// Some predefined types as a definition would be quite lengthy
1209 static m_span_t m_span_params_dflts
= { -1, -1 };
1210 static m_option_t m_span_params_fields
[] = {
1211 {"start", M_ST_OFF(m_span_t
,start
), CONF_TYPE_INT
, M_OPT_MIN
, 1 ,0, NULL
},
1212 {"end", M_ST_OFF(m_span_t
,end
), CONF_TYPE_INT
, M_OPT_MIN
, 1 ,0, NULL
},
1213 { NULL
, NULL
, 0, 0, 0, 0, NULL
}
1215 static struct m_struct_st m_span_opts
= {
1218 &m_span_params_dflts
,
1219 m_span_params_fields
1221 m_obj_params_t m_span_params_def
= {
1226 static int parse_obj_settings(char* opt
,char* str
,m_obj_list_t
* list
,
1227 m_obj_settings_t
**_ret
, int ret_n
) {
1229 char *param
,**plist
= NULL
;
1231 m_obj_settings_t
*ret
= _ret
? *_ret
: NULL
;
1234 // Now check that the object exists
1235 param
= strchr(str
,'=');
1239 if(strlen(param
) <= 0)
1244 if(!find_obj_desc(str
,list
,&desc
)) {
1245 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: %s doesn't exist.\n",opt
,str
);
1246 return M_OPT_INVALID
;
1251 plist
= calloc(4,sizeof(char*));
1252 plist
[0] = strdup("_oldargs_");
1253 plist
[1] = strdup(param
);
1255 r
= get_obj_params(opt
,str
,param
,desc
,':',_ret
? &plist
: NULL
);
1263 ret
= realloc(ret
,(ret_n
+2)*sizeof(m_obj_settings_t
));
1264 memset(&ret
[ret_n
],0,2*sizeof(m_obj_settings_t
));
1265 ret
[ret_n
].name
= strdup(str
);
1266 ret
[ret_n
].attribs
= plist
;
1272 static void free_obj_settings_list(void* dst
);
1274 static int obj_settings_list_del(char *opt_name
,char *param
,void* dst
, int src
) {
1275 char** str_list
= NULL
;
1276 int r
,i
,idx_max
= 0;
1277 char* rem_id
= "_removed_marker_";
1278 m_option_t list_opt
= {opt_name
, NULL
, CONF_TYPE_STRING_LIST
,
1280 m_obj_settings_t
* obj_list
= dst
? VAL(dst
) : NULL
;
1282 if(dst
&& !obj_list
) {
1283 mp_msg(MSGT_CFGPARSER
, MSGL_WARN
, "Option %s: the list is empty.\n",opt_name
);
1285 } else if(obj_list
) {
1286 for(idx_max
= 0 ; obj_list
[idx_max
].name
!= NULL
; idx_max
++)
1290 r
= m_option_parse(&list_opt
,opt_name
,param
,&str_list
,src
);
1291 if(r
< 0 || !str_list
)
1294 for(r
= 0 ; str_list
[r
] ; r
++) {
1297 id
= strtol(str_list
[r
],&endptr
,0);
1298 if(endptr
== str_list
[r
]) {
1299 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: invalid parameter. We need a list of integers which are the indices of the elements to remove.\n",opt_name
);
1300 m_option_free(&list_opt
,&str_list
);
1301 return M_OPT_INVALID
;
1303 if(!obj_list
) continue;
1304 if(id
>= idx_max
|| id
< -idx_max
) {
1305 mp_msg(MSGT_CFGPARSER
, MSGL_WARN
, "Option %s: Index %d is out of range.\n",opt_name
,id
);
1310 free(obj_list
[id
].name
);
1311 free_str_list(&(obj_list
[id
].attribs
));
1312 obj_list
[id
].name
= rem_id
;
1316 m_option_free(&list_opt
,&str_list
);
1320 for(i
= 0 ; obj_list
[i
].name
; i
++) {
1321 while(obj_list
[i
].name
== rem_id
) {
1322 memmove(&obj_list
[i
],&obj_list
[i
+1],sizeof(m_obj_settings_t
)*(idx_max
- i
));
1326 obj_list
= realloc(obj_list
,sizeof(m_obj_settings_t
)*(idx_max
+1));
1327 VAL(dst
) = obj_list
;
1332 static int parse_obj_settings_list(m_option_t
* opt
,char *name
,
1333 char *param
, void* dst
, int src
) {
1334 int n
= 0,r
,len
= strlen(opt
->name
);
1336 char *ptr
, *last_ptr
;
1337 m_obj_settings_t
*res
= NULL
,*queue
= NULL
,*head
= NULL
;
1340 // We need the objects list
1342 return M_OPT_INVALID
;
1344 if(opt
->name
[len
-1] == '*' && ((int)strlen(name
) > len
- 1)) {
1345 char* n
= &name
[len
-1];
1346 if(strcasecmp(n
,"-add") == 0)
1348 else if(strcasecmp(n
,"-pre") == 0)
1350 else if(strcasecmp(n
,"-del") == 0)
1352 else if(strcasecmp(n
,"-clr") == 0)
1356 strncpy(prefix
,opt
->name
,len
-1);
1357 prefix
[len
-1] = '\0';
1358 mp_msg(MSGT_VFILTER
,MSGL_ERR
, "Option %s: unknown postfix %s\n"
1359 "Supported postfixes are:\n"
1361 " Append the given list to the current list\n\n"
1363 " Prepend the given list to the current list\n\n"
1364 " %3$s-del x,y,...\n"
1365 " Remove the given elements. Take the list element index (starting from 0).\n"
1366 " Negative index can be used (i.e. -1 is the last element)\n\n"
1368 " Clear the current list.\n",name
,n
,prefix
);
1370 return M_OPT_UNKNOWN
;
1374 // Clear the list ??
1377 free_obj_settings_list(dst
);
1381 if (param
== NULL
|| strlen(param
) == 0)
1382 return M_OPT_MISSING_PARAM
;
1386 if(dst
) head
= VAL(dst
);
1389 if(dst
) queue
= VAL(dst
);
1392 return obj_settings_list_del(name
,param
,dst
,src
);
1395 free_obj_settings_list(dst
);
1398 mp_msg(MSGT_VFILTER
,MSGL_ERR
, "Option %s: FIXME\n",name
);
1399 return M_OPT_UNKNOWN
;
1402 if(!strcmp(param
,"help")) {
1403 m_obj_list_t
* ol
= opt
->priv
;
1404 for(n
= 0 ; ol
->list
[n
] ; n
++)
1405 mp_msg(MSGT_VFILTER
,MSGL_INFO
," %-15s: %s\n",
1406 M_ST_MB(char*,ol
->list
[n
],ol
->name_off
),
1407 M_ST_MB(char*,ol
->list
[n
],ol
->info_off
));
1410 ptr
= str
= strdup(param
);
1412 while(ptr
[0] != '\0') {
1414 ptr
= strchr(ptr
,LIST_SEPARATOR
);
1416 r
= parse_obj_settings(name
,last_ptr
,opt
->priv
,dst
? &res
: NULL
,n
);
1425 r
= parse_obj_settings(name
,last_ptr
,opt
->priv
,dst
? &res
: NULL
,n
);
1435 return M_OPT_INVALID
;
1437 if( ((opt
->flags
& M_OPT_MIN
) && (n
< opt
->min
)) ||
1438 ((opt
->flags
& M_OPT_MAX
) && (n
> opt
->max
)) )
1439 return M_OPT_OUT_OF_RANGE
;
1444 for(qsize
= 0 ; queue
[qsize
].name
; qsize
++)
1446 res
= realloc(res
,(qsize
+n
+1)*sizeof(m_obj_settings_t
));
1447 memcpy(&res
[n
],queue
,(qsize
+1)*sizeof(m_obj_settings_t
));
1453 for(hsize
= 0 ; head
[hsize
].name
; hsize
++)
1455 head
= realloc(head
,(hsize
+n
+1)*sizeof(m_obj_settings_t
));
1456 memcpy(&head
[hsize
],res
,(n
+1)*sizeof(m_obj_settings_t
));
1465 static void free_obj_settings_list(void* dst
) {
1467 m_obj_settings_t
*d
;
1469 if(!dst
|| !VAL(dst
)) return;
1473 for(n
= 0 ; d
[n
].name
; n
++) {
1475 free_str_list(&(d
[n
].attribs
));
1482 static void copy_obj_settings_list(m_option_t
* opt
,void* dst
, void* src
) {
1483 m_obj_settings_t
*d
,*s
;
1492 free_obj_settings_list(dst
);
1497 for(n
= 0 ; s
[n
].name
; n
++)
1499 d
= malloc((n
+1)*sizeof(m_obj_settings_t
));
1500 for(n
= 0 ; s
[n
].name
; n
++) {
1501 d
[n
].name
= strdup(s
[n
].name
);
1502 d
[n
].attribs
= NULL
;
1503 copy_str_list(NULL
,&(d
[n
].attribs
),&(s
[n
].attribs
));
1506 d
[n
].attribs
= NULL
;
1510 m_option_type_t m_option_type_obj_settings_list
= {
1511 "Object settings list",
1513 sizeof(m_obj_settings_t
*),
1514 M_OPT_TYPE_DYNAMIC
|M_OPT_TYPE_ALLOW_WILDCARD
,
1515 parse_obj_settings_list
,
1517 copy_obj_settings_list
,
1518 copy_obj_settings_list
,
1519 copy_obj_settings_list
,
1520 free_obj_settings_list
,
1525 static int parse_obj_presets(m_option_t
* opt
,char *name
,
1526 char *param
, void* dst
, int src
) {
1527 m_obj_presets_t
* obj_p
= (m_obj_presets_t
*)opt
->priv
;
1528 m_struct_t
*in_desc
,*out_desc
;
1530 unsigned char* pre
= obj_p
->presets
;
1531 char* pre_name
= NULL
;
1534 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Presets need a pointer to a m_obj_presets_t in the priv field.\n",name
);
1535 return M_OPT_PARSER_ERR
;
1539 return M_OPT_MISSING_PARAM
;
1541 in_desc
= obj_p
->in_desc
;
1542 out_desc
= obj_p
->out_desc
? obj_p
->out_desc
: obj_p
->in_desc
;
1545 if(!strcmp(param
,"help")) {
1546 mp_msg(MSGT_CFGPARSER
, MSGL_INFO
, "Available presets for %s->%s:",out_desc
->name
,name
);
1547 for(pre
= obj_p
->presets
;(pre_name
= M_ST_MB(char*,pre
,obj_p
->name_off
)) ;
1549 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, " %s",pre_name
);
1550 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "\n");
1554 for(pre_name
= M_ST_MB(char*,pre
,obj_p
->name_off
) ; pre_name
;
1555 pre
+= s
, pre_name
= M_ST_MB(char*,pre
,obj_p
->name_off
)) {
1556 if(!strcmp(pre_name
,param
)) break;
1559 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: There is no preset named %s\n"
1560 "Available presets are:",name
,param
);
1561 for(pre
= obj_p
->presets
;(pre_name
= M_ST_MB(char*,pre
,obj_p
->name_off
)) ;
1563 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, " %s",pre_name
);
1564 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "\n");
1565 return M_OPT_INVALID
;
1570 for(i
= 0 ; in_desc
->fields
[i
].name
; i
++) {
1571 m_option_t
* out_opt
= m_option_list_find(out_desc
->fields
,
1572 in_desc
->fields
[i
].name
);
1574 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Unable to find the target option for field %s.\nPlease report this to the developers.\n",name
,in_desc
->fields
[i
].name
);
1575 return M_OPT_PARSER_ERR
;
1577 m_option_copy(out_opt
,M_ST_MB_P(dst
,out_opt
->p
),M_ST_MB_P(pre
,in_desc
->fields
[i
].p
));
1583 m_option_type_t m_option_type_obj_presets
= {
1596 static int parse_custom_url(m_option_t
* opt
,char *name
,
1597 char *url
, void* dst
, int src
) {
1599 char *ptr1
=NULL
, *ptr2
=NULL
, *ptr3
=NULL
;
1600 m_struct_t
* desc
= opt
->priv
;
1603 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Custom URL needs a pointer to a m_struct_t in the priv field.\n",name
);
1604 return M_OPT_PARSER_ERR
;
1607 // extract the protocol
1608 ptr1
= strstr(url
, "://");
1611 if(m_option_list_find(desc
->fields
,"filename")) {
1612 m_struct_set(desc
,dst
,"filename",url
);
1615 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
,"Option %s: URL doesn't have a valid protocol!\n",name
);
1616 return M_OPT_INVALID
;
1619 if(dst
&& m_option_list_find(desc
->fields
,"protocol")) {
1621 r
= m_struct_set(desc
,dst
,"protocol",url
);
1624 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Error while setting protocol.\n",name
);
1633 // check if a username:password is given
1634 ptr2
= strstr(ptr1
, "@");
1635 ptr3
= strstr(ptr1
, "/");
1636 if( ptr3
!=NULL
&& ptr3
<ptr2
) {
1637 // it isn't really a username but rather a part of the path
1642 // We got something, at least a username...
1643 int len
= ptr2
-ptr1
;
1644 if(!m_option_list_find(desc
->fields
,"username")) {
1645 mp_msg(MSGT_CFGPARSER
, MSGL_WARN
, "Option %s: This URL doesn't have a username part.\n",name
);
1648 ptr3
= strstr(ptr1
, ":");
1649 if( ptr3
!=NULL
&& ptr3
<ptr2
) {
1650 // We also have a password
1651 int len2
= ptr2
-ptr3
-1;
1652 if(!m_option_list_find(desc
->fields
,"password")) {
1653 mp_msg(MSGT_CFGPARSER
, MSGL_WARN
, "Option %s: This URL doesn't have a password part.\n",name
);
1655 } else { // Username and password
1658 r
= m_struct_set(desc
,dst
,"username",ptr1
);
1661 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Error while setting username.\n",name
);
1665 r
= m_struct_set(desc
,dst
,"password",ptr3
+1);
1668 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Error while setting password.\n",name
);
1673 } else { // User name only
1675 r
= m_struct_set(desc
,dst
,"username",ptr1
);
1678 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Error while setting username.\n",name
);
1687 // before looking for a port number check if we have an IPv6 type numeric address
1688 // in an IPv6 URL the numeric address should be inside square braces.
1689 ptr2
= strstr(ptr1
, "[");
1690 ptr3
= strstr(ptr1
, "]");
1691 if( ptr2
!=NULL
&& ptr3
!=NULL
) {
1692 // we have an IPv6 numeric address
1700 // look if the port is given
1701 ptr2
= strstr(ptr2
, ":");
1702 // If the : is after the first / it isn't the port
1703 ptr3
= strstr(ptr1
, "/");
1704 if(ptr3
&& ptr3
- ptr2
< 0) ptr2
= NULL
;
1707 // Look if a path is given
1710 // So we have an URL like http://www.hostname.com
1713 // We have an URL like http://www.hostname.com/file.txt
1717 // We have an URL beginning like http://www.hostname.com:1212
1718 // Get the port number
1719 if(!m_option_list_find(desc
->fields
,"port")) {
1720 mp_msg(MSGT_CFGPARSER
, MSGL_WARN
, "Option %s: This URL doesn't have a port part.\n",name
);
1724 int p
= atoi(ptr2
+1);
1726 snprintf(tmp
,99,"%d",p
);
1727 r
= m_struct_set(desc
,dst
,"port",tmp
);
1729 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Error while setting port.\n",name
);
1736 if( strstr(ptr1
, "]")!=NULL
) pos2
--;
1739 if(!m_option_list_find(desc
->fields
,"hostname")) {
1740 mp_msg(MSGT_CFGPARSER
, MSGL_WARN
, "Option %s: This URL doesn't have a hostname part.\n",name
);
1743 char tmp
[pos2
-pos1
+1];
1744 strncpy(tmp
,ptr1
, pos2
-pos1
);
1745 tmp
[pos2
-pos1
] = '\0';
1746 r
= m_struct_set(desc
,dst
,"hostname",tmp
);
1748 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Error while setting hostname.\n",name
);
1753 // Look if a path is given
1754 ptr2
= strstr(ptr1
, "/");
1756 // A path/filename is given
1757 // check if it's not a trailing '/'
1758 if( strlen(ptr2
)>1 ) {
1759 // copy the path/filename in the URL container
1760 if(!m_option_list_find(desc
->fields
,"filename")) {
1761 mp_msg(MSGT_CFGPARSER
, MSGL_WARN
, "Option %s: This URL doesn't have a hostname part.\n",name
);
1765 int l
= strlen(ptr2
+1) + 1;
1766 char* fname
= ptr2
+1;
1769 url_unescape_string(fname
,ptr2
+1);
1771 r
= m_struct_set(desc
,dst
,"filename",fname
);
1775 mp_msg(MSGT_CFGPARSER
, MSGL_ERR
, "Option %s: Error while setting filename.\n",name
);
1785 /// TODO : Write the other needed funcs for 'normal' options
1786 m_option_type_t m_option_type_custom_url
= {