c28fef9e472352b26fe5fef28ff3efae62f31d05
[blender.git] / source / blender / nodes / shader / nodes / node_shader_tex_distnoise.c
1 /**
2  * $Id: node_shader_output.c 32517 2010-10-16 14:32:17Z campbellbarton $
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) 2005 Blender Foundation.
21  * All rights reserved.
22  *
23  * The Original Code is: all of this file.
24  *
25  * Contributor(s): none yet.
26  *
27  * ***** END GPL LICENSE BLOCK *****
28  */
29
30 #include "../node_shader_util.h"
31 #include "node_shader_noise.h"
32
33 static float distorted_noise(float vec[3], float size, int basis, int distortion_basis, float distortion)
34 {
35         float p[3], r[3], p_offset[3], p_noffset[3];
36         float offset[3] = {13.5f, 13.5f, 13.5f};
37
38         mul_v3_v3fl(p, vec, 1.0f/size);
39         add_v3_v3v3(p_offset, p, offset);
40         sub_v3_v3v3(p_noffset, p, offset);
41
42         r[0] = noise_basis(p_offset, basis) * distortion;
43         r[1] = noise_basis(p, basis) * distortion;
44         r[2] = noise_basis(p_noffset, basis) * distortion;
45
46         add_v3_v3(p, r);
47
48         return noise_basis(p, distortion_basis); /* distorted-domain noise */
49 }
50
51 /* **************** OUTPUT ******************** */
52
53 static bNodeSocketTemplate sh_node_tex_distnoise_in[]= {
54         {       SOCK_VECTOR, 1, "Vector",               0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 1.0f, PROP_NONE, SOCK_HIDE_VALUE},
55         {       SOCK_FLOAT, 1, "Size",                  1.0f, 0.0f, 0.0f, 0.0f, 0.0f, 1000.0f},
56         {       SOCK_FLOAT, 1, "Distortion",    1.0f, 0.0f, 0.0f, 0.0f, 0.0f, 1000.0f},
57         {       -1, 0, ""       }
58 };
59
60 static bNodeSocketTemplate sh_node_tex_distnoise_out[]= {
61         {       SOCK_FLOAT, 0, "Fac",           0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 1.0f},
62         {       -1, 0, ""       }
63 };
64
65 static void node_shader_init_tex_distorted_noise(bNodeTree *UNUSED(ntree), bNode* node, bNodeTemplate *UNUSED(ntemp))
66 {
67         NodeTexDistortedNoise *tex = MEM_callocN(sizeof(NodeTexDistortedNoise), "NodeTexDistortedNoise");
68         tex->basis = SHD_NOISE_PERLIN;
69         tex->distortion_basis = SHD_NOISE_PERLIN;
70
71         node->storage = tex;
72 }
73
74 static void node_shader_exec_tex_distnoise(void *data, bNode *node, bNodeStack **in, bNodeStack **out)
75 {
76         ShaderCallData *scd= (ShaderCallData*)data;
77         NodeTexDistortedNoise *tex= (NodeTexDistortedNoise*)node->storage;
78         bNodeSocket *vecsock = node->inputs.first;
79         float vec[3], size, distortion;
80         
81         if(vecsock->link)
82                 nodestack_get_vec(vec, SOCK_VECTOR, in[0]);
83         else
84                 copy_v3_v3(vec, scd->co);
85
86         nodestack_get_vec(&size, SOCK_FLOAT, in[1]);
87         nodestack_get_vec(&distortion, SOCK_FLOAT, in[2]);
88
89         out[0]->vec[0]= distorted_noise(vec, size, tex->basis, tex->distortion_basis, distortion);
90 }
91
92 static int node_shader_gpu_tex_distnoise(GPUMaterial *mat, bNode *UNUSED(node), GPUNodeStack *in, GPUNodeStack *out)
93 {
94         if(!in[0].link)
95                 in[0].link = GPU_attribute(CD_ORCO, "");
96
97         return GPU_stack_link(mat, "node_tex_distnoise", in, out);
98 }
99
100 /* node type definition */
101 void register_node_type_sh_tex_distnoise(ListBase *lb)
102 {
103         static bNodeType ntype;
104
105         node_type_base(&ntype, SH_NODE_TEX_DISTNOISE, "Distorted Noise Texture", NODE_CLASS_TEXTURE, 0);
106         node_type_compatibility(&ntype, NODE_NEW_SHADING);
107         node_type_socket_templates(&ntype, sh_node_tex_distnoise_in, sh_node_tex_distnoise_out);
108         node_type_size(&ntype, 150, 60, 200);
109         node_type_init(&ntype, node_shader_init_tex_distorted_noise);
110         node_type_storage(&ntype, "NodeTexDistortedNoise", node_free_standard_storage, node_copy_standard_storage);
111         node_type_exec(&ntype, node_shader_exec_tex_distnoise);
112         node_type_gpu(&ntype, node_shader_gpu_tex_distnoise);
113
114         nodeRegisterType(lb, &ntype);
115 };
116