Switching glFlush() to glFinish() in renderwindow drawing for updates...
[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) return;
767                 renrect->ymin= renrect->ymax;
768         }
769         else {
770                 ymin= 0;
771                 ymax= rr->recty-2*rr->crop;
772         }
773         
774         /* renderwindow cruft */
775         win_rct.xmin= win_rct.ymin= 0;
776         window_get_size(rw->win, &win_rct.xmax, &win_rct.ymax);
777         win_rct.ymax-= RW_HEADERY;
778         renderwin_get_fullrect(rw, fullrect);
779         
780         /* find current float rect for display, first case is after composit... still weak */
781         if(rr->rectf)
782                 rectf= rr->rectf;
783         else {
784                 RenderLayer *rl= rr->renlay;
785                 if(rl==NULL) return;
786                 rectf= rl->rectf;
787         }
788         /* if scanline updates... */
789         rectf+= 4*rr->rectx*ymin;
790         
791         /* when rendering more pixels than needed, we crop away cruft */
792         if(rr->crop)
793                 rectf+= 4*(rr->crop*rr->rectx + rr->crop);
794         
795         /* tilerect defines drawing offset from (0,0) */
796         /* however, tilerect (xmin, ymin) is first pixel */
797         fullrect[0][0] += (rr->tilerect.xmin+rr->crop)*rw->zoom;
798         fullrect[0][1] += (rr->tilerect.ymin+rr->crop + ymin)*rw->zoom;
799
800         glEnable(GL_SCISSOR_TEST);
801         glaDefine2DArea(&win_rct);
802
803         glDrawBuffer(GL_FRONT);
804         glPixelZoom(rw->zoom, rw->zoom);
805         glaDrawPixelsSafe(fullrect[0][0], fullrect[0][1], rr->rectx-2*rr->crop, ymax, rr->rectx, 
806                                           GL_RGBA, GL_FLOAT, rectf);
807         glPixelZoom(1.0, 1.0);
808 //      glFlush();
809         glFinish();
810         glDrawBuffer(GL_BACK);
811 }
812
813
814 /* in render window; display a couple of scanlines of rendered image */
815 static void renderwin_progress_display_cb(RenderResult *rr, rcti *rect)
816 {
817         if (render_win) {
818                 renderwin_progress(render_win, rr, rect);
819         }
820 }
821
822 /* -------------- callbacks for render loop: interactivity ----------------------- */
823
824
825 /* callback for print info in top header of renderwin */
826 static void printrenderinfo_cb(RenderStats *rs)
827 {
828         extern char info_time_str[32];  // header_info.c
829         extern int mem_in_use;
830         static float megs_used_memory;
831         char str[300], *spos= str;
832                 
833         if(render_win) {
834                 megs_used_memory= mem_in_use/(1024.0*1024.0);
835                 
836                 if(rs->tothalo)
837                         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);
838                 else 
839                         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);
840
841                 BLI_timestr(rs->lastframetime, info_time_str);
842                 spos+= sprintf(spos, " Time:%s ", info_time_str);
843                 
844                 if(rs->infostr)
845                         spos+= sprintf(spos, " | %s", rs->infostr);
846                 
847                 if(render_win) {
848                         if(render_win->render_text) MEM_freeN(render_win->render_text);
849                         render_win->render_text= BLI_strdup(str);
850                         glDrawBuffer(GL_FRONT);
851                         renderwin_draw_render_info(render_win);
852                         glFlush();
853                         glDrawBuffer(GL_BACK);
854                 }
855         }
856 }
857
858 /* -------------- callback system to allow ESC from rendering ----------------------- */
859
860 /* POSIX & WIN32: this function is called all the time, and should not use cpu or resources */
861 static int test_break(void)
862 {
863
864         if(G.afbreek==2) { /* code for testing queue */
865
866                 G.afbreek= 0;
867
868                 blender_test_break(); /* tests blender interface */
869
870                 if (G.afbreek==0 && render_win) { /* tests window */
871                         winlay_process_events(0);
872                         // render_win can be closed in winlay_process_events()
873                         if (render_win == 0 || (render_win->flags & RW_FLAGS_ESCAPE)) {
874                                 G.afbreek= 1;
875                         }
876                 }
877         }
878
879         if(G.afbreek==1) return 1;
880         else return 0;
881 }
882
883
884
885 #ifdef _WIN32
886 /* we use the multimedia time here */
887 static UINT uRenderTimerId;
888
889 void CALLBACK interruptESC(UINT uID, UINT uMsg, DWORD dwUser, DWORD dw1, DWORD dw2)
890 {
891         if(G.afbreek==0) G.afbreek= 2;  /* code for read queue */
892 }
893
894 /* WIN32: init SetTimer callback */
895 static void init_test_break_callback()
896 {
897         timeBeginPeriod(50);
898         uRenderTimerId = timeSetEvent(250, 1, interruptESC, 0, TIME_PERIODIC);
899 }
900
901 /* WIN32: stop SetTimer callback */
902 static void end_test_break_callback()
903 {
904         timeEndPeriod(50);
905         timeKillEvent(uRenderTimerId);
906 }
907
908 #else
909 /* all other OS's support signal(SIGVTALRM) */
910
911 /* POSIX: this function goes in the signal() callback */
912 static void interruptESC(int sig)
913 {
914
915         if(G.afbreek==0) G.afbreek= 2;  /* code for read queue */
916
917         /* call again, timer was reset */
918         signal(SIGVTALRM, interruptESC);
919 }
920
921 /* POSIX: initialize timer and signal */
922 static void init_test_break_callback()
923 {
924
925         struct itimerval tmevalue;
926
927         tmevalue.it_interval.tv_sec = 0;
928         tmevalue.it_interval.tv_usec = 250000;
929         /* wanneer de eerste ? */
930         tmevalue.it_value.tv_sec = 0;
931         tmevalue.it_value.tv_usec = 10000;
932
933         signal(SIGVTALRM, interruptESC);
934         setitimer(ITIMER_VIRTUAL, &tmevalue, 0);
935
936 }
937
938 /* POSIX: stop timer and callback */
939 static void end_test_break_callback()
940 {
941         struct itimerval tmevalue;
942
943         tmevalue.it_value.tv_sec = 0;
944         tmevalue.it_value.tv_usec = 0;
945         setitimer(ITIMER_VIRTUAL, &tmevalue, 0);
946         signal(SIGVTALRM, SIG_IGN);
947
948 }
949
950
951 #endif
952
953
954
955 /* -------------- callbacks for render loop: init & run! ----------------------- */
956
957
958 /* - initialize displays
959    - set callbacks
960    - cleanup
961 */
962
963 static void do_render(int anim)
964 {
965         Render *re= RE_NewRender("Render");
966         
967         /* we set this flag to prevent renderwindow queue to execute another render */
968         G.rendering= 1;
969         G.afbreek= 0;
970
971         /* set callbacks */
972         RE_display_init_cb(re, renderwin_init_display_cb);
973         RE_display_draw_cb(re, renderwin_progress_display_cb);
974         RE_display_clear_cb(re, renderwin_clear_display_cb);
975         init_test_break_callback();
976         RE_test_break_cb(re, test_break);
977         RE_timecursor_cb(re, set_timecursor);
978         RE_stats_draw_cb(re, printrenderinfo_cb);
979         
980         if(render_win) window_set_cursor(render_win->win, CURSOR_WAIT);
981         waitcursor(1);
982
983         if(G.obedit)
984                 exit_editmode(0);       /* 0 = no free data */
985
986         if(anim)
987                 RE_BlenderAnim(re, G.scene, G.scene->r.sfra, G.scene->r.efra);
988         else
989                 RE_BlenderFrame(re, G.scene, G.scene->r.cfra);
990
991         if(render_win) window_set_cursor(render_win->win, CURSOR_STD);
992
993         free_filesel_spec(G.scene->r.pic);
994
995         G.afbreek= 0;
996         end_test_break_callback();
997         
998         mainwindow_make_active();
999         
1000         /* after an envmap creation...  */
1001 //              if(R.flag & R_REDRAW_PRV) {
1002 //                      BIF_preview_changed(ID_TE);
1003 //              }
1004         allqueue(REDRAWBUTSSCENE, 0);   // visualize fbuf for example
1005         
1006         // before scene update!
1007         G.rendering= 0;
1008         
1009         scene_update_for_newframe(G.scene, G.scene->lay);       // no redraw needed, this restores to view as we left it
1010         
1011         waitcursor(0);  // waitcursor checks rendering R.flag...
1012 }
1013
1014 #if 0
1015 /* used for swapping with spare buffer, when images are different size */
1016 static void scalefastrect(unsigned int *recto, unsigned int *rectn, int oldx, int oldy, int newx, int newy)
1017 {
1018         unsigned int *rect, *newrect;
1019         int x, y;
1020         int ofsx, ofsy, stepx, stepy;
1021
1022         stepx = (int)((65536.0 * (oldx - 1.0) / (newx - 1.0)) + 0.5);
1023         stepy = (int)((65536.0 * (oldy - 1.0) / (newy - 1.0)) + 0.5);
1024         ofsy = 32768;
1025         newrect= rectn;
1026         
1027         for (y = newy; y > 0 ; y--){
1028                 rect = recto;
1029                 rect += (ofsy >> 16) * oldx;
1030                 ofsy += stepy;
1031                 ofsx = 32768;
1032                 for (x = newx ; x>0 ; x--){
1033                         *newrect++ = rect[ofsx >> 16];
1034                         ofsx += stepx;
1035                 }
1036         }
1037 }
1038 #endif
1039
1040 static void renderwin_store_spare(void)
1041 {
1042         RenderResult rres;
1043         
1044         if(render_win==0 || render_win->storespare==0)
1045                 return;
1046
1047         if(render_win->showspare) {
1048                 render_win->showspare= 0;
1049                 window_set_title(render_win->win, renderwin_get_title(1));
1050         }
1051         
1052         if(render_win->render_text_spare) MEM_freeN(render_win->render_text_spare);
1053         render_win->render_text_spare= render_win->render_text;
1054         render_win->render_text= NULL;
1055         
1056         if(render_win->rectspare) MEM_freeN(render_win->rectspare);
1057         render_win->rectspare= NULL;
1058         if(render_win->rectsparef) MEM_freeN(render_win->rectsparef);
1059         render_win->rectsparef= NULL;
1060         
1061         RE_GetResultImage(RE_GetRender("Render"), &rres);
1062         
1063         if(rres.rect32)
1064                 render_win->rectspare= MEM_dupallocN(rres.rect32);
1065         else if(rres.rectf)
1066                 render_win->rectsparef= MEM_dupallocN(rres.rectf);
1067
1068         render_win->sparex= rres.rectx;
1069         render_win->sparey= rres.recty;
1070 }
1071
1072 /* -------------- API: externally called --------------- */
1073
1074 /* not used anywhere ??? */
1075 #if 0
1076 void BIF_renderwin_make_active(void)
1077 {
1078         if(render_win) {
1079                 window_make_active(render_win->win);
1080                 mywinset(2);
1081         }
1082 }
1083 #endif
1084
1085
1086
1087 /* set up display, render an image or scene */
1088 void BIF_do_render(int anim)
1089 {
1090         int slink_flag = 0;
1091
1092         if (G.f & G_DOSCRIPTLINKS) {
1093                 BPY_do_all_scripts(SCRIPT_RENDER);
1094                 if (!anim) { /* avoid FRAMECHANGED slink in render callback */
1095                         G.f &= ~G_DOSCRIPTLINKS;
1096                         slink_flag = 1;
1097                 }
1098         }
1099         
1100         renderwin_store_spare();
1101
1102         do_render(anim);
1103
1104         if(G.scene->use_nodes) {
1105                 allqueue(REDRAWNODE, 1);
1106                 allqueue(REDRAWIMAGE, 1);
1107         }
1108         if (slink_flag) G.f |= G_DOSCRIPTLINKS;
1109         if (G.f & G_DOSCRIPTLINKS) BPY_do_all_scripts(SCRIPT_POSTRENDER);
1110 }
1111
1112 /* set up display, render the current area view in an image */
1113 /* the RE_Render is only used to make sure we got the picture in the result */
1114 void BIF_do_ogl_render(View3D *v3d, int anim)
1115 {
1116         Render *re= RE_NewRender("Render");
1117         RenderResult *rr;
1118         int winx, winy;
1119         
1120         G.afbreek= 0;
1121         init_test_break_callback();
1122         
1123         winx= (G.scene->r.size*G.scene->r.xsch)/100;
1124         winy= (G.scene->r.size*G.scene->r.ysch)/100;
1125         
1126         RE_InitState(re, &G.scene->r, winx, winy, NULL);
1127         
1128         /* for now, result is defaulting to floats still... */
1129         rr= RE_GetResult(re);
1130         if(rr->rect32==NULL)
1131                 rr->rect32= MEM_mallocN(sizeof(int)*winx*winy, "32 bits rects");
1132         
1133         /* open window */
1134         renderwin_init_display_cb(rr);
1135         init_gl_stuff();
1136         
1137         waitcursor(1);
1138
1139         if(anim) {
1140                 bMovieHandle *mh= BKE_get_movie_handle(G.scene->r.imtype);
1141                 int cfrao= CFRA;
1142                 
1143                 mh->start_movie(&G.scene->r, winx, winy);
1144                 
1145                 for(CFRA= SFRA; CFRA<=EFRA; CFRA++) {
1146                         drawview3d_render(v3d, winx, winy);
1147                         glReadPixels(0, 0, winx, winy, GL_RGBA, GL_UNSIGNED_BYTE, rr->rect32);
1148                         window_swap_buffers(render_win->win);
1149                         
1150                         mh->append_movie(CFRA, rr->rect32, winx, winy);
1151                         if(test_break()) break;
1152                 }
1153                 mh->end_movie();
1154                 CFRA= cfrao;
1155         }
1156         else {
1157                 drawview3d_render(v3d, winx, winy);
1158                 glReadPixels(0, 0, winx, winy, GL_RGBA, GL_UNSIGNED_BYTE, rr->rect32);
1159                 window_swap_buffers(render_win->win);
1160         }
1161         
1162         mainwindow_make_active();
1163         
1164         if(anim)
1165                 scene_update_for_newframe(G.scene, G.scene->lay);       // no redraw needed, this restores to view as we left it
1166         
1167         end_test_break_callback();
1168         waitcursor(0);
1169 }
1170
1171 void BIF_redraw_render_rect(void)
1172 {
1173         /* redraw */
1174         if (render_win) {
1175                 renderwin_queue_redraw(render_win);
1176         }
1177 }       
1178
1179 void BIF_swap_render_rects(void)
1180 {
1181         RenderResult rres;
1182         
1183         if (render_win==NULL) return;
1184         
1185         render_win->storespare= 1;
1186         render_win->showspare ^= 1;
1187                 
1188         RE_GetResultImage(RE_GetRender("Render"), &rres);
1189                 
1190         if(render_win->sparex!=rres.rectx || render_win->sparey!=rres.recty) {
1191                 if(render_win->rectspare) MEM_freeN(render_win->rectspare);
1192                 render_win->rectspare= NULL;
1193                 if(render_win->rectsparef) MEM_freeN(render_win->rectsparef);
1194                 render_win->rectsparef= NULL;
1195         }
1196         
1197         window_set_title(render_win->win, renderwin_get_title(1));
1198
1199         /* redraw */
1200         BIF_redraw_render_rect();
1201
1202 }                               
1203
1204 /* called from usiblender.c too, to free and close renderwin */
1205 void BIF_close_render_display(void)
1206 {
1207         if (render_win) {
1208                 if (render_win->info_text) MEM_freeN(render_win->info_text);
1209                 if (render_win->render_text) MEM_freeN(render_win->render_text);
1210                 if (render_win->render_text_spare) MEM_freeN(render_win->render_text_spare);
1211                 if (render_win->rectspare) MEM_freeN(render_win->rectspare);
1212                 if (render_win->rectsparef) MEM_freeN(render_win->rectsparef);
1213                         
1214                 window_destroy(render_win->win); /* ghost close window */
1215                 MEM_freeN(render_win);
1216
1217                 render_win= NULL;
1218         }
1219 }
1220
1221
1222 /* typical with F11 key, show image or hide/close */
1223 void BIF_toggle_render_display(void) 
1224 {
1225         
1226         if (render_win) {
1227                 if(render_win->active) {
1228                         mainwindow_raise();
1229                         mainwindow_make_active();
1230                         render_win->active= 0;
1231                 }
1232                 else {
1233                         window_raise(render_win->win);
1234                         window_make_active(render_win->win);
1235                         render_win->active= 1;
1236                 }
1237         } 
1238         else {
1239                 RenderResult *rr= RE_GetResult(RE_GetRender("Render"));
1240                 if(rr) renderwin_init_display_cb(rr);
1241         }
1242 }
1243
1244 void BIF_renderwin_set_custom_cursor(unsigned char mask[16][2], unsigned char bitmap[16][2])
1245 {
1246         if (render_win) {
1247                 window_set_custom_cursor(render_win->win, mask, bitmap, 7, 7);
1248         }
1249 }