replace macros with bli math functions for nodes
[blender.git] / source / blender / nodes / texture / nodes / node_texture_hueSatVal.c
1 /*
2  * ***** BEGIN GPL LICENSE BLOCK *****
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License
6  * as published by the Free Software Foundation; either version 2
7  * of the License, or (at your option) any later version. 
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software Foundation,
16  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17  *
18  * The Original Code is Copyright (C) 2006 Blender Foundation.
19  * All rights reserved.
20  *
21  * The Original Code is: all of this file.
22  *
23  * Contributor(s): Juho Vepsäläinen
24  *
25  * ***** END GPL LICENSE BLOCK *****
26  */
27
28 /** \file blender/nodes/texture/nodes/node_texture_hueSatVal.c
29  *  \ingroup texnodes
30  */
31
32
33 #include "node_texture_util.h"
34 #include "NOD_texture.h"
35
36
37 static bNodeSocketTemplate inputs[]= {
38         { SOCK_FLOAT, 1, "Hue",        0.0f, 0.0f, 0.0f, 0.0f, -0.5f, 0.5f, PROP_NONE },
39         { SOCK_FLOAT, 1, "Saturation", 1.0f, 0.0f, 0.0f, 0.0f,  0.0f, 2.0f, PROP_FACTOR },
40         { SOCK_FLOAT, 1, "Value",      1.0f, 0.0f, 0.0f, 0.0f,  0.0f, 2.0f, PROP_FACTOR },
41         { SOCK_FLOAT, 1, "Factor",     1.0f, 0.0f, 0.0f, 0.0f,  0.0f, 1.0f, PROP_FACTOR },
42         { SOCK_RGBA,  1, "Color",      0.8f, 0.8f, 0.8f, 1.0f },
43         { -1, 0, "" }
44 };
45 static bNodeSocketTemplate outputs[]= {
46         { SOCK_RGBA, 0, "Color" },
47         { -1, 0, "" }
48 };
49
50 static void do_hue_sat_fac(bNode *UNUSED(node), float *out, float hue, float sat, float val, float *in, float fac)
51 {
52         if(fac != 0 && (hue != 0.5f || sat != 1 || val != 1)) {
53                 float col[3], hsv[3], mfac= 1.0f - fac;
54                 
55                 rgb_to_hsv(in[0], in[1], in[2], hsv, hsv+1, hsv+2);
56                 hsv[0]+= (hue - 0.5f);
57                 if(hsv[0]>1.0f) hsv[0]-=1.0f; else if(hsv[0]<0.0f) hsv[0]+= 1.0f;
58                 hsv[1]*= sat;
59                 if(hsv[1]>1.0f) hsv[1]= 1.0f; else if(hsv[1]<0.0f) hsv[1]= 0.0f;
60                 hsv[2]*= val;
61                 if(hsv[2]>1.0f) hsv[2]= 1.0f; else if(hsv[2]<0.0f) hsv[2]= 0.0f;
62                 hsv_to_rgb(hsv[0], hsv[1], hsv[2], col, col+1, col+2);
63                 
64                 out[0]= mfac*in[0] + fac*col[0];
65                 out[1]= mfac*in[1] + fac*col[1];
66                 out[2]= mfac*in[2] + fac*col[2];
67         }
68         else {
69                 copy_v4_v4(out, in);
70         }
71 }
72
73 static void colorfn(float *out, TexParams *p, bNode *node, bNodeStack **in, short thread)
74 {       
75         float hue = tex_input_value(in[0], p, thread);
76         float sat = tex_input_value(in[1], p, thread);
77         float val = tex_input_value(in[2], p, thread);
78         float fac = tex_input_value(in[3], p, thread);
79         
80         float col[4];
81         tex_input_rgba(col, in[4], p, thread);
82         
83         hue += 0.5f; /* [-.5, .5] -> [0, 1] */
84         
85         do_hue_sat_fac(node, out, hue, sat, val, col, fac);
86         
87         out[3] = col[3];
88 }
89
90 static void exec(void *data, bNode *node, bNodeStack **in, bNodeStack **out)
91 {
92         tex_output(node, in, out[0], &colorfn, data);
93 }
94
95 void register_node_type_tex_hue_sat(ListBase *lb)
96 {
97         static bNodeType ntype;
98         
99         node_type_base(&ntype, TEX_NODE_HUE_SAT, "Hue Saturation Value", NODE_CLASS_OP_COLOR, NODE_OPTIONS);
100         node_type_socket_templates(&ntype, inputs, outputs);
101         node_type_size(&ntype, 150, 80, 250);
102         node_type_exec(&ntype, exec);
103         
104         nodeRegisterType(lb, &ntype);
105 }