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