Files
test2/source/blender/compositor/operations/COM_KeyingScreenOperation.cc
2022-11-22 11:49:56 +01:00

389 lines
11 KiB
C++

/* SPDX-License-Identifier: GPL-2.0-or-later
* Copyright 2012 Blender Foundation. */
#include "COM_KeyingScreenOperation.h"
#include "DNA_defaults.h"
#include "BKE_movieclip.h"
#include "BKE_tracking.h"
#include "IMB_imbuf.h"
#include "IMB_imbuf_types.h"
namespace blender::compositor {
KeyingScreenOperation::KeyingScreenOperation()
{
this->add_output_socket(DataType::Color);
movie_clip_ = nullptr;
framenumber_ = 0;
tracking_object_[0] = 0;
flags_.complex = true;
cached_triangulation_ = nullptr;
}
void KeyingScreenOperation::init_execution()
{
init_mutex();
if (execution_model_ == eExecutionModel::FullFrame) {
BLI_assert(cached_triangulation_ == nullptr);
if (movie_clip_) {
cached_triangulation_ = build_voronoi_triangulation();
}
}
else {
cached_triangulation_ = nullptr;
}
}
void KeyingScreenOperation::deinit_execution()
{
if (cached_triangulation_) {
TriangulationData *triangulation = cached_triangulation_;
if (triangulation->triangulated_points) {
MEM_freeN(triangulation->triangulated_points);
}
if (triangulation->triangles) {
MEM_freeN(triangulation->triangles);
}
if (triangulation->triangles_AABB) {
MEM_freeN(triangulation->triangles_AABB);
}
MEM_freeN(cached_triangulation_);
cached_triangulation_ = nullptr;
}
}
KeyingScreenOperation::TriangulationData *KeyingScreenOperation::build_voronoi_triangulation()
{
MovieClipUser user = *DNA_struct_default_get(MovieClipUser);
TriangulationData *triangulation;
MovieTracking *tracking = &movie_clip_->tracking;
ImBuf *ibuf;
ListBase edges = {nullptr, nullptr};
int sites_total;
int i;
int width = this->get_width();
int height = this->get_height();
int clip_frame = BKE_movieclip_remap_scene_to_clip_frame(movie_clip_, framenumber_);
const MovieTrackingObject *tracking_object = nullptr;
if (tracking_object_[0]) {
tracking_object = BKE_tracking_object_get_named(tracking, tracking_object_);
if (!tracking_object) {
return nullptr;
}
}
else {
tracking_object = BKE_tracking_object_get_active(tracking);
}
BLI_assert(tracking_object != 0);
/* count sites */
sites_total = 0;
LISTBASE_FOREACH (MovieTrackingTrack *, track, &tracking_object->tracks) {
const MovieTrackingMarker *marker = BKE_tracking_marker_get(track, clip_frame);
if (marker->flag & MARKER_DISABLED) {
continue;
}
float pos[2];
add_v2_v2v2(pos, marker->pos, track->offset);
if (!IN_RANGE_INCL(pos[0], 0.0f, 1.0f) || !IN_RANGE_INCL(pos[1], 0.0f, 1.0f)) {
continue;
}
sites_total++;
}
if (!sites_total) {
return nullptr;
}
BKE_movieclip_user_set_frame(&user, clip_frame);
ibuf = BKE_movieclip_get_ibuf(movie_clip_, &user);
if (!ibuf) {
return nullptr;
}
triangulation = MEM_cnew<TriangulationData>("keying screen triangulation data");
VoronoiSite *sites = (VoronoiSite *)MEM_callocN(sizeof(VoronoiSite) * sites_total,
"keyingscreen voronoi sites");
int track_index = 0;
LISTBASE_FOREACH_INDEX (MovieTrackingTrack *, track, &tracking_object->tracks, track_index) {
const MovieTrackingMarker *marker = BKE_tracking_marker_get(track, clip_frame);
if (marker->flag & MARKER_DISABLED) {
continue;
}
float pos[2];
add_v2_v2v2(pos, marker->pos, track->offset);
if (!IN_RANGE_INCL(pos[0], 0.0f, 1.0f) || !IN_RANGE_INCL(pos[1], 0.0f, 1.0f)) {
continue;
}
ImBuf *pattern_ibuf = BKE_tracking_get_pattern_imbuf(ibuf, track, marker, true, false);
VoronoiSite *site = &sites[track_index];
zero_v3(site->color);
if (pattern_ibuf) {
for (int j = 0; j < pattern_ibuf->x * pattern_ibuf->y; j++) {
if (pattern_ibuf->rect_float) {
add_v3_v3(site->color, &pattern_ibuf->rect_float[4 * j]);
}
else {
uchar *rrgb = (uchar *)pattern_ibuf->rect;
site->color[0] += srgb_to_linearrgb(float(rrgb[4 * j + 0]) / 255.0f);
site->color[1] += srgb_to_linearrgb(float(rrgb[4 * j + 1]) / 255.0f);
site->color[2] += srgb_to_linearrgb(float(rrgb[4 * j + 2]) / 255.0f);
}
}
mul_v3_fl(site->color, 1.0f / (pattern_ibuf->x * pattern_ibuf->y));
IMB_freeImBuf(pattern_ibuf);
}
site->co[0] = pos[0] * width;
site->co[1] = pos[1] * height;
site++;
}
IMB_freeImBuf(ibuf);
BLI_voronoi_compute(sites, sites_total, width, height, &edges);
BLI_voronoi_triangulate(sites,
sites_total,
&edges,
width,
height,
&triangulation->triangulated_points,
&triangulation->triangulated_points_total,
&triangulation->triangles,
&triangulation->triangles_total);
MEM_freeN(sites);
BLI_freelistN(&edges);
if (triangulation->triangles_total) {
rcti *rect;
rect = triangulation->triangles_AABB = (rcti *)MEM_callocN(
sizeof(rcti) * triangulation->triangles_total, "voronoi triangulation AABB");
for (i = 0; i < triangulation->triangles_total; i++, rect++) {
int *triangle = triangulation->triangles[i];
VoronoiTriangulationPoint *a = &triangulation->triangulated_points[triangle[0]],
*b = &triangulation->triangulated_points[triangle[1]],
*c = &triangulation->triangulated_points[triangle[2]];
float min[2], max[2];
INIT_MINMAX2(min, max);
minmax_v2v2_v2(min, max, a->co);
minmax_v2v2_v2(min, max, b->co);
minmax_v2v2_v2(min, max, c->co);
rect->xmin = int(min[0]);
rect->ymin = int(min[1]);
rect->xmax = int(max[0]) + 1;
rect->ymax = int(max[1]) + 1;
}
}
return triangulation;
}
KeyingScreenOperation::TileData *KeyingScreenOperation::triangulate(const rcti *rect)
{
TileData *tile_data;
TriangulationData *triangulation;
int triangles_allocated = 0;
int chunk_size = 20;
int i;
triangulation = cached_triangulation_;
if (!triangulation) {
return nullptr;
}
tile_data = MEM_cnew<TileData>("keying screen tile data");
for (i = 0; i < triangulation->triangles_total; i++) {
if (BLI_rcti_isect(rect, &triangulation->triangles_AABB[i], nullptr)) {
tile_data->triangles_total++;
if (tile_data->triangles_total > triangles_allocated) {
if (!tile_data->triangles) {
tile_data->triangles = (int *)MEM_mallocN(sizeof(int) * chunk_size,
"keying screen tile triangles chunk");
}
else {
tile_data->triangles = (int *)MEM_reallocN(
tile_data->triangles, sizeof(int) * (triangles_allocated + chunk_size));
}
triangles_allocated += chunk_size;
}
tile_data->triangles[tile_data->triangles_total - 1] = i;
}
}
return tile_data;
}
void *KeyingScreenOperation::initialize_tile_data(rcti *rect)
{
if (movie_clip_ == nullptr) {
return nullptr;
}
if (!cached_triangulation_) {
lock_mutex();
if (cached_triangulation_ == nullptr) {
cached_triangulation_ = build_voronoi_triangulation();
}
unlock_mutex();
}
return triangulate(rect);
}
void KeyingScreenOperation::deinitialize_tile_data(rcti * /*rect*/, void *data)
{
TileData *tile_data = (TileData *)data;
if (tile_data->triangles) {
MEM_freeN(tile_data->triangles);
}
MEM_freeN(tile_data);
}
void KeyingScreenOperation::determine_canvas(const rcti &preferred_area, rcti &r_area)
{
r_area = COM_AREA_NONE;
if (movie_clip_) {
MovieClipUser user = *DNA_struct_default_get(MovieClipUser);
int width, height;
int clip_frame = BKE_movieclip_remap_scene_to_clip_frame(movie_clip_, framenumber_);
BKE_movieclip_user_set_frame(&user, clip_frame);
BKE_movieclip_get_size(movie_clip_, &user, &width, &height);
r_area = preferred_area;
r_area.xmax = r_area.xmin + width;
r_area.ymax = r_area.ymin + height;
}
}
void KeyingScreenOperation::execute_pixel(float output[4], int x, int y, void *data)
{
output[0] = 0.0f;
output[1] = 0.0f;
output[2] = 0.0f;
output[3] = 1.0f;
if (movie_clip_ && data) {
TriangulationData *triangulation = cached_triangulation_;
TileData *tile_data = (TileData *)data;
int i;
float co[2] = {float(x), float(y)};
for (i = 0; i < tile_data->triangles_total; i++) {
int triangle_idx = tile_data->triangles[i];
rcti *rect = &triangulation->triangles_AABB[triangle_idx];
if (IN_RANGE_INCL(x, rect->xmin, rect->xmax) && IN_RANGE_INCL(y, rect->ymin, rect->ymax)) {
int *triangle = triangulation->triangles[triangle_idx];
VoronoiTriangulationPoint *a = &triangulation->triangulated_points[triangle[0]],
*b = &triangulation->triangulated_points[triangle[1]],
*c = &triangulation->triangulated_points[triangle[2]];
float w[3];
if (barycentric_coords_v2(a->co, b->co, c->co, co, w)) {
if (barycentric_inside_triangle_v2(w)) {
output[0] = a->color[0] * w[0] + b->color[0] * w[1] + c->color[0] * w[2];
output[1] = a->color[1] * w[0] + b->color[1] * w[1] + c->color[1] * w[2];
output[2] = a->color[2] * w[0] + b->color[2] * w[1] + c->color[2] * w[2];
break;
}
}
}
}
}
}
void KeyingScreenOperation::update_memory_buffer_partial(MemoryBuffer *output,
const rcti &area,
Span<MemoryBuffer *> inputs)
{
if (movie_clip_ == nullptr) {
output->fill(area, COM_COLOR_BLACK);
return;
}
TileData *tri_area = this->triangulate(&area);
BLI_assert(tri_area != nullptr);
const int *triangles = tri_area->triangles;
const int num_triangles = tri_area->triangles_total;
const TriangulationData *triangulation = cached_triangulation_;
for (BuffersIterator<float> it = output->iterate_with(inputs, area); !it.is_end(); ++it) {
copy_v4_v4(it.out, COM_COLOR_BLACK);
const float co[2] = {float(it.x), float(it.y)};
for (int i = 0; i < num_triangles; i++) {
const int triangle_idx = triangles[i];
const rcti *rect = &triangulation->triangles_AABB[triangle_idx];
if (!BLI_rcti_isect_pt(rect, it.x, it.y)) {
continue;
}
const int *triangle = triangulation->triangles[triangle_idx];
const VoronoiTriangulationPoint &a = triangulation->triangulated_points[triangle[0]];
const VoronoiTriangulationPoint &b = triangulation->triangulated_points[triangle[1]];
const VoronoiTriangulationPoint &c = triangulation->triangulated_points[triangle[2]];
float w[3];
if (!barycentric_coords_v2(a.co, b.co, c.co, co, w)) {
continue;
}
if (barycentric_inside_triangle_v2(w)) {
it.out[0] = a.color[0] * w[0] + b.color[0] * w[1] + c.color[0] * w[2];
it.out[1] = a.color[1] * w[0] + b.color[1] * w[1] + c.color[1] * w[2];
it.out[2] = a.color[2] * w[0] + b.color[2] * w[1] + c.color[2] * w[2];
break;
}
}
}
if (tri_area->triangles) {
MEM_freeN(tri_area->triangles);
}
MEM_freeN(tri_area);
}
} // namespace blender::compositor