From 0ef8a6179d2a773b2570352bd0cb7eb18b666da2 Mon Sep 17 00:00:00 2001 From: Jesse Yurkovich Date: Wed, 9 Mar 2022 20:55:17 -0800 Subject: Cleanup: Move image.c to c++ Passing on all platforms: https://builder.blender.org/admin/#/builders/18/builds/329 Differential Revision: https://developer.blender.org/D13962 --- source/blender/blenkernel/BKE_image.h | 2 +- source/blender/blenkernel/CMakeLists.txt | 2 +- source/blender/blenkernel/intern/image.c | 6340 ---------------------------- source/blender/blenkernel/intern/image.cc | 6394 +++++++++++++++++++++++++++++ 4 files changed, 6396 insertions(+), 6342 deletions(-) delete mode 100644 source/blender/blenkernel/intern/image.c create mode 100644 source/blender/blenkernel/intern/image.cc (limited to 'source/blender') diff --git a/source/blender/blenkernel/BKE_image.h b/source/blender/blenkernel/BKE_image.h index a5a2d57f9d3..ea0202e3b5f 100644 --- a/source/blender/blenkernel/BKE_image.h +++ b/source/blender/blenkernel/BKE_image.h @@ -486,7 +486,7 @@ bool BKE_image_is_dirty(struct Image *image); void BKE_image_mark_dirty(struct Image *image, struct ImBuf *ibuf); bool BKE_image_buffer_format_writable(struct ImBuf *ibuf); -bool BKE_image_is_dirty_writable(struct Image *image, bool *is_format_writable); +bool BKE_image_is_dirty_writable(struct Image *image, bool *r_is_writable); /** * Guess offset for the first frame in the sequence. diff --git a/source/blender/blenkernel/CMakeLists.txt b/source/blender/blenkernel/CMakeLists.txt index a12a956cbf5..3828d442f58 100644 --- a/source/blender/blenkernel/CMakeLists.txt +++ b/source/blender/blenkernel/CMakeLists.txt @@ -150,7 +150,7 @@ set(SRC intern/idprop_serialize.cc intern/idprop_utils.c intern/idtype.c - intern/image.c + intern/image.cc intern/image_partial_update.cc intern/image_gen.c intern/image_gpu.cc diff --git a/source/blender/blenkernel/intern/image.c b/source/blender/blenkernel/intern/image.c deleted file mode 100644 index e01f8cb76c8..00000000000 --- a/source/blender/blenkernel/intern/image.c +++ /dev/null @@ -1,6340 +0,0 @@ -/* SPDX-License-Identifier: GPL-2.0-or-later - * Copyright 2001-2002 NaN Holding BV. All rights reserved. */ - -/** \file - * \ingroup bke - */ - -#include -#include -#include -#include -#include -#ifndef WIN32 -# include -#else -# include -#endif - -#include - -#include "CLG_log.h" - -#include "MEM_guardedalloc.h" - -#include "IMB_colormanagement.h" -#include "IMB_imbuf.h" -#include "IMB_imbuf_types.h" -#include "IMB_metadata.h" -#include "IMB_moviecache.h" - -#ifdef WITH_OPENEXR -# include "intern/openexr/openexr_multi.h" -#endif - -/* Allow using deprecated functionality for .blend file I/O. */ -#define DNA_DEPRECATED_ALLOW - -#include "DNA_brush_types.h" -#include "DNA_camera_types.h" -#include "DNA_defaults.h" -#include "DNA_light_types.h" -#include "DNA_material_types.h" -#include "DNA_mesh_types.h" -#include "DNA_meshdata_types.h" -#include "DNA_object_types.h" -#include "DNA_packedFile_types.h" -#include "DNA_scene_types.h" -#include "DNA_sequence_types.h" -#include "DNA_simulation_types.h" -#include "DNA_world_types.h" - -#include "BLI_blenlib.h" -#include "BLI_math_vector.h" -#include "BLI_mempool.h" -#include "BLI_system.h" -#include "BLI_task.h" -#include "BLI_threads.h" -#include "BLI_timecode.h" /* For stamp time-code format. */ -#include "BLI_utildefines.h" - -#include "BLT_translation.h" - -#include "BKE_bpath.h" -#include "BKE_colortools.h" -#include "BKE_global.h" -#include "BKE_icons.h" -#include "BKE_idtype.h" -#include "BKE_image.h" -#include "BKE_lib_id.h" -#include "BKE_main.h" -#include "BKE_node.h" -#include "BKE_node_tree_update.h" -#include "BKE_packedFile.h" -#include "BKE_report.h" -#include "BKE_scene.h" -#include "BKE_workspace.h" - -#include "BLF_api.h" - -#include "PIL_time.h" - -#include "RE_pipeline.h" - -#include "SEQ_utils.h" /* SEQ_get_topmost_sequence() */ - -#include "GPU_material.h" -#include "GPU_texture.h" - -#include "BLI_sys_types.h" /* for intptr_t support */ - -#include "DEG_depsgraph.h" -#include "DEG_depsgraph_query.h" - -#include "BLO_read_write.h" - -/* for image user iteration */ -#include "DNA_node_types.h" -#include "DNA_screen_types.h" -#include "DNA_space_types.h" -#include "DNA_view3d_types.h" - -static CLG_LogRef LOG = {"bke.image"}; - -static void image_init(Image *ima, short source, short type); -static void image_free_packedfiles(Image *ima); -static void copy_image_packedfiles(ListBase *lb_dst, const ListBase *lb_src); - -/* Reset runtime image fields when data-block is being initialized. */ -static void image_runtime_reset(struct Image *image) -{ - memset(&image->runtime, 0, sizeof(image->runtime)); - image->runtime.cache_mutex = MEM_mallocN(sizeof(ThreadMutex), "image runtime cache_mutex"); - BLI_mutex_init(image->runtime.cache_mutex); -} - -/* Reset runtime image fields when data-block is being copied. */ -static void image_runtime_reset_on_copy(struct Image *image) -{ - image->runtime.cache_mutex = MEM_mallocN(sizeof(ThreadMutex), "image runtime cache_mutex"); - BLI_mutex_init(image->runtime.cache_mutex); - - image->runtime.partial_update_register = NULL; - image->runtime.partial_update_user = NULL; -} - -static void image_runtime_free_data(struct Image *image) -{ - BLI_mutex_end(image->runtime.cache_mutex); - MEM_freeN(image->runtime.cache_mutex); - image->runtime.cache_mutex = NULL; - - if (image->runtime.partial_update_user != NULL) { - BKE_image_partial_update_free(image->runtime.partial_update_user); - image->runtime.partial_update_user = NULL; - } - BKE_image_partial_update_register_free(image); -} - -static void image_init_data(ID *id) -{ - Image *image = (Image *)id; - - if (image != NULL) { - image_init(image, IMA_SRC_GENERATED, IMA_TYPE_UV_TEST); - } -} - -static void image_copy_data(Main *UNUSED(bmain), ID *id_dst, const ID *id_src, const int flag) -{ - Image *image_dst = (Image *)id_dst; - const Image *image_src = (const Image *)id_src; - - BKE_color_managed_colorspace_settings_copy(&image_dst->colorspace_settings, - &image_src->colorspace_settings); - - copy_image_packedfiles(&image_dst->packedfiles, &image_src->packedfiles); - - image_dst->stereo3d_format = MEM_dupallocN(image_src->stereo3d_format); - BLI_duplicatelist(&image_dst->views, &image_src->views); - - /* Cleanup stuff that cannot be copied. */ - image_dst->cache = NULL; - image_dst->rr = NULL; - - BLI_duplicatelist(&image_dst->renderslots, &image_src->renderslots); - LISTBASE_FOREACH (RenderSlot *, slot, &image_dst->renderslots) { - slot->render = NULL; - } - - BLI_listbase_clear(&image_dst->anims); - - BLI_duplicatelist(&image_dst->tiles, &image_src->tiles); - - for (int eye = 0; eye < 2; eye++) { - for (int i = 0; i < TEXTARGET_COUNT; i++) { - for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { - image_dst->gputexture[i][eye][resolution] = NULL; - } - } - } - - if ((flag & LIB_ID_COPY_NO_PREVIEW) == 0) { - BKE_previewimg_id_copy(&image_dst->id, &image_src->id); - } - else { - image_dst->preview = NULL; - } - - image_runtime_reset_on_copy(image_dst); -} - -static void image_free_data(ID *id) -{ - Image *image = (Image *)id; - - /* Also frees animdata. */ - BKE_image_free_buffers(image); - - image_free_packedfiles(image); - - LISTBASE_FOREACH (RenderSlot *, slot, &image->renderslots) { - if (slot->render) { - RE_FreeRenderResult(slot->render); - slot->render = NULL; - } - } - BLI_freelistN(&image->renderslots); - - BKE_image_free_views(image); - MEM_SAFE_FREE(image->stereo3d_format); - - BKE_icon_id_delete(&image->id); - BKE_previewimg_free(&image->preview); - - BLI_freelistN(&image->tiles); - - image_runtime_free_data(image); -} - -static void image_foreach_cache(ID *id, - IDTypeForeachCacheFunctionCallback function_callback, - void *user_data) -{ - Image *image = (Image *)id; - IDCacheKey key = { - .id_session_uuid = id->session_uuid, - .offset_in_ID = offsetof(Image, cache), - .cache_v = image->cache, - }; - function_callback(id, &key, (void **)&image->cache, 0, user_data); - - for (int eye = 0; eye < 2; eye++) { - for (int a = 0; a < TEXTARGET_COUNT; a++) { - for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { - GPUTexture *texture = image->gputexture[a][eye][resolution]; - if (texture == NULL) { - continue; - } - key.offset_in_ID = offsetof(Image, gputexture[a][eye][resolution]); - key.cache_v = texture; - function_callback(id, &key, (void **)&image->gputexture[a][eye][resolution], 0, user_data); - } - } - } - - key.offset_in_ID = offsetof(Image, rr); - key.cache_v = image->rr; - function_callback(id, &key, (void **)&image->rr, 0, user_data); - - LISTBASE_FOREACH (RenderSlot *, slot, &image->renderslots) { - key.offset_in_ID = (size_t)BLI_ghashutil_strhash_p(slot->name); - key.cache_v = slot->render; - function_callback(id, &key, (void **)&slot->render, 0, user_data); - } -} - -static void image_foreach_path(ID *id, BPathForeachPathData *bpath_data) -{ - Image *ima = (Image *)id; - const eBPathForeachFlag flag = bpath_data->flag; - - if (BKE_image_has_packedfile(ima) && (flag & BKE_BPATH_FOREACH_PATH_SKIP_PACKED) != 0) { - return; - } - /* Skip empty file paths, these are typically from generated images and - * don't make sense to add directories to until the image has been saved - * once to give it a meaningful value. */ - /* TODO re-assess whether this behavior is desired in the new generic code context. */ - if (!ELEM(ima->source, IMA_SRC_FILE, IMA_SRC_MOVIE, IMA_SRC_SEQUENCE, IMA_SRC_TILED) || - ima->filepath[0] == '\0') { - return; - } - - /* If this is a tiled image, and we're asked to resolve the tokens in the virtual - * filepath, use the first tile to generate a concrete path for use during processing. */ - bool result = false; - if (ima->source == IMA_SRC_TILED && (flag & BKE_BPATH_FOREACH_PATH_RESOLVE_TOKEN) != 0) { - char temp_path[FILE_MAX], orig_file[FILE_MAXFILE]; - BLI_strncpy(temp_path, ima->filepath, sizeof(temp_path)); - BLI_split_file_part(temp_path, orig_file, sizeof(orig_file)); - - eUDIM_TILE_FORMAT tile_format; - char *udim_pattern = BKE_image_get_tile_strformat(temp_path, &tile_format); - BKE_image_set_filepath_from_tile_number( - temp_path, udim_pattern, tile_format, ((ImageTile *)ima->tiles.first)->tile_number); - MEM_SAFE_FREE(udim_pattern); - - result = BKE_bpath_foreach_path_fixed_process(bpath_data, temp_path); - if (result) { - /* Put the filepath back together using the new directory and the original file name. */ - char new_dir[FILE_MAXDIR]; - BLI_split_dir_part(temp_path, new_dir, sizeof(new_dir)); - BLI_join_dirfile(ima->filepath, sizeof(ima->filepath), new_dir, orig_file); - } - } - else { - result = BKE_bpath_foreach_path_fixed_process(bpath_data, ima->filepath); - } - - if (result) { - if (flag & BKE_BPATH_FOREACH_PATH_RELOAD_EDITED) { - if (!BKE_image_has_packedfile(ima) && - /* Image may have been painted onto (and not saved, T44543). */ - !BKE_image_is_dirty(ima)) { - BKE_image_signal(bpath_data->bmain, ima, NULL, IMA_SIGNAL_RELOAD); - } - } - } -} - -static void image_blend_write(BlendWriter *writer, ID *id, const void *id_address) -{ - Image *ima = (Image *)id; - const bool is_undo = BLO_write_is_undo(writer); - - /* Clear all data that isn't read to reduce false detection of changed image during memfile undo. - */ - ima->lastused = 0; - ima->cache = NULL; - ima->gpuflag = 0; - BLI_listbase_clear(&ima->anims); - ima->runtime.partial_update_register = NULL; - ima->runtime.partial_update_user = NULL; - for (int i = 0; i < 3; i++) { - for (int j = 0; j < 2; j++) { - for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { - ima->gputexture[i][j][resolution] = NULL; - } - } - } - - ImagePackedFile *imapf; - - BLI_assert(ima->packedfile == NULL); - if (!is_undo) { - /* Do not store packed files in case this is a library override ID. */ - if (ID_IS_OVERRIDE_LIBRARY(ima)) { - BLI_listbase_clear(&ima->packedfiles); - } - else { - /* Some trickery to keep forward compatibility of packed images. */ - if (ima->packedfiles.first != NULL) { - imapf = ima->packedfiles.first; - ima->packedfile = imapf->packedfile; - } - } - } - - /* write LibData */ - BLO_write_id_struct(writer, Image, id_address, &ima->id); - BKE_id_blend_write(writer, &ima->id); - - for (imapf = ima->packedfiles.first; imapf; imapf = imapf->next) { - BLO_write_struct(writer, ImagePackedFile, imapf); - BKE_packedfile_blend_write(writer, imapf->packedfile); - } - - BKE_previewimg_blend_write(writer, ima->preview); - - LISTBASE_FOREACH (ImageView *, iv, &ima->views) { - BLO_write_struct(writer, ImageView, iv); - } - BLO_write_struct(writer, Stereo3dFormat, ima->stereo3d_format); - - BLO_write_struct_list(writer, ImageTile, &ima->tiles); - - ima->packedfile = NULL; - - BLO_write_struct_list(writer, RenderSlot, &ima->renderslots); -} - -static void image_blend_read_data(BlendDataReader *reader, ID *id) -{ - Image *ima = (Image *)id; - BLO_read_list(reader, &ima->tiles); - - BLO_read_list(reader, &(ima->renderslots)); - if (!BLO_read_data_is_undo(reader)) { - /* We reset this last render slot index only when actually reading a file, not for undo. */ - ima->last_render_slot = ima->render_slot; - } - - BLO_read_list(reader, &(ima->views)); - BLO_read_list(reader, &(ima->packedfiles)); - - if (ima->packedfiles.first) { - LISTBASE_FOREACH (ImagePackedFile *, imapf, &ima->packedfiles) { - BKE_packedfile_blend_read(reader, &imapf->packedfile); - } - ima->packedfile = NULL; - } - else { - BKE_packedfile_blend_read(reader, &ima->packedfile); - } - - BLI_listbase_clear(&ima->anims); - BLO_read_data_address(reader, &ima->preview); - BKE_previewimg_blend_read(reader, ima->preview); - BLO_read_data_address(reader, &ima->stereo3d_format); - - ima->lastused = 0; - ima->gpuflag = 0; - - image_runtime_reset(ima); -} - -static void image_blend_read_lib(BlendLibReader *UNUSED(reader), ID *id) -{ - Image *ima = (Image *)id; - /* Images have some kind of 'main' cache, when NULL we should also clear all others. */ - /* Needs to be done *after* cache pointers are restored (call to - * `foreach_cache`/`blo_cache_storage_entry_restore_in_new`), easier for now to do it in - * lib_link... */ - if (ima->cache == NULL) { - BKE_image_free_buffers(ima); - } -} - -IDTypeInfo IDType_ID_IM = { - .id_code = ID_IM, - .id_filter = FILTER_ID_IM, - .main_listbase_index = INDEX_ID_IM, - .struct_size = sizeof(Image), - .name = "Image", - .name_plural = "images", - .translation_context = BLT_I18NCONTEXT_ID_IMAGE, - .flags = IDTYPE_FLAGS_NO_ANIMDATA | IDTYPE_FLAGS_APPEND_IS_REUSABLE, - .asset_type_info = NULL, - - .init_data = image_init_data, - .copy_data = image_copy_data, - .free_data = image_free_data, - .make_local = NULL, - .foreach_id = NULL, - .foreach_cache = image_foreach_cache, - .foreach_path = image_foreach_path, - .owner_get = NULL, - - .blend_write = image_blend_write, - .blend_read_data = image_blend_read_data, - .blend_read_lib = image_blend_read_lib, - .blend_read_expand = NULL, - - .blend_read_undo_preserve = NULL, - - .lib_override_apply_post = NULL, -}; - -/* prototypes */ -static int image_num_files(struct Image *ima); -static ImBuf *image_acquire_ibuf(Image *ima, ImageUser *iuser, void **r_lock); -static void image_update_views_format(Image *ima, ImageUser *iuser); -static void image_add_view(Image *ima, const char *viewname, const char *filepath); - -/* max int, to indicate we don't store sequences in ibuf */ -#define IMA_NO_INDEX 0x7FEFEFEF - -/* quick lookup: supports 1 million entries, thousand passes */ -#define IMA_MAKE_INDEX(entry, index) (((entry) << 10) + (index)) -#define IMA_INDEX_ENTRY(index) ((index) >> 10) -#if 0 -# define IMA_INDEX_PASS(index) (index & ~1023) -#endif - -/* ******** IMAGE CACHE ************* */ - -typedef struct ImageCacheKey { - int index; -} ImageCacheKey; - -static unsigned int imagecache_hashhash(const void *key_v) -{ - const ImageCacheKey *key = key_v; - return key->index; -} - -static bool imagecache_hashcmp(const void *a_v, const void *b_v) -{ - const ImageCacheKey *a = a_v; - const ImageCacheKey *b = b_v; - - return (a->index != b->index); -} - -static void imagecache_keydata(void *userkey, int *framenr, int *proxy, int *render_flags) -{ - ImageCacheKey *key = userkey; - - *framenr = IMA_INDEX_ENTRY(key->index); - *proxy = IMB_PROXY_NONE; - *render_flags = 0; -} - -static void imagecache_put(Image *image, int index, ImBuf *ibuf) -{ - ImageCacheKey key; - - if (image->cache == NULL) { - // char cache_name[64]; - // SNPRINTF(cache_name, "Image Datablock %s", image->id.name); - - image->cache = IMB_moviecache_create( - "Image Datablock Cache", sizeof(ImageCacheKey), imagecache_hashhash, imagecache_hashcmp); - IMB_moviecache_set_getdata_callback(image->cache, imagecache_keydata); - } - - key.index = index; - - IMB_moviecache_put(image->cache, &key, ibuf); -} - -static void imagecache_remove(Image *image, int index) -{ - if (image->cache == NULL) { - return; - } - - ImageCacheKey key; - key.index = index; - IMB_moviecache_remove(image->cache, &key); -} - -static struct ImBuf *imagecache_get(Image *image, int index, bool *r_is_cached_empty) -{ - if (image->cache) { - ImageCacheKey key; - key.index = index; - return IMB_moviecache_get(image->cache, &key, r_is_cached_empty); - } - - return NULL; -} - -/* ***************** ALLOC & FREE, DATA MANAGING *************** */ - -static void image_free_cached_frames(Image *image) -{ - if (image->cache) { - IMB_moviecache_free(image->cache); - image->cache = NULL; - } -} - -static void image_free_packedfiles(Image *ima) -{ - while (ima->packedfiles.last) { - ImagePackedFile *imapf = ima->packedfiles.last; - if (imapf->packedfile) { - BKE_packedfile_free(imapf->packedfile); - } - BLI_remlink(&ima->packedfiles, imapf); - MEM_freeN(imapf); - } -} - -void BKE_image_free_packedfiles(Image *ima) -{ - image_free_packedfiles(ima); -} - -void BKE_image_free_views(Image *image) -{ - BLI_freelistN(&image->views); -} - -static void image_free_anims(Image *ima) -{ - while (ima->anims.last) { - ImageAnim *ia = ima->anims.last; - if (ia->anim) { - IMB_free_anim(ia->anim); - ia->anim = NULL; - } - BLI_remlink(&ima->anims, ia); - MEM_freeN(ia); - } -} - -void BKE_image_free_buffers_ex(Image *ima, bool do_lock) -{ - if (do_lock) { - BLI_mutex_lock(ima->runtime.cache_mutex); - } - image_free_cached_frames(ima); - - image_free_anims(ima); - - if (ima->rr) { - RE_FreeRenderResult(ima->rr); - ima->rr = NULL; - } - - BKE_image_free_gputextures(ima); - - if (do_lock) { - BLI_mutex_unlock(ima->runtime.cache_mutex); - } -} - -void BKE_image_free_buffers(Image *ima) -{ - BKE_image_free_buffers_ex(ima, false); -} - -void BKE_image_free_data(Image *ima) -{ - image_free_data(&ima->id); -} - -/* only image block itself */ -static void image_init(Image *ima, short source, short type) -{ - BLI_assert(MEMCMP_STRUCT_AFTER_IS_ZERO(ima, id)); - - MEMCPY_STRUCT_AFTER(ima, DNA_struct_default_get(Image), id); - - ima->source = source; - ima->type = type; - - if (source == IMA_SRC_VIEWER) { - ima->flag |= IMA_VIEW_AS_RENDER; - } - - ImageTile *tile = MEM_callocN(sizeof(ImageTile), "Image Tiles"); - tile->tile_number = 1001; - BLI_addtail(&ima->tiles, tile); - - if (type == IMA_TYPE_R_RESULT) { - for (int i = 0; i < 8; i++) { - BKE_image_add_renderslot(ima, NULL); - } - } - - image_runtime_reset(ima); - - BKE_color_managed_colorspace_settings_init(&ima->colorspace_settings); - ima->stereo3d_format = MEM_callocN(sizeof(Stereo3dFormat), "Image Stereo Format"); -} - -static Image *image_alloc(Main *bmain, const char *name, short source, short type) -{ - Image *ima; - - ima = BKE_libblock_alloc(bmain, ID_IM, name, 0); - if (ima) { - image_init(ima, source, type); - } - - return ima; -} - -/* Get the ibuf from an image cache by its index and entry. - * Local use here only. - * - * Returns referenced image buffer if it exists, callee is to - * call IMB_freeImBuf to de-reference the image buffer after - * it's done handling it. - */ -static ImBuf *image_get_cached_ibuf_for_index_entry(Image *ima, - int index, - int entry, - bool *r_is_cached_empty) -{ - if (index != IMA_NO_INDEX) { - index = IMA_MAKE_INDEX(entry, index); - } - - return imagecache_get(ima, index, r_is_cached_empty); -} - -static void image_assign_ibuf(Image *ima, ImBuf *ibuf, int index, int entry) -{ - if (index != IMA_NO_INDEX) { - index = IMA_MAKE_INDEX(entry, index); - } - - imagecache_put(ima, index, ibuf); -} - -static void image_remove_ibuf(Image *ima, int index, int entry) -{ - if (index != IMA_NO_INDEX) { - index = IMA_MAKE_INDEX(entry, index); - } - imagecache_remove(ima, index); -} - -static void copy_image_packedfiles(ListBase *lb_dst, const ListBase *lb_src) -{ - const ImagePackedFile *imapf_src; - - BLI_listbase_clear(lb_dst); - for (imapf_src = lb_src->first; imapf_src; imapf_src = imapf_src->next) { - ImagePackedFile *imapf_dst = MEM_mallocN(sizeof(ImagePackedFile), "Image Packed Files (copy)"); - STRNCPY(imapf_dst->filepath, imapf_src->filepath); - - if (imapf_src->packedfile) { - imapf_dst->packedfile = BKE_packedfile_duplicate(imapf_src->packedfile); - } - - BLI_addtail(lb_dst, imapf_dst); - } -} - -void BKE_image_merge(Main *bmain, Image *dest, Image *source) -{ - /* sanity check */ - if (dest && source && dest != source) { - BLI_mutex_lock(source->runtime.cache_mutex); - BLI_mutex_lock(dest->runtime.cache_mutex); - - if (source->cache != NULL) { - struct MovieCacheIter *iter; - iter = IMB_moviecacheIter_new(source->cache); - while (!IMB_moviecacheIter_done(iter)) { - ImBuf *ibuf = IMB_moviecacheIter_getImBuf(iter); - ImageCacheKey *key = IMB_moviecacheIter_getUserKey(iter); - imagecache_put(dest, key->index, ibuf); - IMB_moviecacheIter_step(iter); - } - IMB_moviecacheIter_free(iter); - } - - BLI_mutex_unlock(dest->runtime.cache_mutex); - BLI_mutex_unlock(source->runtime.cache_mutex); - - BKE_id_free(bmain, source); - } -} - -bool BKE_image_scale(Image *image, int width, int height) -{ - /* NOTE: We could be clever and scale all imbuf's - * but since some are mipmaps its not so simple. */ - - ImBuf *ibuf; - void *lock; - - ibuf = BKE_image_acquire_ibuf(image, NULL, &lock); - - if (ibuf) { - IMB_scaleImBuf(ibuf, width, height); - BKE_image_mark_dirty(image, ibuf); - } - - BKE_image_release_ibuf(image, ibuf, lock); - - return (ibuf != NULL); -} - -bool BKE_image_has_opengl_texture(Image *ima) -{ - for (int eye = 0; eye < 2; eye++) { - for (int i = 0; i < TEXTARGET_COUNT; i++) { - for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { - if (ima->gputexture[i][eye][resolution] != NULL) { - return true; - } - } - } - } - return false; -} - -static int image_get_tile_number_from_iuser(Image *ima, const ImageUser *iuser) -{ - BLI_assert(ima != NULL && ima->tiles.first); - ImageTile *tile = ima->tiles.first; - return (iuser && iuser->tile) ? iuser->tile : tile->tile_number; -} - -ImageTile *BKE_image_get_tile(Image *ima, int tile_number) -{ - if (ima == NULL) { - return NULL; - } - - /* Tiles 0 and 1001 are a special case and refer to the first tile, typically - * coming from non-UDIM-aware code. */ - if (ELEM(tile_number, 0, 1001)) { - return ima->tiles.first; - } - - /* Must have a tiled image and a valid tile number at this point. */ - if (ima->source != IMA_SRC_TILED || tile_number < 1001 || tile_number > IMA_UDIM_MAX) { - return NULL; - } - - LISTBASE_FOREACH (ImageTile *, tile, &ima->tiles) { - if (tile->tile_number == tile_number) { - return tile; - } - } - - return NULL; -} - -ImageTile *BKE_image_get_tile_from_iuser(Image *ima, const ImageUser *iuser) -{ - return BKE_image_get_tile(ima, image_get_tile_number_from_iuser(ima, iuser)); -} - -int BKE_image_get_tile_from_pos(struct Image *ima, - const float uv[2], - float r_uv[2], - float r_ofs[2]) -{ - float local_ofs[2]; - if (r_ofs == NULL) { - r_ofs = local_ofs; - } - - copy_v2_v2(r_uv, uv); - zero_v2(r_ofs); - - if ((ima->source != IMA_SRC_TILED) || uv[0] < 0.0f || uv[1] < 0.0f || uv[0] >= 10.0f) { - return 0; - } - - int ix = (int)uv[0]; - int iy = (int)uv[1]; - int tile_number = 1001 + 10 * iy + ix; - - if (BKE_image_get_tile(ima, tile_number) == NULL) { - return 0; - } - r_ofs[0] = ix; - r_ofs[1] = iy; - sub_v2_v2(r_uv, r_ofs); - - return tile_number; -} - -int BKE_image_find_nearest_tile(const Image *image, const float co[2]) -{ - const float co_floor[2] = {floorf(co[0]), floorf(co[1])}; - /* Distance to the closest UDIM tile. */ - float dist_best_sq = FLT_MAX; - int tile_number_best = -1; - - LISTBASE_FOREACH (const ImageTile *, tile, &image->tiles) { - const int tile_index = tile->tile_number - 1001; - /* Coordinates of the current tile. */ - const float tile_index_co[2] = {tile_index % 10, tile_index / 10}; - - if (equals_v2v2(co_floor, tile_index_co)) { - return tile->tile_number; - } - - /* Distance between co[2] and UDIM tile. */ - const float dist_sq = len_squared_v2v2(tile_index_co, co); - - if (dist_sq < dist_best_sq) { - dist_best_sq = dist_sq; - tile_number_best = tile->tile_number; - } - } - - return tile_number_best; -} - -static void image_init_color_management(Image *ima) -{ - ImBuf *ibuf; - char name[FILE_MAX]; - - BKE_image_user_file_path(NULL, ima, name); - - /* will set input color space to image format default's */ - ibuf = IMB_loadiffname(name, IB_test | IB_alphamode_detect, ima->colorspace_settings.name); - - if (ibuf) { - if (ibuf->flags & IB_alphamode_premul) { - ima->alpha_mode = IMA_ALPHA_PREMUL; - } - else if (ibuf->flags & IB_alphamode_channel_packed) { - ima->alpha_mode = IMA_ALPHA_CHANNEL_PACKED; - } - else if (ibuf->flags & IB_alphamode_ignore) { - ima->alpha_mode = IMA_ALPHA_IGNORE; - } - else { - ima->alpha_mode = IMA_ALPHA_STRAIGHT; - } - - IMB_freeImBuf(ibuf); - } -} - -char BKE_image_alpha_mode_from_extension_ex(const char *filepath) -{ - if (BLI_path_extension_check_n(filepath, ".exr", ".cin", ".dpx", ".hdr", NULL)) { - return IMA_ALPHA_PREMUL; - } - - return IMA_ALPHA_STRAIGHT; -} - -void BKE_image_alpha_mode_from_extension(Image *image) -{ - image->alpha_mode = BKE_image_alpha_mode_from_extension_ex(image->filepath); -} - -Image *BKE_image_load(Main *bmain, const char *filepath) -{ - Image *ima; - int file; - char str[FILE_MAX]; - - STRNCPY(str, filepath); - BLI_path_abs(str, BKE_main_blendfile_path(bmain)); - - /* exists? */ - file = BLI_open(str, O_BINARY | O_RDONLY, 0); - if (file == -1) { - if (!BKE_image_tile_filepath_exists(str)) { - return NULL; - } - } - else { - close(file); - } - - ima = image_alloc(bmain, BLI_path_basename(filepath), IMA_SRC_FILE, IMA_TYPE_IMAGE); - STRNCPY(ima->filepath, filepath); - - if (BLI_path_extension_check_array(filepath, imb_ext_movie)) { - ima->source = IMA_SRC_MOVIE; - } - - image_init_color_management(ima); - - return ima; -} - -Image *BKE_image_load_exists_ex(Main *bmain, const char *filepath, bool *r_exists) -{ - Image *ima; - char str[FILE_MAX], strtest[FILE_MAX]; - - STRNCPY(str, filepath); - BLI_path_abs(str, bmain->filepath); - - /* first search an identical filepath */ - for (ima = bmain->images.first; ima; ima = ima->id.next) { - if (!ELEM(ima->source, IMA_SRC_VIEWER, IMA_SRC_GENERATED)) { - STRNCPY(strtest, ima->filepath); - BLI_path_abs(strtest, ID_BLEND_PATH(bmain, &ima->id)); - - if (BLI_path_cmp(strtest, str) == 0) { - if ((BKE_image_has_anim(ima) == false) || (ima->id.us == 0)) { - id_us_plus(&ima->id); /* officially should not, it doesn't link here! */ - if (r_exists) { - *r_exists = true; - } - return ima; - } - } - } - } - - if (r_exists) { - *r_exists = false; - } - return BKE_image_load(bmain, filepath); -} - -Image *BKE_image_load_exists(Main *bmain, const char *filepath) -{ - return BKE_image_load_exists_ex(bmain, filepath, NULL); -} - -typedef struct ImageFillData { - short gen_type; - uint width; - uint height; - unsigned char *rect; - float *rect_float; - float fill_color[4]; -} ImageFillData; - -static void image_buf_fill_isolated(void *usersata_v) -{ - ImageFillData *usersata = usersata_v; - - const short gen_type = usersata->gen_type; - const uint width = usersata->width; - const uint height = usersata->height; - - unsigned char *rect = usersata->rect; - float *rect_float = usersata->rect_float; - - switch (gen_type) { - case IMA_GENTYPE_GRID: - BKE_image_buf_fill_checker(rect, rect_float, width, height); - break; - case IMA_GENTYPE_GRID_COLOR: - BKE_image_buf_fill_checker_color(rect, rect_float, width, height); - break; - default: - BKE_image_buf_fill_color(rect, rect_float, width, height, usersata->fill_color); - break; - } -} - -static ImBuf *add_ibuf_size(unsigned int width, - unsigned int height, - const char *name, - int depth, - int floatbuf, - short gen_type, - const float color[4], - ColorManagedColorspaceSettings *colorspace_settings) -{ - ImBuf *ibuf; - unsigned char *rect = NULL; - float *rect_float = NULL; - float fill_color[4]; - - if (floatbuf) { - ibuf = IMB_allocImBuf(width, height, depth, IB_rectfloat); - - if (colorspace_settings->name[0] == '\0') { - const char *colorspace = IMB_colormanagement_role_colorspace_name_get( - COLOR_ROLE_DEFAULT_FLOAT); - - STRNCPY(colorspace_settings->name, colorspace); - } - - if (ibuf != NULL) { - rect_float = ibuf->rect_float; - IMB_colormanagement_check_is_data(ibuf, colorspace_settings->name); - } - - if (IMB_colormanagement_space_name_is_data(colorspace_settings->name)) { - copy_v4_v4(fill_color, color); - } - else { - /* The input color here should ideally be linear already, but for now - * we just convert and postpone breaking the API for later. */ - srgb_to_linearrgb_v4(fill_color, color); - } - } - else { - ibuf = IMB_allocImBuf(width, height, depth, IB_rect); - - if (colorspace_settings->name[0] == '\0') { - const char *colorspace = IMB_colormanagement_role_colorspace_name_get( - COLOR_ROLE_DEFAULT_BYTE); - - STRNCPY(colorspace_settings->name, colorspace); - } - - if (ibuf != NULL) { - rect = (unsigned char *)ibuf->rect; - IMB_colormanagement_assign_rect_colorspace(ibuf, colorspace_settings->name); - } - - copy_v4_v4(fill_color, color); - } - - if (!ibuf) { - return NULL; - } - - STRNCPY(ibuf->name, name); - - ImageFillData data; - - data.gen_type = gen_type; - data.width = width; - data.height = height; - data.rect = rect; - data.rect_float = rect_float; - copy_v4_v4(data.fill_color, fill_color); - - BLI_task_isolate(image_buf_fill_isolated, &data); - - return ibuf; -} - -Image *BKE_image_add_generated(Main *bmain, - unsigned int width, - unsigned int height, - const char *name, - int depth, - int floatbuf, - short gen_type, - const float color[4], - const bool stereo3d, - const bool is_data, - const bool tiled) -{ - /* on save, type is changed to FILE in editsima.c */ - Image *ima; - if (tiled) { - ima = image_alloc(bmain, name, IMA_SRC_TILED, IMA_TYPE_IMAGE); - } - else { - ima = image_alloc(bmain, name, IMA_SRC_GENERATED, IMA_TYPE_UV_TEST); - } - if (ima == NULL) { - return NULL; - } - - int view_id; - const char *names[2] = {STEREO_LEFT_NAME, STEREO_RIGHT_NAME}; - - // STRNCPY(ima->filepath, name); /* don't do this, this writes in ain invalid filepath! */ - ima->gen_x = width; - ima->gen_y = height; - ima->gen_type = gen_type; - ima->gen_flag |= (floatbuf ? IMA_GEN_FLOAT : 0); - ima->gen_depth = depth; - copy_v4_v4(ima->gen_color, color); - - if (is_data) { - STRNCPY(ima->colorspace_settings.name, - IMB_colormanagement_role_colorspace_name_get(COLOR_ROLE_DATA)); - } - - for (view_id = 0; view_id < 2; view_id++) { - ImBuf *ibuf; - ibuf = add_ibuf_size( - width, height, ima->filepath, depth, floatbuf, gen_type, color, &ima->colorspace_settings); - int index = tiled ? 0 : IMA_NO_INDEX; - int entry = tiled ? 1001 : 0; - image_assign_ibuf(ima, ibuf, stereo3d ? view_id : index, entry); - - /* image_assign_ibuf puts buffer to the cache, which increments user counter. */ - IMB_freeImBuf(ibuf); - if (!stereo3d) { - break; - } - - image_add_view(ima, names[view_id], ""); - } - - return ima; -} - -Image *BKE_image_add_from_imbuf(Main *bmain, ImBuf *ibuf, const char *name) -{ - /* on save, type is changed to FILE in editsima.c */ - Image *ima; - - if (name == NULL) { - name = BLI_path_basename(ibuf->name); - } - - ima = image_alloc(bmain, name, IMA_SRC_FILE, IMA_TYPE_IMAGE); - - if (ima) { - STRNCPY(ima->filepath, ibuf->name); - image_assign_ibuf(ima, ibuf, IMA_NO_INDEX, 0); - } - - return ima; -} - -/* Pack image buffer to memory as PNG or EXR. */ -static bool image_memorypack_imbuf(Image *ima, ImBuf *ibuf, const char *filepath) -{ - ibuf->ftype = (ibuf->rect_float) ? IMB_FTYPE_OPENEXR : IMB_FTYPE_PNG; - - IMB_saveiff(ibuf, filepath, IB_rect | IB_mem); - - if (ibuf->encodedbuffer == NULL) { - CLOG_STR_ERROR(&LOG, "memory save for pack error"); - IMB_freeImBuf(ibuf); - image_free_packedfiles(ima); - return false; - } - - ImagePackedFile *imapf; - PackedFile *pf = MEM_callocN(sizeof(*pf), "PackedFile"); - - pf->data = ibuf->encodedbuffer; - pf->size = ibuf->encodedsize; - - imapf = MEM_mallocN(sizeof(ImagePackedFile), "Image PackedFile"); - STRNCPY(imapf->filepath, filepath); - imapf->packedfile = pf; - BLI_addtail(&ima->packedfiles, imapf); - - ibuf->encodedbuffer = NULL; - ibuf->encodedsize = 0; - ibuf->userflags &= ~IB_BITMAPDIRTY; - - return true; -} - -bool BKE_image_memorypack(Image *ima) -{ - bool ok = true; - - image_free_packedfiles(ima); - - if (BKE_image_is_multiview(ima)) { - /* Store each view as a separate packed files with R_IMF_VIEWS_INDIVIDUAL. */ - ImageView *iv; - int i; - - for (i = 0, iv = ima->views.first; iv; iv = iv->next, i++) { - ImBuf *ibuf = image_get_cached_ibuf_for_index_entry(ima, i, 0, NULL); - - if (!ibuf) { - ok = false; - break; - } - - /* if the image was a R_IMF_VIEWS_STEREO_3D we force _L, _R suffices */ - if (ima->views_format == R_IMF_VIEWS_STEREO_3D) { - const char *suffix[2] = {STEREO_LEFT_SUFFIX, STEREO_RIGHT_SUFFIX}; - BLI_path_suffix(iv->filepath, FILE_MAX, suffix[i], ""); - } - - ok = ok && image_memorypack_imbuf(ima, ibuf, iv->filepath); - IMB_freeImBuf(ibuf); - } - - ima->views_format = R_IMF_VIEWS_INDIVIDUAL; - } - else { - ImBuf *ibuf = image_get_cached_ibuf_for_index_entry(ima, IMA_NO_INDEX, 0, NULL); - - if (ibuf) { - ok = ok && image_memorypack_imbuf(ima, ibuf, ibuf->name); - IMB_freeImBuf(ibuf); - } - else { - ok = false; - } - } - - if (ok && ima->source == IMA_SRC_GENERATED) { - ima->source = IMA_SRC_FILE; - ima->type = IMA_TYPE_IMAGE; - } - - return ok; -} - -void BKE_image_packfiles(ReportList *reports, Image *ima, const char *basepath) -{ - const int totfiles = image_num_files(ima); - - if (totfiles == 1) { - ImagePackedFile *imapf = MEM_mallocN(sizeof(ImagePackedFile), "Image packed file"); - BLI_addtail(&ima->packedfiles, imapf); - imapf->packedfile = BKE_packedfile_new(reports, ima->filepath, basepath); - if (imapf->packedfile) { - STRNCPY(imapf->filepath, ima->filepath); - } - else { - BLI_freelinkN(&ima->packedfiles, imapf); - } - } - else { - ImageView *iv; - for (iv = ima->views.first; iv; iv = iv->next) { - ImagePackedFile *imapf = MEM_mallocN(sizeof(ImagePackedFile), "Image packed file"); - BLI_addtail(&ima->packedfiles, imapf); - - imapf->packedfile = BKE_packedfile_new(reports, iv->filepath, basepath); - if (imapf->packedfile) { - STRNCPY(imapf->filepath, iv->filepath); - } - else { - BLI_freelinkN(&ima->packedfiles, imapf); - } - } - } -} - -void BKE_image_packfiles_from_mem(ReportList *reports, - Image *ima, - char *data, - const size_t data_len) -{ - const int totfiles = image_num_files(ima); - - if (totfiles != 1) { - BKE_report(reports, RPT_ERROR, "Cannot pack multiview images from raw data currently..."); - } - else { - ImagePackedFile *imapf = MEM_mallocN(sizeof(ImagePackedFile), __func__); - BLI_addtail(&ima->packedfiles, imapf); - imapf->packedfile = BKE_packedfile_new_from_memory(data, data_len); - STRNCPY(imapf->filepath, ima->filepath); - } -} - -void BKE_image_tag_time(Image *ima) -{ - ima->lastused = PIL_check_seconds_timer_i(); -} - -static uintptr_t image_mem_size(Image *image) -{ - uintptr_t size = 0; - - /* viewers have memory depending on other rules, has no valid rect pointer */ - if (image->source == IMA_SRC_VIEWER) { - return 0; - } - - BLI_mutex_lock(image->runtime.cache_mutex); - - if (image->cache != NULL) { - struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); - - while (!IMB_moviecacheIter_done(iter)) { - ImBuf *ibuf = IMB_moviecacheIter_getImBuf(iter); - IMB_moviecacheIter_step(iter); - if (ibuf == NULL) { - continue; - } - ImBuf *ibufm; - int level; - - if (ibuf->rect) { - size += MEM_allocN_len(ibuf->rect); - } - if (ibuf->rect_float) { - size += MEM_allocN_len(ibuf->rect_float); - } - - for (level = 0; level < IMB_MIPMAP_LEVELS; level++) { - ibufm = ibuf->mipmap[level]; - if (ibufm) { - if (ibufm->rect) { - size += MEM_allocN_len(ibufm->rect); - } - if (ibufm->rect_float) { - size += MEM_allocN_len(ibufm->rect_float); - } - } - } - } - IMB_moviecacheIter_free(iter); - } - - BLI_mutex_unlock(image->runtime.cache_mutex); - - return size; -} - -void BKE_image_print_memlist(Main *bmain) -{ - Image *ima; - uintptr_t size, totsize = 0; - - for (ima = bmain->images.first; ima; ima = ima->id.next) { - totsize += image_mem_size(ima); - } - - printf("\ntotal image memory len: %.3f MB\n", (double)totsize / (double)(1024 * 1024)); - - for (ima = bmain->images.first; ima; ima = ima->id.next) { - size = image_mem_size(ima); - - if (size) { - printf("%s len: %.3f MB\n", ima->id.name + 2, (double)size / (double)(1024 * 1024)); - } - } -} - -static bool imagecache_check_dirty(ImBuf *ibuf, void *UNUSED(userkey), void *UNUSED(userdata)) -{ - if (ibuf == NULL) { - return false; - } - return (ibuf->userflags & IB_BITMAPDIRTY) == 0; -} - -void BKE_image_free_all_textures(Main *bmain) -{ -#undef CHECK_FREED_SIZE - - Tex *tex; - Image *ima; -#ifdef CHECK_FREED_SIZE - uintptr_t tot_freed_size = 0; -#endif - - for (ima = bmain->images.first; ima; ima = ima->id.next) { - ima->id.tag &= ~LIB_TAG_DOIT; - } - - for (tex = bmain->textures.first; tex; tex = tex->id.next) { - if (tex->ima) { - tex->ima->id.tag |= LIB_TAG_DOIT; - } - } - - for (ima = bmain->images.first; ima; ima = ima->id.next) { - if (ima->cache && (ima->id.tag & LIB_TAG_DOIT)) { -#ifdef CHECK_FREED_SIZE - uintptr_t old_size = image_mem_size(ima); -#endif - - IMB_moviecache_cleanup(ima->cache, imagecache_check_dirty, NULL); - -#ifdef CHECK_FREED_SIZE - tot_freed_size += old_size - image_mem_size(ima); -#endif - } - } -#ifdef CHECK_FREED_SIZE - printf("%s: freed total %lu MB\n", __func__, tot_freed_size / (1024 * 1024)); -#endif -} - -static bool imagecache_check_free_anim(ImBuf *ibuf, void *UNUSED(userkey), void *userdata) -{ - if (ibuf == NULL) { - return true; - } - int except_frame = *(int *)userdata; - return (ibuf->userflags & IB_BITMAPDIRTY) == 0 && (ibuf->index != IMA_NO_INDEX) && - (except_frame != IMA_INDEX_ENTRY(ibuf->index)); -} - -void BKE_image_free_anim_ibufs(Image *ima, int except_frame) -{ - BLI_mutex_lock(ima->runtime.cache_mutex); - if (ima->cache != NULL) { - IMB_moviecache_cleanup(ima->cache, imagecache_check_free_anim, &except_frame); - } - BLI_mutex_unlock(ima->runtime.cache_mutex); -} - -void BKE_image_all_free_anim_ibufs(Main *bmain, int cfra) -{ - Image *ima; - - for (ima = bmain->images.first; ima; ima = ima->id.next) { - if (BKE_image_is_animated(ima)) { - BKE_image_free_anim_ibufs(ima, cfra); - } - } -} - -/* *********** READ AND WRITE ************** */ - -int BKE_image_imtype_to_ftype(const char imtype, ImbFormatOptions *r_options) -{ - memset(r_options, 0, sizeof(*r_options)); - - if (imtype == R_IMF_IMTYPE_TARGA) { - return IMB_FTYPE_TGA; - } - if (imtype == R_IMF_IMTYPE_RAWTGA) { - r_options->flag = RAWTGA; - return IMB_FTYPE_TGA; - } - if (imtype == R_IMF_IMTYPE_IRIS) { - return IMB_FTYPE_IMAGIC; - } -#ifdef WITH_HDR - if (imtype == R_IMF_IMTYPE_RADHDR) { - return IMB_FTYPE_RADHDR; - } -#endif - if (imtype == R_IMF_IMTYPE_PNG) { - r_options->quality = 15; - return IMB_FTYPE_PNG; - } -#ifdef WITH_DDS - if (imtype == R_IMF_IMTYPE_DDS) { - return IMB_FTYPE_DDS; - } -#endif - if (imtype == R_IMF_IMTYPE_BMP) { - return IMB_FTYPE_BMP; - } -#ifdef WITH_TIFF - if (imtype == R_IMF_IMTYPE_TIFF) { - return IMB_FTYPE_TIF; - } -#endif - if (ELEM(imtype, R_IMF_IMTYPE_OPENEXR, R_IMF_IMTYPE_MULTILAYER)) { - return IMB_FTYPE_OPENEXR; - } -#ifdef WITH_CINEON - if (imtype == R_IMF_IMTYPE_CINEON) { - return IMB_FTYPE_CINEON; - } - if (imtype == R_IMF_IMTYPE_DPX) { - return IMB_FTYPE_DPX; - } -#endif -#ifdef WITH_OPENJPEG - if (imtype == R_IMF_IMTYPE_JP2) { - r_options->flag |= JP2_JP2; - r_options->quality = 90; - return IMB_FTYPE_JP2; - } -#endif - - r_options->quality = 90; - return IMB_FTYPE_JPG; -} - -char BKE_image_ftype_to_imtype(const int ftype, const ImbFormatOptions *options) -{ - if (ftype == IMB_FTYPE_NONE) { - return R_IMF_IMTYPE_TARGA; - } - if (ftype == IMB_FTYPE_IMAGIC) { - return R_IMF_IMTYPE_IRIS; - } -#ifdef WITH_HDR - if (ftype == IMB_FTYPE_RADHDR) { - return R_IMF_IMTYPE_RADHDR; - } -#endif - if (ftype == IMB_FTYPE_PNG) { - return R_IMF_IMTYPE_PNG; - } -#ifdef WITH_DDS - if (ftype == IMB_FTYPE_DDS) { - return R_IMF_IMTYPE_DDS; - } -#endif - if (ftype == IMB_FTYPE_BMP) { - return R_IMF_IMTYPE_BMP; - } -#ifdef WITH_TIFF - if (ftype == IMB_FTYPE_TIF) { - return R_IMF_IMTYPE_TIFF; - } -#endif - if (ftype == IMB_FTYPE_OPENEXR) { - return R_IMF_IMTYPE_OPENEXR; - } -#ifdef WITH_CINEON - if (ftype == IMB_FTYPE_CINEON) { - return R_IMF_IMTYPE_CINEON; - } - if (ftype == IMB_FTYPE_DPX) { - return R_IMF_IMTYPE_DPX; - } -#endif - if (ftype == IMB_FTYPE_TGA) { - if (options && (options->flag & RAWTGA)) { - return R_IMF_IMTYPE_RAWTGA; - } - - return R_IMF_IMTYPE_TARGA; - } -#ifdef WITH_OPENJPEG - if (ftype == IMB_FTYPE_JP2) { - return R_IMF_IMTYPE_JP2; - } -#endif - - return R_IMF_IMTYPE_JPEG90; -} - -bool BKE_imtype_is_movie(const char imtype) -{ - switch (imtype) { - case R_IMF_IMTYPE_AVIRAW: - case R_IMF_IMTYPE_AVIJPEG: - case R_IMF_IMTYPE_FFMPEG: - case R_IMF_IMTYPE_H264: - case R_IMF_IMTYPE_THEORA: - case R_IMF_IMTYPE_XVID: - return true; - } - return false; -} - -bool BKE_imtype_supports_zbuf(const char imtype) -{ - switch (imtype) { - case R_IMF_IMTYPE_IRIZ: - case R_IMF_IMTYPE_OPENEXR: /* but not R_IMF_IMTYPE_MULTILAYER */ - return true; - } - return false; -} - -bool BKE_imtype_supports_compress(const char imtype) -{ - switch (imtype) { - case R_IMF_IMTYPE_PNG: - return true; - } - return false; -} - -bool BKE_imtype_supports_quality(const char imtype) -{ - switch (imtype) { - case R_IMF_IMTYPE_JPEG90: - case R_IMF_IMTYPE_JP2: - case R_IMF_IMTYPE_AVIJPEG: - return true; - } - return false; -} - -bool BKE_imtype_requires_linear_float(const char imtype) -{ - switch (imtype) { - case R_IMF_IMTYPE_CINEON: - case R_IMF_IMTYPE_DPX: - case R_IMF_IMTYPE_RADHDR: - case R_IMF_IMTYPE_OPENEXR: - case R_IMF_IMTYPE_MULTILAYER: - return true; - } - return false; -} - -char BKE_imtype_valid_channels(const char imtype, bool write_file) -{ - char chan_flag = IMA_CHAN_FLAG_RGB; /* Assume all support RGB. */ - - /* Alpha. */ - switch (imtype) { - case R_IMF_IMTYPE_BMP: - if (write_file) { - break; - } - ATTR_FALLTHROUGH; - case R_IMF_IMTYPE_TARGA: - case R_IMF_IMTYPE_RAWTGA: - case R_IMF_IMTYPE_IRIS: - case R_IMF_IMTYPE_PNG: - case R_IMF_IMTYPE_TIFF: - case R_IMF_IMTYPE_OPENEXR: - case R_IMF_IMTYPE_MULTILAYER: - case R_IMF_IMTYPE_DDS: - case R_IMF_IMTYPE_JP2: - case R_IMF_IMTYPE_DPX: - chan_flag |= IMA_CHAN_FLAG_ALPHA; - break; - } - - /* BW. */ - switch (imtype) { - case R_IMF_IMTYPE_BMP: - case R_IMF_IMTYPE_PNG: - case R_IMF_IMTYPE_JPEG90: - case R_IMF_IMTYPE_TARGA: - case R_IMF_IMTYPE_RAWTGA: - case R_IMF_IMTYPE_TIFF: - case R_IMF_IMTYPE_IRIS: - chan_flag |= IMA_CHAN_FLAG_BW; - break; - } - - return chan_flag; -} - -char BKE_imtype_valid_depths(const char imtype) -{ - switch (imtype) { - case R_IMF_IMTYPE_RADHDR: - return R_IMF_CHAN_DEPTH_32; - case R_IMF_IMTYPE_TIFF: - return R_IMF_CHAN_DEPTH_8 | R_IMF_CHAN_DEPTH_16; - case R_IMF_IMTYPE_OPENEXR: - return R_IMF_CHAN_DEPTH_16 | R_IMF_CHAN_DEPTH_32; - case R_IMF_IMTYPE_MULTILAYER: - return R_IMF_CHAN_DEPTH_16 | R_IMF_CHAN_DEPTH_32; - /* eeh, cineon does some strange 10bits per channel */ - case R_IMF_IMTYPE_DPX: - return R_IMF_CHAN_DEPTH_8 | R_IMF_CHAN_DEPTH_10 | R_IMF_CHAN_DEPTH_12 | R_IMF_CHAN_DEPTH_16; - case R_IMF_IMTYPE_CINEON: - return R_IMF_CHAN_DEPTH_10; - case R_IMF_IMTYPE_JP2: - return R_IMF_CHAN_DEPTH_8 | R_IMF_CHAN_DEPTH_12 | R_IMF_CHAN_DEPTH_16; - case R_IMF_IMTYPE_PNG: - return R_IMF_CHAN_DEPTH_8 | R_IMF_CHAN_DEPTH_16; - /* most formats are 8bit only */ - default: - return R_IMF_CHAN_DEPTH_8; - } -} - -char BKE_imtype_from_arg(const char *imtype_arg) -{ - if (STREQ(imtype_arg, "TGA")) { - return R_IMF_IMTYPE_TARGA; - } - if (STREQ(imtype_arg, "IRIS")) { - return R_IMF_IMTYPE_IRIS; - } -#ifdef WITH_DDS - if (STREQ(imtype_arg, "DDS")) { - return R_IMF_IMTYPE_DDS; - } -#endif - if (STREQ(imtype_arg, "JPEG")) { - return R_IMF_IMTYPE_JPEG90; - } - if (STREQ(imtype_arg, "IRIZ")) { - return R_IMF_IMTYPE_IRIZ; - } - if (STREQ(imtype_arg, "RAWTGA")) { - return R_IMF_IMTYPE_RAWTGA; - } - if (STREQ(imtype_arg, "AVIRAW")) { - return R_IMF_IMTYPE_AVIRAW; - } - if (STREQ(imtype_arg, "AVIJPEG")) { - return R_IMF_IMTYPE_AVIJPEG; - } - if (STREQ(imtype_arg, "PNG")) { - return R_IMF_IMTYPE_PNG; - } - if (STREQ(imtype_arg, "BMP")) { - return R_IMF_IMTYPE_BMP; - } -#ifdef WITH_HDR - if (STREQ(imtype_arg, "HDR")) { - return R_IMF_IMTYPE_RADHDR; - } -#endif -#ifdef WITH_TIFF - if (STREQ(imtype_arg, "TIFF")) { - return R_IMF_IMTYPE_TIFF; - } -#endif -#ifdef WITH_OPENEXR - if (STREQ(imtype_arg, "OPEN_EXR")) { - return R_IMF_IMTYPE_OPENEXR; - } - if (STREQ(imtype_arg, "OPEN_EXR_MULTILAYER")) { - return R_IMF_IMTYPE_MULTILAYER; - } - if (STREQ(imtype_arg, "EXR")) { - return R_IMF_IMTYPE_OPENEXR; - } - if (STREQ(imtype_arg, "MULTILAYER")) { - return R_IMF_IMTYPE_MULTILAYER; - } -#endif - if (STREQ(imtype_arg, "FFMPEG")) { - return R_IMF_IMTYPE_FFMPEG; - } -#ifdef WITH_CINEON - if (STREQ(imtype_arg, "CINEON")) { - return R_IMF_IMTYPE_CINEON; - } - if (STREQ(imtype_arg, "DPX")) { - return R_IMF_IMTYPE_DPX; - } -#endif -#ifdef WITH_OPENJPEG - if (STREQ(imtype_arg, "JP2")) { - return R_IMF_IMTYPE_JP2; - } -#endif - - return R_IMF_IMTYPE_INVALID; -} - -static bool do_add_image_extension(char *string, - const char imtype, - const ImageFormatData *im_format) -{ - const char *extension = NULL; - const char *extension_test; - (void)im_format; /* may be unused, depends on build options */ - - if (imtype == R_IMF_IMTYPE_IRIS) { - if (!BLI_path_extension_check(string, extension_test = ".rgb")) { - extension = extension_test; - } - } - else if (imtype == R_IMF_IMTYPE_IRIZ) { - if (!BLI_path_extension_check(string, extension_test = ".rgb")) { - extension = extension_test; - } - } -#ifdef WITH_HDR - else if (imtype == R_IMF_IMTYPE_RADHDR) { - if (!BLI_path_extension_check(string, extension_test = ".hdr")) { - extension = extension_test; - } - } -#endif - else if (ELEM(imtype, - R_IMF_IMTYPE_PNG, - R_IMF_IMTYPE_FFMPEG, - R_IMF_IMTYPE_H264, - R_IMF_IMTYPE_THEORA, - R_IMF_IMTYPE_XVID)) { - if (!BLI_path_extension_check(string, extension_test = ".png")) { - extension = extension_test; - } - } -#ifdef WITH_DDS - else if (imtype == R_IMF_IMTYPE_DDS) { - if (!BLI_path_extension_check(string, extension_test = ".dds")) { - extension = extension_test; - } - } -#endif - else if (ELEM(imtype, R_IMF_IMTYPE_TARGA, R_IMF_IMTYPE_RAWTGA)) { - if (!BLI_path_extension_check(string, extension_test = ".tga")) { - extension = extension_test; - } - } - else if (imtype == R_IMF_IMTYPE_BMP) { - if (!BLI_path_extension_check(string, extension_test = ".bmp")) { - extension = extension_test; - } - } -#ifdef WITH_TIFF - else if (imtype == R_IMF_IMTYPE_TIFF) { - if (!BLI_path_extension_check_n(string, extension_test = ".tif", ".tiff", NULL)) { - extension = extension_test; - } - } -#endif -#ifdef WITH_OPENIMAGEIO - else if (imtype == R_IMF_IMTYPE_PSD) { - if (!BLI_path_extension_check(string, extension_test = ".psd")) { - extension = extension_test; - } - } -#endif -#ifdef WITH_OPENEXR - else if (ELEM(imtype, R_IMF_IMTYPE_OPENEXR, R_IMF_IMTYPE_MULTILAYER)) { - if (!BLI_path_extension_check(string, extension_test = ".exr")) { - extension = extension_test; - } - } -#endif -#ifdef WITH_CINEON - else if (imtype == R_IMF_IMTYPE_CINEON) { - if (!BLI_path_extension_check(string, extension_test = ".cin")) { - extension = extension_test; - } - } - else if (imtype == R_IMF_IMTYPE_DPX) { - if (!BLI_path_extension_check(string, extension_test = ".dpx")) { - extension = extension_test; - } - } -#endif -#ifdef WITH_OPENJPEG - else if (imtype == R_IMF_IMTYPE_JP2) { - if (im_format) { - if (im_format->jp2_codec == R_IMF_JP2_CODEC_JP2) { - if (!BLI_path_extension_check(string, extension_test = ".jp2")) { - extension = extension_test; - } - } - else if (im_format->jp2_codec == R_IMF_JP2_CODEC_J2K) { - if (!BLI_path_extension_check(string, extension_test = ".j2c")) { - extension = extension_test; - } - } - else { - BLI_assert_msg(0, "Unsupported jp2 codec was specified in im_format->jp2_codec"); - } - } - else { - if (!BLI_path_extension_check(string, extension_test = ".jp2")) { - extension = extension_test; - } - } - } -#endif - else { // R_IMF_IMTYPE_AVIRAW, R_IMF_IMTYPE_AVIJPEG, R_IMF_IMTYPE_JPEG90 etc - if (!(BLI_path_extension_check_n(string, extension_test = ".jpg", ".jpeg", NULL))) { - extension = extension_test; - } - } - - if (extension) { - /* prefer this in many cases to avoid .png.tga, but in certain cases it breaks */ - /* remove any other known image extension */ - if (BLI_path_extension_check_array(string, imb_ext_image)) { - return BLI_path_extension_replace(string, FILE_MAX, extension); - } - - return BLI_path_extension_ensure(string, FILE_MAX, extension); - } - - return false; -} - -int BKE_image_path_ensure_ext_from_imformat(char *string, const ImageFormatData *im_format) -{ - return do_add_image_extension(string, im_format->imtype, im_format); -} - -int BKE_image_path_ensure_ext_from_imtype(char *string, const char imtype) -{ - return do_add_image_extension(string, imtype, NULL); -} - -void BKE_imformat_defaults(ImageFormatData *im_format) -{ - memset(im_format, 0, sizeof(*im_format)); - im_format->planes = R_IMF_PLANES_RGBA; - im_format->imtype = R_IMF_IMTYPE_PNG; - im_format->depth = R_IMF_CHAN_DEPTH_8; - im_format->quality = 90; - im_format->compress = 15; - - BKE_color_managed_display_settings_init(&im_format->display_settings); - BKE_color_managed_view_settings_init_default(&im_format->view_settings, - &im_format->display_settings); -} - -void BKE_imbuf_to_image_format(struct ImageFormatData *im_format, const ImBuf *imbuf) -{ - int ftype = imbuf->ftype; - int custom_flags = imbuf->foptions.flag; - char quality = imbuf->foptions.quality; - - BKE_imformat_defaults(im_format); - - /* file type */ - - if (ftype == IMB_FTYPE_IMAGIC) { - im_format->imtype = R_IMF_IMTYPE_IRIS; - } -#ifdef WITH_HDR - else if (ftype == IMB_FTYPE_RADHDR) { - im_format->imtype = R_IMF_IMTYPE_RADHDR; - } -#endif - else if (ftype == IMB_FTYPE_PNG) { - im_format->imtype = R_IMF_IMTYPE_PNG; - - if (custom_flags & PNG_16BIT) { - im_format->depth = R_IMF_CHAN_DEPTH_16; - } - - im_format->compress = quality; - } - -#ifdef WITH_DDS - else if (ftype == IMB_FTYPE_DDS) { - im_format->imtype = R_IMF_IMTYPE_DDS; - } -#endif - else if (ftype == IMB_FTYPE_BMP) { - im_format->imtype = R_IMF_IMTYPE_BMP; - } -#ifdef WITH_TIFF - else if (ftype == IMB_FTYPE_TIF) { - im_format->imtype = R_IMF_IMTYPE_TIFF; - if (custom_flags & TIF_16BIT) { - im_format->depth = R_IMF_CHAN_DEPTH_16; - } - if (custom_flags & TIF_COMPRESS_NONE) { - im_format->tiff_codec = R_IMF_TIFF_CODEC_NONE; - } - if (custom_flags & TIF_COMPRESS_DEFLATE) { - im_format->tiff_codec = R_IMF_TIFF_CODEC_DEFLATE; - } - if (custom_flags & TIF_COMPRESS_LZW) { - im_format->tiff_codec = R_IMF_TIFF_CODEC_LZW; - } - if (custom_flags & TIF_COMPRESS_PACKBITS) { - im_format->tiff_codec = R_IMF_TIFF_CODEC_PACKBITS; - } - } -#endif - -#ifdef WITH_OPENEXR - else if (ftype == IMB_FTYPE_OPENEXR) { - im_format->imtype = R_IMF_IMTYPE_OPENEXR; - if (custom_flags & OPENEXR_HALF) { - im_format->depth = R_IMF_CHAN_DEPTH_16; - } - if (custom_flags & OPENEXR_COMPRESS) { - im_format->exr_codec = R_IMF_EXR_CODEC_ZIP; /* Can't determine compression */ - } - if (imbuf->zbuf_float) { - im_format->flag |= R_IMF_FLAG_ZBUF; - } - } -#endif - -#ifdef WITH_CINEON - else if (ftype == IMB_FTYPE_CINEON) { - im_format->imtype = R_IMF_IMTYPE_CINEON; - } - else if (ftype == IMB_FTYPE_DPX) { - im_format->imtype = R_IMF_IMTYPE_DPX; - } -#endif - else if (ftype == IMB_FTYPE_TGA) { - if (custom_flags & RAWTGA) { - im_format->imtype = R_IMF_IMTYPE_RAWTGA; - } - else { - im_format->imtype = R_IMF_IMTYPE_TARGA; - } - } -#ifdef WITH_OPENJPEG - else if (ftype == IMB_FTYPE_JP2) { - im_format->imtype = R_IMF_IMTYPE_JP2; - im_format->quality = quality; - - if (custom_flags & JP2_16BIT) { - im_format->depth = R_IMF_CHAN_DEPTH_16; - } - else if (custom_flags & JP2_12BIT) { - im_format->depth = R_IMF_CHAN_DEPTH_12; - } - - if (custom_flags & JP2_YCC) { - im_format->jp2_flag |= R_IMF_JP2_FLAG_YCC; - } - - if (custom_flags & JP2_CINE) { - im_format->jp2_flag |= R_IMF_JP2_FLAG_CINE_PRESET; - if (custom_flags & JP2_CINE_48FPS) { - im_format->jp2_flag |= R_IMF_JP2_FLAG_CINE_48; - } - } - - if (custom_flags & JP2_JP2) { - im_format->jp2_codec = R_IMF_JP2_CODEC_JP2; - } - else if (custom_flags & JP2_J2K) { - im_format->jp2_codec = R_IMF_JP2_CODEC_J2K; - } - else { - BLI_assert_msg(0, "Unsupported jp2 codec was specified in file type"); - } - } -#endif - - else { - im_format->imtype = R_IMF_IMTYPE_JPEG90; - im_format->quality = quality; - } - - /* planes */ - im_format->planes = imbuf->planes; -} - -#define STAMP_NAME_SIZE ((MAX_ID_NAME - 2) + 16) -/* could allow access externally - 512 is for long names, - * STAMP_NAME_SIZE is for id names, allowing them some room for description */ -typedef struct StampDataCustomField { - struct StampDataCustomField *next, *prev; - /* TODO(sergey): Think of better size here, maybe dynamically allocated even. */ - char key[512]; - char *value; - /* TODO(sergey): Support non-string values. */ -} StampDataCustomField; - -typedef struct StampData { - char file[512]; - char note[512]; - char date[512]; - char marker[512]; - char time[512]; - char frame[512]; - char frame_range[512]; - char camera[STAMP_NAME_SIZE]; - char cameralens[STAMP_NAME_SIZE]; - char scene[STAMP_NAME_SIZE]; - char strip[STAMP_NAME_SIZE]; - char rendertime[STAMP_NAME_SIZE]; - char memory[STAMP_NAME_SIZE]; - char hostname[512]; - - /* Custom fields are used to put extra meta information header from render - * engine to the result image. - * - * NOTE: This fields are not stamped onto the image. At least for now. - */ - ListBase custom_fields; -} StampData; -#undef STAMP_NAME_SIZE - -/** - * \param do_prefix: Include a label like "File ", "Date ", etc. in the stamp data strings. - * \param use_dynamic: Also include data that can change on a per-frame basis. - */ -static void stampdata( - const Scene *scene, Object *camera, StampData *stamp_data, int do_prefix, bool use_dynamic) -{ - char text[256]; - struct tm *tl; - time_t t; - - if (scene->r.stamp & R_STAMP_FILENAME) { - const char *blendfile_path = BKE_main_blendfile_path_from_global(); - SNPRINTF(stamp_data->file, - do_prefix ? "File %s" : "%s", - (blendfile_path[0] != '\0') ? blendfile_path : ""); - } - else { - stamp_data->file[0] = '\0'; - } - - if (scene->r.stamp & R_STAMP_NOTE) { - /* Never do prefix for Note */ - SNPRINTF(stamp_data->note, "%s", scene->r.stamp_udata); - } - else { - stamp_data->note[0] = '\0'; - } - - if (scene->r.stamp & R_STAMP_DATE) { - t = time(NULL); - tl = localtime(&t); - SNPRINTF(text, - "%04d/%02d/%02d %02d:%02d:%02d", - tl->tm_year + 1900, - tl->tm_mon + 1, - tl->tm_mday, - tl->tm_hour, - tl->tm_min, - tl->tm_sec); - SNPRINTF(stamp_data->date, do_prefix ? "Date %s" : "%s", text); - } - else { - stamp_data->date[0] = '\0'; - } - - if (use_dynamic && scene->r.stamp & R_STAMP_MARKER) { - const char *name = BKE_scene_find_last_marker_name(scene, CFRA); - - if (name) { - STRNCPY(text, name); - } - else { - STRNCPY(text, ""); - } - - SNPRINTF(stamp_data->marker, do_prefix ? "Marker %s" : "%s", text); - } - else { - stamp_data->marker[0] = '\0'; - } - - if (use_dynamic && scene->r.stamp & R_STAMP_TIME) { - const short timecode_style = USER_TIMECODE_SMPTE_FULL; - BLI_timecode_string_from_time( - text, sizeof(text), 0, FRA2TIME(scene->r.cfra), FPS, timecode_style); - SNPRINTF(stamp_data->time, do_prefix ? "Timecode %s" : "%s", text); - } - else { - stamp_data->time[0] = '\0'; - } - - if (use_dynamic && scene->r.stamp & R_STAMP_FRAME) { - char fmtstr[32]; - int digits = 1; - - if (scene->r.efra > 9) { - digits = integer_digits_i(scene->r.efra); - } - - SNPRINTF(fmtstr, do_prefix ? "Frame %%0%di" : "%%0%di", digits); - SNPRINTF(stamp_data->frame, fmtstr, scene->r.cfra); - } - else { - stamp_data->frame[0] = '\0'; - } - - if (scene->r.stamp & R_STAMP_FRAME_RANGE) { - SNPRINTF(stamp_data->frame_range, - do_prefix ? "Frame Range %d:%d" : "%d:%d", - scene->r.sfra, - scene->r.efra); - } - else { - stamp_data->frame_range[0] = '\0'; - } - - if (use_dynamic && scene->r.stamp & R_STAMP_CAMERA) { - SNPRINTF(stamp_data->camera, - do_prefix ? "Camera %s" : "%s", - camera ? camera->id.name + 2 : ""); - } - else { - stamp_data->camera[0] = '\0'; - } - - if (use_dynamic && scene->r.stamp & R_STAMP_CAMERALENS) { - if (camera && camera->type == OB_CAMERA) { - SNPRINTF(text, "%.2f", ((Camera *)camera->data)->lens); - } - else { - STRNCPY(text, ""); - } - - SNPRINTF(stamp_data->cameralens, do_prefix ? "Lens %s" : "%s", text); - } - else { - stamp_data->cameralens[0] = '\0'; - } - - if (scene->r.stamp & R_STAMP_SCENE) { - SNPRINTF(stamp_data->scene, do_prefix ? "Scene %s" : "%s", scene->id.name + 2); - } - else { - stamp_data->scene[0] = '\0'; - } - - if (use_dynamic && scene->r.stamp & R_STAMP_SEQSTRIP) { - const Sequence *seq = SEQ_get_topmost_sequence(scene, scene->r.cfra); - - if (seq) { - STRNCPY(text, seq->name + 2); - } - else { - STRNCPY(text, ""); - } - - SNPRINTF(stamp_data->strip, do_prefix ? "Strip %s" : "%s", text); - } - else { - stamp_data->strip[0] = '\0'; - } - - { - Render *re = RE_GetSceneRender(scene); - RenderStats *stats = re ? RE_GetStats(re) : NULL; - - if (use_dynamic && stats && (scene->r.stamp & R_STAMP_RENDERTIME)) { - BLI_timecode_string_from_time_simple(text, sizeof(text), stats->lastframetime); - - SNPRINTF(stamp_data->rendertime, do_prefix ? "RenderTime %s" : "%s", text); - } - else { - stamp_data->rendertime[0] = '\0'; - } - - if (use_dynamic && stats && (scene->r.stamp & R_STAMP_MEMORY)) { - SNPRINTF(stamp_data->memory, do_prefix ? "Peak Memory %.2fM" : "%.2fM", stats->mem_peak); - } - else { - stamp_data->memory[0] = '\0'; - } - } - if (scene->r.stamp & R_STAMP_FRAME_RANGE) { - SNPRINTF(stamp_data->frame_range, - do_prefix ? "Frame Range %d:%d" : "%d:%d", - scene->r.sfra, - scene->r.efra); - } - else { - stamp_data->frame_range[0] = '\0'; - } - - if (scene->r.stamp & R_STAMP_HOSTNAME) { - char hostname[500]; /* sizeof(stamp_data->hostname) minus some bytes for a label. */ - BLI_hostname_get(hostname, sizeof(hostname)); - SNPRINTF(stamp_data->hostname, do_prefix ? "Hostname %s" : "%s", hostname); - } - else { - stamp_data->hostname[0] = '\0'; - } -} - -static void stampdata_from_template(StampData *stamp_data, - const Scene *scene, - const StampData *stamp_data_template, - bool do_prefix) -{ - if (scene->r.stamp & R_STAMP_FILENAME) { - SNPRINTF(stamp_data->file, do_prefix ? "File %s" : "%s", stamp_data_template->file); - } - else { - stamp_data->file[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_NOTE) { - SNPRINTF(stamp_data->note, "%s", stamp_data_template->note); - } - else { - stamp_data->note[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_DATE) { - SNPRINTF(stamp_data->date, do_prefix ? "Date %s" : "%s", stamp_data_template->date); - } - else { - stamp_data->date[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_MARKER) { - SNPRINTF(stamp_data->marker, do_prefix ? "Marker %s" : "%s", stamp_data_template->marker); - } - else { - stamp_data->marker[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_TIME) { - SNPRINTF(stamp_data->time, do_prefix ? "Timecode %s" : "%s", stamp_data_template->time); - } - else { - stamp_data->time[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_FRAME) { - SNPRINTF(stamp_data->frame, do_prefix ? "Frame %s" : "%s", stamp_data_template->frame); - } - else { - stamp_data->frame[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_CAMERA) { - SNPRINTF(stamp_data->camera, do_prefix ? "Camera %s" : "%s", stamp_data_template->camera); - } - else { - stamp_data->camera[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_CAMERALENS) { - SNPRINTF( - stamp_data->cameralens, do_prefix ? "Lens %s" : "%s", stamp_data_template->cameralens); - } - else { - stamp_data->cameralens[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_SCENE) { - SNPRINTF(stamp_data->scene, do_prefix ? "Scene %s" : "%s", stamp_data_template->scene); - } - else { - stamp_data->scene[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_SEQSTRIP) { - SNPRINTF(stamp_data->strip, do_prefix ? "Strip %s" : "%s", stamp_data_template->strip); - } - else { - stamp_data->strip[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_RENDERTIME) { - SNPRINTF(stamp_data->rendertime, - do_prefix ? "RenderTime %s" : "%s", - stamp_data_template->rendertime); - } - else { - stamp_data->rendertime[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_MEMORY) { - SNPRINTF(stamp_data->memory, do_prefix ? "Peak Memory %s" : "%s", stamp_data_template->memory); - } - else { - stamp_data->memory[0] = '\0'; - } - if (scene->r.stamp & R_STAMP_HOSTNAME) { - SNPRINTF( - stamp_data->hostname, do_prefix ? "Hostname %s" : "%s", stamp_data_template->hostname); - } - else { - stamp_data->hostname[0] = '\0'; - } -} - -void BKE_image_stamp_buf(Scene *scene, - Object *camera, - const StampData *stamp_data_template, - unsigned char *rect, - float *rectf, - int width, - int height, - int channels) -{ - struct StampData stamp_data; - float w, h, pad; - int x, y, y_ofs; - float h_fixed; - const int mono = blf_mono_font_render; /* XXX */ - struct ColorManagedDisplay *display; - const char *display_device; - - /* vars for calculating wordwrap */ - struct { - struct ResultBLF info; - rctf rect; - } wrap; - - /* this could be an argument if we want to operate on non linear float imbuf's - * for now though this is only used for renders which use scene settings */ - -#define TEXT_SIZE_CHECK(str, w, h) \ - ((str[0]) && ((void)(h = h_fixed), (w = BLF_width(mono, str, sizeof(str))))) - - /* must enable BLF_WORD_WRAP before using */ -#define TEXT_SIZE_CHECK_WORD_WRAP(str, w, h) \ - ((str[0]) && (BLF_boundbox_ex(mono, str, sizeof(str), &wrap.rect, &wrap.info), \ - (void)(h = h_fixed * wrap.info.lines), \ - (w = BLI_rctf_size_x(&wrap.rect)))) - -#define BUFF_MARGIN_X 2 -#define BUFF_MARGIN_Y 1 - - if (!rect && !rectf) { - return; - } - - display_device = scene->display_settings.display_device; - display = IMB_colormanagement_display_get_named(display_device); - - bool do_prefix = (scene->r.stamp & R_STAMP_HIDE_LABELS) == 0; - if (stamp_data_template == NULL) { - stampdata(scene, camera, &stamp_data, do_prefix, true); - } - else { - stampdata_from_template(&stamp_data, scene, stamp_data_template, do_prefix); - } - - /* TODO: do_versions. */ - if (scene->r.stamp_font_id < 8) { - scene->r.stamp_font_id = 12; - } - - /* set before return */ - BLF_size(mono, scene->r.stamp_font_id, 72); - BLF_wordwrap(mono, width - (BUFF_MARGIN_X * 2)); - - BLF_buffer(mono, rectf, rect, width, height, channels, display); - BLF_buffer_col(mono, scene->r.fg_stamp); - pad = BLF_width_max(mono); - - /* use 'h_fixed' rather than 'h', aligns better */ - h_fixed = BLF_height_max(mono); - y_ofs = -BLF_descender(mono); - - x = 0; - y = height; - - if (TEXT_SIZE_CHECK(stamp_data.file, w, h)) { - /* Top left corner */ - y -= h; - - /* also a little of space to the background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - x - BUFF_MARGIN_X, - y - BUFF_MARGIN_Y, - w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - - /* and draw the text. */ - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.file, sizeof(stamp_data.file)); - - /* the extra pixel for background. */ - y -= BUFF_MARGIN_Y * 2; - } - - /* Top left corner, below File */ - if (TEXT_SIZE_CHECK(stamp_data.date, w, h)) { - y -= h; - - /* and space for background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - 0, - y - BUFF_MARGIN_Y, - w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.date, sizeof(stamp_data.date)); - - /* the extra pixel for background. */ - y -= BUFF_MARGIN_Y * 2; - } - - /* Top left corner, below File, Date */ - if (TEXT_SIZE_CHECK(stamp_data.rendertime, w, h)) { - y -= h; - - /* and space for background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - 0, - y - BUFF_MARGIN_Y, - w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.rendertime, sizeof(stamp_data.rendertime)); - - /* the extra pixel for background. */ - y -= BUFF_MARGIN_Y * 2; - } - - /* Top left corner, below File, Date, Rendertime */ - if (TEXT_SIZE_CHECK(stamp_data.memory, w, h)) { - y -= h; - - /* and space for background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - 0, - y - BUFF_MARGIN_Y, - w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.memory, sizeof(stamp_data.memory)); - - /* the extra pixel for background. */ - y -= BUFF_MARGIN_Y * 2; - } - - /* Top left corner, below File, Date, Rendertime, Memory */ - if (TEXT_SIZE_CHECK(stamp_data.hostname, w, h)) { - y -= h; - - /* and space for background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - 0, - y - BUFF_MARGIN_Y, - w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.hostname, sizeof(stamp_data.hostname)); - - /* the extra pixel for background. */ - y -= BUFF_MARGIN_Y * 2; - } - - /* Top left corner, below File, Date, Memory, Rendertime, Hostname */ - BLF_enable(mono, BLF_WORD_WRAP); - if (TEXT_SIZE_CHECK_WORD_WRAP(stamp_data.note, w, h)) { - y -= h; - - /* and space for background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - 0, - y - BUFF_MARGIN_Y, - w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - - BLF_position(mono, x, y + y_ofs + (h - h_fixed), 0.0); - BLF_draw_buffer(mono, stamp_data.note, sizeof(stamp_data.note)); - } - BLF_disable(mono, BLF_WORD_WRAP); - - x = 0; - y = 0; - - /* Bottom left corner, leaving space for timing */ - if (TEXT_SIZE_CHECK(stamp_data.marker, w, h)) { - - /* extra space for background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - x - BUFF_MARGIN_X, - y - BUFF_MARGIN_Y, - w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - - /* and pad the text. */ - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.marker, sizeof(stamp_data.marker)); - - /* space width. */ - x += w + pad; - } - - /* Left bottom corner */ - if (TEXT_SIZE_CHECK(stamp_data.time, w, h)) { - - /* extra space for background */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - x - BUFF_MARGIN_X, - y, - x + w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - - /* and pad the text. */ - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.time, sizeof(stamp_data.time)); - - /* space width. */ - x += w + pad; - } - - if (TEXT_SIZE_CHECK(stamp_data.frame, w, h)) { - - /* extra space for background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - x - BUFF_MARGIN_X, - y - BUFF_MARGIN_Y, - x + w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - - /* and pad the text. */ - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.frame, sizeof(stamp_data.frame)); - - /* space width. */ - x += w + pad; - } - - if (TEXT_SIZE_CHECK(stamp_data.camera, w, h)) { - - /* extra space for background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - x - BUFF_MARGIN_X, - y - BUFF_MARGIN_Y, - x + w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.camera, sizeof(stamp_data.camera)); - - /* space width. */ - x += w + pad; - } - - if (TEXT_SIZE_CHECK(stamp_data.cameralens, w, h)) { - - /* extra space for background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - x - BUFF_MARGIN_X, - y - BUFF_MARGIN_Y, - x + w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.cameralens, sizeof(stamp_data.cameralens)); - } - - if (TEXT_SIZE_CHECK(stamp_data.scene, w, h)) { - - /* Bottom right corner, with an extra space because blenfont is too strict! */ - x = width - w - 2; - - /* extra space for background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - x - BUFF_MARGIN_X, - y - BUFF_MARGIN_Y, - x + w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - - /* and pad the text. */ - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.scene, sizeof(stamp_data.scene)); - } - - if (TEXT_SIZE_CHECK(stamp_data.strip, w, h)) { - - /* Top right corner, with an extra space because blenfont is too strict! */ - x = width - w - pad; - y = height - h; - - /* extra space for background. */ - buf_rectfill_area(rect, - rectf, - width, - height, - scene->r.bg_stamp, - display, - x - BUFF_MARGIN_X, - y - BUFF_MARGIN_Y, - x + w + BUFF_MARGIN_X, - y + h + BUFF_MARGIN_Y); - - BLF_position(mono, x, y + y_ofs, 0.0); - BLF_draw_buffer(mono, stamp_data.strip, sizeof(stamp_data.strip)); - } - - /* cleanup the buffer. */ - BLF_buffer(mono, NULL, NULL, 0, 0, 0, NULL); - BLF_wordwrap(mono, 0); - -#undef TEXT_SIZE_CHECK -#undef TEXT_SIZE_CHECK_WORD_WRAP -#undef BUFF_MARGIN_X -#undef BUFF_MARGIN_Y -} - -void BKE_render_result_stamp_info(Scene *scene, - Object *camera, - struct RenderResult *rr, - bool allocate_only) -{ - struct StampData *stamp_data; - - if (!(scene && (scene->r.stamp & R_STAMP_ALL)) && !allocate_only) { - return; - } - - if (!rr->stamp_data) { - stamp_data = MEM_callocN(sizeof(StampData), "RenderResult.stamp_data"); - } - else { - stamp_data = rr->stamp_data; - } - - if (!allocate_only) { - stampdata(scene, camera, stamp_data, 0, true); - } - - if (!rr->stamp_data) { - rr->stamp_data = stamp_data; - } -} - -struct StampData *BKE_stamp_info_from_scene_static(const Scene *scene) -{ - struct StampData *stamp_data; - - if (!(scene && (scene->r.stamp & R_STAMP_ALL))) { - return NULL; - } - - /* Memory is allocated here (instead of by the caller) so that the caller - * doesn't have to know the size of the StampData struct. */ - stamp_data = MEM_callocN(sizeof(StampData), __func__); - stampdata(scene, NULL, stamp_data, 0, false); - - return stamp_data; -} - -static const char *stamp_metadata_fields[] = { - "File", - "Note", - "Date", - "Marker", - "Time", - "Frame", - "FrameRange", - "Camera", - "Lens", - "Scene", - "Strip", - "RenderTime", - "Memory", - "Hostname", - NULL, -}; - -bool BKE_stamp_is_known_field(const char *field_name) -{ - int i = 0; - while (stamp_metadata_fields[i] != NULL) { - if (STREQ(field_name, stamp_metadata_fields[i])) { - return true; - } - i++; - } - return false; -} - -void BKE_stamp_info_callback(void *data, - struct StampData *stamp_data, - StampCallback callback, - bool noskip) -{ - if ((callback == NULL) || (stamp_data == NULL)) { - return; - } - -#define CALL(member, value_str) \ - if (noskip || stamp_data->member[0]) { \ - callback(data, value_str, stamp_data->member, sizeof(stamp_data->member)); \ - } \ - ((void)0) - - /* TODO(sergey): Use stamp_metadata_fields somehow, or make it more generic - * meta information to avoid duplication. */ - CALL(file, "File"); - CALL(note, "Note"); - CALL(date, "Date"); - CALL(marker, "Marker"); - CALL(time, "Time"); - CALL(frame, "Frame"); - CALL(frame_range, "FrameRange"); - CALL(camera, "Camera"); - CALL(cameralens, "Lens"); - CALL(scene, "Scene"); - CALL(strip, "Strip"); - CALL(rendertime, "RenderTime"); - CALL(memory, "Memory"); - CALL(hostname, "Hostname"); - - LISTBASE_FOREACH (StampDataCustomField *, custom_field, &stamp_data->custom_fields) { - if (noskip || custom_field->value[0]) { - callback(data, custom_field->key, custom_field->value, strlen(custom_field->value) + 1); - } - } - -#undef CALL -} - -void BKE_render_result_stamp_data(RenderResult *rr, const char *key, const char *value) -{ - StampData *stamp_data; - if (rr->stamp_data == NULL) { - rr->stamp_data = MEM_callocN(sizeof(StampData), "RenderResult.stamp_data"); - } - stamp_data = rr->stamp_data; - StampDataCustomField *field = MEM_mallocN(sizeof(StampDataCustomField), - "StampData Custom Field"); - STRNCPY(field->key, key); - field->value = BLI_strdup(value); - BLI_addtail(&stamp_data->custom_fields, field); -} - -StampData *BKE_stamp_data_copy(const StampData *stamp_data) -{ - if (stamp_data == NULL) { - return NULL; - } - - StampData *stamp_datan = MEM_dupallocN(stamp_data); - BLI_duplicatelist(&stamp_datan->custom_fields, &stamp_data->custom_fields); - - LISTBASE_FOREACH (StampDataCustomField *, custom_fieldn, &stamp_datan->custom_fields) { - custom_fieldn->value = MEM_dupallocN(custom_fieldn->value); - } - - return stamp_datan; -} - -void BKE_stamp_data_free(StampData *stamp_data) -{ - if (stamp_data == NULL) { - return; - } - LISTBASE_FOREACH (StampDataCustomField *, custom_field, &stamp_data->custom_fields) { - MEM_freeN(custom_field->value); - } - BLI_freelistN(&stamp_data->custom_fields); - MEM_freeN(stamp_data); -} - -/* wrap for callback only */ -static void metadata_set_field(void *data, const char *propname, char *propvalue, int UNUSED(len)) -{ - /* We know it is an ImBuf* because that's what we pass to BKE_stamp_info_callback. */ - struct ImBuf *imbuf = data; - IMB_metadata_set_field(imbuf->metadata, propname, propvalue); -} - -static void metadata_get_field(void *data, const char *propname, char *propvalue, int len) -{ - /* We know it is an ImBuf* because that's what we pass to BKE_stamp_info_callback. */ - struct ImBuf *imbuf = data; - IMB_metadata_get_field(imbuf->metadata, propname, propvalue, len); -} - -void BKE_imbuf_stamp_info(RenderResult *rr, struct ImBuf *ibuf) -{ - struct StampData *stamp_data = rr->stamp_data; - IMB_metadata_ensure(&ibuf->metadata); - BKE_stamp_info_callback(ibuf, stamp_data, metadata_set_field, false); -} - -static void metadata_copy_custom_fields(const char *field, const char *value, void *rr_v) -{ - if (BKE_stamp_is_known_field(field)) { - return; - } - RenderResult *rr = (RenderResult *)rr_v; - BKE_render_result_stamp_data(rr, field, value); -} - -void BKE_stamp_info_from_imbuf(RenderResult *rr, struct ImBuf *ibuf) -{ - if (rr->stamp_data == NULL) { - rr->stamp_data = MEM_callocN(sizeof(StampData), "RenderResult.stamp_data"); - } - struct StampData *stamp_data = rr->stamp_data; - IMB_metadata_ensure(&ibuf->metadata); - BKE_stamp_info_callback(ibuf, stamp_data, metadata_get_field, true); - /* Copy render engine specific settings. */ - IMB_metadata_foreach(ibuf, metadata_copy_custom_fields, rr); -} - -bool BKE_imbuf_alpha_test(ImBuf *ibuf) -{ - int tot; - if (ibuf->rect_float) { - const float *buf = ibuf->rect_float; - for (tot = ibuf->x * ibuf->y; tot--; buf += 4) { - if (buf[3] < 1.0f) { - return true; - } - } - } - else if (ibuf->rect) { - unsigned char *buf = (unsigned char *)ibuf->rect; - for (tot = ibuf->x * ibuf->y; tot--; buf += 4) { - if (buf[3] != 255) { - return true; - } - } - } - - return false; -} - -void BKE_imbuf_write_prepare(ImBuf *ibuf, const ImageFormatData *imf) -{ - char imtype = imf->imtype; - char compress = imf->compress; - char quality = imf->quality; - - /* initialize all from image format */ - ibuf->foptions.flag = 0; - - if (imtype == R_IMF_IMTYPE_IRIS) { - ibuf->ftype = IMB_FTYPE_IMAGIC; - } -#ifdef WITH_HDR - else if (imtype == R_IMF_IMTYPE_RADHDR) { - ibuf->ftype = IMB_FTYPE_RADHDR; - } -#endif - else if (ELEM(imtype, - R_IMF_IMTYPE_PNG, - R_IMF_IMTYPE_FFMPEG, - R_IMF_IMTYPE_H264, - R_IMF_IMTYPE_THEORA, - R_IMF_IMTYPE_XVID)) { - ibuf->ftype = IMB_FTYPE_PNG; - - if (imtype == R_IMF_IMTYPE_PNG) { - if (imf->depth == R_IMF_CHAN_DEPTH_16) { - ibuf->foptions.flag |= PNG_16BIT; - } - - ibuf->foptions.quality = compress; - } - } -#ifdef WITH_DDS - else if (imtype == R_IMF_IMTYPE_DDS) { - ibuf->ftype = IMB_FTYPE_DDS; - } -#endif - else if (imtype == R_IMF_IMTYPE_BMP) { - ibuf->ftype = IMB_FTYPE_BMP; - } -#ifdef WITH_TIFF - else if (imtype == R_IMF_IMTYPE_TIFF) { - ibuf->ftype = IMB_FTYPE_TIF; - - if (imf->depth == R_IMF_CHAN_DEPTH_16) { - ibuf->foptions.flag |= TIF_16BIT; - } - if (imf->tiff_codec == R_IMF_TIFF_CODEC_NONE) { - ibuf->foptions.flag |= TIF_COMPRESS_NONE; - } - else if (imf->tiff_codec == R_IMF_TIFF_CODEC_DEFLATE) { - ibuf->foptions.flag |= TIF_COMPRESS_DEFLATE; - } - else if (imf->tiff_codec == R_IMF_TIFF_CODEC_LZW) { - ibuf->foptions.flag |= TIF_COMPRESS_LZW; - } - else if (imf->tiff_codec == R_IMF_TIFF_CODEC_PACKBITS) { - ibuf->foptions.flag |= TIF_COMPRESS_PACKBITS; - } - } -#endif -#ifdef WITH_OPENEXR - else if (ELEM(imtype, R_IMF_IMTYPE_OPENEXR, R_IMF_IMTYPE_MULTILAYER)) { - ibuf->ftype = IMB_FTYPE_OPENEXR; - if (imf->depth == R_IMF_CHAN_DEPTH_16) { - ibuf->foptions.flag |= OPENEXR_HALF; - } - ibuf->foptions.flag |= (imf->exr_codec & OPENEXR_COMPRESS); - - if (!(imf->flag & R_IMF_FLAG_ZBUF)) { - /* Signal for exr saving. */ - IMB_freezbuffloatImBuf(ibuf); - } - } -#endif -#ifdef WITH_CINEON - else if (imtype == R_IMF_IMTYPE_CINEON) { - ibuf->ftype = IMB_FTYPE_CINEON; - if (imf->cineon_flag & R_IMF_CINEON_FLAG_LOG) { - ibuf->foptions.flag |= CINEON_LOG; - } - if (imf->depth == R_IMF_CHAN_DEPTH_16) { - ibuf->foptions.flag |= CINEON_16BIT; - } - else if (imf->depth == R_IMF_CHAN_DEPTH_12) { - ibuf->foptions.flag |= CINEON_12BIT; - } - else if (imf->depth == R_IMF_CHAN_DEPTH_10) { - ibuf->foptions.flag |= CINEON_10BIT; - } - } - else if (imtype == R_IMF_IMTYPE_DPX) { - ibuf->ftype = IMB_FTYPE_DPX; - if (imf->cineon_flag & R_IMF_CINEON_FLAG_LOG) { - ibuf->foptions.flag |= CINEON_LOG; - } - if (imf->depth == R_IMF_CHAN_DEPTH_16) { - ibuf->foptions.flag |= CINEON_16BIT; - } - else if (imf->depth == R_IMF_CHAN_DEPTH_12) { - ibuf->foptions.flag |= CINEON_12BIT; - } - else if (imf->depth == R_IMF_CHAN_DEPTH_10) { - ibuf->foptions.flag |= CINEON_10BIT; - } - } -#endif - else if (imtype == R_IMF_IMTYPE_TARGA) { - ibuf->ftype = IMB_FTYPE_TGA; - } - else if (imtype == R_IMF_IMTYPE_RAWTGA) { - ibuf->ftype = IMB_FTYPE_TGA; - ibuf->foptions.flag = RAWTGA; - } -#ifdef WITH_OPENJPEG - else if (imtype == R_IMF_IMTYPE_JP2) { - if (quality < 10) { - quality = 90; - } - ibuf->ftype = IMB_FTYPE_JP2; - ibuf->foptions.quality = quality; - - if (imf->depth == R_IMF_CHAN_DEPTH_16) { - ibuf->foptions.flag |= JP2_16BIT; - } - else if (imf->depth == R_IMF_CHAN_DEPTH_12) { - ibuf->foptions.flag |= JP2_12BIT; - } - - if (imf->jp2_flag & R_IMF_JP2_FLAG_YCC) { - ibuf->foptions.flag |= JP2_YCC; - } - - if (imf->jp2_flag & R_IMF_JP2_FLAG_CINE_PRESET) { - ibuf->foptions.flag |= JP2_CINE; - if (imf->jp2_flag & R_IMF_JP2_FLAG_CINE_48) { - ibuf->foptions.flag |= JP2_CINE_48FPS; - } - } - - if (imf->jp2_codec == R_IMF_JP2_CODEC_JP2) { - ibuf->foptions.flag |= JP2_JP2; - } - else if (imf->jp2_codec == R_IMF_JP2_CODEC_J2K) { - ibuf->foptions.flag |= JP2_J2K; - } - else { - BLI_assert_msg(0, "Unsupported jp2 codec was specified in im_format->jp2_codec"); - } - } -#endif - else { - /* R_IMF_IMTYPE_JPEG90, etc. default we save jpegs */ - if (quality < 10) { - quality = 90; - } - ibuf->ftype = IMB_FTYPE_JPG; - ibuf->foptions.quality = quality; - } -} - -int BKE_imbuf_write(ImBuf *ibuf, const char *name, const ImageFormatData *imf) -{ - BKE_imbuf_write_prepare(ibuf, imf); - - BLI_make_existing_file(name); - - const bool ok = IMB_saveiff(ibuf, name, IB_rect | IB_zbuf | IB_zbuffloat); - if (ok == 0) { - perror(name); - } - - return ok; -} - -int BKE_imbuf_write_as(ImBuf *ibuf, const char *name, ImageFormatData *imf, const bool save_copy) -{ - ImBuf ibuf_back = *ibuf; - int ok; - - /* All data is RGBA anyway, this just controls how to save for some formats. */ - ibuf->planes = imf->planes; - - ok = BKE_imbuf_write(ibuf, name, imf); - - if (save_copy) { - /* note that we are not restoring _all_ settings */ - ibuf->planes = ibuf_back.planes; - ibuf->ftype = ibuf_back.ftype; - ibuf->foptions = ibuf_back.foptions; - } - - return ok; -} - -int BKE_imbuf_write_stamp(Scene *scene, - struct RenderResult *rr, - ImBuf *ibuf, - const char *name, - const struct ImageFormatData *imf) -{ - if (scene && scene->r.stamp & R_STAMP_ALL) { - BKE_imbuf_stamp_info(rr, ibuf); - } - - return BKE_imbuf_write(ibuf, name, imf); -} - -static void do_makepicstring(char *string, - const char *base, - const char *relbase, - int frame, - const char imtype, - const ImageFormatData *im_format, - const bool use_ext, - const bool use_frames, - const char *suffix) -{ - if (string == NULL) { - return; - } - BLI_strncpy(string, base, FILE_MAX - 10); /* weak assumption */ - BLI_path_abs(string, relbase); - - if (use_frames) { - BLI_path_frame(string, frame, 4); - } - - if (suffix) { - BLI_path_suffix(string, FILE_MAX, suffix, ""); - } - - if (use_ext) { - do_add_image_extension(string, imtype, im_format); - } -} - -void BKE_image_path_from_imformat(char *string, - const char *base, - const char *relbase, - int frame, - const ImageFormatData *im_format, - const bool use_ext, - const bool use_frames, - const char *suffix) -{ - do_makepicstring( - string, base, relbase, frame, im_format->imtype, im_format, use_ext, use_frames, suffix); -} - -void BKE_image_path_from_imtype(char *string, - const char *base, - const char *relbase, - int frame, - const char imtype, - const bool use_ext, - const bool use_frames, - const char *suffix) -{ - do_makepicstring(string, base, relbase, frame, imtype, NULL, use_ext, use_frames, suffix); -} - -struct anim *openanim_noload(const char *name, - int flags, - int streamindex, - char colorspace[IMA_MAX_SPACE]) -{ - struct anim *anim; - - anim = IMB_open_anim(name, flags, streamindex, colorspace); - return anim; -} - -struct anim *openanim(const char *name, int flags, int streamindex, char colorspace[IMA_MAX_SPACE]) -{ - struct anim *anim; - struct ImBuf *ibuf; - - anim = IMB_open_anim(name, flags, streamindex, colorspace); - if (anim == NULL) { - return NULL; - } - - ibuf = IMB_anim_absolute(anim, 0, IMB_TC_NONE, IMB_PROXY_NONE); - if (ibuf == NULL) { - if (BLI_exists(name)) { - printf("not an anim: %s\n", name); - } - else { - printf("anim file doesn't exist: %s\n", name); - } - IMB_free_anim(anim); - return NULL; - } - IMB_freeImBuf(ibuf); - - return anim; -} - -/* ************************* New Image API *************** */ - -/* Notes about Image storage - * - packedfile - * -> written in .blend - * - filename - * -> written in .blend - * - movie - * -> comes from packedfile or filename - * - renderresult - * -> comes from packedfile or filename - * - listbase - * -> ibufs from exrhandle - * - flipbook array - * -> ibufs come from movie, temporary renderresult or sequence - * - ibuf - * -> comes from packedfile or filename or generated - */ - -Image *BKE_image_ensure_viewer(Main *bmain, int type, const char *name) -{ - Image *ima; - - for (ima = bmain->images.first; ima; ima = ima->id.next) { - if (ima->source == IMA_SRC_VIEWER) { - if (ima->type == type) { - break; - } - } - } - - if (ima == NULL) { - ima = image_alloc(bmain, name, IMA_SRC_VIEWER, type); - } - - /* Happens on reload, imagewindow cannot be image user when hidden. */ - if (ima->id.us == 0) { - id_us_ensure_real(&ima->id); - } - - return ima; -} - -static void image_viewer_create_views(const RenderData *rd, Image *ima) -{ - if ((rd->scemode & R_MULTIVIEW) == 0) { - image_add_view(ima, "", ""); - } - else { - SceneRenderView *srv; - for (srv = rd->views.first; srv; srv = srv->next) { - if (BKE_scene_multiview_is_render_view_active(rd, srv) == false) { - continue; - } - image_add_view(ima, srv->name, ""); - } - } -} - -void BKE_image_ensure_viewer_views(const RenderData *rd, Image *ima, ImageUser *iuser) -{ - bool do_reset; - const bool is_multiview = (rd->scemode & R_MULTIVIEW) != 0; - - BLI_thread_lock(LOCK_DRAW_IMAGE); - - if (!BKE_scene_multiview_is_stereo3d(rd)) { - iuser->flag &= ~IMA_SHOW_STEREO; - } - - /* see if all scene render views are in the image view list */ - do_reset = (BKE_scene_multiview_num_views_get(rd) != BLI_listbase_count(&ima->views)); - - /* multiview also needs to be sure all the views are synced */ - if (is_multiview && !do_reset) { - SceneRenderView *srv; - ImageView *iv; - - for (iv = ima->views.first; iv; iv = iv->next) { - srv = BLI_findstring(&rd->views, iv->name, offsetof(SceneRenderView, name)); - if ((srv == NULL) || (BKE_scene_multiview_is_render_view_active(rd, srv) == false)) { - do_reset = true; - break; - } - } - } - - if (do_reset) { - BLI_mutex_lock(ima->runtime.cache_mutex); - - image_free_cached_frames(ima); - BKE_image_free_views(ima); - - /* add new views */ - image_viewer_create_views(rd, ima); - - BLI_mutex_unlock(ima->runtime.cache_mutex); - } - - BLI_thread_unlock(LOCK_DRAW_IMAGE); -} - -static void image_walk_ntree_all_users( - bNodeTree *ntree, - ID *id, - void *customdata, - void callback(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata)) -{ - switch (ntree->type) { - case NTREE_SHADER: - LISTBASE_FOREACH (bNode *, node, &ntree->nodes) { - if (node->id) { - if (node->type == SH_NODE_TEX_IMAGE) { - NodeTexImage *tex = node->storage; - Image *ima = (Image *)node->id; - callback(ima, id, &tex->iuser, customdata); - } - if (node->type == SH_NODE_TEX_ENVIRONMENT) { - NodeTexImage *tex = node->storage; - Image *ima = (Image *)node->id; - callback(ima, id, &tex->iuser, customdata); - } - } - } - break; - case NTREE_TEXTURE: - LISTBASE_FOREACH (bNode *, node, &ntree->nodes) { - if (node->id && node->type == TEX_NODE_IMAGE) { - Image *ima = (Image *)node->id; - ImageUser *iuser = node->storage; - callback(ima, id, iuser, customdata); - } - } - break; - case NTREE_COMPOSIT: - LISTBASE_FOREACH (bNode *, node, &ntree->nodes) { - if (node->id && node->type == CMP_NODE_IMAGE) { - Image *ima = (Image *)node->id; - ImageUser *iuser = node->storage; - callback(ima, id, iuser, customdata); - } - } - break; - } -} - -static void image_walk_gpu_materials( - ID *id, - ListBase *gpu_materials, - void *customdata, - void callback(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata)) -{ - LISTBASE_FOREACH (LinkData *, link, gpu_materials) { - GPUMaterial *gpu_material = (GPUMaterial *)link->data; - ListBase textures = GPU_material_textures(gpu_material); - LISTBASE_FOREACH (GPUMaterialTexture *, gpu_material_texture, &textures) { - if (gpu_material_texture->iuser_available) { - callback(gpu_material_texture->ima, id, &gpu_material_texture->iuser, customdata); - } - } - } -} - -static void image_walk_id_all_users( - ID *id, - bool skip_nested_nodes, - void *customdata, - void callback(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata)) -{ - switch (GS(id->name)) { - case ID_OB: { - Object *ob = (Object *)id; - if (ob->empty_drawtype == OB_EMPTY_IMAGE && ob->data) { - callback(ob->data, &ob->id, ob->iuser, customdata); - } - break; - } - case ID_MA: { - Material *ma = (Material *)id; - if (ma->nodetree && ma->use_nodes && !skip_nested_nodes) { - image_walk_ntree_all_users(ma->nodetree, &ma->id, customdata, callback); - } - image_walk_gpu_materials(id, &ma->gpumaterial, customdata, callback); - break; - } - case ID_LA: { - Light *light = (Light *)id; - if (light->nodetree && light->use_nodes && !skip_nested_nodes) { - image_walk_ntree_all_users(light->nodetree, &light->id, customdata, callback); - } - break; - } - case ID_WO: { - World *world = (World *)id; - if (world->nodetree && world->use_nodes && !skip_nested_nodes) { - image_walk_ntree_all_users(world->nodetree, &world->id, customdata, callback); - } - image_walk_gpu_materials(id, &world->gpumaterial, customdata, callback); - break; - } - case ID_TE: { - Tex *tex = (Tex *)id; - if (tex->type == TEX_IMAGE && tex->ima) { - callback(tex->ima, &tex->id, &tex->iuser, customdata); - } - if (tex->nodetree && tex->use_nodes && !skip_nested_nodes) { - image_walk_ntree_all_users(tex->nodetree, &tex->id, customdata, callback); - } - break; - } - case ID_NT: { - bNodeTree *ntree = (bNodeTree *)id; - image_walk_ntree_all_users(ntree, &ntree->id, customdata, callback); - break; - } - case ID_CA: { - Camera *cam = (Camera *)id; - LISTBASE_FOREACH (CameraBGImage *, bgpic, &cam->bg_images) { - callback(bgpic->ima, NULL, &bgpic->iuser, customdata); - } - break; - } - case ID_WM: { - wmWindowManager *wm = (wmWindowManager *)id; - LISTBASE_FOREACH (wmWindow *, win, &wm->windows) { - const bScreen *screen = BKE_workspace_active_screen_get(win->workspace_hook); - - LISTBASE_FOREACH (ScrArea *, area, &screen->areabase) { - if (area->spacetype == SPACE_IMAGE) { - SpaceImage *sima = area->spacedata.first; - callback(sima->image, NULL, &sima->iuser, customdata); - } - } - } - break; - } - case ID_SCE: { - Scene *scene = (Scene *)id; - if (scene->nodetree && scene->use_nodes && !skip_nested_nodes) { - image_walk_ntree_all_users(scene->nodetree, &scene->id, customdata, callback); - } - break; - } - case ID_SIM: { - Simulation *simulation = (Simulation *)id; - image_walk_ntree_all_users(simulation->nodetree, &simulation->id, customdata, callback); - break; - } - default: - break; - } -} - -void BKE_image_walk_all_users( - const Main *mainp, - void *customdata, - void callback(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata)) -{ - for (Scene *scene = mainp->scenes.first; scene; scene = scene->id.next) { - image_walk_id_all_users(&scene->id, false, customdata, callback); - } - - for (Object *ob = mainp->objects.first; ob; ob = ob->id.next) { - image_walk_id_all_users(&ob->id, false, customdata, callback); - } - - for (bNodeTree *ntree = mainp->nodetrees.first; ntree; ntree = ntree->id.next) { - image_walk_id_all_users(&ntree->id, false, customdata, callback); - } - - for (Material *ma = mainp->materials.first; ma; ma = ma->id.next) { - image_walk_id_all_users(&ma->id, false, customdata, callback); - } - - for (Light *light = mainp->materials.first; light; light = light->id.next) { - image_walk_id_all_users(&light->id, false, customdata, callback); - } - - for (World *world = mainp->materials.first; world; world = world->id.next) { - image_walk_id_all_users(&world->id, false, customdata, callback); - } - - for (Tex *tex = mainp->textures.first; tex; tex = tex->id.next) { - image_walk_id_all_users(&tex->id, false, customdata, callback); - } - - for (Camera *cam = mainp->cameras.first; cam; cam = cam->id.next) { - image_walk_id_all_users(&cam->id, false, customdata, callback); - } - - for (wmWindowManager *wm = mainp->wm.first; wm; wm = wm->id.next) { /* only 1 wm */ - image_walk_id_all_users(&wm->id, false, customdata, callback); - } -} - -static void image_tag_frame_recalc(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata) -{ - Image *changed_image = customdata; - - if (ima == changed_image && BKE_image_is_animated(ima)) { - iuser->flag |= IMA_NEED_FRAME_RECALC; - - if (iuser_id) { - /* Must copy image user changes to CoW data-block. */ - DEG_id_tag_update(iuser_id, ID_RECALC_COPY_ON_WRITE); - } - } -} - -static void image_tag_reload(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata) -{ - Image *changed_image = customdata; - - if (ima == changed_image) { - if (iuser->scene) { - image_update_views_format(ima, iuser); - } - if (iuser_id) { - /* Must copy image user changes to CoW data-block. */ - DEG_id_tag_update(iuser_id, ID_RECALC_COPY_ON_WRITE); - } - BKE_image_partial_update_mark_full_update(ima); - } -} - -void BKE_imageuser_default(ImageUser *iuser) -{ - memset(iuser, 0, sizeof(ImageUser)); - iuser->frames = 100; - iuser->sfra = 1; -} - -void BKE_image_init_imageuser(Image *ima, ImageUser *iuser) -{ - RenderResult *rr = ima->rr; - - iuser->multi_index = 0; - iuser->layer = iuser->pass = iuser->view = 0; - - if (rr) { - BKE_image_multilayer_index(rr, iuser); - } -} - -static void image_free_tile(Image *ima, ImageTile *tile) -{ - for (int i = 0; i < TEXTARGET_COUNT; i++) { - /* Only two textures depends on all tiles, so if this is a secondary tile we can keep the other - * two. */ - if (tile != ima->tiles.first && !(ELEM(i, TEXTARGET_2D_ARRAY, TEXTARGET_TILE_MAPPING))) { - continue; - } - - for (int eye = 0; eye < 2; eye++) { - for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { - if (ima->gputexture[i][eye][resolution] != NULL) { - GPU_texture_free(ima->gputexture[i][eye][resolution]); - ima->gputexture[i][eye][resolution] = NULL; - } - } - } - } - BKE_image_partial_update_mark_full_update(ima); - - if (BKE_image_is_multiview(ima)) { - const int totviews = BLI_listbase_count(&ima->views); - for (int i = 0; i < totviews; i++) { - image_remove_ibuf(ima, i, tile->tile_number); - } - } - else { - image_remove_ibuf(ima, 0, tile->tile_number); - } -} - -void BKE_image_signal(Main *bmain, Image *ima, ImageUser *iuser, int signal) -{ - if (ima == NULL) { - return; - } - - BLI_mutex_lock(ima->runtime.cache_mutex); - - switch (signal) { - case IMA_SIGNAL_FREE: - BKE_image_free_buffers(ima); - - if (iuser) { - if (iuser->scene) { - image_update_views_format(ima, iuser); - } - } - break; - case IMA_SIGNAL_SRC_CHANGE: - if (ima->type == IMA_TYPE_UV_TEST) { - if (ima->source != IMA_SRC_GENERATED) { - ima->type = IMA_TYPE_IMAGE; - } - } - - if (ima->source == IMA_SRC_GENERATED) { - if (ima->gen_x == 0 || ima->gen_y == 0) { - ImBuf *ibuf = image_get_cached_ibuf_for_index_entry(ima, IMA_NO_INDEX, 0, NULL); - if (ibuf) { - ima->gen_x = ibuf->x; - ima->gen_y = ibuf->y; - IMB_freeImBuf(ibuf); - } - } - - /* Changing source type to generated will likely change file format - * used by generated image buffer. Saving different file format to - * the old name might confuse other applications. - * - * Here we ensure original image path wouldn't be used when saving - * generated image. - */ - ima->filepath[0] = '\0'; - } - - if (ima->source != IMA_SRC_TILED) { - /* Free all but the first tile. */ - ImageTile *base_tile = BKE_image_get_tile(ima, 0); - BLI_assert(base_tile == ima->tiles.first); - for (ImageTile *tile = base_tile->next, *tile_next; tile; tile = tile_next) { - tile_next = tile->next; - image_free_tile(ima, tile); - MEM_freeN(tile); - } - base_tile->next = NULL; - ima->tiles.last = base_tile; - } - - /* image buffers for non-sequence multilayer will share buffers with RenderResult, - * however sequence multilayer will own buffers. Such logic makes switching from - * single multilayer file to sequence completely unstable - * since changes in nodes seems this workaround isn't needed anymore, all sockets - * are nicely detecting anyway, but freeing buffers always here makes multilayer - * sequences behave stable - */ - BKE_image_free_buffers(ima); - - if (iuser) { - image_tag_frame_recalc(ima, NULL, iuser, ima); - } - BKE_image_walk_all_users(bmain, ima, image_tag_frame_recalc); - - break; - - case IMA_SIGNAL_RELOAD: - /* try to repack file */ - if (BKE_image_has_packedfile(ima)) { - const int totfiles = image_num_files(ima); - - if (totfiles != BLI_listbase_count_at_most(&ima->packedfiles, totfiles + 1)) { - /* in case there are new available files to be loaded */ - image_free_packedfiles(ima); - BKE_image_packfiles(NULL, ima, ID_BLEND_PATH(bmain, &ima->id)); - } - else { - ImagePackedFile *imapf; - for (imapf = ima->packedfiles.first; imapf; imapf = imapf->next) { - PackedFile *pf; - pf = BKE_packedfile_new(NULL, imapf->filepath, ID_BLEND_PATH(bmain, &ima->id)); - if (pf) { - BKE_packedfile_free(imapf->packedfile); - imapf->packedfile = pf; - } - else { - printf("ERROR: Image \"%s\" not available. Keeping packed image\n", imapf->filepath); - } - } - } - - if (BKE_image_has_packedfile(ima)) { - BKE_image_free_buffers(ima); - } - } - else { - BKE_image_free_buffers(ima); - } - - if (ima->source == IMA_SRC_TILED) { - ListBase new_tiles = {NULL, NULL}; - int new_start, new_range; - - char filepath[FILE_MAX]; - BLI_strncpy(filepath, ima->filepath, sizeof(filepath)); - BLI_path_abs(filepath, ID_BLEND_PATH_FROM_GLOBAL(&ima->id)); - bool result = BKE_image_get_tile_info(filepath, &new_tiles, &new_start, &new_range); - if (result) { - /* Because the prior and new list of tiles are both sparse sequences, we need to be sure - * to account for how the two sets might or might not overlap. To be complete, we start - * the refresh process by clearing all existing tiles, stopping when there's only 1 tile - * left. */ - while (BKE_image_remove_tile(ima, ima->tiles.last)) { - ; - } - - int remaining_tile_number = ((ImageTile *)ima->tiles.first)->tile_number; - bool needs_final_cleanup = true; - - /* Add in all the new tiles. */ - LISTBASE_FOREACH (LinkData *, new_tile, &new_tiles) { - int new_tile_number = POINTER_AS_INT(new_tile->data); - BKE_image_add_tile(ima, new_tile_number, NULL); - if (new_tile_number == remaining_tile_number) { - needs_final_cleanup = false; - } - } - - /* Final cleanup if the prior remaining tile was never encountered in the new list. */ - if (needs_final_cleanup) { - BKE_image_remove_tile(ima, BKE_image_get_tile(ima, remaining_tile_number)); - } - } - BLI_freelistN(&new_tiles); - } - - if (iuser) { - image_tag_reload(ima, NULL, iuser, ima); - } - BKE_image_walk_all_users(bmain, ima, image_tag_reload); - break; - case IMA_SIGNAL_USER_NEW_IMAGE: - if (iuser) { - if (ELEM(ima->source, IMA_SRC_FILE, IMA_SRC_SEQUENCE, IMA_SRC_TILED)) { - if (ima->type == IMA_TYPE_MULTILAYER) { - BKE_image_init_imageuser(ima, iuser); - } - } - } - break; - case IMA_SIGNAL_COLORMANAGE: - BKE_image_free_buffers(ima); - break; - } - - BLI_mutex_unlock(ima->runtime.cache_mutex); - - BKE_ntree_update_tag_id_changed(bmain, &ima->id); - BKE_ntree_update_main(bmain, NULL); -} - -/* return renderpass for a given pass index and active view */ -/* fallback to available if there are missing passes for active view */ -static RenderPass *image_render_pass_get(RenderLayer *rl, - const int pass, - const int view, - int *r_passindex) -{ - RenderPass *rpass_ret = NULL; - RenderPass *rpass; - - int rp_index = 0; - const char *rp_name = ""; - - for (rpass = rl->passes.first; rpass; rpass = rpass->next, rp_index++) { - if (rp_index == pass) { - rpass_ret = rpass; - if (view == 0) { - /* no multiview or left eye */ - break; - } - - rp_name = rpass->name; - } - /* multiview */ - else if (rp_name[0] && STREQ(rpass->name, rp_name) && (rpass->view_id == view)) { - rpass_ret = rpass; - break; - } - } - - /* fallback to the first pass in the layer */ - if (rpass_ret == NULL) { - rp_index = 0; - rpass_ret = rl->passes.first; - } - - if (r_passindex) { - *r_passindex = (rpass == rpass_ret ? rp_index : pass); - } - - return rpass_ret; -} - -void BKE_image_get_tile_label(Image *ima, ImageTile *tile, char *label, int len_label) -{ - label[0] = '\0'; - if (ima == NULL || tile == NULL) { - return; - } - - if (tile->label[0]) { - BLI_strncpy(label, tile->label, len_label); - } - else { - BLI_snprintf(label, len_label, "%d", tile->tile_number); - } -} - -bool BKE_image_get_tile_info(char *filepath, - ListBase *udim_tiles, - int *udim_start, - int *udim_range) -{ - char filename[FILE_MAXFILE], dirname[FILE_MAXDIR]; - BLI_split_dirfile(filepath, dirname, filename, sizeof(dirname), sizeof(filename)); - - BKE_image_ensure_tile_token(filename); - - eUDIM_TILE_FORMAT tile_format; - char *udim_pattern = BKE_image_get_tile_strformat(filename, &tile_format); - - bool is_udim = true; - int min_udim = IMA_UDIM_MAX + 1; - int max_udim = 0; - int id; - - struct direntry *dir; - uint totfile = BLI_filelist_dir_contents(dirname, &dir); - for (int i = 0; i < totfile; i++) { - if (!(dir[i].type & S_IFREG)) { - continue; - } - - if (!BKE_image_get_tile_number_from_filepath(dir[i].relname, udim_pattern, tile_format, &id)) { - continue; - } - - if (id < 1001 || id > IMA_UDIM_MAX) { - is_udim = false; - break; - } - - BLI_addtail(udim_tiles, BLI_genericNodeN(POINTER_FROM_INT(id))); - min_udim = min_ii(min_udim, id); - max_udim = max_ii(max_udim, id); - } - BLI_filelist_free(dir, totfile); - MEM_SAFE_FREE(udim_pattern); - - if (is_udim && min_udim <= IMA_UDIM_MAX) { - BLI_join_dirfile(filepath, FILE_MAX, dirname, filename); - - *udim_start = min_udim; - *udim_range = max_udim - min_udim + 1; - return true; - } - return false; -} - -ImageTile *BKE_image_add_tile(struct Image *ima, int tile_number, const char *label) -{ - if (ima->source != IMA_SRC_TILED) { - return NULL; - } - - if (tile_number < 1001 || tile_number > IMA_UDIM_MAX) { - return NULL; - } - - /* Search the first tile that has a higher number. - * We then insert before that to keep the list sorted. */ - ImageTile *next_tile; - for (next_tile = ima->tiles.first; next_tile; next_tile = next_tile->next) { - if (next_tile->tile_number == tile_number) { - /* Tile already exists. */ - return NULL; - } - if (next_tile->tile_number > tile_number) { - break; - } - } - - ImageTile *tile = MEM_callocN(sizeof(ImageTile), "image new tile"); - tile->tile_number = tile_number; - - if (next_tile) { - BLI_insertlinkbefore(&ima->tiles, next_tile, tile); - } - else { - BLI_addtail(&ima->tiles, tile); - } - - if (label) { - BLI_strncpy(tile->label, label, sizeof(tile->label)); - } - - for (int eye = 0; eye < 2; eye++) { - for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { - /* Reallocate GPU tile array. */ - if (ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution] != NULL) { - GPU_texture_free(ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution]); - ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution] = NULL; - } - if (ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution] != NULL) { - GPU_texture_free(ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution]); - ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution] = NULL; - } - } - } - BKE_image_partial_update_mark_full_update(ima); - - return tile; -} - -bool BKE_image_remove_tile(struct Image *ima, ImageTile *tile) -{ - if (ima == NULL || tile == NULL || ima->source != IMA_SRC_TILED) { - return false; - } - - if (BLI_listbase_is_single(&ima->tiles)) { - /* Can't remove the last remaining tile. */ - return false; - } - - image_free_tile(ima, tile); - BLI_remlink(&ima->tiles, tile); - MEM_freeN(tile); - - return true; -} - -void BKE_image_reassign_tile(struct Image *ima, ImageTile *tile, int new_tile_number) -{ - if (ima == NULL || tile == NULL || ima->source != IMA_SRC_TILED) { - return; - } - - if (new_tile_number < 1001 || new_tile_number > IMA_UDIM_MAX) { - return; - } - - const int old_tile_number = tile->tile_number; - tile->tile_number = new_tile_number; - - if (BKE_image_is_multiview(ima)) { - const int totviews = BLI_listbase_count(&ima->views); - for (int i = 0; i < totviews; i++) { - ImBuf *ibuf = image_get_cached_ibuf_for_index_entry(ima, i, old_tile_number, NULL); - image_remove_ibuf(ima, i, old_tile_number); - image_assign_ibuf(ima, ibuf, i, new_tile_number); - IMB_freeImBuf(ibuf); - } - } - else { - ImBuf *ibuf = image_get_cached_ibuf_for_index_entry(ima, 0, old_tile_number, NULL); - image_remove_ibuf(ima, 0, old_tile_number); - image_assign_ibuf(ima, ibuf, 0, new_tile_number); - IMB_freeImBuf(ibuf); - } - - for (int eye = 0; eye < 2; eye++) { - for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { - - /* Reallocate GPU tile array. */ - if (ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution] != NULL) { - GPU_texture_free(ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution]); - ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution] = NULL; - } - if (ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution] != NULL) { - GPU_texture_free(ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution]); - ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution] = NULL; - } - } - } - BKE_image_partial_update_mark_full_update(ima); -} - -static int tile_sort_cb(const void *a, const void *b) -{ - const ImageTile *tile_a = a; - const ImageTile *tile_b = b; - return (tile_a->tile_number > tile_b->tile_number) ? 1 : 0; -} - -void BKE_image_sort_tiles(struct Image *ima) -{ - if (ima == NULL || ima->source != IMA_SRC_TILED) { - return; - } - - BLI_listbase_sort(&ima->tiles, tile_sort_cb); -} - -bool BKE_image_fill_tile(struct Image *ima, - ImageTile *tile, - int width, - int height, - const float color[4], - int gen_type, - int planes, - bool is_float) -{ - if (ima == NULL || tile == NULL || ima->source != IMA_SRC_TILED) { - return false; - } - - image_free_tile(ima, tile); - - ImBuf *tile_ibuf = add_ibuf_size( - width, height, ima->filepath, planes, is_float, gen_type, color, &ima->colorspace_settings); - - if (tile_ibuf != NULL) { - image_assign_ibuf(ima, tile_ibuf, 0, tile->tile_number); - BKE_image_release_ibuf(ima, tile_ibuf, NULL); - return true; - } - return false; -} - -void BKE_image_ensure_tile_token(char *filename) -{ - BLI_assert_msg(BLI_path_slash_find(filename) == NULL, - "Only the file-name component should be used!"); - - /* Is there a '<' character in the filename? Assume tokens already present. */ - if (strstr(filename, "<") != NULL) { - return; - } - - /* Is there a sequence of digits in the filename? */ - ushort digits; - char head[FILE_MAX], tail[FILE_MAX]; - BLI_path_sequence_decode(filename, head, tail, &digits); - if (digits == 4) { - sprintf(filename, "%s%s", head, tail); - return; - } - - /* Is there a sequence like u##_v#### in the filename? */ - uint cur = 0; - uint name_end = strlen(filename); - uint u_digits = 0; - uint v_digits = 0; - uint u_start = (uint)-1; - bool u_found = false; - bool v_found = false; - bool sep_found = false; - while (cur < name_end) { - if (filename[cur] == 'u') { - u_found = true; - u_digits = 0; - u_start = cur; - } - else if (filename[cur] == 'v') { - v_found = true; - v_digits = 0; - } - else if (u_found && !v_found) { - if (isdigit(filename[cur]) && u_digits < 2) { - u_digits++; - } - else if (filename[cur] == '_') { - sep_found = true; - } - else { - u_found = false; - } - } - else if (u_found && u_digits > 0 && v_found) { - if (isdigit(filename[cur])) { - if (v_digits < 4) { - v_digits++; - } - else { - u_found = false; - v_found = false; - } - } - else if (v_digits > 0) { - break; - } - } - - cur++; - } - - if (u_found && sep_found && v_found && (u_digits + v_digits > 1)) { - const char *token = ""; - const size_t token_length = strlen(token); - memmove(filename + u_start + token_length, filename + cur, name_end - cur); - memcpy(filename + u_start, token, token_length); - filename[u_start + token_length + (name_end - cur)] = '\0'; - } -} - -bool BKE_image_tile_filepath_exists(const char *filepath) -{ - BLI_assert(!BLI_path_is_rel(filepath)); - - char dirname[FILE_MAXDIR]; - BLI_split_dir_part(filepath, dirname, sizeof(dirname)); - - eUDIM_TILE_FORMAT tile_format; - char *udim_pattern = BKE_image_get_tile_strformat(filepath, &tile_format); - - bool found = false; - struct direntry *dir; - uint totfile = BLI_filelist_dir_contents(dirname, &dir); - for (int i = 0; i < totfile; i++) { - if (!(dir[i].type & S_IFREG)) { - continue; - } - - int id; - if (!BKE_image_get_tile_number_from_filepath(dir[i].path, udim_pattern, tile_format, &id)) { - continue; - } - - if (id < 1001 || id > IMA_UDIM_MAX) { - continue; - } - - found = true; - break; - } - BLI_filelist_free(dir, totfile); - MEM_SAFE_FREE(udim_pattern); - - return found; -} - -char *BKE_image_get_tile_strformat(const char *filepath, eUDIM_TILE_FORMAT *r_tile_format) -{ - if (filepath == NULL || r_tile_format == NULL) { - return NULL; - } - - if (strstr(filepath, "") != NULL) { - *r_tile_format = UDIM_TILE_FORMAT_UDIM; - return BLI_str_replaceN(filepath, "", "%d"); - } - if (strstr(filepath, "") != NULL) { - *r_tile_format = UDIM_TILE_FORMAT_UVTILE; - return BLI_str_replaceN(filepath, "", "u%d_v%d"); - } - - *r_tile_format = UDIM_TILE_FORMAT_NONE; - return NULL; -} - -bool BKE_image_get_tile_number_from_filepath(const char *filepath, - const char *pattern, - eUDIM_TILE_FORMAT tile_format, - int *r_tile_number) -{ - if (filepath == NULL || pattern == NULL || r_tile_number == NULL) { - return false; - } - - int u, v; - bool result = false; - - if (tile_format == UDIM_TILE_FORMAT_UDIM) { - if (sscanf(filepath, pattern, &u) == 1) { - *r_tile_number = u; - result = true; - } - } - else if (tile_format == UDIM_TILE_FORMAT_UVTILE) { - if (sscanf(filepath, pattern, &u, &v) == 2) { - *r_tile_number = 1001 + (u - 1) + ((v - 1) * 10); - result = true; - } - } - - return result; -} - -void BKE_image_set_filepath_from_tile_number(char *filepath, - const char *pattern, - eUDIM_TILE_FORMAT tile_format, - int tile_number) -{ - if (filepath == NULL || pattern == NULL) { - return; - } - - if (tile_format == UDIM_TILE_FORMAT_UDIM) { - sprintf(filepath, pattern, tile_number); - } - else if (tile_format == UDIM_TILE_FORMAT_UVTILE) { - int u = ((tile_number - 1001) % 10); - int v = ((tile_number - 1001) / 10); - sprintf(filepath, pattern, u + 1, v + 1); - } -} - -/* if layer or pass changes, we need an index for the imbufs list */ -/* note it is called for rendered results, but it doesn't use the index! */ -RenderPass *BKE_image_multilayer_index(RenderResult *rr, ImageUser *iuser) -{ - RenderLayer *rl; - RenderPass *rpass = NULL; - - if (rr == NULL) { - return NULL; - } - - if (iuser) { - short index = 0, rv_index, rl_index = 0; - bool is_stereo = (iuser->flag & IMA_SHOW_STEREO) && RE_RenderResult_is_stereo(rr); - - rv_index = is_stereo ? iuser->multiview_eye : iuser->view; - if (RE_HasCombinedLayer(rr)) { - rl_index += 1; - } - - for (rl = rr->layers.first; rl; rl = rl->next, rl_index++) { - if (iuser->layer == rl_index) { - int rp_index; - rpass = image_render_pass_get(rl, iuser->pass, rv_index, &rp_index); - iuser->multi_index = index + rp_index; - break; - } - - index += BLI_listbase_count(&rl->passes); - } - } - - return rpass; -} - -void BKE_image_multiview_index(Image *ima, ImageUser *iuser) -{ - if (iuser) { - bool is_stereo = BKE_image_is_stereo(ima) && (iuser->flag & IMA_SHOW_STEREO); - if (is_stereo) { - iuser->multi_index = iuser->multiview_eye; - } - else { - if ((iuser->view < 0) || - (iuser->view >= BLI_listbase_count_at_most(&ima->views, iuser->view + 1))) { - iuser->multi_index = iuser->view = 0; - } - else { - iuser->multi_index = iuser->view; - } - } - } -} - -/* if layer or pass changes, we need an index for the imbufs list */ -/* note it is called for rendered results, but it doesn't use the index! */ -bool BKE_image_is_multilayer(Image *ima) -{ - if (ELEM(ima->source, IMA_SRC_FILE, IMA_SRC_SEQUENCE, IMA_SRC_TILED)) { - if (ima->type == IMA_TYPE_MULTILAYER) { - return true; - } - } - else if (ima->source == IMA_SRC_VIEWER) { - if (ima->type == IMA_TYPE_R_RESULT) { - return true; - } - } - return false; -} - -bool BKE_image_is_multiview(Image *ima) -{ - ImageView *view = ima->views.first; - return (view && (view->next || view->name[0])); -} - -bool BKE_image_is_stereo(Image *ima) -{ - return BKE_image_is_multiview(ima) && - (BLI_findstring(&ima->views, STEREO_LEFT_NAME, offsetof(ImageView, name)) && - BLI_findstring(&ima->views, STEREO_RIGHT_NAME, offsetof(ImageView, name))); -} - -static void image_init_multilayer_multiview(Image *ima, RenderResult *rr) -{ - /* update image views from render views, but only if they actually changed, - * to avoid invalid memory access during render. ideally these should always - * be acquired with a mutex along with the render result, but there are still - * some places with just an image pointer that need to access views */ - if (rr && BLI_listbase_count(&ima->views) == BLI_listbase_count(&rr->views)) { - ImageView *iv = ima->views.first; - RenderView *rv = rr->views.first; - bool modified = false; - for (; rv; rv = rv->next, iv = iv->next) { - modified |= !STREQ(rv->name, iv->name); - } - if (!modified) { - return; - } - } - - BKE_image_free_views(ima); - - if (rr) { - LISTBASE_FOREACH (RenderView *, rv, &rr->views) { - ImageView *iv = MEM_callocN(sizeof(ImageView), "Viewer Image View"); - STRNCPY(iv->name, rv->name); - BLI_addtail(&ima->views, iv); - } - } -} - -RenderResult *BKE_image_acquire_renderresult(Scene *scene, Image *ima) -{ - RenderResult *rr = NULL; - if (ima->rr) { - rr = ima->rr; - } - else if (ima->type == IMA_TYPE_R_RESULT) { - if (ima->render_slot == ima->last_render_slot) { - rr = RE_AcquireResultRead(RE_GetSceneRender(scene)); - } - else { - rr = BKE_image_get_renderslot(ima, ima->render_slot)->render; - BKE_image_partial_update_mark_full_update(ima); - } - - /* set proper views */ - image_init_multilayer_multiview(ima, rr); - } - - return rr; -} - -void BKE_image_release_renderresult(Scene *scene, Image *ima) -{ - if (ima->rr) { - /* pass */ - } - else if (ima->type == IMA_TYPE_R_RESULT) { - if (ima->render_slot == ima->last_render_slot) { - RE_ReleaseResult(RE_GetSceneRender(scene)); - } - } -} - -bool BKE_image_is_openexr(struct Image *ima) -{ -#ifdef WITH_OPENEXR - if (ELEM(ima->source, IMA_SRC_FILE, IMA_SRC_SEQUENCE, IMA_SRC_TILED)) { - return BLI_path_extension_check(ima->filepath, ".exr"); - } -#else - UNUSED_VARS(ima); -#endif - return false; -} - -void BKE_image_backup_render(Scene *scene, Image *ima, bool free_current_slot) -{ - /* called right before rendering, ima->renderslots contains render - * result pointers for everything but the current render */ - Render *re = RE_GetSceneRender(scene); - - /* Ensure we always have a valid render slot. */ - if (!ima->renderslots.first) { - BKE_image_add_renderslot(ima, NULL); - ima->render_slot = 0; - ima->last_render_slot = 0; - } - else if (ima->render_slot >= BLI_listbase_count(&ima->renderslots)) { - ima->render_slot = 0; - ima->last_render_slot = 0; - } - - RenderSlot *last_slot = BKE_image_get_renderslot(ima, ima->last_render_slot); - RenderSlot *cur_slot = BKE_image_get_renderslot(ima, ima->render_slot); - - if (last_slot && ima->render_slot != ima->last_render_slot) { - last_slot->render = NULL; - RE_SwapResult(re, &last_slot->render); - - if (cur_slot->render) { - if (free_current_slot) { - BKE_image_clear_renderslot(ima, NULL, ima->render_slot); - } - else { - RE_SwapResult(re, &cur_slot->render); - } - } - } - - ima->last_render_slot = ima->render_slot; -} - -/**************************** multiview load openexr *********************************/ - -static void image_add_view(Image *ima, const char *viewname, const char *filepath) -{ - ImageView *iv; - - iv = MEM_mallocN(sizeof(ImageView), "Viewer Image View"); - STRNCPY(iv->name, viewname); - STRNCPY(iv->filepath, filepath); - - /* For stereo drawing we need to ensure: - * STEREO_LEFT_NAME == STEREO_LEFT_ID and - * STEREO_RIGHT_NAME == STEREO_RIGHT_ID */ - - if (STREQ(viewname, STEREO_LEFT_NAME)) { - BLI_addhead(&ima->views, iv); - } - else if (STREQ(viewname, STEREO_RIGHT_NAME)) { - ImageView *left_iv = BLI_findstring(&ima->views, STEREO_LEFT_NAME, offsetof(ImageView, name)); - - if (left_iv == NULL) { - BLI_addhead(&ima->views, iv); - } - else { - BLI_insertlinkafter(&ima->views, left_iv, iv); - } - } - else { - BLI_addtail(&ima->views, iv); - } -} - -/* after imbuf load, openexr type can return with a exrhandle open */ -/* in that case we have to build a render-result */ -#ifdef WITH_OPENEXR -static void image_create_multilayer(Image *ima, ImBuf *ibuf, int framenr) -{ - const char *colorspace = ima->colorspace_settings.name; - bool predivide = (ima->alpha_mode == IMA_ALPHA_PREMUL); - - /* only load rr once for multiview */ - if (!ima->rr) { - ima->rr = RE_MultilayerConvert(ibuf->userdata, colorspace, predivide, ibuf->x, ibuf->y); - } - - IMB_exr_close(ibuf->userdata); - - ibuf->userdata = NULL; - if (ima->rr != NULL) { - ima->rr->framenr = framenr; - BKE_stamp_info_from_imbuf(ima->rr, ibuf); - } - - /* set proper views */ - image_init_multilayer_multiview(ima, ima->rr); -} -#endif /* WITH_OPENEXR */ - -/* common stuff to do with images after loading */ -static void image_init_after_load(Image *ima, ImageUser *iuser, ImBuf *UNUSED(ibuf)) -{ - /* Preview is NULL when it has never been used as an icon before. - * Never handle previews/icons outside of main thread. */ - if (G.background == 0 && ima->preview == NULL && BLI_thread_is_main()) { - BKE_icon_changed(BKE_icon_id_ensure(&ima->id)); - } - - /* timer */ - BKE_image_tag_time(ima); - - ImageTile *tile = BKE_image_get_tile_from_iuser(ima, iuser); - /* Images should never get loaded if the corresponding tile does not exist, - * but we should at least not crash if it happens due to a bug elsewhere. */ - BLI_assert(tile != NULL); - UNUSED_VARS_NDEBUG(tile); -} - -static int imbuf_alpha_flags_for_image(Image *ima) -{ - switch (ima->alpha_mode) { - case IMA_ALPHA_STRAIGHT: - return 0; - case IMA_ALPHA_PREMUL: - return IB_alphamode_premul; - case IMA_ALPHA_CHANNEL_PACKED: - return IB_alphamode_channel_packed; - case IMA_ALPHA_IGNORE: - return IB_alphamode_ignore; - } - - return 0; -} - -/* the number of files will vary according to the stereo format */ -static int image_num_files(Image *ima) -{ - const bool is_multiview = BKE_image_is_multiview(ima); - - if (!is_multiview) { - return 1; - } - if (ima->views_format == R_IMF_VIEWS_STEREO_3D) { - return 1; - } - /* R_IMF_VIEWS_INDIVIDUAL */ - - return BLI_listbase_count(&ima->views); -} - -static ImBuf *load_sequence_single( - Image *ima, ImageUser *iuser, int frame, const int view_id, bool *r_cache_ibuf) -{ - struct ImBuf *ibuf; - char name[FILE_MAX]; - int flag; - ImageUser iuser_t = {0}; - - *r_cache_ibuf = true; - - ima->lastframe = frame; - - if (iuser) { - iuser_t = *iuser; - } - else { - /* BKE_image_user_file_path() uses this value for file name for sequences. */ - iuser_t.framenr = frame; - /* TODO(sergey): Do we need to initialize something else here? */ - } - - iuser_t.view = view_id; - BKE_image_user_file_path(&iuser_t, ima, name); - - flag = IB_rect | IB_multilayer | IB_metadata; - flag |= imbuf_alpha_flags_for_image(ima); - - /* read ibuf */ - ibuf = IMB_loadiffname(name, flag, ima->colorspace_settings.name); - -#if 0 - if (ibuf) { - printf(AT " loaded %s\n", name); - } - else { - printf(AT " missed %s\n", name); - } -#endif - - if (ibuf) { -#ifdef WITH_OPENEXR - if (ibuf->ftype == IMB_FTYPE_OPENEXR && ibuf->userdata) { - /* Handle multilayer and multiview cases, don't assign ibuf here. - * will be set layer in BKE_image_acquire_ibuf from ima->rr. */ - if (IMB_exr_has_multilayer(ibuf->userdata)) { - image_create_multilayer(ima, ibuf, frame); - ima->type = IMA_TYPE_MULTILAYER; - IMB_freeImBuf(ibuf); - ibuf = NULL; - /* NULL ibuf in the cache means the image failed to load. However for multilayer we load - * pixels into RenderResult instead and intentionally leave ibuf NULL. */ - *r_cache_ibuf = false; - } - } - else { - image_init_after_load(ima, iuser, ibuf); - } -#else - image_init_after_load(ima, iuser, ibuf); -#endif - } - - return ibuf; -} - -static ImBuf *image_load_sequence_file(Image *ima, ImageUser *iuser, int entry, int frame) -{ - struct ImBuf *ibuf = NULL; - const bool is_multiview = BKE_image_is_multiview(ima); - const int totfiles = image_num_files(ima); - - if (!is_multiview) { - bool put_in_cache; - ibuf = load_sequence_single(ima, iuser, frame, 0, &put_in_cache); - if (put_in_cache) { - image_assign_ibuf(ima, ibuf, 0, entry); - } - } - else { - const int totviews = BLI_listbase_count(&ima->views); - struct ImBuf **ibuf_arr; - - ibuf_arr = MEM_mallocN(sizeof(ImBuf *) * totviews, "Image Views Imbufs"); - bool *cache_ibuf_arr = MEM_mallocN(sizeof(bool) * totviews, "Image View Put In Cache"); - - for (int i = 0; i < totfiles; i++) { - ibuf_arr[i] = load_sequence_single(ima, iuser, frame, i, cache_ibuf_arr + i); - } - - if (BKE_image_is_stereo(ima) && ima->views_format == R_IMF_VIEWS_STEREO_3D) { - IMB_ImBufFromStereo3d(ima->stereo3d_format, ibuf_arr[0], &ibuf_arr[0], &ibuf_arr[1]); - } - - /* return the original requested ImBuf */ - ibuf = ibuf_arr[(iuser ? iuser->multi_index : 0)]; - - for (int i = 0; i < totviews; i++) { - if (cache_ibuf_arr[i]) { - image_assign_ibuf(ima, ibuf_arr[i], i, entry); - } - } - - /* "remove" the others (decrease their refcount) */ - for (int i = 0; i < totviews; i++) { - if (ibuf_arr[i] != ibuf) { - IMB_freeImBuf(ibuf_arr[i]); - } - } - - /* cleanup */ - MEM_freeN(ibuf_arr); - MEM_freeN(cache_ibuf_arr); - } - - return ibuf; -} - -static ImBuf *image_load_sequence_multilayer(Image *ima, ImageUser *iuser, int entry, int frame) -{ - struct ImBuf *ibuf = NULL; - - /* either we load from RenderResult, or we have to load a new one */ - - /* check for new RenderResult */ - if (ima->rr == NULL || frame != ima->rr->framenr) { - if (ima->rr) { - /* Cached image buffers shares pointers with render result, - * need to ensure there's no image buffers are hanging around - * with dead links after freeing the render result. - */ - image_free_cached_frames(ima); - RE_FreeRenderResult(ima->rr); - ima->rr = NULL; - } - - ibuf = image_load_sequence_file(ima, iuser, entry, frame); - - if (ibuf) { /* actually an error */ - ima->type = IMA_TYPE_IMAGE; - printf("error, multi is normal image\n"); - } - } - if (ima->rr) { - RenderPass *rpass = BKE_image_multilayer_index(ima->rr, iuser); - - if (rpass) { - // printf("load from pass %s\n", rpass->name); - /* since we free render results, we copy the rect */ - ibuf = IMB_allocImBuf(ima->rr->rectx, ima->rr->recty, 32, 0); - ibuf->rect_float = MEM_dupallocN(rpass->rect); - ibuf->flags |= IB_rectfloat; - ibuf->mall = IB_rectfloat; - ibuf->channels = rpass->channels; - - BKE_imbuf_stamp_info(ima->rr, ibuf); - - image_init_after_load(ima, iuser, ibuf); - image_assign_ibuf(ima, ibuf, iuser ? iuser->multi_index : 0, entry); - } - // else printf("pass not found\n"); - } - - return ibuf; -} - -static ImBuf *load_movie_single(Image *ima, ImageUser *iuser, int frame, const int view_id) -{ - struct ImBuf *ibuf = NULL; - ImageAnim *ia; - - ia = BLI_findlink(&ima->anims, view_id); - - if (ia->anim == NULL) { - char str[FILE_MAX]; - int flags = IB_rect; - ImageUser iuser_t; - - if (ima->flag & IMA_DEINTERLACE) { - flags |= IB_animdeinterlace; - } - - if (iuser) { - iuser_t = *iuser; - } - - iuser_t.view = view_id; - - BKE_image_user_file_path(&iuser_t, ima, str); - - /* FIXME: make several stream accessible in image editor, too. */ - ia->anim = openanim(str, flags, 0, ima->colorspace_settings.name); - - /* let's initialize this user */ - if (ia->anim && iuser && iuser->frames == 0) { - iuser->frames = IMB_anim_get_duration(ia->anim, IMB_TC_RECORD_RUN); - } - } - - if (ia->anim) { - int dur = IMB_anim_get_duration(ia->anim, IMB_TC_RECORD_RUN); - int fra = frame - 1; - - if (fra < 0) { - fra = 0; - } - if (fra > (dur - 1)) { - fra = dur - 1; - } - ibuf = IMB_makeSingleUser(IMB_anim_absolute(ia->anim, fra, IMB_TC_RECORD_RUN, IMB_PROXY_NONE)); - - if (ibuf) { - image_init_after_load(ima, iuser, ibuf); - } - } - - return ibuf; -} - -static ImBuf *image_load_movie_file(Image *ima, ImageUser *iuser, int frame) -{ - struct ImBuf *ibuf = NULL; - const bool is_multiview = BKE_image_is_multiview(ima); - const int totfiles = image_num_files(ima); - - if (totfiles != BLI_listbase_count_at_most(&ima->anims, totfiles + 1)) { - image_free_anims(ima); - - for (int i = 0; i < totfiles; i++) { - /* allocate the ImageAnim */ - ImageAnim *ia = MEM_callocN(sizeof(ImageAnim), "Image Anim"); - BLI_addtail(&ima->anims, ia); - } - } - - if (!is_multiview) { - ibuf = load_movie_single(ima, iuser, frame, 0); - image_assign_ibuf(ima, ibuf, 0, frame); - } - else { - struct ImBuf **ibuf_arr; - const int totviews = BLI_listbase_count(&ima->views); - - ibuf_arr = MEM_mallocN(sizeof(ImBuf *) * totviews, "Image Views (movie) Imbufs"); - - for (int i = 0; i < totfiles; i++) { - ibuf_arr[i] = load_movie_single(ima, iuser, frame, i); - } - - if (BKE_image_is_stereo(ima) && ima->views_format == R_IMF_VIEWS_STEREO_3D) { - IMB_ImBufFromStereo3d(ima->stereo3d_format, ibuf_arr[0], &ibuf_arr[0], &ibuf_arr[1]); - } - - for (int i = 0; i < totviews; i++) { - image_assign_ibuf(ima, ibuf_arr[i], i, frame); - } - - /* return the original requested ImBuf */ - ibuf = ibuf_arr[(iuser ? iuser->multi_index : 0)]; - - /* "remove" the others (decrease their refcount) */ - for (int i = 0; i < totviews; i++) { - if (ibuf_arr[i] != ibuf) { - IMB_freeImBuf(ibuf_arr[i]); - } - } - - /* cleanup */ - MEM_freeN(ibuf_arr); - } - - return ibuf; -} - -static ImBuf *load_image_single(Image *ima, - ImageUser *iuser, - int cfra, - const int view_id, - const bool has_packed, - bool *r_cache_ibuf) -{ - char filepath[FILE_MAX]; - struct ImBuf *ibuf = NULL; - int flag; - - *r_cache_ibuf = true; - - /* is there a PackedFile with this image ? */ - if (has_packed) { - ImagePackedFile *imapf; - - flag = IB_rect | IB_multilayer; - flag |= imbuf_alpha_flags_for_image(ima); - - imapf = BLI_findlink(&ima->packedfiles, view_id); - if (imapf->packedfile) { - ibuf = IMB_ibImageFromMemory((unsigned char *)imapf->packedfile->data, - imapf->packedfile->size, - flag, - ima->colorspace_settings.name, - ""); - } - } - else { - ImageUser iuser_t; - - flag = IB_rect | IB_multilayer | IB_metadata; - flag |= imbuf_alpha_flags_for_image(ima); - - /* get the correct filepath */ - BKE_image_user_frame_calc(ima, iuser, cfra); - - if (iuser) { - iuser_t = *iuser; - } - else { - iuser_t.framenr = ima->lastframe; - } - - iuser_t.view = view_id; - - BKE_image_user_file_path(&iuser_t, ima, filepath); - - /* read ibuf */ - ibuf = IMB_loadiffname(filepath, flag, ima->colorspace_settings.name); - } - - if (ibuf) { -#ifdef WITH_OPENEXR - if (ibuf->ftype == IMB_FTYPE_OPENEXR && ibuf->userdata) { - /* Handle multilayer and multiview cases, don't assign ibuf here. - * will be set layer in BKE_image_acquire_ibuf from ima->rr. */ - if (IMB_exr_has_multilayer(ibuf->userdata)) { - image_create_multilayer(ima, ibuf, cfra); - ima->type = IMA_TYPE_MULTILAYER; - IMB_freeImBuf(ibuf); - ibuf = NULL; - /* NULL ibuf in the cache means the image failed to load. However for multilayer we load - * pixels into RenderResult instead and intentionally leave ibuf NULL. */ - *r_cache_ibuf = false; - } - } - else -#endif - { - image_init_after_load(ima, iuser, ibuf); - - /* Make packed file for auto-pack. */ - if ((has_packed == false) && (G.fileflags & G_FILE_AUTOPACK)) { - ImagePackedFile *imapf = MEM_mallocN(sizeof(ImagePackedFile), "Image Pack-file"); - BLI_addtail(&ima->packedfiles, imapf); - - STRNCPY(imapf->filepath, filepath); - imapf->packedfile = BKE_packedfile_new( - NULL, filepath, ID_BLEND_PATH_FROM_GLOBAL(&ima->id)); - } - } - } - - return ibuf; -} - -/* warning, 'iuser' can be NULL - * NOTE: Image->views was already populated (in image_update_views_format) - */ -static ImBuf *image_load_image_file(Image *ima, ImageUser *iuser, int cfra) -{ - struct ImBuf *ibuf = NULL; - const bool is_multiview = BKE_image_is_multiview(ima); - const int totfiles = image_num_files(ima); - bool has_packed = BKE_image_has_packedfile(ima); - - /* always ensure clean ima */ - BKE_image_free_buffers(ima); - - /* this should never happen, but just playing safe */ - if (has_packed) { - if (totfiles != BLI_listbase_count_at_most(&ima->packedfiles, totfiles + 1)) { - image_free_packedfiles(ima); - has_packed = false; - } - } - - if (!is_multiview) { - bool put_in_cache; - ibuf = load_image_single(ima, iuser, cfra, 0, has_packed, &put_in_cache); - if (put_in_cache) { - image_assign_ibuf(ima, ibuf, IMA_NO_INDEX, 0); - } - } - else { - struct ImBuf **ibuf_arr; - const int totviews = BLI_listbase_count(&ima->views); - BLI_assert(totviews > 0); - - ibuf_arr = MEM_callocN(sizeof(ImBuf *) * totviews, "Image Views Imbufs"); - bool *cache_ibuf_arr = MEM_mallocN(sizeof(bool) * totviews, "Image Views Put In Cache"); - - for (int i = 0; i < totfiles; i++) { - ibuf_arr[i] = load_image_single(ima, iuser, cfra, i, has_packed, cache_ibuf_arr + i); - } - - /* multi-views/multi-layers OpenEXR files directly populate ima, and return NULL ibuf... */ - if (BKE_image_is_stereo(ima) && ima->views_format == R_IMF_VIEWS_STEREO_3D && ibuf_arr[0] && - totfiles == 1 && totviews >= 2) { - IMB_ImBufFromStereo3d(ima->stereo3d_format, ibuf_arr[0], &ibuf_arr[0], &ibuf_arr[1]); - } - - /* return the original requested ImBuf */ - int i = (iuser && iuser->multi_index < totviews) ? iuser->multi_index : 0; - ibuf = ibuf_arr[i]; - - for (i = 0; i < totviews; i++) { - if (cache_ibuf_arr[i]) { - image_assign_ibuf(ima, ibuf_arr[i], i, 0); - } - } - - /* "remove" the others (decrease their refcount) */ - for (i = 0; i < totviews; i++) { - if (ibuf_arr[i] != ibuf) { - IMB_freeImBuf(ibuf_arr[i]); - } - } - - /* cleanup */ - MEM_freeN(ibuf_arr); - MEM_freeN(cache_ibuf_arr); - } - - return ibuf; -} - -static ImBuf *image_get_ibuf_multilayer(Image *ima, ImageUser *iuser) -{ - ImBuf *ibuf = NULL; - - if (ima->rr == NULL) { - ibuf = image_load_image_file(ima, iuser, 0); - if (ibuf) { /* actually an error */ - ima->type = IMA_TYPE_IMAGE; - return ibuf; - } - } - if (ima->rr) { - RenderPass *rpass = BKE_image_multilayer_index(ima->rr, iuser); - - if (rpass) { - ibuf = IMB_allocImBuf(ima->rr->rectx, ima->rr->recty, 32, 0); - - image_init_after_load(ima, iuser, ibuf); - - ibuf->rect_float = rpass->rect; - ibuf->flags |= IB_rectfloat; - ibuf->channels = rpass->channels; - - BKE_imbuf_stamp_info(ima->rr, ibuf); - - image_assign_ibuf(ima, ibuf, iuser ? iuser->multi_index : IMA_NO_INDEX, 0); - } - } - - return ibuf; -} - -/* showing RGBA result itself (from compo/sequence) or - * like exr, using layers etc */ -/* always returns a single ibuf, also during render progress */ -static ImBuf *image_get_render_result(Image *ima, ImageUser *iuser, void **r_lock) -{ - Render *re; - RenderResult rres; - RenderView *rv; - float *rectf, *rectz; - unsigned int *rect; - float dither; - int channels, layer, pass; - ImBuf *ibuf; - int from_render = (ima->render_slot == ima->last_render_slot); - int actview; - - if (!(iuser && iuser->scene)) { - return NULL; - } - - /* if we the caller is not going to release the lock, don't give the image */ - if (!r_lock) { - return NULL; - } - - re = RE_GetSceneRender(iuser->scene); - - channels = 4; - layer = iuser->layer; - pass = iuser->pass; - actview = iuser->view; - - if (BKE_image_is_stereo(ima) && (iuser->flag & IMA_SHOW_STEREO)) { - actview = iuser->multiview_eye; - } - - RenderSlot *slot; - if (from_render) { - RE_AcquireResultImage(re, &rres, actview); - } - else if ((slot = BKE_image_get_renderslot(ima, ima->render_slot))->render) { - rres = *(slot->render); - rres.have_combined = ((RenderView *)rres.views.first)->rectf != NULL; - } - else { - memset(&rres, 0, sizeof(RenderResult)); - } - - if (!(rres.rectx > 0 && rres.recty > 0)) { - if (from_render) { - RE_ReleaseResultImage(re); - } - return NULL; - } - - /* release is done in BKE_image_release_ibuf using r_lock */ - if (from_render) { - BLI_thread_lock(LOCK_VIEWER); - *r_lock = re; - rv = NULL; - } - else { - rv = BLI_findlink(&rres.views, actview); - if (rv == NULL) { - rv = rres.views.first; - } - } - - /* this gives active layer, composite or sequence result */ - if (rv == NULL) { - rect = (unsigned int *)rres.rect32; - rectf = rres.rectf; - rectz = rres.rectz; - } - else { - rect = (unsigned int *)rv->rect32; - rectf = rv->rectf; - rectz = rv->rectz; - } - - dither = iuser->scene->r.dither_intensity; - - /* combined layer gets added as first layer */ - if (rres.have_combined && layer == 0) { - /* pass */ - } - else if (rect && layer == 0) { - /* rect32 is set when there's a Sequence pass, this pass seems - * to have layer=0 (this is from image_buttons.c) - * in this case we ignore float buffer, because it could have - * hung from previous pass which was float - */ - rectf = NULL; - } - else if (rres.layers.first) { - RenderLayer *rl = BLI_findlink(&rres.layers, layer - (rres.have_combined ? 1 : 0)); - if (rl) { - RenderPass *rpass = image_render_pass_get(rl, pass, actview, NULL); - if (rpass) { - rectf = rpass->rect; - if (pass != 0) { - channels = rpass->channels; - dither = 0.0f; /* don't dither passes */ - } - } - - for (rpass = rl->passes.first; rpass; rpass = rpass->next) { - if (STREQ(rpass->name, RE_PASSNAME_Z) && rpass->view_id == actview) { - rectz = rpass->rect; - } - } - } - } - - ibuf = image_get_cached_ibuf_for_index_entry(ima, IMA_NO_INDEX, 0, NULL); - - /* make ibuf if needed, and initialize it */ - if (ibuf == NULL) { - ibuf = IMB_allocImBuf(rres.rectx, rres.recty, 32, 0); - image_assign_ibuf(ima, ibuf, IMA_NO_INDEX, 0); - } - - /* Set color space settings for a byte buffer. - * - * This is mainly to make it so color management treats byte buffer - * from render result with Save Buffers enabled as final display buffer - * and doesn't apply any color management on it. - * - * For other cases we need to be sure it stays to default byte buffer space. - */ - if (ibuf->rect != rect) { - const char *colorspace = IMB_colormanagement_role_colorspace_name_get(COLOR_ROLE_DEFAULT_BYTE); - IMB_colormanagement_assign_rect_colorspace(ibuf, colorspace); - } - - /* invalidate color managed buffers if render result changed */ - BLI_thread_lock(LOCK_COLORMANAGE); - if (ibuf->x != rres.rectx || ibuf->y != rres.recty || ibuf->rect_float != rectf) { - ibuf->userflags |= IB_DISPLAY_BUFFER_INVALID; - } - - ibuf->x = rres.rectx; - ibuf->y = rres.recty; - - if (rect) { - imb_freerectImBuf(ibuf); - ibuf->rect = rect; - } - else { - /* byte buffer of render result has been freed, make sure image buffers - * does not reference to this buffer anymore - * need check for whether byte buffer was allocated and owned by image itself - * or if it's reusing buffer from render result - */ - if ((ibuf->mall & IB_rect) == 0) { - ibuf->rect = NULL; - } - } - - if (rectf) { - ibuf->rect_float = rectf; - ibuf->flags |= IB_rectfloat; - ibuf->channels = channels; - } - else { - ibuf->rect_float = NULL; - ibuf->flags &= ~IB_rectfloat; - } - - if (rectz) { - ibuf->zbuf_float = rectz; - ibuf->flags |= IB_zbuffloat; - } - else { - ibuf->zbuf_float = NULL; - ibuf->flags &= ~IB_zbuffloat; - } - - /* TODO(sergey): Make this faster by either simply referencing the stamp - * or by changing both ImBug and RenderResult to use same data type to - * store metadata. */ - if (ibuf->metadata != NULL) { - IMB_metadata_free(ibuf->metadata); - ibuf->metadata = NULL; - } - BKE_imbuf_stamp_info(&rres, ibuf); - - BLI_thread_unlock(LOCK_COLORMANAGE); - - ibuf->dither = dither; - - return ibuf; -} - -static int image_get_multiview_index(Image *ima, ImageUser *iuser) -{ - const bool is_multilayer = BKE_image_is_multilayer(ima); - const bool is_backdrop = (ima->source == IMA_SRC_VIEWER) && (ima->type == IMA_TYPE_COMPOSITE) && - (iuser == NULL); - int index = BKE_image_has_multiple_ibufs(ima) ? 0 : IMA_NO_INDEX; - - if (is_multilayer) { - return iuser ? iuser->multi_index : index; - } - if (is_backdrop) { - if (BKE_image_is_stereo(ima)) { - /* backdrop hackaround (since there is no iuser */ - return ima->eye; - } - } - else if (BKE_image_is_multiview(ima)) { - return iuser ? iuser->multi_index : index; - } - - return index; -} - -static void image_get_entry_and_index(Image *ima, ImageUser *iuser, int *r_entry, int *r_index) -{ - int frame = 0, index = image_get_multiview_index(ima, iuser); - - /* see if we already have an appropriate ibuf, with image source and type */ - if (ima->source == IMA_SRC_MOVIE) { - frame = iuser ? iuser->framenr : ima->lastframe; - } - else if (ima->source == IMA_SRC_SEQUENCE) { - if (ima->type == IMA_TYPE_IMAGE) { - frame = iuser ? iuser->framenr : ima->lastframe; - } - else if (ima->type == IMA_TYPE_MULTILAYER) { - frame = iuser ? iuser->framenr : ima->lastframe; - } - } - else if (ima->source == IMA_SRC_TILED) { - frame = image_get_tile_number_from_iuser(ima, iuser); - } - - *r_entry = frame; - *r_index = index; -} - -/* Get the ibuf from an image cache for a given image user. - * - * Returns referenced image buffer if it exists, callee is to - * call IMB_freeImBuf to de-reference the image buffer after - * it's done handling it. - */ -static ImBuf *image_get_cached_ibuf( - Image *ima, ImageUser *iuser, int *r_entry, int *r_index, bool *r_is_cached_empty) -{ - ImBuf *ibuf = NULL; - int entry = 0, index = image_get_multiview_index(ima, iuser); - - /* see if we already have an appropriate ibuf, with image source and type */ - if (ima->source == IMA_SRC_MOVIE) { - entry = iuser ? iuser->framenr : ima->lastframe; - ibuf = image_get_cached_ibuf_for_index_entry(ima, index, entry, r_is_cached_empty); - ima->lastframe = entry; - } - else if (ima->source == IMA_SRC_SEQUENCE) { - if (ima->type == IMA_TYPE_IMAGE) { - entry = iuser ? iuser->framenr : ima->lastframe; - ibuf = image_get_cached_ibuf_for_index_entry(ima, index, entry, r_is_cached_empty); - ima->lastframe = entry; - } - else if (ima->type == IMA_TYPE_MULTILAYER) { - entry = iuser ? iuser->framenr : ima->lastframe; - ibuf = image_get_cached_ibuf_for_index_entry(ima, index, entry, r_is_cached_empty); - } - } - else if (ima->source == IMA_SRC_FILE) { - if (ima->type == IMA_TYPE_IMAGE) { - ibuf = image_get_cached_ibuf_for_index_entry(ima, index, 0, r_is_cached_empty); - } - else if (ima->type == IMA_TYPE_MULTILAYER) { - ibuf = image_get_cached_ibuf_for_index_entry(ima, index, 0, r_is_cached_empty); - } - } - else if (ima->source == IMA_SRC_GENERATED) { - ibuf = image_get_cached_ibuf_for_index_entry(ima, index, 0, r_is_cached_empty); - } - else if (ima->source == IMA_SRC_VIEWER) { - /* always verify entirely, not that this shouldn't happen - * as part of texture sampling in rendering anyway, so not - * a big bottleneck */ - } - else if (ima->source == IMA_SRC_TILED) { - if (ELEM(ima->type, IMA_TYPE_IMAGE, IMA_TYPE_MULTILAYER)) { - entry = image_get_tile_number_from_iuser(ima, iuser); - ibuf = image_get_cached_ibuf_for_index_entry(ima, index, entry, r_is_cached_empty); - } - } - - if (r_entry) { - *r_entry = entry; - } - - if (r_index) { - *r_index = index; - } - - return ibuf; -} - -BLI_INLINE bool image_quick_test(Image *ima, const ImageUser *iuser) -{ - if (ima == NULL) { - return false; - } - - ImageTile *tile = BKE_image_get_tile_from_iuser(ima, iuser); - if (tile == NULL) { - return false; - } - - return true; -} - -/** - * Checks optional #ImageUser and verifies/creates #ImBuf. - * - * \warning Not thread-safe, so callee should worry about thread locks. - */ -static ImBuf *image_acquire_ibuf(Image *ima, ImageUser *iuser, void **r_lock) -{ - ImBuf *ibuf = NULL; - int entry = 0, index = 0; - - if (r_lock) { - *r_lock = NULL; - } - - /* quick reject tests */ - if (!image_quick_test(ima, iuser)) { - return NULL; - } - - bool is_cached_empty = false; - ibuf = image_get_cached_ibuf(ima, iuser, &entry, &index, &is_cached_empty); - if (is_cached_empty) { - return NULL; - } - - if (ibuf == NULL) { - /* we are sure we have to load the ibuf, using source and type */ - if (ima->source == IMA_SRC_MOVIE) { - /* source is from single file, use flipbook to store ibuf */ - ibuf = image_load_movie_file(ima, iuser, entry); - } - else if (ima->source == IMA_SRC_SEQUENCE) { - if (ima->type == IMA_TYPE_IMAGE) { - /* regular files, ibufs in flipbook, allows saving */ - ibuf = image_load_sequence_file(ima, iuser, entry, entry); - } - /* no else; on load the ima type can change */ - if (ima->type == IMA_TYPE_MULTILAYER) { - /* only 1 layer/pass stored in imbufs, no exrhandle anim storage, no saving */ - ibuf = image_load_sequence_multilayer(ima, iuser, entry, entry); - } - } - else if (ima->source == IMA_SRC_TILED) { - if (ima->type == IMA_TYPE_IMAGE) { - /* regular files, ibufs in flipbook, allows saving */ - ibuf = image_load_sequence_file(ima, iuser, entry, 0); - } - /* no else; on load the ima type can change */ - if (ima->type == IMA_TYPE_MULTILAYER) { - /* only 1 layer/pass stored in imbufs, no exrhandle anim storage, no saving */ - ibuf = image_load_sequence_multilayer(ima, iuser, entry, 0); - } - } - else if (ima->source == IMA_SRC_FILE) { - - if (ima->type == IMA_TYPE_IMAGE) { - ibuf = image_load_image_file(ima, iuser, entry); /* cfra only for '#', this global is OK */ - } - /* no else; on load the ima type can change */ - if (ima->type == IMA_TYPE_MULTILAYER) { - /* keeps render result, stores ibufs in listbase, allows saving */ - ibuf = image_get_ibuf_multilayer(ima, iuser); - } - } - else if (ima->source == IMA_SRC_GENERATED) { - /* generated is: ibuf is allocated dynamically */ - /* UV testgrid or black or solid etc */ - if (ima->gen_x == 0) { - ima->gen_x = 1024; - } - if (ima->gen_y == 0) { - ima->gen_y = 1024; - } - if (ima->gen_depth == 0) { - ima->gen_depth = 24; - } - ibuf = add_ibuf_size(ima->gen_x, - ima->gen_y, - ima->filepath, - ima->gen_depth, - (ima->gen_flag & IMA_GEN_FLOAT) != 0, - ima->gen_type, - ima->gen_color, - &ima->colorspace_settings); - image_assign_ibuf(ima, ibuf, index, 0); - } - else if (ima->source == IMA_SRC_VIEWER) { - if (ima->type == IMA_TYPE_R_RESULT) { - /* always verify entirely, and potentially - * returns pointer to release later */ - ibuf = image_get_render_result(ima, iuser, r_lock); - } - else if (ima->type == IMA_TYPE_COMPOSITE) { - /* requires lock/unlock, otherwise don't return image */ - if (r_lock) { - /* unlock in BKE_image_release_ibuf */ - BLI_thread_lock(LOCK_VIEWER); - *r_lock = ima; - - /* XXX anim play for viewer nodes not yet supported */ - entry = 0; // XXX iuser ? iuser->framenr : 0; - ibuf = image_get_cached_ibuf_for_index_entry(ima, index, entry, NULL); - - if (!ibuf) { - /* Composite Viewer, all handled in compositor */ - /* fake ibuf, will be filled in compositor */ - ibuf = IMB_allocImBuf(256, 256, 32, IB_rect | IB_rectfloat); - image_assign_ibuf(ima, ibuf, index, entry); - } - } - } - } - - /* We only want movies and sequences to be memory limited. */ - if (ibuf != NULL && !ELEM(ima->source, IMA_SRC_MOVIE, IMA_SRC_SEQUENCE)) { - ibuf->userflags |= IB_PERSISTENT; - } - } - - BKE_image_tag_time(ima); - - return ibuf; -} - -ImBuf *BKE_image_acquire_ibuf(Image *ima, ImageUser *iuser, void **r_lock) -{ - /* NOTE: same as #image_acquire_ibuf, but can be used to retrieve images being rendered in - * a thread safe way, always call both acquire and release. */ - - if (ima == NULL) { - return NULL; - } - - ImBuf *ibuf; - - BLI_mutex_lock(ima->runtime.cache_mutex); - - ibuf = image_acquire_ibuf(ima, iuser, r_lock); - - BLI_mutex_unlock(ima->runtime.cache_mutex); - - return ibuf; -} - -void BKE_image_release_ibuf(Image *ima, ImBuf *ibuf, void *lock) -{ - if (lock != NULL) { - /* for getting image during threaded render / compositing, need to release */ - if (lock == ima) { - BLI_thread_unlock(LOCK_VIEWER); /* viewer image */ - } - else { - RE_ReleaseResultImage(lock); /* render result */ - BLI_thread_unlock(LOCK_VIEWER); /* view image imbuf */ - } - } - - if (ibuf) { - BLI_mutex_lock(ima->runtime.cache_mutex); - IMB_freeImBuf(ibuf); - BLI_mutex_unlock(ima->runtime.cache_mutex); - } -} - -bool BKE_image_has_ibuf(Image *ima, ImageUser *iuser) -{ - ImBuf *ibuf; - - /* quick reject tests */ - if (!image_quick_test(ima, iuser)) { - return false; - } - - BLI_mutex_lock(ima->runtime.cache_mutex); - - ibuf = image_get_cached_ibuf(ima, iuser, NULL, NULL, NULL); - - if (!ibuf) { - ibuf = image_acquire_ibuf(ima, iuser, NULL); - } - - BLI_mutex_unlock(ima->runtime.cache_mutex); - - IMB_freeImBuf(ibuf); - - return ibuf != NULL; -} - -/* ******** Pool for image buffers ******** */ - -typedef struct ImagePoolItem { - struct ImagePoolItem *next, *prev; - Image *image; - ImBuf *ibuf; - int index; - int entry; -} ImagePoolItem; - -typedef struct ImagePool { - ListBase image_buffers; - BLI_mempool *memory_pool; - ThreadMutex mutex; -} ImagePool; - -ImagePool *BKE_image_pool_new(void) -{ - ImagePool *pool = MEM_callocN(sizeof(ImagePool), "Image Pool"); - pool->memory_pool = BLI_mempool_create(sizeof(ImagePoolItem), 0, 128, BLI_MEMPOOL_NOP); - - BLI_mutex_init(&pool->mutex); - - return pool; -} - -void BKE_image_pool_free(ImagePool *pool) -{ - /* Use single lock to dereference all the image buffers. */ - BLI_mutex_lock(&pool->mutex); - for (ImagePoolItem *item = pool->image_buffers.first; item != NULL; item = item->next) { - if (item->ibuf != NULL) { - BLI_mutex_lock(item->image->runtime.cache_mutex); - IMB_freeImBuf(item->ibuf); - BLI_mutex_unlock(item->image->runtime.cache_mutex); - } - } - BLI_mutex_unlock(&pool->mutex); - - BLI_mempool_destroy(pool->memory_pool); - - BLI_mutex_end(&pool->mutex); - - MEM_freeN(pool); -} - -BLI_INLINE ImBuf *image_pool_find_item( - ImagePool *pool, Image *image, int entry, int index, bool *found) -{ - ImagePoolItem *item; - - *found = false; - - for (item = pool->image_buffers.first; item; item = item->next) { - if (item->image == image && item->entry == entry && item->index == index) { - *found = true; - return item->ibuf; - } - } - - return NULL; -} - -ImBuf *BKE_image_pool_acquire_ibuf(Image *ima, ImageUser *iuser, ImagePool *pool) -{ - ImBuf *ibuf; - int index, entry; - bool found; - - if (!image_quick_test(ima, iuser)) { - return NULL; - } - - if (pool == NULL) { - /* Pool could be NULL, in this case use general acquire function. */ - return BKE_image_acquire_ibuf(ima, iuser, NULL); - } - - image_get_entry_and_index(ima, iuser, &entry, &index); - - /* Use double-checked locking, to avoid locking when the requested image buffer is already in the - * pool. */ - - ibuf = image_pool_find_item(pool, ima, entry, index, &found); - if (found) { - return ibuf; - } - - /* Lock the pool, to allow thread-safe modification of the content of the pool. */ - BLI_mutex_lock(&pool->mutex); - - ibuf = image_pool_find_item(pool, ima, entry, index, &found); - - /* Will also create item even in cases image buffer failed to load, - * prevents trying to load the same buggy file multiple times. */ - if (!found) { - ImagePoolItem *item; - - /* Thread-safe acquisition of an image buffer from the image. - * The acquisition does not use image pools, so there is no risk of recursive or out-of-order - * mutex locking. */ - ibuf = BKE_image_acquire_ibuf(ima, iuser, NULL); - - item = BLI_mempool_alloc(pool->memory_pool); - item->image = ima; - item->entry = entry; - item->index = index; - item->ibuf = ibuf; - - BLI_addtail(&pool->image_buffers, item); - } - - BLI_mutex_unlock(&pool->mutex); - - return ibuf; -} - -void BKE_image_pool_release_ibuf(Image *ima, ImBuf *ibuf, ImagePool *pool) -{ - /* if pool wasn't actually used, use general release stuff, - * for pools image buffers will be dereferenced on pool free - */ - if (pool == NULL) { - BKE_image_release_ibuf(ima, ibuf, NULL); - } -} - -int BKE_image_user_frame_get(const ImageUser *iuser, int cfra, bool *r_is_in_range) -{ - const int len = iuser->frames; - - if (r_is_in_range) { - *r_is_in_range = false; - } - - if (len == 0) { - return 0; - } - - int framenr; - cfra = cfra - iuser->sfra + 1; - - /* cyclic */ - if (iuser->cycl) { - cfra = ((cfra) % len); - if (cfra < 0) { - cfra += len; - } - if (cfra == 0) { - cfra = len; - } - - if (r_is_in_range) { - *r_is_in_range = true; - } - } - - if (cfra < 0) { - cfra = 0; - } - else if (cfra > len) { - cfra = len; - } - else { - if (r_is_in_range) { - *r_is_in_range = true; - } - } - - /* transform to images space */ - framenr = cfra; - if (framenr > iuser->frames) { - framenr = iuser->frames; - } - - if (iuser->cycl) { - framenr = ((framenr) % len); - while (framenr < 0) { - framenr += len; - } - if (framenr == 0) { - framenr = len; - } - } - - /* important to apply after else we can't loop on frames 100 - 110 for eg. */ - framenr += iuser->offset; - - return framenr; -} - -void BKE_image_user_frame_calc(Image *ima, ImageUser *iuser, int cfra) -{ - if (iuser) { - if (ima && BKE_image_is_animated(ima)) { - /* Compute current frame for animated image. */ - bool is_in_range; - const int framenr = BKE_image_user_frame_get(iuser, cfra, &is_in_range); - - if (is_in_range) { - iuser->flag |= IMA_USER_FRAME_IN_RANGE; - } - else { - iuser->flag &= ~IMA_USER_FRAME_IN_RANGE; - } - - iuser->framenr = framenr; - } - else { - /* Set fixed frame number for still image. */ - iuser->framenr = 0; - iuser->flag |= IMA_USER_FRAME_IN_RANGE; - } - - if (ima && ima->gpuframenr != iuser->framenr) { - /* NOTE: a single texture and refresh doesn't really work when - * multiple image users may use different frames, this is to - * be improved with perhaps a GPU texture cache. */ - BKE_image_partial_update_mark_full_update(ima); - ima->gpuframenr = iuser->framenr; - } - - iuser->flag &= ~IMA_NEED_FRAME_RECALC; - } -} - -/* goes over all ImageUsers, and sets frame numbers if auto-refresh is set */ -static void image_editors_update_frame(Image *ima, - ID *UNUSED(iuser_id), - ImageUser *iuser, - void *customdata) -{ - int cfra = *(int *)customdata; - - if ((iuser->flag & IMA_ANIM_ALWAYS) || (iuser->flag & IMA_NEED_FRAME_RECALC)) { - BKE_image_user_frame_calc(ima, iuser, cfra); - } -} - -void BKE_image_editors_update_frame(const Main *bmain, int cfra) -{ - /* This only updates images used by the user interface. For others the - * dependency graph will call BKE_image_user_id_eval_animation. */ - wmWindowManager *wm = bmain->wm.first; - image_walk_id_all_users(&wm->id, false, &cfra, image_editors_update_frame); -} - -static void image_user_id_has_animation(Image *ima, - ID *UNUSED(iuser_id), - ImageUser *UNUSED(iuser), - void *customdata) -{ - if (ima && BKE_image_is_animated(ima)) { - *(bool *)customdata = true; - } -} - -bool BKE_image_user_id_has_animation(ID *id) -{ - /* For the dependency graph, this does not consider nested node - * trees as these are handled as their own data-block. */ - bool has_animation = false; - bool skip_nested_nodes = true; - image_walk_id_all_users(id, skip_nested_nodes, &has_animation, image_user_id_has_animation); - return has_animation; -} - -static void image_user_id_eval_animation(Image *ima, - ID *UNUSED(iduser_id), - ImageUser *iuser, - void *customdata) -{ - if (ima && BKE_image_is_animated(ima)) { - Depsgraph *depsgraph = (Depsgraph *)customdata; - - if ((iuser->flag & IMA_ANIM_ALWAYS) || (iuser->flag & IMA_NEED_FRAME_RECALC) || - (DEG_get_mode(depsgraph) == DAG_EVAL_RENDER)) { - float cfra = DEG_get_ctime(depsgraph); - - BKE_image_user_frame_calc(ima, iuser, cfra); - } - } -} - -void BKE_image_user_id_eval_animation(Depsgraph *depsgraph, ID *id) -{ - /* This is called from the dependency graph to update the image - * users in data-blocks. It computes the current frame number - * and tags the image to be refreshed. - * This does not consider nested node trees as these are handled - * as their own data-block. */ - bool skip_nested_nodes = true; - image_walk_id_all_users(id, skip_nested_nodes, depsgraph, image_user_id_eval_animation); -} - -void BKE_image_user_file_path(ImageUser *iuser, Image *ima, char *filepath) -{ - BKE_image_user_file_path_ex(iuser, ima, filepath, true); -} - -void BKE_image_user_file_path_ex(ImageUser *iuser, Image *ima, char *filepath, bool resolve_udim) -{ - if (BKE_image_is_multiview(ima)) { - ImageView *iv = BLI_findlink(&ima->views, iuser->view); - if (iv->filepath[0]) { - BLI_strncpy(filepath, iv->filepath, FILE_MAX); - } - else { - BLI_strncpy(filepath, ima->filepath, FILE_MAX); - } - } - else { - BLI_strncpy(filepath, ima->filepath, FILE_MAX); - } - - if (ELEM(ima->source, IMA_SRC_SEQUENCE, IMA_SRC_TILED)) { - char head[FILE_MAX], tail[FILE_MAX]; - unsigned short numlen; - - int index; - if (ima->source == IMA_SRC_SEQUENCE) { - index = iuser ? iuser->framenr : ima->lastframe; - BLI_path_sequence_decode(filepath, head, tail, &numlen); - BLI_path_sequence_encode(filepath, head, tail, numlen, index); - } - else if (resolve_udim) { - index = image_get_tile_number_from_iuser(ima, iuser); - - eUDIM_TILE_FORMAT tile_format; - char *udim_pattern = BKE_image_get_tile_strformat(filepath, &tile_format); - BKE_image_set_filepath_from_tile_number(filepath, udim_pattern, tile_format, index); - MEM_SAFE_FREE(udim_pattern); - } - } - - BLI_path_abs(filepath, ID_BLEND_PATH_FROM_GLOBAL(&ima->id)); -} - -bool BKE_image_has_alpha(Image *image) -{ - void *lock; - ImBuf *ibuf = BKE_image_acquire_ibuf(image, NULL, &lock); - const int planes = (ibuf ? ibuf->planes : 0); - BKE_image_release_ibuf(image, ibuf, lock); - - if (planes == 32 || planes == 16) { - return true; - } - - return false; -} - -void BKE_image_get_size(Image *image, ImageUser *iuser, int *r_width, int *r_height) -{ - ImBuf *ibuf = NULL; - void *lock; - - if (image != NULL) { - ibuf = BKE_image_acquire_ibuf(image, iuser, &lock); - } - - if (ibuf && ibuf->x > 0 && ibuf->y > 0) { - *r_width = ibuf->x; - *r_height = ibuf->y; - } - else if (image != NULL && image->type == IMA_TYPE_R_RESULT && iuser != NULL && - iuser->scene != NULL) { - Scene *scene = iuser->scene; - *r_width = (scene->r.xsch * scene->r.size) / 100; - *r_height = (scene->r.ysch * scene->r.size) / 100; - if ((scene->r.mode & R_BORDER) && (scene->r.mode & R_CROP)) { - *r_width *= BLI_rctf_size_x(&scene->r.border); - *r_height *= BLI_rctf_size_y(&scene->r.border); - } - } - else { - *r_width = IMG_SIZE_FALLBACK; - *r_height = IMG_SIZE_FALLBACK; - } - - if (image != NULL) { - BKE_image_release_ibuf(image, ibuf, lock); - } -} - -void BKE_image_get_size_fl(Image *image, ImageUser *iuser, float r_size[2]) -{ - int width, height; - BKE_image_get_size(image, iuser, &width, &height); - - r_size[0] = (float)width; - r_size[1] = (float)height; -} - -void BKE_image_get_aspect(Image *image, float *r_aspx, float *r_aspy) -{ - *r_aspx = 1.0; - - /* x is always 1 */ - if (image) { - *r_aspy = image->aspy / image->aspx; - } - else { - *r_aspy = 1.0f; - } -} - -unsigned char *BKE_image_get_pixels_for_frame(struct Image *image, int frame, int tile) -{ - ImageUser iuser; - BKE_imageuser_default(&iuser); - void *lock; - ImBuf *ibuf; - unsigned char *pixels = NULL; - - iuser.framenr = frame; - iuser.tile = tile; - - ibuf = BKE_image_acquire_ibuf(image, &iuser, &lock); - - if (ibuf) { - pixels = (unsigned char *)ibuf->rect; - - if (pixels) { - pixels = MEM_dupallocN(pixels); - } - - BKE_image_release_ibuf(image, ibuf, lock); - } - - if (!pixels) { - return NULL; - } - - return pixels; -} - -float *BKE_image_get_float_pixels_for_frame(struct Image *image, int frame, int tile) -{ - ImageUser iuser; - BKE_imageuser_default(&iuser); - void *lock; - ImBuf *ibuf; - float *pixels = NULL; - - iuser.framenr = frame; - iuser.tile = tile; - - ibuf = BKE_image_acquire_ibuf(image, &iuser, &lock); - - if (ibuf) { - pixels = ibuf->rect_float; - - if (pixels) { - pixels = MEM_dupallocN(pixels); - } - - BKE_image_release_ibuf(image, ibuf, lock); - } - - if (!pixels) { - return NULL; - } - - return pixels; -} - -int BKE_image_sequence_guess_offset(Image *image) -{ - return BLI_path_sequence_decode(image->filepath, NULL, NULL, NULL); -} - -bool BKE_image_has_anim(Image *ima) -{ - return (BLI_listbase_is_empty(&ima->anims) == false); -} - -bool BKE_image_has_packedfile(const Image *ima) -{ - return (BLI_listbase_is_empty(&ima->packedfiles) == false); -} - -bool BKE_image_has_filepath(Image *ima) -{ - /* This could be improved to detect cases like //../../, currently path - * remapping empty file paths empty. */ - return ima->filepath[0] != '\0'; -} - -bool BKE_image_is_animated(Image *image) -{ - return ELEM(image->source, IMA_SRC_MOVIE, IMA_SRC_SEQUENCE); -} - -bool BKE_image_has_multiple_ibufs(Image *image) -{ - return ELEM(image->source, IMA_SRC_MOVIE, IMA_SRC_SEQUENCE, IMA_SRC_TILED); -} - -bool BKE_image_is_dirty_writable(Image *image, bool *r_is_writable) -{ - bool is_dirty = false; - bool is_writable = false; - - BLI_mutex_lock(image->runtime.cache_mutex); - if (image->cache != NULL) { - struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); - - while (!IMB_moviecacheIter_done(iter)) { - ImBuf *ibuf = IMB_moviecacheIter_getImBuf(iter); - if (ibuf != NULL && ibuf->userflags & IB_BITMAPDIRTY) { - is_writable = BKE_image_buffer_format_writable(ibuf); - is_dirty = true; - break; - } - IMB_moviecacheIter_step(iter); - } - IMB_moviecacheIter_free(iter); - } - BLI_mutex_unlock(image->runtime.cache_mutex); - - if (r_is_writable) { - *r_is_writable = is_writable; - } - - return is_dirty; -} - -bool BKE_image_is_dirty(Image *image) -{ - return BKE_image_is_dirty_writable(image, NULL); -} - -void BKE_image_mark_dirty(Image *UNUSED(image), ImBuf *ibuf) -{ - ibuf->userflags |= IB_BITMAPDIRTY; -} - -bool BKE_image_buffer_format_writable(ImBuf *ibuf) -{ - ImageFormatData im_format; - ImbFormatOptions options_dummy; - BKE_imbuf_to_image_format(&im_format, ibuf); - return (BKE_image_imtype_to_ftype(im_format.imtype, &options_dummy) == ibuf->ftype); -} - -void BKE_image_file_format_set(Image *image, int ftype, const ImbFormatOptions *options) -{ - BLI_mutex_lock(image->runtime.cache_mutex); - if (image->cache != NULL) { - struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); - - while (!IMB_moviecacheIter_done(iter)) { - ImBuf *ibuf = IMB_moviecacheIter_getImBuf(iter); - if (ibuf != NULL) { - ibuf->ftype = ftype; - ibuf->foptions = *options; - } - IMB_moviecacheIter_step(iter); - } - IMB_moviecacheIter_free(iter); - } - BLI_mutex_unlock(image->runtime.cache_mutex); -} - -bool BKE_image_has_loaded_ibuf(Image *image) -{ - bool has_loaded_ibuf = false; - - BLI_mutex_lock(image->runtime.cache_mutex); - if (image->cache != NULL) { - struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); - - while (!IMB_moviecacheIter_done(iter)) { - ImBuf *ibuf = IMB_moviecacheIter_getImBuf(iter); - if (ibuf != NULL) { - has_loaded_ibuf = true; - break; - } - IMB_moviecacheIter_step(iter); - } - IMB_moviecacheIter_free(iter); - } - BLI_mutex_unlock(image->runtime.cache_mutex); - - return has_loaded_ibuf; -} - -ImBuf *BKE_image_get_ibuf_with_name(Image *image, const char *name) -{ - ImBuf *ibuf = NULL; - - BLI_mutex_lock(image->runtime.cache_mutex); - if (image->cache != NULL) { - struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); - - while (!IMB_moviecacheIter_done(iter)) { - ImBuf *current_ibuf = IMB_moviecacheIter_getImBuf(iter); - if (current_ibuf != NULL && STREQ(current_ibuf->name, name)) { - ibuf = current_ibuf; - IMB_refImBuf(ibuf); - break; - } - IMB_moviecacheIter_step(iter); - } - IMB_moviecacheIter_free(iter); - } - BLI_mutex_unlock(image->runtime.cache_mutex); - - return ibuf; -} - -ImBuf *BKE_image_get_first_ibuf(Image *image) -{ - ImBuf *ibuf = NULL; - - BLI_mutex_lock(image->runtime.cache_mutex); - if (image->cache != NULL) { - struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); - - while (!IMB_moviecacheIter_done(iter)) { - ibuf = IMB_moviecacheIter_getImBuf(iter); - if (ibuf != NULL) { - IMB_refImBuf(ibuf); - } - break; - } - IMB_moviecacheIter_free(iter); - } - BLI_mutex_unlock(image->runtime.cache_mutex); - - return ibuf; -} - -static void image_update_views_format(Image *ima, ImageUser *iuser) -{ - SceneRenderView *srv; - ImageView *iv; - Scene *scene = iuser->scene; - const bool is_multiview = ((scene->r.scemode & R_MULTIVIEW) != 0) && - ((ima->flag & IMA_USE_VIEWS) != 0); - - /* reset the image views */ - BKE_image_free_views(ima); - - if (!is_multiview) { - /* nothing to do */ - } - else if (ima->views_format == R_IMF_VIEWS_STEREO_3D) { - const char *names[2] = {STEREO_LEFT_NAME, STEREO_RIGHT_NAME}; - - for (int i = 0; i < 2; i++) { - image_add_view(ima, names[i], ima->filepath); - } - return; - } - else { - /* R_IMF_VIEWS_INDIVIDUAL */ - char prefix[FILE_MAX] = {'\0'}; - char *name = ima->filepath; - const char *ext = NULL; - - BKE_scene_multiview_view_prefix_get(scene, name, prefix, &ext); - - if (prefix[0] == '\0') { - BKE_image_free_views(ima); - return; - } - - /* create all the image views */ - for (srv = scene->r.views.first; srv; srv = srv->next) { - if (BKE_scene_multiview_is_render_view_active(&scene->r, srv)) { - char filepath[FILE_MAX]; - SNPRINTF(filepath, "%s%s%s", prefix, srv->suffix, ext); - image_add_view(ima, srv->name, filepath); - } - } - - /* check if the files are all available */ - iv = ima->views.last; - while (iv) { - int file; - char str[FILE_MAX]; - - STRNCPY(str, iv->filepath); - BLI_path_abs(str, ID_BLEND_PATH_FROM_GLOBAL(&ima->id)); - - /* exists? */ - file = BLI_open(str, O_BINARY | O_RDONLY, 0); - if (file == -1) { - ImageView *iv_del = iv; - iv = iv->prev; - BLI_remlink(&ima->views, iv_del); - MEM_freeN(iv_del); - } - else { - iv = iv->prev; - close(file); - } - } - - /* all good */ - if (!BKE_image_is_multiview(ima)) { - BKE_image_free_views(ima); - } - } -} - -/**************************** Render Slots ***************************/ - -RenderSlot *BKE_image_add_renderslot(Image *ima, const char *name) -{ - RenderSlot *slot = MEM_callocN(sizeof(RenderSlot), "Image new Render Slot"); - if (name && name[0]) { - BLI_strncpy(slot->name, name, sizeof(slot->name)); - } - else { - int n = BLI_listbase_count(&ima->renderslots) + 1; - BLI_snprintf(slot->name, sizeof(slot->name), "Slot %d", n); - } - BLI_addtail(&ima->renderslots, slot); - return slot; -} - -bool BKE_image_remove_renderslot(Image *ima, ImageUser *iuser, int index) -{ - if (index == ima->last_render_slot) { - /* Don't remove render slot while rendering to it. */ - if (G.is_rendering) { - return false; - } - } - - int num_slots = BLI_listbase_count(&ima->renderslots); - if (index >= num_slots || num_slots == 1) { - return false; - } - - RenderSlot *remove_slot = BLI_findlink(&ima->renderslots, index); - RenderSlot *current_slot = BLI_findlink(&ima->renderslots, ima->render_slot); - RenderSlot *current_last_slot = BLI_findlink(&ima->renderslots, ima->last_render_slot); - - RenderSlot *next_slot; - if (current_slot == remove_slot) { - next_slot = BLI_findlink(&ima->renderslots, (index == num_slots - 1) ? index - 1 : index + 1); - } - else { - next_slot = current_slot; - } - - /* If the slot to be removed is the slot with the last render, - * make another slot the last render slot. */ - if (remove_slot == current_last_slot) { - /* Choose the currently selected slot unless that one is being removed, - * in that case take the next one. */ - RenderSlot *next_last_slot; - if (current_slot == remove_slot) { - next_last_slot = next_slot; - } - else { - next_last_slot = current_slot; - } - - if (!iuser) { - return false; - } - Render *re = RE_GetSceneRender(iuser->scene); - if (!re) { - return false; - } - RE_SwapResult(re, ¤t_last_slot->render); - RE_SwapResult(re, &next_last_slot->render); - current_last_slot = next_last_slot; - } - - current_slot = next_slot; - - BLI_remlink(&ima->renderslots, remove_slot); - - ima->render_slot = BLI_findindex(&ima->renderslots, current_slot); - ima->last_render_slot = BLI_findindex(&ima->renderslots, current_last_slot); - - if (remove_slot->render) { - RE_FreeRenderResult(remove_slot->render); - } - MEM_freeN(remove_slot); - - return true; -} - -bool BKE_image_clear_renderslot(Image *ima, ImageUser *iuser, int index) -{ - if (index == ima->last_render_slot) { - if (!iuser) { - return false; - } - if (G.is_rendering) { - return false; - } - Render *re = RE_GetSceneRender(iuser->scene); - if (!re) { - return false; - } - RE_ClearResult(re); - return true; - } - - RenderSlot *slot = BLI_findlink(&ima->renderslots, index); - if (!slot) { - return false; - } - if (slot->render) { - RE_FreeRenderResult(slot->render); - slot->render = NULL; - } - return true; -} - -RenderSlot *BKE_image_get_renderslot(Image *ima, int index) -{ - /* Can be NULL for images without render slots. */ - return BLI_findlink(&ima->renderslots, index); -} diff --git a/source/blender/blenkernel/intern/image.cc b/source/blender/blenkernel/intern/image.cc new file mode 100644 index 00000000000..967f0f61e07 --- /dev/null +++ b/source/blender/blenkernel/intern/image.cc @@ -0,0 +1,6394 @@ +/* SPDX-License-Identifier: GPL-2.0-or-later + * Copyright 2001-2002 NaN Holding BV. All rights reserved. */ + +/** \file + * \ingroup bke + */ + +#include +#include +#include +#include +#include +#ifndef WIN32 +# include +#else +# include +#endif + +#include + +#include "BLI_array.hh" + +#include "CLG_log.h" + +#include "MEM_guardedalloc.h" + +#include "IMB_colormanagement.h" +#include "IMB_imbuf.h" +#include "IMB_imbuf_types.h" +#include "IMB_metadata.h" +#include "IMB_moviecache.h" + +#ifdef WITH_OPENEXR +# include "intern/openexr/openexr_multi.h" +#endif + +/* Allow using deprecated functionality for .blend file I/O. */ +#define DNA_DEPRECATED_ALLOW + +#include "DNA_brush_types.h" +#include "DNA_camera_types.h" +#include "DNA_defaults.h" +#include "DNA_light_types.h" +#include "DNA_material_types.h" +#include "DNA_mesh_types.h" +#include "DNA_meshdata_types.h" +#include "DNA_object_types.h" +#include "DNA_packedFile_types.h" +#include "DNA_scene_types.h" +#include "DNA_sequence_types.h" +#include "DNA_simulation_types.h" +#include "DNA_world_types.h" + +#include "BLI_blenlib.h" +#include "BLI_math_vector.h" +#include "BLI_mempool.h" +#include "BLI_system.h" +#include "BLI_task.h" +#include "BLI_threads.h" +#include "BLI_timecode.h" /* For stamp time-code format. */ +#include "BLI_utildefines.h" + +#include "BLT_translation.h" + +#include "BKE_bpath.h" +#include "BKE_colortools.h" +#include "BKE_global.h" +#include "BKE_icons.h" +#include "BKE_idtype.h" +#include "BKE_image.h" +#include "BKE_lib_id.h" +#include "BKE_main.h" +#include "BKE_node.h" +#include "BKE_node_tree_update.h" +#include "BKE_packedFile.h" +#include "BKE_report.h" +#include "BKE_scene.h" +#include "BKE_workspace.h" + +#include "BLF_api.h" + +#include "PIL_time.h" + +#include "RE_pipeline.h" + +#include "SEQ_utils.h" /* SEQ_get_topmost_sequence() */ + +#include "GPU_material.h" +#include "GPU_texture.h" + +#include "BLI_sys_types.h" /* for intptr_t support */ + +#include "DEG_depsgraph.h" +#include "DEG_depsgraph_query.h" + +#include "BLO_read_write.h" + +/* for image user iteration */ +#include "DNA_node_types.h" +#include "DNA_screen_types.h" +#include "DNA_space_types.h" +#include "DNA_view3d_types.h" + +using blender::Array; + +static CLG_LogRef LOG = {"bke.image"}; + +static void image_init(Image *ima, short source, short type); +static void image_free_packedfiles(Image *ima); +static void copy_image_packedfiles(ListBase *lb_dst, const ListBase *lb_src); + +/* Reset runtime image fields when data-block is being initialized. */ +static void image_runtime_reset(struct Image *image) +{ + memset(&image->runtime, 0, sizeof(image->runtime)); + image->runtime.cache_mutex = MEM_mallocN(sizeof(ThreadMutex), "image runtime cache_mutex"); + BLI_mutex_init(static_cast(image->runtime.cache_mutex)); +} + +/* Reset runtime image fields when data-block is being copied. */ +static void image_runtime_reset_on_copy(struct Image *image) +{ + image->runtime.cache_mutex = MEM_mallocN(sizeof(ThreadMutex), "image runtime cache_mutex"); + BLI_mutex_init(static_cast(image->runtime.cache_mutex)); + + image->runtime.partial_update_register = nullptr; + image->runtime.partial_update_user = nullptr; +} + +static void image_runtime_free_data(struct Image *image) +{ + BLI_mutex_end(static_cast(image->runtime.cache_mutex)); + MEM_freeN(image->runtime.cache_mutex); + image->runtime.cache_mutex = nullptr; + + if (image->runtime.partial_update_user != nullptr) { + BKE_image_partial_update_free(image->runtime.partial_update_user); + image->runtime.partial_update_user = nullptr; + } + BKE_image_partial_update_register_free(image); +} + +static void image_init_data(ID *id) +{ + Image *image = (Image *)id; + + if (image != nullptr) { + image_init(image, IMA_SRC_GENERATED, IMA_TYPE_UV_TEST); + } +} + +static void image_copy_data(Main *UNUSED(bmain), ID *id_dst, const ID *id_src, const int flag) +{ + Image *image_dst = (Image *)id_dst; + const Image *image_src = (const Image *)id_src; + + BKE_color_managed_colorspace_settings_copy(&image_dst->colorspace_settings, + &image_src->colorspace_settings); + + copy_image_packedfiles(&image_dst->packedfiles, &image_src->packedfiles); + + image_dst->stereo3d_format = static_cast( + MEM_dupallocN(image_src->stereo3d_format)); + BLI_duplicatelist(&image_dst->views, &image_src->views); + + /* Cleanup stuff that cannot be copied. */ + image_dst->cache = nullptr; + image_dst->rr = nullptr; + + BLI_duplicatelist(&image_dst->renderslots, &image_src->renderslots); + LISTBASE_FOREACH (RenderSlot *, slot, &image_dst->renderslots) { + slot->render = nullptr; + } + + BLI_listbase_clear(&image_dst->anims); + + BLI_duplicatelist(&image_dst->tiles, &image_src->tiles); + + for (int eye = 0; eye < 2; eye++) { + for (int i = 0; i < TEXTARGET_COUNT; i++) { + for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { + image_dst->gputexture[i][eye][resolution] = nullptr; + } + } + } + + if ((flag & LIB_ID_COPY_NO_PREVIEW) == 0) { + BKE_previewimg_id_copy(&image_dst->id, &image_src->id); + } + else { + image_dst->preview = nullptr; + } + + image_runtime_reset_on_copy(image_dst); +} + +static void image_free_data(ID *id) +{ + Image *image = (Image *)id; + + /* Also frees animdata. */ + BKE_image_free_buffers(image); + + image_free_packedfiles(image); + + LISTBASE_FOREACH (RenderSlot *, slot, &image->renderslots) { + if (slot->render) { + RE_FreeRenderResult(slot->render); + slot->render = nullptr; + } + } + BLI_freelistN(&image->renderslots); + + BKE_image_free_views(image); + MEM_SAFE_FREE(image->stereo3d_format); + + BKE_icon_id_delete(&image->id); + BKE_previewimg_free(&image->preview); + + BLI_freelistN(&image->tiles); + + image_runtime_free_data(image); +} + +static void image_foreach_cache(ID *id, + IDTypeForeachCacheFunctionCallback function_callback, + void *user_data) +{ + Image *image = (Image *)id; + IDCacheKey key; + key.id_session_uuid = id->session_uuid; + key.offset_in_ID = offsetof(Image, cache); + key.cache_v = image->cache; + function_callback(id, &key, (void **)&image->cache, 0, user_data); + + auto gputexture_offset = [image](int target, int eye, int resolution) { + constexpr size_t base_offset = offsetof(Image, gputexture); + const auto first = &image->gputexture[0][0][0]; + const size_t array_offset = sizeof(*first) * + (&image->gputexture[target][eye][resolution] - first); + return base_offset + array_offset; + }; + + for (int eye = 0; eye < 2; eye++) { + for (int a = 0; a < TEXTARGET_COUNT; a++) { + for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { + GPUTexture *texture = image->gputexture[a][eye][resolution]; + if (texture == nullptr) { + continue; + } + key.offset_in_ID = gputexture_offset(a, eye, resolution); + key.cache_v = texture; + function_callback(id, &key, (void **)&image->gputexture[a][eye][resolution], 0, user_data); + } + } + } + + key.offset_in_ID = offsetof(Image, rr); + key.cache_v = image->rr; + function_callback(id, &key, (void **)&image->rr, 0, user_data); + + LISTBASE_FOREACH (RenderSlot *, slot, &image->renderslots) { + key.offset_in_ID = (size_t)BLI_ghashutil_strhash_p(slot->name); + key.cache_v = slot->render; + function_callback(id, &key, (void **)&slot->render, 0, user_data); + } +} + +static void image_foreach_path(ID *id, BPathForeachPathData *bpath_data) +{ + Image *ima = (Image *)id; + const eBPathForeachFlag flag = bpath_data->flag; + + if (BKE_image_has_packedfile(ima) && (flag & BKE_BPATH_FOREACH_PATH_SKIP_PACKED) != 0) { + return; + } + /* Skip empty file paths, these are typically from generated images and + * don't make sense to add directories to until the image has been saved + * once to give it a meaningful value. */ + /* TODO re-assess whether this behavior is desired in the new generic code context. */ + if (!ELEM(ima->source, IMA_SRC_FILE, IMA_SRC_MOVIE, IMA_SRC_SEQUENCE, IMA_SRC_TILED) || + ima->filepath[0] == '\0') { + return; + } + + /* If this is a tiled image, and we're asked to resolve the tokens in the virtual + * filepath, use the first tile to generate a concrete path for use during processing. */ + bool result = false; + if (ima->source == IMA_SRC_TILED && (flag & BKE_BPATH_FOREACH_PATH_RESOLVE_TOKEN) != 0) { + char temp_path[FILE_MAX], orig_file[FILE_MAXFILE]; + BLI_strncpy(temp_path, ima->filepath, sizeof(temp_path)); + BLI_split_file_part(temp_path, orig_file, sizeof(orig_file)); + + eUDIM_TILE_FORMAT tile_format; + char *udim_pattern = BKE_image_get_tile_strformat(temp_path, &tile_format); + BKE_image_set_filepath_from_tile_number( + temp_path, udim_pattern, tile_format, ((ImageTile *)ima->tiles.first)->tile_number); + MEM_SAFE_FREE(udim_pattern); + + result = BKE_bpath_foreach_path_fixed_process(bpath_data, temp_path); + if (result) { + /* Put the filepath back together using the new directory and the original file name. */ + char new_dir[FILE_MAXDIR]; + BLI_split_dir_part(temp_path, new_dir, sizeof(new_dir)); + BLI_join_dirfile(ima->filepath, sizeof(ima->filepath), new_dir, orig_file); + } + } + else { + result = BKE_bpath_foreach_path_fixed_process(bpath_data, ima->filepath); + } + + if (result) { + if (flag & BKE_BPATH_FOREACH_PATH_RELOAD_EDITED) { + if (!BKE_image_has_packedfile(ima) && + /* Image may have been painted onto (and not saved, T44543). */ + !BKE_image_is_dirty(ima)) { + BKE_image_signal(bpath_data->bmain, ima, nullptr, IMA_SIGNAL_RELOAD); + } + } + } +} + +static void image_blend_write(BlendWriter *writer, ID *id, const void *id_address) +{ + Image *ima = (Image *)id; + const bool is_undo = BLO_write_is_undo(writer); + + /* Clear all data that isn't read to reduce false detection of changed image during memfile undo. + */ + ima->lastused = 0; + ima->cache = nullptr; + ima->gpuflag = 0; + BLI_listbase_clear(&ima->anims); + ima->runtime.partial_update_register = nullptr; + ima->runtime.partial_update_user = nullptr; + for (int i = 0; i < 3; i++) { + for (int j = 0; j < 2; j++) { + for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { + ima->gputexture[i][j][resolution] = nullptr; + } + } + } + + ImagePackedFile *imapf; + + BLI_assert(ima->packedfile == nullptr); + if (!is_undo) { + /* Do not store packed files in case this is a library override ID. */ + if (ID_IS_OVERRIDE_LIBRARY(ima)) { + BLI_listbase_clear(&ima->packedfiles); + } + else { + /* Some trickery to keep forward compatibility of packed images. */ + if (ima->packedfiles.first != nullptr) { + imapf = static_cast(ima->packedfiles.first); + ima->packedfile = imapf->packedfile; + } + } + } + + /* write LibData */ + BLO_write_id_struct(writer, Image, id_address, &ima->id); + BKE_id_blend_write(writer, &ima->id); + + for (imapf = static_cast(ima->packedfiles.first); imapf; + imapf = imapf->next) { + BLO_write_struct(writer, ImagePackedFile, imapf); + BKE_packedfile_blend_write(writer, imapf->packedfile); + } + + BKE_previewimg_blend_write(writer, ima->preview); + + LISTBASE_FOREACH (ImageView *, iv, &ima->views) { + BLO_write_struct(writer, ImageView, iv); + } + BLO_write_struct(writer, Stereo3dFormat, ima->stereo3d_format); + + BLO_write_struct_list(writer, ImageTile, &ima->tiles); + + ima->packedfile = nullptr; + + BLO_write_struct_list(writer, RenderSlot, &ima->renderslots); +} + +static void image_blend_read_data(BlendDataReader *reader, ID *id) +{ + Image *ima = (Image *)id; + BLO_read_list(reader, &ima->tiles); + + BLO_read_list(reader, &(ima->renderslots)); + if (!BLO_read_data_is_undo(reader)) { + /* We reset this last render slot index only when actually reading a file, not for undo. */ + ima->last_render_slot = ima->render_slot; + } + + BLO_read_list(reader, &(ima->views)); + BLO_read_list(reader, &(ima->packedfiles)); + + if (ima->packedfiles.first) { + LISTBASE_FOREACH (ImagePackedFile *, imapf, &ima->packedfiles) { + BKE_packedfile_blend_read(reader, &imapf->packedfile); + } + ima->packedfile = nullptr; + } + else { + BKE_packedfile_blend_read(reader, &ima->packedfile); + } + + BLI_listbase_clear(&ima->anims); + BLO_read_data_address(reader, &ima->preview); + BKE_previewimg_blend_read(reader, ima->preview); + BLO_read_data_address(reader, &ima->stereo3d_format); + + ima->lastused = 0; + ima->gpuflag = 0; + + image_runtime_reset(ima); +} + +static void image_blend_read_lib(BlendLibReader *UNUSED(reader), ID *id) +{ + Image *ima = (Image *)id; + /* Images have some kind of 'main' cache, when null we should also clear all others. */ + /* Needs to be done *after* cache pointers are restored (call to + * `foreach_cache`/`blo_cache_storage_entry_restore_in_new`), easier for now to do it in + * lib_link... */ + if (ima->cache == nullptr) { + BKE_image_free_buffers(ima); + } +} + +constexpr IDTypeInfo get_type_info() +{ + IDTypeInfo info{}; + info.id_code = ID_IM; + info.id_filter = FILTER_ID_IM; + info.main_listbase_index = INDEX_ID_IM; + info.struct_size = sizeof(Image); + info.name = "Image"; + info.name_plural = "images"; + info.translation_context = BLT_I18NCONTEXT_ID_IMAGE; + info.flags = IDTYPE_FLAGS_NO_ANIMDATA | IDTYPE_FLAGS_APPEND_IS_REUSABLE; + info.asset_type_info = nullptr; + + info.init_data = image_init_data; + info.copy_data = image_copy_data; + info.free_data = image_free_data; + info.make_local = nullptr; + info.foreach_id = nullptr; + info.foreach_cache = image_foreach_cache; + info.foreach_path = image_foreach_path; + info.owner_get = nullptr; + + info.blend_write = image_blend_write; + info.blend_read_data = image_blend_read_data; + info.blend_read_lib = image_blend_read_lib; + info.blend_read_expand = nullptr; + + info.blend_read_undo_preserve = nullptr; + + info.lib_override_apply_post = nullptr; + return info; +} +IDTypeInfo IDType_ID_IM = get_type_info(); + +/* prototypes */ +static int image_num_files(struct Image *ima); +static ImBuf *image_acquire_ibuf(Image *ima, ImageUser *iuser, void **r_lock); +static void image_update_views_format(Image *ima, ImageUser *iuser); +static void image_add_view(Image *ima, const char *viewname, const char *filepath); + +/* max int, to indicate we don't store sequences in ibuf */ +#define IMA_NO_INDEX 0x7FEFEFEF + +/* quick lookup: supports 1 million entries, thousand passes */ +#define IMA_MAKE_INDEX(entry, index) (((entry) << 10) + (index)) +#define IMA_INDEX_ENTRY(index) ((index) >> 10) +#if 0 +# define IMA_INDEX_PASS(index) (index & ~1023) +#endif + +/* ******** IMAGE CACHE ************* */ + +typedef struct ImageCacheKey { + int index; +} ImageCacheKey; + +static unsigned int imagecache_hashhash(const void *key_v) +{ + const ImageCacheKey *key = static_cast(key_v); + return key->index; +} + +static bool imagecache_hashcmp(const void *a_v, const void *b_v) +{ + const ImageCacheKey *a = static_cast(a_v); + const ImageCacheKey *b = static_cast(b_v); + + return (a->index != b->index); +} + +static void imagecache_keydata(void *userkey, int *framenr, int *proxy, int *render_flags) +{ + ImageCacheKey *key = static_cast(userkey); + + *framenr = IMA_INDEX_ENTRY(key->index); + *proxy = IMB_PROXY_NONE; + *render_flags = 0; +} + +static void imagecache_put(Image *image, int index, ImBuf *ibuf) +{ + ImageCacheKey key; + + if (image->cache == nullptr) { + // char cache_name[64]; + // SNPRINTF(cache_name, "Image Datablock %s", image->id.name); + + image->cache = IMB_moviecache_create( + "Image Datablock Cache", sizeof(ImageCacheKey), imagecache_hashhash, imagecache_hashcmp); + IMB_moviecache_set_getdata_callback(image->cache, imagecache_keydata); + } + + key.index = index; + + IMB_moviecache_put(image->cache, &key, ibuf); +} + +static void imagecache_remove(Image *image, int index) +{ + if (image->cache == nullptr) { + return; + } + + ImageCacheKey key; + key.index = index; + IMB_moviecache_remove(image->cache, &key); +} + +static struct ImBuf *imagecache_get(Image *image, int index, bool *r_is_cached_empty) +{ + if (image->cache) { + ImageCacheKey key; + key.index = index; + return IMB_moviecache_get(image->cache, &key, r_is_cached_empty); + } + + return nullptr; +} + +/* ***************** ALLOC & FREE, DATA MANAGING *************** */ + +static void image_free_cached_frames(Image *image) +{ + if (image->cache) { + IMB_moviecache_free(image->cache); + image->cache = nullptr; + } +} + +static void image_free_packedfiles(Image *ima) +{ + while (ima->packedfiles.last) { + ImagePackedFile *imapf = static_cast(ima->packedfiles.last); + if (imapf->packedfile) { + BKE_packedfile_free(imapf->packedfile); + } + BLI_remlink(&ima->packedfiles, imapf); + MEM_freeN(imapf); + } +} + +void BKE_image_free_packedfiles(Image *ima) +{ + image_free_packedfiles(ima); +} + +void BKE_image_free_views(Image *image) +{ + BLI_freelistN(&image->views); +} + +static void image_free_anims(Image *ima) +{ + while (ima->anims.last) { + ImageAnim *ia = static_cast(ima->anims.last); + if (ia->anim) { + IMB_free_anim(ia->anim); + ia->anim = nullptr; + } + BLI_remlink(&ima->anims, ia); + MEM_freeN(ia); + } +} + +void BKE_image_free_buffers_ex(Image *ima, bool do_lock) +{ + if (do_lock) { + BLI_mutex_lock(static_cast(ima->runtime.cache_mutex)); + } + image_free_cached_frames(ima); + + image_free_anims(ima); + + if (ima->rr) { + RE_FreeRenderResult(ima->rr); + ima->rr = nullptr; + } + + BKE_image_free_gputextures(ima); + + if (do_lock) { + BLI_mutex_unlock(static_cast(ima->runtime.cache_mutex)); + } +} + +void BKE_image_free_buffers(Image *ima) +{ + BKE_image_free_buffers_ex(ima, false); +} + +void BKE_image_free_data(Image *ima) +{ + image_free_data(&ima->id); +} + +/* only image block itself */ +static void image_init(Image *ima, short source, short type) +{ + BLI_assert(MEMCMP_STRUCT_AFTER_IS_ZERO(ima, id)); + + MEMCPY_STRUCT_AFTER(ima, DNA_struct_default_get(Image), id); + + ima->source = source; + ima->type = type; + + if (source == IMA_SRC_VIEWER) { + ima->flag |= IMA_VIEW_AS_RENDER; + } + + ImageTile *tile = MEM_cnew("Image Tiles"); + tile->tile_number = 1001; + BLI_addtail(&ima->tiles, tile); + + if (type == IMA_TYPE_R_RESULT) { + for (int i = 0; i < 8; i++) { + BKE_image_add_renderslot(ima, nullptr); + } + } + + image_runtime_reset(ima); + + BKE_color_managed_colorspace_settings_init(&ima->colorspace_settings); + ima->stereo3d_format = MEM_cnew("Image Stereo Format"); +} + +static Image *image_alloc(Main *bmain, const char *name, short source, short type) +{ + Image *ima; + + ima = static_cast(BKE_libblock_alloc(bmain, ID_IM, name, 0)); + if (ima) { + image_init(ima, source, type); + } + + return ima; +} + +/* Get the ibuf from an image cache by its index and entry. + * Local use here only. + * + * Returns referenced image buffer if it exists, callee is to + * call IMB_freeImBuf to de-reference the image buffer after + * it's done handling it. + */ +static ImBuf *image_get_cached_ibuf_for_index_entry(Image *ima, + int index, + int entry, + bool *r_is_cached_empty) +{ + if (index != IMA_NO_INDEX) { + index = IMA_MAKE_INDEX(entry, index); + } + + return imagecache_get(ima, index, r_is_cached_empty); +} + +static void image_assign_ibuf(Image *ima, ImBuf *ibuf, int index, int entry) +{ + if (index != IMA_NO_INDEX) { + index = IMA_MAKE_INDEX(entry, index); + } + + imagecache_put(ima, index, ibuf); +} + +static void image_remove_ibuf(Image *ima, int index, int entry) +{ + if (index != IMA_NO_INDEX) { + index = IMA_MAKE_INDEX(entry, index); + } + imagecache_remove(ima, index); +} + +static void copy_image_packedfiles(ListBase *lb_dst, const ListBase *lb_src) +{ + const ImagePackedFile *imapf_src; + + BLI_listbase_clear(lb_dst); + for (imapf_src = static_cast(lb_src->first); imapf_src; + imapf_src = imapf_src->next) { + ImagePackedFile *imapf_dst = static_cast( + MEM_mallocN(sizeof(ImagePackedFile), "Image Packed Files (copy)")); + STRNCPY(imapf_dst->filepath, imapf_src->filepath); + + if (imapf_src->packedfile) { + imapf_dst->packedfile = BKE_packedfile_duplicate(imapf_src->packedfile); + } + + BLI_addtail(lb_dst, imapf_dst); + } +} + +void BKE_image_merge(Main *bmain, Image *dest, Image *source) +{ + /* sanity check */ + if (dest && source && dest != source) { + BLI_mutex_lock(static_cast(source->runtime.cache_mutex)); + BLI_mutex_lock(static_cast(dest->runtime.cache_mutex)); + + if (source->cache != nullptr) { + struct MovieCacheIter *iter; + iter = IMB_moviecacheIter_new(source->cache); + while (!IMB_moviecacheIter_done(iter)) { + ImBuf *ibuf = IMB_moviecacheIter_getImBuf(iter); + ImageCacheKey *key = static_cast(IMB_moviecacheIter_getUserKey(iter)); + imagecache_put(dest, key->index, ibuf); + IMB_moviecacheIter_step(iter); + } + IMB_moviecacheIter_free(iter); + } + + BLI_mutex_unlock(static_cast(dest->runtime.cache_mutex)); + BLI_mutex_unlock(static_cast(source->runtime.cache_mutex)); + + BKE_id_free(bmain, source); + } +} + +bool BKE_image_scale(Image *image, int width, int height) +{ + /* NOTE: We could be clever and scale all imbuf's + * but since some are mipmaps its not so simple. */ + + ImBuf *ibuf; + void *lock; + + ibuf = BKE_image_acquire_ibuf(image, nullptr, &lock); + + if (ibuf) { + IMB_scaleImBuf(ibuf, width, height); + BKE_image_mark_dirty(image, ibuf); + } + + BKE_image_release_ibuf(image, ibuf, lock); + + return (ibuf != nullptr); +} + +bool BKE_image_has_opengl_texture(Image *ima) +{ + for (int eye = 0; eye < 2; eye++) { + for (int i = 0; i < TEXTARGET_COUNT; i++) { + for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { + if (ima->gputexture[i][eye][resolution] != nullptr) { + return true; + } + } + } + } + return false; +} + +static int image_get_tile_number_from_iuser(Image *ima, const ImageUser *iuser) +{ + BLI_assert(ima != nullptr && ima->tiles.first); + ImageTile *tile = static_cast(ima->tiles.first); + return (iuser && iuser->tile) ? iuser->tile : tile->tile_number; +} + +ImageTile *BKE_image_get_tile(Image *ima, int tile_number) +{ + if (ima == nullptr) { + return nullptr; + } + + /* Tiles 0 and 1001 are a special case and refer to the first tile, typically + * coming from non-UDIM-aware code. */ + if (ELEM(tile_number, 0, 1001)) { + return static_cast(ima->tiles.first); + } + + /* Must have a tiled image and a valid tile number at this point. */ + if (ima->source != IMA_SRC_TILED || tile_number < 1001 || tile_number > IMA_UDIM_MAX) { + return nullptr; + } + + LISTBASE_FOREACH (ImageTile *, tile, &ima->tiles) { + if (tile->tile_number == tile_number) { + return tile; + } + } + + return nullptr; +} + +ImageTile *BKE_image_get_tile_from_iuser(Image *ima, const ImageUser *iuser) +{ + return BKE_image_get_tile(ima, image_get_tile_number_from_iuser(ima, iuser)); +} + +int BKE_image_get_tile_from_pos(struct Image *ima, + const float uv[2], + float r_uv[2], + float r_ofs[2]) +{ + float local_ofs[2]; + if (r_ofs == nullptr) { + r_ofs = local_ofs; + } + + copy_v2_v2(r_uv, uv); + zero_v2(r_ofs); + + if ((ima->source != IMA_SRC_TILED) || uv[0] < 0.0f || uv[1] < 0.0f || uv[0] >= 10.0f) { + return 0; + } + + int ix = (int)uv[0]; + int iy = (int)uv[1]; + int tile_number = 1001 + 10 * iy + ix; + + if (BKE_image_get_tile(ima, tile_number) == nullptr) { + return 0; + } + r_ofs[0] = ix; + r_ofs[1] = iy; + sub_v2_v2(r_uv, r_ofs); + + return tile_number; +} + +int BKE_image_find_nearest_tile(const Image *image, const float co[2]) +{ + const float co_floor[2] = {floorf(co[0]), floorf(co[1])}; + /* Distance to the closest UDIM tile. */ + float dist_best_sq = FLT_MAX; + int tile_number_best = -1; + + LISTBASE_FOREACH (const ImageTile *, tile, &image->tiles) { + const int tile_index = tile->tile_number - 1001; + /* Coordinates of the current tile. */ + const float tile_index_co[2] = {static_cast(tile_index % 10), + static_cast(tile_index / 10)}; + + if (equals_v2v2(co_floor, tile_index_co)) { + return tile->tile_number; + } + + /* Distance between co[2] and UDIM tile. */ + const float dist_sq = len_squared_v2v2(tile_index_co, co); + + if (dist_sq < dist_best_sq) { + dist_best_sq = dist_sq; + tile_number_best = tile->tile_number; + } + } + + return tile_number_best; +} + +static void image_init_color_management(Image *ima) +{ + ImBuf *ibuf; + char name[FILE_MAX]; + + BKE_image_user_file_path(nullptr, ima, name); + + /* will set input color space to image format default's */ + ibuf = IMB_loadiffname(name, IB_test | IB_alphamode_detect, ima->colorspace_settings.name); + + if (ibuf) { + if (ibuf->flags & IB_alphamode_premul) { + ima->alpha_mode = IMA_ALPHA_PREMUL; + } + else if (ibuf->flags & IB_alphamode_channel_packed) { + ima->alpha_mode = IMA_ALPHA_CHANNEL_PACKED; + } + else if (ibuf->flags & IB_alphamode_ignore) { + ima->alpha_mode = IMA_ALPHA_IGNORE; + } + else { + ima->alpha_mode = IMA_ALPHA_STRAIGHT; + } + + IMB_freeImBuf(ibuf); + } +} + +char BKE_image_alpha_mode_from_extension_ex(const char *filepath) +{ + if (BLI_path_extension_check_n(filepath, ".exr", ".cin", ".dpx", ".hdr", nullptr)) { + return IMA_ALPHA_PREMUL; + } + + return IMA_ALPHA_STRAIGHT; +} + +void BKE_image_alpha_mode_from_extension(Image *image) +{ + image->alpha_mode = BKE_image_alpha_mode_from_extension_ex(image->filepath); +} + +Image *BKE_image_load(Main *bmain, const char *filepath) +{ + Image *ima; + int file; + char str[FILE_MAX]; + + STRNCPY(str, filepath); + BLI_path_abs(str, BKE_main_blendfile_path(bmain)); + + /* exists? */ + file = BLI_open(str, O_BINARY | O_RDONLY, 0); + if (file == -1) { + if (!BKE_image_tile_filepath_exists(str)) { + return nullptr; + } + } + else { + close(file); + } + + ima = image_alloc(bmain, BLI_path_basename(filepath), IMA_SRC_FILE, IMA_TYPE_IMAGE); + STRNCPY(ima->filepath, filepath); + + if (BLI_path_extension_check_array(filepath, imb_ext_movie)) { + ima->source = IMA_SRC_MOVIE; + } + + image_init_color_management(ima); + + return ima; +} + +Image *BKE_image_load_exists_ex(Main *bmain, const char *filepath, bool *r_exists) +{ + Image *ima; + char str[FILE_MAX], strtest[FILE_MAX]; + + STRNCPY(str, filepath); + BLI_path_abs(str, bmain->filepath); + + /* first search an identical filepath */ + for (ima = static_cast(bmain->images.first); ima; + ima = static_cast(ima->id.next)) { + if (!ELEM(ima->source, IMA_SRC_VIEWER, IMA_SRC_GENERATED)) { + STRNCPY(strtest, ima->filepath); + BLI_path_abs(strtest, ID_BLEND_PATH(bmain, &ima->id)); + + if (BLI_path_cmp(strtest, str) == 0) { + if ((BKE_image_has_anim(ima) == false) || (ima->id.us == 0)) { + id_us_plus(&ima->id); /* officially should not, it doesn't link here! */ + if (r_exists) { + *r_exists = true; + } + return ima; + } + } + } + } + + if (r_exists) { + *r_exists = false; + } + return BKE_image_load(bmain, filepath); +} + +Image *BKE_image_load_exists(Main *bmain, const char *filepath) +{ + return BKE_image_load_exists_ex(bmain, filepath, nullptr); +} + +struct ImageFillData { + short gen_type; + uint width; + uint height; + unsigned char *rect; + float *rect_float; + float fill_color[4]; +}; + +static void image_buf_fill_isolated(void *usersata_v) +{ + ImageFillData *usersata = static_cast(usersata_v); + + const short gen_type = usersata->gen_type; + const uint width = usersata->width; + const uint height = usersata->height; + + unsigned char *rect = usersata->rect; + float *rect_float = usersata->rect_float; + + switch (gen_type) { + case IMA_GENTYPE_GRID: + BKE_image_buf_fill_checker(rect, rect_float, width, height); + break; + case IMA_GENTYPE_GRID_COLOR: + BKE_image_buf_fill_checker_color(rect, rect_float, width, height); + break; + default: + BKE_image_buf_fill_color(rect, rect_float, width, height, usersata->fill_color); + break; + } +} + +static ImBuf *add_ibuf_size(unsigned int width, + unsigned int height, + const char *name, + int depth, + int floatbuf, + short gen_type, + const float color[4], + ColorManagedColorspaceSettings *colorspace_settings) +{ + ImBuf *ibuf; + unsigned char *rect = nullptr; + float *rect_float = nullptr; + float fill_color[4]; + + if (floatbuf) { + ibuf = IMB_allocImBuf(width, height, depth, IB_rectfloat); + + if (colorspace_settings->name[0] == '\0') { + const char *colorspace = IMB_colormanagement_role_colorspace_name_get( + COLOR_ROLE_DEFAULT_FLOAT); + + STRNCPY(colorspace_settings->name, colorspace); + } + + if (ibuf != nullptr) { + rect_float = ibuf->rect_float; + IMB_colormanagement_check_is_data(ibuf, colorspace_settings->name); + } + + if (IMB_colormanagement_space_name_is_data(colorspace_settings->name)) { + copy_v4_v4(fill_color, color); + } + else { + /* The input color here should ideally be linear already, but for now + * we just convert and postpone breaking the API for later. */ + srgb_to_linearrgb_v4(fill_color, color); + } + } + else { + ibuf = IMB_allocImBuf(width, height, depth, IB_rect); + + if (colorspace_settings->name[0] == '\0') { + const char *colorspace = IMB_colormanagement_role_colorspace_name_get( + COLOR_ROLE_DEFAULT_BYTE); + + STRNCPY(colorspace_settings->name, colorspace); + } + + if (ibuf != nullptr) { + rect = (unsigned char *)ibuf->rect; + IMB_colormanagement_assign_rect_colorspace(ibuf, colorspace_settings->name); + } + + copy_v4_v4(fill_color, color); + } + + if (!ibuf) { + return nullptr; + } + + STRNCPY(ibuf->name, name); + + ImageFillData data; + + data.gen_type = gen_type; + data.width = width; + data.height = height; + data.rect = rect; + data.rect_float = rect_float; + copy_v4_v4(data.fill_color, fill_color); + + BLI_task_isolate(image_buf_fill_isolated, &data); + + return ibuf; +} + +Image *BKE_image_add_generated(Main *bmain, + unsigned int width, + unsigned int height, + const char *name, + int depth, + int floatbuf, + short gen_type, + const float color[4], + const bool stereo3d, + const bool is_data, + const bool tiled) +{ + /* on save, type is changed to FILE in editsima.c */ + Image *ima; + if (tiled) { + ima = image_alloc(bmain, name, IMA_SRC_TILED, IMA_TYPE_IMAGE); + } + else { + ima = image_alloc(bmain, name, IMA_SRC_GENERATED, IMA_TYPE_UV_TEST); + } + if (ima == nullptr) { + return nullptr; + } + + int view_id; + const char *names[2] = {STEREO_LEFT_NAME, STEREO_RIGHT_NAME}; + + // STRNCPY(ima->filepath, name); /* don't do this, this writes in ain invalid filepath! */ + ima->gen_x = width; + ima->gen_y = height; + ima->gen_type = gen_type; + ima->gen_flag |= (floatbuf ? IMA_GEN_FLOAT : 0); + ima->gen_depth = depth; + copy_v4_v4(ima->gen_color, color); + + if (is_data) { + STRNCPY(ima->colorspace_settings.name, + IMB_colormanagement_role_colorspace_name_get(COLOR_ROLE_DATA)); + } + + for (view_id = 0; view_id < 2; view_id++) { + ImBuf *ibuf; + ibuf = add_ibuf_size( + width, height, ima->filepath, depth, floatbuf, gen_type, color, &ima->colorspace_settings); + int index = tiled ? 0 : IMA_NO_INDEX; + int entry = tiled ? 1001 : 0; + image_assign_ibuf(ima, ibuf, stereo3d ? view_id : index, entry); + + /* image_assign_ibuf puts buffer to the cache, which increments user counter. */ + IMB_freeImBuf(ibuf); + if (!stereo3d) { + break; + } + + image_add_view(ima, names[view_id], ""); + } + + return ima; +} + +Image *BKE_image_add_from_imbuf(Main *bmain, ImBuf *ibuf, const char *name) +{ + /* on save, type is changed to FILE in editsima.c */ + Image *ima; + + if (name == nullptr) { + name = BLI_path_basename(ibuf->name); + } + + ima = image_alloc(bmain, name, IMA_SRC_FILE, IMA_TYPE_IMAGE); + + if (ima) { + STRNCPY(ima->filepath, ibuf->name); + image_assign_ibuf(ima, ibuf, IMA_NO_INDEX, 0); + } + + return ima; +} + +/* Pack image buffer to memory as PNG or EXR. */ +static bool image_memorypack_imbuf(Image *ima, ImBuf *ibuf, const char *filepath) +{ + ibuf->ftype = (ibuf->rect_float) ? IMB_FTYPE_OPENEXR : IMB_FTYPE_PNG; + + IMB_saveiff(ibuf, filepath, IB_rect | IB_mem); + + if (ibuf->encodedbuffer == nullptr) { + CLOG_STR_ERROR(&LOG, "memory save for pack error"); + IMB_freeImBuf(ibuf); + image_free_packedfiles(ima); + return false; + } + + ImagePackedFile *imapf; + PackedFile *pf = MEM_cnew("PackedFile"); + + pf->data = ibuf->encodedbuffer; + pf->size = ibuf->encodedsize; + + imapf = static_cast(MEM_mallocN(sizeof(ImagePackedFile), "Image PackedFile")); + STRNCPY(imapf->filepath, filepath); + imapf->packedfile = pf; + BLI_addtail(&ima->packedfiles, imapf); + + ibuf->encodedbuffer = nullptr; + ibuf->encodedsize = 0; + ibuf->userflags &= ~IB_BITMAPDIRTY; + + return true; +} + +bool BKE_image_memorypack(Image *ima) +{ + bool ok = true; + + image_free_packedfiles(ima); + + if (BKE_image_is_multiview(ima)) { + /* Store each view as a separate packed files with R_IMF_VIEWS_INDIVIDUAL. */ + ImageView *iv; + int i; + + for (i = 0, iv = static_cast(ima->views.first); iv; + iv = static_cast(iv->next), i++) { + ImBuf *ibuf = image_get_cached_ibuf_for_index_entry(ima, i, 0, nullptr); + + if (!ibuf) { + ok = false; + break; + } + + /* if the image was a R_IMF_VIEWS_STEREO_3D we force _L, _R suffices */ + if (ima->views_format == R_IMF_VIEWS_STEREO_3D) { + const char *suffix[2] = {STEREO_LEFT_SUFFIX, STEREO_RIGHT_SUFFIX}; + BLI_path_suffix(iv->filepath, FILE_MAX, suffix[i], ""); + } + + ok = ok && image_memorypack_imbuf(ima, ibuf, iv->filepath); + IMB_freeImBuf(ibuf); + } + + ima->views_format = R_IMF_VIEWS_INDIVIDUAL; + } + else { + ImBuf *ibuf = image_get_cached_ibuf_for_index_entry(ima, IMA_NO_INDEX, 0, nullptr); + + if (ibuf) { + ok = ok && image_memorypack_imbuf(ima, ibuf, ibuf->name); + IMB_freeImBuf(ibuf); + } + else { + ok = false; + } + } + + if (ok && ima->source == IMA_SRC_GENERATED) { + ima->source = IMA_SRC_FILE; + ima->type = IMA_TYPE_IMAGE; + } + + return ok; +} + +void BKE_image_packfiles(ReportList *reports, Image *ima, const char *basepath) +{ + const int totfiles = image_num_files(ima); + + if (totfiles == 1) { + ImagePackedFile *imapf = static_cast( + MEM_mallocN(sizeof(ImagePackedFile), "Image packed file")); + BLI_addtail(&ima->packedfiles, imapf); + imapf->packedfile = BKE_packedfile_new(reports, ima->filepath, basepath); + if (imapf->packedfile) { + STRNCPY(imapf->filepath, ima->filepath); + } + else { + BLI_freelinkN(&ima->packedfiles, imapf); + } + } + else { + for (ImageView *iv = static_cast(ima->views.first); iv; iv = iv->next) { + ImagePackedFile *imapf = static_cast( + MEM_mallocN(sizeof(ImagePackedFile), "Image packed file")); + BLI_addtail(&ima->packedfiles, imapf); + + imapf->packedfile = BKE_packedfile_new(reports, iv->filepath, basepath); + if (imapf->packedfile) { + STRNCPY(imapf->filepath, iv->filepath); + } + else { + BLI_freelinkN(&ima->packedfiles, imapf); + } + } + } +} + +void BKE_image_packfiles_from_mem(ReportList *reports, + Image *ima, + char *data, + const size_t data_len) +{ + const int totfiles = image_num_files(ima); + + if (totfiles != 1) { + BKE_report(reports, RPT_ERROR, "Cannot pack multiview images from raw data currently..."); + } + else { + ImagePackedFile *imapf = static_cast( + MEM_mallocN(sizeof(ImagePackedFile), __func__)); + BLI_addtail(&ima->packedfiles, imapf); + imapf->packedfile = BKE_packedfile_new_from_memory(data, data_len); + STRNCPY(imapf->filepath, ima->filepath); + } +} + +void BKE_image_tag_time(Image *ima) +{ + ima->lastused = PIL_check_seconds_timer_i(); +} + +static uintptr_t image_mem_size(Image *image) +{ + uintptr_t size = 0; + + /* viewers have memory depending on other rules, has no valid rect pointer */ + if (image->source == IMA_SRC_VIEWER) { + return 0; + } + + BLI_mutex_lock(static_cast(image->runtime.cache_mutex)); + + if (image->cache != nullptr) { + struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); + + while (!IMB_moviecacheIter_done(iter)) { + ImBuf *ibuf = IMB_moviecacheIter_getImBuf(iter); + IMB_moviecacheIter_step(iter); + if (ibuf == nullptr) { + continue; + } + ImBuf *ibufm; + int level; + + if (ibuf->rect) { + size += MEM_allocN_len(ibuf->rect); + } + if (ibuf->rect_float) { + size += MEM_allocN_len(ibuf->rect_float); + } + + for (level = 0; level < IMB_MIPMAP_LEVELS; level++) { + ibufm = ibuf->mipmap[level]; + if (ibufm) { + if (ibufm->rect) { + size += MEM_allocN_len(ibufm->rect); + } + if (ibufm->rect_float) { + size += MEM_allocN_len(ibufm->rect_float); + } + } + } + } + IMB_moviecacheIter_free(iter); + } + + BLI_mutex_unlock(static_cast(image->runtime.cache_mutex)); + + return size; +} + +void BKE_image_print_memlist(Main *bmain) +{ + Image *ima; + uintptr_t size, totsize = 0; + + for (ima = static_cast(bmain->images.first); ima; + ima = static_cast(ima->id.next)) { + totsize += image_mem_size(ima); + } + + printf("\ntotal image memory len: %.3f MB\n", (double)totsize / (double)(1024 * 1024)); + + for (ima = static_cast(bmain->images.first); ima; + ima = static_cast(ima->id.next)) { + size = image_mem_size(ima); + + if (size) { + printf("%s len: %.3f MB\n", ima->id.name + 2, (double)size / (double)(1024 * 1024)); + } + } +} + +static bool imagecache_check_dirty(ImBuf *ibuf, void *UNUSED(userkey), void *UNUSED(userdata)) +{ + if (ibuf == nullptr) { + return false; + } + return (ibuf->userflags & IB_BITMAPDIRTY) == 0; +} + +void BKE_image_free_all_textures(Main *bmain) +{ +#undef CHECK_FREED_SIZE + + Tex *tex; + Image *ima; +#ifdef CHECK_FREED_SIZE + uintptr_t tot_freed_size = 0; +#endif + + for (ima = static_cast(bmain->images.first); ima; + ima = static_cast(ima->id.next)) { + ima->id.tag &= ~LIB_TAG_DOIT; + } + + for (tex = static_cast(bmain->textures.first); tex; + tex = static_cast(tex->id.next)) { + if (tex->ima) { + tex->ima->id.tag |= LIB_TAG_DOIT; + } + } + + for (ima = static_cast(bmain->images.first); ima; + ima = static_cast(ima->id.next)) { + if (ima->cache && (ima->id.tag & LIB_TAG_DOIT)) { +#ifdef CHECK_FREED_SIZE + uintptr_t old_size = image_mem_size(ima); +#endif + + IMB_moviecache_cleanup(ima->cache, imagecache_check_dirty, nullptr); + +#ifdef CHECK_FREED_SIZE + tot_freed_size += old_size - image_mem_size(ima); +#endif + } + } +#ifdef CHECK_FREED_SIZE + printf("%s: freed total %lu MB\n", __func__, tot_freed_size / (1024 * 1024)); +#endif +} + +static bool imagecache_check_free_anim(ImBuf *ibuf, void *UNUSED(userkey), void *userdata) +{ + if (ibuf == nullptr) { + return true; + } + int except_frame = *(int *)userdata; + return (ibuf->userflags & IB_BITMAPDIRTY) == 0 && (ibuf->index != IMA_NO_INDEX) && + (except_frame != IMA_INDEX_ENTRY(ibuf->index)); +} + +void BKE_image_free_anim_ibufs(Image *ima, int except_frame) +{ + BLI_mutex_lock(static_cast(ima->runtime.cache_mutex)); + if (ima->cache != nullptr) { + IMB_moviecache_cleanup(ima->cache, imagecache_check_free_anim, &except_frame); + } + BLI_mutex_unlock(static_cast(ima->runtime.cache_mutex)); +} + +void BKE_image_all_free_anim_ibufs(Main *bmain, int cfra) +{ + Image *ima; + + for (ima = static_cast(bmain->images.first); ima; + ima = static_cast(ima->id.next)) { + if (BKE_image_is_animated(ima)) { + BKE_image_free_anim_ibufs(ima, cfra); + } + } +} + +/* *********** READ AND WRITE ************** */ + +int BKE_image_imtype_to_ftype(const char imtype, ImbFormatOptions *r_options) +{ + memset(r_options, 0, sizeof(*r_options)); + + if (imtype == R_IMF_IMTYPE_TARGA) { + return IMB_FTYPE_TGA; + } + if (imtype == R_IMF_IMTYPE_RAWTGA) { + r_options->flag = RAWTGA; + return IMB_FTYPE_TGA; + } + if (imtype == R_IMF_IMTYPE_IRIS) { + return IMB_FTYPE_IMAGIC; + } +#ifdef WITH_HDR + if (imtype == R_IMF_IMTYPE_RADHDR) { + return IMB_FTYPE_RADHDR; + } +#endif + if (imtype == R_IMF_IMTYPE_PNG) { + r_options->quality = 15; + return IMB_FTYPE_PNG; + } +#ifdef WITH_DDS + if (imtype == R_IMF_IMTYPE_DDS) { + return IMB_FTYPE_DDS; + } +#endif + if (imtype == R_IMF_IMTYPE_BMP) { + return IMB_FTYPE_BMP; + } +#ifdef WITH_TIFF + if (imtype == R_IMF_IMTYPE_TIFF) { + return IMB_FTYPE_TIF; + } +#endif + if (ELEM(imtype, R_IMF_IMTYPE_OPENEXR, R_IMF_IMTYPE_MULTILAYER)) { + return IMB_FTYPE_OPENEXR; + } +#ifdef WITH_CINEON + if (imtype == R_IMF_IMTYPE_CINEON) { + return IMB_FTYPE_CINEON; + } + if (imtype == R_IMF_IMTYPE_DPX) { + return IMB_FTYPE_DPX; + } +#endif +#ifdef WITH_OPENJPEG + if (imtype == R_IMF_IMTYPE_JP2) { + r_options->flag |= JP2_JP2; + r_options->quality = 90; + return IMB_FTYPE_JP2; + } +#endif + + r_options->quality = 90; + return IMB_FTYPE_JPG; +} + +char BKE_image_ftype_to_imtype(const int ftype, const ImbFormatOptions *options) +{ + if (ftype == IMB_FTYPE_NONE) { + return R_IMF_IMTYPE_TARGA; + } + if (ftype == IMB_FTYPE_IMAGIC) { + return R_IMF_IMTYPE_IRIS; + } +#ifdef WITH_HDR + if (ftype == IMB_FTYPE_RADHDR) { + return R_IMF_IMTYPE_RADHDR; + } +#endif + if (ftype == IMB_FTYPE_PNG) { + return R_IMF_IMTYPE_PNG; + } +#ifdef WITH_DDS + if (ftype == IMB_FTYPE_DDS) { + return R_IMF_IMTYPE_DDS; + } +#endif + if (ftype == IMB_FTYPE_BMP) { + return R_IMF_IMTYPE_BMP; + } +#ifdef WITH_TIFF + if (ftype == IMB_FTYPE_TIF) { + return R_IMF_IMTYPE_TIFF; + } +#endif + if (ftype == IMB_FTYPE_OPENEXR) { + return R_IMF_IMTYPE_OPENEXR; + } +#ifdef WITH_CINEON + if (ftype == IMB_FTYPE_CINEON) { + return R_IMF_IMTYPE_CINEON; + } + if (ftype == IMB_FTYPE_DPX) { + return R_IMF_IMTYPE_DPX; + } +#endif + if (ftype == IMB_FTYPE_TGA) { + if (options && (options->flag & RAWTGA)) { + return R_IMF_IMTYPE_RAWTGA; + } + + return R_IMF_IMTYPE_TARGA; + } +#ifdef WITH_OPENJPEG + if (ftype == IMB_FTYPE_JP2) { + return R_IMF_IMTYPE_JP2; + } +#endif + + return R_IMF_IMTYPE_JPEG90; +} + +bool BKE_imtype_is_movie(const char imtype) +{ + switch (imtype) { + case R_IMF_IMTYPE_AVIRAW: + case R_IMF_IMTYPE_AVIJPEG: + case R_IMF_IMTYPE_FFMPEG: + case R_IMF_IMTYPE_H264: + case R_IMF_IMTYPE_THEORA: + case R_IMF_IMTYPE_XVID: + return true; + } + return false; +} + +bool BKE_imtype_supports_zbuf(const char imtype) +{ + switch (imtype) { + case R_IMF_IMTYPE_IRIZ: + case R_IMF_IMTYPE_OPENEXR: /* but not R_IMF_IMTYPE_MULTILAYER */ + return true; + } + return false; +} + +bool BKE_imtype_supports_compress(const char imtype) +{ + switch (imtype) { + case R_IMF_IMTYPE_PNG: + return true; + } + return false; +} + +bool BKE_imtype_supports_quality(const char imtype) +{ + switch (imtype) { + case R_IMF_IMTYPE_JPEG90: + case R_IMF_IMTYPE_JP2: + case R_IMF_IMTYPE_AVIJPEG: + return true; + } + return false; +} + +bool BKE_imtype_requires_linear_float(const char imtype) +{ + switch (imtype) { + case R_IMF_IMTYPE_CINEON: + case R_IMF_IMTYPE_DPX: + case R_IMF_IMTYPE_RADHDR: + case R_IMF_IMTYPE_OPENEXR: + case R_IMF_IMTYPE_MULTILAYER: + return true; + } + return false; +} + +char BKE_imtype_valid_channels(const char imtype, bool write_file) +{ + char chan_flag = IMA_CHAN_FLAG_RGB; /* Assume all support RGB. */ + + /* Alpha. */ + switch (imtype) { + case R_IMF_IMTYPE_BMP: + if (write_file) { + break; + } + ATTR_FALLTHROUGH; + case R_IMF_IMTYPE_TARGA: + case R_IMF_IMTYPE_RAWTGA: + case R_IMF_IMTYPE_IRIS: + case R_IMF_IMTYPE_PNG: + case R_IMF_IMTYPE_TIFF: + case R_IMF_IMTYPE_OPENEXR: + case R_IMF_IMTYPE_MULTILAYER: + case R_IMF_IMTYPE_DDS: + case R_IMF_IMTYPE_JP2: + case R_IMF_IMTYPE_DPX: + chan_flag |= IMA_CHAN_FLAG_ALPHA; + break; + } + + /* BW. */ + switch (imtype) { + case R_IMF_IMTYPE_BMP: + case R_IMF_IMTYPE_PNG: + case R_IMF_IMTYPE_JPEG90: + case R_IMF_IMTYPE_TARGA: + case R_IMF_IMTYPE_RAWTGA: + case R_IMF_IMTYPE_TIFF: + case R_IMF_IMTYPE_IRIS: + chan_flag |= IMA_CHAN_FLAG_BW; + break; + } + + return chan_flag; +} + +char BKE_imtype_valid_depths(const char imtype) +{ + switch (imtype) { + case R_IMF_IMTYPE_RADHDR: + return R_IMF_CHAN_DEPTH_32; + case R_IMF_IMTYPE_TIFF: + return R_IMF_CHAN_DEPTH_8 | R_IMF_CHAN_DEPTH_16; + case R_IMF_IMTYPE_OPENEXR: + return R_IMF_CHAN_DEPTH_16 | R_IMF_CHAN_DEPTH_32; + case R_IMF_IMTYPE_MULTILAYER: + return R_IMF_CHAN_DEPTH_16 | R_IMF_CHAN_DEPTH_32; + /* eeh, cineon does some strange 10bits per channel */ + case R_IMF_IMTYPE_DPX: + return R_IMF_CHAN_DEPTH_8 | R_IMF_CHAN_DEPTH_10 | R_IMF_CHAN_DEPTH_12 | R_IMF_CHAN_DEPTH_16; + case R_IMF_IMTYPE_CINEON: + return R_IMF_CHAN_DEPTH_10; + case R_IMF_IMTYPE_JP2: + return R_IMF_CHAN_DEPTH_8 | R_IMF_CHAN_DEPTH_12 | R_IMF_CHAN_DEPTH_16; + case R_IMF_IMTYPE_PNG: + return R_IMF_CHAN_DEPTH_8 | R_IMF_CHAN_DEPTH_16; + /* most formats are 8bit only */ + default: + return R_IMF_CHAN_DEPTH_8; + } +} + +char BKE_imtype_from_arg(const char *imtype_arg) +{ + if (STREQ(imtype_arg, "TGA")) { + return R_IMF_IMTYPE_TARGA; + } + if (STREQ(imtype_arg, "IRIS")) { + return R_IMF_IMTYPE_IRIS; + } +#ifdef WITH_DDS + if (STREQ(imtype_arg, "DDS")) { + return R_IMF_IMTYPE_DDS; + } +#endif + if (STREQ(imtype_arg, "JPEG")) { + return R_IMF_IMTYPE_JPEG90; + } + if (STREQ(imtype_arg, "IRIZ")) { + return R_IMF_IMTYPE_IRIZ; + } + if (STREQ(imtype_arg, "RAWTGA")) { + return R_IMF_IMTYPE_RAWTGA; + } + if (STREQ(imtype_arg, "AVIRAW")) { + return R_IMF_IMTYPE_AVIRAW; + } + if (STREQ(imtype_arg, "AVIJPEG")) { + return R_IMF_IMTYPE_AVIJPEG; + } + if (STREQ(imtype_arg, "PNG")) { + return R_IMF_IMTYPE_PNG; + } + if (STREQ(imtype_arg, "BMP")) { + return R_IMF_IMTYPE_BMP; + } +#ifdef WITH_HDR + if (STREQ(imtype_arg, "HDR")) { + return R_IMF_IMTYPE_RADHDR; + } +#endif +#ifdef WITH_TIFF + if (STREQ(imtype_arg, "TIFF")) { + return R_IMF_IMTYPE_TIFF; + } +#endif +#ifdef WITH_OPENEXR + if (STREQ(imtype_arg, "OPEN_EXR")) { + return R_IMF_IMTYPE_OPENEXR; + } + if (STREQ(imtype_arg, "OPEN_EXR_MULTILAYER")) { + return R_IMF_IMTYPE_MULTILAYER; + } + if (STREQ(imtype_arg, "EXR")) { + return R_IMF_IMTYPE_OPENEXR; + } + if (STREQ(imtype_arg, "MULTILAYER")) { + return R_IMF_IMTYPE_MULTILAYER; + } +#endif + if (STREQ(imtype_arg, "FFMPEG")) { + return R_IMF_IMTYPE_FFMPEG; + } +#ifdef WITH_CINEON + if (STREQ(imtype_arg, "CINEON")) { + return R_IMF_IMTYPE_CINEON; + } + if (STREQ(imtype_arg, "DPX")) { + return R_IMF_IMTYPE_DPX; + } +#endif +#ifdef WITH_OPENJPEG + if (STREQ(imtype_arg, "JP2")) { + return R_IMF_IMTYPE_JP2; + } +#endif + + return R_IMF_IMTYPE_INVALID; +} + +static bool do_add_image_extension(char *string, + const char imtype, + const ImageFormatData *im_format) +{ + const char *extension = nullptr; + const char *extension_test; + (void)im_format; /* may be unused, depends on build options */ + + if (imtype == R_IMF_IMTYPE_IRIS) { + if (!BLI_path_extension_check(string, extension_test = ".rgb")) { + extension = extension_test; + } + } + else if (imtype == R_IMF_IMTYPE_IRIZ) { + if (!BLI_path_extension_check(string, extension_test = ".rgb")) { + extension = extension_test; + } + } +#ifdef WITH_HDR + else if (imtype == R_IMF_IMTYPE_RADHDR) { + if (!BLI_path_extension_check(string, extension_test = ".hdr")) { + extension = extension_test; + } + } +#endif + else if (ELEM(imtype, + R_IMF_IMTYPE_PNG, + R_IMF_IMTYPE_FFMPEG, + R_IMF_IMTYPE_H264, + R_IMF_IMTYPE_THEORA, + R_IMF_IMTYPE_XVID)) { + if (!BLI_path_extension_check(string, extension_test = ".png")) { + extension = extension_test; + } + } +#ifdef WITH_DDS + else if (imtype == R_IMF_IMTYPE_DDS) { + if (!BLI_path_extension_check(string, extension_test = ".dds")) { + extension = extension_test; + } + } +#endif + else if (ELEM(imtype, R_IMF_IMTYPE_TARGA, R_IMF_IMTYPE_RAWTGA)) { + if (!BLI_path_extension_check(string, extension_test = ".tga")) { + extension = extension_test; + } + } + else if (imtype == R_IMF_IMTYPE_BMP) { + if (!BLI_path_extension_check(string, extension_test = ".bmp")) { + extension = extension_test; + } + } +#ifdef WITH_TIFF + else if (imtype == R_IMF_IMTYPE_TIFF) { + if (!BLI_path_extension_check_n(string, extension_test = ".tif", ".tiff", nullptr)) { + extension = extension_test; + } + } +#endif +#ifdef WITH_OPENIMAGEIO + else if (imtype == R_IMF_IMTYPE_PSD) { + if (!BLI_path_extension_check(string, extension_test = ".psd")) { + extension = extension_test; + } + } +#endif +#ifdef WITH_OPENEXR + else if (ELEM(imtype, R_IMF_IMTYPE_OPENEXR, R_IMF_IMTYPE_MULTILAYER)) { + if (!BLI_path_extension_check(string, extension_test = ".exr")) { + extension = extension_test; + } + } +#endif +#ifdef WITH_CINEON + else if (imtype == R_IMF_IMTYPE_CINEON) { + if (!BLI_path_extension_check(string, extension_test = ".cin")) { + extension = extension_test; + } + } + else if (imtype == R_IMF_IMTYPE_DPX) { + if (!BLI_path_extension_check(string, extension_test = ".dpx")) { + extension = extension_test; + } + } +#endif +#ifdef WITH_OPENJPEG + else if (imtype == R_IMF_IMTYPE_JP2) { + if (im_format) { + if (im_format->jp2_codec == R_IMF_JP2_CODEC_JP2) { + if (!BLI_path_extension_check(string, extension_test = ".jp2")) { + extension = extension_test; + } + } + else if (im_format->jp2_codec == R_IMF_JP2_CODEC_J2K) { + if (!BLI_path_extension_check(string, extension_test = ".j2c")) { + extension = extension_test; + } + } + else { + BLI_assert_msg(0, "Unsupported jp2 codec was specified in im_format->jp2_codec"); + } + } + else { + if (!BLI_path_extension_check(string, extension_test = ".jp2")) { + extension = extension_test; + } + } + } +#endif + else { // R_IMF_IMTYPE_AVIRAW, R_IMF_IMTYPE_AVIJPEG, R_IMF_IMTYPE_JPEG90 etc + if (!(BLI_path_extension_check_n(string, extension_test = ".jpg", ".jpeg", nullptr))) { + extension = extension_test; + } + } + + if (extension) { + /* prefer this in many cases to avoid .png.tga, but in certain cases it breaks */ + /* remove any other known image extension */ + if (BLI_path_extension_check_array(string, imb_ext_image)) { + return BLI_path_extension_replace(string, FILE_MAX, extension); + } + + return BLI_path_extension_ensure(string, FILE_MAX, extension); + } + + return false; +} + +int BKE_image_path_ensure_ext_from_imformat(char *string, const ImageFormatData *im_format) +{ + return do_add_image_extension(string, im_format->imtype, im_format); +} + +int BKE_image_path_ensure_ext_from_imtype(char *string, const char imtype) +{ + return do_add_image_extension(string, imtype, nullptr); +} + +void BKE_imformat_defaults(ImageFormatData *im_format) +{ + memset(im_format, 0, sizeof(*im_format)); + im_format->planes = R_IMF_PLANES_RGBA; + im_format->imtype = R_IMF_IMTYPE_PNG; + im_format->depth = R_IMF_CHAN_DEPTH_8; + im_format->quality = 90; + im_format->compress = 15; + + BKE_color_managed_display_settings_init(&im_format->display_settings); + BKE_color_managed_view_settings_init_default(&im_format->view_settings, + &im_format->display_settings); +} + +void BKE_imbuf_to_image_format(struct ImageFormatData *im_format, const ImBuf *imbuf) +{ + int ftype = imbuf->ftype; + int custom_flags = imbuf->foptions.flag; + char quality = imbuf->foptions.quality; + + BKE_imformat_defaults(im_format); + + /* file type */ + + if (ftype == IMB_FTYPE_IMAGIC) { + im_format->imtype = R_IMF_IMTYPE_IRIS; + } +#ifdef WITH_HDR + else if (ftype == IMB_FTYPE_RADHDR) { + im_format->imtype = R_IMF_IMTYPE_RADHDR; + } +#endif + else if (ftype == IMB_FTYPE_PNG) { + im_format->imtype = R_IMF_IMTYPE_PNG; + + if (custom_flags & PNG_16BIT) { + im_format->depth = R_IMF_CHAN_DEPTH_16; + } + + im_format->compress = quality; + } + +#ifdef WITH_DDS + else if (ftype == IMB_FTYPE_DDS) { + im_format->imtype = R_IMF_IMTYPE_DDS; + } +#endif + else if (ftype == IMB_FTYPE_BMP) { + im_format->imtype = R_IMF_IMTYPE_BMP; + } +#ifdef WITH_TIFF + else if (ftype == IMB_FTYPE_TIF) { + im_format->imtype = R_IMF_IMTYPE_TIFF; + if (custom_flags & TIF_16BIT) { + im_format->depth = R_IMF_CHAN_DEPTH_16; + } + if (custom_flags & TIF_COMPRESS_NONE) { + im_format->tiff_codec = R_IMF_TIFF_CODEC_NONE; + } + if (custom_flags & TIF_COMPRESS_DEFLATE) { + im_format->tiff_codec = R_IMF_TIFF_CODEC_DEFLATE; + } + if (custom_flags & TIF_COMPRESS_LZW) { + im_format->tiff_codec = R_IMF_TIFF_CODEC_LZW; + } + if (custom_flags & TIF_COMPRESS_PACKBITS) { + im_format->tiff_codec = R_IMF_TIFF_CODEC_PACKBITS; + } + } +#endif + +#ifdef WITH_OPENEXR + else if (ftype == IMB_FTYPE_OPENEXR) { + im_format->imtype = R_IMF_IMTYPE_OPENEXR; + if (custom_flags & OPENEXR_HALF) { + im_format->depth = R_IMF_CHAN_DEPTH_16; + } + if (custom_flags & OPENEXR_COMPRESS) { + im_format->exr_codec = R_IMF_EXR_CODEC_ZIP; /* Can't determine compression */ + } + if (imbuf->zbuf_float) { + im_format->flag |= R_IMF_FLAG_ZBUF; + } + } +#endif + +#ifdef WITH_CINEON + else if (ftype == IMB_FTYPE_CINEON) { + im_format->imtype = R_IMF_IMTYPE_CINEON; + } + else if (ftype == IMB_FTYPE_DPX) { + im_format->imtype = R_IMF_IMTYPE_DPX; + } +#endif + else if (ftype == IMB_FTYPE_TGA) { + if (custom_flags & RAWTGA) { + im_format->imtype = R_IMF_IMTYPE_RAWTGA; + } + else { + im_format->imtype = R_IMF_IMTYPE_TARGA; + } + } +#ifdef WITH_OPENJPEG + else if (ftype == IMB_FTYPE_JP2) { + im_format->imtype = R_IMF_IMTYPE_JP2; + im_format->quality = quality; + + if (custom_flags & JP2_16BIT) { + im_format->depth = R_IMF_CHAN_DEPTH_16; + } + else if (custom_flags & JP2_12BIT) { + im_format->depth = R_IMF_CHAN_DEPTH_12; + } + + if (custom_flags & JP2_YCC) { + im_format->jp2_flag |= R_IMF_JP2_FLAG_YCC; + } + + if (custom_flags & JP2_CINE) { + im_format->jp2_flag |= R_IMF_JP2_FLAG_CINE_PRESET; + if (custom_flags & JP2_CINE_48FPS) { + im_format->jp2_flag |= R_IMF_JP2_FLAG_CINE_48; + } + } + + if (custom_flags & JP2_JP2) { + im_format->jp2_codec = R_IMF_JP2_CODEC_JP2; + } + else if (custom_flags & JP2_J2K) { + im_format->jp2_codec = R_IMF_JP2_CODEC_J2K; + } + else { + BLI_assert_msg(0, "Unsupported jp2 codec was specified in file type"); + } + } +#endif + + else { + im_format->imtype = R_IMF_IMTYPE_JPEG90; + im_format->quality = quality; + } + + /* planes */ + im_format->planes = imbuf->planes; +} + +#define STAMP_NAME_SIZE ((MAX_ID_NAME - 2) + 16) +/* could allow access externally - 512 is for long names, + * STAMP_NAME_SIZE is for id names, allowing them some room for description */ +struct StampDataCustomField { + struct StampDataCustomField *next, *prev; + /* TODO(sergey): Think of better size here, maybe dynamically allocated even. */ + char key[512]; + char *value; + /* TODO(sergey): Support non-string values. */ +}; + +struct StampData { + char file[512]; + char note[512]; + char date[512]; + char marker[512]; + char time[512]; + char frame[512]; + char frame_range[512]; + char camera[STAMP_NAME_SIZE]; + char cameralens[STAMP_NAME_SIZE]; + char scene[STAMP_NAME_SIZE]; + char strip[STAMP_NAME_SIZE]; + char rendertime[STAMP_NAME_SIZE]; + char memory[STAMP_NAME_SIZE]; + char hostname[512]; + + /* Custom fields are used to put extra meta information header from render + * engine to the result image. + * + * NOTE: This fields are not stamped onto the image. At least for now. + */ + ListBase custom_fields; +}; +#undef STAMP_NAME_SIZE + +/** + * \param do_prefix: Include a label like "File ", "Date ", etc. in the stamp data strings. + * \param use_dynamic: Also include data that can change on a per-frame basis. + */ +static void stampdata( + const Scene *scene, Object *camera, StampData *stamp_data, int do_prefix, bool use_dynamic) +{ + char text[256]; + struct tm *tl; + time_t t; + + if (scene->r.stamp & R_STAMP_FILENAME) { + const char *blendfile_path = BKE_main_blendfile_path_from_global(); + SNPRINTF(stamp_data->file, + do_prefix ? "File %s" : "%s", + (blendfile_path[0] != '\0') ? blendfile_path : ""); + } + else { + stamp_data->file[0] = '\0'; + } + + if (scene->r.stamp & R_STAMP_NOTE) { + /* Never do prefix for Note */ + SNPRINTF(stamp_data->note, "%s", scene->r.stamp_udata); + } + else { + stamp_data->note[0] = '\0'; + } + + if (scene->r.stamp & R_STAMP_DATE) { + t = time(nullptr); + tl = localtime(&t); + SNPRINTF(text, + "%04d/%02d/%02d %02d:%02d:%02d", + tl->tm_year + 1900, + tl->tm_mon + 1, + tl->tm_mday, + tl->tm_hour, + tl->tm_min, + tl->tm_sec); + SNPRINTF(stamp_data->date, do_prefix ? "Date %s" : "%s", text); + } + else { + stamp_data->date[0] = '\0'; + } + + if (use_dynamic && scene->r.stamp & R_STAMP_MARKER) { + const char *name = BKE_scene_find_last_marker_name(scene, CFRA); + + if (name) { + STRNCPY(text, name); + } + else { + STRNCPY(text, ""); + } + + SNPRINTF(stamp_data->marker, do_prefix ? "Marker %s" : "%s", text); + } + else { + stamp_data->marker[0] = '\0'; + } + + if (use_dynamic && scene->r.stamp & R_STAMP_TIME) { + const short timecode_style = USER_TIMECODE_SMPTE_FULL; + BLI_timecode_string_from_time( + text, sizeof(text), 0, FRA2TIME(scene->r.cfra), FPS, timecode_style); + SNPRINTF(stamp_data->time, do_prefix ? "Timecode %s" : "%s", text); + } + else { + stamp_data->time[0] = '\0'; + } + + if (use_dynamic && scene->r.stamp & R_STAMP_FRAME) { + char fmtstr[32]; + int digits = 1; + + if (scene->r.efra > 9) { + digits = integer_digits_i(scene->r.efra); + } + + SNPRINTF(fmtstr, do_prefix ? "Frame %%0%di" : "%%0%di", digits); + SNPRINTF(stamp_data->frame, fmtstr, scene->r.cfra); + } + else { + stamp_data->frame[0] = '\0'; + } + + if (scene->r.stamp & R_STAMP_FRAME_RANGE) { + SNPRINTF(stamp_data->frame_range, + do_prefix ? "Frame Range %d:%d" : "%d:%d", + scene->r.sfra, + scene->r.efra); + } + else { + stamp_data->frame_range[0] = '\0'; + } + + if (use_dynamic && scene->r.stamp & R_STAMP_CAMERA) { + SNPRINTF(stamp_data->camera, + do_prefix ? "Camera %s" : "%s", + camera ? camera->id.name + 2 : ""); + } + else { + stamp_data->camera[0] = '\0'; + } + + if (use_dynamic && scene->r.stamp & R_STAMP_CAMERALENS) { + if (camera && camera->type == OB_CAMERA) { + SNPRINTF(text, "%.2f", ((Camera *)camera->data)->lens); + } + else { + STRNCPY(text, ""); + } + + SNPRINTF(stamp_data->cameralens, do_prefix ? "Lens %s" : "%s", text); + } + else { + stamp_data->cameralens[0] = '\0'; + } + + if (scene->r.stamp & R_STAMP_SCENE) { + SNPRINTF(stamp_data->scene, do_prefix ? "Scene %s" : "%s", scene->id.name + 2); + } + else { + stamp_data->scene[0] = '\0'; + } + + if (use_dynamic && scene->r.stamp & R_STAMP_SEQSTRIP) { + const Sequence *seq = SEQ_get_topmost_sequence(scene, scene->r.cfra); + + if (seq) { + STRNCPY(text, seq->name + 2); + } + else { + STRNCPY(text, ""); + } + + SNPRINTF(stamp_data->strip, do_prefix ? "Strip %s" : "%s", text); + } + else { + stamp_data->strip[0] = '\0'; + } + + { + Render *re = RE_GetSceneRender(scene); + RenderStats *stats = re ? RE_GetStats(re) : nullptr; + + if (use_dynamic && stats && (scene->r.stamp & R_STAMP_RENDERTIME)) { + BLI_timecode_string_from_time_simple(text, sizeof(text), stats->lastframetime); + + SNPRINTF(stamp_data->rendertime, do_prefix ? "RenderTime %s" : "%s", text); + } + else { + stamp_data->rendertime[0] = '\0'; + } + + if (use_dynamic && stats && (scene->r.stamp & R_STAMP_MEMORY)) { + SNPRINTF(stamp_data->memory, do_prefix ? "Peak Memory %.2fM" : "%.2fM", stats->mem_peak); + } + else { + stamp_data->memory[0] = '\0'; + } + } + if (scene->r.stamp & R_STAMP_FRAME_RANGE) { + SNPRINTF(stamp_data->frame_range, + do_prefix ? "Frame Range %d:%d" : "%d:%d", + scene->r.sfra, + scene->r.efra); + } + else { + stamp_data->frame_range[0] = '\0'; + } + + if (scene->r.stamp & R_STAMP_HOSTNAME) { + char hostname[500]; /* sizeof(stamp_data->hostname) minus some bytes for a label. */ + BLI_hostname_get(hostname, sizeof(hostname)); + SNPRINTF(stamp_data->hostname, do_prefix ? "Hostname %s" : "%s", hostname); + } + else { + stamp_data->hostname[0] = '\0'; + } +} + +static void stampdata_from_template(StampData *stamp_data, + const Scene *scene, + const StampData *stamp_data_template, + bool do_prefix) +{ + if (scene->r.stamp & R_STAMP_FILENAME) { + SNPRINTF(stamp_data->file, do_prefix ? "File %s" : "%s", stamp_data_template->file); + } + else { + stamp_data->file[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_NOTE) { + SNPRINTF(stamp_data->note, "%s", stamp_data_template->note); + } + else { + stamp_data->note[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_DATE) { + SNPRINTF(stamp_data->date, do_prefix ? "Date %s" : "%s", stamp_data_template->date); + } + else { + stamp_data->date[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_MARKER) { + SNPRINTF(stamp_data->marker, do_prefix ? "Marker %s" : "%s", stamp_data_template->marker); + } + else { + stamp_data->marker[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_TIME) { + SNPRINTF(stamp_data->time, do_prefix ? "Timecode %s" : "%s", stamp_data_template->time); + } + else { + stamp_data->time[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_FRAME) { + SNPRINTF(stamp_data->frame, do_prefix ? "Frame %s" : "%s", stamp_data_template->frame); + } + else { + stamp_data->frame[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_CAMERA) { + SNPRINTF(stamp_data->camera, do_prefix ? "Camera %s" : "%s", stamp_data_template->camera); + } + else { + stamp_data->camera[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_CAMERALENS) { + SNPRINTF( + stamp_data->cameralens, do_prefix ? "Lens %s" : "%s", stamp_data_template->cameralens); + } + else { + stamp_data->cameralens[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_SCENE) { + SNPRINTF(stamp_data->scene, do_prefix ? "Scene %s" : "%s", stamp_data_template->scene); + } + else { + stamp_data->scene[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_SEQSTRIP) { + SNPRINTF(stamp_data->strip, do_prefix ? "Strip %s" : "%s", stamp_data_template->strip); + } + else { + stamp_data->strip[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_RENDERTIME) { + SNPRINTF(stamp_data->rendertime, + do_prefix ? "RenderTime %s" : "%s", + stamp_data_template->rendertime); + } + else { + stamp_data->rendertime[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_MEMORY) { + SNPRINTF(stamp_data->memory, do_prefix ? "Peak Memory %s" : "%s", stamp_data_template->memory); + } + else { + stamp_data->memory[0] = '\0'; + } + if (scene->r.stamp & R_STAMP_HOSTNAME) { + SNPRINTF( + stamp_data->hostname, do_prefix ? "Hostname %s" : "%s", stamp_data_template->hostname); + } + else { + stamp_data->hostname[0] = '\0'; + } +} + +void BKE_image_stamp_buf(Scene *scene, + Object *camera, + const StampData *stamp_data_template, + unsigned char *rect, + float *rectf, + int width, + int height, + int channels) +{ + struct StampData stamp_data; + float w, h, pad; + int x, y, y_ofs; + float h_fixed; + const int mono = blf_mono_font_render; /* XXX */ + struct ColorManagedDisplay *display; + const char *display_device; + + /* vars for calculating wordwrap */ + struct { + struct ResultBLF info; + rctf rect; + } wrap; + + /* this could be an argument if we want to operate on non linear float imbuf's + * for now though this is only used for renders which use scene settings */ + +#define TEXT_SIZE_CHECK(str, w, h) \ + ((str[0]) && ((void)(h = h_fixed), (w = BLF_width(mono, str, sizeof(str))))) + + /* must enable BLF_WORD_WRAP before using */ +#define TEXT_SIZE_CHECK_WORD_WRAP(str, w, h) \ + ((str[0]) && (BLF_boundbox_ex(mono, str, sizeof(str), &wrap.rect, &wrap.info), \ + (void)(h = h_fixed * wrap.info.lines), \ + (w = BLI_rctf_size_x(&wrap.rect)))) + +#define BUFF_MARGIN_X 2 +#define BUFF_MARGIN_Y 1 + + if (!rect && !rectf) { + return; + } + + display_device = scene->display_settings.display_device; + display = IMB_colormanagement_display_get_named(display_device); + + bool do_prefix = (scene->r.stamp & R_STAMP_HIDE_LABELS) == 0; + if (stamp_data_template == nullptr) { + stampdata(scene, camera, &stamp_data, do_prefix, true); + } + else { + stampdata_from_template(&stamp_data, scene, stamp_data_template, do_prefix); + } + + /* TODO: do_versions. */ + if (scene->r.stamp_font_id < 8) { + scene->r.stamp_font_id = 12; + } + + /* set before return */ + BLF_size(mono, scene->r.stamp_font_id, 72); + BLF_wordwrap(mono, width - (BUFF_MARGIN_X * 2)); + + BLF_buffer(mono, rectf, rect, width, height, channels, display); + BLF_buffer_col(mono, scene->r.fg_stamp); + pad = BLF_width_max(mono); + + /* use 'h_fixed' rather than 'h', aligns better */ + h_fixed = BLF_height_max(mono); + y_ofs = -BLF_descender(mono); + + x = 0; + y = height; + + if (TEXT_SIZE_CHECK(stamp_data.file, w, h)) { + /* Top left corner */ + y -= h; + + /* also a little of space to the background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + x - BUFF_MARGIN_X, + y - BUFF_MARGIN_Y, + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + + /* and draw the text. */ + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.file, sizeof(stamp_data.file)); + + /* the extra pixel for background. */ + y -= BUFF_MARGIN_Y * 2; + } + + /* Top left corner, below File */ + if (TEXT_SIZE_CHECK(stamp_data.date, w, h)) { + y -= h; + + /* and space for background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + 0, + y - BUFF_MARGIN_Y, + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.date, sizeof(stamp_data.date)); + + /* the extra pixel for background. */ + y -= BUFF_MARGIN_Y * 2; + } + + /* Top left corner, below File, Date */ + if (TEXT_SIZE_CHECK(stamp_data.rendertime, w, h)) { + y -= h; + + /* and space for background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + 0, + y - BUFF_MARGIN_Y, + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.rendertime, sizeof(stamp_data.rendertime)); + + /* the extra pixel for background. */ + y -= BUFF_MARGIN_Y * 2; + } + + /* Top left corner, below File, Date, Rendertime */ + if (TEXT_SIZE_CHECK(stamp_data.memory, w, h)) { + y -= h; + + /* and space for background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + 0, + y - BUFF_MARGIN_Y, + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.memory, sizeof(stamp_data.memory)); + + /* the extra pixel for background. */ + y -= BUFF_MARGIN_Y * 2; + } + + /* Top left corner, below File, Date, Rendertime, Memory */ + if (TEXT_SIZE_CHECK(stamp_data.hostname, w, h)) { + y -= h; + + /* and space for background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + 0, + y - BUFF_MARGIN_Y, + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.hostname, sizeof(stamp_data.hostname)); + + /* the extra pixel for background. */ + y -= BUFF_MARGIN_Y * 2; + } + + /* Top left corner, below File, Date, Memory, Rendertime, Hostname */ + BLF_enable(mono, BLF_WORD_WRAP); + if (TEXT_SIZE_CHECK_WORD_WRAP(stamp_data.note, w, h)) { + y -= h; + + /* and space for background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + 0, + y - BUFF_MARGIN_Y, + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + + BLF_position(mono, x, y + y_ofs + (h - h_fixed), 0.0); + BLF_draw_buffer(mono, stamp_data.note, sizeof(stamp_data.note)); + } + BLF_disable(mono, BLF_WORD_WRAP); + + x = 0; + y = 0; + + /* Bottom left corner, leaving space for timing */ + if (TEXT_SIZE_CHECK(stamp_data.marker, w, h)) { + + /* extra space for background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + x - BUFF_MARGIN_X, + y - BUFF_MARGIN_Y, + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + + /* and pad the text. */ + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.marker, sizeof(stamp_data.marker)); + + /* space width. */ + x += w + pad; + } + + /* Left bottom corner */ + if (TEXT_SIZE_CHECK(stamp_data.time, w, h)) { + + /* extra space for background */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + x - BUFF_MARGIN_X, + y, + x + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + + /* and pad the text. */ + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.time, sizeof(stamp_data.time)); + + /* space width. */ + x += w + pad; + } + + if (TEXT_SIZE_CHECK(stamp_data.frame, w, h)) { + + /* extra space for background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + x - BUFF_MARGIN_X, + y - BUFF_MARGIN_Y, + x + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + + /* and pad the text. */ + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.frame, sizeof(stamp_data.frame)); + + /* space width. */ + x += w + pad; + } + + if (TEXT_SIZE_CHECK(stamp_data.camera, w, h)) { + + /* extra space for background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + x - BUFF_MARGIN_X, + y - BUFF_MARGIN_Y, + x + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.camera, sizeof(stamp_data.camera)); + + /* space width. */ + x += w + pad; + } + + if (TEXT_SIZE_CHECK(stamp_data.cameralens, w, h)) { + + /* extra space for background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + x - BUFF_MARGIN_X, + y - BUFF_MARGIN_Y, + x + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.cameralens, sizeof(stamp_data.cameralens)); + } + + if (TEXT_SIZE_CHECK(stamp_data.scene, w, h)) { + + /* Bottom right corner, with an extra space because blenfont is too strict! */ + x = width - w - 2; + + /* extra space for background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + x - BUFF_MARGIN_X, + y - BUFF_MARGIN_Y, + x + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + + /* and pad the text. */ + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.scene, sizeof(stamp_data.scene)); + } + + if (TEXT_SIZE_CHECK(stamp_data.strip, w, h)) { + + /* Top right corner, with an extra space because blenfont is too strict! */ + x = width - w - pad; + y = height - h; + + /* extra space for background. */ + buf_rectfill_area(rect, + rectf, + width, + height, + scene->r.bg_stamp, + display, + x - BUFF_MARGIN_X, + y - BUFF_MARGIN_Y, + x + w + BUFF_MARGIN_X, + y + h + BUFF_MARGIN_Y); + + BLF_position(mono, x, y + y_ofs, 0.0); + BLF_draw_buffer(mono, stamp_data.strip, sizeof(stamp_data.strip)); + } + + /* cleanup the buffer. */ + BLF_buffer(mono, nullptr, nullptr, 0, 0, 0, nullptr); + BLF_wordwrap(mono, 0); + +#undef TEXT_SIZE_CHECK +#undef TEXT_SIZE_CHECK_WORD_WRAP +#undef BUFF_MARGIN_X +#undef BUFF_MARGIN_Y +} + +void BKE_render_result_stamp_info(Scene *scene, + Object *camera, + struct RenderResult *rr, + bool allocate_only) +{ + struct StampData *stamp_data; + + if (!(scene && (scene->r.stamp & R_STAMP_ALL)) && !allocate_only) { + return; + } + + if (!rr->stamp_data) { + stamp_data = MEM_cnew("RenderResult.stamp_data"); + } + else { + stamp_data = rr->stamp_data; + } + + if (!allocate_only) { + stampdata(scene, camera, stamp_data, 0, true); + } + + if (!rr->stamp_data) { + rr->stamp_data = stamp_data; + } +} + +struct StampData *BKE_stamp_info_from_scene_static(const Scene *scene) +{ + struct StampData *stamp_data; + + if (!(scene && (scene->r.stamp & R_STAMP_ALL))) { + return nullptr; + } + + /* Memory is allocated here (instead of by the caller) so that the caller + * doesn't have to know the size of the StampData struct. */ + stamp_data = MEM_cnew(__func__); + stampdata(scene, nullptr, stamp_data, 0, false); + + return stamp_data; +} + +static const char *stamp_metadata_fields[] = { + "File", + "Note", + "Date", + "Marker", + "Time", + "Frame", + "FrameRange", + "Camera", + "Lens", + "Scene", + "Strip", + "RenderTime", + "Memory", + "Hostname", + nullptr, +}; + +bool BKE_stamp_is_known_field(const char *field_name) +{ + int i = 0; + while (stamp_metadata_fields[i] != nullptr) { + if (STREQ(field_name, stamp_metadata_fields[i])) { + return true; + } + i++; + } + return false; +} + +void BKE_stamp_info_callback(void *data, + struct StampData *stamp_data, + StampCallback callback, + bool noskip) +{ + if ((callback == nullptr) || (stamp_data == nullptr)) { + return; + } + +#define CALL(member, value_str) \ + if (noskip || stamp_data->member[0]) { \ + callback(data, value_str, stamp_data->member, sizeof(stamp_data->member)); \ + } \ + ((void)0) + + /* TODO(sergey): Use stamp_metadata_fields somehow, or make it more generic + * meta information to avoid duplication. */ + CALL(file, "File"); + CALL(note, "Note"); + CALL(date, "Date"); + CALL(marker, "Marker"); + CALL(time, "Time"); + CALL(frame, "Frame"); + CALL(frame_range, "FrameRange"); + CALL(camera, "Camera"); + CALL(cameralens, "Lens"); + CALL(scene, "Scene"); + CALL(strip, "Strip"); + CALL(rendertime, "RenderTime"); + CALL(memory, "Memory"); + CALL(hostname, "Hostname"); + + LISTBASE_FOREACH (StampDataCustomField *, custom_field, &stamp_data->custom_fields) { + if (noskip || custom_field->value[0]) { + callback(data, custom_field->key, custom_field->value, strlen(custom_field->value) + 1); + } + } + +#undef CALL +} + +void BKE_render_result_stamp_data(RenderResult *rr, const char *key, const char *value) +{ + StampData *stamp_data; + if (rr->stamp_data == nullptr) { + rr->stamp_data = MEM_cnew("RenderResult.stamp_data"); + } + stamp_data = rr->stamp_data; + StampDataCustomField *field = static_cast( + MEM_mallocN(sizeof(StampDataCustomField), "StampData Custom Field")); + STRNCPY(field->key, key); + field->value = BLI_strdup(value); + BLI_addtail(&stamp_data->custom_fields, field); +} + +StampData *BKE_stamp_data_copy(const StampData *stamp_data) +{ + if (stamp_data == nullptr) { + return nullptr; + } + + StampData *stamp_datan = static_cast(MEM_dupallocN(stamp_data)); + BLI_duplicatelist(&stamp_datan->custom_fields, &stamp_data->custom_fields); + + LISTBASE_FOREACH (StampDataCustomField *, custom_fieldn, &stamp_datan->custom_fields) { + custom_fieldn->value = static_cast(MEM_dupallocN(custom_fieldn->value)); + } + + return stamp_datan; +} + +void BKE_stamp_data_free(StampData *stamp_data) +{ + if (stamp_data == nullptr) { + return; + } + LISTBASE_FOREACH (StampDataCustomField *, custom_field, &stamp_data->custom_fields) { + MEM_freeN(custom_field->value); + } + BLI_freelistN(&stamp_data->custom_fields); + MEM_freeN(stamp_data); +} + +/* wrap for callback only */ +static void metadata_set_field(void *data, const char *propname, char *propvalue, int UNUSED(len)) +{ + /* We know it is an ImBuf* because that's what we pass to BKE_stamp_info_callback. */ + ImBuf *imbuf = static_cast(data); + IMB_metadata_set_field(imbuf->metadata, propname, propvalue); +} + +static void metadata_get_field(void *data, const char *propname, char *propvalue, int len) +{ + /* We know it is an ImBuf* because that's what we pass to BKE_stamp_info_callback. */ + ImBuf *imbuf = static_cast(data); + IMB_metadata_get_field(imbuf->metadata, propname, propvalue, len); +} + +void BKE_imbuf_stamp_info(RenderResult *rr, struct ImBuf *ibuf) +{ + struct StampData *stamp_data = rr->stamp_data; + IMB_metadata_ensure(&ibuf->metadata); + BKE_stamp_info_callback(ibuf, stamp_data, metadata_set_field, false); +} + +static void metadata_copy_custom_fields(const char *field, const char *value, void *rr_v) +{ + if (BKE_stamp_is_known_field(field)) { + return; + } + RenderResult *rr = (RenderResult *)rr_v; + BKE_render_result_stamp_data(rr, field, value); +} + +void BKE_stamp_info_from_imbuf(RenderResult *rr, struct ImBuf *ibuf) +{ + if (rr->stamp_data == nullptr) { + rr->stamp_data = MEM_cnew("RenderResult.stamp_data"); + } + struct StampData *stamp_data = rr->stamp_data; + IMB_metadata_ensure(&ibuf->metadata); + BKE_stamp_info_callback(ibuf, stamp_data, metadata_get_field, true); + /* Copy render engine specific settings. */ + IMB_metadata_foreach(ibuf, metadata_copy_custom_fields, rr); +} + +bool BKE_imbuf_alpha_test(ImBuf *ibuf) +{ + int tot; + if (ibuf->rect_float) { + const float *buf = ibuf->rect_float; + for (tot = ibuf->x * ibuf->y; tot--; buf += 4) { + if (buf[3] < 1.0f) { + return true; + } + } + } + else if (ibuf->rect) { + unsigned char *buf = (unsigned char *)ibuf->rect; + for (tot = ibuf->x * ibuf->y; tot--; buf += 4) { + if (buf[3] != 255) { + return true; + } + } + } + + return false; +} + +void BKE_imbuf_write_prepare(ImBuf *ibuf, const ImageFormatData *imf) +{ + char imtype = imf->imtype; + char compress = imf->compress; + char quality = imf->quality; + + /* initialize all from image format */ + ibuf->foptions.flag = 0; + + if (imtype == R_IMF_IMTYPE_IRIS) { + ibuf->ftype = IMB_FTYPE_IMAGIC; + } +#ifdef WITH_HDR + else if (imtype == R_IMF_IMTYPE_RADHDR) { + ibuf->ftype = IMB_FTYPE_RADHDR; + } +#endif + else if (ELEM(imtype, + R_IMF_IMTYPE_PNG, + R_IMF_IMTYPE_FFMPEG, + R_IMF_IMTYPE_H264, + R_IMF_IMTYPE_THEORA, + R_IMF_IMTYPE_XVID)) { + ibuf->ftype = IMB_FTYPE_PNG; + + if (imtype == R_IMF_IMTYPE_PNG) { + if (imf->depth == R_IMF_CHAN_DEPTH_16) { + ibuf->foptions.flag |= PNG_16BIT; + } + + ibuf->foptions.quality = compress; + } + } +#ifdef WITH_DDS + else if (imtype == R_IMF_IMTYPE_DDS) { + ibuf->ftype = IMB_FTYPE_DDS; + } +#endif + else if (imtype == R_IMF_IMTYPE_BMP) { + ibuf->ftype = IMB_FTYPE_BMP; + } +#ifdef WITH_TIFF + else if (imtype == R_IMF_IMTYPE_TIFF) { + ibuf->ftype = IMB_FTYPE_TIF; + + if (imf->depth == R_IMF_CHAN_DEPTH_16) { + ibuf->foptions.flag |= TIF_16BIT; + } + if (imf->tiff_codec == R_IMF_TIFF_CODEC_NONE) { + ibuf->foptions.flag |= TIF_COMPRESS_NONE; + } + else if (imf->tiff_codec == R_IMF_TIFF_CODEC_DEFLATE) { + ibuf->foptions.flag |= TIF_COMPRESS_DEFLATE; + } + else if (imf->tiff_codec == R_IMF_TIFF_CODEC_LZW) { + ibuf->foptions.flag |= TIF_COMPRESS_LZW; + } + else if (imf->tiff_codec == R_IMF_TIFF_CODEC_PACKBITS) { + ibuf->foptions.flag |= TIF_COMPRESS_PACKBITS; + } + } +#endif +#ifdef WITH_OPENEXR + else if (ELEM(imtype, R_IMF_IMTYPE_OPENEXR, R_IMF_IMTYPE_MULTILAYER)) { + ibuf->ftype = IMB_FTYPE_OPENEXR; + if (imf->depth == R_IMF_CHAN_DEPTH_16) { + ibuf->foptions.flag |= OPENEXR_HALF; + } + ibuf->foptions.flag |= (imf->exr_codec & OPENEXR_COMPRESS); + + if (!(imf->flag & R_IMF_FLAG_ZBUF)) { + /* Signal for exr saving. */ + IMB_freezbuffloatImBuf(ibuf); + } + } +#endif +#ifdef WITH_CINEON + else if (imtype == R_IMF_IMTYPE_CINEON) { + ibuf->ftype = IMB_FTYPE_CINEON; + if (imf->cineon_flag & R_IMF_CINEON_FLAG_LOG) { + ibuf->foptions.flag |= CINEON_LOG; + } + if (imf->depth == R_IMF_CHAN_DEPTH_16) { + ibuf->foptions.flag |= CINEON_16BIT; + } + else if (imf->depth == R_IMF_CHAN_DEPTH_12) { + ibuf->foptions.flag |= CINEON_12BIT; + } + else if (imf->depth == R_IMF_CHAN_DEPTH_10) { + ibuf->foptions.flag |= CINEON_10BIT; + } + } + else if (imtype == R_IMF_IMTYPE_DPX) { + ibuf->ftype = IMB_FTYPE_DPX; + if (imf->cineon_flag & R_IMF_CINEON_FLAG_LOG) { + ibuf->foptions.flag |= CINEON_LOG; + } + if (imf->depth == R_IMF_CHAN_DEPTH_16) { + ibuf->foptions.flag |= CINEON_16BIT; + } + else if (imf->depth == R_IMF_CHAN_DEPTH_12) { + ibuf->foptions.flag |= CINEON_12BIT; + } + else if (imf->depth == R_IMF_CHAN_DEPTH_10) { + ibuf->foptions.flag |= CINEON_10BIT; + } + } +#endif + else if (imtype == R_IMF_IMTYPE_TARGA) { + ibuf->ftype = IMB_FTYPE_TGA; + } + else if (imtype == R_IMF_IMTYPE_RAWTGA) { + ibuf->ftype = IMB_FTYPE_TGA; + ibuf->foptions.flag = RAWTGA; + } +#ifdef WITH_OPENJPEG + else if (imtype == R_IMF_IMTYPE_JP2) { + if (quality < 10) { + quality = 90; + } + ibuf->ftype = IMB_FTYPE_JP2; + ibuf->foptions.quality = quality; + + if (imf->depth == R_IMF_CHAN_DEPTH_16) { + ibuf->foptions.flag |= JP2_16BIT; + } + else if (imf->depth == R_IMF_CHAN_DEPTH_12) { + ibuf->foptions.flag |= JP2_12BIT; + } + + if (imf->jp2_flag & R_IMF_JP2_FLAG_YCC) { + ibuf->foptions.flag |= JP2_YCC; + } + + if (imf->jp2_flag & R_IMF_JP2_FLAG_CINE_PRESET) { + ibuf->foptions.flag |= JP2_CINE; + if (imf->jp2_flag & R_IMF_JP2_FLAG_CINE_48) { + ibuf->foptions.flag |= JP2_CINE_48FPS; + } + } + + if (imf->jp2_codec == R_IMF_JP2_CODEC_JP2) { + ibuf->foptions.flag |= JP2_JP2; + } + else if (imf->jp2_codec == R_IMF_JP2_CODEC_J2K) { + ibuf->foptions.flag |= JP2_J2K; + } + else { + BLI_assert_msg(0, "Unsupported jp2 codec was specified in im_format->jp2_codec"); + } + } +#endif + else { + /* R_IMF_IMTYPE_JPEG90, etc. default we save jpegs */ + if (quality < 10) { + quality = 90; + } + ibuf->ftype = IMB_FTYPE_JPG; + ibuf->foptions.quality = quality; + } +} + +int BKE_imbuf_write(ImBuf *ibuf, const char *name, const ImageFormatData *imf) +{ + BKE_imbuf_write_prepare(ibuf, imf); + + BLI_make_existing_file(name); + + const bool ok = IMB_saveiff(ibuf, name, IB_rect | IB_zbuf | IB_zbuffloat); + if (ok == 0) { + perror(name); + } + + return ok; +} + +int BKE_imbuf_write_as(ImBuf *ibuf, const char *name, ImageFormatData *imf, const bool save_copy) +{ + ImBuf ibuf_back = *ibuf; + int ok; + + /* All data is RGBA anyway, this just controls how to save for some formats. */ + ibuf->planes = imf->planes; + + ok = BKE_imbuf_write(ibuf, name, imf); + + if (save_copy) { + /* note that we are not restoring _all_ settings */ + ibuf->planes = ibuf_back.planes; + ibuf->ftype = ibuf_back.ftype; + ibuf->foptions = ibuf_back.foptions; + } + + return ok; +} + +int BKE_imbuf_write_stamp(Scene *scene, + struct RenderResult *rr, + ImBuf *ibuf, + const char *name, + const struct ImageFormatData *imf) +{ + if (scene && scene->r.stamp & R_STAMP_ALL) { + BKE_imbuf_stamp_info(rr, ibuf); + } + + return BKE_imbuf_write(ibuf, name, imf); +} + +static void do_makepicstring(char *string, + const char *base, + const char *relbase, + int frame, + const char imtype, + const ImageFormatData *im_format, + const bool use_ext, + const bool use_frames, + const char *suffix) +{ + if (string == nullptr) { + return; + } + BLI_strncpy(string, base, FILE_MAX - 10); /* weak assumption */ + BLI_path_abs(string, relbase); + + if (use_frames) { + BLI_path_frame(string, frame, 4); + } + + if (suffix) { + BLI_path_suffix(string, FILE_MAX, suffix, ""); + } + + if (use_ext) { + do_add_image_extension(string, imtype, im_format); + } +} + +void BKE_image_path_from_imformat(char *string, + const char *base, + const char *relbase, + int frame, + const ImageFormatData *im_format, + const bool use_ext, + const bool use_frames, + const char *suffix) +{ + do_makepicstring( + string, base, relbase, frame, im_format->imtype, im_format, use_ext, use_frames, suffix); +} + +void BKE_image_path_from_imtype(char *string, + const char *base, + const char *relbase, + int frame, + const char imtype, + const bool use_ext, + const bool use_frames, + const char *suffix) +{ + do_makepicstring(string, base, relbase, frame, imtype, nullptr, use_ext, use_frames, suffix); +} + +struct anim *openanim_noload(const char *name, + int flags, + int streamindex, + char colorspace[IMA_MAX_SPACE]) +{ + struct anim *anim; + + anim = IMB_open_anim(name, flags, streamindex, colorspace); + return anim; +} + +struct anim *openanim(const char *name, int flags, int streamindex, char colorspace[IMA_MAX_SPACE]) +{ + struct anim *anim; + struct ImBuf *ibuf; + + anim = IMB_open_anim(name, flags, streamindex, colorspace); + if (anim == nullptr) { + return nullptr; + } + + ibuf = IMB_anim_absolute(anim, 0, IMB_TC_NONE, IMB_PROXY_NONE); + if (ibuf == nullptr) { + if (BLI_exists(name)) { + printf("not an anim: %s\n", name); + } + else { + printf("anim file doesn't exist: %s\n", name); + } + IMB_free_anim(anim); + return nullptr; + } + IMB_freeImBuf(ibuf); + + return anim; +} + +/* ************************* New Image API *************** */ + +/* Notes about Image storage + * - packedfile + * -> written in .blend + * - filename + * -> written in .blend + * - movie + * -> comes from packedfile or filename + * - renderresult + * -> comes from packedfile or filename + * - listbase + * -> ibufs from exrhandle + * - flipbook array + * -> ibufs come from movie, temporary renderresult or sequence + * - ibuf + * -> comes from packedfile or filename or generated + */ + +Image *BKE_image_ensure_viewer(Main *bmain, int type, const char *name) +{ + Image *ima; + + for (ima = static_cast(bmain->images.first); ima; + ima = static_cast(ima->id.next)) { + if (ima->source == IMA_SRC_VIEWER) { + if (ima->type == type) { + break; + } + } + } + + if (ima == nullptr) { + ima = image_alloc(bmain, name, IMA_SRC_VIEWER, type); + } + + /* Happens on reload, imagewindow cannot be image user when hidden. */ + if (ima->id.us == 0) { + id_us_ensure_real(&ima->id); + } + + return ima; +} + +static void image_viewer_create_views(const RenderData *rd, Image *ima) +{ + if ((rd->scemode & R_MULTIVIEW) == 0) { + image_add_view(ima, "", ""); + } + else { + for (SceneRenderView *srv = static_cast(rd->views.first); srv; + srv = srv->next) { + if (BKE_scene_multiview_is_render_view_active(rd, srv) == false) { + continue; + } + image_add_view(ima, srv->name, ""); + } + } +} + +void BKE_image_ensure_viewer_views(const RenderData *rd, Image *ima, ImageUser *iuser) +{ + bool do_reset; + const bool is_multiview = (rd->scemode & R_MULTIVIEW) != 0; + + BLI_thread_lock(LOCK_DRAW_IMAGE); + + if (!BKE_scene_multiview_is_stereo3d(rd)) { + iuser->flag &= ~IMA_SHOW_STEREO; + } + + /* see if all scene render views are in the image view list */ + do_reset = (BKE_scene_multiview_num_views_get(rd) != BLI_listbase_count(&ima->views)); + + /* multiview also needs to be sure all the views are synced */ + if (is_multiview && !do_reset) { + SceneRenderView *srv; + ImageView *iv; + + for (iv = static_cast(ima->views.first); iv; iv = iv->next) { + srv = static_cast( + BLI_findstring(&rd->views, iv->name, offsetof(SceneRenderView, name))); + if ((srv == nullptr) || (BKE_scene_multiview_is_render_view_active(rd, srv) == false)) { + do_reset = true; + break; + } + } + } + + if (do_reset) { + BLI_mutex_lock(static_cast(ima->runtime.cache_mutex)); + + image_free_cached_frames(ima); + BKE_image_free_views(ima); + + /* add new views */ + image_viewer_create_views(rd, ima); + + BLI_mutex_unlock(static_cast(ima->runtime.cache_mutex)); + } + + BLI_thread_unlock(LOCK_DRAW_IMAGE); +} + +static void image_walk_ntree_all_users( + bNodeTree *ntree, + ID *id, + void *customdata, + void callback(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata)) +{ + switch (ntree->type) { + case NTREE_SHADER: + LISTBASE_FOREACH (bNode *, node, &ntree->nodes) { + if (node->id) { + if (node->type == SH_NODE_TEX_IMAGE) { + NodeTexImage *tex = static_cast(node->storage); + Image *ima = (Image *)node->id; + callback(ima, id, &tex->iuser, customdata); + } + if (node->type == SH_NODE_TEX_ENVIRONMENT) { + NodeTexImage *tex = static_cast(node->storage); + Image *ima = (Image *)node->id; + callback(ima, id, &tex->iuser, customdata); + } + } + } + break; + case NTREE_TEXTURE: + LISTBASE_FOREACH (bNode *, node, &ntree->nodes) { + if (node->id && node->type == TEX_NODE_IMAGE) { + Image *ima = (Image *)node->id; + ImageUser *iuser = static_cast(node->storage); + callback(ima, id, iuser, customdata); + } + } + break; + case NTREE_COMPOSIT: + LISTBASE_FOREACH (bNode *, node, &ntree->nodes) { + if (node->id && node->type == CMP_NODE_IMAGE) { + Image *ima = (Image *)node->id; + ImageUser *iuser = static_cast(node->storage); + callback(ima, id, iuser, customdata); + } + } + break; + } +} + +static void image_walk_gpu_materials( + ID *id, + ListBase *gpu_materials, + void *customdata, + void callback(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata)) +{ + LISTBASE_FOREACH (LinkData *, link, gpu_materials) { + GPUMaterial *gpu_material = (GPUMaterial *)link->data; + ListBase textures = GPU_material_textures(gpu_material); + LISTBASE_FOREACH (GPUMaterialTexture *, gpu_material_texture, &textures) { + if (gpu_material_texture->iuser_available) { + callback(gpu_material_texture->ima, id, &gpu_material_texture->iuser, customdata); + } + } + } +} + +static void image_walk_id_all_users( + ID *id, + bool skip_nested_nodes, + void *customdata, + void callback(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata)) +{ + switch (GS(id->name)) { + case ID_OB: { + Object *ob = (Object *)id; + if (ob->empty_drawtype == OB_EMPTY_IMAGE && ob->data) { + callback(static_cast(ob->data), &ob->id, ob->iuser, customdata); + } + break; + } + case ID_MA: { + Material *ma = (Material *)id; + if (ma->nodetree && ma->use_nodes && !skip_nested_nodes) { + image_walk_ntree_all_users(ma->nodetree, &ma->id, customdata, callback); + } + image_walk_gpu_materials(id, &ma->gpumaterial, customdata, callback); + break; + } + case ID_LA: { + Light *light = (Light *)id; + if (light->nodetree && light->use_nodes && !skip_nested_nodes) { + image_walk_ntree_all_users(light->nodetree, &light->id, customdata, callback); + } + break; + } + case ID_WO: { + World *world = (World *)id; + if (world->nodetree && world->use_nodes && !skip_nested_nodes) { + image_walk_ntree_all_users(world->nodetree, &world->id, customdata, callback); + } + image_walk_gpu_materials(id, &world->gpumaterial, customdata, callback); + break; + } + case ID_TE: { + Tex *tex = (Tex *)id; + if (tex->type == TEX_IMAGE && tex->ima) { + callback(tex->ima, &tex->id, &tex->iuser, customdata); + } + if (tex->nodetree && tex->use_nodes && !skip_nested_nodes) { + image_walk_ntree_all_users(tex->nodetree, &tex->id, customdata, callback); + } + break; + } + case ID_NT: { + bNodeTree *ntree = (bNodeTree *)id; + image_walk_ntree_all_users(ntree, &ntree->id, customdata, callback); + break; + } + case ID_CA: { + Camera *cam = (Camera *)id; + LISTBASE_FOREACH (CameraBGImage *, bgpic, &cam->bg_images) { + callback(bgpic->ima, nullptr, &bgpic->iuser, customdata); + } + break; + } + case ID_WM: { + wmWindowManager *wm = (wmWindowManager *)id; + LISTBASE_FOREACH (wmWindow *, win, &wm->windows) { + const bScreen *screen = BKE_workspace_active_screen_get(win->workspace_hook); + + LISTBASE_FOREACH (ScrArea *, area, &screen->areabase) { + if (area->spacetype == SPACE_IMAGE) { + SpaceImage *sima = static_cast(area->spacedata.first); + callback(sima->image, nullptr, &sima->iuser, customdata); + } + } + } + break; + } + case ID_SCE: { + Scene *scene = (Scene *)id; + if (scene->nodetree && scene->use_nodes && !skip_nested_nodes) { + image_walk_ntree_all_users(scene->nodetree, &scene->id, customdata, callback); + } + break; + } + case ID_SIM: { + Simulation *simulation = (Simulation *)id; + image_walk_ntree_all_users(simulation->nodetree, &simulation->id, customdata, callback); + break; + } + default: + break; + } +} + +void BKE_image_walk_all_users( + const Main *mainp, + void *customdata, + void callback(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata)) +{ + for (Scene *scene = static_cast(mainp->scenes.first); scene; + scene = static_cast(scene->id.next)) { + image_walk_id_all_users(&scene->id, false, customdata, callback); + } + + for (Object *ob = static_cast(mainp->objects.first); ob; + ob = static_cast(ob->id.next)) { + image_walk_id_all_users(&ob->id, false, customdata, callback); + } + + for (bNodeTree *ntree = static_cast(mainp->nodetrees.first); ntree; + ntree = static_cast(ntree->id.next)) { + image_walk_id_all_users(&ntree->id, false, customdata, callback); + } + + for (Material *ma = static_cast(mainp->materials.first); ma; + ma = static_cast(ma->id.next)) { + image_walk_id_all_users(&ma->id, false, customdata, callback); + } + + for (Light *light = static_cast(mainp->materials.first); light; + light = static_cast(light->id.next)) { + image_walk_id_all_users(&light->id, false, customdata, callback); + } + + for (World *world = static_cast(mainp->materials.first); world; + world = static_cast(world->id.next)) { + image_walk_id_all_users(&world->id, false, customdata, callback); + } + + for (Tex *tex = static_cast(mainp->textures.first); tex; + tex = static_cast(tex->id.next)) { + image_walk_id_all_users(&tex->id, false, customdata, callback); + } + + for (Camera *cam = static_cast(mainp->cameras.first); cam; + cam = static_cast(cam->id.next)) { + image_walk_id_all_users(&cam->id, false, customdata, callback); + } + + for (wmWindowManager *wm = static_cast(mainp->wm.first); wm; + wm = static_cast(wm->id.next)) { /* only 1 wm */ + image_walk_id_all_users(&wm->id, false, customdata, callback); + } +} + +static void image_tag_frame_recalc(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata) +{ + Image *changed_image = static_cast(customdata); + + if (ima == changed_image && BKE_image_is_animated(ima)) { + iuser->flag |= IMA_NEED_FRAME_RECALC; + + if (iuser_id) { + /* Must copy image user changes to CoW data-block. */ + DEG_id_tag_update(iuser_id, ID_RECALC_COPY_ON_WRITE); + } + } +} + +static void image_tag_reload(Image *ima, ID *iuser_id, ImageUser *iuser, void *customdata) +{ + Image *changed_image = static_cast(customdata); + + if (ima == changed_image) { + if (iuser->scene) { + image_update_views_format(ima, iuser); + } + if (iuser_id) { + /* Must copy image user changes to CoW data-block. */ + DEG_id_tag_update(iuser_id, ID_RECALC_COPY_ON_WRITE); + } + BKE_image_partial_update_mark_full_update(ima); + } +} + +void BKE_imageuser_default(ImageUser *iuser) +{ + memset(iuser, 0, sizeof(ImageUser)); + iuser->frames = 100; + iuser->sfra = 1; +} + +void BKE_image_init_imageuser(Image *ima, ImageUser *iuser) +{ + RenderResult *rr = ima->rr; + + iuser->multi_index = 0; + iuser->layer = iuser->pass = iuser->view = 0; + + if (rr) { + BKE_image_multilayer_index(rr, iuser); + } +} + +static void image_free_tile(Image *ima, ImageTile *tile) +{ + for (int i = 0; i < TEXTARGET_COUNT; i++) { + /* Only two textures depends on all tiles, so if this is a secondary tile we can keep the other + * two. */ + if (tile != ima->tiles.first && !(ELEM(i, TEXTARGET_2D_ARRAY, TEXTARGET_TILE_MAPPING))) { + continue; + } + + for (int eye = 0; eye < 2; eye++) { + for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { + if (ima->gputexture[i][eye][resolution] != nullptr) { + GPU_texture_free(ima->gputexture[i][eye][resolution]); + ima->gputexture[i][eye][resolution] = nullptr; + } + } + } + } + BKE_image_partial_update_mark_full_update(ima); + + if (BKE_image_is_multiview(ima)) { + const int totviews = BLI_listbase_count(&ima->views); + for (int i = 0; i < totviews; i++) { + image_remove_ibuf(ima, i, tile->tile_number); + } + } + else { + image_remove_ibuf(ima, 0, tile->tile_number); + } +} + +void BKE_image_signal(Main *bmain, Image *ima, ImageUser *iuser, int signal) +{ + if (ima == nullptr) { + return; + } + + BLI_mutex_lock(static_cast(ima->runtime.cache_mutex)); + + switch (signal) { + case IMA_SIGNAL_FREE: + BKE_image_free_buffers(ima); + + if (iuser) { + if (iuser->scene) { + image_update_views_format(ima, iuser); + } + } + break; + case IMA_SIGNAL_SRC_CHANGE: + if (ima->type == IMA_TYPE_UV_TEST) { + if (ima->source != IMA_SRC_GENERATED) { + ima->type = IMA_TYPE_IMAGE; + } + } + + if (ima->source == IMA_SRC_GENERATED) { + if (ima->gen_x == 0 || ima->gen_y == 0) { + ImBuf *ibuf = image_get_cached_ibuf_for_index_entry(ima, IMA_NO_INDEX, 0, nullptr); + if (ibuf) { + ima->gen_x = ibuf->x; + ima->gen_y = ibuf->y; + IMB_freeImBuf(ibuf); + } + } + + /* Changing source type to generated will likely change file format + * used by generated image buffer. Saving different file format to + * the old name might confuse other applications. + * + * Here we ensure original image path wouldn't be used when saving + * generated image. + */ + ima->filepath[0] = '\0'; + } + + if (ima->source != IMA_SRC_TILED) { + /* Free all but the first tile. */ + ImageTile *base_tile = BKE_image_get_tile(ima, 0); + BLI_assert(base_tile == ima->tiles.first); + for (ImageTile *tile = base_tile->next, *tile_next; tile; tile = tile_next) { + tile_next = tile->next; + image_free_tile(ima, tile); + MEM_freeN(tile); + } + base_tile->next = nullptr; + ima->tiles.last = base_tile; + } + + /* image buffers for non-sequence multilayer will share buffers with RenderResult, + * however sequence multilayer will own buffers. Such logic makes switching from + * single multilayer file to sequence completely unstable + * since changes in nodes seems this workaround isn't needed anymore, all sockets + * are nicely detecting anyway, but freeing buffers always here makes multilayer + * sequences behave stable + */ + BKE_image_free_buffers(ima); + + if (iuser) { + image_tag_frame_recalc(ima, nullptr, iuser, ima); + } + BKE_image_walk_all_users(bmain, ima, image_tag_frame_recalc); + + break; + + case IMA_SIGNAL_RELOAD: + /* try to repack file */ + if (BKE_image_has_packedfile(ima)) { + const int totfiles = image_num_files(ima); + + if (totfiles != BLI_listbase_count_at_most(&ima->packedfiles, totfiles + 1)) { + /* in case there are new available files to be loaded */ + image_free_packedfiles(ima); + BKE_image_packfiles(nullptr, ima, ID_BLEND_PATH(bmain, &ima->id)); + } + else { + ImagePackedFile *imapf; + for (imapf = static_cast(ima->packedfiles.first); imapf; + imapf = imapf->next) { + PackedFile *pf; + pf = BKE_packedfile_new(nullptr, imapf->filepath, ID_BLEND_PATH(bmain, &ima->id)); + if (pf) { + BKE_packedfile_free(imapf->packedfile); + imapf->packedfile = pf; + } + else { + printf("ERROR: Image \"%s\" not available. Keeping packed image\n", imapf->filepath); + } + } + } + + if (BKE_image_has_packedfile(ima)) { + BKE_image_free_buffers(ima); + } + } + else { + BKE_image_free_buffers(ima); + } + + if (ima->source == IMA_SRC_TILED) { + ListBase new_tiles = {nullptr, nullptr}; + int new_start, new_range; + + char filepath[FILE_MAX]; + BLI_strncpy(filepath, ima->filepath, sizeof(filepath)); + BLI_path_abs(filepath, ID_BLEND_PATH_FROM_GLOBAL(&ima->id)); + bool result = BKE_image_get_tile_info(filepath, &new_tiles, &new_start, &new_range); + if (result) { + /* Because the prior and new list of tiles are both sparse sequences, we need to be sure + * to account for how the two sets might or might not overlap. To be complete, we start + * the refresh process by clearing all existing tiles, stopping when there's only 1 tile + * left. */ + while (BKE_image_remove_tile(ima, static_cast(ima->tiles.last))) { + ; + } + + int remaining_tile_number = ((ImageTile *)ima->tiles.first)->tile_number; + bool needs_final_cleanup = true; + + /* Add in all the new tiles. */ + LISTBASE_FOREACH (LinkData *, new_tile, &new_tiles) { + int new_tile_number = POINTER_AS_INT(new_tile->data); + BKE_image_add_tile(ima, new_tile_number, nullptr); + if (new_tile_number == remaining_tile_number) { + needs_final_cleanup = false; + } + } + + /* Final cleanup if the prior remaining tile was never encountered in the new list. */ + if (needs_final_cleanup) { + BKE_image_remove_tile(ima, BKE_image_get_tile(ima, remaining_tile_number)); + } + } + BLI_freelistN(&new_tiles); + } + + if (iuser) { + image_tag_reload(ima, nullptr, iuser, ima); + } + BKE_image_walk_all_users(bmain, ima, image_tag_reload); + break; + case IMA_SIGNAL_USER_NEW_IMAGE: + if (iuser) { + if (ELEM(ima->source, IMA_SRC_FILE, IMA_SRC_SEQUENCE, IMA_SRC_TILED)) { + if (ima->type == IMA_TYPE_MULTILAYER) { + BKE_image_init_imageuser(ima, iuser); + } + } + } + break; + case IMA_SIGNAL_COLORMANAGE: + BKE_image_free_buffers(ima); + break; + } + + BLI_mutex_unlock(static_cast(ima->runtime.cache_mutex)); + + BKE_ntree_update_tag_id_changed(bmain, &ima->id); + BKE_ntree_update_main(bmain, nullptr); +} + +/* return renderpass for a given pass index and active view */ +/* fallback to available if there are missing passes for active view */ +static RenderPass *image_render_pass_get(RenderLayer *rl, + const int pass, + const int view, + int *r_passindex) +{ + RenderPass *rpass_ret = nullptr; + RenderPass *rpass; + + int rp_index = 0; + const char *rp_name = ""; + + for (rpass = static_cast(rl->passes.first); rpass; + rpass = rpass->next, rp_index++) { + if (rp_index == pass) { + rpass_ret = rpass; + if (view == 0) { + /* no multiview or left eye */ + break; + } + + rp_name = rpass->name; + } + /* multiview */ + else if (rp_name[0] && STREQ(rpass->name, rp_name) && (rpass->view_id == view)) { + rpass_ret = rpass; + break; + } + } + + /* fallback to the first pass in the layer */ + if (rpass_ret == nullptr) { + rp_index = 0; + rpass_ret = static_cast(rl->passes.first); + } + + if (r_passindex) { + *r_passindex = (rpass == rpass_ret ? rp_index : pass); + } + + return rpass_ret; +} + +void BKE_image_get_tile_label(Image *ima, ImageTile *tile, char *label, int len_label) +{ + label[0] = '\0'; + if (ima == nullptr || tile == nullptr) { + return; + } + + if (tile->label[0]) { + BLI_strncpy(label, tile->label, len_label); + } + else { + BLI_snprintf(label, len_label, "%d", tile->tile_number); + } +} + +bool BKE_image_get_tile_info(char *filepath, ListBase *tiles, int *tile_start, int *tile_range) +{ + char filename[FILE_MAXFILE], dirname[FILE_MAXDIR]; + BLI_split_dirfile(filepath, dirname, filename, sizeof(dirname), sizeof(filename)); + + BKE_image_ensure_tile_token(filename); + + eUDIM_TILE_FORMAT tile_format; + char *udim_pattern = BKE_image_get_tile_strformat(filename, &tile_format); + + bool is_udim = true; + int min_udim = IMA_UDIM_MAX + 1; + int max_udim = 0; + int id; + + struct direntry *dir; + uint totfile = BLI_filelist_dir_contents(dirname, &dir); + for (int i = 0; i < totfile; i++) { + if (!(dir[i].type & S_IFREG)) { + continue; + } + + if (!BKE_image_get_tile_number_from_filepath(dir[i].relname, udim_pattern, tile_format, &id)) { + continue; + } + + if (id < 1001 || id > IMA_UDIM_MAX) { + is_udim = false; + break; + } + + BLI_addtail(tiles, BLI_genericNodeN(POINTER_FROM_INT(id))); + min_udim = min_ii(min_udim, id); + max_udim = max_ii(max_udim, id); + } + BLI_filelist_free(dir, totfile); + MEM_SAFE_FREE(udim_pattern); + + if (is_udim && min_udim <= IMA_UDIM_MAX) { + BLI_join_dirfile(filepath, FILE_MAX, dirname, filename); + + *tile_start = min_udim; + *tile_range = max_udim - min_udim + 1; + return true; + } + return false; +} + +ImageTile *BKE_image_add_tile(struct Image *ima, int tile_number, const char *label) +{ + if (ima->source != IMA_SRC_TILED) { + return nullptr; + } + + if (tile_number < 1001 || tile_number > IMA_UDIM_MAX) { + return nullptr; + } + + /* Search the first tile that has a higher number. + * We then insert before that to keep the list sorted. */ + ImageTile *next_tile; + for (next_tile = static_cast(ima->tiles.first); next_tile; + next_tile = next_tile->next) { + if (next_tile->tile_number == tile_number) { + /* Tile already exists. */ + return nullptr; + } + if (next_tile->tile_number > tile_number) { + break; + } + } + + ImageTile *tile = MEM_cnew("image new tile"); + tile->tile_number = tile_number; + + if (next_tile) { + BLI_insertlinkbefore(&ima->tiles, next_tile, tile); + } + else { + BLI_addtail(&ima->tiles, tile); + } + + if (label) { + BLI_strncpy(tile->label, label, sizeof(tile->label)); + } + + for (int eye = 0; eye < 2; eye++) { + for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { + /* Reallocate GPU tile array. */ + if (ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution] != nullptr) { + GPU_texture_free(ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution]); + ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution] = nullptr; + } + if (ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution] != nullptr) { + GPU_texture_free(ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution]); + ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution] = nullptr; + } + } + } + BKE_image_partial_update_mark_full_update(ima); + + return tile; +} + +bool BKE_image_remove_tile(struct Image *ima, ImageTile *tile) +{ + if (ima == nullptr || tile == nullptr || ima->source != IMA_SRC_TILED) { + return false; + } + + if (BLI_listbase_is_single(&ima->tiles)) { + /* Can't remove the last remaining tile. */ + return false; + } + + image_free_tile(ima, tile); + BLI_remlink(&ima->tiles, tile); + MEM_freeN(tile); + + return true; +} + +void BKE_image_reassign_tile(struct Image *ima, ImageTile *tile, int new_tile_number) +{ + if (ima == nullptr || tile == nullptr || ima->source != IMA_SRC_TILED) { + return; + } + + if (new_tile_number < 1001 || new_tile_number > IMA_UDIM_MAX) { + return; + } + + const int old_tile_number = tile->tile_number; + tile->tile_number = new_tile_number; + + if (BKE_image_is_multiview(ima)) { + const int totviews = BLI_listbase_count(&ima->views); + for (int i = 0; i < totviews; i++) { + ImBuf *ibuf = image_get_cached_ibuf_for_index_entry(ima, i, old_tile_number, nullptr); + image_remove_ibuf(ima, i, old_tile_number); + image_assign_ibuf(ima, ibuf, i, new_tile_number); + IMB_freeImBuf(ibuf); + } + } + else { + ImBuf *ibuf = image_get_cached_ibuf_for_index_entry(ima, 0, old_tile_number, nullptr); + image_remove_ibuf(ima, 0, old_tile_number); + image_assign_ibuf(ima, ibuf, 0, new_tile_number); + IMB_freeImBuf(ibuf); + } + + for (int eye = 0; eye < 2; eye++) { + for (int resolution = 0; resolution < IMA_TEXTURE_RESOLUTION_LEN; resolution++) { + + /* Reallocate GPU tile array. */ + if (ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution] != nullptr) { + GPU_texture_free(ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution]); + ima->gputexture[TEXTARGET_2D_ARRAY][eye][resolution] = nullptr; + } + if (ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution] != nullptr) { + GPU_texture_free(ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution]); + ima->gputexture[TEXTARGET_TILE_MAPPING][eye][resolution] = nullptr; + } + } + } + BKE_image_partial_update_mark_full_update(ima); +} + +static int tile_sort_cb(const void *a, const void *b) +{ + const ImageTile *tile_a = static_cast(a); + const ImageTile *tile_b = static_cast(b); + return (tile_a->tile_number > tile_b->tile_number) ? 1 : 0; +} + +void BKE_image_sort_tiles(struct Image *ima) +{ + if (ima == nullptr || ima->source != IMA_SRC_TILED) { + return; + } + + BLI_listbase_sort(&ima->tiles, tile_sort_cb); +} + +bool BKE_image_fill_tile(struct Image *ima, + ImageTile *tile, + int width, + int height, + const float color[4], + int gen_type, + int planes, + bool is_float) +{ + if (ima == nullptr || tile == nullptr || ima->source != IMA_SRC_TILED) { + return false; + } + + image_free_tile(ima, tile); + + ImBuf *tile_ibuf = add_ibuf_size( + width, height, ima->filepath, planes, is_float, gen_type, color, &ima->colorspace_settings); + + if (tile_ibuf != nullptr) { + image_assign_ibuf(ima, tile_ibuf, 0, tile->tile_number); + BKE_image_release_ibuf(ima, tile_ibuf, nullptr); + return true; + } + return false; +} + +void BKE_image_ensure_tile_token(char *filename) +{ + BLI_assert_msg(BLI_path_slash_find(filename) == nullptr, + "Only the file-name component should be used!"); + + /* Is there a '<' character in the filename? Assume tokens already present. */ + if (strstr(filename, "<") != nullptr) { + return; + } + + /* Is there a sequence of digits in the filename? */ + ushort digits; + char head[FILE_MAX], tail[FILE_MAX]; + BLI_path_sequence_decode(filename, head, tail, &digits); + if (digits == 4) { + sprintf(filename, "%s%s", head, tail); + return; + } + + /* Is there a sequence like u##_v#### in the filename? */ + uint cur = 0; + uint name_end = strlen(filename); + uint u_digits = 0; + uint v_digits = 0; + uint u_start = (uint)-1; + bool u_found = false; + bool v_found = false; + bool sep_found = false; + while (cur < name_end) { + if (filename[cur] == 'u') { + u_found = true; + u_digits = 0; + u_start = cur; + } + else if (filename[cur] == 'v') { + v_found = true; + v_digits = 0; + } + else if (u_found && !v_found) { + if (isdigit(filename[cur]) && u_digits < 2) { + u_digits++; + } + else if (filename[cur] == '_') { + sep_found = true; + } + else { + u_found = false; + } + } + else if (u_found && u_digits > 0 && v_found) { + if (isdigit(filename[cur])) { + if (v_digits < 4) { + v_digits++; + } + else { + u_found = false; + v_found = false; + } + } + else if (v_digits > 0) { + break; + } + } + + cur++; + } + + if (u_found && sep_found && v_found && (u_digits + v_digits > 1)) { + const char *token = ""; + const size_t token_length = strlen(token); + memmove(filename + u_start + token_length, filename + cur, name_end - cur); + memcpy(filename + u_start, token, token_length); + filename[u_start + token_length + (name_end - cur)] = '\0'; + } +} + +bool BKE_image_tile_filepath_exists(const char *filepath) +{ + BLI_assert(!BLI_path_is_rel(filepath)); + + char dirname[FILE_MAXDIR]; + BLI_split_dir_part(filepath, dirname, sizeof(dirname)); + + eUDIM_TILE_FORMAT tile_format; + char *udim_pattern = BKE_image_get_tile_strformat(filepath, &tile_format); + + bool found = false; + struct direntry *dir; + uint totfile = BLI_filelist_dir_contents(dirname, &dir); + for (int i = 0; i < totfile; i++) { + if (!(dir[i].type & S_IFREG)) { + continue; + } + + int id; + if (!BKE_image_get_tile_number_from_filepath(dir[i].path, udim_pattern, tile_format, &id)) { + continue; + } + + if (id < 1001 || id > IMA_UDIM_MAX) { + continue; + } + + found = true; + break; + } + BLI_filelist_free(dir, totfile); + MEM_SAFE_FREE(udim_pattern); + + return found; +} + +char *BKE_image_get_tile_strformat(const char *filepath, eUDIM_TILE_FORMAT *r_tile_format) +{ + if (filepath == nullptr || r_tile_format == nullptr) { + return nullptr; + } + + if (strstr(filepath, "") != nullptr) { + *r_tile_format = UDIM_TILE_FORMAT_UDIM; + return BLI_str_replaceN(filepath, "", "%d"); + } + if (strstr(filepath, "") != nullptr) { + *r_tile_format = UDIM_TILE_FORMAT_UVTILE; + return BLI_str_replaceN(filepath, "", "u%d_v%d"); + } + + *r_tile_format = UDIM_TILE_FORMAT_NONE; + return nullptr; +} + +bool BKE_image_get_tile_number_from_filepath(const char *filepath, + const char *pattern, + eUDIM_TILE_FORMAT tile_format, + int *r_tile_number) +{ + if (filepath == nullptr || pattern == nullptr || r_tile_number == nullptr) { + return false; + } + + int u, v; + bool result = false; + + if (tile_format == UDIM_TILE_FORMAT_UDIM) { + if (sscanf(filepath, pattern, &u) == 1) { + *r_tile_number = u; + result = true; + } + } + else if (tile_format == UDIM_TILE_FORMAT_UVTILE) { + if (sscanf(filepath, pattern, &u, &v) == 2) { + *r_tile_number = 1001 + (u - 1) + ((v - 1) * 10); + result = true; + } + } + + return result; +} + +void BKE_image_set_filepath_from_tile_number(char *filepath, + const char *pattern, + eUDIM_TILE_FORMAT tile_format, + int tile_number) +{ + if (filepath == nullptr || pattern == nullptr) { + return; + } + + if (tile_format == UDIM_TILE_FORMAT_UDIM) { + sprintf(filepath, pattern, tile_number); + } + else if (tile_format == UDIM_TILE_FORMAT_UVTILE) { + int u = ((tile_number - 1001) % 10); + int v = ((tile_number - 1001) / 10); + sprintf(filepath, pattern, u + 1, v + 1); + } +} + +/* if layer or pass changes, we need an index for the imbufs list */ +/* note it is called for rendered results, but it doesn't use the index! */ +RenderPass *BKE_image_multilayer_index(RenderResult *rr, ImageUser *iuser) +{ + RenderLayer *rl; + RenderPass *rpass = nullptr; + + if (rr == nullptr) { + return nullptr; + } + + if (iuser) { + short index = 0, rv_index, rl_index = 0; + bool is_stereo = (iuser->flag & IMA_SHOW_STEREO) && RE_RenderResult_is_stereo(rr); + + rv_index = is_stereo ? iuser->multiview_eye : iuser->view; + if (RE_HasCombinedLayer(rr)) { + rl_index += 1; + } + + for (rl = static_cast(rr->layers.first); rl; rl = rl->next, rl_index++) { + if (iuser->layer == rl_index) { + int rp_index; + rpass = image_render_pass_get(rl, iuser->pass, rv_index, &rp_index); + iuser->multi_index = index + rp_index; + break; + } + + index += BLI_listbase_count(&rl->passes); + } + } + + return rpass; +} + +void BKE_image_multiview_index(Image *ima, ImageUser *iuser) +{ + if (iuser) { + bool is_stereo = BKE_image_is_stereo(ima) && (iuser->flag & IMA_SHOW_STEREO); + if (is_stereo) { + iuser->multi_index = iuser->multiview_eye; + } + else { + if ((iuser->view < 0) || + (iuser->view >= BLI_listbase_count_at_most(&ima->views, iuser->view + 1))) { + iuser->multi_index = iuser->view = 0; + } + else { + iuser->multi_index = iuser->view; + } + } + } +} + +/* if layer or pass changes, we need an index for the imbufs list */ +/* note it is called for rendered results, but it doesn't use the index! */ +bool BKE_image_is_multilayer(Image *ima) +{ + if (ELEM(ima->source, IMA_SRC_FILE, IMA_SRC_SEQUENCE, IMA_SRC_TILED)) { + if (ima->type == IMA_TYPE_MULTILAYER) { + return true; + } + } + else if (ima->source == IMA_SRC_VIEWER) { + if (ima->type == IMA_TYPE_R_RESULT) { + return true; + } + } + return false; +} + +bool BKE_image_is_multiview(Image *ima) +{ + ImageView *view = static_cast(ima->views.first); + return (view && (view->next || view->name[0])); +} + +bool BKE_image_is_stereo(Image *ima) +{ + return BKE_image_is_multiview(ima) && + (BLI_findstring(&ima->views, STEREO_LEFT_NAME, offsetof(ImageView, name)) && + BLI_findstring(&ima->views, STEREO_RIGHT_NAME, offsetof(ImageView, name))); +} + +static void image_init_multilayer_multiview(Image *ima, RenderResult *rr) +{ + /* update image views from render views, but only if they actually changed, + * to avoid invalid memory access during render. ideally these should always + * be acquired with a mutex along with the render result, but there are still + * some places with just an image pointer that need to access views */ + if (rr && BLI_listbase_count(&ima->views) == BLI_listbase_count(&rr->views)) { + ImageView *iv = static_cast(ima->views.first); + RenderView *rv = static_cast(rr->views.first); + bool modified = false; + for (; rv; rv = rv->next, iv = iv->next) { + modified |= !STREQ(rv->name, iv->name); + } + if (!modified) { + return; + } + } + + BKE_image_free_views(ima); + + if (rr) { + LISTBASE_FOREACH (RenderView *, rv, &rr->views) { + ImageView *iv = MEM_cnew("Viewer Image View"); + STRNCPY(iv->name, rv->name); + BLI_addtail(&ima->views, iv); + } + } +} + +RenderResult *BKE_image_acquire_renderresult(Scene *scene, Image *ima) +{ + RenderResult *rr = nullptr; + if (ima->rr) { + rr = ima->rr; + } + else if (ima->type == IMA_TYPE_R_RESULT) { + if (ima->render_slot == ima->last_render_slot) { + rr = RE_AcquireResultRead(RE_GetSceneRender(scene)); + } + else { + rr = BKE_image_get_renderslot(ima, ima->render_slot)->render; + BKE_image_partial_update_mark_full_update(ima); + } + + /* set proper views */ + image_init_multilayer_multiview(ima, rr); + } + + return rr; +} + +void BKE_image_release_renderresult(Scene *scene, Image *ima) +{ + if (ima->rr) { + /* pass */ + } + else if (ima->type == IMA_TYPE_R_RESULT) { + if (ima->render_slot == ima->last_render_slot) { + RE_ReleaseResult(RE_GetSceneRender(scene)); + } + } +} + +bool BKE_image_is_openexr(struct Image *ima) +{ +#ifdef WITH_OPENEXR + if (ELEM(ima->source, IMA_SRC_FILE, IMA_SRC_SEQUENCE, IMA_SRC_TILED)) { + return BLI_path_extension_check(ima->filepath, ".exr"); + } +#else + UNUSED_VARS(ima); +#endif + return false; +} + +void BKE_image_backup_render(Scene *scene, Image *ima, bool free_current_slot) +{ + /* called right before rendering, ima->renderslots contains render + * result pointers for everything but the current render */ + Render *re = RE_GetSceneRender(scene); + + /* Ensure we always have a valid render slot. */ + if (!ima->renderslots.first) { + BKE_image_add_renderslot(ima, nullptr); + ima->render_slot = 0; + ima->last_render_slot = 0; + } + else if (ima->render_slot >= BLI_listbase_count(&ima->renderslots)) { + ima->render_slot = 0; + ima->last_render_slot = 0; + } + + RenderSlot *last_slot = BKE_image_get_renderslot(ima, ima->last_render_slot); + RenderSlot *cur_slot = BKE_image_get_renderslot(ima, ima->render_slot); + + if (last_slot && ima->render_slot != ima->last_render_slot) { + last_slot->render = nullptr; + RE_SwapResult(re, &last_slot->render); + + if (cur_slot->render) { + if (free_current_slot) { + BKE_image_clear_renderslot(ima, nullptr, ima->render_slot); + } + else { + RE_SwapResult(re, &cur_slot->render); + } + } + } + + ima->last_render_slot = ima->render_slot; +} + +/**************************** multiview load openexr *********************************/ + +static void image_add_view(Image *ima, const char *viewname, const char *filepath) +{ + ImageView *iv; + + iv = static_cast(MEM_mallocN(sizeof(ImageView), "Viewer Image View")); + STRNCPY(iv->name, viewname); + STRNCPY(iv->filepath, filepath); + + /* For stereo drawing we need to ensure: + * STEREO_LEFT_NAME == STEREO_LEFT_ID and + * STEREO_RIGHT_NAME == STEREO_RIGHT_ID */ + + if (STREQ(viewname, STEREO_LEFT_NAME)) { + BLI_addhead(&ima->views, iv); + } + else if (STREQ(viewname, STEREO_RIGHT_NAME)) { + ImageView *left_iv = static_cast( + BLI_findstring(&ima->views, STEREO_LEFT_NAME, offsetof(ImageView, name))); + + if (left_iv == nullptr) { + BLI_addhead(&ima->views, iv); + } + else { + BLI_insertlinkafter(&ima->views, left_iv, iv); + } + } + else { + BLI_addtail(&ima->views, iv); + } +} + +/* after imbuf load, openexr type can return with a exrhandle open */ +/* in that case we have to build a render-result */ +#ifdef WITH_OPENEXR +static void image_create_multilayer(Image *ima, ImBuf *ibuf, int framenr) +{ + const char *colorspace = ima->colorspace_settings.name; + bool predivide = (ima->alpha_mode == IMA_ALPHA_PREMUL); + + /* only load rr once for multiview */ + if (!ima->rr) { + ima->rr = RE_MultilayerConvert(ibuf->userdata, colorspace, predivide, ibuf->x, ibuf->y); + } + + IMB_exr_close(ibuf->userdata); + + ibuf->userdata = nullptr; + if (ima->rr != nullptr) { + ima->rr->framenr = framenr; + BKE_stamp_info_from_imbuf(ima->rr, ibuf); + } + + /* set proper views */ + image_init_multilayer_multiview(ima, ima->rr); +} +#endif /* WITH_OPENEXR */ + +/* common stuff to do with images after loading */ +static void image_init_after_load(Image *ima, ImageUser *iuser, ImBuf *UNUSED(ibuf)) +{ + /* Preview is null when it has never been used as an icon before. + * Never handle previews/icons outside of main thread. */ + if (G.background == 0 && ima->preview == nullptr && BLI_thread_is_main()) { + BKE_icon_changed(BKE_icon_id_ensure(&ima->id)); + } + + /* timer */ + BKE_image_tag_time(ima); + + ImageTile *tile = BKE_image_get_tile_from_iuser(ima, iuser); + /* Images should never get loaded if the corresponding tile does not exist, + * but we should at least not crash if it happens due to a bug elsewhere. */ + BLI_assert(tile != nullptr); + UNUSED_VARS_NDEBUG(tile); +} + +static int imbuf_alpha_flags_for_image(Image *ima) +{ + switch (ima->alpha_mode) { + case IMA_ALPHA_STRAIGHT: + return 0; + case IMA_ALPHA_PREMUL: + return IB_alphamode_premul; + case IMA_ALPHA_CHANNEL_PACKED: + return IB_alphamode_channel_packed; + case IMA_ALPHA_IGNORE: + return IB_alphamode_ignore; + } + + return 0; +} + +/* the number of files will vary according to the stereo format */ +static int image_num_files(Image *ima) +{ + const bool is_multiview = BKE_image_is_multiview(ima); + + if (!is_multiview) { + return 1; + } + if (ima->views_format == R_IMF_VIEWS_STEREO_3D) { + return 1; + } + /* R_IMF_VIEWS_INDIVIDUAL */ + + return BLI_listbase_count(&ima->views); +} + +static ImBuf *load_sequence_single( + Image *ima, ImageUser *iuser, int frame, const int view_id, bool *r_cache_ibuf) +{ + struct ImBuf *ibuf; + char name[FILE_MAX]; + int flag; + ImageUser iuser_t{}; + + *r_cache_ibuf = true; + + ima->lastframe = frame; + + if (iuser) { + iuser_t = *iuser; + } + else { + /* BKE_image_user_file_path() uses this value for file name for sequences. */ + iuser_t.framenr = frame; + /* TODO(sergey): Do we need to initialize something else here? */ + } + + iuser_t.view = view_id; + BKE_image_user_file_path(&iuser_t, ima, name); + + flag = IB_rect | IB_multilayer | IB_metadata; + flag |= imbuf_alpha_flags_for_image(ima); + + /* read ibuf */ + ibuf = IMB_loadiffname(name, flag, ima->colorspace_settings.name); + +#if 0 + if (ibuf) { + printf(AT " loaded %s\n", name); + } + else { + printf(AT " missed %s\n", name); + } +#endif + + if (ibuf) { +#ifdef WITH_OPENEXR + if (ibuf->ftype == IMB_FTYPE_OPENEXR && ibuf->userdata) { + /* Handle multilayer and multiview cases, don't assign ibuf here. + * will be set layer in BKE_image_acquire_ibuf from ima->rr. */ + if (IMB_exr_has_multilayer(ibuf->userdata)) { + image_create_multilayer(ima, ibuf, frame); + ima->type = IMA_TYPE_MULTILAYER; + IMB_freeImBuf(ibuf); + ibuf = nullptr; + /* Null ibuf in the cache means the image failed to load. However for multilayer we load + * pixels into RenderResult instead and intentionally leave ibuf null. */ + *r_cache_ibuf = false; + } + } + else { + image_init_after_load(ima, iuser, ibuf); + } +#else + image_init_after_load(ima, iuser, ibuf); +#endif + } + + return ibuf; +} + +static ImBuf *image_load_sequence_file(Image *ima, ImageUser *iuser, int entry, int frame) +{ + struct ImBuf *ibuf = nullptr; + const bool is_multiview = BKE_image_is_multiview(ima); + const int totfiles = image_num_files(ima); + + if (!is_multiview) { + bool put_in_cache; + ibuf = load_sequence_single(ima, iuser, frame, 0, &put_in_cache); + if (put_in_cache) { + image_assign_ibuf(ima, ibuf, 0, entry); + } + } + else { + const int totviews = BLI_listbase_count(&ima->views); + Array ibuf_arr(totviews); + Array cache_ibuf_arr(totviews); + + for (int i = 0; i < totfiles; i++) { + ibuf_arr[i] = load_sequence_single(ima, iuser, frame, i, &cache_ibuf_arr[i]); + } + + if (BKE_image_is_stereo(ima) && ima->views_format == R_IMF_VIEWS_STEREO_3D) { + IMB_ImBufFromStereo3d(ima->stereo3d_format, ibuf_arr[0], &ibuf_arr[0], &ibuf_arr[1]); + } + + /* return the original requested ImBuf */ + ibuf = ibuf_arr[(iuser ? iuser->multi_index : 0)]; + + for (int i = 0; i < totviews; i++) { + if (cache_ibuf_arr[i]) { + image_assign_ibuf(ima, ibuf_arr[i], i, entry); + } + } + + /* "remove" the others (decrease their refcount) */ + for (int i = 0; i < totviews; i++) { + if (ibuf_arr[i] != ibuf) { + IMB_freeImBuf(ibuf_arr[i]); + } + } + } + + return ibuf; +} + +static ImBuf *image_load_sequence_multilayer(Image *ima, ImageUser *iuser, int entry, int frame) +{ + struct ImBuf *ibuf = nullptr; + + /* either we load from RenderResult, or we have to load a new one */ + + /* check for new RenderResult */ + if (ima->rr == nullptr || frame != ima->rr->framenr) { + if (ima->rr) { + /* Cached image buffers shares pointers with render result, + * need to ensure there's no image buffers are hanging around + * with dead links after freeing the render result. + */ + image_free_cached_frames(ima); + RE_FreeRenderResult(ima->rr); + ima->rr = nullptr; + } + + ibuf = image_load_sequence_file(ima, iuser, entry, frame); + + if (ibuf) { /* actually an error */ + ima->type = IMA_TYPE_IMAGE; + printf("error, multi is normal image\n"); + } + } + if (ima->rr) { + RenderPass *rpass = BKE_image_multilayer_index(ima->rr, iuser); + + if (rpass) { + // printf("load from pass %s\n", rpass->name); + /* since we free render results, we copy the rect */ + ibuf = IMB_allocImBuf(ima->rr->rectx, ima->rr->recty, 32, 0); + ibuf->rect_float = static_cast(MEM_dupallocN(rpass->rect)); + ibuf->flags |= IB_rectfloat; + ibuf->mall = IB_rectfloat; + ibuf->channels = rpass->channels; + + BKE_imbuf_stamp_info(ima->rr, ibuf); + + image_init_after_load(ima, iuser, ibuf); + image_assign_ibuf(ima, ibuf, iuser ? iuser->multi_index : 0, entry); + } + // else printf("pass not found\n"); + } + + return ibuf; +} + +static ImBuf *load_movie_single(Image *ima, ImageUser *iuser, int frame, const int view_id) +{ + struct ImBuf *ibuf = nullptr; + ImageAnim *ia; + + ia = static_cast(BLI_findlink(&ima->anims, view_id)); + + if (ia->anim == nullptr) { + char str[FILE_MAX]; + int flags = IB_rect; + ImageUser iuser_t{}; + + if (ima->flag & IMA_DEINTERLACE) { + flags |= IB_animdeinterlace; + } + + if (iuser) { + iuser_t = *iuser; + } + + iuser_t.view = view_id; + + BKE_image_user_file_path(&iuser_t, ima, str); + + /* FIXME: make several stream accessible in image editor, too. */ + ia->anim = openanim(str, flags, 0, ima->colorspace_settings.name); + + /* let's initialize this user */ + if (ia->anim && iuser && iuser->frames == 0) { + iuser->frames = IMB_anim_get_duration(ia->anim, IMB_TC_RECORD_RUN); + } + } + + if (ia->anim) { + int dur = IMB_anim_get_duration(ia->anim, IMB_TC_RECORD_RUN); + int fra = frame - 1; + + if (fra < 0) { + fra = 0; + } + if (fra > (dur - 1)) { + fra = dur - 1; + } + ibuf = IMB_makeSingleUser(IMB_anim_absolute(ia->anim, fra, IMB_TC_RECORD_RUN, IMB_PROXY_NONE)); + + if (ibuf) { + image_init_after_load(ima, iuser, ibuf); + } + } + + return ibuf; +} + +static ImBuf *image_load_movie_file(Image *ima, ImageUser *iuser, int frame) +{ + struct ImBuf *ibuf = nullptr; + const bool is_multiview = BKE_image_is_multiview(ima); + const int totfiles = image_num_files(ima); + + if (totfiles != BLI_listbase_count_at_most(&ima->anims, totfiles + 1)) { + image_free_anims(ima); + + for (int i = 0; i < totfiles; i++) { + /* allocate the ImageAnim */ + ImageAnim *ia = MEM_cnew("Image Anim"); + BLI_addtail(&ima->anims, ia); + } + } + + if (!is_multiview) { + ibuf = load_movie_single(ima, iuser, frame, 0); + image_assign_ibuf(ima, ibuf, 0, frame); + } + else { + const int totviews = BLI_listbase_count(&ima->views); + Array ibuf_arr(totviews); + + for (int i = 0; i < totfiles; i++) { + ibuf_arr[i] = load_movie_single(ima, iuser, frame, i); + } + + if (BKE_image_is_stereo(ima) && ima->views_format == R_IMF_VIEWS_STEREO_3D) { + IMB_ImBufFromStereo3d(ima->stereo3d_format, ibuf_arr[0], &ibuf_arr[0], &ibuf_arr[1]); + } + + for (int i = 0; i < totviews; i++) { + image_assign_ibuf(ima, ibuf_arr[i], i, frame); + } + + /* return the original requested ImBuf */ + ibuf = ibuf_arr[(iuser ? iuser->multi_index : 0)]; + + /* "remove" the others (decrease their refcount) */ + for (int i = 0; i < totviews; i++) { + if (ibuf_arr[i] != ibuf) { + IMB_freeImBuf(ibuf_arr[i]); + } + } + } + + return ibuf; +} + +static ImBuf *load_image_single(Image *ima, + ImageUser *iuser, + int cfra, + const int view_id, + const bool has_packed, + bool *r_cache_ibuf) +{ + char filepath[FILE_MAX]; + struct ImBuf *ibuf = nullptr; + int flag; + + *r_cache_ibuf = true; + + /* is there a PackedFile with this image ? */ + if (has_packed) { + ImagePackedFile *imapf; + + flag = IB_rect | IB_multilayer; + flag |= imbuf_alpha_flags_for_image(ima); + + imapf = static_cast(BLI_findlink(&ima->packedfiles, view_id)); + if (imapf->packedfile) { + ibuf = IMB_ibImageFromMemory((unsigned char *)imapf->packedfile->data, + imapf->packedfile->size, + flag, + ima->colorspace_settings.name, + ""); + } + } + else { + ImageUser iuser_t{}; + + flag = IB_rect | IB_multilayer | IB_metadata; + flag |= imbuf_alpha_flags_for_image(ima); + + /* get the correct filepath */ + BKE_image_user_frame_calc(ima, iuser, cfra); + + if (iuser) { + iuser_t = *iuser; + } + else { + iuser_t.framenr = ima->lastframe; + } + + iuser_t.view = view_id; + + BKE_image_user_file_path(&iuser_t, ima, filepath); + + /* read ibuf */ + ibuf = IMB_loadiffname(filepath, flag, ima->colorspace_settings.name); + } + + if (ibuf) { +#ifdef WITH_OPENEXR + if (ibuf->ftype == IMB_FTYPE_OPENEXR && ibuf->userdata) { + /* Handle multilayer and multiview cases, don't assign ibuf here. + * will be set layer in BKE_image_acquire_ibuf from ima->rr. */ + if (IMB_exr_has_multilayer(ibuf->userdata)) { + image_create_multilayer(ima, ibuf, cfra); + ima->type = IMA_TYPE_MULTILAYER; + IMB_freeImBuf(ibuf); + ibuf = nullptr; + /* Null ibuf in the cache means the image failed to load. However for multilayer we load + * pixels into RenderResult instead and intentionally leave ibuf null. */ + *r_cache_ibuf = false; + } + } + else +#endif + { + image_init_after_load(ima, iuser, ibuf); + + /* Make packed file for auto-pack. */ + if ((has_packed == false) && (G.fileflags & G_FILE_AUTOPACK)) { + ImagePackedFile *imapf = static_cast( + MEM_mallocN(sizeof(ImagePackedFile), "Image Pack-file")); + BLI_addtail(&ima->packedfiles, imapf); + + STRNCPY(imapf->filepath, filepath); + imapf->packedfile = BKE_packedfile_new( + nullptr, filepath, ID_BLEND_PATH_FROM_GLOBAL(&ima->id)); + } + } + } + + return ibuf; +} + +/* warning, 'iuser' can be null + * NOTE: Image->views was already populated (in image_update_views_format) + */ +static ImBuf *image_load_image_file(Image *ima, ImageUser *iuser, int cfra) +{ + struct ImBuf *ibuf = nullptr; + const bool is_multiview = BKE_image_is_multiview(ima); + const int totfiles = image_num_files(ima); + bool has_packed = BKE_image_has_packedfile(ima); + + /* always ensure clean ima */ + BKE_image_free_buffers(ima); + + /* this should never happen, but just playing safe */ + if (has_packed) { + if (totfiles != BLI_listbase_count_at_most(&ima->packedfiles, totfiles + 1)) { + image_free_packedfiles(ima); + has_packed = false; + } + } + + if (!is_multiview) { + bool put_in_cache; + ibuf = load_image_single(ima, iuser, cfra, 0, has_packed, &put_in_cache); + if (put_in_cache) { + image_assign_ibuf(ima, ibuf, IMA_NO_INDEX, 0); + } + } + else { + const int totviews = BLI_listbase_count(&ima->views); + BLI_assert(totviews > 0); + + Array ibuf_arr(totviews); + Array cache_ibuf_arr(totviews); + + for (int i = 0; i < totfiles; i++) { + ibuf_arr[i] = load_image_single(ima, iuser, cfra, i, has_packed, &cache_ibuf_arr[i]); + } + + /* multi-views/multi-layers OpenEXR files directly populate ima, and return null ibuf... */ + if (BKE_image_is_stereo(ima) && ima->views_format == R_IMF_VIEWS_STEREO_3D && ibuf_arr[0] && + totfiles == 1 && totviews >= 2) { + IMB_ImBufFromStereo3d(ima->stereo3d_format, ibuf_arr[0], &ibuf_arr[0], &ibuf_arr[1]); + } + + /* return the original requested ImBuf */ + int i = (iuser && iuser->multi_index < totviews) ? iuser->multi_index : 0; + ibuf = ibuf_arr[i]; + + for (i = 0; i < totviews; i++) { + if (cache_ibuf_arr[i]) { + image_assign_ibuf(ima, ibuf_arr[i], i, 0); + } + } + + /* "remove" the others (decrease their refcount) */ + for (i = 0; i < totviews; i++) { + if (ibuf_arr[i] != ibuf) { + IMB_freeImBuf(ibuf_arr[i]); + } + } + } + + return ibuf; +} + +static ImBuf *image_get_ibuf_multilayer(Image *ima, ImageUser *iuser) +{ + ImBuf *ibuf = nullptr; + + if (ima->rr == nullptr) { + ibuf = image_load_image_file(ima, iuser, 0); + if (ibuf) { /* actually an error */ + ima->type = IMA_TYPE_IMAGE; + return ibuf; + } + } + if (ima->rr) { + RenderPass *rpass = BKE_image_multilayer_index(ima->rr, iuser); + + if (rpass) { + ibuf = IMB_allocImBuf(ima->rr->rectx, ima->rr->recty, 32, 0); + + image_init_after_load(ima, iuser, ibuf); + + ibuf->rect_float = rpass->rect; + ibuf->flags |= IB_rectfloat; + ibuf->channels = rpass->channels; + + BKE_imbuf_stamp_info(ima->rr, ibuf); + + image_assign_ibuf(ima, ibuf, iuser ? iuser->multi_index : IMA_NO_INDEX, 0); + } + } + + return ibuf; +} + +/* showing RGBA result itself (from compo/sequence) or + * like exr, using layers etc */ +/* always returns a single ibuf, also during render progress */ +static ImBuf *image_get_render_result(Image *ima, ImageUser *iuser, void **r_lock) +{ + Render *re; + RenderView *rv; + float *rectf, *rectz; + unsigned int *rect; + float dither; + int channels, layer, pass; + ImBuf *ibuf; + int from_render = (ima->render_slot == ima->last_render_slot); + int actview; + + if (!(iuser && iuser->scene)) { + return nullptr; + } + + /* if we the caller is not going to release the lock, don't give the image */ + if (!r_lock) { + return nullptr; + } + + re = RE_GetSceneRender(iuser->scene); + + channels = 4; + layer = iuser->layer; + pass = iuser->pass; + actview = iuser->view; + + if (BKE_image_is_stereo(ima) && (iuser->flag & IMA_SHOW_STEREO)) { + actview = iuser->multiview_eye; + } + + RenderResult rres{}; + RenderSlot *slot; + if (from_render) { + RE_AcquireResultImage(re, &rres, actview); + } + else if ((slot = BKE_image_get_renderslot(ima, ima->render_slot))->render) { + /* Unfortunately each field needs to be set individually because RenderResult + * contains volatile fields and using memcpy would invoke undefined behavior with c++. */ + rres.next = slot->render->next; + rres.prev = slot->render->prev; + rres.rectx = slot->render->rectx; + rres.recty = slot->render->recty; + rres.sample_nr = slot->render->sample_nr; + rres.rect32 = slot->render->rect32; + rres.rectf = slot->render->rectf; + rres.rectz = slot->render->rectz; + rres.tilerect = slot->render->tilerect; + rres.xof = slot->render->xof; + rres.yof = slot->render->yof; + rres.layers = slot->render->layers; + rres.views = slot->render->views; + rres.renrect.xmin = slot->render->renrect.xmin; + rres.renrect.xmax = slot->render->renrect.xmax; + rres.renrect.ymin = slot->render->renrect.ymin; + rres.renrect.ymax = slot->render->renrect.ymax; + rres.renlay = slot->render->renlay; + rres.framenr = slot->render->framenr; + rres.text = slot->render->text; + rres.error = slot->render->error; + rres.stamp_data = slot->render->stamp_data; + rres.passes_allocated = slot->render->passes_allocated; + rres.have_combined = ((RenderView *)rres.views.first)->rectf != nullptr; + } + + if (!(rres.rectx > 0 && rres.recty > 0)) { + if (from_render) { + RE_ReleaseResultImage(re); + } + return nullptr; + } + + /* release is done in BKE_image_release_ibuf using r_lock */ + if (from_render) { + BLI_thread_lock(LOCK_VIEWER); + *r_lock = re; + rv = nullptr; + } + else { + rv = static_cast(BLI_findlink(&rres.views, actview)); + if (rv == nullptr) { + rv = static_cast(rres.views.first); + } + } + + /* this gives active layer, composite or sequence result */ + if (rv == nullptr) { + rect = (unsigned int *)rres.rect32; + rectf = rres.rectf; + rectz = rres.rectz; + } + else { + rect = (unsigned int *)rv->rect32; + rectf = rv->rectf; + rectz = rv->rectz; + } + + dither = iuser->scene->r.dither_intensity; + + /* combined layer gets added as first layer */ + if (rres.have_combined && layer == 0) { + /* pass */ + } + else if (rect && layer == 0) { + /* rect32 is set when there's a Sequence pass, this pass seems + * to have layer=0 (this is from image_buttons.c) + * in this case we ignore float buffer, because it could have + * hung from previous pass which was float + */ + rectf = nullptr; + } + else if (rres.layers.first) { + RenderLayer *rl = static_cast( + BLI_findlink(&rres.layers, layer - (rres.have_combined ? 1 : 0))); + if (rl) { + RenderPass *rpass = image_render_pass_get(rl, pass, actview, nullptr); + if (rpass) { + rectf = rpass->rect; + if (pass != 0) { + channels = rpass->channels; + dither = 0.0f; /* don't dither passes */ + } + } + + for (rpass = static_cast(rl->passes.first); rpass; rpass = rpass->next) { + if (STREQ(rpass->name, RE_PASSNAME_Z) && rpass->view_id == actview) { + rectz = rpass->rect; + } + } + } + } + + ibuf = image_get_cached_ibuf_for_index_entry(ima, IMA_NO_INDEX, 0, nullptr); + + /* make ibuf if needed, and initialize it */ + if (ibuf == nullptr) { + ibuf = IMB_allocImBuf(rres.rectx, rres.recty, 32, 0); + image_assign_ibuf(ima, ibuf, IMA_NO_INDEX, 0); + } + + /* Set color space settings for a byte buffer. + * + * This is mainly to make it so color management treats byte buffer + * from render result with Save Buffers enabled as final display buffer + * and doesn't apply any color management on it. + * + * For other cases we need to be sure it stays to default byte buffer space. + */ + if (ibuf->rect != rect) { + const char *colorspace = IMB_colormanagement_role_colorspace_name_get(COLOR_ROLE_DEFAULT_BYTE); + IMB_colormanagement_assign_rect_colorspace(ibuf, colorspace); + } + + /* invalidate color managed buffers if render result changed */ + BLI_thread_lock(LOCK_COLORMANAGE); + if (ibuf->x != rres.rectx || ibuf->y != rres.recty || ibuf->rect_float != rectf) { + ibuf->userflags |= IB_DISPLAY_BUFFER_INVALID; + } + + ibuf->x = rres.rectx; + ibuf->y = rres.recty; + + if (rect) { + imb_freerectImBuf(ibuf); + ibuf->rect = rect; + } + else { + /* byte buffer of render result has been freed, make sure image buffers + * does not reference to this buffer anymore + * need check for whether byte buffer was allocated and owned by image itself + * or if it's reusing buffer from render result + */ + if ((ibuf->mall & IB_rect) == 0) { + ibuf->rect = nullptr; + } + } + + if (rectf) { + ibuf->rect_float = rectf; + ibuf->flags |= IB_rectfloat; + ibuf->channels = channels; + } + else { + ibuf->rect_float = nullptr; + ibuf->flags &= ~IB_rectfloat; + } + + if (rectz) { + ibuf->zbuf_float = rectz; + ibuf->flags |= IB_zbuffloat; + } + else { + ibuf->zbuf_float = nullptr; + ibuf->flags &= ~IB_zbuffloat; + } + + /* TODO(sergey): Make this faster by either simply referencing the stamp + * or by changing both ImBug and RenderResult to use same data type to + * store metadata. */ + if (ibuf->metadata != nullptr) { + IMB_metadata_free(ibuf->metadata); + ibuf->metadata = nullptr; + } + BKE_imbuf_stamp_info(&rres, ibuf); + + BLI_thread_unlock(LOCK_COLORMANAGE); + + ibuf->dither = dither; + + return ibuf; +} + +static int image_get_multiview_index(Image *ima, ImageUser *iuser) +{ + const bool is_multilayer = BKE_image_is_multilayer(ima); + const bool is_backdrop = (ima->source == IMA_SRC_VIEWER) && (ima->type == IMA_TYPE_COMPOSITE) && + (iuser == nullptr); + int index = BKE_image_has_multiple_ibufs(ima) ? 0 : IMA_NO_INDEX; + + if (is_multilayer) { + return iuser ? iuser->multi_index : index; + } + if (is_backdrop) { + if (BKE_image_is_stereo(ima)) { + /* backdrop hackaround (since there is no iuser */ + return ima->eye; + } + } + else if (BKE_image_is_multiview(ima)) { + return iuser ? iuser->multi_index : index; + } + + return index; +} + +static void image_get_entry_and_index(Image *ima, ImageUser *iuser, int *r_entry, int *r_index) +{ + int frame = 0, index = image_get_multiview_index(ima, iuser); + + /* see if we already have an appropriate ibuf, with image source and type */ + if (ima->source == IMA_SRC_MOVIE) { + frame = iuser ? iuser->framenr : ima->lastframe; + } + else if (ima->source == IMA_SRC_SEQUENCE) { + if (ima->type == IMA_TYPE_IMAGE) { + frame = iuser ? iuser->framenr : ima->lastframe; + } + else if (ima->type == IMA_TYPE_MULTILAYER) { + frame = iuser ? iuser->framenr : ima->lastframe; + } + } + else if (ima->source == IMA_SRC_TILED) { + frame = image_get_tile_number_from_iuser(ima, iuser); + } + + *r_entry = frame; + *r_index = index; +} + +/* Get the ibuf from an image cache for a given image user. + * + * Returns referenced image buffer if it exists, callee is to + * call IMB_freeImBuf to de-reference the image buffer after + * it's done handling it. + */ +static ImBuf *image_get_cached_ibuf( + Image *ima, ImageUser *iuser, int *r_entry, int *r_index, bool *r_is_cached_empty) +{ + ImBuf *ibuf = nullptr; + int entry = 0, index = image_get_multiview_index(ima, iuser); + + /* see if we already have an appropriate ibuf, with image source and type */ + if (ima->source == IMA_SRC_MOVIE) { + entry = iuser ? iuser->framenr : ima->lastframe; + ibuf = image_get_cached_ibuf_for_index_entry(ima, index, entry, r_is_cached_empty); + ima->lastframe = entry; + } + else if (ima->source == IMA_SRC_SEQUENCE) { + if (ima->type == IMA_TYPE_IMAGE) { + entry = iuser ? iuser->framenr : ima->lastframe; + ibuf = image_get_cached_ibuf_for_index_entry(ima, index, entry, r_is_cached_empty); + ima->lastframe = entry; + } + else if (ima->type == IMA_TYPE_MULTILAYER) { + entry = iuser ? iuser->framenr : ima->lastframe; + ibuf = image_get_cached_ibuf_for_index_entry(ima, index, entry, r_is_cached_empty); + } + } + else if (ima->source == IMA_SRC_FILE) { + if (ima->type == IMA_TYPE_IMAGE) { + ibuf = image_get_cached_ibuf_for_index_entry(ima, index, 0, r_is_cached_empty); + } + else if (ima->type == IMA_TYPE_MULTILAYER) { + ibuf = image_get_cached_ibuf_for_index_entry(ima, index, 0, r_is_cached_empty); + } + } + else if (ima->source == IMA_SRC_GENERATED) { + ibuf = image_get_cached_ibuf_for_index_entry(ima, index, 0, r_is_cached_empty); + } + else if (ima->source == IMA_SRC_VIEWER) { + /* always verify entirely, not that this shouldn't happen + * as part of texture sampling in rendering anyway, so not + * a big bottleneck */ + } + else if (ima->source == IMA_SRC_TILED) { + if (ELEM(ima->type, IMA_TYPE_IMAGE, IMA_TYPE_MULTILAYER)) { + entry = image_get_tile_number_from_iuser(ima, iuser); + ibuf = image_get_cached_ibuf_for_index_entry(ima, index, entry, r_is_cached_empty); + } + } + + if (r_entry) { + *r_entry = entry; + } + + if (r_index) { + *r_index = index; + } + + return ibuf; +} + +BLI_INLINE bool image_quick_test(Image *ima, const ImageUser *iuser) +{ + if (ima == nullptr) { + return false; + } + + ImageTile *tile = BKE_image_get_tile_from_iuser(ima, iuser); + if (tile == nullptr) { + return false; + } + + return true; +} + +/** + * Checks optional #ImageUser and verifies/creates #ImBuf. + * + * \warning Not thread-safe, so callee should worry about thread locks. + */ +static ImBuf *image_acquire_ibuf(Image *ima, ImageUser *iuser, void **r_lock) +{ + ImBuf *ibuf = nullptr; + int entry = 0, index = 0; + + if (r_lock) { + *r_lock = nullptr; + } + + /* quick reject tests */ + if (!image_quick_test(ima, iuser)) { + return nullptr; + } + + bool is_cached_empty = false; + ibuf = image_get_cached_ibuf(ima, iuser, &entry, &index, &is_cached_empty); + if (is_cached_empty) { + return nullptr; + } + + if (ibuf == nullptr) { + /* we are sure we have to load the ibuf, using source and type */ + if (ima->source == IMA_SRC_MOVIE) { + /* source is from single file, use flipbook to store ibuf */ + ibuf = image_load_movie_file(ima, iuser, entry); + } + else if (ima->source == IMA_SRC_SEQUENCE) { + if (ima->type == IMA_TYPE_IMAGE) { + /* regular files, ibufs in flipbook, allows saving */ + ibuf = image_load_sequence_file(ima, iuser, entry, entry); + } + /* no else; on load the ima type can change */ + if (ima->type == IMA_TYPE_MULTILAYER) { + /* only 1 layer/pass stored in imbufs, no exrhandle anim storage, no saving */ + ibuf = image_load_sequence_multilayer(ima, iuser, entry, entry); + } + } + else if (ima->source == IMA_SRC_TILED) { + if (ima->type == IMA_TYPE_IMAGE) { + /* regular files, ibufs in flipbook, allows saving */ + ibuf = image_load_sequence_file(ima, iuser, entry, 0); + } + /* no else; on load the ima type can change */ + if (ima->type == IMA_TYPE_MULTILAYER) { + /* only 1 layer/pass stored in imbufs, no exrhandle anim storage, no saving */ + ibuf = image_load_sequence_multilayer(ima, iuser, entry, 0); + } + } + else if (ima->source == IMA_SRC_FILE) { + + if (ima->type == IMA_TYPE_IMAGE) { + ibuf = image_load_image_file(ima, iuser, entry); /* cfra only for '#', this global is OK */ + } + /* no else; on load the ima type can change */ + if (ima->type == IMA_TYPE_MULTILAYER) { + /* keeps render result, stores ibufs in listbase, allows saving */ + ibuf = image_get_ibuf_multilayer(ima, iuser); + } + } + else if (ima->source == IMA_SRC_GENERATED) { + /* generated is: ibuf is allocated dynamically */ + /* UV testgrid or black or solid etc */ + if (ima->gen_x == 0) { + ima->gen_x = 1024; + } + if (ima->gen_y == 0) { + ima->gen_y = 1024; + } + if (ima->gen_depth == 0) { + ima->gen_depth = 24; + } + ibuf = add_ibuf_size(ima->gen_x, + ima->gen_y, + ima->filepath, + ima->gen_depth, + (ima->gen_flag & IMA_GEN_FLOAT) != 0, + ima->gen_type, + ima->gen_color, + &ima->colorspace_settings); + image_assign_ibuf(ima, ibuf, index, 0); + } + else if (ima->source == IMA_SRC_VIEWER) { + if (ima->type == IMA_TYPE_R_RESULT) { + /* always verify entirely, and potentially + * returns pointer to release later */ + ibuf = image_get_render_result(ima, iuser, r_lock); + } + else if (ima->type == IMA_TYPE_COMPOSITE) { + /* requires lock/unlock, otherwise don't return image */ + if (r_lock) { + /* unlock in BKE_image_release_ibuf */ + BLI_thread_lock(LOCK_VIEWER); + *r_lock = ima; + + /* XXX anim play for viewer nodes not yet supported */ + entry = 0; // XXX iuser ? iuser->framenr : 0; + ibuf = image_get_cached_ibuf_for_index_entry(ima, index, entry, nullptr); + + if (!ibuf) { + /* Composite Viewer, all handled in compositor */ + /* fake ibuf, will be filled in compositor */ + ibuf = IMB_allocImBuf(256, 256, 32, IB_rect | IB_rectfloat); + image_assign_ibuf(ima, ibuf, index, entry); + } + } + } + } + + /* We only want movies and sequences to be memory limited. */ + if (ibuf != nullptr && !ELEM(ima->source, IMA_SRC_MOVIE, IMA_SRC_SEQUENCE)) { + ibuf->userflags |= IB_PERSISTENT; + } + } + + BKE_image_tag_time(ima); + + return ibuf; +} + +ImBuf *BKE_image_acquire_ibuf(Image *ima, ImageUser *iuser, void **r_lock) +{ + /* NOTE: same as #image_acquire_ibuf, but can be used to retrieve images being rendered in + * a thread safe way, always call both acquire and release. */ + + if (ima == nullptr) { + return nullptr; + } + + ImBuf *ibuf; + + BLI_mutex_lock(static_cast(ima->runtime.cache_mutex)); + + ibuf = image_acquire_ibuf(ima, iuser, r_lock); + + BLI_mutex_unlock(static_cast(ima->runtime.cache_mutex)); + + return ibuf; +} + +void BKE_image_release_ibuf(Image *ima, ImBuf *ibuf, void *lock) +{ + if (lock != nullptr) { + /* for getting image during threaded render / compositing, need to release */ + if (lock == ima) { + BLI_thread_unlock(LOCK_VIEWER); /* viewer image */ + } + else { + RE_ReleaseResultImage(static_cast(lock)); /* render result */ + BLI_thread_unlock(LOCK_VIEWER); /* view image imbuf */ + } + } + + if (ibuf) { + BLI_mutex_lock(static_cast(ima->runtime.cache_mutex)); + IMB_freeImBuf(ibuf); + BLI_mutex_unlock(static_cast(ima->runtime.cache_mutex)); + } +} + +bool BKE_image_has_ibuf(Image *ima, ImageUser *iuser) +{ + ImBuf *ibuf; + + /* quick reject tests */ + if (!image_quick_test(ima, iuser)) { + return false; + } + + BLI_mutex_lock(static_cast(ima->runtime.cache_mutex)); + + ibuf = image_get_cached_ibuf(ima, iuser, nullptr, nullptr, nullptr); + + if (!ibuf) { + ibuf = image_acquire_ibuf(ima, iuser, nullptr); + } + + BLI_mutex_unlock(static_cast(ima->runtime.cache_mutex)); + + IMB_freeImBuf(ibuf); + + return ibuf != nullptr; +} + +/* ******** Pool for image buffers ******** */ + +struct ImagePoolItem { + struct ImagePoolItem *next, *prev; + Image *image; + ImBuf *ibuf; + int index; + int entry; +}; + +struct ImagePool { + ListBase image_buffers; + BLI_mempool *memory_pool; + ThreadMutex mutex; +}; + +ImagePool *BKE_image_pool_new(void) +{ + ImagePool *pool = MEM_cnew("Image Pool"); + pool->memory_pool = BLI_mempool_create(sizeof(ImagePoolItem), 0, 128, BLI_MEMPOOL_NOP); + + BLI_mutex_init(&pool->mutex); + + return pool; +} + +void BKE_image_pool_free(ImagePool *pool) +{ + /* Use single lock to dereference all the image buffers. */ + BLI_mutex_lock(&pool->mutex); + for (ImagePoolItem *item = static_cast(pool->image_buffers.first); + item != nullptr; + item = item->next) { + if (item->ibuf != nullptr) { + BLI_mutex_lock(static_cast(item->image->runtime.cache_mutex)); + IMB_freeImBuf(item->ibuf); + BLI_mutex_unlock(static_cast(item->image->runtime.cache_mutex)); + } + } + BLI_mutex_unlock(&pool->mutex); + + BLI_mempool_destroy(pool->memory_pool); + + BLI_mutex_end(&pool->mutex); + + MEM_freeN(pool); +} + +BLI_INLINE ImBuf *image_pool_find_item( + ImagePool *pool, Image *image, int entry, int index, bool *found) +{ + ImagePoolItem *item; + + *found = false; + + for (item = static_cast(pool->image_buffers.first); item; item = item->next) { + if (item->image == image && item->entry == entry && item->index == index) { + *found = true; + return item->ibuf; + } + } + + return nullptr; +} + +ImBuf *BKE_image_pool_acquire_ibuf(Image *ima, ImageUser *iuser, ImagePool *pool) +{ + ImBuf *ibuf; + int index, entry; + bool found; + + if (!image_quick_test(ima, iuser)) { + return nullptr; + } + + if (pool == nullptr) { + /* Pool could be null, in this case use general acquire function. */ + return BKE_image_acquire_ibuf(ima, iuser, nullptr); + } + + image_get_entry_and_index(ima, iuser, &entry, &index); + + /* Use double-checked locking, to avoid locking when the requested image buffer is already in the + * pool. */ + + ibuf = image_pool_find_item(pool, ima, entry, index, &found); + if (found) { + return ibuf; + } + + /* Lock the pool, to allow thread-safe modification of the content of the pool. */ + BLI_mutex_lock(&pool->mutex); + + ibuf = image_pool_find_item(pool, ima, entry, index, &found); + + /* Will also create item even in cases image buffer failed to load, + * prevents trying to load the same buggy file multiple times. */ + if (!found) { + ImagePoolItem *item; + + /* Thread-safe acquisition of an image buffer from the image. + * The acquisition does not use image pools, so there is no risk of recursive or out-of-order + * mutex locking. */ + ibuf = BKE_image_acquire_ibuf(ima, iuser, nullptr); + + item = static_cast(BLI_mempool_alloc(pool->memory_pool)); + item->image = ima; + item->entry = entry; + item->index = index; + item->ibuf = ibuf; + + BLI_addtail(&pool->image_buffers, item); + } + + BLI_mutex_unlock(&pool->mutex); + + return ibuf; +} + +void BKE_image_pool_release_ibuf(Image *ima, ImBuf *ibuf, ImagePool *pool) +{ + /* if pool wasn't actually used, use general release stuff, + * for pools image buffers will be dereferenced on pool free + */ + if (pool == nullptr) { + BKE_image_release_ibuf(ima, ibuf, nullptr); + } +} + +int BKE_image_user_frame_get(const ImageUser *iuser, int cfra, bool *r_is_in_range) +{ + const int len = iuser->frames; + + if (r_is_in_range) { + *r_is_in_range = false; + } + + if (len == 0) { + return 0; + } + + int framenr; + cfra = cfra - iuser->sfra + 1; + + /* cyclic */ + if (iuser->cycl) { + cfra = ((cfra) % len); + if (cfra < 0) { + cfra += len; + } + if (cfra == 0) { + cfra = len; + } + + if (r_is_in_range) { + *r_is_in_range = true; + } + } + + if (cfra < 0) { + cfra = 0; + } + else if (cfra > len) { + cfra = len; + } + else { + if (r_is_in_range) { + *r_is_in_range = true; + } + } + + /* transform to images space */ + framenr = cfra; + if (framenr > iuser->frames) { + framenr = iuser->frames; + } + + if (iuser->cycl) { + framenr = ((framenr) % len); + while (framenr < 0) { + framenr += len; + } + if (framenr == 0) { + framenr = len; + } + } + + /* important to apply after else we can't loop on frames 100 - 110 for eg. */ + framenr += iuser->offset; + + return framenr; +} + +void BKE_image_user_frame_calc(Image *ima, ImageUser *iuser, int cfra) +{ + if (iuser) { + if (ima && BKE_image_is_animated(ima)) { + /* Compute current frame for animated image. */ + bool is_in_range; + const int framenr = BKE_image_user_frame_get(iuser, cfra, &is_in_range); + + if (is_in_range) { + iuser->flag |= IMA_USER_FRAME_IN_RANGE; + } + else { + iuser->flag &= ~IMA_USER_FRAME_IN_RANGE; + } + + iuser->framenr = framenr; + } + else { + /* Set fixed frame number for still image. */ + iuser->framenr = 0; + iuser->flag |= IMA_USER_FRAME_IN_RANGE; + } + + if (ima && ima->gpuframenr != iuser->framenr) { + /* NOTE: a single texture and refresh doesn't really work when + * multiple image users may use different frames, this is to + * be improved with perhaps a GPU texture cache. */ + BKE_image_partial_update_mark_full_update(ima); + ima->gpuframenr = iuser->framenr; + } + + iuser->flag &= ~IMA_NEED_FRAME_RECALC; + } +} + +/* goes over all ImageUsers, and sets frame numbers if auto-refresh is set */ +static void image_editors_update_frame(Image *ima, + ID *UNUSED(iuser_id), + ImageUser *iuser, + void *customdata) +{ + int cfra = *(int *)customdata; + + if ((iuser->flag & IMA_ANIM_ALWAYS) || (iuser->flag & IMA_NEED_FRAME_RECALC)) { + BKE_image_user_frame_calc(ima, iuser, cfra); + } +} + +void BKE_image_editors_update_frame(const Main *bmain, int cfra) +{ + /* This only updates images used by the user interface. For others the + * dependency graph will call BKE_image_user_id_eval_animation. */ + wmWindowManager *wm = static_cast(bmain->wm.first); + image_walk_id_all_users(&wm->id, false, &cfra, image_editors_update_frame); +} + +static void image_user_id_has_animation(Image *ima, + ID *UNUSED(iuser_id), + ImageUser *UNUSED(iuser), + void *customdata) +{ + if (ima && BKE_image_is_animated(ima)) { + *(bool *)customdata = true; + } +} + +bool BKE_image_user_id_has_animation(ID *id) +{ + /* For the dependency graph, this does not consider nested node + * trees as these are handled as their own data-block. */ + bool has_animation = false; + bool skip_nested_nodes = true; + image_walk_id_all_users(id, skip_nested_nodes, &has_animation, image_user_id_has_animation); + return has_animation; +} + +static void image_user_id_eval_animation(Image *ima, + ID *UNUSED(iduser_id), + ImageUser *iuser, + void *customdata) +{ + if (ima && BKE_image_is_animated(ima)) { + Depsgraph *depsgraph = (Depsgraph *)customdata; + + if ((iuser->flag & IMA_ANIM_ALWAYS) || (iuser->flag & IMA_NEED_FRAME_RECALC) || + (DEG_get_mode(depsgraph) == DAG_EVAL_RENDER)) { + float cfra = DEG_get_ctime(depsgraph); + + BKE_image_user_frame_calc(ima, iuser, cfra); + } + } +} + +void BKE_image_user_id_eval_animation(Depsgraph *depsgraph, ID *id) +{ + /* This is called from the dependency graph to update the image + * users in data-blocks. It computes the current frame number + * and tags the image to be refreshed. + * This does not consider nested node trees as these are handled + * as their own data-block. */ + bool skip_nested_nodes = true; + image_walk_id_all_users(id, skip_nested_nodes, depsgraph, image_user_id_eval_animation); +} + +void BKE_image_user_file_path(ImageUser *iuser, Image *ima, char *filepath) +{ + BKE_image_user_file_path_ex(iuser, ima, filepath, true); +} + +void BKE_image_user_file_path_ex(ImageUser *iuser, Image *ima, char *filepath, bool resolve_udim) +{ + if (BKE_image_is_multiview(ima)) { + ImageView *iv = static_cast(BLI_findlink(&ima->views, iuser->view)); + if (iv->filepath[0]) { + BLI_strncpy(filepath, iv->filepath, FILE_MAX); + } + else { + BLI_strncpy(filepath, ima->filepath, FILE_MAX); + } + } + else { + BLI_strncpy(filepath, ima->filepath, FILE_MAX); + } + + if (ELEM(ima->source, IMA_SRC_SEQUENCE, IMA_SRC_TILED)) { + char head[FILE_MAX], tail[FILE_MAX]; + unsigned short numlen; + + int index; + if (ima->source == IMA_SRC_SEQUENCE) { + index = iuser ? iuser->framenr : ima->lastframe; + BLI_path_sequence_decode(filepath, head, tail, &numlen); + BLI_path_sequence_encode(filepath, head, tail, numlen, index); + } + else if (resolve_udim) { + index = image_get_tile_number_from_iuser(ima, iuser); + + eUDIM_TILE_FORMAT tile_format; + char *udim_pattern = BKE_image_get_tile_strformat(filepath, &tile_format); + BKE_image_set_filepath_from_tile_number(filepath, udim_pattern, tile_format, index); + MEM_SAFE_FREE(udim_pattern); + } + } + + BLI_path_abs(filepath, ID_BLEND_PATH_FROM_GLOBAL(&ima->id)); +} + +bool BKE_image_has_alpha(Image *image) +{ + void *lock; + ImBuf *ibuf = BKE_image_acquire_ibuf(image, NULL, &lock); + const int planes = (ibuf ? ibuf->planes : 0); + BKE_image_release_ibuf(image, ibuf, lock); + + if (planes == 32 || planes == 16) { + return true; + } + + return false; +} + +void BKE_image_get_size(Image *image, ImageUser *iuser, int *r_width, int *r_height) +{ + ImBuf *ibuf = nullptr; + void *lock; + + if (image != nullptr) { + ibuf = BKE_image_acquire_ibuf(image, iuser, &lock); + } + + if (ibuf && ibuf->x > 0 && ibuf->y > 0) { + *r_width = ibuf->x; + *r_height = ibuf->y; + } + else if (image != nullptr && image->type == IMA_TYPE_R_RESULT && iuser != nullptr && + iuser->scene != nullptr) { + Scene *scene = iuser->scene; + *r_width = (scene->r.xsch * scene->r.size) / 100; + *r_height = (scene->r.ysch * scene->r.size) / 100; + if ((scene->r.mode & R_BORDER) && (scene->r.mode & R_CROP)) { + *r_width *= BLI_rctf_size_x(&scene->r.border); + *r_height *= BLI_rctf_size_y(&scene->r.border); + } + } + else { + *r_width = IMG_SIZE_FALLBACK; + *r_height = IMG_SIZE_FALLBACK; + } + + if (image != nullptr) { + BKE_image_release_ibuf(image, ibuf, lock); + } +} + +void BKE_image_get_size_fl(Image *image, ImageUser *iuser, float r_size[2]) +{ + int width, height; + BKE_image_get_size(image, iuser, &width, &height); + + r_size[0] = (float)width; + r_size[1] = (float)height; +} + +void BKE_image_get_aspect(Image *image, float *r_aspx, float *r_aspy) +{ + *r_aspx = 1.0; + + /* x is always 1 */ + if (image) { + *r_aspy = image->aspy / image->aspx; + } + else { + *r_aspy = 1.0f; + } +} + +unsigned char *BKE_image_get_pixels_for_frame(struct Image *image, int frame, int tile) +{ + ImageUser iuser; + BKE_imageuser_default(&iuser); + void *lock; + ImBuf *ibuf; + unsigned char *pixels = nullptr; + + iuser.framenr = frame; + iuser.tile = tile; + + ibuf = BKE_image_acquire_ibuf(image, &iuser, &lock); + + if (ibuf) { + pixels = (unsigned char *)ibuf->rect; + + if (pixels) { + pixels = static_cast(MEM_dupallocN(pixels)); + } + + BKE_image_release_ibuf(image, ibuf, lock); + } + + if (!pixels) { + return nullptr; + } + + return pixels; +} + +float *BKE_image_get_float_pixels_for_frame(struct Image *image, int frame, int tile) +{ + ImageUser iuser; + BKE_imageuser_default(&iuser); + void *lock; + ImBuf *ibuf; + float *pixels = nullptr; + + iuser.framenr = frame; + iuser.tile = tile; + + ibuf = BKE_image_acquire_ibuf(image, &iuser, &lock); + + if (ibuf) { + pixels = ibuf->rect_float; + + if (pixels) { + pixels = static_cast(MEM_dupallocN(pixels)); + } + + BKE_image_release_ibuf(image, ibuf, lock); + } + + if (!pixels) { + return nullptr; + } + + return pixels; +} + +int BKE_image_sequence_guess_offset(Image *image) +{ + return BLI_path_sequence_decode(image->filepath, nullptr, nullptr, nullptr); +} + +bool BKE_image_has_anim(Image *ima) +{ + return (BLI_listbase_is_empty(&ima->anims) == false); +} + +bool BKE_image_has_packedfile(const Image *ima) +{ + return (BLI_listbase_is_empty(&ima->packedfiles) == false); +} + +bool BKE_image_has_filepath(Image *ima) +{ + /* This could be improved to detect cases like //../../, currently path + * remapping empty file paths empty. */ + return ima->filepath[0] != '\0'; +} + +bool BKE_image_is_animated(Image *image) +{ + return ELEM(image->source, IMA_SRC_MOVIE, IMA_SRC_SEQUENCE); +} + +bool BKE_image_has_multiple_ibufs(Image *image) +{ + return ELEM(image->source, IMA_SRC_MOVIE, IMA_SRC_SEQUENCE, IMA_SRC_TILED); +} + +bool BKE_image_is_dirty_writable(Image *image, bool *r_is_writable) +{ + bool is_dirty = false; + bool is_writable = false; + + BLI_mutex_lock(static_cast(image->runtime.cache_mutex)); + if (image->cache != nullptr) { + struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); + + while (!IMB_moviecacheIter_done(iter)) { + ImBuf *ibuf = IMB_moviecacheIter_getImBuf(iter); + if (ibuf != nullptr && ibuf->userflags & IB_BITMAPDIRTY) { + is_writable = BKE_image_buffer_format_writable(ibuf); + is_dirty = true; + break; + } + IMB_moviecacheIter_step(iter); + } + IMB_moviecacheIter_free(iter); + } + BLI_mutex_unlock(static_cast(image->runtime.cache_mutex)); + + if (r_is_writable) { + *r_is_writable = is_writable; + } + + return is_dirty; +} + +bool BKE_image_is_dirty(Image *image) +{ + return BKE_image_is_dirty_writable(image, nullptr); +} + +void BKE_image_mark_dirty(Image *UNUSED(image), ImBuf *ibuf) +{ + ibuf->userflags |= IB_BITMAPDIRTY; +} + +bool BKE_image_buffer_format_writable(ImBuf *ibuf) +{ + ImageFormatData im_format; + ImbFormatOptions options_dummy; + BKE_imbuf_to_image_format(&im_format, ibuf); + return (BKE_image_imtype_to_ftype(im_format.imtype, &options_dummy) == ibuf->ftype); +} + +void BKE_image_file_format_set(Image *image, int ftype, const ImbFormatOptions *options) +{ + BLI_mutex_lock(static_cast(image->runtime.cache_mutex)); + if (image->cache != nullptr) { + struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); + + while (!IMB_moviecacheIter_done(iter)) { + ImBuf *ibuf = IMB_moviecacheIter_getImBuf(iter); + if (ibuf != nullptr) { + ibuf->ftype = static_cast(ftype); + ibuf->foptions = *options; + } + IMB_moviecacheIter_step(iter); + } + IMB_moviecacheIter_free(iter); + } + BLI_mutex_unlock(static_cast(image->runtime.cache_mutex)); +} + +bool BKE_image_has_loaded_ibuf(Image *image) +{ + bool has_loaded_ibuf = false; + + BLI_mutex_lock(static_cast(image->runtime.cache_mutex)); + if (image->cache != nullptr) { + struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); + + while (!IMB_moviecacheIter_done(iter)) { + ImBuf *ibuf = IMB_moviecacheIter_getImBuf(iter); + if (ibuf != nullptr) { + has_loaded_ibuf = true; + break; + } + IMB_moviecacheIter_step(iter); + } + IMB_moviecacheIter_free(iter); + } + BLI_mutex_unlock(static_cast(image->runtime.cache_mutex)); + + return has_loaded_ibuf; +} + +ImBuf *BKE_image_get_ibuf_with_name(Image *image, const char *name) +{ + ImBuf *ibuf = nullptr; + + BLI_mutex_lock(static_cast(image->runtime.cache_mutex)); + if (image->cache != nullptr) { + struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); + + while (!IMB_moviecacheIter_done(iter)) { + ImBuf *current_ibuf = IMB_moviecacheIter_getImBuf(iter); + if (current_ibuf != nullptr && STREQ(current_ibuf->name, name)) { + ibuf = current_ibuf; + IMB_refImBuf(ibuf); + break; + } + IMB_moviecacheIter_step(iter); + } + IMB_moviecacheIter_free(iter); + } + BLI_mutex_unlock(static_cast(image->runtime.cache_mutex)); + + return ibuf; +} + +ImBuf *BKE_image_get_first_ibuf(Image *image) +{ + ImBuf *ibuf = nullptr; + + BLI_mutex_lock(static_cast(image->runtime.cache_mutex)); + if (image->cache != nullptr) { + struct MovieCacheIter *iter = IMB_moviecacheIter_new(image->cache); + + while (!IMB_moviecacheIter_done(iter)) { + ibuf = IMB_moviecacheIter_getImBuf(iter); + if (ibuf != nullptr) { + IMB_refImBuf(ibuf); + } + break; + } + IMB_moviecacheIter_free(iter); + } + BLI_mutex_unlock(static_cast(image->runtime.cache_mutex)); + + return ibuf; +} + +static void image_update_views_format(Image *ima, ImageUser *iuser) +{ + SceneRenderView *srv; + ImageView *iv; + Scene *scene = iuser->scene; + const bool is_multiview = ((scene->r.scemode & R_MULTIVIEW) != 0) && + ((ima->flag & IMA_USE_VIEWS) != 0); + + /* reset the image views */ + BKE_image_free_views(ima); + + if (!is_multiview) { + /* nothing to do */ + } + else if (ima->views_format == R_IMF_VIEWS_STEREO_3D) { + const char *names[2] = {STEREO_LEFT_NAME, STEREO_RIGHT_NAME}; + + for (int i = 0; i < 2; i++) { + image_add_view(ima, names[i], ima->filepath); + } + return; + } + else { + /* R_IMF_VIEWS_INDIVIDUAL */ + char prefix[FILE_MAX] = {'\0'}; + char *name = ima->filepath; + const char *ext = nullptr; + + BKE_scene_multiview_view_prefix_get(scene, name, prefix, &ext); + + if (prefix[0] == '\0') { + BKE_image_free_views(ima); + return; + } + + /* create all the image views */ + for (srv = static_cast(scene->r.views.first); srv; srv = srv->next) { + if (BKE_scene_multiview_is_render_view_active(&scene->r, srv)) { + char filepath[FILE_MAX]; + SNPRINTF(filepath, "%s%s%s", prefix, srv->suffix, ext); + image_add_view(ima, srv->name, filepath); + } + } + + /* check if the files are all available */ + iv = static_cast(ima->views.last); + while (iv) { + int file; + char str[FILE_MAX]; + + STRNCPY(str, iv->filepath); + BLI_path_abs(str, ID_BLEND_PATH_FROM_GLOBAL(&ima->id)); + + /* exists? */ + file = BLI_open(str, O_BINARY | O_RDONLY, 0); + if (file == -1) { + ImageView *iv_del = iv; + iv = iv->prev; + BLI_remlink(&ima->views, iv_del); + MEM_freeN(iv_del); + } + else { + iv = iv->prev; + close(file); + } + } + + /* all good */ + if (!BKE_image_is_multiview(ima)) { + BKE_image_free_views(ima); + } + } +} + +/**************************** Render Slots ***************************/ + +RenderSlot *BKE_image_add_renderslot(Image *ima, const char *name) +{ + RenderSlot *slot = MEM_cnew("Image new Render Slot"); + if (name && name[0]) { + BLI_strncpy(slot->name, name, sizeof(slot->name)); + } + else { + int n = BLI_listbase_count(&ima->renderslots) + 1; + BLI_snprintf(slot->name, sizeof(slot->name), "Slot %d", n); + } + BLI_addtail(&ima->renderslots, slot); + return slot; +} + +bool BKE_image_remove_renderslot(Image *ima, ImageUser *iuser, int slot) +{ + if (slot == ima->last_render_slot) { + /* Don't remove render slot while rendering to it. */ + if (G.is_rendering) { + return false; + } + } + + int num_slots = BLI_listbase_count(&ima->renderslots); + if (slot >= num_slots || num_slots == 1) { + return false; + } + + RenderSlot *remove_slot = static_cast(BLI_findlink(&ima->renderslots, slot)); + RenderSlot *current_slot = static_cast( + BLI_findlink(&ima->renderslots, ima->render_slot)); + RenderSlot *current_last_slot = static_cast( + BLI_findlink(&ima->renderslots, ima->last_render_slot)); + + RenderSlot *next_slot; + if (current_slot == remove_slot) { + next_slot = static_cast( + BLI_findlink(&ima->renderslots, (slot == num_slots - 1) ? slot - 1 : slot + 1)); + } + else { + next_slot = current_slot; + } + + /* If the slot to be removed is the slot with the last render, + * make another slot the last render slot. */ + if (remove_slot == current_last_slot) { + /* Choose the currently selected slot unless that one is being removed, + * in that case take the next one. */ + RenderSlot *next_last_slot; + if (current_slot == remove_slot) { + next_last_slot = next_slot; + } + else { + next_last_slot = current_slot; + } + + if (!iuser) { + return false; + } + Render *re = RE_GetSceneRender(iuser->scene); + if (!re) { + return false; + } + RE_SwapResult(re, ¤t_last_slot->render); + RE_SwapResult(re, &next_last_slot->render); + current_last_slot = next_last_slot; + } + + current_slot = next_slot; + + BLI_remlink(&ima->renderslots, remove_slot); + + ima->render_slot = BLI_findindex(&ima->renderslots, current_slot); + ima->last_render_slot = BLI_findindex(&ima->renderslots, current_last_slot); + + if (remove_slot->render) { + RE_FreeRenderResult(remove_slot->render); + } + MEM_freeN(remove_slot); + + return true; +} + +bool BKE_image_clear_renderslot(Image *ima, ImageUser *iuser, int slot) +{ + if (slot == ima->last_render_slot) { + if (!iuser) { + return false; + } + if (G.is_rendering) { + return false; + } + Render *re = RE_GetSceneRender(iuser->scene); + if (!re) { + return false; + } + RE_ClearResult(re); + return true; + } + + RenderSlot *render_slot = static_cast(BLI_findlink(&ima->renderslots, slot)); + if (!slot) { + return false; + } + if (render_slot->render) { + RE_FreeRenderResult(render_slot->render); + render_slot->render = nullptr; + } + return true; +} + +RenderSlot *BKE_image_get_renderslot(Image *ima, int index) +{ + /* Can be null for images without render slots. */ + return static_cast(BLI_findlink(&ima->renderslots, index)); +} -- cgit v1.2.3