Something went wrong. Try again.
🎥 Command line media player
Something went wrong. Try again.
C
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640/* * This file is part of mpv. * * mpv is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * mpv is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with mpv. If not, see <http://www.gnu.org/licenses/>. */
/// \file/// \ingroup Properties
#include <stdlib.h>#include <stdio.h>#include <string.h>#include <inttypes.h>#include <assert.h>
#include <libavutil/common.h>
#include "libmpv/client.h"
#include "mpv_talloc.h"#include "m_option.h"#include "m_property.h"#include "common/msg.h"#include "common/common.h"
static int m_property_multiply(struct mp_log *log, const struct m_property *prop_list, const char *property, double f, void *ctx){ union m_option_value val = m_option_value_default; struct m_option opt = {0}; int r;
r = m_property_do(log, prop_list, property, M_PROPERTY_GET_CONSTRICTED_TYPE, &opt, ctx); if (r != M_PROPERTY_OK) return r; assert(opt.type);
if (!opt.type->multiply) return M_PROPERTY_NOT_IMPLEMENTED;
r = m_property_do(log, prop_list, property, M_PROPERTY_GET, &val, ctx); if (r != M_PROPERTY_OK) return r; opt.type->multiply(&opt, &val, f); r = m_property_do(log, prop_list, property, M_PROPERTY_SET, &val, ctx); m_option_free(&opt, &val); return r;}
struct m_property *m_property_list_find(const struct m_property *list, const char *name){ for (int n = 0; list && list[n].name; n++) { if (strcmp(list[n].name, name) == 0) return (struct m_property *)&list[n]; } return NULL;}
static int do_action(const struct m_property *prop_list, const char *name, int action, void *arg, void *ctx){ struct m_property *prop; struct m_property_action_arg ka; const char *sep = strchr(name, '/'); if (sep && sep[1]) { char base[128]; snprintf(base, sizeof(base), "%.*s", (int)(sep - name), name); prop = m_property_list_find(prop_list, base); ka = (struct m_property_action_arg) { .key = sep + 1, .action = action, .arg = arg, }; action = M_PROPERTY_KEY_ACTION; arg = &ka; } else prop = m_property_list_find(prop_list, name); if (!prop) return M_PROPERTY_UNKNOWN; return prop->call(ctx, prop, action, arg);}
// (as a hack, log can be NULL on read-only paths)int m_property_do(struct mp_log *log, const struct m_property *prop_list, const char *name, int action, void *arg, void *ctx){ union m_option_value val = m_option_value_default; int r;
struct m_option opt = {0}; r = do_action(prop_list, name, M_PROPERTY_GET_TYPE, &opt, ctx); if (r <= 0) return r; assert(opt.type);
switch (action) { case M_PROPERTY_FIXED_LEN_PRINT: case M_PROPERTY_PRINT: { if ((r = do_action(prop_list, name, action, arg, ctx)) >= 0) return r; // Fallback to m_option if ((r = do_action(prop_list, name, M_PROPERTY_GET, &val, ctx)) <= 0) return r; char *str = m_option_pretty_print(&opt, &val, action == M_PROPERTY_FIXED_LEN_PRINT); m_option_free(&opt, &val); *(char **)arg = str; return str != NULL; } case M_PROPERTY_GET_STRING: { if ((r = do_action(prop_list, name, M_PROPERTY_GET, &val, ctx)) <= 0) return r; char *str = m_option_print(&opt, &val); m_option_free(&opt, &val); *(char **)arg = str; return str != NULL; } case M_PROPERTY_SET_STRING: { struct mpv_node node = { .format = MPV_FORMAT_STRING, .u.string = arg }; return m_property_do(log, prop_list, name, M_PROPERTY_SET_NODE, &node, ctx); } case M_PROPERTY_MULTIPLY: { return m_property_multiply(log, prop_list, name, *(double *)arg, ctx); } case M_PROPERTY_SWITCH: { if (!log) return M_PROPERTY_ERROR; struct m_property_switch_arg *sarg = arg; if ((r = do_action(prop_list, name, M_PROPERTY_SWITCH, arg, ctx)) != M_PROPERTY_NOT_IMPLEMENTED) return r; // Fallback to m_option r = m_property_do(log, prop_list, name, M_PROPERTY_GET_CONSTRICTED_TYPE, &opt, ctx); if (r <= 0) return r; assert(opt.type); if (!opt.type->add) return M_PROPERTY_NOT_IMPLEMENTED; if ((r = do_action(prop_list, name, M_PROPERTY_GET, &val, ctx)) <= 0) return r; opt.type->add(&opt, &val, sarg->inc, sarg->wrap); r = do_action(prop_list, name, M_PROPERTY_SET, &val, ctx); m_option_free(&opt, &val); return r; } case M_PROPERTY_GET_CONSTRICTED_TYPE: { r = do_action(prop_list, name, action, arg, ctx); if (r >= 0 || r == M_PROPERTY_UNAVAILABLE) return r; if ((r = do_action(prop_list, name, M_PROPERTY_GET_TYPE, arg, ctx)) >= 0) return r; return M_PROPERTY_NOT_IMPLEMENTED; } case M_PROPERTY_SET: { return do_action(prop_list, name, M_PROPERTY_SET, arg, ctx); } case M_PROPERTY_GET_NODE: { if ((r = do_action(prop_list, name, M_PROPERTY_GET_NODE, arg, ctx)) != M_PROPERTY_NOT_IMPLEMENTED) return r; if ((r = do_action(prop_list, name, M_PROPERTY_GET, &val, ctx)) <= 0) return r; struct mpv_node *node = arg; int err = m_option_get_node(&opt, NULL, node, &val); if (err == M_OPT_UNKNOWN) { r = M_PROPERTY_NOT_IMPLEMENTED; } else if (err < 0) { r = M_PROPERTY_INVALID_FORMAT; } else { r = M_PROPERTY_OK; } m_option_free(&opt, &val); return r; } case M_PROPERTY_SET_NODE: { if (!log) return M_PROPERTY_ERROR; if ((r = do_action(prop_list, name, M_PROPERTY_SET_NODE, arg, ctx)) != M_PROPERTY_NOT_IMPLEMENTED) return r; int err = m_option_set_node_or_string(log, &opt, name, &val, arg); if (err == M_OPT_UNKNOWN) { r = M_PROPERTY_NOT_IMPLEMENTED; } else if (err < 0) { r = M_PROPERTY_INVALID_FORMAT; } else { r = do_action(prop_list, name, M_PROPERTY_SET, &val, ctx); } m_option_free(&opt, &val); return r; } default: return do_action(prop_list, name, action, arg, ctx); }}
bool m_property_split_path(const char *path, bstr *prefix, char **rem){ char *next = strchr(path, '/'); if (next) { *prefix = bstr_splice(bstr0(path), 0, next - path); *rem = next + 1; return true; } else { *prefix = bstr0(path); *rem = ""; return false; }}
// If *action is M_PROPERTY_KEY_ACTION, but the associated path is "", then// make this into a top-level action.static void m_property_unkey(int *action, void **arg){ if (*action == M_PROPERTY_KEY_ACTION) { struct m_property_action_arg *ka = *arg; if (!ka->key[0]) { *action = ka->action; *arg = ka->arg; } }}
static int m_property_do_bstr(const struct m_property *prop_list, bstr name, int action, void *arg, void *ctx){ char *name0 = bstrdup0(NULL, name); int ret = m_property_do(NULL, prop_list, name0, action, arg, ctx); talloc_free(name0); return ret;}
static void append_str(char **s, int *len, bstr append){ MP_TARRAY_GROW(NULL, *s, *len + append.len); if (append.len) memcpy(*s + *len, append.start, append.len); *len = *len + append.len;}
static int expand_property(const struct m_property *prop_list, char **ret, int *ret_len, bstr prop, bool silent_error, void *ctx){ bool cond_yes = bstr_eatstart0(&prop, "?"); bool cond_no = !cond_yes && bstr_eatstart0(&prop, "!"); bool test = cond_yes || cond_no; bool raw = bstr_eatstart0(&prop, "="); bool fixed_len = !raw && bstr_eatstart0(&prop, ">"); bstr comp_with = {0}; bool comp = test && bstr_split_tok(prop, "==", &prop, &comp_with); if (test && !comp) raw = true; int method = raw ? M_PROPERTY_GET_STRING : M_PROPERTY_PRINT; method = fixed_len ? M_PROPERTY_FIXED_LEN_PRINT : method;
char *s = NULL; int r = m_property_do_bstr(prop_list, prop, method, &s, ctx); bool skip; if (comp) { skip = ((s && bstr_equals0(comp_with, s)) != cond_yes); } else if (test) { skip = (!!s != cond_yes); } else { skip = !!s; char *append = s; if (!s && !silent_error && !raw) append = (r == M_PROPERTY_UNAVAILABLE) ? "(unavailable)" : "(error)"; append_str(ret, ret_len, bstr0(append)); } talloc_free(s); return skip;}
char *m_properties_expand_string(const struct m_property *prop_list, const char *str0, void *ctx){ char *ret = NULL; int ret_len = 0; bool skip = false; int level = 0, skip_level = 0; bstr str = bstr0(str0);#ifdef FUZZING_BUILD_MODE_UNSAFE_FOR_PRODUCTION int n = 0;#endif
while (str.len) { if (level > 0 && bstr_eatstart0(&str, "}")) { if (skip && level <= skip_level) skip = false; level--; } else if (bstr_startswith0(str, "${") && bstr_find0(str, "}") >= 0) { str = bstr_cut(str, 2); level++;
// Assume ":" and "}" can't be part of the property name // => if ":" comes before "}", it must be for the fallback int term_pos = bstrcspn(str, ":}"); bstr name = bstr_splice(str, 0, term_pos < 0 ? str.len : term_pos); str = bstr_cut(str, term_pos); bool have_fallback = bstr_eatstart0(&str, ":");
#ifdef FUZZING_BUILD_MODE_UNSAFE_FOR_PRODUCTION if (n++ > 10) break;#endif
if (!skip) { skip = expand_property(prop_list, &ret, &ret_len, name, have_fallback, ctx); if (skip) skip_level = level; } } else if (level == 0 && bstr_eatstart0(&str, "$>")) { append_str(&ret, &ret_len, str); break; } else { char c;
// Other combinations, e.g. "$x", are added verbatim if (bstr_eatstart0(&str, "$$")) { c = '$'; } else if (bstr_eatstart0(&str, "$}")) { c = '}'; } else { c = str.start[0]; str = bstr_cut(str, 1); }
if (!skip) MP_TARRAY_APPEND(NULL, ret, ret_len, c); } }
MP_TARRAY_APPEND(NULL, ret, ret_len, '\0'); return ret;}
void m_properties_print_help_list(struct mp_log *log, const struct m_property *list){ int count = 0;
mp_info(log, "Name\n\n"); for (int i = 0; list[i].name; i++) { const struct m_property *p = &list[i]; mp_info(log, " %s\n", p->name); count++; } mp_info(log, "\nTotal: %d properties\n", count);}
int m_property_bool_ro(int action, void* arg, bool var){ switch (action) { case M_PROPERTY_GET: *(bool *)arg = !!var; return M_PROPERTY_OK; case M_PROPERTY_GET_TYPE: *(struct m_option *)arg = (struct m_option){.type = CONF_TYPE_BOOL}; return M_PROPERTY_OK; } return M_PROPERTY_NOT_IMPLEMENTED;}
int m_property_int_ro(int action, void *arg, int var){ switch (action) { case M_PROPERTY_GET: *(int *)arg = var; return M_PROPERTY_OK; case M_PROPERTY_GET_TYPE: *(struct m_option *)arg = (struct m_option){.type = CONF_TYPE_INT}; return M_PROPERTY_OK; } return M_PROPERTY_NOT_IMPLEMENTED;}
int m_property_int64_ro(int action, void* arg, int64_t var){ switch (action) { case M_PROPERTY_GET: *(int64_t *)arg = var; return M_PROPERTY_OK; case M_PROPERTY_GET_TYPE: *(struct m_option *)arg = (struct m_option){.type = CONF_TYPE_INT64}; return M_PROPERTY_OK; } return M_PROPERTY_NOT_IMPLEMENTED;}
int m_property_float_ro(int action, void *arg, float var){ switch (action) { case M_PROPERTY_GET: *(float *)arg = var; return M_PROPERTY_OK; case M_PROPERTY_GET_TYPE: *(struct m_option *)arg = (struct m_option){.type = CONF_TYPE_FLOAT}; return M_PROPERTY_OK; } return M_PROPERTY_NOT_IMPLEMENTED;}
int m_property_double_ro(int action, void *arg, double var){ switch (action) { case M_PROPERTY_GET: *(double *)arg = var; return M_PROPERTY_OK; case M_PROPERTY_GET_TYPE: *(struct m_option *)arg = (struct m_option){.type = CONF_TYPE_DOUBLE}; return M_PROPERTY_OK; } return M_PROPERTY_NOT_IMPLEMENTED;}
int m_property_strdup_ro(int action, void* arg, const char *var){ if (!var) return M_PROPERTY_UNAVAILABLE; switch (action) { case M_PROPERTY_GET: *(char **)arg = talloc_strdup(NULL, var); return M_PROPERTY_OK; case M_PROPERTY_GET_TYPE: *(struct m_option *)arg = (struct m_option){.type = CONF_TYPE_STRING}; return M_PROPERTY_OK; } return M_PROPERTY_NOT_IMPLEMENTED;}
int m_property_read_sub_validate(void *ctx, struct m_property *prop, int action, void *arg){ m_property_unkey(&action, &arg); switch (action) { case M_PROPERTY_GET_TYPE: *(struct m_option *)arg = (struct m_option){.type = CONF_TYPE_NODE}; return M_PROPERTY_OK; case M_PROPERTY_GET: case M_PROPERTY_PRINT: case M_PROPERTY_KEY_ACTION: return M_PROPERTY_VALID; default: return M_PROPERTY_NOT_IMPLEMENTED; };}
// This allows you to make a list of values (like from a struct) available// as a number of sub-properties. The property list is set up with the current// property values on the stack before calling this function.// This does not support write access.int m_property_read_sub(const struct m_sub_property *props, int action, void *arg){ m_property_unkey(&action, &arg); switch (action) { case M_PROPERTY_GET_TYPE: *(struct m_option *)arg = (struct m_option){.type = CONF_TYPE_NODE}; return M_PROPERTY_OK; case M_PROPERTY_GET: { struct mpv_node node; node.format = MPV_FORMAT_NODE_MAP; node.u.list = talloc_zero(NULL, mpv_node_list); mpv_node_list *list = node.u.list; for (int n = 0; props && props[n].name; n++) { const struct m_sub_property *prop = &props[n]; if (prop->unavailable) continue; MP_TARRAY_GROW(list, list->values, list->num); MP_TARRAY_GROW(list, list->keys, list->num); mpv_node *val = &list->values[list->num]; if (m_option_get_node(&prop->type, list, val, (void*)&prop->value) < 0) { char *s = m_option_print(&prop->type, &prop->value); val->format = MPV_FORMAT_STRING; val->u.string = talloc_steal(list, s); } list->keys[list->num] = (char *)prop->name; list->num++; } *(struct mpv_node *)arg = node; return M_PROPERTY_OK; } case M_PROPERTY_PRINT: { // Output "something" - what it really should return is not yet decided. // It should probably be something that is easy to consume by slave // mode clients. (M_PROPERTY_PRINT on the other hand can return this // as human readable version just fine). char *res = NULL; for (int n = 0; props && props[n].name; n++) { const struct m_sub_property *prop = &props[n]; if (prop->unavailable) continue; char *s = m_option_print(&prop->type, &prop->value); ta_xasprintf_append(&res, "%s=%s\n", prop->name, s); talloc_free(s); } *(char **)arg = res; return M_PROPERTY_OK; } case M_PROPERTY_KEY_ACTION: { struct m_property_action_arg *ka = arg; const struct m_sub_property *prop = NULL; for (int n = 0; props && props[n].name; n++) { if (strcmp(props[n].name, ka->key) == 0) { prop = &props[n]; break; } } if (!prop) return M_PROPERTY_UNKNOWN; if (prop->unavailable) return M_PROPERTY_UNAVAILABLE; switch (ka->action) { case M_PROPERTY_GET: { memset(ka->arg, 0, prop->type.type->size); m_option_copy(&prop->type, ka->arg, &prop->value); return M_PROPERTY_OK; } case M_PROPERTY_GET_TYPE: *(struct m_option *)ka->arg = prop->type; return M_PROPERTY_OK; } } } return M_PROPERTY_NOT_IMPLEMENTED;}
// Make a list of items available as indexed sub-properties. E.g. you can access// item 0 as "property/0", item 1 as "property/1", etc., where each of these// properties is redirected to the get_item(0, ...), get_item(1, ...), callback.// Additionally, the number of entries is made available as "property/count".// action, arg: property access.// count: number of items.// get_item: callback to access a single item.// ctx: userdata passed to get_item.int m_property_read_list(int action, void *arg, int count, m_get_item_cb get_item, void *ctx){ m_property_unkey(&action, &arg); switch (action) { case M_PROPERTY_GET_TYPE: *(struct m_option *)arg = (struct m_option){.type = CONF_TYPE_NODE}; return M_PROPERTY_OK; case M_PROPERTY_GET: { struct mpv_node node; node.format = MPV_FORMAT_NODE_ARRAY; node.u.list = talloc_zero(NULL, mpv_node_list); node.u.list->num = count; node.u.list->values = talloc_array(node.u.list, mpv_node, count); for (int n = 0; n < count; n++) { struct mpv_node *sub = &node.u.list->values[n]; sub->format = MPV_FORMAT_NONE; int r; r = get_item(n, M_PROPERTY_GET_NODE, sub, ctx); if (r == M_PROPERTY_NOT_IMPLEMENTED) { struct m_option opt = {0}; r = get_item(n, M_PROPERTY_GET_TYPE, &opt, ctx); if (r != M_PROPERTY_OK) goto err; union m_option_value val = m_option_value_default; r = get_item(n, M_PROPERTY_GET, &val, ctx); if (r != M_PROPERTY_OK) goto err; m_option_get_node(&opt, node.u.list, sub, &val); m_option_free(&opt, &val); err: ; } } *(struct mpv_node *)arg = node; return M_PROPERTY_OK; } case M_PROPERTY_PRINT: { // See m_property_read_sub() remarks. char *res = NULL; for (int n = 0; n < count; n++) { char *s = NULL; int r = get_item(n, M_PROPERTY_PRINT, &s, ctx); if (r != M_PROPERTY_OK) { talloc_free(res); return r; } ta_xasprintf_append(&res, "%d: %s\n", n, s); talloc_free(s); } *(char **)arg = res; return M_PROPERTY_OK; } case M_PROPERTY_KEY_ACTION: { struct m_property_action_arg *ka = arg; if (strcmp(ka->key, "count") == 0) { switch (ka->action) { case M_PROPERTY_GET_TYPE: { struct m_option opt = {.type = CONF_TYPE_INT}; *(struct m_option *)ka->arg = opt; return M_PROPERTY_OK; } case M_PROPERTY_GET: *(int *)ka->arg = MPMAX(0, count); return M_PROPERTY_OK; } return M_PROPERTY_NOT_IMPLEMENTED; } // This is expected of the form "123" or "123/rest" char *end; long int item = strtol(ka->key, &end, 10); // not a number, trailing characters, etc. if (end == ka->key || (end[0] == '/' && !end[1])) return M_PROPERTY_UNKNOWN; if (item < 0 || item >= count) return M_PROPERTY_UNKNOWN; if (*end) { // Sub-path struct m_property_action_arg n_ka = *ka; n_ka.key = end + 1; return get_item(item, M_PROPERTY_KEY_ACTION, &n_ka, ctx); } else { // Direct query return get_item(item, ka->action, ka->arg, ctx); } } } return M_PROPERTY_NOT_IMPLEMENTED;}