mirror of
https://github.com/mpv-player/mpv
synced 2024-12-11 17:37:23 +00:00
52e7eee811
git-svn-id: svn://svn.mplayerhq.hu/mplayer/trunk@11786 b3059339-0415-0410-9bf9-f77b7e298cf2
1805 lines
41 KiB
C
1805 lines
41 KiB
C
#include "config.h"
|
|
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <math.h>
|
|
#include <stdio.h>
|
|
#include <stdarg.h>
|
|
#include <inttypes.h>
|
|
#include <unistd.h>
|
|
|
|
#include "m_option.h"
|
|
//#include "m_config.h"
|
|
#include "mp_msg.h"
|
|
#include "libmpdemux/url.h"
|
|
|
|
// Don't free for 'production' atm
|
|
#ifndef MP_DEBUG
|
|
#define NO_FREE
|
|
#endif
|
|
|
|
m_option_t* m_option_list_find(m_option_t* list,char* name) {
|
|
int i;
|
|
|
|
for(i = 0 ; list[i].name ; i++) {
|
|
int l = strlen(list[i].name) - 1;
|
|
if((list[i].type->flags & M_OPT_TYPE_ALLOW_WILDCARD) &&
|
|
(l > 0) && (list[i].name[l] == '*')) {
|
|
if(strncasecmp(list[i].name,name,l) == 0)
|
|
return &list[i];
|
|
} else if(strcasecmp(list[i].name,name) == 0)
|
|
return &list[i];
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
// Default function that just does a memcpy
|
|
|
|
static void copy_opt(m_option_t* opt,void* dst,void* src) {
|
|
if(dst && src)
|
|
memcpy(dst,src,opt->type->size);
|
|
}
|
|
|
|
// Helper for the print funcs (from man printf)
|
|
static char* dup_printf(const char *fmt, ...) {
|
|
/* Guess we need no more than 50 bytes. */
|
|
int n, size = 50;
|
|
char *p;
|
|
va_list ap;
|
|
if ((p = malloc (size)) == NULL)
|
|
return NULL;
|
|
while (1) {
|
|
/* Try to print in the allocated space. */
|
|
va_start(ap, fmt);
|
|
n = vsnprintf (p, size, fmt, ap);
|
|
va_end(ap);
|
|
/* If that worked, return the string. */
|
|
if (n > -1 && n < size)
|
|
return p;
|
|
/* Else try again with more space. */
|
|
if (n > -1) /* glibc 2.1 */
|
|
size = n+1; /* precisely what is needed */
|
|
else /* glibc 2.0 */
|
|
size *= 2; /* twice the old size */
|
|
if ((p = realloc (p, size)) == NULL)
|
|
return NULL;
|
|
}
|
|
}
|
|
|
|
|
|
// Flag
|
|
|
|
#define VAL(x) (*(int*)(x))
|
|
|
|
static int parse_flag(m_option_t* opt,char *name, char *param, void* dst, int src) {
|
|
if (src == M_CONFIG_FILE) {
|
|
if(!param) return M_OPT_MISSING_PARAM;
|
|
if (!strcasecmp(param, "yes") || /* any other language? */
|
|
!strcasecmp(param, "on") ||
|
|
!strcasecmp(param, "ja") ||
|
|
!strcasecmp(param, "si") ||
|
|
!strcasecmp(param, "igen") ||
|
|
!strcasecmp(param, "y") ||
|
|
!strcasecmp(param, "j") ||
|
|
!strcasecmp(param, "i") ||
|
|
!strcasecmp(param, "tak") ||
|
|
!strcasecmp(param, "ja") ||
|
|
!strcmp(param, "1")) {
|
|
if(dst) VAL(dst) = opt->max;
|
|
} else if (!strcasecmp(param, "no") ||
|
|
!strcasecmp(param, "off") ||
|
|
!strcasecmp(param, "nein") ||
|
|
!strcasecmp(param, "nicht") ||
|
|
!strcasecmp(param, "nem") ||
|
|
!strcasecmp(param, "n") ||
|
|
!strcasecmp(param, "nie") ||
|
|
!strcasecmp(param, "nej") ||
|
|
!strcmp(param, "0")) {
|
|
if(dst) VAL(dst) = opt->min;
|
|
} else {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Invalid parameter for %s flag: %s\n",name, param);
|
|
return M_OPT_INVALID;
|
|
}
|
|
return 1;
|
|
} else {
|
|
if(dst) VAL(dst) = opt->max;
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
static char* print_flag(m_option_t* opt, void* val) {
|
|
if(VAL(val) == opt->min)
|
|
return strdup("no");
|
|
else
|
|
return strdup("yes");
|
|
}
|
|
|
|
m_option_type_t m_option_type_flag = {
|
|
"Flag",
|
|
"need yes or no in config files",
|
|
sizeof(int),
|
|
0,
|
|
parse_flag,
|
|
print_flag,
|
|
copy_opt,
|
|
copy_opt,
|
|
NULL,
|
|
NULL
|
|
};
|
|
|
|
// Integer
|
|
|
|
static int parse_int(m_option_t* opt,char *name, char *param, void* dst, int src) {
|
|
long tmp_int;
|
|
char *endptr;
|
|
src = 0;
|
|
|
|
if (param == NULL)
|
|
return M_OPT_MISSING_PARAM;
|
|
|
|
tmp_int = strtol(param, &endptr, 0);
|
|
if (*endptr) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "The %s option must be an integer: %s\n",name, param);
|
|
return M_OPT_INVALID;
|
|
}
|
|
|
|
if ((opt->flags & M_OPT_MIN) && (tmp_int < opt->min)) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "The %s option must be >= %d: %s\n", name, (int) opt->min, param);
|
|
return M_OPT_OUT_OF_RANGE;
|
|
}
|
|
|
|
if ((opt->flags & M_OPT_MAX) && (tmp_int > opt->max)) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "The %s option must be <= %d: %s\n",name, (int) opt->max, param);
|
|
return M_OPT_OUT_OF_RANGE;
|
|
}
|
|
|
|
if(dst) VAL(dst) = tmp_int;
|
|
|
|
return 1;
|
|
}
|
|
|
|
static char* print_int(m_option_t* opt, void* val) {
|
|
opt = NULL;
|
|
return dup_printf("%d",VAL(val));
|
|
}
|
|
|
|
m_option_type_t m_option_type_int = {
|
|
"Integer",
|
|
"",
|
|
sizeof(int),
|
|
0,
|
|
parse_int,
|
|
print_int,
|
|
copy_opt,
|
|
copy_opt,
|
|
NULL,
|
|
NULL
|
|
};
|
|
|
|
// Float
|
|
|
|
#undef VAL
|
|
#define VAL(x) (*(float*)(x))
|
|
|
|
static int parse_float(m_option_t* opt,char *name, char *param, void* dst, int src) {
|
|
float tmp_float;
|
|
char* endptr;
|
|
src = 0;
|
|
|
|
if (param == NULL)
|
|
return M_OPT_MISSING_PARAM;
|
|
|
|
tmp_float = strtod(param, &endptr);
|
|
|
|
switch(*endptr) {
|
|
case ':':
|
|
case '/':
|
|
tmp_float /= strtod(endptr+1, &endptr);
|
|
break;
|
|
case '.':
|
|
case ',':
|
|
/* we also handle floats specified with
|
|
* non-locale decimal point ::atmos
|
|
*/
|
|
if(tmp_float<0)
|
|
tmp_float -= 1.0/pow(10,strlen(endptr+1)) * strtod(endptr+1, &endptr);
|
|
else
|
|
tmp_float += 1.0/pow(10,strlen(endptr+1)) * strtod(endptr+1, &endptr);
|
|
break;
|
|
}
|
|
|
|
if (*endptr) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "The %s option must be a floating point "
|
|
"number or a ratio (numerator[:/]denominator): %s\n",name, param);
|
|
return M_OPT_INVALID;
|
|
}
|
|
|
|
if (opt->flags & M_OPT_MIN)
|
|
if (tmp_float < opt->min) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "The %s option must be >= %f: %s\n", name, opt->min, param);
|
|
return M_OPT_OUT_OF_RANGE;
|
|
}
|
|
|
|
if (opt->flags & M_OPT_MAX)
|
|
if (tmp_float > opt->max) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "The %s option must be <= %f: %s\n", name, opt->max, param);
|
|
return M_OPT_OUT_OF_RANGE;
|
|
}
|
|
|
|
if(dst) VAL(dst) = tmp_float;
|
|
return 1;
|
|
}
|
|
|
|
static char* print_float(m_option_t* opt, void* val) {
|
|
opt = NULL;
|
|
return dup_printf("%f",VAL(val));
|
|
}
|
|
|
|
m_option_type_t m_option_type_float = {
|
|
"Float",
|
|
"floating point number or ratio (numerator[:/]denominator)",
|
|
sizeof(float),
|
|
0,
|
|
parse_float,
|
|
print_float,
|
|
copy_opt,
|
|
copy_opt,
|
|
NULL,
|
|
NULL
|
|
};
|
|
|
|
///////////// Position
|
|
#undef VAL
|
|
#define VAL(x) (*(off_t*)(x))
|
|
|
|
static int parse_position(m_option_t* opt,char *name, char *param, void* dst, int src) {
|
|
off_t tmp_off;
|
|
char dummy;
|
|
|
|
if (param == NULL)
|
|
return M_OPT_MISSING_PARAM;
|
|
if (sscanf(param, sizeof(off_t) == sizeof(int) ?
|
|
"%d%c" : "%lld%c", &tmp_off, &dummy) != 1) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "The %s option must be an integer: %s\n",opt->name,param);
|
|
return M_OPT_INVALID;
|
|
}
|
|
|
|
if (opt->flags & M_OPT_MIN)
|
|
if (tmp_off < opt->min) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR,
|
|
(sizeof(off_t) == sizeof(int) ?
|
|
"The %s option must be >= %d: %s\n" :
|
|
"The %s option must be >= %lld: %s\n"),
|
|
name, (off_t) opt->min, param);
|
|
return M_OPT_OUT_OF_RANGE;
|
|
}
|
|
|
|
if (opt->flags & M_OPT_MAX)
|
|
if (tmp_off > opt->max) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR,
|
|
(sizeof(off_t) == sizeof(int) ?
|
|
"The %s option must be <= %d: %s\n" :
|
|
"The %s option must be <= %lld: %s\n"),
|
|
name, (off_t) opt->max, param);
|
|
return M_OPT_OUT_OF_RANGE;
|
|
}
|
|
|
|
if(dst)
|
|
VAL(dst) = tmp_off;
|
|
return 1;
|
|
}
|
|
|
|
static char* print_position(m_option_t* opt, void* val) {
|
|
return dup_printf(sizeof(off_t) == sizeof(int) ? "%d" : "%lld",VAL(val));
|
|
}
|
|
|
|
m_option_type_t m_option_type_position = {
|
|
"Position",
|
|
"Integer (off_t)",
|
|
sizeof(off_t),
|
|
0,
|
|
parse_position,
|
|
print_position,
|
|
copy_opt,
|
|
copy_opt,
|
|
NULL,
|
|
NULL
|
|
};
|
|
|
|
|
|
///////////// String
|
|
|
|
#undef VAL
|
|
#define VAL(x) (*(char**)(x))
|
|
|
|
static int parse_str(m_option_t* opt,char *name, char *param, void* dst, int src) {
|
|
|
|
|
|
if (param == NULL)
|
|
return M_OPT_MISSING_PARAM;
|
|
|
|
if ((opt->flags & M_OPT_MIN) && (strlen(param) < opt->min)) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Parameter must be >= %d chars: %s\n",
|
|
(int) opt->min, param);
|
|
return M_OPT_OUT_OF_RANGE;
|
|
}
|
|
|
|
if ((opt->flags & M_OPT_MAX) && (strlen(param) > opt->max)) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Parameter must be <= %d chars: %s\n",
|
|
(int) opt->max, param);
|
|
return M_OPT_OUT_OF_RANGE;
|
|
}
|
|
|
|
if(dst) {
|
|
if(VAL(dst))
|
|
free(VAL(dst));
|
|
VAL(dst) = strdup(param);
|
|
}
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
static char* print_str(m_option_t* opt, void* val) {
|
|
return (val && VAL(val) && strlen(VAL(val)) > 0) ? strdup(VAL(val)) : NULL;
|
|
}
|
|
|
|
static void copy_str(m_option_t* opt,void* dst, void* src) {
|
|
if(dst && src) {
|
|
#ifndef NO_FREE
|
|
if(VAL(dst)) free(VAL(dst)); //FIXME!!!
|
|
#endif
|
|
VAL(dst) = VAL(src) ? strdup(VAL(src)) : NULL;
|
|
}
|
|
}
|
|
|
|
static void free_str(void* src) {
|
|
if(src && VAL(src)){
|
|
#ifndef NO_FREE
|
|
free(VAL(src)); //FIXME!!!
|
|
#endif
|
|
VAL(src) = NULL;
|
|
}
|
|
}
|
|
|
|
m_option_type_t m_option_type_string = {
|
|
"String",
|
|
"",
|
|
sizeof(char*),
|
|
M_OPT_TYPE_DYNAMIC,
|
|
parse_str,
|
|
print_str,
|
|
copy_str,
|
|
copy_str,
|
|
copy_str,
|
|
free_str
|
|
};
|
|
|
|
//////////// String list
|
|
|
|
#define LIST_SEPARATOR ','
|
|
#undef VAL
|
|
#define VAL(x) (*(char***)(x))
|
|
|
|
#define OP_NONE 0
|
|
#define OP_ADD 1
|
|
#define OP_PRE 2
|
|
#define OP_DEL 3
|
|
#define OP_CLR 4
|
|
|
|
static void free_str_list(void* dst) {
|
|
char** d;
|
|
int i;
|
|
|
|
if(!dst || !VAL(dst)) return;
|
|
d = VAL(dst);
|
|
|
|
// FIXME!!!
|
|
#ifndef NO_FREE
|
|
for(i = 0 ; d[i] != NULL ; i++)
|
|
free(d[i]);
|
|
free(d);
|
|
#endif
|
|
VAL(dst) = NULL;
|
|
}
|
|
|
|
static int str_list_add(char** add, int n,void* dst,int pre) {
|
|
char** lst = VAL(dst);
|
|
int ln;
|
|
|
|
if(!dst) return M_OPT_PARSER_ERR;
|
|
lst = VAL(dst);
|
|
|
|
for(ln = 0 ; lst && lst[ln] ; ln++)
|
|
/**/;
|
|
|
|
lst = realloc(lst,(n+ln+1)*sizeof(char*));
|
|
|
|
if(pre) {
|
|
memmove(&lst[n],lst,(ln+1)*sizeof(char*));
|
|
memcpy(lst,add,n*sizeof(char*));
|
|
} else
|
|
memcpy(&lst[ln],add,(n+1)*sizeof(char*));
|
|
|
|
free(add);
|
|
|
|
VAL(dst) = lst;
|
|
|
|
return 1;
|
|
}
|
|
|
|
static int str_list_del(char** del, int n,void* dst) {
|
|
char **lst,*ep,**d;
|
|
int i,ln,s;
|
|
long idx;
|
|
|
|
if(!dst) return M_OPT_PARSER_ERR;
|
|
lst = VAL(dst);
|
|
|
|
for(ln = 0 ; lst && lst[ln] ; ln++)
|
|
/**/;
|
|
s = ln;
|
|
|
|
for(i = 0 ; del[i] != NULL ; i++) {
|
|
idx = strtol(del[i], &ep, 0);
|
|
if(*ep) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Invalid index: %s\n",del[i]);
|
|
free(del[i]);
|
|
continue;
|
|
}
|
|
free(del[i]);
|
|
if(idx < 0 || idx >= ln) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Index %ld is out of range.\n",idx);
|
|
continue;
|
|
} else if(!lst[idx])
|
|
continue;
|
|
free(lst[idx]);
|
|
lst[idx] = NULL;
|
|
s--;
|
|
}
|
|
free(del);
|
|
|
|
if(s == 0) {
|
|
if(lst) free(lst);
|
|
VAL(dst) = NULL;
|
|
return 1;
|
|
}
|
|
|
|
d = calloc(s+1,sizeof(char*));
|
|
for(i = 0, n = 0 ; i < ln ; i++) {
|
|
if(!lst[i]) continue;
|
|
d[n] = lst[i];
|
|
n++;
|
|
}
|
|
d[s] = NULL;
|
|
|
|
if(lst) free(lst);
|
|
VAL(dst) = d;
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
static int parse_str_list(m_option_t* opt,char *name, char *param, void* dst, int src) {
|
|
int n = 0,len = strlen(opt->name);
|
|
char *ptr = param, *last_ptr, **res;
|
|
int op = OP_NONE;
|
|
|
|
if(opt->name[len-1] == '*' && ((int)strlen(name) > len - 1)) {
|
|
char* n = &name[len-1];
|
|
if(strcasecmp(n,"-add") == 0)
|
|
op = OP_ADD;
|
|
else if(strcasecmp(n,"-pre") == 0)
|
|
op = OP_PRE;
|
|
else if(strcasecmp(n,"-del") == 0)
|
|
op = OP_DEL;
|
|
else if(strcasecmp(n,"-clr") == 0)
|
|
op = OP_CLR;
|
|
else
|
|
return M_OPT_UNKNOWN;
|
|
}
|
|
|
|
// Clear the list ??
|
|
if(op == OP_CLR) {
|
|
if(dst)
|
|
free_str_list(dst);
|
|
return 0;
|
|
}
|
|
|
|
// All other ops need a param
|
|
if (param == NULL || strlen(param) == 0)
|
|
return M_OPT_MISSING_PARAM;
|
|
|
|
|
|
while(ptr[0] != '\0') {
|
|
last_ptr = ptr;
|
|
ptr = strchr(ptr,LIST_SEPARATOR);
|
|
if(!ptr) {
|
|
n++;
|
|
break;
|
|
}
|
|
ptr++;
|
|
n++;
|
|
}
|
|
if(n == 0)
|
|
return M_OPT_INVALID;
|
|
if( ((opt->flags & M_OPT_MIN) && (n < opt->min)) ||
|
|
((opt->flags & M_OPT_MAX) && (n > opt->max)) )
|
|
return M_OPT_OUT_OF_RANGE;
|
|
|
|
if(!dst) return 1;
|
|
|
|
res = malloc((n+2)*sizeof(char*));
|
|
ptr = param;
|
|
n = 0;
|
|
|
|
while(1) {
|
|
last_ptr = ptr;
|
|
ptr = strchr(ptr,LIST_SEPARATOR);
|
|
if(!ptr) {
|
|
res[n] = strdup(last_ptr);
|
|
n++;
|
|
break;
|
|
}
|
|
len = ptr - last_ptr;
|
|
res[n] = (char*)malloc(len + 1);
|
|
if(len) strncpy(res[n],last_ptr,len);
|
|
res[n][len] = '\0';
|
|
ptr++;
|
|
n++;
|
|
}
|
|
res[n] = NULL;
|
|
|
|
switch(op) {
|
|
case OP_ADD:
|
|
return str_list_add(res,n,dst,0);
|
|
case OP_PRE:
|
|
return str_list_add(res,n,dst,1);
|
|
case OP_DEL:
|
|
return str_list_del(res,n,dst);
|
|
}
|
|
|
|
if(VAL(dst))
|
|
free_str_list(dst);
|
|
VAL(dst) = res;
|
|
|
|
return 1;
|
|
}
|
|
|
|
static void copy_str_list(m_option_t* opt,void* dst, void* src) {
|
|
int n;
|
|
char **d,**s;
|
|
|
|
if(!(dst && src)) return;
|
|
s = VAL(src);
|
|
|
|
if(VAL(dst))
|
|
free_str_list(dst);
|
|
|
|
if(!s) {
|
|
VAL(dst) = NULL;
|
|
return;
|
|
}
|
|
|
|
for(n = 0 ; s[n] != NULL ; n++)
|
|
/* NOTHING */;
|
|
d = (char**)malloc((n+1)*sizeof(char*));
|
|
for( ; n >= 0 ; n--)
|
|
d[n] = s[n] ? strdup(s[n]) : NULL;
|
|
|
|
VAL(dst) = d;
|
|
}
|
|
|
|
static char* print_str_list(m_option_t* opt, void* src) {
|
|
char **lst = NULL;
|
|
char *ret = NULL,*last = NULL;
|
|
int i;
|
|
|
|
if(!(src && VAL(src))) return NULL;
|
|
lst = VAL(src);
|
|
|
|
for(i = 0 ; lst[i] ; i++) {
|
|
if(last) {
|
|
ret = dup_printf("%s,%s",last,lst[i]);
|
|
free(last);
|
|
} else
|
|
ret = strdup(lst[i]);
|
|
last = ret;
|
|
}
|
|
if(last && last != ret) free(last);
|
|
return ret;
|
|
}
|
|
|
|
m_option_type_t m_option_type_string_list = {
|
|
"String list",
|
|
"A list of strings separated by ','\n"
|
|
"Option with a name ending in an * permits using the following suffix: \n"
|
|
"\t-add: Add the given parameters at the end of the list.\n"
|
|
"\t-pre: Add the given parameters at the begining of the list.\n"
|
|
"\t-del: Remove the entry at the given indices.\n"
|
|
"\t-clr: Clear the list.\n"
|
|
"e.g: -vf-add flip,mirror -vf-del 2,5\n",
|
|
sizeof(char**),
|
|
M_OPT_TYPE_DYNAMIC | M_OPT_TYPE_ALLOW_WILDCARD,
|
|
parse_str_list,
|
|
print_str_list,
|
|
copy_str_list,
|
|
copy_str_list,
|
|
copy_str_list,
|
|
free_str_list
|
|
};
|
|
|
|
|
|
/////////////////// Func based options
|
|
|
|
// A chained list to save the various calls for func_param and func_full
|
|
typedef struct m_func_save m_func_save_t;
|
|
struct m_func_save {
|
|
m_func_save_t* next;
|
|
char* name;
|
|
char* param;
|
|
};
|
|
|
|
#undef VAL
|
|
#define VAL(x) (*(m_func_save_t**)(x))
|
|
|
|
static void free_func_pf(void* src) {
|
|
m_func_save_t *s,*n;
|
|
|
|
if(!src) return;
|
|
|
|
s = VAL(src);
|
|
|
|
while(s) {
|
|
n = s->next;
|
|
free(s->name);
|
|
if(s->param) free(s->param);
|
|
free(s);
|
|
s = n;
|
|
}
|
|
VAL(src) = NULL;
|
|
}
|
|
|
|
// Parser for func_param and func_full
|
|
static int parse_func_pf(m_option_t* opt,char *name, char *param, void* dst, int src) {
|
|
m_func_save_t *s,*p;
|
|
|
|
if(!dst)
|
|
return 1;
|
|
|
|
s = (m_func_save_t*)calloc(1,sizeof(m_func_save_t));
|
|
s->name = strdup(name);
|
|
s->param = param ? strdup(param) : NULL;
|
|
|
|
p = VAL(dst);
|
|
if(p) {
|
|
for( ; p->next != NULL ; p = p->next)
|
|
/**/;
|
|
p->next = s;
|
|
} else
|
|
VAL(dst) = s;
|
|
|
|
return 1;
|
|
}
|
|
|
|
static void copy_func_pf(m_option_t* opt,void* dst, void* src) {
|
|
m_func_save_t *d = NULL, *s,* last = NULL;
|
|
|
|
if(!(dst && src)) return;
|
|
s = VAL(src);
|
|
|
|
if(VAL(dst))
|
|
free_func_pf(dst);
|
|
|
|
while(s) {
|
|
d = (m_func_save_t*)malloc(sizeof(m_func_save_t));
|
|
d->name = strdup(s->name);
|
|
d->param = s->param ? strdup(s->param) : NULL;
|
|
if(last)
|
|
last->next = d;
|
|
else
|
|
VAL(dst) = d;
|
|
last = d;
|
|
s = s->next;
|
|
}
|
|
|
|
|
|
}
|
|
|
|
/////////////////// Func_param
|
|
|
|
static void set_func_param(m_option_t* opt, void* dst, void* src) {
|
|
m_func_save_t* s;
|
|
|
|
if(!src) return;
|
|
s = VAL(src);
|
|
|
|
if(!s) return;
|
|
|
|
// Revert if needed
|
|
if(opt->priv) ((m_opt_default_func_t)opt->priv)(opt,opt->name);
|
|
for( ; s != NULL ; s = s->next)
|
|
((m_opt_func_param_t) opt->p)(opt,s->param);
|
|
}
|
|
|
|
m_option_type_t m_option_type_func_param = {
|
|
"Func param",
|
|
"",
|
|
sizeof(m_func_save_t*),
|
|
M_OPT_TYPE_INDIRECT,
|
|
parse_func_pf,
|
|
NULL,
|
|
NULL, // Nothing to do on save
|
|
set_func_param,
|
|
copy_func_pf,
|
|
free_func_pf
|
|
};
|
|
|
|
/////////////////// Func_full
|
|
|
|
static void set_func_full(m_option_t* opt, void* dst, void* src) {
|
|
m_func_save_t* s;
|
|
|
|
if(!src) return;
|
|
|
|
for(s = VAL(src) ; s ; s = s->next) {
|
|
// Revert if needed
|
|
if(opt->priv) ((m_opt_default_func_t)opt->priv)(opt,s->name);
|
|
((m_opt_func_full_t) opt->p)(opt,s->name,s->param);
|
|
}
|
|
}
|
|
|
|
m_option_type_t m_option_type_func_full = {
|
|
"Func full",
|
|
"",
|
|
sizeof(m_func_save_t*),
|
|
M_OPT_TYPE_ALLOW_WILDCARD|M_OPT_TYPE_INDIRECT,
|
|
parse_func_pf,
|
|
NULL,
|
|
NULL, // Nothing to do on save
|
|
set_func_full,
|
|
copy_func_pf,
|
|
free_func_pf
|
|
};
|
|
|
|
/////////////// Func
|
|
|
|
#undef VAL
|
|
#define VAL(x) (*(int*)(x))
|
|
|
|
static int parse_func(m_option_t* opt,char *name, char *param, void* dst, int src) {
|
|
if(dst)
|
|
VAL(dst) += 1;
|
|
return 0;
|
|
}
|
|
|
|
static void set_func(m_option_t* opt,void* dst, void* src) {
|
|
int i;
|
|
if(opt->priv) ((m_opt_default_func_t)opt->priv)(opt,opt->name);
|
|
for(i = 0 ; i < VAL(src) ; i++)
|
|
((m_opt_func_t) opt->p)(opt);
|
|
}
|
|
|
|
m_option_type_t m_option_type_func = {
|
|
"Func",
|
|
"",
|
|
sizeof(int),
|
|
M_OPT_TYPE_INDIRECT,
|
|
parse_func,
|
|
NULL,
|
|
NULL, // Nothing to do on save
|
|
set_func,
|
|
NULL,
|
|
NULL
|
|
};
|
|
|
|
/////////////////// Print
|
|
|
|
static int parse_print(m_option_t* opt,char *name, char *param, void* dst, int src) {
|
|
if(opt->type->flags&M_OPT_TYPE_INDIRECT)
|
|
mp_msg(MSGT_CFGPARSER, MSGL_INFO, "%s", *(char **) opt->p);
|
|
else
|
|
mp_msg(MSGT_CFGPARSER, MSGL_INFO, "%s", (char *) opt->p);
|
|
|
|
if(opt->priv == NULL)
|
|
return M_OPT_EXIT;
|
|
return 1;
|
|
}
|
|
|
|
m_option_type_t m_option_type_print = {
|
|
"Print",
|
|
"",
|
|
0,
|
|
0,
|
|
parse_print,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL
|
|
};
|
|
|
|
m_option_type_t m_option_type_print_indirect = {
|
|
"Print",
|
|
"",
|
|
0,
|
|
M_OPT_TYPE_INDIRECT,
|
|
parse_print,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL
|
|
};
|
|
|
|
|
|
/////////////////////// Subconfig
|
|
#undef VAL
|
|
#define VAL(x) (*(char***)(x))
|
|
|
|
static int parse_subconf(m_option_t* opt,char *name, char *param, void* dst, int src) {
|
|
char *subparam;
|
|
char *subopt;
|
|
int nr = 0,i,r;
|
|
m_option_t *subopts;
|
|
char *token;
|
|
char *p;
|
|
char** lst = NULL;
|
|
|
|
if (param == NULL || strlen(param) == 0)
|
|
return M_OPT_MISSING_PARAM;
|
|
|
|
subparam = malloc(strlen(param)+1);
|
|
subopt = malloc(strlen(param)+1);
|
|
p = strdup(param); // In case that param is a static string (cf man strtok)
|
|
|
|
subopts = opt->p;
|
|
|
|
token = strtok(p, (char *)&(":"));
|
|
while(token)
|
|
{
|
|
int sscanf_ret;
|
|
/* clear out */
|
|
subopt[0] = subparam[0] = 0;
|
|
|
|
sscanf_ret = sscanf(token, "%[^=]=%[^:]", subopt, subparam);
|
|
|
|
mp_msg(MSGT_CFGPARSER, MSGL_DBG3, "token: '%s', subopt='%s', subparam='%s' (ret: %d)\n", token, subopt, subparam, sscanf_ret);
|
|
switch(sscanf_ret)
|
|
{
|
|
case 1:
|
|
subparam[0] = 0;
|
|
case 2:
|
|
for(i = 0 ; subopts[i].name ; i++) {
|
|
if(!strcmp(subopts[i].name,subopt)) break;
|
|
}
|
|
if(!subopts[i].name) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Unknown suboption %s\n",name,subopt);
|
|
return M_OPT_UNKNOWN;
|
|
}
|
|
r = m_option_parse(&subopts[i],subopt,
|
|
subparam[0] == 0 ? NULL : subparam,NULL,src);
|
|
if(r < 0) return r;
|
|
if(dst) {
|
|
lst = (char**)realloc(lst,2 * (nr+2) * sizeof(char*));
|
|
lst[2*nr] = strdup(subopt);
|
|
lst[2*nr+1] = subparam[0] == 0 ? NULL : strdup(subparam);
|
|
memset(&lst[2*(nr+1)],0,2*sizeof(char*));
|
|
nr++;
|
|
}
|
|
break;
|
|
default:
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Invalid subconfig argument! ('%s')\n", token);
|
|
return M_OPT_INVALID;
|
|
}
|
|
token = strtok(NULL, (char *)&(":"));
|
|
}
|
|
|
|
free(subparam);
|
|
free(subopt);
|
|
free(p);
|
|
if(dst)
|
|
VAL(dst) = lst;
|
|
|
|
return 1;
|
|
}
|
|
|
|
m_option_type_t m_option_type_subconfig = {
|
|
"Subconfig",
|
|
"The syntax is -option opt1=foo:flag:opt2=blah",
|
|
sizeof(int),
|
|
M_OPT_TYPE_HAS_CHILD,
|
|
parse_subconf,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL
|
|
};
|
|
|
|
#include "libmpcodecs/img_format.h"
|
|
|
|
/* FIXME: snyc with img_format.h */
|
|
static struct {
|
|
char* name;
|
|
unsigned int fmt;
|
|
} mp_imgfmt_list[] = {
|
|
{"444p", IMGFMT_444P},
|
|
{"422p", IMGFMT_422P},
|
|
{"411p", IMGFMT_411P},
|
|
{"yuy2", IMGFMT_YUY2},
|
|
{"uyvy", IMGFMT_UYVY},
|
|
{"yvu9", IMGFMT_YVU9},
|
|
{"if09", IMGFMT_IF09},
|
|
{"yv12", IMGFMT_YV12},
|
|
{"i420", IMGFMT_I420},
|
|
{"iyuv", IMGFMT_IYUV},
|
|
{"clpl", IMGFMT_CLPL},
|
|
{"hm12", IMGFMT_HM12},
|
|
{"y800", IMGFMT_Y800},
|
|
{"y8", IMGFMT_Y8},
|
|
{"nv12", IMGFMT_NV12},
|
|
{"nv21", IMGFMT_NV21},
|
|
{"bgr24", IMGFMT_BGR24},
|
|
{"bgr32", IMGFMT_BGR32},
|
|
{"bgr16", IMGFMT_BGR16},
|
|
{"bgr15", IMGFMT_BGR15},
|
|
{"bgr8", IMGFMT_BGR8},
|
|
{"bgr4", IMGFMT_BGR4},
|
|
{"bg4b", IMGFMT_BG4B},
|
|
{"bgr1", IMGFMT_BGR1},
|
|
{"rgb24", IMGFMT_RGB24},
|
|
{"rgb32", IMGFMT_RGB32},
|
|
{"rgb16", IMGFMT_RGB16},
|
|
{"rgb15", IMGFMT_RGB15},
|
|
{"rgb8", IMGFMT_RGB8},
|
|
{"rgb4", IMGFMT_RGB4},
|
|
{"rg4b", IMGFMT_RG4B},
|
|
{"rgb1", IMGFMT_RGB1},
|
|
{ NULL, 0 }
|
|
};
|
|
|
|
static int parse_imgfmt(m_option_t* opt,char *name, char *param, void* dst, int src) {
|
|
uint32_t fmt = 0;
|
|
int i;
|
|
|
|
if (param == NULL || strlen(param) == 0)
|
|
return M_OPT_MISSING_PARAM;
|
|
|
|
if(!strcmp(param,"help")) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_INFO, "Available formats:");
|
|
for(i = 0 ; mp_imgfmt_list[i].name ; i++)
|
|
mp_msg(MSGT_CFGPARSER, MSGL_INFO, " %s",mp_imgfmt_list[i].name);
|
|
mp_msg(MSGT_CFGPARSER, MSGL_INFO, "\n");
|
|
return M_OPT_EXIT;
|
|
}
|
|
|
|
if (sscanf(param, "0x%x", &fmt) != 1)
|
|
{
|
|
for(i = 0 ; mp_imgfmt_list[i].name ; i++) {
|
|
if(!strcasecmp(param,mp_imgfmt_list[i].name)) {
|
|
fmt=mp_imgfmt_list[i].fmt;
|
|
break;
|
|
}
|
|
}
|
|
if(!mp_imgfmt_list[i].name) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: unknown format name: '%s'\n",name,param);
|
|
return M_OPT_INVALID;
|
|
}
|
|
}
|
|
|
|
if(dst)
|
|
*((uint32_t*)dst) = fmt;
|
|
|
|
return 1;
|
|
}
|
|
|
|
m_option_type_t m_option_type_imgfmt = {
|
|
"Image format",
|
|
"Please report any missing colorspaces.",
|
|
sizeof(uint32_t),
|
|
0,
|
|
parse_imgfmt,
|
|
NULL,
|
|
copy_opt,
|
|
copy_opt,
|
|
NULL,
|
|
NULL
|
|
};
|
|
|
|
//// Objects (i.e. filters, etc) settings
|
|
|
|
#include "m_struct.h"
|
|
|
|
#undef VAL
|
|
#define VAL(x) (*(m_obj_settings_t**)(x))
|
|
|
|
static int find_obj_desc(char* name,m_obj_list_t* l,m_struct_t** ret) {
|
|
int i;
|
|
char* n;
|
|
|
|
for(i = 0 ; l->list[i] ; i++) {
|
|
n = M_ST_MB(char*,l->list[i],l->name_off);
|
|
if(!strcmp(n,name)) {
|
|
*ret = M_ST_MB(m_struct_t*,l->list[i],l->desc_off);
|
|
return 1;
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int get_obj_param(char* opt_name,char* obj_name, m_struct_t* desc,
|
|
char* str,int* nold,int oldmax,char** dst) {
|
|
char* eq,param;
|
|
m_option_t* opt;
|
|
int r;
|
|
|
|
eq = strchr(str,'=');
|
|
if(eq && eq == str)
|
|
eq = NULL;
|
|
|
|
if(eq) {
|
|
char* p = eq + 1;
|
|
if(p[0] == '\0') p = NULL;
|
|
eq[0] = '\0';
|
|
opt = m_option_list_find(desc->fields,str);
|
|
if(!opt) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: %s doesn't have a %s parameter.\n",opt_name,obj_name,str);
|
|
return M_OPT_UNKNOWN;
|
|
}
|
|
r = m_option_parse(opt,str,p,NULL,M_CONFIG_FILE);
|
|
if(r < 0) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Error while parsing %s parameter %s (%s)\n",opt_name,obj_name,str,p);
|
|
eq[0] = '=';
|
|
return r;
|
|
}
|
|
if(dst) {
|
|
dst[0] = strdup(str);
|
|
dst[1] = p ? strdup(p) : NULL;
|
|
}
|
|
eq[0] = '=';
|
|
} else {
|
|
if((*nold) >= oldmax) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: %s has only %d params, so you can't give more than %d unnamed params.\n",
|
|
opt_name,obj_name,oldmax,oldmax);
|
|
return M_OPT_OUT_OF_RANGE;
|
|
}
|
|
opt = &desc->fields[(*nold)];
|
|
r = m_option_parse(opt,opt->name,str,NULL,M_CONFIG_FILE);
|
|
if(r < 0) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Error while parsing %s parameter %s (%s)\n",opt_name,obj_name,opt->name,str);
|
|
return r;
|
|
}
|
|
if(dst) {
|
|
dst[0] = strdup(opt->name);
|
|
dst[1] = strdup(str);
|
|
}
|
|
(*nold)++;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
static int get_obj_params(char* opt_name, char* name,char* params,
|
|
m_struct_t* desc,char separator, char*** _ret) {
|
|
int n = 0,nold = 0, nopts,r;
|
|
char* ptr,*last_ptr = params,*eq;
|
|
char** ret;
|
|
|
|
if(!strcmp(params,"help")) { // Help
|
|
char min[50],max[50];
|
|
if(!desc->fields) {
|
|
printf("%s doesn't have any options.\n\n",name);
|
|
return M_OPT_EXIT;
|
|
}
|
|
printf("\n Name Type Min Max\n\n");
|
|
for(n = 0 ; desc->fields[n].name ; n++) {
|
|
m_option_t* opt = &desc->fields[n];
|
|
if(opt->type->flags & M_OPT_TYPE_HAS_CHILD) continue;
|
|
if(opt->flags & M_OPT_MIN)
|
|
sprintf(min,"%-8.0f",opt->min);
|
|
else
|
|
strcpy(min,"No");
|
|
if(opt->flags & M_OPT_MAX)
|
|
sprintf(max,"%-8.0f",opt->max);
|
|
else
|
|
strcpy(max,"No");
|
|
printf(" %-20.20s %-15.15s %-10.10s %-10.10s\n",
|
|
opt->name,
|
|
opt->type->name,
|
|
min,
|
|
max);
|
|
}
|
|
printf("\n");
|
|
return M_OPT_EXIT;
|
|
}
|
|
|
|
for(nopts = 0 ; desc->fields[nopts].name ; nopts++)
|
|
/* NOP */;
|
|
|
|
// TODO : Check that each opt can be parsed
|
|
r = 1;
|
|
while(last_ptr && last_ptr[0] != '\0') {
|
|
ptr = strchr(last_ptr,separator);
|
|
if(!ptr) {
|
|
r = get_obj_param(opt_name,name,desc,last_ptr,&nold,nopts,NULL);
|
|
n++;
|
|
break;
|
|
}
|
|
if(ptr == last_ptr) { // Empty field, count it and go on
|
|
nold++;
|
|
last_ptr = ptr+1;
|
|
continue;
|
|
}
|
|
ptr[0] = '\0';
|
|
r = get_obj_param(opt_name,name,desc,last_ptr,&nold,nopts,NULL);
|
|
ptr[0] = separator;
|
|
if(r < 0) break;
|
|
n++;
|
|
last_ptr = ptr+1;
|
|
}
|
|
if(r < 0) return r;
|
|
if(!_ret) // Just test
|
|
return 1;
|
|
|
|
ret = malloc((n+2)*2*sizeof(char*));
|
|
n = nold = 0;
|
|
last_ptr = params;
|
|
|
|
while(last_ptr && last_ptr[0] != '\0') {
|
|
ptr = strchr(last_ptr,separator);
|
|
if(!ptr) {
|
|
get_obj_param(opt_name,name,desc,last_ptr,&nold,nopts,&ret[n*2]);
|
|
n++;
|
|
break;
|
|
}
|
|
if(ptr == last_ptr) { // Empty field, count it and go on
|
|
last_ptr = ptr+1;
|
|
nold++;
|
|
continue;
|
|
}
|
|
ptr[0] = '\0';
|
|
get_obj_param(opt_name,name,desc,last_ptr,&nold,nopts,&ret[n*2]);
|
|
n++;
|
|
last_ptr = ptr+1;
|
|
}
|
|
ret[n*2] = ret[n*2+1] = NULL;
|
|
*_ret = ret;
|
|
|
|
return 1;
|
|
}
|
|
|
|
static int parse_obj_params(m_option_t* opt,char *name,
|
|
char *param, void* dst, int src) {
|
|
char** opts;
|
|
int r;
|
|
m_obj_params_t* p = opt->priv;
|
|
m_struct_t* desc = p->desc;
|
|
char* cpy = strdup(param);
|
|
|
|
// We need the object desc
|
|
if(!p)
|
|
return M_OPT_INVALID;
|
|
|
|
r = get_obj_params(name,desc->name,cpy,desc,p->separator,&opts);
|
|
free(cpy);
|
|
if(r < 0)
|
|
return r;
|
|
if(!dst)
|
|
return 1;
|
|
|
|
for(r = 0 ; opts[r] ; r += 2)
|
|
m_struct_set(desc,dst,opts[r],opts[r+1]);
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
m_option_type_t m_option_type_obj_params = {
|
|
"Object params",
|
|
"",
|
|
0,
|
|
0,
|
|
parse_obj_params,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL
|
|
};
|
|
|
|
/// Some predefined types as a definition would be quite lengthy
|
|
|
|
/// Span arguments
|
|
static m_span_t m_span_params_dflts = { -1, -1 };
|
|
static m_option_t m_span_params_fields[] = {
|
|
{"start", M_ST_OFF(m_span_t,start), CONF_TYPE_INT, M_OPT_MIN, 1 ,0, NULL},
|
|
{"end", M_ST_OFF(m_span_t,end), CONF_TYPE_INT, M_OPT_MIN , 1 ,0, NULL},
|
|
{ NULL, NULL, 0, 0, 0, 0, NULL }
|
|
};
|
|
static struct m_struct_st m_span_opts = {
|
|
"m_span",
|
|
sizeof(m_span_t),
|
|
&m_span_params_dflts,
|
|
m_span_params_fields
|
|
};
|
|
m_obj_params_t m_span_params_def = {
|
|
&m_span_opts,
|
|
'-'
|
|
};
|
|
|
|
static int parse_obj_settings(char* opt,char* str,m_obj_list_t* list,
|
|
m_obj_settings_t **_ret, int ret_n) {
|
|
int r;
|
|
char *param,**plist = NULL;
|
|
m_struct_t* desc;
|
|
m_obj_settings_t *ret = _ret ? *_ret : NULL;
|
|
|
|
|
|
// Now check that the object exists
|
|
param = strchr(str,'=');
|
|
if(param) {
|
|
param[0] = '\0';
|
|
param++;
|
|
if(strlen(param) <= 0)
|
|
param = NULL;
|
|
}
|
|
|
|
|
|
if(!find_obj_desc(str,list,&desc)) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: %s doesn't exist.\n",opt,str);
|
|
return M_OPT_INVALID;
|
|
}
|
|
|
|
if(param) {
|
|
if(!desc && _ret) {
|
|
plist = calloc(4,sizeof(char*));
|
|
plist[0] = strdup("_oldargs_");
|
|
plist[1] = strdup(param);
|
|
} else if(desc) {
|
|
r = get_obj_params(opt,str,param,desc,':',_ret ? &plist : NULL);
|
|
if(r < 0)
|
|
return r;
|
|
}
|
|
}
|
|
if(!_ret)
|
|
return 1;
|
|
|
|
ret = realloc(ret,(ret_n+2)*sizeof(m_obj_settings_t));
|
|
memset(&ret[ret_n],0,2*sizeof(m_obj_settings_t));
|
|
ret[ret_n].name = strdup(str);
|
|
ret[ret_n].attribs = plist;
|
|
|
|
*_ret = ret;
|
|
return 1;
|
|
}
|
|
|
|
static void free_obj_settings_list(void* dst);
|
|
|
|
static int obj_settings_list_del(char *opt_name,char *param,void* dst, int src) {
|
|
char** str_list = NULL;
|
|
int r,i,idx_max = 0;
|
|
char* rem_id = "_removed_marker_";
|
|
m_option_t list_opt = {opt_name , NULL, CONF_TYPE_STRING_LIST,
|
|
0, 0, 0, NULL };
|
|
m_obj_settings_t* obj_list = dst ? VAL(dst) : NULL;
|
|
|
|
if(dst && !obj_list) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_WARN, "Option %s: the list is empty.\n",opt_name);
|
|
return 1;
|
|
} else if(obj_list) {
|
|
for(idx_max = 0 ; obj_list[idx_max].name != NULL ; idx_max++)
|
|
/* NOP */;
|
|
}
|
|
|
|
r = m_option_parse(&list_opt,opt_name,param,&str_list,src);
|
|
if(r < 0 || !str_list)
|
|
return r;
|
|
|
|
for(r = 0 ; str_list[r] ; r++) {
|
|
int id;
|
|
char* endptr;
|
|
id = strtol(str_list[r],&endptr,0);
|
|
if(endptr == str_list[r]) {
|
|
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);
|
|
m_option_free(&list_opt,&str_list);
|
|
return M_OPT_INVALID;
|
|
}
|
|
if(!obj_list) continue;
|
|
if(id >= idx_max || id < -idx_max) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_WARN, "Option %s: Index %d is out of range.\n",opt_name,id);
|
|
continue;
|
|
}
|
|
if(id < 0)
|
|
id = idx_max + id;
|
|
free(obj_list[id].name);
|
|
free_str_list(&(obj_list[id].attribs));
|
|
obj_list[id].name = rem_id;
|
|
}
|
|
|
|
if(!dst) {
|
|
m_option_free(&list_opt,&str_list);
|
|
return 1;
|
|
}
|
|
|
|
for(i = 0 ; obj_list[i].name ; i++) {
|
|
while(obj_list[i].name == rem_id) {
|
|
memmove(&obj_list[i],&obj_list[i+1],sizeof(m_obj_settings_t)*(idx_max - i));
|
|
idx_max--;
|
|
}
|
|
}
|
|
obj_list = realloc(obj_list,sizeof(m_obj_settings_t)*(idx_max+1));
|
|
VAL(dst) = obj_list;
|
|
|
|
return 1;
|
|
}
|
|
|
|
static int parse_obj_settings_list(m_option_t* opt,char *name,
|
|
char *param, void* dst, int src) {
|
|
int n = 0,r,len = strlen(opt->name);
|
|
char *str;
|
|
char *ptr, *last_ptr;
|
|
m_obj_settings_t *res = NULL,*queue = NULL,*head = NULL;
|
|
int op = OP_NONE;
|
|
|
|
// We need the objects list
|
|
if(!opt->priv)
|
|
return M_OPT_INVALID;
|
|
|
|
if(opt->name[len-1] == '*' && ((int)strlen(name) > len - 1)) {
|
|
char* n = &name[len-1];
|
|
if(strcasecmp(n,"-add") == 0)
|
|
op = OP_ADD;
|
|
else if(strcasecmp(n,"-pre") == 0)
|
|
op = OP_PRE;
|
|
else if(strcasecmp(n,"-del") == 0)
|
|
op = OP_DEL;
|
|
else if(strcasecmp(n,"-clr") == 0)
|
|
op = OP_CLR;
|
|
else {
|
|
char prefix[len];
|
|
strncpy(prefix,opt->name,len-1);
|
|
prefix[len-1] = '\0';
|
|
mp_msg(MSGT_VFILTER,MSGL_ERR, "Option %s: unknown postfix %s\n"
|
|
"Supported postfixes are:\n"
|
|
" %3$s-add\n"
|
|
" Append the given list to the current list\n\n"
|
|
" %3$s-pre\n"
|
|
" Prepend the given list to the current list\n\n"
|
|
" %3$s-del x,y,...\n"
|
|
" Remove the given elements. Take the list element index (starting from 0).\n"
|
|
" Negative index can be used (i.e. -1 is the last element)\n\n"
|
|
" %3$s-clr\n"
|
|
" Clear the current list.\n",name,n,prefix);
|
|
|
|
return M_OPT_UNKNOWN;
|
|
}
|
|
}
|
|
|
|
// Clear the list ??
|
|
if(op == OP_CLR) {
|
|
if(dst)
|
|
free_obj_settings_list(dst);
|
|
return 0;
|
|
}
|
|
|
|
if (param == NULL || strlen(param) == 0)
|
|
return M_OPT_MISSING_PARAM;
|
|
|
|
switch(op) {
|
|
case OP_ADD:
|
|
if(dst) head = VAL(dst);
|
|
break;
|
|
case OP_PRE:
|
|
if(dst) queue = VAL(dst);
|
|
break;
|
|
case OP_DEL:
|
|
return obj_settings_list_del(name,param,dst,src);
|
|
case OP_NONE:
|
|
if(dst && VAL(dst))
|
|
free_obj_settings_list(dst);
|
|
break;
|
|
default:
|
|
mp_msg(MSGT_VFILTER,MSGL_ERR, "Option %s: FIXME\n",name);
|
|
return M_OPT_UNKNOWN;
|
|
}
|
|
|
|
if(!strcmp(param,"help")) {
|
|
m_obj_list_t* ol = opt->priv;
|
|
for(n = 0 ; ol->list[n] ; n++)
|
|
mp_msg(MSGT_VFILTER,MSGL_INFO," %-15s: %s\n",
|
|
M_ST_MB(char*,ol->list[n],ol->name_off),
|
|
M_ST_MB(char*,ol->list[n],ol->info_off));
|
|
return M_OPT_EXIT;
|
|
}
|
|
ptr = str = strdup(param);
|
|
|
|
while(ptr[0] != '\0') {
|
|
last_ptr = ptr;
|
|
ptr = strchr(ptr,LIST_SEPARATOR);
|
|
if(!ptr) {
|
|
r = parse_obj_settings(name,last_ptr,opt->priv,dst ? &res : NULL,n);
|
|
if(r < 0) {
|
|
free(str);
|
|
return r;
|
|
}
|
|
n++;
|
|
break;
|
|
}
|
|
ptr[0] = '\0';
|
|
r = parse_obj_settings(name,last_ptr,opt->priv,dst ? &res : NULL,n);
|
|
if(r < 0) {
|
|
free(str);
|
|
return r;
|
|
}
|
|
ptr++;
|
|
n++;
|
|
}
|
|
free(str);
|
|
if(n == 0)
|
|
return M_OPT_INVALID;
|
|
|
|
if( ((opt->flags & M_OPT_MIN) && (n < opt->min)) ||
|
|
((opt->flags & M_OPT_MAX) && (n > opt->max)) )
|
|
return M_OPT_OUT_OF_RANGE;
|
|
|
|
if(dst) {
|
|
if(queue) {
|
|
int qsize;
|
|
for(qsize = 0 ; queue[qsize].name ; qsize++)
|
|
/* NOP */;
|
|
res = realloc(res,(qsize+n+1)*sizeof(m_obj_settings_t));
|
|
memcpy(&res[n],queue,(qsize+1)*sizeof(m_obj_settings_t));
|
|
n += qsize;
|
|
free(queue);
|
|
}
|
|
if(head) {
|
|
int hsize;
|
|
for(hsize = 0 ; head[hsize].name ; hsize++)
|
|
/* NOP */;
|
|
head = realloc(head,(hsize+n+1)*sizeof(m_obj_settings_t));
|
|
memcpy(&head[hsize],res,(n+1)*sizeof(m_obj_settings_t));
|
|
free(res);
|
|
res = head;
|
|
}
|
|
VAL(dst) = res;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
static void free_obj_settings_list(void* dst) {
|
|
int n;
|
|
m_obj_settings_t *d;
|
|
|
|
if(!dst || !VAL(dst)) return;
|
|
|
|
d = VAL(dst);
|
|
#ifndef NO_FREE
|
|
for(n = 0 ; d[n].name ; n++) {
|
|
free(d[n].name);
|
|
free_str_list(&(d[n].attribs));
|
|
}
|
|
free(d);
|
|
#endif
|
|
VAL(dst) = NULL;
|
|
}
|
|
|
|
static void copy_obj_settings_list(m_option_t* opt,void* dst, void* src) {
|
|
m_obj_settings_t *d,*s;
|
|
int n;
|
|
|
|
if(!(dst && src))
|
|
return;
|
|
|
|
s = VAL(src);
|
|
|
|
if(VAL(dst))
|
|
free_obj_settings_list(dst);
|
|
if(!s) return;
|
|
|
|
|
|
|
|
for(n = 0 ; s[n].name ; n++)
|
|
/* NOP */;
|
|
d = malloc((n+1)*sizeof(m_obj_settings_t));
|
|
for(n = 0 ; s[n].name ; n++) {
|
|
d[n].name = strdup(s[n].name);
|
|
d[n].attribs = NULL;
|
|
copy_str_list(NULL,&(d[n].attribs),&(s[n].attribs));
|
|
}
|
|
d[n].name = NULL;
|
|
d[n].attribs = NULL;
|
|
VAL(dst) = d;
|
|
}
|
|
|
|
m_option_type_t m_option_type_obj_settings_list = {
|
|
"Object settings list",
|
|
"",
|
|
sizeof(m_obj_settings_t*),
|
|
M_OPT_TYPE_DYNAMIC|M_OPT_TYPE_ALLOW_WILDCARD,
|
|
parse_obj_settings_list,
|
|
NULL,
|
|
copy_obj_settings_list,
|
|
copy_obj_settings_list,
|
|
copy_obj_settings_list,
|
|
free_obj_settings_list,
|
|
};
|
|
|
|
|
|
|
|
static int parse_obj_presets(m_option_t* opt,char *name,
|
|
char *param, void* dst, int src) {
|
|
m_obj_presets_t* obj_p = (m_obj_presets_t*)opt->priv;
|
|
m_struct_t *in_desc,*out_desc;
|
|
int s,i;
|
|
unsigned char* pre = obj_p->presets;
|
|
char* pre_name = NULL;
|
|
|
|
if(!obj_p) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Presets need a pointer to a m_obj_presets_t in the priv field.\n",name);
|
|
return M_OPT_PARSER_ERR;
|
|
}
|
|
|
|
if(!param)
|
|
return M_OPT_MISSING_PARAM;
|
|
|
|
in_desc = obj_p->in_desc;
|
|
out_desc = obj_p->out_desc ? obj_p->out_desc : obj_p->in_desc;
|
|
s = in_desc->size;
|
|
|
|
if(!strcmp(param,"help")) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_INFO, "Available presets for %s->%s:",out_desc->name,name);
|
|
for(pre = obj_p->presets;(pre_name = M_ST_MB(char*,pre,obj_p->name_off)) ;
|
|
pre += s)
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, " %s",pre_name);
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "\n");
|
|
return M_OPT_EXIT;
|
|
}
|
|
|
|
for(pre_name = M_ST_MB(char*,pre,obj_p->name_off) ; pre_name ;
|
|
pre += s, pre_name = M_ST_MB(char*,pre,obj_p->name_off)) {
|
|
if(!strcmp(pre_name,param)) break;
|
|
}
|
|
if(!pre_name) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: There is no preset named %s\n"
|
|
"Available presets are:",name,param);
|
|
for(pre = obj_p->presets;(pre_name = M_ST_MB(char*,pre,obj_p->name_off)) ;
|
|
pre += s)
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, " %s",pre_name);
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "\n");
|
|
return M_OPT_INVALID;
|
|
}
|
|
|
|
if(!dst) return 1;
|
|
|
|
for(i = 0 ; in_desc->fields[i].name ; i++) {
|
|
m_option_t* out_opt = m_option_list_find(out_desc->fields,
|
|
in_desc->fields[i].name);
|
|
if(!out_opt) {
|
|
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);
|
|
return M_OPT_PARSER_ERR;
|
|
}
|
|
m_option_copy(out_opt,M_ST_MB_P(dst,out_opt->p),M_ST_MB_P(pre,in_desc->fields[i].p));
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
|
|
m_option_type_t m_option_type_obj_presets = {
|
|
"Object presets",
|
|
"",
|
|
0,
|
|
0,
|
|
parse_obj_presets,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL
|
|
};
|
|
|
|
static int parse_custom_url(m_option_t* opt,char *name,
|
|
char *url, void* dst, int src) {
|
|
int pos1, pos2, r, v6addr = 0;
|
|
char *ptr1=NULL, *ptr2=NULL, *ptr3=NULL, *ptr4=NULL;
|
|
m_struct_t* desc = opt->priv;
|
|
|
|
if(!desc) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Custom URL needs a pointer to a m_struct_t in the priv field.\n",name);
|
|
return M_OPT_PARSER_ERR;
|
|
}
|
|
|
|
// extract the protocol
|
|
ptr1 = strstr(url, "://");
|
|
if( ptr1==NULL ) {
|
|
// Filename only
|
|
if(m_option_list_find(desc->fields,"filename")) {
|
|
m_struct_set(desc,dst,"filename",url);
|
|
return 1;
|
|
}
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR,"Option %s: URL doesn't have a valid protocol!\n",name);
|
|
return M_OPT_INVALID;
|
|
}
|
|
pos1 = ptr1-url;
|
|
if(dst && m_option_list_find(desc->fields,"protocol")) {
|
|
ptr1[0] = '\0';
|
|
r = m_struct_set(desc,dst,"protocol",url);
|
|
ptr1[0] = ':';
|
|
if(r < 0) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Error while setting protocol.\n",name);
|
|
return r;
|
|
}
|
|
}
|
|
|
|
// jump the "://"
|
|
ptr1 += 3;
|
|
pos1 += 3;
|
|
|
|
// check if a username:password is given
|
|
ptr2 = strstr(ptr1, "@");
|
|
ptr3 = strstr(ptr1, "/");
|
|
if( ptr3!=NULL && ptr3<ptr2 ) {
|
|
// it isn't really a username but rather a part of the path
|
|
ptr2 = NULL;
|
|
}
|
|
if( ptr2!=NULL ) {
|
|
|
|
// We got something, at least a username...
|
|
int len = ptr2-ptr1;
|
|
if(!m_option_list_find(desc->fields,"username")) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_WARN, "Option %s: This URL doesn't have a username part.\n",name);
|
|
// skip
|
|
} else {
|
|
ptr3 = strstr(ptr1, ":");
|
|
if( ptr3!=NULL && ptr3<ptr2 ) {
|
|
// We also have a password
|
|
int len2 = ptr2-ptr3-1;
|
|
if(!m_option_list_find(desc->fields,"password")) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_WARN, "Option %s: This URL doesn't have a password part.\n",name);
|
|
// skip
|
|
} else { // Username and password
|
|
if(dst) {
|
|
ptr3[0] = '\0';
|
|
r = m_struct_set(desc,dst,"username",ptr1);
|
|
ptr3[0] = ':';
|
|
if(r < 0) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Error while setting username.\n",name);
|
|
return r;
|
|
}
|
|
ptr2[0] = '\0';
|
|
r = m_struct_set(desc,dst,"password",ptr3+1);
|
|
ptr2[0] = '@';
|
|
if(r < 0) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Error while setting password.\n",name);
|
|
return r;
|
|
}
|
|
}
|
|
}
|
|
} else { // User name only
|
|
ptr2[0] = '\0';
|
|
r = m_struct_set(desc,dst,"username",ptr1);
|
|
ptr2[0] = '@';
|
|
if(r < 0) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Error while setting username.\n",name);
|
|
return r;
|
|
}
|
|
}
|
|
}
|
|
ptr1 = ptr2+1;
|
|
pos1 = ptr1-url;
|
|
}
|
|
|
|
// before looking for a port number check if we have an IPv6 type numeric address
|
|
// in an IPv6 URL the numeric address should be inside square braces.
|
|
ptr2 = strstr(ptr1, "[");
|
|
ptr3 = strstr(ptr1, "]");
|
|
// If the [] is after the first it isn't the hostname
|
|
ptr4 = strstr(ptr1, "/");
|
|
if( ptr2!=NULL && ptr3!=NULL && (ptr2 < ptr3) && (!ptr4 || ptr4 > ptr3)) {
|
|
// we have an IPv6 numeric address
|
|
ptr1++;
|
|
pos1++;
|
|
ptr2 = ptr3;
|
|
v6addr = 1;
|
|
} else {
|
|
ptr2 = ptr1;
|
|
}
|
|
|
|
// look if the port is given
|
|
ptr2 = strstr(ptr2, ":");
|
|
// If the : is after the first / it isn't the port
|
|
ptr3 = strstr(ptr1, "/");
|
|
if(ptr3 && ptr3 - ptr2 < 0) ptr2 = NULL;
|
|
if( ptr2==NULL ) {
|
|
// No port is given
|
|
// Look if a path is given
|
|
if( ptr3==NULL ) {
|
|
// No path/filename
|
|
// So we have an URL like http://www.hostname.com
|
|
pos2 = strlen(url);
|
|
} else {
|
|
// We have an URL like http://www.hostname.com/file.txt
|
|
pos2 = ptr3-url;
|
|
}
|
|
} else {
|
|
// We have an URL beginning like http://www.hostname.com:1212
|
|
// Get the port number
|
|
if(!m_option_list_find(desc->fields,"port")) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_WARN, "Option %s: This URL doesn't have a port part.\n",name);
|
|
// skip
|
|
} else {
|
|
if(dst) {
|
|
int p = atoi(ptr2+1);
|
|
char tmp[100];
|
|
snprintf(tmp,99,"%d",p);
|
|
r = m_struct_set(desc,dst,"port",tmp);
|
|
if(r < 0) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Error while setting port.\n",name);
|
|
return r;
|
|
}
|
|
}
|
|
}
|
|
pos2 = ptr2-url;
|
|
}
|
|
if( v6addr ) pos2--;
|
|
// Get the hostname
|
|
if(pos2-pos1 > 0) {
|
|
if(!m_option_list_find(desc->fields,"hostname")) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_WARN, "Option %s: This URL doesn't have a hostname part.\n",name);
|
|
// skip
|
|
} else {
|
|
char tmp[pos2-pos1+1];
|
|
strncpy(tmp,ptr1, pos2-pos1);
|
|
tmp[pos2-pos1] = '\0';
|
|
r = m_struct_set(desc,dst,"hostname",tmp);
|
|
if(r < 0) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Error while setting hostname.\n",name);
|
|
return r;
|
|
}
|
|
}
|
|
}
|
|
// Look if a path is given
|
|
ptr2 = strstr(ptr1, "/");
|
|
if( ptr2!=NULL ) {
|
|
// A path/filename is given
|
|
// check if it's not a trailing '/'
|
|
if( strlen(ptr2)>1 ) {
|
|
// copy the path/filename in the URL container
|
|
if(!m_option_list_find(desc->fields,"filename")) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_WARN, "Option %s: This URL doesn't have a hostname part.\n",name);
|
|
// skip
|
|
} else {
|
|
if(dst) {
|
|
int l = strlen(ptr2+1) + 1;
|
|
char* fname = ptr2+1;
|
|
if(l > 1) {
|
|
fname = malloc(l);
|
|
url_unescape_string(fname,ptr2+1);
|
|
}
|
|
r = m_struct_set(desc,dst,"filename",fname);
|
|
if(fname != ptr2+1)
|
|
free(fname);
|
|
if(r < 0) {
|
|
mp_msg(MSGT_CFGPARSER, MSGL_ERR, "Option %s: Error while setting filename.\n",name);
|
|
return r;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
/// TODO : Write the other needed funcs for 'normal' options
|
|
m_option_type_t m_option_type_custom_url = {
|
|
"Custom URL",
|
|
"",
|
|
0,
|
|
0,
|
|
parse_custom_url,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL,
|
|
NULL
|
|
};
|