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