ClangFormat: apply to source, most of intern
[blender.git] / source / blender / blenkernel / intern / texture.c
1 /*
2  * This program is free software; you can redistribute it and/or
3  * modify it under the terms of the GNU General Public License
4  * as published by the Free Software Foundation; either version 2
5  * of the License, or (at your option) any later version.
6  *
7  * This program is distributed in the hope that it will be useful,
8  * but WITHOUT ANY WARRANTY; without even the implied warranty of
9  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
10  * GNU General Public License for more details.
11  *
12  * You should have received a copy of the GNU General Public License
13  * along with this program; if not, write to the Free Software Foundation,
14  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
15  *
16  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
17  * All rights reserved.
18  */
19
20 /** \file
21  * \ingroup bke
22  */
23
24 #include <stdio.h>
25 #include <stdlib.h>
26 #include <string.h>
27 #include <math.h>
28
29 #include "MEM_guardedalloc.h"
30
31 #include "BLI_math.h"
32 #include "BLI_kdopbvh.h"
33 #include "BLI_utildefines.h"
34 #include "BLI_math_color.h"
35
36 #include "DNA_key_types.h"
37 #include "DNA_object_types.h"
38 #include "DNA_material_types.h"
39 #include "DNA_brush_types.h"
40 #include "DNA_node_types.h"
41 #include "DNA_color_types.h"
42 #include "DNA_particle_types.h"
43 #include "DNA_linestyle_types.h"
44
45 #include "IMB_imbuf.h"
46
47 #include "BKE_main.h"
48
49 #include "BKE_colorband.h"
50 #include "BKE_library.h"
51 #include "BKE_image.h"
52 #include "BKE_material.h"
53 #include "BKE_texture.h"
54 #include "BKE_key.h"
55 #include "BKE_icons.h"
56 #include "BKE_node.h"
57 #include "BKE_animsys.h"
58 #include "BKE_colortools.h"
59 #include "BKE_scene.h"
60
61 #include "RE_shader_ext.h"
62
63 /* ****************** Mapping ******************* */
64
65 TexMapping *BKE_texture_mapping_add(int type)
66 {
67   TexMapping *texmap = MEM_callocN(sizeof(TexMapping), "TexMapping");
68
69   BKE_texture_mapping_default(texmap, type);
70
71   return texmap;
72 }
73
74 void BKE_texture_mapping_default(TexMapping *texmap, int type)
75 {
76   memset(texmap, 0, sizeof(TexMapping));
77
78   texmap->size[0] = texmap->size[1] = texmap->size[2] = 1.0f;
79   texmap->max[0] = texmap->max[1] = texmap->max[2] = 1.0f;
80   unit_m4(texmap->mat);
81
82   texmap->projx = PROJ_X;
83   texmap->projy = PROJ_Y;
84   texmap->projz = PROJ_Z;
85   texmap->mapping = MTEX_FLAT;
86   texmap->type = type;
87 }
88
89 void BKE_texture_mapping_init(TexMapping *texmap)
90 {
91   float smat[4][4], rmat[4][4], tmat[4][4], proj[4][4], size[3];
92
93   if (texmap->projx == PROJ_X && texmap->projy == PROJ_Y && texmap->projz == PROJ_Z &&
94       is_zero_v3(texmap->loc) && is_zero_v3(texmap->rot) && is_one_v3(texmap->size)) {
95     unit_m4(texmap->mat);
96
97     texmap->flag |= TEXMAP_UNIT_MATRIX;
98   }
99   else {
100     /* axis projection */
101     zero_m4(proj);
102     proj[3][3] = 1.0f;
103
104     if (texmap->projx != PROJ_N)
105       proj[texmap->projx - 1][0] = 1.0f;
106     if (texmap->projy != PROJ_N)
107       proj[texmap->projy - 1][1] = 1.0f;
108     if (texmap->projz != PROJ_N)
109       proj[texmap->projz - 1][2] = 1.0f;
110
111     /* scale */
112     copy_v3_v3(size, texmap->size);
113
114     if (ELEM(texmap->type, TEXMAP_TYPE_TEXTURE, TEXMAP_TYPE_NORMAL)) {
115       /* keep matrix invertible */
116       if (fabsf(size[0]) < 1e-5f)
117         size[0] = signf(size[0]) * 1e-5f;
118       if (fabsf(size[1]) < 1e-5f)
119         size[1] = signf(size[1]) * 1e-5f;
120       if (fabsf(size[2]) < 1e-5f)
121         size[2] = signf(size[2]) * 1e-5f;
122     }
123
124     size_to_mat4(smat, texmap->size);
125
126     /* rotation */
127     eul_to_mat4(rmat, texmap->rot);
128
129     /* translation */
130     unit_m4(tmat);
131     copy_v3_v3(tmat[3], texmap->loc);
132
133     if (texmap->type == TEXMAP_TYPE_TEXTURE) {
134       /* to transform a texture, the inverse transform needs
135        * to be applied to the texture coordinate */
136       mul_m4_series(texmap->mat, tmat, rmat, smat);
137       invert_m4(texmap->mat);
138     }
139     else if (texmap->type == TEXMAP_TYPE_POINT) {
140       /* forward transform */
141       mul_m4_series(texmap->mat, tmat, rmat, smat);
142     }
143     else if (texmap->type == TEXMAP_TYPE_VECTOR) {
144       /* no translation for vectors */
145       mul_m4_m4m4(texmap->mat, rmat, smat);
146     }
147     else if (texmap->type == TEXMAP_TYPE_NORMAL) {
148       /* no translation for normals, and inverse transpose */
149       mul_m4_m4m4(texmap->mat, rmat, smat);
150       invert_m4(texmap->mat);
151       transpose_m4(texmap->mat);
152     }
153
154     /* projection last */
155     mul_m4_m4m4(texmap->mat, texmap->mat, proj);
156
157     texmap->flag &= ~TEXMAP_UNIT_MATRIX;
158   }
159 }
160
161 ColorMapping *BKE_texture_colormapping_add(void)
162 {
163   ColorMapping *colormap = MEM_callocN(sizeof(ColorMapping), "ColorMapping");
164
165   BKE_texture_colormapping_default(colormap);
166
167   return colormap;
168 }
169
170 void BKE_texture_colormapping_default(ColorMapping *colormap)
171 {
172   memset(colormap, 0, sizeof(ColorMapping));
173
174   BKE_colorband_init(&colormap->coba, true);
175
176   colormap->bright = 1.0;
177   colormap->contrast = 1.0;
178   colormap->saturation = 1.0;
179
180   colormap->blend_color[0] = 0.8f;
181   colormap->blend_color[1] = 0.8f;
182   colormap->blend_color[2] = 0.8f;
183   colormap->blend_type = MA_RAMP_BLEND;
184   colormap->blend_factor = 0.0f;
185 }
186
187 /* ******************* TEX ************************ */
188
189 /** Free (or release) any data used by this texture (does not free the texure itself). */
190 void BKE_texture_free(Tex *tex)
191 {
192   BKE_animdata_free((ID *)tex, false);
193
194   /* is no lib link block, but texture extension */
195   if (tex->nodetree) {
196     ntreeFreeNestedTree(tex->nodetree);
197     MEM_freeN(tex->nodetree);
198     tex->nodetree = NULL;
199   }
200
201   MEM_SAFE_FREE(tex->coba);
202
203   BKE_icon_id_delete((ID *)tex);
204   BKE_previewimg_free(&tex->preview);
205 }
206
207 /* ------------------------------------------------------------------------- */
208
209 void BKE_texture_default(Tex *tex)
210 {
211   /* BLI_assert(MEMCMP_STRUCT_AFTER_IS_ZERO(tex, id)); */ /* Not here, can be called with some pointers set. :/ */
212
213   tex->type = TEX_IMAGE;
214   tex->ima = NULL;
215   tex->stype = 0;
216   tex->flag = TEX_CHECKER_ODD;
217   tex->imaflag = TEX_INTERPOL | TEX_MIPMAP | TEX_USEALPHA;
218   tex->extend = TEX_REPEAT;
219   tex->cropxmin = tex->cropymin = 0.0;
220   tex->cropxmax = tex->cropymax = 1.0;
221   tex->texfilter = TXF_EWA;
222   tex->afmax = 8;
223   tex->xrepeat = tex->yrepeat = 1;
224   tex->sfra = 1;
225   tex->frames = 0;
226   tex->offset = 0;
227   tex->noisesize = 0.25;
228   tex->noisedepth = 2;
229   tex->turbul = 5.0;
230   tex->nabla = 0.025;  // also in do_versions
231   tex->bright = 1.0;
232   tex->contrast = 1.0;
233   tex->saturation = 1.0;
234   tex->filtersize = 1.0;
235   tex->rfac = 1.0;
236   tex->gfac = 1.0;
237   tex->bfac = 1.0;
238   /* newnoise: init. */
239   tex->noisebasis = 0;
240   tex->noisebasis2 = 0;
241   /* musgrave */
242   tex->mg_H = 1.0;
243   tex->mg_lacunarity = 2.0;
244   tex->mg_octaves = 2.0;
245   tex->mg_offset = 1.0;
246   tex->mg_gain = 1.0;
247   tex->ns_outscale = 1.0;
248   /* distnoise */
249   tex->dist_amount = 1.0;
250   /* voronoi */
251   tex->vn_w1 = 1.0;
252   tex->vn_w2 = tex->vn_w3 = tex->vn_w4 = 0.0;
253   tex->vn_mexp = 2.5;
254   tex->vn_distm = 0;
255   tex->vn_coltype = 0;
256
257   tex->iuser.ok = 1;
258   tex->iuser.frames = 100;
259   tex->iuser.sfra = 1;
260
261   tex->preview = NULL;
262 }
263
264 void BKE_texture_type_set(Tex *tex, int type)
265 {
266   tex->type = type;
267 }
268
269 /* ------------------------------------------------------------------------- */
270
271 Tex *BKE_texture_add(Main *bmain, const char *name)
272 {
273   Tex *tex;
274
275   tex = BKE_libblock_alloc(bmain, ID_TE, name, 0);
276
277   BKE_texture_default(tex);
278
279   return tex;
280 }
281
282 /* ------------------------------------------------------------------------- */
283
284 void BKE_texture_mtex_default(MTex *mtex)
285 {
286   mtex->texco = TEXCO_UV;
287   mtex->mapto = MAP_COL;
288   mtex->object = NULL;
289   mtex->projx = PROJ_X;
290   mtex->projy = PROJ_Y;
291   mtex->projz = PROJ_Z;
292   mtex->mapping = MTEX_FLAT;
293   mtex->ofs[0] = 0.0;
294   mtex->ofs[1] = 0.0;
295   mtex->ofs[2] = 0.0;
296   mtex->size[0] = 1.0;
297   mtex->size[1] = 1.0;
298   mtex->size[2] = 1.0;
299   mtex->tex = NULL;
300   mtex->colormodel = 0;
301   mtex->r = 1.0;
302   mtex->g = 0.0;
303   mtex->b = 1.0;
304   mtex->k = 1.0;
305   mtex->def_var = 1.0;
306   mtex->blendtype = MTEX_BLEND;
307   mtex->colfac = 1.0;
308   mtex->norfac = 1.0;
309   mtex->varfac = 1.0;
310   mtex->dispfac = 0.2;
311   mtex->colspecfac = 1.0f;
312   mtex->mirrfac = 1.0f;
313   mtex->alphafac = 1.0f;
314   mtex->difffac = 1.0f;
315   mtex->specfac = 1.0f;
316   mtex->emitfac = 1.0f;
317   mtex->hardfac = 1.0f;
318   mtex->raymirrfac = 1.0f;
319   mtex->translfac = 1.0f;
320   mtex->ambfac = 1.0f;
321   mtex->colemitfac = 1.0f;
322   mtex->colreflfac = 1.0f;
323   mtex->coltransfac = 1.0f;
324   mtex->densfac = 1.0f;
325   mtex->scatterfac = 1.0f;
326   mtex->reflfac = 1.0f;
327   mtex->shadowfac = 1.0f;
328   mtex->zenupfac = 1.0f;
329   mtex->zendownfac = 1.0f;
330   mtex->blendfac = 1.0f;
331   mtex->timefac = 1.0f;
332   mtex->lengthfac = 1.0f;
333   mtex->clumpfac = 1.0f;
334   mtex->kinkfac = 1.0f;
335   mtex->kinkampfac = 1.0f;
336   mtex->roughfac = 1.0f;
337   mtex->twistfac = 1.0f;
338   mtex->padensfac = 1.0f;
339   mtex->lifefac = 1.0f;
340   mtex->sizefac = 1.0f;
341   mtex->ivelfac = 1.0f;
342   mtex->dampfac = 1.0f;
343   mtex->gravityfac = 1.0f;
344   mtex->fieldfac = 1.0f;
345   mtex->normapspace = MTEX_NSPACE_TANGENT;
346   mtex->brush_map_mode = MTEX_MAP_MODE_TILED;
347   mtex->random_angle = 2.0f * (float)M_PI;
348   mtex->brush_angle_mode = 0;
349 }
350
351 /* ------------------------------------------------------------------------- */
352
353 MTex *BKE_texture_mtex_add(void)
354 {
355   MTex *mtex;
356
357   mtex = MEM_callocN(sizeof(MTex), "BKE_texture_mtex_add");
358
359   BKE_texture_mtex_default(mtex);
360
361   return mtex;
362 }
363
364 /* slot -1 for first free ID */
365 MTex *BKE_texture_mtex_add_id(ID *id, int slot)
366 {
367   MTex **mtex_ar;
368   short act;
369
370   give_active_mtex(id, &mtex_ar, &act);
371
372   if (mtex_ar == NULL) {
373     return NULL;
374   }
375
376   if (slot == -1) {
377     /* find first free */
378     int i;
379     for (i = 0; i < MAX_MTEX; i++) {
380       if (!mtex_ar[i]) {
381         slot = i;
382         break;
383       }
384     }
385     if (slot == -1) {
386       return NULL;
387     }
388   }
389   else {
390     /* make sure slot is valid */
391     if (slot < 0 || slot >= MAX_MTEX) {
392       return NULL;
393     }
394   }
395
396   if (mtex_ar[slot]) {
397     id_us_min((ID *)mtex_ar[slot]->tex);
398     MEM_freeN(mtex_ar[slot]);
399     mtex_ar[slot] = NULL;
400   }
401
402   mtex_ar[slot] = BKE_texture_mtex_add();
403
404   return mtex_ar[slot];
405 }
406
407 /* ------------------------------------------------------------------------- */
408
409 /**
410  * Only copy internal data of Texture ID from source to already allocated/initialized destination.
411  * You probably never want to use that directly, use BKE_id_copy or BKE_id_copy_ex for typical needs.
412  *
413  * WARNING! This function will not handle ID user count!
414  *
415  * \param flag: Copying options (see BKE_library.h's LIB_ID_COPY_... flags for more).
416  */
417 void BKE_texture_copy_data(Main *bmain, Tex *tex_dst, const Tex *tex_src, const int flag)
418 {
419   if (!BKE_texture_is_image_user(tex_src)) {
420     tex_dst->ima = NULL;
421   }
422
423   if (tex_dst->coba) {
424     tex_dst->coba = MEM_dupallocN(tex_dst->coba);
425   }
426   if (tex_src->nodetree) {
427     if (tex_src->nodetree->execdata) {
428       ntreeTexEndExecTree(tex_src->nodetree->execdata);
429     }
430     /* Note: nodetree is *not* in bmain, however this specific case is handled at lower level
431      *       (see BKE_libblock_copy_ex()). */
432     BKE_id_copy_ex(bmain, (ID *)tex_src->nodetree, (ID **)&tex_dst->nodetree, flag);
433   }
434
435   if ((flag & LIB_ID_COPY_NO_PREVIEW) == 0) {
436     BKE_previewimg_id_copy(&tex_dst->id, &tex_src->id);
437   }
438   else {
439     tex_dst->preview = NULL;
440   }
441 }
442
443 Tex *BKE_texture_copy(Main *bmain, const Tex *tex)
444 {
445   Tex *tex_copy;
446   BKE_id_copy(bmain, &tex->id, (ID **)&tex_copy);
447   return tex_copy;
448 }
449
450 /* texture copy without adding to main dbase */
451 Tex *BKE_texture_localize(Tex *tex)
452 {
453   /* TODO(bastien): Replace with something like:
454    *
455    *   Tex *tex_copy;
456    *   BKE_id_copy_ex(bmain, &tex->id, (ID **)&tex_copy,
457    *                  LIB_ID_COPY_NO_MAIN | LIB_ID_COPY_NO_PREVIEW | LIB_ID_COPY_NO_USER_REFCOUNT,
458    *                  false);
459    *   return tex_copy;
460    *
461    * NOTE: Only possible once nested node trees are fully converted to that too. */
462
463   Tex *texn;
464
465   texn = BKE_libblock_copy_for_localize(&tex->id);
466
467   /* image texture: BKE_texture_free also doesn't decrease */
468
469   if (texn->coba)
470     texn->coba = MEM_dupallocN(texn->coba);
471
472   texn->preview = NULL;
473
474   if (tex->nodetree) {
475     texn->nodetree = ntreeLocalize(tex->nodetree);
476   }
477
478   texn->id.tag |= LIB_TAG_LOCALIZED;
479
480   return texn;
481 }
482
483 /* ------------------------------------------------------------------------- */
484
485 void BKE_texture_make_local(Main *bmain, Tex *tex, const bool lib_local)
486 {
487   BKE_id_make_local_generic(bmain, &tex->id, true, lib_local);
488 }
489
490 Tex *give_current_linestyle_texture(FreestyleLineStyle *linestyle)
491 {
492   MTex *mtex = NULL;
493   Tex *tex = NULL;
494
495   if (linestyle) {
496     mtex = linestyle->mtex[(int)(linestyle->texact)];
497     if (mtex)
498       tex = mtex->tex;
499   }
500
501   return tex;
502 }
503
504 void set_current_linestyle_texture(FreestyleLineStyle *linestyle, Tex *newtex)
505 {
506   int act = linestyle->texact;
507
508   if (linestyle->mtex[act] && linestyle->mtex[act]->tex)
509     id_us_min(&linestyle->mtex[act]->tex->id);
510
511   if (newtex) {
512     if (!linestyle->mtex[act]) {
513       linestyle->mtex[act] = BKE_texture_mtex_add();
514       linestyle->mtex[act]->texco = TEXCO_STROKE;
515     }
516
517     linestyle->mtex[act]->tex = newtex;
518     id_us_plus(&newtex->id);
519   }
520   else if (linestyle->mtex[act]) {
521     MEM_freeN(linestyle->mtex[act]);
522     linestyle->mtex[act] = NULL;
523   }
524 }
525
526 bool give_active_mtex(ID *id, MTex ***mtex_ar, short *act)
527 {
528   switch (GS(id->name)) {
529     case ID_LS:
530       *mtex_ar = ((FreestyleLineStyle *)id)->mtex;
531       if (act)
532         *act = (((FreestyleLineStyle *)id)->texact);
533       break;
534     case ID_PA:
535       *mtex_ar = ((ParticleSettings *)id)->mtex;
536       if (act)
537         *act = (((ParticleSettings *)id)->texact);
538       break;
539     default:
540       *mtex_ar = NULL;
541       if (act)
542         *act = 0;
543       return false;
544   }
545
546   return true;
547 }
548
549 void set_active_mtex(ID *id, short act)
550 {
551   if (act < 0)
552     act = 0;
553   else if (act >= MAX_MTEX)
554     act = MAX_MTEX - 1;
555
556   switch (GS(id->name)) {
557     case ID_LS:
558       ((FreestyleLineStyle *)id)->texact = act;
559       break;
560     case ID_PA:
561       ((ParticleSettings *)id)->texact = act;
562       break;
563     default:
564       break;
565   }
566 }
567
568 Tex *give_current_brush_texture(Brush *br)
569 {
570   return br->mtex.tex;
571 }
572
573 void set_current_brush_texture(Brush *br, Tex *newtex)
574 {
575   if (br->mtex.tex)
576     id_us_min(&br->mtex.tex->id);
577
578   if (newtex) {
579     br->mtex.tex = newtex;
580     id_us_plus(&newtex->id);
581   }
582 }
583
584 Tex *give_current_particle_texture(ParticleSettings *part)
585 {
586   MTex *mtex = NULL;
587   Tex *tex = NULL;
588
589   if (!part)
590     return NULL;
591
592   mtex = part->mtex[(int)(part->texact)];
593   if (mtex)
594     tex = mtex->tex;
595
596   return tex;
597 }
598
599 void set_current_particle_texture(ParticleSettings *part, Tex *newtex)
600 {
601   int act = part->texact;
602
603   if (part->mtex[act] && part->mtex[act]->tex)
604     id_us_min(&part->mtex[act]->tex->id);
605
606   if (newtex) {
607     if (!part->mtex[act]) {
608       part->mtex[act] = BKE_texture_mtex_add();
609       part->mtex[act]->texco = TEXCO_ORCO;
610       part->mtex[act]->blendtype = MTEX_MUL;
611     }
612
613     part->mtex[act]->tex = newtex;
614     id_us_plus(&newtex->id);
615   }
616   else if (part->mtex[act]) {
617     MEM_freeN(part->mtex[act]);
618     part->mtex[act] = NULL;
619   }
620 }
621
622 /* ------------------------------------------------------------------------- */
623
624 void BKE_texture_pointdensity_init_data(PointDensity *pd)
625 {
626   pd->flag = 0;
627   pd->radius = 0.3f;
628   pd->falloff_type = TEX_PD_FALLOFF_STD;
629   pd->falloff_softness = 2.0;
630   pd->source = TEX_PD_PSYS;
631   pd->point_tree = NULL;
632   pd->point_data = NULL;
633   pd->noise_size = 0.5f;
634   pd->noise_depth = 1;
635   pd->noise_fac = 1.0f;
636   pd->noise_influence = TEX_PD_NOISE_STATIC;
637   pd->coba = BKE_colorband_add(true);
638   pd->speed_scale = 1.0f;
639   pd->totpoints = 0;
640   pd->object = NULL;
641   pd->psys = 0;
642   pd->psys_cache_space = TEX_PD_WORLDSPACE;
643   pd->falloff_curve = curvemapping_add(1, 0, 0, 1, 1);
644
645   pd->falloff_curve->preset = CURVE_PRESET_LINE;
646   pd->falloff_curve->cm->flag &= ~CUMA_EXTEND_EXTRAPOLATE;
647   curvemap_reset(pd->falloff_curve->cm,
648                  &pd->falloff_curve->clipr,
649                  pd->falloff_curve->preset,
650                  CURVEMAP_SLOPE_POSITIVE);
651   curvemapping_changed(pd->falloff_curve, false);
652 }
653
654 PointDensity *BKE_texture_pointdensity_add(void)
655 {
656   PointDensity *pd = MEM_callocN(sizeof(PointDensity), "pointdensity");
657   BKE_texture_pointdensity_init_data(pd);
658   return pd;
659 }
660
661 PointDensity *BKE_texture_pointdensity_copy(const PointDensity *pd, const int UNUSED(flag))
662 {
663   PointDensity *pdn;
664
665   pdn = MEM_dupallocN(pd);
666   pdn->point_tree = NULL;
667   pdn->point_data = NULL;
668   if (pdn->coba) {
669     pdn->coba = MEM_dupallocN(pdn->coba);
670   }
671   pdn->falloff_curve = curvemapping_copy(pdn->falloff_curve); /* can be NULL */
672   return pdn;
673 }
674
675 void BKE_texture_pointdensity_free_data(PointDensity *pd)
676 {
677   if (pd->point_tree) {
678     BLI_bvhtree_free(pd->point_tree);
679     pd->point_tree = NULL;
680   }
681   if (pd->point_data) {
682     MEM_freeN(pd->point_data);
683     pd->point_data = NULL;
684   }
685   if (pd->coba) {
686     MEM_freeN(pd->coba);
687     pd->coba = NULL;
688   }
689
690   curvemapping_free(pd->falloff_curve); /* can be NULL */
691 }
692
693 void BKE_texture_pointdensity_free(PointDensity *pd)
694 {
695   BKE_texture_pointdensity_free_data(pd);
696   MEM_freeN(pd);
697 }
698 /* ------------------------------------------------------------------------- */
699
700 /**
701  * \returns true if this texture can use its #Texture.ima (even if its NULL)
702  */
703 bool BKE_texture_is_image_user(const struct Tex *tex)
704 {
705   switch (tex->type) {
706     case TEX_IMAGE: {
707       return true;
708     }
709   }
710
711   return false;
712 }
713
714 /* ------------------------------------------------------------------------- */
715 bool BKE_texture_dependsOnTime(const struct Tex *texture)
716 {
717   if (texture->ima && BKE_image_is_animated(texture->ima)) {
718     return true;
719   }
720   else if (texture->adt) {
721     /* assume anything in adt means the texture is animated */
722     return true;
723   }
724   else if (texture->type == TEX_NOISE) {
725     /* noise always varies with time */
726     return true;
727   }
728   return false;
729 }
730
731 /* ------------------------------------------------------------------------- */
732
733 void BKE_texture_get_value_ex(const Scene *scene,
734                               Tex *texture,
735                               float *tex_co,
736                               TexResult *texres,
737                               struct ImagePool *pool,
738                               bool use_color_management)
739 {
740   int result_type;
741   bool do_color_manage = false;
742
743   if (scene && use_color_management) {
744     do_color_manage = BKE_scene_check_color_management_enabled(scene);
745   }
746
747   /* no node textures for now */
748   result_type = multitex_ext_safe(texture, tex_co, texres, pool, do_color_manage, false);
749
750   /* if the texture gave an RGB value, we assume it didn't give a valid
751    * intensity, since this is in the context of modifiers don't use perceptual color conversion.
752    * if the texture didn't give an RGB value, copy the intensity across
753    */
754   if (result_type & TEX_RGB) {
755     texres->tin = (1.0f / 3.0f) * (texres->tr + texres->tg + texres->tb);
756   }
757   else {
758     copy_v3_fl(&texres->tr, texres->tin);
759   }
760 }
761
762 void BKE_texture_get_value(
763     const Scene *scene, Tex *texture, float *tex_co, TexResult *texres, bool use_color_management)
764 {
765   BKE_texture_get_value_ex(scene, texture, tex_co, texres, NULL, use_color_management);
766 }
767
768 static void texture_nodes_fetch_images_for_pool(Tex *texture,
769                                                 bNodeTree *ntree,
770                                                 struct ImagePool *pool)
771 {
772   for (bNode *node = ntree->nodes.first; node; node = node->next) {
773     if (node->type == SH_NODE_TEX_IMAGE && node->id != NULL) {
774       Image *image = (Image *)node->id;
775       BKE_image_pool_acquire_ibuf(image, &texture->iuser, pool);
776     }
777     else if (node->type == NODE_GROUP && node->id != NULL) {
778       /* TODO(sergey): Do we need to control recursion here? */
779       bNodeTree *nested_tree = (bNodeTree *)node->id;
780       texture_nodes_fetch_images_for_pool(texture, nested_tree, pool);
781     }
782   }
783 }
784
785 /* Make sure all images used by texture are loaded into pool. */
786 void BKE_texture_fetch_images_for_pool(Tex *texture, struct ImagePool *pool)
787 {
788   if (texture->nodetree != NULL) {
789     texture_nodes_fetch_images_for_pool(texture, texture->nodetree, pool);
790   }
791   else {
792     if (texture->type == TEX_IMAGE) {
793       if (texture->ima != NULL) {
794         BKE_image_pool_acquire_ibuf(texture->ima, &texture->iuser, pool);
795       }
796     }
797   }
798 }