Function flood_fill

plugins/burrow.cpp:526–608

}

static void flood_fill(lua_State *L, bool enable) {
    df::coord start_pos;
    bool zlevel = false;

    df::burrow *burrow = get_burrow(L, 1);
    if (!burrow) {
        luaL_argerror(L, 1, "invalid burrow specifier or burrow not found");
        return;
    }

    Lua::CheckDFAssign(L, &start_pos, 2);
    get_opts(L, 3, zlevel);

    df::tile_designation *start_des = Maps::getTileDesignation(start_pos);
    if (!start_des) {
        luaL_argerror(L, 2, "invalid starting coordinates");
        return;
    }
    bool start_outside = is_outside(start_pos, start_des);
    bool start_hidden = start_des->bits.hidden;
    uint16_t start_walk = Maps::getWalkableGroup(start_pos);
    DEBUG(status).print("starting pos: ({},{},{}); outside: {}; hidden: {}\n",
        start_pos.x, start_pos.y, start_pos.z, start_outside, start_hidden);

    std::stack<df::coord> flood;
    flood.emplace(start_pos);

    while(!flood.empty()) {
        const df::coord pos = flood.top();
        flood.pop();

        TRACE(status).print("pos: ({},{},{})\n", pos.x, pos.y, pos.z);

        df::tile_designation *des = Maps::getTileDesignation(pos);
        if (!des ||
            is_outside(pos, des) != start_outside ||
            des->bits.hidden != start_hidden)
        {
            continue;
        }

        uint16_t walk = get_walk_group(pos);
        if (!start_walk && walk)
            continue;

        if (pos != start_pos && enable == Burrows::isAssignedTile(burrow, pos))
            continue;

        Burrows::setAssignedTile(burrow, pos, enable);

        // only go one tile outside of a walkability group (trees don't count)
        df::tiletype *tt = Maps::getTileType(pos);
        if (start_walk && start_walk != walk && tt && !is_tree_trunk(tt))
            continue;

        flood.emplace(pos.x-1, pos.y-1, pos.z);
        flood.emplace(pos.x,   pos.y-1, pos.z);
        flood.emplace(pos.x+1, pos.y-1, pos.z);