=Texture Plugins=
[blender.git] / release / plugins / texture / tiles.c
1  /**
2  * $Id$
3  *
4  * ***** BEGIN GPL/BL DUAL 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. The Blender
10  * Foundation also sells licenses for use in proprietary software under
11  * the Blender License.  See http://www.blender.org/BL/ for information
12  * about this.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software Foundation,
21  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
22  *
23  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
24  * All rights reserved.
25  *
26  * The Original Code is: all of this file.
27  *
28  * Contributor(s): none yet.
29  *
30  * ***** END GPL/BL DUAL LICENSE BLOCK *****
31  */
32
33 #include "math.h"
34 #include "plugin.h"
35
36 /* ******************** GLOBAL VARIABLES ***************** */
37
38 char name[]= "tiles";
39
40 /* Subtype names must be less than 15 characters */
41
42 #define NR_TYPES        2
43 char stnames[NR_TYPES][16]= {"Square", "Deformed"};
44
45 VarStruct varstr[]= {
46          NUM|FLO,       "size",                 1.0,     0.0, 1.0,  "The size of each tile", 
47          NUM|FLO,       "Noise",                1.0,     0.01, 10.0, ""
48 };
49
50 /* The cast struct is for input in the main doit function
51    Varstr and Cast must have the same variables in the same order */ 
52
53 typedef struct Cast {
54         float size;
55         float noise;
56 } Cast;
57
58 /* result: 
59    Intensity, R, G, B, Alpha, nor.x, nor.y, nor.z
60  */
61
62 float result[8];
63
64 /* cfra: the current frame */
65
66 float cfra;
67
68 int plugin_tex_doit(int, Cast *, float *, float *, float *);
69 void plugin_instance_init(Cast*);
70
71 /* ******************** Fixed functions ***************** */
72
73 int plugin_tex_getversion(void) 
74 {       
75         return B_PLUGIN_VERSION;
76 }
77
78 void plugin_but_changed(int but) 
79 {
80 }
81
82 void plugin_init(void)
83 {
84 }
85
86 /* 
87  * initialize any data for a particular instance of
88  * the plugin here
89  */
90 void plugin_instance_init(Cast *cast)
91 {
92 }
93
94 /* this function should not be changed: */
95
96 void plugin_getinfo(PluginInfo *info)
97 {
98         info->name= name;
99         info->stypes= NR_TYPES;
100         info->nvars= sizeof(varstr)/sizeof(VarStruct);
101         
102         info->snames= stnames[0];
103         info->result= result;
104         info->cfra= &cfra;
105         info->varstr= varstr;
106
107         info->init= plugin_init;
108         info->tex_doit=  (TexDoit) plugin_tex_doit;
109         info->callback= plugin_but_changed;
110         info->instance_init= (void (*)(void *)) plugin_instance_init;
111
112 }
113
114 /* ************************************************************
115         Tiles
116         
117         Demonstration of a simple square wave function sampled
118         with anti-aliasing.
119         It is not mipmapped yet...
120         
121    ************************************************************ */
122
123
124 /* square wave, antialiased, no mipmap! */
125
126 float sample_wave(float freq, float coord, float pixsize)
127 {
128         float fac, frac,  retval;
129         int part1, part2;
130         
131         if(pixsize > freq) return 0.5;
132         
133         pixsize/= freq;
134         
135         fac= coord/freq;
136         part1= ffloor(fac);
137         frac= fac - part1;
138
139         if(part1 & 1) retval= 0.0;
140         else retval= 1.0;
141         
142         if(pixsize != 0.0) {
143                 
144                 /* is coord+pixsize another value? */
145                 
146                 part2= ffloor(fac + pixsize);
147                 if(part1==part2) return retval;
148                 
149                 /* antialias */ 
150                 if(retval==1.0) retval= (1.0-frac)/pixsize;
151                 else retval= 1.0-(1.0-frac)/pixsize;
152         }
153         return retval;
154 }
155
156 int plugin_tex_doit(int stype, Cast *cast, float *texvec, float *dxt, float *dyt)
157 {
158         float xwave, ywave;
159         
160         if(stype==1) {
161                 texvec[0]+= hnoise(cast->noise, texvec[0], texvec[1], texvec[2]);
162                 texvec[1]+= hnoise(cast->noise, texvec[1], texvec[2], texvec[0]);
163         }
164         
165         if(dxt && dyt) {
166                 xwave= sample_wave(cast->size, texvec[0], fabs(dxt[0]) + fabs(dyt[0]) );
167                 ywave= sample_wave(cast->size, texvec[1], fabs(dxt[1]) + fabs(dyt[1]) );
168
169                 if(xwave > ywave) result[0]= xwave-ywave;
170                 else result[0]= ywave-xwave;
171         } 
172         else {
173                 xwave= sample_wave(cast->size, texvec[0], 0.0 );
174                 ywave= sample_wave(cast->size, texvec[1], 0.0 );
175                 
176                 if(xwave > ywave) result[0]= xwave-ywave;
177                 else result[0]= ywave-xwave;
178         }
179
180         return TEX_INT;
181 }