0
0
mirror of https://github.com/obsproject/obs-studio.git synced 2024-09-20 13:08:50 +02:00
obs-studio/deps/obs-scripting/obs-scripting-lua-frontend.c
jp9000 f53df7da64 clang-format: Apply formatting
Code submissions have continually suffered from formatting
inconsistencies that constantly have to be addressed.  Using
clang-format simplifies this by making code formatting more consistent,
and allows automation of the code formatting so that maintainers can
focus more on the code itself instead of code formatting.
2019-06-23 23:49:10 -07:00

316 lines
7.4 KiB
C

/******************************************************************************
Copyright (C) 2017 by Hugh Bailey <jim@obsproject.com>
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 2 of the License, or
(at your option) any later version.
This program 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 General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>.
******************************************************************************/
#include <obs-module.h>
#include <obs-frontend-api.h>
#include "obs-scripting-lua.h"
#define ls_get_libobs_obj(type, lua_index, obs_obj) \
ls_get_libobs_obj_(script, #type " *", lua_index, obs_obj, NULL, \
__FUNCTION__, __LINE__)
#define ls_push_libobs_obj(type, obs_obj, ownership) \
ls_push_libobs_obj_(script, #type " *", obs_obj, ownership, NULL, \
__FUNCTION__, __LINE__)
#define call_func(func, args, rets) \
call_func_(script, cb->reg_idx, args, rets, #func, "frontend API")
/* ----------------------------------- */
static int get_scene_names(lua_State *script)
{
char **names = obs_frontend_get_scene_names();
char **name = names;
int i = 0;
lua_newtable(script);
while (name && *name) {
lua_pushstring(script, *name);
lua_rawseti(script, -2, ++i);
name++;
}
bfree(names);
return 1;
}
static int get_scenes(lua_State *script)
{
struct obs_frontend_source_list list = {0};
obs_frontend_get_scenes(&list);
lua_newtable(script);
for (size_t i = 0; i < list.sources.num; i++) {
obs_source_t *source = list.sources.array[i];
ls_push_libobs_obj(obs_source_t, source, false);
lua_rawseti(script, -2, (int)(i + 1));
}
da_free(list.sources);
return 1;
}
static int get_current_scene(lua_State *script)
{
obs_source_t *source = obs_frontend_get_current_scene();
ls_push_libobs_obj(obs_source_t, source, false);
return 1;
}
static int set_current_scene(lua_State *script)
{
obs_source_t *source = NULL;
ls_get_libobs_obj(obs_source_t, 1, &source);
obs_frontend_set_current_scene(source);
return 0;
}
static int get_transitions(lua_State *script)
{
struct obs_frontend_source_list list = {0};
obs_frontend_get_transitions(&list);
lua_newtable(script);
for (size_t i = 0; i < list.sources.num; i++) {
obs_source_t *source = list.sources.array[i];
ls_push_libobs_obj(obs_source_t, source, false);
lua_rawseti(script, -2, (int)(i + 1));
}
da_free(list.sources);
return 1;
}
static int get_current_transition(lua_State *script)
{
obs_source_t *source = obs_frontend_get_current_transition();
ls_push_libobs_obj(obs_source_t, source, false);
return 1;
}
static int set_current_transition(lua_State *script)
{
obs_source_t *source = NULL;
ls_get_libobs_obj(obs_source_t, 1, &source);
obs_frontend_set_current_transition(source);
return 0;
}
static int get_scene_collections(lua_State *script)
{
char **names = obs_frontend_get_scene_collections();
char **name = names;
int i = 0;
lua_newtable(script);
while (name && *name) {
lua_pushstring(script, *name);
lua_rawseti(script, -2, ++i);
name++;
}
bfree(names);
return 1;
}
static int get_current_scene_collection(lua_State *script)
{
char *name = obs_frontend_get_current_scene_collection();
lua_pushstring(script, name);
bfree(name);
return 1;
}
static int set_current_scene_collection(lua_State *script)
{
if (lua_isstring(script, 1)) {
const char *name = lua_tostring(script, 1);
obs_frontend_set_current_scene_collection(name);
}
return 0;
}
static int get_profiles(lua_State *script)
{
char **names = obs_frontend_get_profiles();
char **name = names;
int i = 0;
lua_newtable(script);
while (name && *name) {
lua_pushstring(script, *name);
lua_rawseti(script, -2, ++i);
name++;
}
bfree(names);
return 1;
}
static int get_current_profile(lua_State *script)
{
char *name = obs_frontend_get_current_profile();
lua_pushstring(script, name);
bfree(name);
return 1;
}
static int set_current_profile(lua_State *script)
{
if (lua_isstring(script, 1)) {
const char *name = lua_tostring(script, 1);
obs_frontend_set_current_profile(name);
}
return 0;
}
/* ----------------------------------- */
static void frontend_event_callback(enum obs_frontend_event event, void *priv)
{
struct lua_obs_callback *cb = priv;
lua_State *script = cb->script;
if (cb->base.removed) {
obs_frontend_remove_event_callback(frontend_event_callback, cb);
return;
}
lock_callback();
lua_pushinteger(script, (int)event);
call_func(frontend_event_callback, 1, 0);
unlock_callback();
}
static int remove_event_callback(lua_State *script)
{
if (!verify_args1(script, is_function))
return 0;
struct lua_obs_callback *cb = find_lua_obs_callback(script, 1);
if (cb) {
remove_lua_obs_callback(cb);
}
return 0;
}
static void add_event_callback_defer(void *cb)
{
obs_frontend_add_event_callback(frontend_event_callback, cb);
}
static int add_event_callback(lua_State *script)
{
if (!verify_args1(script, is_function))
return 0;
struct lua_obs_callback *cb = add_lua_obs_callback(script, 1);
defer_call_post(add_event_callback_defer, cb);
return 0;
}
/* ----------------------------------- */
static void frontend_save_callback(obs_data_t *save_data, bool saving,
void *priv)
{
struct lua_obs_callback *cb = priv;
lua_State *script = cb->script;
if (cb->base.removed) {
obs_frontend_remove_save_callback(frontend_save_callback, cb);
return;
}
lock_callback();
ls_push_libobs_obj(obs_data_t, save_data, false);
lua_pushboolean(script, saving);
call_func(frontend_save_callback, 2, 0);
unlock_callback();
}
static int remove_save_callback(lua_State *script)
{
if (!verify_args1(script, is_function))
return 0;
struct lua_obs_callback *cb = find_lua_obs_callback(script, 1);
if (cb) {
remove_lua_obs_callback(cb);
}
return 0;
}
static void add_save_callback_defer(void *cb)
{
obs_frontend_add_save_callback(frontend_save_callback, cb);
}
static int add_save_callback(lua_State *script)
{
if (!verify_args1(script, is_function))
return 0;
struct lua_obs_callback *cb = add_lua_obs_callback(script, 1);
defer_call_post(add_save_callback_defer, cb);
return 0;
}
/* ----------------------------------- */
void add_lua_frontend_funcs(lua_State *script)
{
lua_getglobal(script, "obslua");
#define add_func(name) \
do { \
lua_pushstring(script, "obs_frontend_" #name); \
lua_pushcfunction(script, name); \
lua_rawset(script, -3); \
} while (false)
add_func(get_scene_names);
add_func(get_scenes);
add_func(get_current_scene);
add_func(set_current_scene);
add_func(get_transitions);
add_func(get_current_transition);
add_func(set_current_transition);
add_func(get_scene_collections);
add_func(get_current_scene_collection);
add_func(set_current_scene_collection);
add_func(get_profiles);
add_func(get_current_profile);
add_func(set_current_profile);
add_func(remove_event_callback);
add_func(add_event_callback);
add_func(remove_save_callback);
add_func(add_save_callback);
#undef add_func
lua_pop(script, 1);
}