Rendering tricks for improving workflow:
[blender.git] / source / blender / src / renderwin.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 #ifdef WIN32
34 /* for the multimedia timer */
35 #include <windows.h>
36 #include <mmsystem.h>
37 #endif
38
39 #include <string.h>
40 #include <stdarg.h>
41 #include <math.h>
42
43 #ifdef HAVE_CONFIG_H
44 #include <config.h>
45 #endif
46
47 #ifdef WIN32
48 #include "BLI_winstuff.h"
49 #else
50  /* for signal callback, not (fully) supported at windows */
51 #include <sys/time.h>
52 #include <signal.h>
53
54 #endif
55
56 #include <limits.h>
57
58 #include "BLI_blenlib.h"
59
60 #include "MEM_guardedalloc.h"
61
62 #include "BMF_Api.h"
63
64 #include "DNA_view3d_types.h"
65 #include "DNA_screen_types.h"
66 #include "DNA_scene_types.h"
67 #include "DNA_vec_types.h"
68
69 #include "BKE_global.h"
70 #include "BKE_scene.h"
71 #include "BKE_utildefines.h"
72 #include "BKE_writeavi.h"       /* movie handle */
73
74 #include "BIF_gl.h"
75 #include "BIF_glutil.h"
76 #include "BIF_graphics.h"
77 #include "BIF_screen.h"
78 #include "BIF_space.h"
79 #include "BIF_mywindow.h"
80 #include "BIF_renderwin.h"
81 #include "BIF_resources.h"
82 #include "BIF_toets.h"
83 #include "BIF_writeimage.h"
84
85 #include "BDR_editobject.h"
86 #include "BPY_extern.h" /* for BPY_do_all_scripts */
87
88 #include "BSE_view.h"
89 #include "BSE_drawview.h"
90 #include "BSE_filesel.h"
91 #include "BSE_headerbuttons.h"
92
93 #include "RE_pipeline.h"
94
95 #include "blendef.h"
96 #include "mydevice.h"
97 #include "winlay.h"
98
99 /* ------------ renderwin struct, to prevent too much global vars --------- */
100 /* ------------ only used for display in a 2nd window  --------- */
101
102
103 /* flags escape presses during event handling
104 * so we can test for user break later.
105 */
106 #define RW_FLAGS_ESCAPE         (1<<0)
107 /* old zoom style (2x, locked to mouse, exits
108 * when mouse leaves window), to be removed
109 * at some point.
110 */
111 #define RW_FLAGS_OLDZOOM                (1<<1)
112 /* on when image is being panned with middlemouse
113 */
114 #define RW_FLAGS_PANNING                (1<<2)
115 /* on when the mouse is dragging over the image
116 * to examine pixel values.
117 */
118 #define RW_FLAGS_PIXEL_EXAMINING        (1<<3)
119
120 /* forces draw of alpha */
121 #define RW_FLAGS_ALPHA          (1<<4)
122
123 /* space for info text */
124 #define RW_HEADERY              18
125
126 typedef struct {
127         Window *win;
128
129         int rectx, recty;       /* size of image */
130         
131         int sparex, sparey;     /* spare rect size */
132         unsigned int *rectspare;
133         float *rectsparef;
134         
135         float zoom, zoomofs[2];
136         int active;
137         short storespare, showspare;
138         
139         int mbut[3];
140         int lmouse[2];
141         
142         unsigned int flags;
143         
144         float pan_mouse_start[2], pan_ofs_start[2];
145
146         char *info_text;
147         char *render_text, *render_text_spare;
148         
149 } RenderWin;
150
151 static RenderWin *render_win= NULL;
152
153 /* --------------- help functions for RenderWin struct ---------------------------- */
154
155
156 /* only called in function open_renderwin */
157 static RenderWin *renderwin_alloc(Window *win)
158 {
159         RenderWin *rw= MEM_callocN(sizeof(*rw), "RenderWin");
160         rw->win= win;
161         rw->zoom= 1.0;
162         rw->active= 0;
163         rw->flags= 0;
164         rw->zoomofs[0]= rw->zoomofs[1]= 0;
165         rw->info_text= NULL;
166         rw->render_text= rw->render_text_spare= NULL;
167
168         rw->lmouse[0]= rw->lmouse[1]= 0;
169         rw->mbut[0]= rw->mbut[1]= rw->mbut[2]= 0;
170
171         return rw;
172 }
173
174
175 static void renderwin_queue_redraw(RenderWin *rw)
176 {
177         window_queue_redraw(rw->win); // to ghost
178 }
179
180 static void renderwin_reshape(RenderWin *rw)
181 {
182         ;
183 }
184
185 static void renderwin_get_fullrect(RenderWin *rw, float fullrect_r[2][2])
186 {
187         float display_w, display_h;
188         float cent_x, cent_y;
189         int w, h;
190
191         window_get_size(rw->win, &w, &h);
192         h-= RW_HEADERY;
193
194         display_w= rw->rectx*rw->zoom;
195         display_h= rw->recty*rw->zoom;
196         cent_x= (rw->zoomofs[0] + rw->rectx/2)*rw->zoom;
197         cent_y= (rw->zoomofs[1] + rw->recty/2)*rw->zoom;
198         
199         fullrect_r[0][0]= w/2 - cent_x;
200         fullrect_r[0][1]= h/2 - cent_y;
201         fullrect_r[1][0]= fullrect_r[0][0] + display_w;
202         fullrect_r[1][1]= fullrect_r[0][1] + display_h;
203 }
204
205         /** 
206          * Project window coordinate to image pixel coordinate.
207          * Returns true if resulting coordinate is within image.
208          */
209 static int renderwin_win_to_image_co(RenderWin *rw, int winco[2], int imgco_r[2])
210 {
211         float fullrect[2][2];
212         
213         renderwin_get_fullrect(rw, fullrect);
214         
215         imgco_r[0]= (int) ((winco[0]-fullrect[0][0])/rw->zoom);
216         imgco_r[1]= (int) ((winco[1]-fullrect[0][1])/rw->zoom);
217         
218         return (imgco_r[0]>=0 && imgco_r[1]>=0 && imgco_r[0]<rw->rectx && imgco_r[1]<rw->recty);
219 }
220
221         /**
222          * Project window coordinates to normalized device coordinates
223          * Returns true if resulting coordinate is within window.
224          */
225 static int renderwin_win_to_ndc(RenderWin *rw, int win_co[2], float ndc_r[2])
226 {
227         int w, h;
228
229         window_get_size(rw->win, &w, &h);
230         h-= RW_HEADERY;
231
232         ndc_r[0]=  ((float)(win_co[0]*2)/(w-1) - 1.0f);
233         ndc_r[1]=  ((float)(win_co[1]*2)/(h-1) - 1.0f);
234
235         return (fabs(ndc_r[0])<=1.0 && fabs(ndc_r[1])<=1.0);
236 }
237
238 static void renderwin_set_infotext(RenderWin *rw, char *info_text)
239 {
240         if (rw->info_text) MEM_freeN(rw->info_text);
241         rw->info_text= info_text?BLI_strdup(info_text):NULL;
242 }
243
244 static void renderwin_reset_view(RenderWin *rw)
245 {
246         int w, h;
247
248         if (rw->info_text) renderwin_set_infotext(rw, NULL);
249
250         /* now calculate a zoom for when image is larger than window */
251         window_get_size(rw->win, &w, &h);
252         h-= RW_HEADERY;
253
254         if(rw->rectx>w || rw->recty>h) {
255                 if(rw->rectx-w > rw->recty-h) rw->zoom= ((float)w)/((float)rw->rectx);
256                 else rw->zoom= ((float)h)/((float)rw->recty);
257         }
258         else rw->zoom= 1.0;
259
260         rw->zoomofs[0]= rw->zoomofs[1]= 0;
261         renderwin_queue_redraw(rw);
262 }
263
264 static void renderwin_draw_render_info(RenderWin *rw)
265 {
266         /* render text is added to top */
267         if(RW_HEADERY) {
268                 float colf[3];
269                 rcti rect;
270                 char *str;
271                 
272                 window_get_size(rw->win, &rect.xmax, &rect.ymax);
273                 rect.xmin= 0;
274                 rect.ymin= rect.ymax-RW_HEADERY;
275                 glEnable(GL_SCISSOR_TEST);
276                 glaDefine2DArea(&rect);
277                 
278                 /* clear header rect */
279                 BIF_SetTheme(NULL);     // sets view3d theme by default
280                 BIF_GetThemeColor3fv(TH_HEADER, colf);
281                 glClearColor(colf[0], colf[1], colf[2], 1.0); 
282                 glClear(GL_COLOR_BUFFER_BIT);
283                 
284                 if(rw->showspare)
285                         str= rw->render_text_spare;
286                 else
287                         str= rw->render_text;
288                 
289                 if(str) {
290                         BIF_ThemeColor(TH_TEXT);
291                         glRasterPos2i(12, 5);
292                         BMF_DrawString(G.fonts, str);
293                 }
294                 
295                 BIF_SetTheme(curarea);  // restore theme
296         }       
297         
298 }
299
300 static void renderwin_draw(RenderWin *rw, int just_clear)
301 {
302         float fullrect[2][2];
303         int set_back_mainwindow;
304         rcti rect;
305
306         /* since renderwin uses callbacks (controlled by ghost) it can
307                 mess up active window output with redraw events after a render. 
308                 this is patchy, still WIP */
309         set_back_mainwindow = (winlay_get_active_window() != rw->win);
310         window_make_active(rw->win);
311         
312         rect.xmin= rect.ymin= 0;
313         window_get_size(rw->win, &rect.xmax, &rect.ymax);
314         rect.ymax-= RW_HEADERY;
315         
316         renderwin_get_fullrect(rw, fullrect);
317         
318         /* do this first, so window ends with correct scissor */
319         renderwin_draw_render_info(rw);
320         
321         glEnable(GL_SCISSOR_TEST);
322         glaDefine2DArea(&rect);
323         
324         glClearColor(.1875, .1875, .1875, 1.0); 
325         glClear(GL_COLOR_BUFFER_BIT);
326
327         if (just_clear) {
328                 glColor3ub(0, 0, 0);
329                 glRectfv(fullrect[0], fullrect[1]);
330         } else {
331                 RenderResult rres;
332                 
333                 if(rw->showspare) {
334                         rres.rectx= rw->sparex;
335                         rres.recty= rw->sparey;
336                         rres.rect32= rw->rectspare;
337                         rres.rectf= rw->rectsparef;
338                 }
339                 else
340                         RE_GetResultImage(RE_GetRender("Render"), &rres);
341                 
342                 if(rres.rectf) {
343                         
344                         glPixelZoom(rw->zoom, rw->zoom);
345                         if(rw->flags & RW_FLAGS_ALPHA) {
346                                 if(rres.rect32) {
347                                         /* swap bytes, so alpha is most significant one, then just draw it as luminance int */
348                                         glPixelStorei(GL_UNPACK_SWAP_BYTES, 1);
349                                         glaDrawPixelsSafe(fullrect[0][0], fullrect[0][1], rres.rectx, rres.recty, rres.rectx, GL_LUMINANCE, GL_UNSIGNED_INT, rres.rect32);
350                                         glPixelStorei(GL_UNPACK_SWAP_BYTES, 0);
351                                 }
352                                 else {
353                                         float *trectf= MEM_mallocN(rres.rectx*rres.recty*4, "temp");
354                                         int a, b;
355                                         
356                                         for(a= rres.rectx*rres.recty -1, b= 4*a+3; a>=0; a--, b-=4)
357                                                 trectf[a]= rres.rectf[b];
358                                         
359                                         glaDrawPixelsSafe(fullrect[0][0], fullrect[0][1], rres.rectx, rres.recty, rres.rectx, GL_LUMINANCE, GL_FLOAT, trectf);
360                                         MEM_freeN(trectf);
361                                 }
362                         }
363                         else {
364                                 if(rres.rect32)
365                                         glaDrawPixelsSafe(fullrect[0][0], fullrect[0][1], rres.rectx, rres.recty, rres.rectx, GL_RGBA, GL_UNSIGNED_BYTE, rres.rect32);
366                                 else if(rres.rectf)
367                                         glaDrawPixelsSafe(fullrect[0][0], fullrect[0][1], rres.rectx, rres.recty, rres.rectx, GL_RGBA, GL_FLOAT, rres.rectf);
368                         }
369                         glPixelZoom(1.0, 1.0);
370                 }
371         }
372         
373         /* info text is overlayed on bottom */
374         if (rw->info_text) {
375                 float w;
376                 glBlendFunc(GL_SRC_ALPHA,GL_ONE_MINUS_SRC_ALPHA);
377                 glEnable(GL_BLEND);
378                 w=186.0*strlen(rw->info_text)/30;
379                 glColor4f(.5,.5,.5,.25);
380                 glRectf(0.0,0.0,w,30.0);
381                 glDisable(GL_BLEND);
382                 glColor3ub(255, 255, 255);
383                 glRasterPos2i(10, 10);
384                 BMF_DrawString(G.font, rw->info_text);
385         }
386         
387         window_swap_buffers(rw->win);
388         
389         if (set_back_mainwindow) mainwindow_make_active();      
390 }
391
392 /* ------ interactivity calls for RenderWin ------------- */
393
394 static void renderwin_mouse_moved(RenderWin *rw)
395 {
396         RenderResult rres;
397         
398         RE_GetResultImage(RE_GetRender("Render"), &rres);
399
400         if (rw->flags & RW_FLAGS_PIXEL_EXAMINING) {
401                 int imgco[2], ofs=0;
402                 char buf[128];
403                 char *pxl;
404
405                 if (renderwin_win_to_image_co(rw, rw->lmouse, imgco)) {
406                         if (rres.rect32) {
407                                 pxl= (char*) &rres.rect32[rres.rectx*imgco[1] + imgco[0]];
408                                 ofs= sprintf(buf, "R: %d G: %d B: %d A: %d", pxl[0], pxl[1], pxl[2], pxl[3]);   
409                         }
410                         if (rres.rectf) {
411                                 float *pxlf= rres.rectf + 4*(rres.rectx*imgco[1] + imgco[0]);
412                                 ofs+= sprintf(buf+ofs, " | R: %.3f G: %.3f B: %.3f A: %.3f ", pxlf[0], pxlf[1], pxlf[2], pxlf[3]);
413                         }
414                         if (rres.rectz) {
415                                 float *pxlz= &rres.rectz[rres.rectx*imgco[1] + imgco[0]];                       
416                                 sprintf(buf+ofs, "| Z: %.3f", *pxlz );
417                         }
418
419                         renderwin_set_infotext(rw, buf);
420                         renderwin_queue_redraw(rw);
421                 } else {
422                         renderwin_set_infotext(rw, NULL);
423                         renderwin_queue_redraw(rw);
424                 }
425         } 
426         else if (rw->flags & RW_FLAGS_PANNING) {
427                 int delta_x= rw->lmouse[0] - rw->pan_mouse_start[0];
428                 int delta_y= rw->lmouse[1] - rw->pan_mouse_start[1];
429         
430                 rw->zoomofs[0]= rw->pan_ofs_start[0] - delta_x/rw->zoom;
431                 rw->zoomofs[1]= rw->pan_ofs_start[1] - delta_y/rw->zoom;
432                 rw->zoomofs[0]= CLAMPIS(rw->zoomofs[0], -rres.rectx/2, rres.rectx/2);
433                 rw->zoomofs[1]= CLAMPIS(rw->zoomofs[1], -rres.recty/2, rres.recty/2);
434
435                 renderwin_queue_redraw(rw);
436         } 
437         else if (rw->flags & RW_FLAGS_OLDZOOM) {
438                 float ndc[2];
439                 int w, h;
440
441                 window_get_size(rw->win, &w, &h);
442                 h-= RW_HEADERY;
443                 renderwin_win_to_ndc(rw, rw->lmouse, ndc);
444
445                 rw->zoomofs[0]= -0.5*ndc[0]*(w-rres.rectx*rw->zoom)/rw->zoom;
446                 rw->zoomofs[1]= -0.5*ndc[1]*(h-rres.recty*rw->zoom)/rw->zoom;
447
448                 renderwin_queue_redraw(rw);
449         }
450 }
451
452 static void renderwin_mousebut_changed(RenderWin *rw)
453 {
454         if (rw->mbut[0]) {
455                 rw->flags|= RW_FLAGS_PIXEL_EXAMINING;
456         } 
457         else if (rw->mbut[1]) {
458                 rw->flags|= RW_FLAGS_PANNING;
459                 rw->pan_mouse_start[0]= rw->lmouse[0];
460                 rw->pan_mouse_start[1]= rw->lmouse[1];
461                 rw->pan_ofs_start[0]= rw->zoomofs[0];
462                 rw->pan_ofs_start[1]= rw->zoomofs[1];
463         } 
464         else {
465                 if (rw->flags & RW_FLAGS_PANNING) {
466                         rw->flags &= ~RW_FLAGS_PANNING;
467                         renderwin_queue_redraw(rw);
468                 }
469                 if (rw->flags & RW_FLAGS_PIXEL_EXAMINING) {
470                         rw->flags&= ~RW_FLAGS_PIXEL_EXAMINING;
471                         renderwin_set_infotext(rw, NULL);
472                         renderwin_queue_redraw(rw);
473                 }
474         }
475 }
476
477
478 /* handler for renderwin, passed on to Ghost */
479 static void renderwin_handler(Window *win, void *user_data, short evt, short val, char ascii)
480 {
481         RenderWin *rw= user_data;
482
483         // added this for safety, while render it's just creating bezerk results
484         if(G.rendering) {
485                 if(evt==ESCKEY && val) 
486                         rw->flags|= RW_FLAGS_ESCAPE;
487                 return;
488         }
489         
490         if (evt==RESHAPE) {
491                 renderwin_reshape(rw);
492         } 
493         else if (evt==REDRAW) {
494                 renderwin_draw(rw, 0);
495         } 
496         else if (evt==WINCLOSE) {
497                 BIF_close_render_display();
498         } 
499         else if (evt==INPUTCHANGE) {
500                 rw->active= val;
501
502                 if (!val && (rw->flags&RW_FLAGS_OLDZOOM)) {
503                         rw->flags&= ~RW_FLAGS_OLDZOOM;
504                         renderwin_reset_view(rw);
505                 }
506         } 
507         else if (ELEM(evt, MOUSEX, MOUSEY)) {
508                 rw->lmouse[evt==MOUSEY]= val;
509                 renderwin_mouse_moved(rw);
510         } 
511         else if (ELEM3(evt, LEFTMOUSE, MIDDLEMOUSE, RIGHTMOUSE)) {
512                 int which= (evt==LEFTMOUSE)?0:(evt==MIDDLEMOUSE)?1:2;
513                 rw->mbut[which]= val;
514                 renderwin_mousebut_changed(rw);
515         } 
516         else if (val) {
517                 if (evt==ESCKEY) {
518                         if (rw->flags&RW_FLAGS_OLDZOOM) {
519                                 rw->flags&= ~RW_FLAGS_OLDZOOM;
520                                 renderwin_reset_view(rw);
521                         } 
522                         else {
523                                 rw->flags|= RW_FLAGS_ESCAPE;
524                                 mainwindow_raise();
525                                 mainwindow_make_active();
526                                 rw->active= 0;
527                         }
528                 } 
529                 else if( evt==AKEY) {
530                         rw->flags ^= RW_FLAGS_ALPHA;
531                         renderwin_queue_redraw(render_win);
532                 }
533                 else if (evt==JKEY) {
534                         if(G.rendering==0) BIF_swap_render_rects();
535                 } 
536                 else if (evt==ZKEY) {
537                         if (rw->flags&RW_FLAGS_OLDZOOM) {
538                                 rw->flags&= ~RW_FLAGS_OLDZOOM;
539                                 renderwin_reset_view(rw);
540                         } else {
541                                 rw->zoom= 2.0;
542                                 rw->flags|= RW_FLAGS_OLDZOOM;
543                                 renderwin_mouse_moved(rw);
544                         }
545                 } 
546                 else if (evt==PADPLUSKEY) {
547                         if (rw->zoom<15.9) {
548                                 if(rw->zoom>0.5 && rw->zoom<1.0) rw->zoom= 1.0;
549                                 else rw->zoom*= 2.0;
550                                 renderwin_queue_redraw(rw);
551                         }
552                 } 
553                 else if (evt==PADMINUS) {
554                         if (rw->zoom>0.26) {
555                                 if(rw->zoom>1.0 && rw->zoom<2.0) rw->zoom= 1.0;
556                                 else rw->zoom*= 0.5;
557                                 renderwin_queue_redraw(rw);
558                         }
559                 } 
560                 else if (evt==PADENTER || evt==HOMEKEY) {
561                         if (rw->flags&RW_FLAGS_OLDZOOM) {
562                                 rw->flags&= ~RW_FLAGS_OLDZOOM;
563                         }
564                         renderwin_reset_view(rw);
565                 } 
566                 else if (evt==F3KEY) {
567 //                      if(R.flag==0) {
568 //                              mainwindow_raise();
569 //                              mainwindow_make_active();
570 //                              rw->active= 0;
571 //                              areawinset(find_biggest_area()->win);
572 //                              BIF_save_rendered_image_fs();
573 //                      }
574                 } 
575                 else if (evt==F11KEY) {
576                         BIF_toggle_render_display();
577                 } 
578                 else if (evt==F12KEY) {
579                         /* if it's rendering, this flag is set */
580 //                      if(R.flag==0) BIF_do_render(0);
581                 }
582         }
583 }
584
585 static char *renderwin_get_title(int doswap)
586 {
587         static int swap= 0;
588         char *title="";
589         
590         swap+= doswap;
591         
592         if(swap & 1) {
593                 if (G.scene->r.renderer==R_YAFRAY) title = "YafRay:Render (previous frame)";
594                 else title = "Blender:Render (previous frame)";
595         }
596         else {
597                 if (G.scene->r.renderer==R_YAFRAY) title = "YafRay:Render";
598                 else title = "Blender:Render";
599         }
600
601         return title;
602 }
603
604 /* opens window and allocs struct */
605 static void open_renderwin(int winpos[2], int winsize[2], int imagesize[2])
606 {
607         extern void mywindow_build_and_set_renderwin( int orx, int ory, int sizex, int sizey); // mywindow.c
608         Window *win;
609         char *title;
610         
611         title= renderwin_get_title(0);  /* 0 = no swap */
612         win= window_open(title, winpos[0], winpos[1], winsize[0], winsize[1]+RW_HEADERY, 0);
613
614         render_win= renderwin_alloc(win);
615         render_win->rectx= imagesize[0];
616         render_win->recty= imagesize[1];
617         
618         /* Ghost calls handler */
619         window_set_handler(win, renderwin_handler, render_win);
620
621         winlay_process_events(0);
622         window_make_active(render_win->win);
623         winlay_process_events(0);
624         
625         /* mywindow has to know about it too */
626         mywindow_build_and_set_renderwin(winpos[0], winpos[1], winsize[0], winsize[1]+RW_HEADERY);
627         /* and we should be able to draw 3d in it */
628         init_gl_stuff();
629         
630         renderwin_draw(render_win, 1);
631         renderwin_draw(render_win, 1);
632 }
633
634 /* -------------- callbacks for render loop: Window (RenderWin) ----------------------- */
635
636 /* calculations for window size and position */
637 void calc_renderwin_rectangle(int rectx, int recty, int posmask, int renderpos_r[2], int rendersize_r[2]) 
638 {
639         int scr_w, scr_h, x, y, div= 0;
640         float ndc_x= 0.0, ndc_y= 0.0;
641
642         winlay_get_screensize(&scr_w, &scr_h);
643
644         rendersize_r[0]= rectx;
645         rendersize_r[1]= recty;
646
647         rendersize_r[0]= CLAMPIS(rendersize_r[0], 0, scr_w);     
648         rendersize_r[1]= CLAMPIS(rendersize_r[1], 0, scr_h-RW_HEADERY);  
649         
650         for (y=-1; y<=1; y++) {
651                 for (x=-1; x<=1; x++) {
652                         if (posmask & (1<<((y+1)*3 + (x+1)))) {
653                                 ndc_x+= x;
654                                 ndc_y+= y;
655                                 div++;
656                         }
657                 }
658         }
659
660         if (div) {
661                 ndc_x/= div;
662                 ndc_y/= div;
663         }
664         
665         renderpos_r[0]= (scr_w-rendersize_r[0])*(ndc_x*0.5 + 0.5);
666 #ifdef __APPLE__
667         /* 44 pixels is topbar and window header... awaiting better fixes in ghost :) */
668         rendersize_r[1]= CLAMPIS(rendersize_r[1], 0, scr_h-44-RW_HEADERY);       
669         renderpos_r[1]= -44-RW_HEADERY+(scr_h-rendersize_r[1])*(ndc_y*0.5 + 0.5);
670 #else
671         renderpos_r[1]= -RW_HEADERY+(scr_h-rendersize_r[1])*(ndc_y*0.5 + 0.5);
672 #endif
673 }
674         
675 /* init renderwin, alloc/open/resize */
676 static void renderwin_init_display_cb(RenderResult *rr) 
677 {
678         if (G.afbreek != 1) {
679                 int rendersize[2], renderpos[2], imagesize[2];
680
681                 calc_renderwin_rectangle(rr->rectx, rr->recty, G.winpos, renderpos, rendersize);
682                 
683                 imagesize[0]= rr->rectx;
684                 imagesize[1]= rr->recty;
685
686                 if (!render_win) {
687                         open_renderwin(renderpos, rendersize, imagesize);
688                         renderwin_reset_view(render_win); // incl. autozoom for large images
689                 } else {
690                         int win_x, win_y;
691                         int win_w, win_h;
692
693                         window_get_position(render_win->win, &win_x, &win_y);
694                         window_get_size(render_win->win, &win_w, &win_h);
695                         win_h-= RW_HEADERY;
696
697                                 /* XXX, this is nasty and I guess bound to cause problems,
698                                  * but to ensure the window is at the user specified position
699                                  * and size we reopen the window all the time... we need
700                                  * a ghost _set_position to fix this -zr
701                                  */
702                                  
703                                  /* XXX, well... it is nasty yes, and reopens windows each time on
704                                     subsequent renders. Better rule is to make it reopen only only
705                                     size change, and use the preferred position only on open_renderwin
706                                         cases (ton)
707                                  */
708                         if(rendersize[0]!= win_w || rendersize[1]!= win_h) {
709                                 BIF_close_render_display();
710                                 open_renderwin(renderpos, rendersize, imagesize);
711                         }
712                         else {
713                                 window_raise(render_win->win);
714                                 window_make_active(render_win->win);
715                                 
716                                 mywinset(2);    // to assign scissor/viewport again in mywindow.c. is hackish yes, but otherwise it draws in header of button for ogl header
717                                 {
718                                         rcti win_rct;
719                                         win_rct.xmin= win_rct.ymin= 0;
720                                         window_get_size(render_win->win, &win_rct.xmax, &win_rct.ymax);
721                                         win_rct.ymax-= RW_HEADERY;
722                                         glaDefine2DArea(&win_rct);
723                                 }
724                         }
725
726                         renderwin_reset_view(render_win);
727                         render_win->flags&= ~RW_FLAGS_ESCAPE;
728                         render_win->active= 1;
729                 }
730                 /* make sure we are in normal draw again */
731                 render_win->flags &= ~RW_FLAGS_ALPHA;
732                 
733                 glFinish();
734         }
735 }
736
737 /* callback for redraw render win */
738 static void renderwin_clear_display_cb(RenderResult *rr) 
739 {
740         if (render_win) {
741                 window_make_active(render_win->win);
742                 renderwin_draw(render_win, 1);
743         }
744 }
745
746 /* XXX, this is not good, we do this without any regard to state
747 * ... better is to make this an optimization of a more clear
748 * implementation. the bug shows up when you do something like
749 * open the window, then draw part of the progress, then get
750 * a redraw event. whatever can go wrong will. -zr
751 *
752 * Note: blocked queue handling while rendering to prevent that (ton)
753 */
754
755 /* can get as well the full picture, as the parts while rendering */
756 static void renderwin_progress(RenderWin *rw, RenderResult *rr, rcti *renrect)
757 {
758         rcti win_rct;
759         float *rectf, fullrect[2][2];
760         int ymin, ymax;
761         
762         /* if renrect argument, we only display scanlines */
763         if(renrect) {
764                 ymin= renrect->ymin;
765                 ymax= renrect->ymax-ymin;
766                 if(ymax<2 || renrect->ymax>=rr->recty) /* if ymax==recty, rendering of layer is ready, we should not draw, other things happen... */
767                         return;
768                 renrect->ymin= renrect->ymax;
769         }
770         else {
771                 ymin= 0;
772                 ymax= rr->recty-2*rr->crop;
773         }
774         
775         /* renderwindow cruft */
776         win_rct.xmin= win_rct.ymin= 0;
777         window_get_size(rw->win, &win_rct.xmax, &win_rct.ymax);
778         win_rct.ymax-= RW_HEADERY;
779         renderwin_get_fullrect(rw, fullrect);
780         
781         /* find current float rect for display, first case is after composit... still weak */
782         if(rr->rectf)
783                 rectf= rr->rectf;
784         else {
785                 RenderLayer *rl= rr->renlay;
786                 if(rl==NULL) return;
787                 rectf= rl->rectf;
788         }
789         /* if scanline updates... */
790         rectf+= 4*rr->rectx*ymin;
791         
792         /* when rendering more pixels than needed, we crop away cruft */
793         if(rr->crop)
794                 rectf+= 4*(rr->crop*rr->rectx + rr->crop);
795         
796         /* tilerect defines drawing offset from (0,0) */
797         /* however, tilerect (xmin, ymin) is first pixel */
798         fullrect[0][0] += (rr->tilerect.xmin+rr->crop)*rw->zoom;
799         fullrect[0][1] += (rr->tilerect.ymin+rr->crop + ymin)*rw->zoom;
800
801         glEnable(GL_SCISSOR_TEST);
802         glaDefine2DArea(&win_rct);
803
804         glDrawBuffer(GL_FRONT);
805         glPixelZoom(rw->zoom, rw->zoom);
806         glaDrawPixelsSafe(fullrect[0][0], fullrect[0][1], rr->rectx-2*rr->crop, ymax, rr->rectx, 
807                                           GL_RGBA, GL_FLOAT, rectf);
808         glPixelZoom(1.0, 1.0);
809 //      glFlush();
810         glFinish();
811         glDrawBuffer(GL_BACK);
812 }
813
814
815 /* in render window; display a couple of scanlines of rendered image */
816 static void renderwin_progress_display_cb(RenderResult *rr, rcti *rect)
817 {
818         if (render_win) {
819                 renderwin_progress(render_win, rr, rect);
820         }
821 }
822
823 /* -------------- callbacks for render loop: interactivity ----------------------- */
824
825
826 /* callback for print info in top header of renderwin */
827 static void printrenderinfo_cb(RenderStats *rs)
828 {
829         extern char info_time_str[32];  // header_info.c
830         extern int mem_in_use;
831         static float megs_used_memory;
832         char str[300], *spos= str;
833                 
834         if(render_win) {
835                 megs_used_memory= mem_in_use/(1024.0*1024.0);
836                 
837                 if(G.scene->lay & 0xFF000000)
838                         spos+= sprintf(spos, "Localview | ");
839                 else if(G.scene->r.scemode & R_SINGLE_LAYER)
840                         spos+= sprintf(spos, "Single Layer | ");
841                 
842                 if(rs->tothalo)
843                         spos+= sprintf(spos, "Fra:%d  Ve:%d Fa:%d Ha:%d La:%d Mem:%.2fM", (G.scene->r.cfra), rs->totvert, rs->totface, rs->tothalo, rs->totlamp, megs_used_memory);
844                 else 
845                         spos+= sprintf(spos, "Fra:%d  Ve:%d Fa:%d La:%d Mem:%.2fM", (G.scene->r.cfra), rs->totvert, rs->totface, rs->totlamp, megs_used_memory);
846
847                 BLI_timestr(rs->lastframetime, info_time_str);
848                 spos+= sprintf(spos, " Time:%s ", info_time_str);
849                 
850                 if(rs->infostr)
851                         spos+= sprintf(spos, " | %s", rs->infostr);
852                 
853                 if(render_win->render_text) MEM_freeN(render_win->render_text);
854                 render_win->render_text= BLI_strdup(str);
855                 glDrawBuffer(GL_FRONT);
856                 renderwin_draw_render_info(render_win);
857                 glFlush();
858                 glDrawBuffer(GL_BACK);
859         }
860
861         /* temporal render debug printing, needed for testing orange renders atm... will be gone soon (or option) */
862         if(G.rt==7 && rs->convertdone) {
863                 spos= str;
864                 spos+= sprintf(spos, "Fra:%d Mem:%.2fM ", G.scene->r.cfra, megs_used_memory);
865                 
866                 if(rs->infostr) {
867                         spos+= sprintf(spos, " | %s", rs->infostr);
868                 }
869                 else {
870                         if(rs->tothalo)
871                                 spos+= sprintf(spos, "Sce: %s Ve:%d Fa:%d Ha:%d La:%d", G.scene->id.name+2, rs->totvert, rs->totface, rs->tothalo, rs->totlamp);
872                         else 
873                                 spos+= sprintf(spos, "Sce: %s Ve:%d Fa:%d La:%d", G.scene->id.name+2, rs->totvert, rs->totface, rs->totlamp);
874                 }
875                 printf(str); printf("\n");
876         }       
877         
878 }
879
880 /* -------------- callback system to allow ESC from rendering ----------------------- */
881
882 /* POSIX & WIN32: this function is called all the time, and should not use cpu or resources */
883 static int test_break(void)
884 {
885
886         if(G.afbreek==2) { /* code for testing queue */
887
888                 G.afbreek= 0;
889
890                 blender_test_break(); /* tests blender interface */
891
892                 if (G.afbreek==0 && render_win) { /* tests window */
893                         winlay_process_events(0);
894                         // render_win can be closed in winlay_process_events()
895                         if (render_win == 0 || (render_win->flags & RW_FLAGS_ESCAPE)) {
896                                 G.afbreek= 1;
897                         }
898                 }
899         }
900
901         if(G.afbreek==1) return 1;
902         else return 0;
903 }
904
905
906
907 #ifdef _WIN32
908 /* we use the multimedia time here */
909 static UINT uRenderTimerId;
910
911 void CALLBACK interruptESC(UINT uID, UINT uMsg, DWORD dwUser, DWORD dw1, DWORD dw2)
912 {
913         if(G.afbreek==0) G.afbreek= 2;  /* code for read queue */
914 }
915
916 /* WIN32: init SetTimer callback */
917 static void init_test_break_callback()
918 {
919         timeBeginPeriod(50);
920         uRenderTimerId = timeSetEvent(250, 1, interruptESC, 0, TIME_PERIODIC);
921 }
922
923 /* WIN32: stop SetTimer callback */
924 static void end_test_break_callback()
925 {
926         timeEndPeriod(50);
927         timeKillEvent(uRenderTimerId);
928 }
929
930 #else
931 /* all other OS's support signal(SIGVTALRM) */
932
933 /* POSIX: this function goes in the signal() callback */
934 static void interruptESC(int sig)
935 {
936
937         if(G.afbreek==0) G.afbreek= 2;  /* code for read queue */
938
939         /* call again, timer was reset */
940         signal(SIGVTALRM, interruptESC);
941 }
942
943 /* POSIX: initialize timer and signal */
944 static void init_test_break_callback()
945 {
946
947         struct itimerval tmevalue;
948
949         tmevalue.it_interval.tv_sec = 0;
950         tmevalue.it_interval.tv_usec = 250000;
951         /* wanneer de eerste ? */
952         tmevalue.it_value.tv_sec = 0;
953         tmevalue.it_value.tv_usec = 10000;
954
955         signal(SIGVTALRM, interruptESC);
956         setitimer(ITIMER_VIRTUAL, &tmevalue, 0);
957
958 }
959
960 /* POSIX: stop timer and callback */
961 static void end_test_break_callback()
962 {
963         struct itimerval tmevalue;
964
965         tmevalue.it_value.tv_sec = 0;
966         tmevalue.it_value.tv_usec = 0;
967         setitimer(ITIMER_VIRTUAL, &tmevalue, 0);
968         signal(SIGVTALRM, SIG_IGN);
969
970 }
971
972
973 #endif
974
975
976
977 /* -------------- callbacks for render loop: init & run! ----------------------- */
978
979
980 /* - initialize displays
981    - set callbacks
982    - cleanup
983 */
984
985 static void do_render(int anim)
986 {
987         Render *re= RE_NewRender("Render");
988         unsigned int lay= G.scene->lay;
989         int scemode= G.scene->r.scemode;
990         
991         /* we set this flag to prevent renderwindow queue to execute another render */
992         G.rendering= 1;
993         G.afbreek= 0;
994
995         /* set callbacks */
996         RE_display_init_cb(re, renderwin_init_display_cb);
997         RE_display_draw_cb(re, renderwin_progress_display_cb);
998         RE_display_clear_cb(re, renderwin_clear_display_cb);
999         init_test_break_callback();
1000         RE_test_break_cb(re, test_break);
1001         RE_timecursor_cb(re, set_timecursor);
1002         RE_stats_draw_cb(re, printrenderinfo_cb);
1003         
1004         if(render_win) window_set_cursor(render_win->win, CURSOR_WAIT);
1005         waitcursor(1);
1006
1007         if(G.obedit)
1008                 exit_editmode(0);       /* 0 = no free data */
1009
1010         /* allow localview render for objects with lights in normal layers */
1011         if(curarea->spacetype==SPACE_VIEW3D) {
1012                 if(G.vd->lay & 0xFF000000) {
1013                         G.scene->lay |= G.vd->lay;
1014                         G.scene->r.scemode |= R_SINGLE_LAYER;
1015                 }
1016                 else G.scene->lay= G.vd->lay;
1017         }
1018         
1019         if(anim)
1020                 RE_BlenderAnim(re, G.scene, G.scene->r.sfra, G.scene->r.efra);
1021         else
1022                 RE_BlenderFrame(re, G.scene, G.scene->r.cfra);
1023
1024         /* restore local view exception */
1025         G.scene->lay= lay;
1026         G.scene->r.scemode= scemode;
1027         
1028         if(render_win) window_set_cursor(render_win->win, CURSOR_STD);
1029
1030         free_filesel_spec(G.scene->r.pic);
1031
1032         G.afbreek= 0;
1033         end_test_break_callback();
1034         
1035         mainwindow_make_active();
1036         
1037         /* after an envmap creation...  */
1038 //              if(R.flag & R_REDRAW_PRV) {
1039 //                      BIF_preview_changed(ID_TE);
1040 //              }
1041         allqueue(REDRAWBUTSSCENE, 0);   // visualize fbuf for example
1042         
1043         // before scene update!
1044         G.rendering= 0;
1045         
1046         scene_update_for_newframe(G.scene, G.scene->lay);       // no redraw needed, this restores to view as we left it
1047         
1048         waitcursor(0);  // waitcursor checks rendering R.flag...
1049 }
1050
1051 #if 0
1052 /* used for swapping with spare buffer, when images are different size */
1053 static void scalefastrect(unsigned int *recto, unsigned int *rectn, int oldx, int oldy, int newx, int newy)
1054 {
1055         unsigned int *rect, *newrect;
1056         int x, y;
1057         int ofsx, ofsy, stepx, stepy;
1058
1059         stepx = (int)((65536.0 * (oldx - 1.0) / (newx - 1.0)) + 0.5);
1060         stepy = (int)((65536.0 * (oldy - 1.0) / (newy - 1.0)) + 0.5);
1061         ofsy = 32768;
1062         newrect= rectn;
1063         
1064         for (y = newy; y > 0 ; y--){
1065                 rect = recto;
1066                 rect += (ofsy >> 16) * oldx;
1067                 ofsy += stepy;
1068                 ofsx = 32768;
1069                 for (x = newx ; x>0 ; x--){
1070                         *newrect++ = rect[ofsx >> 16];
1071                         ofsx += stepx;
1072                 }
1073         }
1074 }
1075 #endif
1076
1077 static void renderwin_store_spare(void)
1078 {
1079         RenderResult rres;
1080         
1081         if(render_win==0 || render_win->storespare==0)
1082                 return;
1083
1084         if(render_win->showspare) {
1085                 render_win->showspare= 0;
1086                 window_set_title(render_win->win, renderwin_get_title(1));
1087         }
1088         
1089         if(render_win->render_text_spare) MEM_freeN(render_win->render_text_spare);
1090         render_win->render_text_spare= render_win->render_text;
1091         render_win->render_text= NULL;
1092         
1093         if(render_win->rectspare) MEM_freeN(render_win->rectspare);
1094         render_win->rectspare= NULL;
1095         if(render_win->rectsparef) MEM_freeN(render_win->rectsparef);
1096         render_win->rectsparef= NULL;
1097         
1098         RE_GetResultImage(RE_GetRender("Render"), &rres);
1099         
1100         if(rres.rect32)
1101                 render_win->rectspare= MEM_dupallocN(rres.rect32);
1102         else if(rres.rectf)
1103                 render_win->rectsparef= MEM_dupallocN(rres.rectf);
1104
1105         render_win->sparex= rres.rectx;
1106         render_win->sparey= rres.recty;
1107 }
1108
1109 /* -------------- API: externally called --------------- */
1110
1111 /* not used anywhere ??? */
1112 #if 0
1113 void BIF_renderwin_make_active(void)
1114 {
1115         if(render_win) {
1116                 window_make_active(render_win->win);
1117                 mywinset(2);
1118         }
1119 }
1120 #endif
1121
1122
1123
1124 /* set up display, render an image or scene */
1125 void BIF_do_render(int anim)
1126 {
1127         int slink_flag = 0;
1128
1129         if (G.f & G_DOSCRIPTLINKS) {
1130                 BPY_do_all_scripts(SCRIPT_RENDER);
1131                 if (!anim) { /* avoid FRAMECHANGED slink in render callback */
1132                         G.f &= ~G_DOSCRIPTLINKS;
1133                         slink_flag = 1;
1134                 }
1135         }
1136         
1137         renderwin_store_spare();
1138
1139         do_render(anim);
1140
1141         if(G.scene->use_nodes) {
1142                 allqueue(REDRAWNODE, 1);
1143                 allqueue(REDRAWIMAGE, 1);
1144         }
1145         if (slink_flag) G.f |= G_DOSCRIPTLINKS;
1146         if (G.f & G_DOSCRIPTLINKS) BPY_do_all_scripts(SCRIPT_POSTRENDER);
1147 }
1148
1149 /* set up display, render the current area view in an image */
1150 /* the RE_Render is only used to make sure we got the picture in the result */
1151 void BIF_do_ogl_render(View3D *v3d, int anim)
1152 {
1153         Render *re= RE_NewRender("Render");
1154         RenderResult *rr;
1155         int winx, winy;
1156         
1157         G.afbreek= 0;
1158         init_test_break_callback();
1159         
1160         winx= (G.scene->r.size*G.scene->r.xsch)/100;
1161         winy= (G.scene->r.size*G.scene->r.ysch)/100;
1162         
1163         RE_InitState(re, &G.scene->r, winx, winy, NULL);
1164         
1165         /* for now, result is defaulting to floats still... */
1166         rr= RE_GetResult(re);
1167         if(rr->rect32==NULL)
1168                 rr->rect32= MEM_mallocN(sizeof(int)*winx*winy, "32 bits rects");
1169         
1170         /* open window */
1171         renderwin_init_display_cb(rr);
1172         init_gl_stuff();
1173         
1174         waitcursor(1);
1175
1176         if(anim) {
1177                 bMovieHandle *mh= BKE_get_movie_handle(G.scene->r.imtype);
1178                 int cfrao= CFRA;
1179                 
1180                 mh->start_movie(&G.scene->r, winx, winy);
1181                 
1182                 for(CFRA= SFRA; CFRA<=EFRA; CFRA++) {
1183                         drawview3d_render(v3d, winx, winy);
1184                         glReadPixels(0, 0, winx, winy, GL_RGBA, GL_UNSIGNED_BYTE, rr->rect32);
1185                         window_swap_buffers(render_win->win);
1186                         
1187                         mh->append_movie(CFRA, rr->rect32, winx, winy);
1188                         if(test_break()) break;
1189                 }
1190                 mh->end_movie();
1191                 CFRA= cfrao;
1192         }
1193         else {
1194                 drawview3d_render(v3d, winx, winy);
1195                 glReadPixels(0, 0, winx, winy, GL_RGBA, GL_UNSIGNED_BYTE, rr->rect32);
1196                 window_swap_buffers(render_win->win);
1197         }
1198         
1199         mainwindow_make_active();
1200         
1201         if(anim)
1202                 scene_update_for_newframe(G.scene, G.scene->lay);       // no redraw needed, this restores to view as we left it
1203         
1204         end_test_break_callback();
1205         waitcursor(0);
1206 }
1207
1208 void BIF_redraw_render_rect(void)
1209 {
1210         /* redraw */
1211         if (render_win) {
1212                 renderwin_queue_redraw(render_win);
1213         }
1214 }       
1215
1216 void BIF_swap_render_rects(void)
1217 {
1218         RenderResult rres;
1219         
1220         if (render_win==NULL) return;
1221         
1222         render_win->storespare= 1;
1223         render_win->showspare ^= 1;
1224                 
1225         RE_GetResultImage(RE_GetRender("Render"), &rres);
1226                 
1227         if(render_win->sparex!=rres.rectx || render_win->sparey!=rres.recty) {
1228                 if(render_win->rectspare) MEM_freeN(render_win->rectspare);
1229                 render_win->rectspare= NULL;
1230                 if(render_win->rectsparef) MEM_freeN(render_win->rectsparef);
1231                 render_win->rectsparef= NULL;
1232         }
1233         
1234         window_set_title(render_win->win, renderwin_get_title(1));
1235
1236         /* redraw */
1237         BIF_redraw_render_rect();
1238
1239 }                               
1240
1241 /* called from usiblender.c too, to free and close renderwin */
1242 void BIF_close_render_display(void)
1243 {
1244         if (render_win) {
1245                 if (render_win->info_text) MEM_freeN(render_win->info_text);
1246                 if (render_win->render_text) MEM_freeN(render_win->render_text);
1247                 if (render_win->render_text_spare) MEM_freeN(render_win->render_text_spare);
1248                 if (render_win->rectspare) MEM_freeN(render_win->rectspare);
1249                 if (render_win->rectsparef) MEM_freeN(render_win->rectsparef);
1250                         
1251                 window_destroy(render_win->win); /* ghost close window */
1252                 MEM_freeN(render_win);
1253
1254                 render_win= NULL;
1255         }
1256 }
1257
1258
1259 /* typical with F11 key, show image or hide/close */
1260 void BIF_toggle_render_display(void) 
1261 {
1262         
1263         if (render_win) {
1264                 if(render_win->active) {
1265                         mainwindow_raise();
1266                         mainwindow_make_active();
1267                         render_win->active= 0;
1268                 }
1269                 else {
1270                         window_raise(render_win->win);
1271                         window_make_active(render_win->win);
1272                         render_win->active= 1;
1273                 }
1274         } 
1275         else {
1276                 RenderResult *rr= RE_GetResult(RE_GetRender("Render"));
1277                 if(rr) renderwin_init_display_cb(rr);
1278         }
1279 }
1280
1281 void BIF_renderwin_set_custom_cursor(unsigned char mask[16][2], unsigned char bitmap[16][2])
1282 {
1283         if (render_win) {
1284                 window_set_custom_cursor(render_win->win, mask, bitmap, 7, 7);
1285         }
1286 }