Fixes to Color Balance node:
[blender.git] / source / blender / nodes / intern / CMP_nodes / CMP_colorbalance.c
1 /**
2  * 
3  *
4  * ***** BEGIN GPL LICENSE BLOCK *****
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version 2
9  * of the License, or (at your option) any later version. 
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software Foundation,
18  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
19  *
20  * The Original Code is Copyright (C) 2006 Blender Foundation.
21  * All rights reserved.
22  *
23  * The Original Code is: all of this file.
24  *
25  * Contributor(s): Matt Ebb.
26  *
27  * ***** END GPL LICENSE BLOCK *****
28  */
29
30
31 #include "../CMP_util.h"
32
33
34 /* ******************* Color Balance ********************************* */
35 static bNodeSocketType cmp_node_colorbalance_in[]={
36         {SOCK_VALUE, 1, "Fac",  1.0f, 0.0f, 0.0f, 1.0f, 0.0f, 1.0f},
37         {SOCK_RGBA,1,"Image", 0.8f, 0.8f, 0.8f, 1.0f, 0.0f, 1.0f},
38         {-1,0,""}
39 };
40
41 static bNodeSocketType cmp_node_colorbalance_out[]={
42         {SOCK_RGBA,0,"Image", 0.0f, 0.0f, 1.0f, 1.0f, -1.0f, 1.0f},
43         {-1,0,""}
44 };
45
46 DO_INLINE float colorbalance_cdl(float in, float offset, float power, float slope)
47 {
48         float x = in * slope + offset;
49         
50         /* prevent NaN */
51         if (x < 0.f) x = 0.f;
52         
53         //powf(in * slope + offset, power)
54         return powf(x, 1.f/power);
55 }
56
57 DO_INLINE float colorbalance_lgg(float in, float lift, float gamma, float gain)
58 {
59         float x = gain*(in+lift*(1-in));
60         
61         /* prevent NaN */
62         if (x < 0.f) x = 0.f;
63         
64         return powf(x, (1.f/gamma));
65 }
66
67 static void do_colorbalance_cdl(bNode *node, float* out, float *in)
68 {
69         NodeColorBalance *n= (NodeColorBalance *)node->storage;
70         
71         out[0] = colorbalance_cdl(in[0], n->lift[0], n->gamma[0], n->gain[0]);
72         out[1] = colorbalance_cdl(in[1], n->lift[1], n->gamma[1], n->gain[1]);
73         out[2] = colorbalance_cdl(in[2], n->lift[2], n->gamma[2], n->gain[2]);
74         out[3] = in[3];
75 }
76
77 static void do_colorbalance_cdl_fac(bNode *node, float* out, float *in, float *fac)
78 {
79         NodeColorBalance *n= (NodeColorBalance *)node->storage;
80         const float mfac= 1.0f - *fac;
81         
82         out[0] = mfac*in[0] + *fac * colorbalance_cdl(in[0], n->lift[0], n->gamma[0], n->gain[0]);
83         out[1] = mfac*in[1] + *fac * colorbalance_cdl(in[1], n->lift[1], n->gamma[1], n->gain[1]);
84         out[2] = mfac*in[2] + *fac * colorbalance_cdl(in[2], n->lift[2], n->gamma[2], n->gain[2]);
85         out[3] = in[3];
86 }
87
88 static void do_colorbalance_lgg(bNode *node, float* out, float *in)
89 {
90         NodeColorBalance *n= (NodeColorBalance *)node->storage;
91         
92         out[0] = colorbalance_lgg(in[0], n->lift[0], n->gamma[0], n->gain[0]);
93         out[1] = colorbalance_lgg(in[1], n->lift[1], n->gamma[1], n->gain[1]);
94         out[2] = colorbalance_lgg(in[2], n->lift[2], n->gamma[2], n->gain[2]);
95         out[3] = in[3];
96 }
97
98 static void do_colorbalance_lgg_fac(bNode *node, float* out, float *in, float *fac)
99 {
100         NodeColorBalance *n= (NodeColorBalance *)node->storage;
101         const float mfac= 1.0f - *fac;
102         
103         out[0] = mfac*in[0] + *fac * colorbalance_lgg(in[0], n->lift[0], n->gamma[0], n->gain[0]);
104         out[1] = mfac*in[1] + *fac * colorbalance_lgg(in[1], n->lift[1], n->gamma[1], n->gain[1]);
105         out[2] = mfac*in[2] + *fac * colorbalance_lgg(in[2], n->lift[2], n->gamma[2], n->gain[2]);
106         out[3] = in[3];
107 }
108
109 static void node_composit_exec_colorbalance(void *data, bNode *node, bNodeStack **in, bNodeStack **out)
110 {
111         CompBuf *cbuf= in[1]->data;
112         CompBuf *stackbuf;
113         
114         /* stack order input:  fac, image */
115         /* stack order output: image */
116         if(out[0]->hasoutput==0) return;
117         
118         if(in[0]->vec[0] == 0.f && in[0]->data == NULL) {
119                 out[0]->data = pass_on_compbuf(cbuf);
120                 return;
121         }
122         
123         if (cbuf) {
124                 stackbuf= alloc_compbuf(cbuf->x, cbuf->y, CB_RGBA, 1); /* create output based on image input */
125                         
126                 if (node->custom1 == 0) {
127                         /* lift gamma gain */
128                         if ((in[0]->data==NULL) && (in[0]->vec[0] >= 1.f)) {
129                                 composit1_pixel_processor(node, stackbuf, in[1]->data, in[1]->vec, do_colorbalance_lgg, CB_RGBA);
130                         }
131                         else {
132                                 composit2_pixel_processor(node, stackbuf, in[1]->data, in[1]->vec, in[0]->data, in[0]->vec, do_colorbalance_lgg_fac, CB_RGBA, CB_VAL);
133                         }
134                 } else {
135                         /* offset/power/slope : ASC-CDL */
136                         if ((in[0]->data==NULL) && (in[0]->vec[0] >= 1.f)) {
137                                 composit1_pixel_processor(node, stackbuf, in[1]->data, in[1]->vec, do_colorbalance_cdl, CB_RGBA);
138                         }
139                         else {
140                                 composit2_pixel_processor(node, stackbuf, in[1]->data, in[1]->vec, in[0]->data, in[0]->vec, do_colorbalance_cdl_fac, CB_RGBA, CB_VAL);
141                         }
142                         
143                 }
144
145                 out[0]->data=stackbuf;
146         }
147 }
148
149 static void node_composit_init_colorbalance(bNode *node)
150 {
151         NodeColorBalance *n= node->storage= MEM_callocN(sizeof(NodeColorBalance), "node colorbalance");
152
153         n->lift[0] = n->lift[1] = n->lift[2] = 0.0f;
154         n->gamma[0] = n->gamma[1] = n->gamma[2] = 1.0f;
155         n->gain[0] = n->gain[1] = n->gain[2] = 1.0f;
156 }
157
158 bNodeType cmp_node_colorbalance={
159         /* *next,*prev */       NULL, NULL,
160         /* type code   */       CMP_NODE_COLORBALANCE,
161         /* name        */       "Color Balance",
162         /* width+range */       400, 200, 400,
163         /* class+opts  */       NODE_CLASS_OP_COLOR, NODE_OPTIONS,
164         /* input sock  */       cmp_node_colorbalance_in,
165         /* output sock */       cmp_node_colorbalance_out,
166         /* storage     */       "NodeColorBalance",
167         /* execfunc    */       node_composit_exec_colorbalance,
168         /* butfunc     */       NULL,
169         /* initfunc    */       node_composit_init_colorbalance,
170         /* freestoragefunc    */        node_free_standard_storage,
171         /* copystoragefunc    */        node_copy_standard_storage,
172         /* id          */       NULL
173 };
174