]> git.sesse.net Git - nageru/blobdiff - nageru/scene.cpp
Make it possible for auto white balance to be controlled by another input.
[nageru] / nageru / scene.cpp
index 178755a0782ff38960c500a436932282e7de9ce2..f4320b45f9e6d02de38c3ffa608c7ae2a109de5e 100644 (file)
@@ -176,6 +176,14 @@ bool Scene::is_noncanonical_chain(size_t chain_idx) const
                                        return true;
                                }
                        }
+
+                       // Auto white balance is always disabled for image inputs.
+                       if (block->white_balance_controller_block != nullptr) {
+                               const Block *input = block->white_balance_controller_block;
+                               if (input->alternatives[input->chosen_alternative(chain_idx)]->effect_type == IMAGE_INPUT) {
+                                       return true;
+                               }
+                       }
                }
        }
        return false;
@@ -227,34 +235,35 @@ int Scene::add_input(lua_State* L)
        return wrap_lua_existing_object_nonowned<Block>(L, "Block", block);
 }
 
-void Scene::find_inputs_for_block(lua_State *L, Scene *scene, Block *block)
+Block *Scene::find_block_from_arg(lua_State *L, Scene *scene, int idx)
 {
-       if (lua_gettop(L) == 2) {
+       if (luaL_testudata(L, idx, "Block")) {
+               return *(Block **)luaL_checkudata(L, idx, "Block");
+       } else {
+               EffectBlueprint *blueprint = *(EffectBlueprint **)luaL_checkudata(L, idx, "EffectBlueprint");
+
+               // Search through all the blocks to figure out which one contains this effect.
+               for (Block *block : scene->blocks) {
+                       if (find(block->alternatives.begin(), block->alternatives.end(), blueprint) != block->alternatives.end()) {
+                               return block;
+                       }
+               }
+               luaL_error(L, "Input effect in parameter #%d has not been added to this scene", idx - 1);
+               return nullptr;  // Dead code.
+       }
+}
+
+void Scene::find_inputs_for_block(lua_State *L, Scene *scene, Block *block, int first_input_idx)
+{
+       if (lua_gettop(L) == first_input_idx - 1) {
                // Implicitly the last added effect.
                assert(!scene->blocks.empty());
                block->inputs.push_back(scene->blocks.size() - 1);
                return;
        }
 
-       for (int idx = 3; idx <= lua_gettop(L); ++idx) {
-               Block *input_block = nullptr;
-               if (luaL_testudata(L, idx, "Block")) {
-                       input_block = *(Block **)luaL_checkudata(L, idx, "Block");
-               } else {
-                       EffectBlueprint *blueprint = *(EffectBlueprint **)luaL_checkudata(L, idx, "EffectBlueprint");
-
-                       // Search through all the blocks to figure out which one contains this effect.
-                       for (Block *block : scene->blocks) {
-                               if (find(block->alternatives.begin(), block->alternatives.end(), blueprint) != block->alternatives.end()) {
-                                       input_block = block;
-                                       break;
-                               }
-                       }
-                       if (input_block == nullptr) {
-                               luaL_error(L, "Input effect in parameter #%d has not been added to this scene", idx - 1);
-                       }
-               }
-               block->inputs.push_back(input_block->idx);
+       for (int idx = first_input_idx; idx <= lua_gettop(L); ++idx) {
+               block->inputs.push_back(find_block_from_arg(L, scene, idx)->idx);
        }
 }
 
@@ -318,6 +327,65 @@ int Scene::add_optional_effect(lua_State* L)
        return wrap_lua_existing_object_nonowned<Block>(L, "Block", block);
 }
 
+const Block *Scene::find_root_input_block(lua_State *L, const Block *block)
+{
+       if (block->is_input) {
+               assert(block->inputs.size() == 0);
+               return block;
+       }
+
+       const Block *ret = nullptr;
+       for (size_t input_idx : block->inputs) {
+               const Block *parent = find_root_input_block(L, blocks[input_idx]);
+               if (parent != nullptr) {
+                       if (ret != nullptr) {
+                               luaL_error(L, "add_auto_white_balance() was connected to more than one input");
+                       }
+                       ret = parent;
+               }
+       }
+       return ret;
+}
+
+int Scene::add_auto_white_balance(lua_State* L)
+{
+       assert(lua_gettop(L) >= 1);
+       Scene *scene = (Scene *)luaL_checkudata(L, 1, "Scene");
+
+       Block *block = new Block;
+       block->declaration_point = get_declaration_point(L);
+       block->idx = scene->blocks.size();
+
+       block->alternatives.push_back(new EffectBlueprint(WHITE_BALANCE_EFFECT));
+       block->alternatives.push_back(new EffectBlueprint(IDENTITY_EFFECT));
+
+       block->canonical_alternative = 1;
+
+       if (lua_gettop(L) == 1) {
+               // The last added effect is implicitly both the input and gives the white balance controller.
+               assert(!scene->blocks.empty());
+               block->inputs.push_back(scene->blocks.size() - 1);
+               block->white_balance_controller_block = scene->find_root_input_block(L, block);
+       } else if (lua_gettop(L) == 2) {
+               // The given effect is both the input and the white balance controller.
+               block->inputs.push_back(find_block_from_arg(L, scene, 2)->idx);
+               block->white_balance_controller_block = scene->find_root_input_block(L, block);
+       } else if (lua_gettop(L) == 3) {
+               // We have explicit input and white balance controller.
+               block->inputs.push_back(find_block_from_arg(L, scene, 2)->idx);
+               block->white_balance_controller_block = find_block_from_arg(L, scene, 3);
+       } else {
+               luaL_error(L, "add_auto_white_balance([input], [white_balance_controller]) takes zero, one or two arguments");
+       }
+       if (block->white_balance_controller_block == nullptr || !block->white_balance_controller_block->is_input) {
+               luaL_error(L, "add_auto_white_balance() does not get its white balance from an input");
+       }
+
+       scene->blocks.push_back(block);
+
+       return wrap_lua_existing_object_nonowned<Block>(L, "Block", block);
+}
+
 Effect *Scene::instantiate_effects(const Block *block, size_t chain_idx, Scene::Instantiation *instantiation)
 {
        // Find the chosen alternative for this block in this instance.
@@ -463,6 +531,38 @@ Scene::get_chain(Theme *theme, lua_State *L, unsigned num, const InputState &inp
                }
        }
 
+       // Find all auto white balance blocks, turn on and off the effect as needed,
+       // and fetch the actual white balance set (it is stored in Theme).
+       map<Block *, array<float, 3>> white_balance;
+       for (size_t block_idx = 0; block_idx < blocks.size(); ++block_idx) {
+               Block *block = blocks[block_idx];
+               const Block *input = block->white_balance_controller_block;
+               if (input == nullptr) {
+                       continue;  // Not an auto white balance block.
+               }
+
+               EffectType chosen_type = current_type(input);
+               if (chosen_type == IMAGE_INPUT) {
+                       // Image inputs never get white balance applied.
+                       block->currently_chosen_alternative = find_index_of(block, IDENTITY_EFFECT);
+                       continue;
+               }
+
+               assert(chosen_type == LIVE_INPUT_YCBCR ||
+                      chosen_type == LIVE_INPUT_YCBCR_WITH_DEINTERLACE ||
+                      chosen_type == LIVE_INPUT_YCBCR_PLANAR ||
+                      chosen_type == LIVE_INPUT_BGRA);
+               int signal = find_signal_to_connect(L, input);
+               RGBTriplet wb = theme->get_white_balance_for_signal(signal);
+               if (fabs(wb.r - 1.0) < 1e-3 && fabs(wb.g - 1.0) < 1e-3 && fabs(wb.b - 1.0) < 1e-3) {
+                       // Neutral white balance.
+                       block->currently_chosen_alternative = find_index_of(block, IDENTITY_EFFECT);
+               } else {
+                       block->currently_chosen_alternative = find_index_of(block, WHITE_BALANCE_EFFECT);
+                       white_balance.emplace(block, array<float, 3>{ wb.r, wb.g, wb.b });
+               }
+       }
+
        // Pick out the right chain based on the current selections,
        // and snapshot all the set variables so that we can set them
        // in the prepare function even if they're being changed by
@@ -536,6 +636,9 @@ Scene::get_chain(Theme *theme, lua_State *L, unsigned num, const InputState &inp
                        for (const auto &key_and_tuple : block->float_parameters) {
                                float_to_set.emplace(make_pair(effect, key_and_tuple.first), key_and_tuple.second);
                        }
+                       if (white_balance.count(block)) {
+                               vec3_to_set.emplace(make_pair(effect, "neutral_color"), white_balance[block]);
+                       }
                        for (const auto &key_and_tuple : block->vec3_parameters) {
                                vec3_to_set.emplace(make_pair(effect, key_and_tuple.first), key_and_tuple.second);
                        }