X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=nageru%2Ftheme.cpp;h=7c3b366e49fafa46514281f2137fb940b4f28cd1;hb=6d5032cb1f330b6767053c51a8d627ac5f7c00ec;hp=6a4de4baa248ece934994332de8d559b29736010;hpb=b7398dd7960ddf07f03b9a9ebc669d29141c09d0;p=nageru

diff --git a/nageru/theme.cpp b/nageru/theme.cpp
index 6a4de4b..7c3b366 100644
--- a/nageru/theme.cpp
+++ b/nageru/theme.cpp
@@ -1212,6 +1212,7 @@ int call_num_channels(lua_State *L)
 
 	if (lua_pcall(L, 0, 1, 0) != 0) {
 		fprintf(stderr, "error running function `num_channels': %s\n", lua_tostring(L, -1));
+		fprintf(stderr, "Try Nageru.set_num_channels(...) at the start of the script instead.\n");
 		abort();
 	}
 
@@ -1234,6 +1235,46 @@ int Nageru_set_channel_name(lua_State *L)
 	return 0;
 }
 
+int Nageru_set_num_channels(lua_State *L)
+{
+	// NOTE: m is already locked.
+	Theme *theme = get_theme_updata(L);
+	if (theme->startup_finished) {
+		luaL_error(L, "set_num_channels() can only be called at startup.");
+	}
+	theme->num_channels = luaL_checknumber(L, 1);
+	lua_pop(L, 1);
+	return 0;
+}
+
+int Nageru_set_channel_signal(lua_State *L)
+{
+	// NOTE: m is already locked.
+	Theme *theme = get_theme_updata(L);
+	if (theme->startup_finished) {
+		luaL_error(L, "set_channel_signal() can only be called at startup.");
+	}
+	unsigned channel = luaL_checknumber(L, 1);
+	int signal = luaL_checknumber(L, 2);
+	theme->channel_signals[channel] = signal;
+	lua_pop(L, 2);
+	return 0;
+}
+
+int Nageru_set_supports_wb(lua_State *L)
+{
+	// NOTE: m is already locked.
+	Theme *theme = get_theme_updata(L);
+	if (theme->startup_finished) {
+		luaL_error(L, "set_supports_wb() can only be called at startup.");
+	}
+	unsigned channel = luaL_checknumber(L, 1);
+	bool supports_wb = checkbool(L, 2);
+	theme->channel_supports_wb[channel] = supports_wb;
+	lua_pop(L, 2);
+	return 0;
+}
+
 Theme::Theme(const string &filename, const vector<string> &search_dirs, ResourcePool *resource_pool, unsigned num_cards)
 	: resource_pool(resource_pool), num_cards(num_cards), signal_to_card_mapping(global_flags.default_stream_mapping)
 {
@@ -1335,8 +1376,11 @@ Theme::Theme(const string &filename, const vector<string> &search_dirs, Resource
 	}
 	assert(lua_gettop(L) == 0);
 
-	// Ask it for the number of channels.
-	num_channels = call_num_channels(L);
+	if (num_channels == -1) {
+		// Ask it for the number of channels.
+		num_channels = call_num_channels(L);
+	}
+	startup_finished = true;
 }
 
 Theme::~Theme()
@@ -1371,6 +1415,9 @@ void Theme::register_globals()
 
 	const luaL_Reg Nageru_funcs[] = {
 		{ "set_channel_name", Nageru_set_channel_name },
+		{ "set_num_channels", Nageru_set_num_channels },
+		{ "set_channel_signal", Nageru_set_channel_signal },
+		{ "set_supports_wb", Nageru_set_supports_wb },
 		{ NULL, NULL }
 	};
 	lua_pushlightuserdata(L, this);
@@ -1521,6 +1568,7 @@ string Theme::get_channel_name(unsigned channel)
 	const char *ret = lua_tostring(L, -1);
 	if (ret == nullptr) {
 		fprintf(stderr, "function `channel_name' returned nil for channel %d\n", channel);
+		fprintf(stderr, "Try Nageru.set_channel_name(channel, name) at the start of the script instead.\n");
 		abort();
 	}
 
@@ -1534,9 +1582,19 @@ int Theme::get_channel_signal(unsigned channel)
 {
 	lock_guard<mutex> lock(m);
 	lua_getglobal(L, "channel_signal");
+	if (lua_isnil(L, -1)) {
+		lua_pop(L, 1);
+		if (channel_signals.count(channel)) {
+			return channel_signals[channel];
+		} else {
+			return -1;
+		}
+	}
+
 	lua_pushnumber(L, channel);
 	if (lua_pcall(L, 1, 1, 0) != 0) {
 		fprintf(stderr, "error running function `channel_signal': %s\n", lua_tostring(L, -1));
+		fprintf(stderr, "Try Nageru.set_channel_signal(channel, signal) at the start of the script instead.\n");
 		abort();
 	}
 
@@ -1572,9 +1630,19 @@ bool Theme::get_supports_set_wb(unsigned channel)
 {
 	lock_guard<mutex> lock(m);
 	lua_getglobal(L, "supports_set_wb");
+	if (lua_isnil(L, -1)) {
+		lua_pop(L, 1);
+		if (channel_supports_wb.count(channel)) {
+			return channel_supports_wb[channel];
+		} else {
+			return false;
+		}
+	}
+
 	lua_pushnumber(L, channel);
 	if (lua_pcall(L, 1, 1, 0) != 0) {
 		fprintf(stderr, "error running function `supports_set_wb': %s\n", lua_tostring(L, -1));
+		fprintf(stderr, "Try Nageru.set_supports_wb(channel, bool) at the start of the script instead.\n");
 		abort();
 	}