svn merge -r41575:41602 ^/trunk/blender
[blender.git] / source / blender / editors / space_view3d / drawvolume.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) 2001-2002 by NaN Holding BV.
19  * All rights reserved.
20  *
21  * Contributor(s): Daniel Genrich
22  *
23  * ***** END GPL LICENSE BLOCK *****
24  */
25
26 /** \file blender/editors/space_view3d/drawvolume.c
27  *  \ingroup spview3d
28  */
29
30
31
32 #include <string.h>
33 #include <math.h>
34
35 #include "MEM_guardedalloc.h"
36
37 #include "DNA_scene_types.h"
38 #include "DNA_screen_types.h"
39 #include "DNA_view3d_types.h"
40
41 #include "BLI_utildefines.h"
42 #include "BLI_blenlib.h"
43 #include "BLI_math.h"
44 #include "BLI_editVert.h"
45 #include "BLI_edgehash.h"
46 #include "BLI_rand.h"
47 #include "BLI_utildefines.h"
48
49 #include "BKE_curve.h"
50 #include "BKE_constraint.h" // for the get_constraint_target function
51 #include "BKE_DerivedMesh.h"
52 #include "BKE_deform.h"
53 #include "BKE_displist.h"
54 #include "BKE_effect.h"
55 #include "BKE_font.h"
56 #include "BKE_global.h"
57 #include "BKE_image.h"
58 #include "BKE_key.h"
59 #include "BKE_lattice.h"
60 #include "BKE_mesh.h"
61 #include "BKE_material.h"
62 #include "BKE_mball.h"
63 #include "BKE_modifier.h"
64 #include "BKE_object.h"
65 #include "BKE_paint.h"
66 #include "BKE_particle.h"
67 #include "BKE_property.h"
68 #include "BKE_smoke.h"
69
70 #include "smoke_API.h"
71
72 #include "BIF_gl.h"
73
74 #include "GPU_extensions.h"
75
76 #include "ED_mesh.h"
77
78
79 #include "BLF_api.h"
80
81
82 #include "view3d_intern.h"      // own include
83
84
85 #ifdef _WIN32
86 #include <time.h>
87 #include <stdio.h>
88 #include <conio.h>
89 #include <windows.h>
90
91 static LARGE_INTEGER liFrequency;
92 static LARGE_INTEGER liStartTime;
93 static LARGE_INTEGER liCurrentTime;
94
95 static void tstart ( void )
96 {
97         QueryPerformanceFrequency ( &liFrequency );
98         QueryPerformanceCounter ( &liStartTime );
99 }
100 static void tend ( void )
101 {
102         QueryPerformanceCounter ( &liCurrentTime );
103 }
104 static double tval( void )
105 {
106         return ((double)( (liCurrentTime.QuadPart - liStartTime.QuadPart)* (double)1000.0/(double)liFrequency.QuadPart ));
107 }
108 #else
109 #include <sys/time.h>
110 static struct timeval _tstart, _tend;
111 static struct timezone tz;
112 static void tstart ( void )
113 {
114         gettimeofday ( &_tstart, &tz );
115 }
116 static void tend ( void )
117 {
118         gettimeofday ( &_tend,&tz );
119 }
120   #if 0
121 static double tval()
122 {
123         double t1, t2;
124         t1 = ( double ) _tstart.tv_sec*1000 + ( double ) _tstart.tv_usec/ ( 1000 );
125         t2 = ( double ) _tend.tv_sec*1000 + ( double ) _tend.tv_usec/ ( 1000 );
126         return t2-t1;
127 }
128   #endif
129 #endif
130
131 struct GPUTexture;
132
133 static int intersect_edges(float *points, float a, float b, float c, float d, float edges[12][2][3])
134 {
135         int i;
136         float t;
137         int numpoints = 0;
138         
139         for (i=0; i<12; i++) {
140                 t = -(a*edges[i][0][0] + b*edges[i][0][1] + c*edges[i][0][2] + d)
141                         / (a*edges[i][1][0] + b*edges[i][1][1] + c*edges[i][1][2]);
142                 if ((t>0)&&(t<1)) {
143                         points[numpoints * 3 + 0] = edges[i][0][0] + edges[i][1][0]*t;
144                         points[numpoints * 3 + 1] = edges[i][0][1] + edges[i][1][1]*t;
145                         points[numpoints * 3 + 2] = edges[i][0][2] + edges[i][1][2]*t;
146                         numpoints++;
147                 }
148         }
149         return numpoints;
150 }
151
152 static int convex(float *p0, float *up, float *a, float *b)
153 {
154         // Vec3 va = a-p0, vb = b-p0;
155         float va[3], vb[3], tmp[3];
156         sub_v3_v3v3(va, a, p0);
157         sub_v3_v3v3(vb, b, p0);
158         cross_v3_v3v3(tmp, va, vb);
159         return dot_v3v3(up, tmp) >= 0;
160 }
161
162 // copied from gpu_extension.c
163 static int is_pow2(int n)
164 {
165         return ((n)&(n-1))==0;
166 }
167
168 static int larger_pow2(int n)
169 {
170         if (is_pow2(n))
171                 return n;
172
173         while(!is_pow2(n))
174                 n= n&(n-1);
175
176         return n*2;
177 }
178
179 void draw_volume(ARegion *ar, GPUTexture *tex, float *min, float *max, int res[3], float dx, GPUTexture *tex_shadow)
180 {
181         RegionView3D *rv3d= ar->regiondata;
182
183         float viewnormal[3];
184         int i, j, n, good_index;
185         float d /*, d0 */ /* UNUSED */, dd, ds;
186         float *points = NULL;
187         int numpoints = 0;
188         float cor[3] = {1.,1.,1.};
189         int gl_depth = 0, gl_blend = 0;
190
191         /* draw slices of smoke is adapted from c++ code authored by: Johannes Schmid and Ingemar Rask, 2006, johnny@grob.org */
192         float cv[][3] = {
193                 {1.0f, 1.0f, 1.0f}, {-1.0f, 1.0f, 1.0f}, {-1.0f, -1.0f, 1.0f}, {1.0f, -1.0f, 1.0f},
194                 {1.0f, 1.0f, -1.0f}, {-1.0f, 1.0f, -1.0f}, {-1.0f, -1.0f, -1.0f}, {1.0f, -1.0f, -1.0f}
195         };
196
197         // edges have the form edges[n][0][xyz] + t*edges[n][1][xyz]
198         float edges[12][2][3] = {
199                 {{1.0f, 1.0f, -1.0f}, {0.0f, 0.0f, 2.0f}},
200                 {{-1.0f, 1.0f, -1.0f}, {0.0f, 0.0f, 2.0f}},
201                 {{-1.0f, -1.0f, -1.0f}, {0.0f, 0.0f, 2.0f}},
202                 {{1.0f, -1.0f, -1.0f}, {0.0f, 0.0f, 2.0f}},
203
204                 {{1.0f, -1.0f, 1.0f}, {0.0f, 2.0f, 0.0f}},
205                 {{-1.0f, -1.0f, 1.0f}, {0.0f, 2.0f, 0.0f}},
206                 {{-1.0f, -1.0f, -1.0f}, {0.0f, 2.0f, 0.0f}},
207                 {{1.0f, -1.0f, -1.0f}, {0.0f, 2.0f, 0.0f}},
208
209                 {{-1.0f, 1.0f, 1.0f}, {2.0f, 0.0f, 0.0f}},
210                 {{-1.0f, -1.0f, 1.0f}, {2.0f, 0.0f, 0.0f}},
211                 {{-1.0f, -1.0f, -1.0f}, {2.0f, 0.0f, 0.0f}},
212                 {{-1.0f, 1.0f, -1.0f}, {2.0f, 0.0f, 0.0f}}
213         };
214
215         /* Fragment program to calculate the view3d of smoke */
216         /* using 2 textures, density and shadow */
217         const char *text = "!!ARBfp1.0\n"
218                                         "PARAM dx = program.local[0];\n"
219                                         "PARAM darkness = program.local[1];\n"
220                                         "PARAM f = {1.442695041, 1.442695041, 1.442695041, 0.01};\n"
221                                         "TEMP temp, shadow, value;\n"
222                                         "TEX temp, fragment.texcoord[0], texture[0], 3D;\n"
223                                         "TEX shadow, fragment.texcoord[0], texture[1], 3D;\n"
224                                         "MUL value, temp, darkness;\n"
225                                         "MUL value, value, dx;\n"
226                                         "MUL value, value, f;\n"
227                                         "EX2 temp, -value.r;\n"
228                                         "SUB temp.a, 1.0, temp.r;\n"
229                                         "MUL temp.r, temp.r, shadow.r;\n"
230                                         "MUL temp.g, temp.g, shadow.r;\n"
231                                         "MUL temp.b, temp.b, shadow.r;\n"
232                                         "MOV result.color, temp;\n"
233                                         "END\n";
234         GLuint prog;
235
236         
237         float size[3];
238
239         if(!tex) {
240                 printf("Could not allocate 3D texture for 3D View smoke drawing.\n");
241                 return;
242         }
243
244         tstart();
245
246         sub_v3_v3v3(size, max, min);
247
248         // maxx, maxy, maxz
249         cv[0][0] = max[0];
250         cv[0][1] = max[1];
251         cv[0][2] = max[2];
252         // minx, maxy, maxz
253         cv[1][0] = min[0];
254         cv[1][1] = max[1];
255         cv[1][2] = max[2];
256         // minx, miny, maxz
257         cv[2][0] = min[0];
258         cv[2][1] = min[1];
259         cv[2][2] = max[2];
260         // maxx, miny, maxz
261         cv[3][0] = max[0];
262         cv[3][1] = min[1];
263         cv[3][2] = max[2];
264
265         // maxx, maxy, minz
266         cv[4][0] = max[0];
267         cv[4][1] = max[1];
268         cv[4][2] = min[2];
269         // minx, maxy, minz
270         cv[5][0] = min[0];
271         cv[5][1] = max[1];
272         cv[5][2] = min[2];
273         // minx, miny, minz
274         cv[6][0] = min[0];
275         cv[6][1] = min[1];
276         cv[6][2] = min[2];
277         // maxx, miny, minz
278         cv[7][0] = max[0];
279         cv[7][1] = min[1];
280         cv[7][2] = min[2];
281
282         copy_v3_v3(edges[0][0], cv[4]); // maxx, maxy, minz
283         copy_v3_v3(edges[1][0], cv[5]); // minx, maxy, minz
284         copy_v3_v3(edges[2][0], cv[6]); // minx, miny, minz
285         copy_v3_v3(edges[3][0], cv[7]); // maxx, miny, minz
286
287         copy_v3_v3(edges[4][0], cv[3]); // maxx, miny, maxz
288         copy_v3_v3(edges[5][0], cv[2]); // minx, miny, maxz
289         copy_v3_v3(edges[6][0], cv[6]); // minx, miny, minz
290         copy_v3_v3(edges[7][0], cv[7]); // maxx, miny, minz
291
292         copy_v3_v3(edges[8][0], cv[1]); // minx, maxy, maxz
293         copy_v3_v3(edges[9][0], cv[2]); // minx, miny, maxz
294         copy_v3_v3(edges[10][0], cv[6]); // minx, miny, minz
295         copy_v3_v3(edges[11][0], cv[5]); // minx, maxy, minz
296
297         // printf("size x: %f, y: %f, z: %f\n", size[0], size[1], size[2]);
298         // printf("min[2]: %f, max[2]: %f\n", min[2], max[2]);
299
300         edges[0][1][2] = size[2];
301         edges[1][1][2] = size[2];
302         edges[2][1][2] = size[2];
303         edges[3][1][2] = size[2];
304
305         edges[4][1][1] = size[1];
306         edges[5][1][1] = size[1];
307         edges[6][1][1] = size[1];
308         edges[7][1][1] = size[1];
309
310         edges[8][1][0] = size[0];
311         edges[9][1][0] = size[0];
312         edges[10][1][0] = size[0];
313         edges[11][1][0] = size[0];
314
315         glGetBooleanv(GL_BLEND, (GLboolean *)&gl_blend);
316         glGetBooleanv(GL_DEPTH_TEST, (GLboolean *)&gl_depth);
317
318         glLoadMatrixf(rv3d->viewmat);
319         // glMultMatrixf(ob->obmat);    
320
321         glDepthMask(GL_FALSE);
322         glDisable(GL_DEPTH_TEST);
323         glEnable(GL_BLEND);
324         glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
325
326         /*
327         printf("Viewinv:\n");
328         printf("%f, %f, %f\n", rv3d->viewinv[0][0], rv3d->viewinv[0][1], rv3d->viewinv[0][2]);
329         printf("%f, %f, %f\n", rv3d->viewinv[1][0], rv3d->viewinv[1][1], rv3d->viewinv[1][2]);
330         printf("%f, %f, %f\n", rv3d->viewinv[2][0], rv3d->viewinv[2][1], rv3d->viewinv[2][2]);
331         */
332
333         // get view vector
334         copy_v3_v3(viewnormal, rv3d->viewinv[2]);
335         normalize_v3(viewnormal);
336
337         // find cube vertex that is closest to the viewer
338         for (i=0; i<8; i++) {
339                 float x,y,z;
340
341                 x = cv[i][0] - viewnormal[0];
342                 y = cv[i][1] - viewnormal[1];
343                 z = cv[i][2] - viewnormal[2];
344
345                 if ((x>=min[0])&&(x<=max[0])
346                         &&(y>=min[1])&&(y<=max[1])
347                         &&(z>=min[2])&&(z<=max[2])) {
348                         break;
349                 }
350         }
351
352         if(i >= 8) {
353                 /* fallback, avoid using buffer over-run */
354                 i= 0;
355         }
356
357         // printf("i: %d\n", i);
358         // printf("point %f, %f, %f\n", cv[i][0], cv[i][1], cv[i][2]);
359
360         if (GL_TRUE == glewIsSupported("GL_ARB_fragment_program"))
361         {
362                 glEnable(GL_FRAGMENT_PROGRAM_ARB);
363                 glGenProgramsARB(1, &prog);
364
365                 glBindProgramARB(GL_FRAGMENT_PROGRAM_ARB, prog);
366                 glProgramStringARB(GL_FRAGMENT_PROGRAM_ARB, GL_PROGRAM_FORMAT_ASCII_ARB, (GLsizei)strlen(text), text);
367
368                 // cell spacing
369                 glProgramLocalParameter4fARB (GL_FRAGMENT_PROGRAM_ARB, 0, dx, dx, dx, 1.0);
370                 // custom parameter for smoke style (higher = thicker)
371                 glProgramLocalParameter4fARB (GL_FRAGMENT_PROGRAM_ARB, 1, 7.0, 7.0, 7.0, 1.0);
372         }
373         else
374                 printf("Your gfx card does not support 3D View smoke drawing.\n");
375
376         GPU_texture_bind(tex, 0);
377         if(tex_shadow)
378                 GPU_texture_bind(tex_shadow, 1);
379         else
380                 printf("No volume shadow\n");
381
382         if (!GPU_non_power_of_two_support()) {
383                 cor[0] = (float)res[0]/(float)larger_pow2(res[0]);
384                 cor[1] = (float)res[1]/(float)larger_pow2(res[1]);
385                 cor[2] = (float)res[2]/(float)larger_pow2(res[2]);
386         }
387
388         // our slices are defined by the plane equation a*x + b*y +c*z + d = 0
389         // (a,b,c), the plane normal, are given by viewdir
390         // d is the parameter along the view direction. the first d is given by
391         // inserting previously found vertex into the plane equation
392
393         /* d0 = (viewnormal[0]*cv[i][0] + viewnormal[1]*cv[i][1] + viewnormal[2]*cv[i][2]); */ /* UNUSED */
394         ds = (ABS(viewnormal[0])*size[0] + ABS(viewnormal[1])*size[1] + ABS(viewnormal[2])*size[2]);
395         dd = 0.05; // ds/512.0f;
396         n = 0;
397         good_index = i;
398
399         // printf("d0: %f, dd: %f, ds: %f\n\n", d0, dd, ds);
400
401         points = MEM_callocN(sizeof(float)*12*3, "smoke_points_preview");
402
403         while(1) {
404                 float p0[3];
405                 float tmp_point[3], tmp_point2[3];
406
407                 if(dd*(float)n > ds)
408                         break;
409
410                 copy_v3_v3(tmp_point, viewnormal);
411                 mul_v3_fl(tmp_point, -dd*((ds/dd)-(float)n));
412                 add_v3_v3v3(tmp_point2, cv[good_index], tmp_point);
413                 d = dot_v3v3(tmp_point2, viewnormal);
414
415                 // printf("my d: %f\n", d);
416
417                 // intersect_edges returns the intersection points of all cube edges with
418                 // the given plane that lie within the cube
419                 numpoints = intersect_edges(points, viewnormal[0], viewnormal[1], viewnormal[2], -d, edges);
420
421                 // printf("points: %d\n", numpoints);
422
423                 if (numpoints > 2) {
424                         copy_v3_v3(p0, points);
425
426                         // sort points to get a convex polygon
427                         for(i = 1; i < numpoints - 1; i++)
428                         {
429                                 for(j = i + 1; j < numpoints; j++)
430                                 {
431                                         if(!convex(p0, viewnormal, &points[j * 3], &points[i * 3]))
432                                         {
433                                                 float tmp2[3];
434                                                 copy_v3_v3(tmp2, &points[j * 3]);
435                                                 copy_v3_v3(&points[j * 3], &points[i * 3]);
436                                                 copy_v3_v3(&points[i * 3], tmp2);
437                                         }
438                                 }
439                         }
440
441                         // printf("numpoints: %d\n", numpoints);
442                         glBegin(GL_POLYGON);
443                         glColor3f(1.0, 1.0, 1.0);
444                         for (i = 0; i < numpoints; i++) {
445                                 glTexCoord3d((points[i * 3 + 0] - min[0] )*cor[0]/size[0], (points[i * 3 + 1] - min[1])*cor[1]/size[1], (points[i * 3 + 2] - min[2])*cor[2]/size[2]);
446                                 glVertex3f(points[i * 3 + 0], points[i * 3 + 1], points[i * 3 + 2]);
447                         }
448                         glEnd();
449                 }
450                 n++;
451         }
452
453         tend();
454         // printf ( "Draw Time: %f\n",( float ) tval() );
455
456         if(tex_shadow)
457                 GPU_texture_unbind(tex_shadow);
458         GPU_texture_unbind(tex);
459
460         if(GLEW_ARB_fragment_program)
461         {
462                 glDisable(GL_FRAGMENT_PROGRAM_ARB);
463                 glDeleteProgramsARB(1, &prog);
464         }
465
466
467         MEM_freeN(points);
468
469         if(!gl_blend)
470                 glDisable(GL_BLEND);
471         if(gl_depth)
472         {
473                 glEnable(GL_DEPTH_TEST);
474                 glDepthMask(GL_TRUE);   
475         }
476 }
477