Finished the node type definition cleanup started in r34682. All static node types...
[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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, 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 /* this function implements ASC-CDL according to the spec at http://www.asctech.org/
47  Slope
48        S = in * slope
49  Offset
50        O = S + offset 
51          = (in * slope) + offset
52  Power
53      out = Clamp(O) ^ power
54          = Clamp((in * slope) + offset) ^ power
55  */
56 DO_INLINE float colorbalance_cdl(float in, float offset, float power, float slope)
57 {
58         float x = in * slope + offset;
59         
60         /* prevent NaN */
61         CLAMP(x, 0.0, 1.0);
62         
63         return powf(x, power);
64 }
65
66 /* note: lift_lgg is just 2-lift, gamma_inv is 1.0/gamma */
67 DO_INLINE float colorbalance_lgg(float in, float lift_lgg, float gamma_inv, float gain)
68 {
69         /* 1:1 match with the sequencer with linear/srgb conversions, the conversion isnt pretty
70          * but best keep it this way, sice testing for durian shows a similar calculation
71          * without lin/srgb conversions gives bad results (over-saturated shadows) with colors
72          * slightly below 1.0. some correction can be done but it ends up looking bad for shadows or lighter tones - campbell */
73         float x= (((linearrgb_to_srgb(in) - 1.0f) * lift_lgg) + 1.0f) * gain;
74
75         /* prevent NaN */
76         if (x < 0.f) x = 0.f;
77
78         return powf(srgb_to_linearrgb(x), gamma_inv);
79 }
80
81 static void do_colorbalance_cdl(bNode *node, float* out, float *in)
82 {
83         NodeColorBalance *n= (NodeColorBalance *)node->storage;
84         
85         out[0] = colorbalance_cdl(in[0], n->lift[0], n->gamma[0], n->gain[0]);
86         out[1] = colorbalance_cdl(in[1], n->lift[1], n->gamma[1], n->gain[1]);
87         out[2] = colorbalance_cdl(in[2], n->lift[2], n->gamma[2], n->gain[2]);
88         out[3] = in[3];
89 }
90
91 static void do_colorbalance_cdl_fac(bNode *node, float* out, float *in, float *fac)
92 {
93         NodeColorBalance *n= (NodeColorBalance *)node->storage;
94         const float mfac= 1.0f - *fac;
95         
96         out[0] = mfac*in[0] + *fac * colorbalance_cdl(in[0], n->lift[0], n->gamma[0], n->gain[0]);
97         out[1] = mfac*in[1] + *fac * colorbalance_cdl(in[1], n->lift[1], n->gamma[1], n->gain[1]);
98         out[2] = mfac*in[2] + *fac * colorbalance_cdl(in[2], n->lift[2], n->gamma[2], n->gain[2]);
99         out[3] = in[3];
100 }
101
102 static void do_colorbalance_lgg(bNode *node, float* out, float *in)
103 {
104         NodeColorBalance *n= (NodeColorBalance *)node->storage;
105
106         out[0] = colorbalance_lgg(in[0], n->lift_lgg[0], n->gamma_inv[0], n->gain[0]);
107         out[1] = colorbalance_lgg(in[1], n->lift_lgg[1], n->gamma_inv[1], n->gain[1]);
108         out[2] = colorbalance_lgg(in[2], n->lift_lgg[2], n->gamma_inv[2], n->gain[2]);
109         out[3] = in[3];
110 }
111
112 static void do_colorbalance_lgg_fac(bNode *node, float* out, float *in, float *fac)
113 {
114         NodeColorBalance *n= (NodeColorBalance *)node->storage;
115         const float mfac= 1.0f - *fac;
116
117         out[0] = mfac*in[0] + *fac * colorbalance_lgg(in[0], n->lift_lgg[0], n->gamma_inv[0], n->gain[0]);
118         out[1] = mfac*in[1] + *fac * colorbalance_lgg(in[1], n->lift_lgg[1], n->gamma_inv[1], n->gain[1]);
119         out[2] = mfac*in[2] + *fac * colorbalance_lgg(in[2], n->lift_lgg[2], n->gamma_inv[2], n->gain[2]);
120         out[3] = in[3];
121 }
122
123 static void node_composit_exec_colorbalance(void *UNUSED(data), bNode *node, bNodeStack **in, bNodeStack **out)
124 {
125         CompBuf *cbuf= in[1]->data;
126         CompBuf *stackbuf;
127         
128         /* stack order input:  fac, image */
129         /* stack order output: image */
130         if(out[0]->hasoutput==0) return;
131         
132         if(in[0]->vec[0] == 0.f && in[0]->data == NULL) {
133                 out[0]->data = pass_on_compbuf(cbuf);
134                 return;
135         }
136
137         {
138                 NodeColorBalance *n= (NodeColorBalance *)node->storage;
139                 int c;
140
141                 for (c = 0; c < 3; c++) {
142                         n->lift_lgg[c] = 2.0f - n->lift[c];
143                         n->gamma_inv[c] = (n->gamma[c] != 0.0f) ? 1.0f/n->gamma[c] : 1000000.0f;
144                 }
145         }
146
147         if (cbuf) {
148                 stackbuf= alloc_compbuf(cbuf->x, cbuf->y, CB_RGBA, 1); /* create output based on image input */
149                         
150                 if (node->custom1 == 0) {
151                         /* lift gamma gain */
152                         if ((in[0]->data==NULL) && (in[0]->vec[0] >= 1.f)) {
153                                 composit1_pixel_processor(node, stackbuf, in[1]->data, in[1]->vec, do_colorbalance_lgg, CB_RGBA);
154                         }
155                         else {
156                                 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);
157                         }
158                 } else {
159                         /* offset/power/slope : ASC-CDL */
160                         if ((in[0]->data==NULL) && (in[0]->vec[0] >= 1.f)) {
161                                 composit1_pixel_processor(node, stackbuf, in[1]->data, in[1]->vec, do_colorbalance_cdl, CB_RGBA);
162                         }
163                         else {
164                                 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);
165                         }
166                         
167                 }
168
169                 out[0]->data=stackbuf;
170         }
171 }
172
173 static void node_composit_init_colorbalance(bNode *node)
174 {
175         NodeColorBalance *n= node->storage= MEM_callocN(sizeof(NodeColorBalance), "node colorbalance");
176
177         n->lift[0] = n->lift[1] = n->lift[2] = 1.0f;
178         n->gamma[0] = n->gamma[1] = n->gamma[2] = 1.0f;
179         n->gain[0] = n->gain[1] = n->gain[2] = 1.0f;
180 }
181
182 void register_node_type_cmp_colorbalance(ListBase *lb)
183 {
184         static bNodeType ntype;
185
186         node_type_base(&ntype, CMP_NODE_COLORBALANCE, "Color Balance", NODE_CLASS_OP_COLOR, NODE_OPTIONS,
187                 cmp_node_colorbalance_in, cmp_node_colorbalance_out);
188         node_type_size(&ntype, 400, 200, 400);
189         node_type_init(&ntype, node_composit_init_colorbalance);
190         node_type_storage(&ntype, "NodeColorBalance", node_free_standard_storage, node_copy_standard_storage);
191         node_type_exec(&ntype, node_composit_exec_colorbalance);
192
193         nodeRegisterType(lb, &ntype);
194 }
195
196