merge from trunk #37722
[blender-staging.git] / source / blender / editors / interface / interface.c
1 /*
2  * $Id$
3  *
4  * ***** BEGIN GPL 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.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software Foundation,
18  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
19  *
20  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
21  * All rights reserved.
22  *
23  * Contributor(s): Blender Foundation 2002-2008, full recode.
24  *
25  * ***** END GPL LICENSE BLOCK *****
26  */
27
28 /** \file blender/editors/interface/interface.c
29  *  \ingroup edinterface
30  */
31
32
33 #include <float.h>
34 #include <limits.h>
35 #include <math.h>
36 #include <string.h>
37 #include <ctype.h>
38  
39 #include "MEM_guardedalloc.h"
40
41 #include "DNA_scene_types.h"
42 #include "DNA_screen_types.h"
43 #include "DNA_userdef_types.h"
44
45 #include "BLI_math.h"
46 #include "BLI_blenlib.h"
47 #include "BLI_dynstr.h"
48 #include "BLI_utildefines.h"
49
50 #include "BKE_context.h"
51 #include "BKE_library.h"
52 #include "BKE_unit.h"
53 #include "BKE_utildefines.h" /* FILE_MAX */
54
55 #include "BIF_gl.h"
56
57 #include "BLF_api.h"
58
59 #include "UI_interface.h"
60
61
62 #include "WM_api.h"
63 #include "WM_types.h"
64 #include "wm_subwindow.h"
65 #include "wm_window.h"
66
67 #include "RNA_access.h"
68
69 #include "BPY_extern.h"
70
71 #include "interface_intern.h"
72
73 #define MENU_WIDTH                      120
74 #define MENU_ITEM_HEIGHT        20
75 #define MENU_SEP_HEIGHT         6
76
77 #define PRECISION_FLOAT_MAX 7
78 #define PRECISION_FLOAT_MAX_POW 10000000 /* pow(10, PRECISION_FLOAT_MAX)  */
79
80 /* avoid unneeded calls to ui_get_but_val */
81 #define UI_BUT_VALUE_UNSET DBL_MAX
82 #define UI_GET_BUT_VALUE_INIT(_but, _value) if(_value == DBL_MAX) {  (_value)= ui_get_but_val(_but); }
83
84 /* 
85  * a full doc with API notes can be found in bf-blender/trunk/blender/doc/guides/interface_API.txt
86  * 
87  * uiBlahBlah()         external function
88  * ui_blah_blah()       internal function
89  */
90
91 static void ui_free_but(const bContext *C, uiBut *but);
92
93 /* ************* translation ************** */
94
95 int ui_translate_buttons(void)
96 {
97         return (U.transopts & USER_TR_BUTTONS);
98 }
99
100 int ui_translate_menus(void)
101 {
102         return (U.transopts & USER_TR_MENUS);
103 }
104
105 int ui_translate_tooltips(void)
106 {
107         return (U.transopts & USER_TR_TOOLTIPS);
108 }
109
110 /* ************* window matrix ************** */
111
112 void ui_block_to_window_fl(const ARegion *ar, uiBlock *block, float *x, float *y)
113 {
114         float gx, gy;
115         int sx, sy, getsizex, getsizey;
116
117         getsizex= ar->winrct.xmax-ar->winrct.xmin+1;
118         getsizey= ar->winrct.ymax-ar->winrct.ymin+1;
119         sx= ar->winrct.xmin;
120         sy= ar->winrct.ymin;
121
122         gx= *x;
123         gy= *y;
124
125         if(block->panel) {
126                 gx += block->panel->ofsx;
127                 gy += block->panel->ofsy;
128         }
129
130         *x= ((float)sx) + ((float)getsizex)*(0.5f+ 0.5f*(gx*block->winmat[0][0]+ gy*block->winmat[1][0]+ block->winmat[3][0]));
131         *y= ((float)sy) + ((float)getsizey)*(0.5f+ 0.5f*(gx*block->winmat[0][1]+ gy*block->winmat[1][1]+ block->winmat[3][1]));
132 }
133
134 void ui_block_to_window(const ARegion *ar, uiBlock *block, int *x, int *y)
135 {
136         float fx, fy;
137
138         fx= *x;
139         fy= *y;
140
141         ui_block_to_window_fl(ar, block, &fx, &fy);
142
143         *x= (int)(fx+0.5f);
144         *y= (int)(fy+0.5f);
145 }
146
147 void ui_block_to_window_rct(const ARegion *ar, uiBlock *block, rctf *graph, rcti *winr)
148 {
149         rctf tmpr;
150
151         tmpr= *graph;
152         ui_block_to_window_fl(ar, block, &tmpr.xmin, &tmpr.ymin);
153         ui_block_to_window_fl(ar, block, &tmpr.xmax, &tmpr.ymax);
154
155         winr->xmin= tmpr.xmin;
156         winr->ymin= tmpr.ymin;
157         winr->xmax= tmpr.xmax;
158         winr->ymax= tmpr.ymax;
159 }
160
161 void ui_window_to_block_fl(const ARegion *ar, uiBlock *block, float *x, float *y)       /* for mouse cursor */
162 {
163         float a, b, c, d, e, f, px, py;
164         int sx, sy, getsizex, getsizey;
165
166         getsizex= ar->winrct.xmax-ar->winrct.xmin+1;
167         getsizey= ar->winrct.ymax-ar->winrct.ymin+1;
168         sx= ar->winrct.xmin;
169         sy= ar->winrct.ymin;
170
171         a= 0.5f*((float)getsizex)*block->winmat[0][0];
172         b= 0.5f*((float)getsizex)*block->winmat[1][0];
173         c= 0.5f*((float)getsizex)*(1.0f+block->winmat[3][0]);
174
175         d= 0.5f*((float)getsizey)*block->winmat[0][1];
176         e= 0.5f*((float)getsizey)*block->winmat[1][1];
177         f= 0.5f*((float)getsizey)*(1.0f+block->winmat[3][1]);
178
179         px= *x - sx;
180         py= *y - sy;
181
182         *y=  (a*(py-f) + d*(c-px))/(a*e-d*b);
183         *x= (px- b*(*y)- c)/a;
184
185         if(block->panel) {
186                 *x -= block->panel->ofsx;
187                 *y -= block->panel->ofsy;
188         }
189 }
190
191 void ui_window_to_block(const ARegion *ar, uiBlock *block, int *x, int *y)
192 {
193         float fx, fy;
194
195         fx= *x;
196         fy= *y;
197
198         ui_window_to_block_fl(ar, block, &fx, &fy);
199
200         *x= (int)(fx+0.5f);
201         *y= (int)(fy+0.5f);
202 }
203
204 void ui_window_to_region(const ARegion *ar, int *x, int *y)
205 {
206         *x-= ar->winrct.xmin;
207         *y-= ar->winrct.ymin;
208 }
209
210 /* ******************* block calc ************************* */
211
212 void ui_block_translate(uiBlock *block, int x, int y)
213 {
214         uiBut *bt;
215
216         for(bt= block->buttons.first; bt; bt=bt->next) {
217                 bt->x1 += x;
218                 bt->y1 += y;
219                 bt->x2 += x;
220                 bt->y2 += y;
221         }
222
223         block->minx += x;
224         block->miny += y;
225         block->maxx += x;
226         block->maxy += y;
227 }
228
229 static void ui_text_bounds_block(uiBlock *block, float offset)
230 {
231         uiStyle *style= U.uistyles.first;       // XXX pass on as arg
232         uiBut *bt;
233         int i = 0, j, x1addval= offset, nextcol;
234         int lastcol= 0, col= 0;
235         
236         uiStyleFontSet(&style->widget);
237         
238         for(bt= block->buttons.first; bt; bt= bt->next) {
239                 if(bt->type!=SEPR) {
240                         //int transopts= ui_translate_buttons();
241                         //if(bt->type==TEX || bt->type==IDPOIN) transopts= 0;
242                         
243                         j= BLF_width(style->widget.uifont_id, bt->drawstr);
244
245                         if(j > i) i = j;
246                 }
247
248                 if(bt->next && bt->x1 < bt->next->x1)
249                         lastcol++;
250         }
251
252         /* cope with multi collumns */
253         bt= block->buttons.first;
254         while(bt) {
255                 if(bt->next && bt->x1 < bt->next->x1) {
256                         nextcol= 1;
257                         col++;
258                 }
259                 else nextcol= 0;
260                 
261                 bt->x1 = x1addval;
262                 bt->x2 = bt->x1 + i + block->bounds;
263                 
264                 if(col == lastcol)
265                         bt->x2= MAX2(bt->x2, offset + block->minbounds);
266
267                 ui_check_but(bt);       // clips text again
268                 
269                 if(nextcol)
270                         x1addval+= i + block->bounds;
271                 
272                 bt= bt->next;
273         }
274 }
275
276 void ui_bounds_block(uiBlock *block)
277 {
278         uiBut *bt;
279         int xof;
280         
281         if(block->buttons.first==NULL) {
282                 if(block->panel) {
283                         block->minx= 0.0; block->maxx= block->panel->sizex;
284                         block->miny= 0.0; block->maxy= block->panel->sizey;
285                 }
286         }
287         else {
288         
289                 block->minx= block->miny= 10000;
290                 block->maxx= block->maxy= -10000;
291                 
292                 bt= block->buttons.first;
293                 while(bt) {
294                         if(bt->x1 < block->minx) block->minx= bt->x1;
295                         if(bt->y1 < block->miny) block->miny= bt->y1;
296         
297                           if(bt->x2 > block->maxx) block->maxx= bt->x2;
298                         if(bt->y2 > block->maxy) block->maxy= bt->y2;
299
300                         bt= bt->next;
301                 }
302                 
303                 block->minx -= block->bounds;
304                 block->miny -= block->bounds;
305                 block->maxx += block->bounds;
306                 block->maxy += block->bounds;
307         }
308
309         block->maxx= block->minx + MAX2(block->maxx - block->minx, block->minbounds);
310
311         /* hardcoded exception... but that one is annoying with larger safety */ 
312         bt= block->buttons.first;
313         if(bt && strncmp(bt->str, "ERROR", 5)==0) xof= 10;
314         else xof= 40;
315         
316         block->safety.xmin= block->minx-xof;
317         block->safety.ymin= block->miny-xof;
318         block->safety.xmax= block->maxx+xof;
319         block->safety.ymax= block->maxy+xof;
320 }
321
322 static void ui_centered_bounds_block(const bContext *C, uiBlock *block)
323 {
324         wmWindow *window= CTX_wm_window(C);
325         int xmax, ymax;
326         int startx, starty;
327         int width, height;
328         
329         /* note: this is used for the splash where window bounds event has not been
330          * updated by ghost, get the window bounds from ghost directly */
331
332         // wm_window_get_size(window, &xmax, &ymax);
333         wm_window_get_size_ghost(window, &xmax, &ymax);
334         
335         ui_bounds_block(block);
336         
337         width= block->maxx - block->minx;
338         height= block->maxy - block->miny;
339         
340         startx = (xmax * 0.5f) - (width * 0.5f);
341         starty = (ymax * 0.5f) - (height * 0.5f);
342         
343         ui_block_translate(block, startx - block->minx, starty - block->miny);
344         
345         /* now recompute bounds and safety */
346         ui_bounds_block(block);
347         
348 }
349 static void ui_popup_bounds_block(const bContext *C, uiBlock *block, int bounds_calc)
350 {
351         wmWindow *window= CTX_wm_window(C);
352         int startx, starty, endx, endy, width, height, oldwidth, oldheight;
353         int oldbounds, xmax, ymax;
354
355         oldbounds= block->bounds;
356
357         /* compute mouse position with user defined offset */
358         ui_bounds_block(block);
359         
360         wm_window_get_size(window, &xmax, &ymax);
361
362         oldwidth= block->maxx - block->minx;
363         oldheight= block->maxy - block->miny;
364
365         /* first we ensure wide enough text bounds */
366         if(bounds_calc==UI_BLOCK_BOUNDS_POPUP_MENU) {
367                 if(block->flag & UI_BLOCK_LOOP) {
368                         block->bounds= 50;
369                         ui_text_bounds_block(block, block->minx);
370                 }
371         }
372
373         /* next we recompute bounds */
374         block->bounds= oldbounds;
375         ui_bounds_block(block);
376
377         /* and we adjust the position to fit within window */
378         width= block->maxx - block->minx;
379         height= block->maxy - block->miny;
380
381         /* avoid divide by zero below, caused by calling with no UI, but better not crash */
382         oldwidth= oldwidth > 0 ? oldwidth : MAX2(1, width);
383         oldheight= oldheight > 0 ? oldheight : MAX2(1, height);
384
385         /* offset block based on mouse position, user offset is scaled
386            along in case we resized the block in ui_text_bounds_block */
387         startx= window->eventstate->x + block->minx + (block->mx*width)/oldwidth;
388         starty= window->eventstate->y + block->miny + (block->my*height)/oldheight;
389
390         if(startx<10)
391                 startx= 10;
392         if(starty<10)
393                 starty= 10;
394         
395         endx= startx+width;
396         endy= starty+height;
397         
398         if(endx>xmax) {
399                 endx= xmax-10;
400                 startx= endx-width;
401         }
402         if(endy>ymax-20) {
403                 endy= ymax-20;
404                 starty= endy-height;
405         }
406
407         ui_block_translate(block, startx - block->minx, starty - block->miny);
408
409         /* now recompute bounds and safety */
410         ui_bounds_block(block);
411 }
412
413 /* used for various cases */
414 void uiBoundsBlock(uiBlock *block, int addval)
415 {
416         if(block==NULL)
417                 return;
418         
419         block->bounds= addval;
420         block->dobounds= UI_BLOCK_BOUNDS;
421 }
422
423 /* used for pulldowns */
424 void uiTextBoundsBlock(uiBlock *block, int addval)
425 {
426         block->bounds= addval;
427         block->dobounds= UI_BLOCK_BOUNDS_TEXT;
428 }
429
430 /* used for block popups */
431 void uiPopupBoundsBlock(uiBlock *block, int addval, int mx, int my)
432 {
433         block->bounds= addval;
434         block->dobounds= UI_BLOCK_BOUNDS_POPUP_MOUSE;
435         block->mx= mx;
436         block->my= my;
437 }
438
439 /* used for menu popups */
440 void uiMenuPopupBoundsBlock(uiBlock *block, int addval, int mx, int my)
441 {
442         block->bounds= addval;
443         block->dobounds= UI_BLOCK_BOUNDS_POPUP_MENU;
444         block->mx= mx;
445         block->my= my;
446 }
447
448 /* used for centered popups, i.e. splash */
449 void uiCenteredBoundsBlock(uiBlock *block, int addval)
450 {
451         block->bounds= addval;
452         block->dobounds= UI_BLOCK_BOUNDS_POPUP_CENTER;
453 }
454
455 /* ************** LINK LINE DRAWING  ************* */
456
457 /* link line drawing is not part of buttons or theme.. so we stick with it here */
458
459 static int ui_but_float_precision(uiBut *but, double value)
460 {
461         int prec;
462
463         /* first check if prec is 0 and fallback to a simple default */
464         if((prec= (int)but->a2) == 0) {
465                 prec= (but->hardmax < 10.001f) ? 3 : 2;
466         }
467
468         /* check on the number of decimal places neede to display
469          * the number, this is so 0.00001 is not displayed as 0.00,
470          * _but_, this is only for small values si 10.0001 will not get
471          * the same treatment */
472         if(value != 0.0 && (value= ABS(value)) < 0.1) {
473                 int value_i= (int)((value * PRECISION_FLOAT_MAX_POW) + 0.5);
474                 if(value_i != 0) {
475                         const int prec_span= 3; /* show: 0.01001, 5 would allow 0.0100001 for eg. */
476                         int test_prec;
477                         int prec_min= -1;
478                         int dec_flag= 0;
479                         int i= PRECISION_FLOAT_MAX;
480                         while(i && value_i) {
481                                 if(value_i % 10) {
482                                         dec_flag |= 1<<i;
483                                         prec_min= i;
484                                 }
485                                 value_i /= 10;
486                                 i--;
487                         }
488
489                         /* even though its a small value, if the second last digit is not 0, use it */
490                         test_prec = prec_min;
491
492                         dec_flag= (dec_flag >> (prec_min + 1)) & ((1 << prec_span) - 1);
493
494                         while(dec_flag) {
495                                 test_prec++;
496                                 dec_flag = dec_flag >> 1;
497                         }
498
499                         if(test_prec > prec) {
500                                 prec= test_prec;
501                         }
502                 }
503         }
504
505         CLAMP(prec, 1, PRECISION_FLOAT_MAX);
506
507         return prec;
508 }
509
510 static void ui_draw_linkline(uiLinkLine *line)
511 {
512         rcti rect;
513
514         if(line->from==NULL || line->to==NULL) return;
515         
516         rect.xmin= (line->from->x1+line->from->x2)/2.0f;
517         rect.ymin= (line->from->y1+line->from->y2)/2.0f;
518         rect.xmax= (line->to->x1+line->to->x2)/2.0f;
519         rect.ymax= (line->to->y1+line->to->y2)/2.0f;
520         
521         if(line->flag & UI_SELECT) 
522                 glColor3ub(100,100,100);
523         else 
524                 glColor3ub(0,0,0);
525
526         ui_draw_link_bezier(&rect);
527 }
528
529 static void ui_draw_links(uiBlock *block)
530 {
531         uiBut *but;
532         uiLinkLine *line;
533         
534         but= block->buttons.first;
535         while(but) {
536                 if(but->type==LINK && but->link) {
537                         line= but->link->lines.first;
538                         while(line) {
539                                 ui_draw_linkline(line);
540                                 line= line->next;
541                         }
542                 }
543                 but= but->next;
544         }       
545 }
546
547 /* ************** BLOCK ENDING FUNCTION ************* */
548
549 /* NOTE: if but->poin is allocated memory for every defbut, things fail... */
550 static int ui_but_equals_old(uiBut *but, uiBut *oldbut)
551 {
552         /* various properties are being compared here, hopfully sufficient
553          * to catch all cases, but it is simple to add more checks later */
554         if(but->retval != oldbut->retval) return 0;
555         if(but->rnapoin.data != oldbut->rnapoin.data) return 0;
556         if(but->rnaprop != oldbut->rnaprop)
557                 if(but->rnaindex != oldbut->rnaindex) return 0;
558         if(but->func != oldbut->func) return 0;
559         if(but->funcN != oldbut->funcN) return 0;
560         if(oldbut->func_arg1 != oldbut && but->func_arg1 != oldbut->func_arg1) return 0;
561         if(oldbut->func_arg2 != oldbut && but->func_arg2 != oldbut->func_arg2) return 0;
562         if(!but->funcN && ((but->poin != oldbut->poin && (uiBut*)oldbut->poin != oldbut) || but->pointype != oldbut->pointype)) return 0;
563         if(but->optype != oldbut->optype) return 0;
564
565         return 1;
566 }
567
568 /* oldbut is being inserted in new block, so we use the lines from new button, and replace button pointers */
569 static void ui_but_update_linklines(uiBlock *block, uiBut *oldbut, uiBut *newbut)
570 {
571         uiLinkLine *line;
572         uiBut *but;
573         
574         /* if active button is LINK */
575         if(newbut->type==LINK && newbut->link) {
576                 
577                 SWAP(uiLink *, oldbut->link, newbut->link);
578                 
579                 for(line= oldbut->link->lines.first; line; line= line->next) {
580                         if(line->to==newbut)
581                                 line->to= oldbut;
582                         if(line->from==newbut)
583                                 line->from= oldbut;
584                 }
585         }               
586         
587         /* check all other button links */
588         for(but= block->buttons.first; but; but= but->next) {
589                 if(but!=newbut && but->type==LINK && but->link) {
590                         for(line= but->link->lines.first; line; line= line->next) {
591                                 if(line->to==newbut)
592                                         line->to= oldbut;
593                                 if(line->from==newbut)
594                                         line->from= oldbut;
595                         }
596                 }
597         }
598 }
599
600 static int ui_but_update_from_old_block(const bContext *C, uiBlock *block, uiBut **butpp)
601 {
602         uiBlock *oldblock;
603         uiBut *oldbut, *but= *butpp;
604         int found= 0;
605
606         oldblock= block->oldblock;
607         if(!oldblock)
608                 return found;
609
610         for(oldbut=oldblock->buttons.first; oldbut; oldbut=oldbut->next) {
611                 if(ui_but_equals_old(oldbut, but)) {
612                         if(oldbut->active) {
613 #if 0
614 //                              but->flag= oldbut->flag;
615 #else
616                                 /* exception! redalert flag can't be update from old button. 
617                                  * perhaps it should only copy spesific flags rather than all. */
618 //                              but->flag= (oldbut->flag & ~UI_BUT_REDALERT) | (but->flag & UI_BUT_REDALERT);
619 #endif
620 //                              but->active= oldbut->active;
621 //                              but->pos= oldbut->pos;
622 //                              but->ofs= oldbut->ofs;
623 //                              but->editstr= oldbut->editstr;
624 //                              but->editval= oldbut->editval;
625 //                              but->editvec= oldbut->editvec;
626 //                              but->editcoba= oldbut->editcoba;
627 //                              but->editcumap= oldbut->editcumap;
628 //                              but->selsta= oldbut->selsta;
629 //                              but->selend= oldbut->selend;
630 //                              but->softmin= oldbut->softmin;
631 //                              but->softmax= oldbut->softmax;
632 //                              but->linkto[0]= oldbut->linkto[0];
633 //                              but->linkto[1]= oldbut->linkto[1];
634                                 found= 1;
635 //                              oldbut->active= NULL;
636                         
637                                 /* move button over from oldblock to new block */
638                                 BLI_remlink(&oldblock->buttons, oldbut);
639                                 BLI_insertlink(&block->buttons, but, oldbut);
640                                 oldbut->block= block;
641                                 *butpp= oldbut;
642                                 
643                                 /* still stuff needs to be copied */
644                                 oldbut->x1= but->x1; oldbut->y1= but->y1;
645                                 oldbut->x2= but->x2; oldbut->y2= but->y2;
646                                 oldbut->context= but->context; /* set by Layout */
647                                 
648                                 /* typically the same pointers, but not on undo/redo */
649                                 /* XXX some menu buttons store button itself in but->poin. Ugly */
650                                 if(oldbut->poin != (char *)oldbut) {
651                                         SWAP(char *, oldbut->poin, but->poin)
652                                         SWAP(void *, oldbut->func_argN, but->func_argN)
653                                 }
654                                 
655                                 ui_but_update_linklines(block, oldbut, but);
656                                 
657                                 BLI_remlink(&block->buttons, but);
658                                 ui_free_but(C, but);
659                                 
660                                 /* note: if layout hasn't been applied yet, it uses old button pointers... */
661                         }
662                         else {
663                                 /* ensures one button can get activated, and in case the buttons
664                                  * draw are the same this gives O(1) lookup for each button */
665                                 BLI_remlink(&oldblock->buttons, oldbut);
666                                 ui_free_but(C, oldbut);
667                         }
668                         
669                         break;
670                 }
671         }
672         
673         return found;
674 }
675
676 /* needed for temporarily rename buttons, such as in outliner or fileselect,
677    they should keep calling uiDefButs to keep them alive */
678 /* returns 0 when button removed */
679 int uiButActiveOnly(const bContext *C, uiBlock *block, uiBut *but)
680 {
681         uiBlock *oldblock;
682         uiBut *oldbut;
683         int activate= 0, found= 0, isactive= 0;
684         
685         oldblock= block->oldblock;
686         if(!oldblock)
687                 activate= 1;
688         else {
689                 for(oldbut=oldblock->buttons.first; oldbut; oldbut=oldbut->next) {
690                         if(ui_but_equals_old(oldbut, but)) {
691                                 found= 1;
692                                 
693                                 if(oldbut->active)
694                                         isactive= 1;
695                                 
696                                 break;
697                         }
698                 }
699         }
700         if(activate || found==0) {
701                 ui_button_activate_do( (bContext *)C, CTX_wm_region(C), but);
702         }
703         else if(found && isactive==0) {
704                 
705                 BLI_remlink(&block->buttons, but);
706                 ui_free_but(C, but);
707                 return 0;
708         }
709         
710         return 1;
711 }
712
713 /* assigns automatic keybindings to menu items for fast access
714  * (underline key in menu) */
715 static void ui_menu_block_set_keyaccels(uiBlock *block)
716 {
717         uiBut *but;
718
719         unsigned int meny_key_mask= 0;
720         unsigned char menu_key;
721         const char *str_pt;
722         int pass;
723         int tot_missing= 0;
724
725         /* only do it before bounding */
726         if(block->minx != block->maxx)
727                 return;
728
729         for(pass=0; pass<2; pass++) {
730                 /* 2 Passes, on for first letter only, second for any letter if first fails
731                  * fun first pass on all buttons so first word chars always get first priority */
732
733                 for(but=block->buttons.first; but; but=but->next) {
734                         if(!ELEM4(but->type, BUT, MENU, BLOCK, PULLDOWN) || (but->flag & UI_HIDDEN)) {
735                                 /* pass */
736                         }
737                         else if(but->menu_key=='\0') {
738                                 if(but->str) {
739                                         for(str_pt= but->str; *str_pt; ) {
740                                                 menu_key= tolower(*str_pt);
741                                                 if((menu_key >= 'a' && menu_key <= 'z') && !(meny_key_mask & 1<<(menu_key-'a'))) {
742                                                         meny_key_mask |= 1<<(menu_key-'a');
743                                                         break;
744                                                 }
745
746                                                 if(pass==0) {
747                                                         /* Skip to next delimeter on first pass (be picky) */
748                                                         while(isalpha(*str_pt))
749                                                                 str_pt++;
750
751                                                         if(*str_pt)
752                                                                 str_pt++;
753                                                 }
754                                                 else {
755                                                         /* just step over every char second pass and find first usable key */
756                                                         str_pt++;
757                                                 }
758                                         }
759
760                                         if(*str_pt) {
761                                                 but->menu_key= menu_key;
762                                         }
763                                         else {
764                                                 /* run second pass */
765                                                 tot_missing++;
766                                         }
767
768                                         /* if all keys have been used just exit, unlikely */
769                                         if(meny_key_mask == (1<<26)-1) {
770                                                 return;
771                                         }
772                                 }
773                         }
774                 }
775
776                 /* check if second pass is needed */
777                 if(!tot_missing) {
778                         break;
779                 }
780         }
781 }
782
783
784 static void ui_menu_block_set_keymaps(const bContext *C, uiBlock *block)
785 {
786         uiBut *but;
787         IDProperty *prop;
788         char buf[512];
789
790         /* only do it before bounding */
791         if(block->minx != block->maxx)
792                 return;
793
794         for(but=block->buttons.first; but; but=but->next) {
795                 if(but->optype) {
796                         prop= (but->opptr)? but->opptr->data: NULL;
797
798                         if(WM_key_event_operator_string(C, but->optype->idname, but->opcontext, prop, buf, sizeof(buf))) {
799                                 char *butstr_orig= BLI_strdup(but->str);
800                                 BLI_snprintf(but->strdata, sizeof(but->strdata), "%s|%s", butstr_orig, buf);
801                                 MEM_freeN(butstr_orig);
802                                 but->str= but->strdata;
803                                 ui_check_but(but);
804                         }
805                 }
806         }
807 }
808
809 void uiEndBlock(const bContext *C, uiBlock *block)
810 {
811         uiBut *but;
812         Scene *scene= CTX_data_scene(C);
813
814         /* inherit flags from 'old' buttons that was drawn here previous, based
815          * on matching buttons, we need this to make button event handling non
816          * blocking, while still alowing buttons to be remade each redraw as it
817          * is expected by blender code */
818         for(but=block->buttons.first; but; but=but->next) {
819                 if(ui_but_update_from_old_block(C, block, &but))
820                         ui_check_but(but);
821                 
822                 /* temp? Proper check for greying out */
823                 if(but->optype) {
824                         wmOperatorType *ot= but->optype;
825
826                         if(but->context)
827                                 CTX_store_set((bContext*)C, but->context);
828
829                         if(ot == NULL || WM_operator_poll_context((bContext*)C, ot, but->opcontext)==0) {
830                                 but->flag |= UI_BUT_DISABLED;
831                                 but->lock = 1;
832                         }
833
834                         if(but->context)
835                                 CTX_store_set((bContext*)C, NULL);
836                 }
837
838                 ui_but_anim_flag(but, (scene)? scene->r.cfra: 0.0f);
839         }
840
841         if(block->oldblock) {
842                 block->auto_open= block->oldblock->auto_open;
843                 block->auto_open_last= block->oldblock->auto_open_last;
844                 block->tooltipdisabled= block->oldblock->tooltipdisabled;
845
846                 block->oldblock= NULL;
847         }
848
849         /* handle pending stuff */
850         if(block->layouts.first) uiBlockLayoutResolve(block, NULL, NULL);
851         ui_block_do_align(block);
852         if((block->flag & UI_BLOCK_LOOP) && (block->flag & UI_BLOCK_NUMSELECT)) ui_menu_block_set_keyaccels(block); /* could use a different flag to check */
853         if(block->flag & UI_BLOCK_LOOP) ui_menu_block_set_keymaps(C, block);
854         
855         /* after keymaps! */
856         if(block->dobounds == UI_BLOCK_BOUNDS) ui_bounds_block(block);
857         else if(block->dobounds == UI_BLOCK_BOUNDS_TEXT) ui_text_bounds_block(block, 0.0f);
858         else if(block->dobounds == UI_BLOCK_BOUNDS_POPUP_CENTER) ui_centered_bounds_block(C, block);
859         else if(block->dobounds) ui_popup_bounds_block(C, block, block->dobounds);
860
861         if(block->minx==0.0f && block->maxx==0.0f) uiBoundsBlock(block, 0);
862         if(block->flag & UI_BUT_ALIGN) uiBlockEndAlign(block);
863
864         block->endblock= 1;
865 }
866
867 /* ************** BLOCK DRAWING FUNCTION ************* */
868
869 void ui_fontscale(short *points, float aspect)
870 {
871         if(aspect < 0.9f || aspect > 1.1f) {
872                 float pointsf= *points;
873                 
874                 /* for some reason scaling fonts goes too fast compared to widget size */
875                 aspect= sqrt(aspect);
876                 pointsf /= aspect;
877                 
878                 if(aspect > 1.0f)
879                         *points= ceilf(pointsf);
880                 else
881                         *points= floorf(pointsf);
882         }
883 }
884
885 /* project button or block (but==NULL) to pixels in regionspace */
886 static void ui_but_to_pixelrect(rcti *rect, const ARegion *ar, uiBlock *block, uiBut *but)
887 {
888         float gx, gy;
889         float getsizex, getsizey;
890         
891         getsizex= ar->winx;
892         getsizey= ar->winy;
893
894         gx= (but?but->x1:block->minx) + (block->panel?block->panel->ofsx:0.0f);
895         gy= (but?but->y1:block->miny) + (block->panel?block->panel->ofsy:0.0f);
896         
897         rect->xmin= floorf(getsizex*(0.5f+ 0.5f*(gx*block->winmat[0][0]+ gy*block->winmat[1][0]+ block->winmat[3][0])));
898         rect->ymin= floorf(getsizey*(0.5f+ 0.5f*(gx*block->winmat[0][1]+ gy*block->winmat[1][1]+ block->winmat[3][1])));
899         
900         gx= (but?but->x2:block->maxx) + (block->panel?block->panel->ofsx:0.0f);
901         gy= (but?but->y2:block->maxy) + (block->panel?block->panel->ofsy:0.0f);
902         
903         rect->xmax= floorf(getsizex*(0.5f+ 0.5f*(gx*block->winmat[0][0]+ gy*block->winmat[1][0]+ block->winmat[3][0])));
904         rect->ymax= floorf(getsizey*(0.5f+ 0.5f*(gx*block->winmat[0][1]+ gy*block->winmat[1][1]+ block->winmat[3][1])));
905
906 }
907
908 /* uses local copy of style, to scale things down, and allow widgets to change stuff */
909 void uiDrawBlock(const bContext *C, uiBlock *block)
910 {
911         uiStyle style= *((uiStyle *)U.uistyles.first);  // XXX pass on as arg
912         ARegion *ar;
913         uiBut *but;
914         rcti rect;
915         
916         /* get menu region or area region */
917         ar= CTX_wm_menu(C);
918         if(!ar)
919                 ar= CTX_wm_region(C);
920
921         if(!block->endblock)
922                 uiEndBlock(C, block);
923
924         /* we set this only once */
925         glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
926         
927         /* scale fonts */
928         ui_fontscale(&style.paneltitle.points, block->aspect);
929         ui_fontscale(&style.grouplabel.points, block->aspect);
930         ui_fontscale(&style.widgetlabel.points, block->aspect);
931         ui_fontscale(&style.widget.points, block->aspect);
932         
933         /* scale block min/max to rect */
934         ui_but_to_pixelrect(&rect, ar, block, NULL);
935         
936         /* pixel space for AA widgets */
937         glMatrixMode(GL_PROJECTION);
938         glPushMatrix();
939         glMatrixMode(GL_MODELVIEW);
940         glPushMatrix();
941         glLoadIdentity();
942         
943         wmOrtho2(-0.01f, ar->winx-0.01f, -0.01f, ar->winy-0.01f);
944         
945         /* back */
946         if(block->flag & UI_BLOCK_LOOP)
947                 ui_draw_menu_back(&style, block, &rect);
948         else if(block->panel)
949                 ui_draw_aligned_panel(&style, block, &rect);
950
951         /* widgets */
952         for(but= block->buttons.first; but; but= but->next) {
953                 if(!(but->flag & (UI_HIDDEN|UI_SCROLLED))) {
954                         ui_but_to_pixelrect(&rect, ar, block, but);
955                 
956                         /* XXX: figure out why invalid coordinates happen when closing render window */
957                         /* and material preview is redrawn in main window (temp fix for bug #23848) */
958                         if(rect.xmin < rect.xmax && rect.ymin < rect.ymax)
959                                 ui_draw_but(C, ar, &style, but, &rect);
960                 }
961         }
962         
963         /* restore matrix */
964         glMatrixMode(GL_PROJECTION);
965         glPopMatrix();
966         glMatrixMode(GL_MODELVIEW);
967         glPopMatrix();
968         
969         ui_draw_links(block);
970 }
971
972 /* ************* EVENTS ************* */
973
974 static void ui_is_but_sel(uiBut *but, double *value)
975 {
976         short push=0, true=1;
977
978         if(ELEM3(but->type, TOGN, ICONTOGN, OPTIONN)) true= 0;
979
980         if( but->bit ) {
981                 int lvalue;
982                 UI_GET_BUT_VALUE_INIT(but, *value)
983                 lvalue= (int)*value;
984                 if( BTST(lvalue, (but->bitnr)) ) push= true;
985                 else push= !true;
986         }
987         else {
988                 switch(but->type) {
989                 case BUT:
990                         push= 2;
991                         break;
992                 case HOTKEYEVT:
993                 case KEYEVT:
994                         push= 2;
995                         break;
996                 case TOGBUT:
997                 case TOG:
998                 case TOGR:
999                 case TOG3:
1000                 case BUT_TOGDUAL:
1001                 case ICONTOG:
1002                 case OPTION:
1003                         UI_GET_BUT_VALUE_INIT(but, *value)
1004                         if(*value != (double)but->hardmin) push= 1;
1005                         break;
1006                 case ICONTOGN:
1007                 case TOGN:
1008                 case OPTIONN:
1009                         UI_GET_BUT_VALUE_INIT(but, *value)
1010                         if(*value==0.0) push= 1;
1011                         break;
1012                 case ROW:
1013                 case LISTROW:
1014                         UI_GET_BUT_VALUE_INIT(but, *value)
1015                         /* support for rna enum buts */
1016                         if(but->rnaprop && (RNA_property_flag(but->rnaprop) & PROP_ENUM_FLAG)) {
1017                                 if((int)*value & (int)but->hardmax) push= 1;
1018                         }
1019                         else {
1020                                 if(*value == (double)but->hardmax) push= 1;
1021                         }
1022                         break;
1023                 case COL:
1024                         push= 2;
1025                         break;
1026                 default:
1027                         push= 2;
1028                         break;
1029                 }
1030         }
1031         
1032         if(push==2);
1033         else if(push==1) but->flag |= UI_SELECT;
1034         else but->flag &= ~UI_SELECT;
1035 }
1036
1037 static uiBut *ui_find_inlink(uiBlock *block, void *poin)
1038 {
1039         uiBut *but;
1040         
1041         but= block->buttons.first;
1042         while(but) {
1043                 if(but->type==INLINK) {
1044                         if(but->poin == poin) return but;
1045                 }
1046                 but= but->next;
1047         }
1048         return NULL;
1049 }
1050
1051 static void ui_add_link_line(ListBase *listb, uiBut *but, uiBut *bt)
1052 {
1053         uiLinkLine *line;
1054         
1055         line= MEM_callocN(sizeof(uiLinkLine), "linkline");
1056         BLI_addtail(listb, line);
1057         line->from= but;
1058         line->to= bt;
1059 }
1060
1061 uiBut *uiFindInlink(uiBlock *block, void *poin)
1062 {
1063         return ui_find_inlink(block, poin);
1064 }
1065
1066 void uiComposeLinks(uiBlock *block)
1067 {
1068         uiBut *but, *bt;
1069         uiLink *link;
1070         void ***ppoin;
1071         int a;
1072         
1073         but= block->buttons.first;
1074         while(but) {
1075                 if(but->type==LINK) {
1076                         link= but->link;
1077                         
1078                         /* for all pointers in the array */
1079                         if(link) {
1080                                 if(link->ppoin) {
1081                                         ppoin= link->ppoin;
1082                                         for(a=0; a < *(link->totlink); a++) {
1083                                                 bt= ui_find_inlink(block, (*ppoin)[a] );
1084                                                 if(bt) {
1085                                                         ui_add_link_line(&link->lines, but, bt);
1086                                                 }
1087                                         }
1088                                 }
1089                                 else if(link->poin) {
1090                                         bt= ui_find_inlink(block, *(link->poin) );
1091                                         if(bt) {
1092                                                 ui_add_link_line(&link->lines, but, bt);
1093                                         }
1094                                 }
1095                         }
1096                 }
1097                 but= but->next;
1098         }
1099 }
1100
1101
1102 /* ************************************************ */
1103
1104 void uiBlockSetButLock(uiBlock *block, int val, const char *lockstr)
1105 {
1106         if(val) {
1107                 block->lock= val ? 1:0;
1108                 block->lockstr= lockstr;
1109         }
1110 }
1111
1112 void uiBlockClearButLock(uiBlock *block)
1113 {
1114         block->lock= 0;
1115         block->lockstr= NULL;
1116 }
1117
1118 /* *************************************************************** */
1119
1120 void ui_delete_linkline(uiLinkLine *line, uiBut *but)
1121 {
1122         uiLink *link;
1123         int a, b;
1124         
1125         BLI_remlink(&but->link->lines, line);
1126
1127         link= line->from->link;
1128
1129         /* are there more pointers allowed? */
1130         if(link->ppoin) {
1131                 
1132                 if(*(link->totlink)==1) {
1133                         *(link->totlink)= 0;
1134                         MEM_freeN(*(link->ppoin));
1135                         *(link->ppoin)= NULL;
1136                 }
1137                 else {
1138                         b= 0;
1139                         for(a=0; a< (*(link->totlink)); a++) {
1140                                 
1141                                 if( (*(link->ppoin))[a] != line->to->poin ) {
1142                                         (*(link->ppoin))[b]= (*(link->ppoin))[a];
1143                                         b++;
1144                                 }
1145                         }       
1146                         (*(link->totlink))--;
1147                 }
1148         }
1149         else {
1150                 *(link->poin)= NULL;
1151         }
1152
1153         MEM_freeN(line);
1154         //REDRAW
1155 }
1156
1157 /* *********************** data get/set ***********************
1158  * this either works with the pointed to data, or can work with
1159  * an edit override pointer while dragging for example */
1160
1161 /* for buttons pointing to color for example */
1162 void ui_get_but_vectorf(uiBut *but, float *vec)
1163 {
1164         PropertyRNA *prop;
1165         int a, tot;
1166
1167         if(but->editvec) {
1168                 VECCOPY(vec, but->editvec);
1169         }
1170
1171         if(but->rnaprop) {
1172                 prop= but->rnaprop;
1173
1174                 vec[0]= vec[1]= vec[2]= 0.0f;
1175
1176                 if(RNA_property_type(prop) == PROP_FLOAT) {
1177                         tot= RNA_property_array_length(&but->rnapoin, prop);
1178                         tot= MIN2(tot, 3);
1179
1180                         for(a=0; a<tot; a++)
1181                                 vec[a]= RNA_property_float_get_index(&but->rnapoin, prop, a);
1182                 }
1183         }
1184         else if(but->pointype == CHA) {
1185                 char *cp= (char *)but->poin;
1186                 vec[0]= ((float)cp[0])/255.0f;
1187                 vec[1]= ((float)cp[1])/255.0f;
1188                 vec[2]= ((float)cp[2])/255.0f;
1189         }
1190         else if(but->pointype == FLO) {
1191                 float *fp= (float *)but->poin;
1192                 VECCOPY(vec, fp);
1193         }
1194         else {
1195                 if (but->editvec==NULL) {
1196                         fprintf(stderr, "ui_get_but_vectorf: can't get color, should never happen\n");
1197                         vec[0]= vec[1]= vec[2]= 0.0f;
1198                 }
1199         }
1200 }
1201
1202 /* for buttons pointing to color for example */
1203 void ui_set_but_vectorf(uiBut *but, float *vec)
1204 {
1205         PropertyRNA *prop;
1206         int a, tot;
1207
1208         if(but->editvec) {
1209                 VECCOPY(but->editvec, vec);
1210         }
1211
1212         if(but->rnaprop) {
1213                 prop= but->rnaprop;
1214
1215                 if(RNA_property_type(prop) == PROP_FLOAT) {
1216                         tot= RNA_property_array_length(&but->rnapoin, prop);
1217                         tot= MIN2(tot, 3);
1218
1219                         for(a=0; a<tot; a++)
1220                                 RNA_property_float_set_index(&but->rnapoin, prop, a, vec[a]);
1221                 }
1222         }
1223         else if(but->pointype == CHA) {
1224                 char *cp= (char *)but->poin;
1225                 cp[0]= (char)(0.5f + vec[0]*255.0f);
1226                 cp[1]= (char)(0.5f + vec[1]*255.0f);
1227                 cp[2]= (char)(0.5f + vec[2]*255.0f);
1228         }
1229         else if(but->pointype == FLO) {
1230                 float *fp= (float *)but->poin;
1231                 VECCOPY(fp, vec);
1232         }
1233 }
1234
1235 int ui_is_but_float(uiBut *but)
1236 {
1237         if(but->pointype==FLO && but->poin)
1238                 return 1;
1239         
1240         if(but->rnaprop && RNA_property_type(but->rnaprop) == PROP_FLOAT)
1241                 return 1;
1242         
1243         return 0;
1244 }
1245
1246 int ui_is_but_unit(uiBut *but)
1247 {
1248         Scene *scene= CTX_data_scene((bContext *)but->block->evil_C);
1249         int unit_type= uiButGetUnitType(but);
1250
1251         if(unit_type == PROP_UNIT_NONE)
1252                 return 0;
1253
1254 #if 1 // removed so angle buttons get correct snapping
1255         if (scene->unit.system_rotation == USER_UNIT_ROT_RADIANS && unit_type == PROP_UNIT_ROTATION)
1256                 return 0;
1257 #endif
1258         
1259         /* for now disable time unit conversion */      
1260         if (unit_type == PROP_UNIT_TIME)
1261                 return 0;
1262
1263         if (scene->unit.system == USER_UNIT_NONE) {
1264                 if (unit_type != PROP_UNIT_ROTATION) {
1265                         return 0;
1266                 }
1267         }
1268
1269         return 1;
1270 }
1271
1272 int ui_is_but_rna_valid(uiBut *but)
1273 {
1274         if (but->rnaprop==NULL || RNA_struct_contains_property(&but->rnapoin, but->rnaprop)) {
1275                 return TRUE;
1276         }
1277         else {
1278                 printf("property removed %s: %p\n", but->drawstr, but->rnaprop);
1279                 return FALSE;
1280         }
1281 }
1282
1283 double ui_get_but_val(uiBut *but)
1284 {
1285         PropertyRNA *prop;
1286         double value = 0.0;
1287
1288         if(but->editval) { return *(but->editval); }
1289         if(but->poin==NULL && but->rnapoin.data==NULL) return 0.0;
1290
1291         if(but->rnaprop) {
1292                 prop= but->rnaprop;
1293
1294                 switch(RNA_property_type(prop)) {
1295                         case PROP_BOOLEAN:
1296                                 if(RNA_property_array_length(&but->rnapoin, prop))
1297                                         value= RNA_property_boolean_get_index(&but->rnapoin, prop, but->rnaindex);
1298                                 else
1299                                         value= RNA_property_boolean_get(&but->rnapoin, prop);
1300                                 break;
1301                         case PROP_INT:
1302                                 if(RNA_property_array_length(&but->rnapoin, prop))
1303                                         value= RNA_property_int_get_index(&but->rnapoin, prop, but->rnaindex);
1304                                 else
1305                                         value= RNA_property_int_get(&but->rnapoin, prop);
1306                                 break;
1307                         case PROP_FLOAT:
1308                                 if(RNA_property_array_length(&but->rnapoin, prop))
1309                                         value= RNA_property_float_get_index(&but->rnapoin, prop, but->rnaindex);
1310                                 else
1311                                         value= RNA_property_float_get(&but->rnapoin, prop);
1312                                 break;
1313                         case PROP_ENUM:
1314                                 value= RNA_property_enum_get(&but->rnapoin, prop);
1315                                 break;
1316                         default:
1317                                 value= 0.0;
1318                                 break;
1319                 }
1320         }
1321         else if(but->type== HSVSLI) {
1322                 float h, s, v, *fp;
1323                 
1324                 fp= (but->editvec)? but->editvec: (float *)but->poin;
1325                 rgb_to_hsv(fp[0], fp[1], fp[2], &h, &s, &v);
1326
1327                 switch(but->str[0]) {
1328                         case 'H': value= h; break;
1329                         case 'S': value= s; break;
1330                         case 'V': value= v; break;
1331                 }
1332         } 
1333         else if( but->pointype == CHA ) {
1334                 value= *(char *)but->poin;
1335         }
1336         else if( but->pointype == SHO ) {
1337                 value= *(short *)but->poin;
1338         } 
1339         else if( but->pointype == INT ) {
1340                 value= *(int *)but->poin;
1341         } 
1342         else if( but->pointype == FLO ) {
1343                 value= *(float *)but->poin;
1344         }
1345
1346         return value;
1347 }
1348
1349 void ui_set_but_val(uiBut *but, double value)
1350 {
1351         PropertyRNA *prop;
1352
1353         /* value is a hsv value: convert to rgb */
1354         if(but->rnaprop) {
1355                 prop= but->rnaprop;
1356
1357                 if(RNA_property_editable(&but->rnapoin, prop)) {
1358                         switch(RNA_property_type(prop)) {
1359                                 case PROP_BOOLEAN:
1360                                         if(RNA_property_array_length(&but->rnapoin, prop))
1361                                                 RNA_property_boolean_set_index(&but->rnapoin, prop, but->rnaindex, value);
1362                                         else
1363                                                 RNA_property_boolean_set(&but->rnapoin, prop, value);
1364                                         break;
1365                                 case PROP_INT:
1366                                         if(RNA_property_array_length(&but->rnapoin, prop))
1367                                                 RNA_property_int_set_index(&but->rnapoin, prop, but->rnaindex, (int)value);
1368                                         else
1369                                                 RNA_property_int_set(&but->rnapoin, prop, (int)value);
1370                                         break;
1371                                 case PROP_FLOAT:
1372                                         if(RNA_property_array_length(&but->rnapoin, prop))
1373                                                 RNA_property_float_set_index(&but->rnapoin, prop, but->rnaindex, value);
1374                                         else
1375                                                 RNA_property_float_set(&but->rnapoin, prop, value);
1376                                         break;
1377                                 case PROP_ENUM:
1378                                         if(RNA_property_flag(prop) & PROP_ENUM_FLAG) {
1379                                                 int ivalue= (int)value;
1380                                                 ivalue ^= RNA_property_enum_get(&but->rnapoin, prop); /* toggle for enum/flag buttons */
1381                                                 RNA_property_enum_set(&but->rnapoin, prop, ivalue);
1382                                         }
1383                                         else {
1384                                                 RNA_property_enum_set(&but->rnapoin, prop, value);
1385                                         }
1386                                         break;
1387                                 default:
1388                                         break;
1389                         }
1390                 }
1391
1392                 /* we can't be sure what RNA set functions actually do,
1393                  * so leave this unset */
1394                 value= UI_BUT_VALUE_UNSET;
1395         }
1396         else if(but->pointype==0);
1397         else if(but->type==HSVSLI ) {
1398                 float h, s, v, *fp;
1399                 
1400                 fp= (but->editvec)? but->editvec: (float *)but->poin;
1401                 rgb_to_hsv(fp[0], fp[1], fp[2], &h, &s, &v);
1402                 
1403                 switch(but->str[0]) {
1404                 case 'H': h= value; break;
1405                 case 'S': s= value; break;
1406                 case 'V': v= value; break;
1407                 }
1408                 
1409                 hsv_to_rgb(h, s, v, fp, fp+1, fp+2);
1410                 
1411         }
1412         else {
1413                 /* first do rounding */
1414                 if(but->pointype==CHA)
1415                         value= (char)floor(value+0.5);
1416                 else if(but->pointype==SHO ) {
1417                         /* gcc 3.2.1 seems to have problems 
1418                          * casting a double like 32772.0 to
1419                          * a short so we cast to an int, then 
1420                          to a short */
1421                         int gcckludge;
1422                         gcckludge = (int) floor(value+0.5);
1423                         value= (short)gcckludge;
1424                 }
1425                 else if(but->pointype==INT )
1426                         value= (int)floor(value+0.5);
1427                 else if(but->pointype==FLO ) {
1428                         float fval= (float)value;
1429                         if(fval>= -0.00001f && fval<= 0.00001f) fval= 0.0f;     /* prevent negative zero */
1430                         value= fval;
1431                 }
1432                 
1433                 /* then set value with possible edit override */
1434                 if(but->editval)
1435                         value= *but->editval= value;
1436                 else if(but->pointype==CHA)
1437                         value= *((char *)but->poin)= (char)value;
1438                 else if(but->pointype==SHO)
1439                         value= *((short *)but->poin)= (short)value;
1440                 else if(but->pointype==INT)
1441                         value= *((int *)but->poin)= (int)value;
1442                 else if(but->pointype==FLO)
1443                         value= *((float *)but->poin)= (float)value;
1444         }
1445
1446         /* update select flag */
1447         ui_is_but_sel(but, &value);
1448 }
1449
1450 int ui_get_but_string_max_length(uiBut *but)
1451 {
1452         if(ELEM(but->type, TEX, SEARCH_MENU))
1453                 return but->hardmax;
1454         else if(but->type == IDPOIN)
1455                 return MAX_ID_NAME-2;
1456         else
1457                 return UI_MAX_DRAW_STR;
1458 }
1459
1460 static double ui_get_but_scale_unit(uiBut *but, double value)
1461 {
1462         Scene *scene= CTX_data_scene((bContext *)but->block->evil_C);
1463         int unit_type= uiButGetUnitType(but);
1464
1465         if(unit_type == PROP_UNIT_LENGTH) {
1466                 return value * (double)scene->unit.scale_length;
1467         }
1468         else if(unit_type == PROP_UNIT_AREA) {
1469                 return value * pow(scene->unit.scale_length, 2);
1470         }
1471         else if(unit_type == PROP_UNIT_VOLUME) {
1472                 return value * pow(scene->unit.scale_length, 3);
1473         }
1474         else if(unit_type == PROP_UNIT_TIME) { /* WARNING - using evil_C :| */
1475                 return FRA2TIME(value);
1476         }
1477         else {
1478                 return value;
1479         }
1480 }
1481
1482 /* str will be overwritten */
1483 void ui_convert_to_unit_alt_name(uiBut *but, char *str, int maxlen)
1484 {
1485         if(ui_is_but_unit(but)) {
1486                 int unit_type= uiButGetUnitType(but);
1487                 char *orig_str;
1488                 Scene *scene= CTX_data_scene((bContext *)but->block->evil_C);
1489                 
1490                 orig_str= MEM_callocN(sizeof(char)*maxlen + 1, "textedit sub str");
1491                 memcpy(orig_str, str, maxlen);
1492                 
1493                 bUnit_ToUnitAltName(str, maxlen, orig_str, scene->unit.system, unit_type>>16);
1494                 
1495                 MEM_freeN(orig_str);
1496         }
1497 }
1498
1499 static void ui_get_but_string_unit(uiBut *but, char *str, int len_max, double value, int pad)
1500 {
1501         Scene *scene= CTX_data_scene((bContext *)but->block->evil_C);
1502         int do_split= scene->unit.flag & USER_UNIT_OPT_SPLIT;
1503         int unit_type= uiButGetUnitType(but);
1504         int precision= but->a2;
1505
1506         if(scene->unit.scale_length<0.0001f) scene->unit.scale_length= 1.0f; // XXX do_versions
1507
1508         /* Sanity checks */
1509         if(precision > PRECISION_FLOAT_MAX)     precision= PRECISION_FLOAT_MAX;
1510         else if(precision==0)                           precision= 2;
1511
1512         bUnit_AsString(str, len_max, ui_get_but_scale_unit(but, value), precision, scene->unit.system, unit_type>>16, do_split, pad);
1513 }
1514
1515 static float ui_get_but_step_unit(uiBut *but, float step_default)
1516 {
1517         Scene *scene= CTX_data_scene((bContext *)but->block->evil_C);
1518         int unit_type= uiButGetUnitType(but)>>16;
1519         float step;
1520
1521         step = bUnit_ClosestScalar(ui_get_but_scale_unit(but, step_default), scene->unit.system, unit_type);
1522
1523         if(step > 0.0f) { /* -1 is an error value */
1524                 return (float)((double)step/ui_get_but_scale_unit(but, 1.0))*100.0f;
1525         }
1526         else {
1527                 return step_default;
1528         }
1529 }
1530
1531
1532 void ui_get_but_string(uiBut *but, char *str, int maxlen)
1533 {
1534         if(but->rnaprop && ELEM3(but->type, TEX, IDPOIN, SEARCH_MENU)) {
1535                 PropertyType type;
1536                 char *buf= NULL;
1537
1538                 type= RNA_property_type(but->rnaprop);
1539
1540                 if(type == PROP_STRING) {
1541                         /* RNA string */
1542                         buf= RNA_property_string_get_alloc(&but->rnapoin, but->rnaprop, str, maxlen);
1543                 }
1544                 else if(type == PROP_POINTER) {
1545                         /* RNA pointer */
1546                         PointerRNA ptr= RNA_property_pointer_get(&but->rnapoin, but->rnaprop);
1547                         buf= RNA_struct_name_get_alloc(&ptr, str, maxlen);
1548                 }
1549
1550                 if(!buf) {
1551                         str[0] = '\0';
1552                 }
1553                 else if(buf && buf != str) {
1554                         /* string was too long, we have to truncate */
1555                         BLI_strncpy(str, buf, maxlen);
1556                         MEM_freeN(buf);
1557                 }
1558         }
1559         else if(but->type == IDPOIN) {
1560                 /* ID pointer */
1561                 if(but->idpoin_idpp) { /* Can be NULL for ID properties by python */
1562                         ID *id= *(but->idpoin_idpp);
1563                         if(id) {
1564                                 BLI_strncpy(str, id->name+2, maxlen);
1565                                 return;
1566                         }
1567                 }
1568                 str[0] = '\0';
1569                 return;
1570         }
1571         else if(but->type == TEX) {
1572                 /* string */
1573                 BLI_strncpy(str, but->poin, maxlen);
1574                 return;
1575         }
1576         else if(but->type == SEARCH_MENU) {
1577                 /* string */
1578                 BLI_strncpy(str, but->poin, maxlen);
1579                 return;
1580         }
1581         else if(ui_but_anim_expression_get(but, str, maxlen))
1582                 ; /* driver expression */
1583         else {
1584                 /* number editing */
1585                 double value;
1586
1587                 value= ui_get_but_val(but);
1588
1589                 if(ui_is_but_float(but)) {
1590                         if(ui_is_but_unit(but)) {
1591                                 ui_get_but_string_unit(but, str, maxlen, value, 0);
1592                         }
1593                         else {
1594                                 const int prec= ui_but_float_precision(but, value);
1595                                 BLI_snprintf(str, maxlen, "%.*f", prec, value);
1596                         }
1597                 }
1598                 else
1599                         BLI_snprintf(str, maxlen, "%d", (int)value);
1600         }
1601 }
1602
1603 #ifdef WITH_PYTHON
1604
1605 static int ui_set_but_string_eval_num_unit(bContext *C, uiBut *but, const char *str, double *value)
1606 {
1607         char str_unit_convert[256];
1608         const int unit_type= uiButGetUnitType(but);
1609         Scene *scene= CTX_data_scene((bContext *)but->block->evil_C);
1610
1611         BLI_strncpy(str_unit_convert, str, sizeof(str_unit_convert));
1612
1613         /* ugly, use the draw string to get the value, this could cause problems if it includes some text which resolves to a unit */
1614         bUnit_ReplaceString(str_unit_convert, sizeof(str_unit_convert), but->drawstr, ui_get_but_scale_unit(but, 1.0), scene->unit.system, unit_type>>16);
1615
1616         return (BPY_button_exec(C, str_unit_convert, value, TRUE) != -1);
1617 }
1618
1619 static int ui_set_but_string_eval_num(bContext *C, uiBut *but, const char *str, double *value)
1620 {
1621         int ok= FALSE;
1622
1623         if(str[0] != '\0') {
1624                 int is_unit_but= ui_is_but_unit(but);
1625                 /* only enable verbose if we won't run again with units */
1626                 if(BPY_button_exec(C, str, value, is_unit_but==FALSE) != -1) {
1627                         /* if the value parsed ok without unit conversion this button may still need a unit multiplier */
1628                         if(is_unit_but) {
1629                                 char str_new[128];
1630
1631                                 BLI_snprintf(str_new, sizeof(str_new), "%f", *value);
1632                                 ok= ui_set_but_string_eval_num_unit(C, but, str_new, value);
1633                         }
1634                         else {
1635                                 ok= TRUE; /* parse normal string via py (no unit conversion needed) */
1636                         }
1637                 }
1638                 else if(is_unit_but) {
1639                         /* parse failed, this is a unit but so run replacements and parse again */
1640                         ok= ui_set_but_string_eval_num_unit(C, but, str, value);
1641                 }
1642         }
1643
1644         return ok;
1645 }
1646
1647 #endif // WITH_PYTHON
1648
1649 int ui_set_but_string(bContext *C, uiBut *but, const char *str)
1650 {
1651         if(but->rnaprop && ELEM3(but->type, TEX, IDPOIN, SEARCH_MENU)) {
1652                 if(RNA_property_editable(&but->rnapoin, but->rnaprop)) {
1653                         PropertyType type;
1654
1655                         type= RNA_property_type(but->rnaprop);
1656
1657                         if(type == PROP_STRING) {
1658                                 /* RNA string */
1659                                 RNA_property_string_set(&but->rnapoin, but->rnaprop, str);
1660                                 return 1;
1661                         }
1662                         else if(type == PROP_POINTER) {
1663                                 /* RNA pointer */
1664                                 PointerRNA ptr, rptr;
1665                                 PropertyRNA *prop;
1666
1667                                 if(str == NULL || str[0] == '\0') {
1668                                         RNA_property_pointer_set(&but->rnapoin, but->rnaprop, PointerRNA_NULL);
1669                                         return 1;
1670                                 }
1671                                 else {
1672                                         ptr= but->rnasearchpoin;
1673                                         prop= but->rnasearchprop;
1674                                         
1675                                         if(prop && RNA_property_collection_lookup_string(&ptr, prop, str, &rptr))
1676                                                 RNA_property_pointer_set(&but->rnapoin, but->rnaprop, rptr);
1677
1678                                         return 1;
1679                                 }
1680
1681                                 return 0;
1682                         }
1683                 }
1684         }
1685         else if(but->type == IDPOIN) {
1686                 /* ID pointer */
1687                 but->idpoin_func(C, str, but->idpoin_idpp);
1688                 return 1;
1689         }
1690         else if(but->type == TEX) {
1691                 /* string */
1692                 BLI_strncpy(but->poin, str, but->hardmax);
1693                 return 1;
1694         }
1695         else if(but->type == SEARCH_MENU) {
1696                 /* string */
1697                 BLI_strncpy(but->poin, str, but->hardmax);
1698                 return 1;
1699         }
1700         else if(ui_but_anim_expression_set(but, str)) {
1701                 /* driver expression */
1702                 return 1;
1703         }
1704         else {
1705                 /* number editing */
1706                 double value;
1707
1708 #ifdef WITH_PYTHON
1709                 if(ui_set_but_string_eval_num(C, but, str, &value) == FALSE) {
1710                         return 0;
1711                 }
1712 #else
1713                 value= atof(str);
1714 #endif // WITH_PYTHON
1715
1716                 if(!ui_is_but_float(but)) value= (int)floor(value + 0.5);
1717                 if(but->type==NUMABS) value= fabs(value);
1718
1719                 /* not that we use hard limits here */
1720                 if(value < (double)but->hardmin) value= but->hardmin;
1721                 if(value > (double)but->hardmax) value= but->hardmax;
1722
1723                 ui_set_but_val(but, value);
1724                 return 1;
1725         }
1726
1727         return 0;
1728 }
1729
1730 void ui_set_but_default(bContext *C, short all)
1731 {
1732         PointerRNA ptr;
1733
1734         WM_operator_properties_create(&ptr, "UI_OT_reset_default_button");
1735         RNA_boolean_set(&ptr, "all", all);
1736         WM_operator_name_call(C, "UI_OT_reset_default_button", WM_OP_EXEC_DEFAULT, &ptr);
1737         WM_operator_properties_free(&ptr);
1738 }
1739
1740 static double soft_range_round_up(double value, double max)
1741 {
1742         /* round up to .., 0.1, 0.2, 0.5, 1, 2, 5, 10, 20, 50, .. */
1743         double newmax= pow(10.0, ceil(log(value)/M_LN10));
1744
1745         if(newmax*0.2 >= max && newmax*0.2 >= value)
1746                 return newmax*0.2;
1747         else if(newmax*0.5 >= max && newmax*0.5 >= value)
1748                 return newmax*0.5;
1749         else
1750                 return newmax;
1751 }
1752
1753 static double soft_range_round_down(double value, double max)
1754 {
1755         /* round down to .., 0.1, 0.2, 0.5, 1, 2, 5, 10, 20, 50, .. */
1756         double newmax= pow(10.0, floor(log(value)/M_LN10));
1757
1758         if(newmax*5.0 <= max && newmax*5.0 <= value)
1759                 return newmax*5.0;
1760         else if(newmax*2.0 <= max && newmax*2.0 <= value)
1761                 return newmax*2.0;
1762         else
1763                 return newmax;
1764 }
1765
1766 void ui_set_but_soft_range(uiBut *but, double value)
1767 {
1768         /* ideally we would not limit this but practially, its more then
1769          * enough worst case is very long vectors wont use a smart soft-range
1770          * which isnt so bad. */
1771
1772         if(but->rnaprop) {
1773                 const PropertyType type= RNA_property_type(but->rnaprop);
1774                 double softmin, softmax /*, step, precision*/;
1775                 double value_min= value;
1776                 double value_max= value;
1777
1778                 /* clamp button range to something reasonable in case
1779                  * we get -inf/inf from RNA properties */
1780                 if(type == PROP_INT) {
1781                         int imin, imax, istep;
1782                         const int array_len= RNA_property_array_length(&but->rnapoin, but->rnaprop);
1783
1784                         RNA_property_int_ui_range(&but->rnapoin, but->rnaprop, &imin, &imax, &istep);
1785                         softmin= (imin == INT_MIN)? -1e4: imin;
1786                         softmax= (imin == INT_MAX)? 1e4: imax;
1787                         /*step= istep;*/ /*UNUSED*/
1788                         /*precision= 1;*/ /*UNUSED*/
1789
1790                         if(array_len >= 2) {
1791                                 int value_range[2];
1792                                 RNA_property_int_get_array_range(&but->rnapoin, but->rnaprop, value_range);
1793                                 value_min= (double)value_range[0];
1794                                 value_max= (double)value_range[1];
1795                         }
1796                 }
1797                 else if(type == PROP_FLOAT) {
1798                         float fmin, fmax, fstep, fprecision;
1799                         const int array_len= RNA_property_array_length(&but->rnapoin, but->rnaprop);
1800
1801                         RNA_property_float_ui_range(&but->rnapoin, but->rnaprop, &fmin, &fmax, &fstep, &fprecision);
1802                         softmin= (fmin == -FLT_MAX)? (float)-1e4: fmin;
1803                         softmax= (fmax == FLT_MAX)? (float)1e4: fmax;
1804                         /*step= fstep;*/ /*UNUSED*/
1805                         /*precision= fprecision;*/ /*UNUSED*/
1806
1807                         if(array_len >= 2) {
1808                                 float value_range[2];
1809                                 RNA_property_float_get_array_range(&but->rnapoin, but->rnaprop, value_range);
1810                                 value_min= (double)value_range[0];
1811                                 value_max= (double)value_range[1];
1812                         }
1813                 }
1814                 else
1815                         return;
1816
1817                 /* if the value goes out of the soft/max range, adapt the range */
1818                 if(value_min+1e-10 < softmin) {
1819                         if(value_min < 0.0)
1820                                 softmin= -soft_range_round_up(-value_min, -softmin);
1821                         else
1822                                 softmin= soft_range_round_down(value_min, softmin);
1823
1824                         if(softmin < (double)but->hardmin)
1825                                 softmin= (double)but->hardmin;
1826                 }
1827                 else if(value_max-1e-10 > softmax) {
1828                         if(value_max < 0.0)
1829                                 softmax= -soft_range_round_down(-value_max, -softmax);
1830                         else
1831                                 softmax= soft_range_round_up(value_max, softmax);
1832
1833                         if(softmax > (double)but->hardmax)
1834                                 softmax= but->hardmax;
1835                 }
1836
1837                 but->softmin= softmin;
1838                 but->softmax= softmax;
1839         }
1840 }
1841
1842 /* ******************* Free ********************/
1843
1844 static void ui_free_link(uiLink *link)
1845 {
1846         if(link) {      
1847                 BLI_freelistN(&link->lines);
1848                 MEM_freeN(link);
1849         }
1850 }
1851
1852 /* can be called with C==NULL */
1853 static void ui_free_but(const bContext *C, uiBut *but)
1854 {
1855         if(but->opptr) {
1856                 WM_operator_properties_free(but->opptr);
1857                 MEM_freeN(but->opptr);
1858         }
1859         if(but->func_argN) MEM_freeN(but->func_argN);
1860         if(but->active) {
1861                 /* XXX solve later, buttons should be free-able without context ideally,
1862                    however they may have open tooltips or popup windows, which need to
1863                    be closed using a context pointer */
1864                 if(C) 
1865                         ui_button_active_free(C, but);
1866                 else
1867                         if(but->active) 
1868                                 MEM_freeN(but->active);
1869         }
1870         if(but->str && but->str != but->strdata) MEM_freeN(but->str);
1871         ui_free_link(but->link);
1872
1873         MEM_freeN(but);
1874 }
1875
1876 /* can be called with C==NULL */
1877 void uiFreeBlock(const bContext *C, uiBlock *block)
1878 {
1879         uiBut *but;
1880
1881         while( (but= block->buttons.first) ) {
1882                 BLI_remlink(&block->buttons, but);      
1883                 ui_free_but(C, but);
1884         }
1885
1886         if(block->func_argN)
1887                 MEM_freeN(block->func_argN);
1888
1889         CTX_store_free_list(&block->contexts);
1890
1891         BLI_freelistN(&block->saferct);
1892         
1893         MEM_freeN(block);
1894 }
1895
1896 /* can be called with C==NULL */
1897 void uiFreeBlocks(const bContext *C, ListBase *lb)
1898 {
1899         uiBlock *block;
1900         
1901         while( (block= lb->first) ) {
1902                 BLI_remlink(lb, block);
1903                 uiFreeBlock(C, block);
1904         }
1905 }
1906
1907 void uiFreeInactiveBlocks(const bContext *C, ListBase *lb)
1908 {
1909         uiBlock *block, *nextblock;
1910
1911         for(block=lb->first; block; block=nextblock) {
1912                 nextblock= block->next;
1913         
1914                 if(!block->handle) {
1915                         if(!block->active) {
1916                                 BLI_remlink(lb, block);
1917                                 uiFreeBlock(C, block);
1918                         }
1919                         else
1920                                 block->active= 0;
1921                 }
1922         }
1923 }
1924
1925 void uiBlockSetRegion(uiBlock *block, ARegion *region)
1926 {
1927         ListBase *lb= &region->uiblocks;
1928         uiBlock *oldblock= NULL;
1929
1930         /* each listbase only has one block with this name, free block
1931          * if is already there so it can be rebuilt from scratch */
1932         if(lb) {
1933                 oldblock= BLI_findstring(lb, block->name, offsetof(uiBlock, name));
1934
1935                 if (oldblock) {
1936                         oldblock->active= 0;
1937                         oldblock->panel= NULL;
1938                 }
1939
1940                 /* at the beginning of the list! for dynamical menus/blocks */
1941                 BLI_addhead(lb, block);
1942         }
1943
1944         block->oldblock= oldblock;
1945 }
1946
1947 uiBlock *uiBeginBlock(const bContext *C, ARegion *region, const char *name, short dt)
1948 {
1949         uiBlock *block;
1950         wmWindow *window;
1951         Scene *scn;
1952         int getsizex, getsizey;
1953
1954         window= CTX_wm_window(C);
1955         scn = CTX_data_scene(C);
1956
1957         block= MEM_callocN(sizeof(uiBlock), "uiBlock");
1958         block->active= 1;
1959         block->dt= dt;
1960         block->evil_C= (void*)C; // XXX
1961         if (scn) block->color_profile= (scn->r.color_mgt_flag & R_COLOR_MANAGEMENT);
1962         BLI_strncpy(block->name, name, sizeof(block->name));
1963
1964         if(region)
1965                 uiBlockSetRegion(block, region);
1966
1967         /* window matrix and aspect */
1968         if(region && region->swinid) {
1969                 wm_subwindow_getmatrix(window, region->swinid, block->winmat);
1970                 wm_subwindow_getsize(window, region->swinid, &getsizex, &getsizey);
1971
1972                 /* TODO - investigate why block->winmat[0][0] is negative
1973                  * in the image view when viewRedrawForce is called */
1974                 block->aspect= 2.0/fabs( (getsizex)*block->winmat[0][0]);
1975         }
1976         else {
1977                 /* no subwindow created yet, for menus for example, so we
1978                  * use the main window instead, since buttons are created
1979                  * there anyway */
1980                 wm_subwindow_getmatrix(window, window->screen->mainwin, block->winmat);
1981                 wm_subwindow_getsize(window, window->screen->mainwin, &getsizex, &getsizey);
1982
1983                 block->aspect= 2.0/fabs(getsizex*block->winmat[0][0]);
1984                 block->auto_open= 2;
1985                 block->flag |= UI_BLOCK_LOOP; /* tag as menu */
1986         }
1987
1988         return block;
1989 }
1990
1991 uiBlock *uiGetBlock(const char *name, ARegion *ar)
1992 {
1993         return BLI_findstring(&ar->uiblocks, name, offsetof(uiBlock, name));
1994 }
1995
1996 void uiBlockSetEmboss(uiBlock *block, char dt)
1997 {
1998         block->dt= dt;
1999 }
2000
2001 void ui_check_but(uiBut *but)
2002 {
2003         /* if something changed in the button */
2004         double value= UI_BUT_VALUE_UNSET;
2005 //      float okwidth; // UNUSED
2006 //      int transopts= ui_translate_buttons();
2007         
2008         ui_is_but_sel(but, &value);
2009         
2010 //      if(but->type==TEX || but->type==IDPOIN) transopts= 0;
2011
2012         /* only update soft range while not editing */
2013         if(but->rnaprop && !(but->editval || but->editstr || but->editvec)) {
2014                 UI_GET_BUT_VALUE_INIT(but, value)
2015                 ui_set_but_soft_range(but, value);
2016         }
2017
2018         /* test for min and max, icon sliders, etc */
2019         switch( but->type ) {
2020                 case NUM:
2021                 case SLI:
2022                 case SCROLL:
2023                 case NUMSLI:
2024                 case HSVSLI:
2025                         UI_GET_BUT_VALUE_INIT(but, value)
2026                         if(value < (double)but->hardmin) ui_set_but_val(but, but->hardmin);
2027                         else if(value > (double)but->hardmax) ui_set_but_val(but, but->hardmax);
2028                         break;
2029                         
2030                 case NUMABS:
2031                 {
2032                         double value_abs;
2033                         UI_GET_BUT_VALUE_INIT(but, value)
2034                         value_abs= fabs(value);
2035                         if(value_abs < (double)but->hardmin) ui_set_but_val(but, but->hardmin);
2036                         else if(value_abs > (double)but->hardmax) ui_set_but_val(but, but->hardmax);
2037                         break;
2038                 }
2039                 case ICONTOG: 
2040                 case ICONTOGN:
2041                         if(!but->rnaprop || (RNA_property_flag(but->rnaprop) & PROP_ICONS_CONSECUTIVE)) {
2042                                 if(but->flag & UI_SELECT) but->iconadd= 1;
2043                                 else but->iconadd= 0;
2044                         }
2045                         break;
2046                         
2047                 case ICONROW:
2048                         if(!but->rnaprop || (RNA_property_flag(but->rnaprop) & PROP_ICONS_CONSECUTIVE)) {
2049                                 UI_GET_BUT_VALUE_INIT(but, value)
2050                                 but->iconadd= (int)value- (int)(but->hardmin);
2051                         }
2052                         break;
2053                         
2054                 case ICONTEXTROW:
2055                         if(!but->rnaprop || (RNA_property_flag(but->rnaprop) & PROP_ICONS_CONSECUTIVE)) {
2056                                 UI_GET_BUT_VALUE_INIT(but, value)
2057                                 but->iconadd= (int)value- (int)(but->hardmin);
2058                         }
2059                         break;
2060         }
2061         
2062         
2063         /* safety is 4 to enable small number buttons (like 'users') */
2064         // okwidth= -4 + (but->x2 - but->x1); // UNUSED
2065         
2066         /* name: */
2067         switch( but->type ) {
2068         
2069         case MENU:
2070         case ICONTEXTROW:
2071                 
2072                 if(but->x2 - but->x1 > 24) {
2073                         UI_GET_BUT_VALUE_INIT(but, value)
2074                         ui_set_name_menu(but, (int)value);
2075                 }
2076                 break;
2077         
2078         case NUM:
2079         case NUMSLI:
2080         case HSVSLI:
2081         case NUMABS:
2082
2083                 UI_GET_BUT_VALUE_INIT(but, value)
2084
2085                 if(ui_is_but_float(but)) {
2086                         if(value == (double) FLT_MAX) sprintf(but->drawstr, "%sinf", but->str);
2087                         else if(value == (double) -FLT_MAX) sprintf(but->drawstr, "%s-inf", but->str);
2088                         /* support length type buttons */
2089                         else if(ui_is_but_unit(but)) {
2090                                 char new_str[sizeof(but->drawstr)];
2091                                 ui_get_but_string_unit(but, new_str, sizeof(new_str), value, TRUE);
2092                                 BLI_snprintf(but->drawstr, sizeof(but->drawstr), "%s%s", but->str, new_str);
2093                         }
2094                         else {
2095                                 const int prec= ui_but_float_precision(but, value);
2096                                 BLI_snprintf(but->drawstr, sizeof(but->drawstr), "%s%.*f", but->str, prec, value);
2097                         }
2098                 }
2099                 else {
2100                         sprintf(but->drawstr, "%s%d", but->str, (int)value);
2101                 }
2102                         
2103                 if(but->rnaprop) {
2104                         PropertySubType pstype = RNA_property_subtype(but->rnaprop);
2105                         
2106                         if (pstype == PROP_PERCENTAGE)
2107                                 strcat(but->drawstr, "%");
2108                 }
2109                 break;
2110
2111         case LABEL:
2112                 if(ui_is_but_float(but)) {
2113                         int prec;
2114                         UI_GET_BUT_VALUE_INIT(but, value)
2115                         prec= ui_but_float_precision(but, value);
2116                         BLI_snprintf(but->drawstr, sizeof(but->drawstr), "%s%.*f", but->str, prec, value);
2117                 }
2118                 else {
2119                         strncpy(but->drawstr, but->str, UI_MAX_DRAW_STR);
2120                 }
2121                 
2122                 break;
2123
2124         case IDPOIN:
2125         case TEX:
2126         case SEARCH_MENU:
2127                 if(!but->editstr) {
2128                         char str[UI_MAX_DRAW_STR];
2129
2130                         ui_get_but_string(but, str, UI_MAX_DRAW_STR-strlen(but->str));
2131
2132                         BLI_snprintf(but->drawstr, sizeof(but->drawstr), "%s%s", but->str, str);
2133                 }
2134                 break;
2135         
2136         case KEYEVT:
2137                 strncpy(but->drawstr, but->str, UI_MAX_DRAW_STR);
2138                 if (but->flag & UI_SELECT) {
2139                         strcat(but->drawstr, "Press a key");
2140                 }
2141                 else {
2142                         UI_GET_BUT_VALUE_INIT(but, value)
2143                         strcat(but->drawstr, WM_key_event_string((short)value));
2144                 }
2145                 break;
2146                 
2147         case HOTKEYEVT:
2148                 if (but->flag & UI_SELECT) {
2149                         but->drawstr[0]= '\0';
2150                         
2151                         if(but->modifier_key) {
2152                                 char *str= but->drawstr;
2153                                 
2154                                 if(but->modifier_key & KM_SHIFT)
2155                                         str= strcat(str, "Shift ");
2156                                 if(but->modifier_key & KM_CTRL)
2157                                         str= strcat(str, "Ctrl ");
2158                                 if(but->modifier_key & KM_ALT)
2159                                         str= strcat(str, "Alt ");
2160                                 if(but->modifier_key & KM_OSKEY)
2161                                         str= strcat(str, "Cmd ");
2162
2163                                 (void)str; /* UNUSED */
2164                         }
2165                         else
2166                                 strcat(but->drawstr, "Press a key  ");
2167                 }
2168                 else
2169                         strncpy(but->drawstr, but->str, UI_MAX_DRAW_STR);
2170
2171                 break;
2172                 
2173         case BUT_TOGDUAL:
2174                 /* trying to get the dual-icon to left of text... not very nice */
2175                 if(but->str[0]) {
2176                         strncpy(but->drawstr, "  ", UI_MAX_DRAW_STR);
2177                         strncpy(but->drawstr+2, but->str, UI_MAX_DRAW_STR-2);
2178                 }
2179                 break;
2180
2181         case HSVCUBE:
2182         case HSVCIRCLE:
2183                 break;
2184         default:
2185                 strncpy(but->drawstr, but->str, UI_MAX_DRAW_STR);
2186                 
2187         }
2188
2189         /* if we are doing text editing, this will override the drawstr */
2190         if(but->editstr)
2191                 strncpy(but->drawstr, but->editstr, UI_MAX_DRAW_STR);
2192         
2193         /* text clipping moved to widget drawing code itself */
2194 }
2195
2196
2197 void uiBlockBeginAlign(uiBlock *block)
2198 {
2199         /* if other align was active, end it */
2200         if(block->flag & UI_BUT_ALIGN) uiBlockEndAlign(block);
2201
2202         block->flag |= UI_BUT_ALIGN_DOWN;       
2203         block->alignnr++;
2204
2205         /* buttons declared after this call will get this align nr */ // XXX flag?
2206 }
2207
2208 static int buts_are_horiz(uiBut *but1, uiBut *but2)
2209 {
2210         float dx, dy;
2211         
2212         dx= fabs( but1->x2 - but2->x1);
2213         dy= fabs( but1->y1 - but2->y2);
2214         
2215         if(dx > dy) return 0;
2216         return 1;
2217 }
2218
2219 void uiBlockEndAlign(uiBlock *block)
2220 {
2221         block->flag &= ~UI_BUT_ALIGN;   // all 4 flags
2222 }
2223
2224 int ui_but_can_align(uiBut *but)
2225 {
2226         return !ELEM3(but->type, LABEL, OPTION, OPTIONN);
2227 }
2228
2229 static void ui_block_do_align_but(uiBut *first, int nr)
2230 {
2231         uiBut *prev, *but=NULL, *next;
2232         int flag= 0, cols=0, rows=0;
2233         
2234         /* auto align */
2235
2236         for(but=first; but && but->alignnr == nr; but=but->next) {
2237                 if(but->next && but->next->alignnr == nr) {
2238                         if(buts_are_horiz(but, but->next)) cols++;
2239                         else rows++;
2240                 }
2241         }
2242
2243         /* rows==0: 1 row, cols==0: 1 collumn */
2244         
2245         /* note;  how it uses 'flag' in loop below (either set it, or OR it) is confusing */
2246         for(but=first, prev=NULL; but && but->alignnr == nr; prev=but, but=but->next) {
2247                 next= but->next;
2248                 if(next && next->alignnr != nr)
2249                         next= NULL;
2250
2251                 /* clear old flag */
2252                 but->flag &= ~UI_BUT_ALIGN;
2253                         
2254                 if(flag==0) {   /* first case */
2255                         if(next) {
2256                                 if(buts_are_horiz(but, next)) {
2257                                         if(rows==0)
2258                                                 flag= UI_BUT_ALIGN_RIGHT;
2259                                         else 
2260                                                 flag= UI_BUT_ALIGN_DOWN|UI_BUT_ALIGN_RIGHT;
2261                                 }
2262                                 else {
2263                                         flag= UI_BUT_ALIGN_DOWN;
2264                                 }
2265                         }
2266                 }
2267                 else if(next==NULL) {   /* last case */
2268                         if(prev) {
2269                                 if(buts_are_horiz(prev, but)) {
2270                                         if(rows==0) 
2271                                                 flag= UI_BUT_ALIGN_LEFT;
2272                                         else
2273                                                 flag= UI_BUT_ALIGN_TOP|UI_BUT_ALIGN_LEFT;
2274                                 }
2275                                 else flag= UI_BUT_ALIGN_TOP;
2276                         }
2277                 }
2278                 else if(buts_are_horiz(but, next)) {
2279                         /* check if this is already second row */
2280                         if( prev && buts_are_horiz(prev, but)==0) {
2281                                 flag &= ~UI_BUT_ALIGN_LEFT;
2282                                 flag |= UI_BUT_ALIGN_TOP;
2283                                 /* exception case: bottom row */
2284                                 if(rows>0) {
2285                                         uiBut *bt= but;
2286                                         while(bt && bt->alignnr == nr) {
2287                                                 if(bt->next && bt->next->alignnr == nr && buts_are_horiz(bt, bt->next)==0 ) break; 
2288                                                 bt= bt->next;
2289                                         }
2290                                         if(bt==NULL || bt->alignnr != nr) flag= UI_BUT_ALIGN_TOP|UI_BUT_ALIGN_RIGHT;
2291                                 }
2292                         }
2293                         else flag |= UI_BUT_ALIGN_LEFT;
2294                 }
2295                 else {
2296                         if(cols==0) {
2297                                 flag |= UI_BUT_ALIGN_TOP;
2298                         }
2299                         else {  /* next button switches to new row */
2300                                 
2301                                 if(prev && buts_are_horiz(prev, but))
2302                                         flag |= UI_BUT_ALIGN_LEFT;
2303                                 else {
2304                                         flag &= ~UI_BUT_ALIGN_LEFT;
2305                                         flag |= UI_BUT_ALIGN_TOP;
2306                                 }
2307                                 
2308                                 if( (flag & UI_BUT_ALIGN_TOP)==0) {     /* stil top row */
2309                                         if(prev) {
2310                                                 if(next && buts_are_horiz(but, next))
2311                                                         flag = UI_BUT_ALIGN_DOWN|UI_BUT_ALIGN_LEFT|UI_BUT_ALIGN_RIGHT;
2312                                                 else {
2313                                                         /* last button in top row */
2314                                                         flag = UI_BUT_ALIGN_DOWN|UI_BUT_ALIGN_LEFT;
2315                                                 }
2316                                         }
2317                                         else 
2318                                                 flag |= UI_BUT_ALIGN_DOWN;
2319                                 }
2320                                 else 
2321                                         flag |= UI_BUT_ALIGN_TOP;
2322                         }
2323                 }
2324                 
2325                 but->flag |= flag;
2326                 
2327                 /* merge coordinates */
2328                 if(prev) {
2329                         // simple cases 
2330                         if(rows==0) {
2331                                 but->x1= (prev->x2+but->x1)/2.0f;
2332                                 prev->x2= but->x1;
2333                         }
2334                         else if(cols==0) {
2335                                 but->y2= (prev->y1+but->y2)/2.0f;
2336                                 prev->y1= but->y2;
2337                         }
2338                         else {
2339                                 if(buts_are_horiz(prev, but)) {
2340                                         but->x1= (prev->x2+but->x1)/2.0f;
2341                                         prev->x2= but->x1;
2342                                         /* copy height too */
2343                                         but->y2= prev->y2;
2344                                 }
2345                                 else if(prev->prev && buts_are_horiz(prev->prev, prev)==0) {
2346                                         /* the previous button is a single one in its row */
2347                                         but->y2= (prev->y1+but->y2)/2.0f;
2348                                         prev->y1= but->y2;
2349                                         
2350                                         but->x1= prev->x1;
2351                                         if(next && buts_are_horiz(but, next)==0)
2352                                                 but->x2= prev->x2;
2353                                 }
2354                                 else {
2355                                         /* the previous button is not a single one in its row */
2356                                         but->y2= prev->y1;
2357                                 }
2358                         }
2359                 }
2360         }
2361 }
2362
2363 void ui_block_do_align(uiBlock *block)
2364 {
2365         uiBut *but;
2366         int nr;
2367
2368         /* align buttons with same align nr */
2369         for(but=block->buttons.first; but;) {
2370                 if(but->alignnr) {
2371                         nr= but->alignnr;
2372                         ui_block_do_align_but(but, nr);
2373
2374                         /* skip with same number */
2375                         for(; but && but->alignnr == nr; but=but->next);
2376
2377                         if(!but)
2378                                 break;
2379                 }
2380                 else
2381                         but= but->next;
2382         }
2383 }
2384
2385 /*
2386 ui_def_but is the function that draws many button types
2387
2388 for float buttons:
2389         "a1" Click Step (how much to change the value each click)
2390         "a2" Number of decimal point values to display. 0 defaults to 3 (0.000) 1,2,3, and a maximum of 4,
2391            all greater values will be clamped to 4.
2392
2393 */
2394 static uiBut *ui_def_but(uiBlock *block, int type, int retval, const char *str, int x1, int y1, short x2, short y2, void *poin, float min, float max, float a1, float a2, const char *tip)
2395 {
2396         uiBut *but;
2397         int slen;
2398         
2399         if(type & BUTPOIN) {            /* a pointer is required */
2400                 if(poin==NULL)
2401                         return NULL;
2402         }
2403
2404         but= MEM_callocN(sizeof(uiBut), "uiBut");
2405
2406         but->type= type & BUTTYPE;
2407         but->pointype= type & BUTPOIN;
2408         but->bit= type & BIT;
2409         but->bitnr= type & 31;
2410         but->icon = 0;
2411         but->iconadd=0;
2412
2413         but->retval= retval;
2414
2415         slen= strlen(str);
2416         if(slen >= UI_MAX_NAME_STR-1) {
2417                 but->str= MEM_mallocN(slen+2, "ui_def_but str"); /* why +2 ? */
2418         }
2419         else {
2420                 but->str= but->strdata;
2421         }
2422         memcpy(but->str, str, slen+1);
2423
2424         but->x1= x1; 
2425         but->y1= y1;
2426         but->x2= (x1+x2); 
2427         but->y2= (y1+y2);
2428         
2429         but->poin= poin;
2430         but->hardmin= but->softmin= min; 
2431         but->hardmax= but->softmax= max;
2432         but->a1= a1; 
2433         but->a2= a2;
2434         but->tip= tip;
2435         
2436         but->lock= block->lock;
2437         but->lockstr= block->lockstr;
2438         but->dt= block->dt;
2439
2440         but->aspect= 1.0f; //XXX block->aspect;
2441         but->block= block;              // pointer back, used for frontbuffer status, and picker
2442
2443         if((block->flag & UI_BUT_ALIGN) && ui_but_can_align(but))
2444                 but->alignnr= block->alignnr;
2445
2446         but->func= block->func;
2447         but->func_arg1= block->func_arg1;
2448         but->func_arg2= block->func_arg2;
2449
2450         but->funcN= block->funcN;
2451         if(block->func_argN)
2452                 but->func_argN= MEM_dupallocN(block->func_argN);
2453         
2454         but->pos= -1;   /* cursor invisible */
2455
2456         if(ELEM4(but->type, NUM, NUMABS, NUMSLI, HSVSLI)) {     /* add a space to name */
2457                 slen= strlen(but->str);
2458                 if(slen>0 && slen<UI_MAX_NAME_STR-2) {
2459                         if(but->str[slen-1]!=' ') {
2460                                 but->str[slen]= ' ';
2461                                 but->str[slen+1]= 0;
2462                         }
2463                 }
2464         }
2465
2466         if((block->flag & UI_BLOCK_LOOP) || ELEM8(but->type, MENU, TEX, LABEL, IDPOIN, BLOCK, BUTM, SEARCH_MENU, PROGRESSBAR))
2467                 but->flag |= (UI_TEXT_LEFT|UI_ICON_LEFT);
2468         else if(but->type==BUT_TOGDUAL)
2469                 but->flag |= UI_ICON_LEFT;
2470
2471         but->flag |= (block->flag & UI_BUT_ALIGN);
2472
2473         if (but->lock) {
2474                 if (but->lockstr) {
2475                         but->flag |= UI_BUT_DISABLED;
2476                 }
2477         }
2478
2479         /* keep track of UI_interface.h */
2480         if(ELEM7(but->type, BLOCK, BUT, LABEL, PULLDOWN, ROUNDBOX, LISTBOX, BUTM));
2481         else if(ELEM3(but->type, SCROLL, SEPR, FTPREVIEW));
2482         else if(but->type >= SEARCH_MENU);
2483         else but->flag |= UI_BUT_UNDO;
2484
2485         BLI_addtail(&block->buttons, but);
2486         
2487         if(block->curlayout)
2488                 ui_layout_add_but(block->curlayout, but);
2489
2490         return but;
2491 }
2492
2493 static uiBut *ui_def_but_rna(uiBlock *block, int type, int retval, const char *str, int x1, int y1, short x2, short y2, PointerRNA *ptr, const char *propname, int index, float min, float max, float a1, float a2,  const char *tip)
2494 {
2495         uiBut *but;
2496         PropertyRNA *prop;
2497         PropertyType proptype;
2498         int freestr= 0, icon= 0;
2499
2500         prop= RNA_struct_find_property(ptr, propname);
2501
2502         if(prop) {
2503                 proptype= RNA_property_type(prop);
2504
2505                 /* use rna values if parameters are not specified */
2506                 if(!str) {
2507                         if(type == MENU && proptype == PROP_ENUM) {
2508                                 EnumPropertyItem *item;
2509                                 DynStr *dynstr;
2510                                 int i, totitem, value, free;
2511
2512                                 RNA_property_enum_items(block->evil_C, ptr, prop, &item, &totitem, &free);
2513                                 value= RNA_property_enum_get(ptr, prop);
2514
2515                                 dynstr= BLI_dynstr_new();
2516                                 BLI_dynstr_appendf(dynstr, "%s%%t", RNA_property_ui_name(prop));
2517                                 for(i=0; i<totitem; i++) {
2518                                         if(!item[i].identifier[0]) {
2519                                                 if(item[i].name)
2520                                                         BLI_dynstr_appendf(dynstr, "|%s%%l", item[i].name);
2521                                                 else
2522                                                         BLI_dynstr_append(dynstr, "|%l");
2523                                         }
2524                                         else if(item[i].icon)
2525                                                 BLI_dynstr_appendf(dynstr, "|%s %%i%d %%x%d", item[i].name, item[i].icon, item[i].value);
2526                                         else
2527                                                 BLI_dynstr_appendf(dynstr, "|%s %%x%d", item[i].name, item[i].value);
2528
2529                                         if(value == item[i].value) {
2530                                                 icon= item[i].icon;
2531                                                 if(!tip)
2532                                                         tip= item[i].description;
2533                                         }
2534                                 }
2535                                 str= BLI_dynstr_get_cstring(dynstr);
2536                                 BLI_dynstr_free(dynstr);
2537
2538                                 if(free)
2539                                         MEM_freeN(item);
2540
2541                                 freestr= 1;
2542                         }
2543                         else if(ELEM(type, ROW, LISTROW) && proptype == PROP_ENUM) {
2544                                 EnumPropertyItem *item;
2545                                 int i, totitem, free;
2546
2547                                 RNA_property_enum_items(block->evil_C, ptr, prop, &item, &totitem, &free);
2548                                 for(i=0; i<totitem; i++) {
2549                                         if(item[i].identifier[0] && item[i].value == (int)max) {
2550                                                 str= item[i].name;
2551                                                 icon= item[i].icon;
2552                                         }
2553                                 }
2554
2555                                 if(!str)
2556                                         str= RNA_property_ui_name(prop);
2557                                 if(free)
2558                                         MEM_freeN(item);
2559                         }
2560                         else {
2561                                 str= RNA_property_ui_name(prop);
2562                                 icon= RNA_property_ui_icon(prop);
2563                         }
2564                 }
2565                 
2566                 if(!tip && proptype != PROP_ENUM)
2567                         tip= RNA_property_ui_description(prop);
2568
2569                 if(min == max || a1 == -1 || a2 == -1) {
2570                         if(proptype == PROP_INT) {
2571                                 int hardmin, hardmax, softmin, softmax, step;
2572
2573                                 RNA_property_int_range(ptr, prop, &hardmin, &hardmax);
2574                                 RNA_property_int_ui_range(ptr, prop, &softmin, &softmax, &step);
2575
2576                                 if(!ELEM(type, ROW, LISTROW) && min == max) {
2577                                         min= hardmin;
2578                                         max= hardmax;
2579                                 }
2580                                 if(a1 == -1)
2581                                         a1= step;
2582                                 if(a2 == -1)
2583                                         a2= 0;
2584                         }
2585                         else if(proptype == PROP_FLOAT) {
2586                                 float hardmin, hardmax, softmin, softmax, step, precision;
2587
2588                                 RNA_property_float_range(ptr, prop, &hardmin, &hardmax);
2589                                 RNA_property_float_ui_range(ptr, prop, &softmin, &softmax, &step, &precision);
2590
2591                                 if(!ELEM(type, ROW, LISTROW) && min == max) {
2592                                         min= hardmin;
2593                                         max= hardmax;
2594                                 }
2595                                 if(a1 == -1)
2596                                         a1= step;
2597                                 if(a2 == -1)
2598                                         a2= precision;
2599                         }
2600                         else if(proptype == PROP_STRING) {
2601                                 min= 0;
2602                                 max= RNA_property_string_maxlength(prop);
2603                                 if(max == 0) /* interface code should ideally support unlimited length */
2604                                         max= UI_MAX_DRAW_STR; 
2605                         }
2606                 }
2607         }
2608         else {
2609                 RNA_warning("ui_def_but_rna: property not found: %s.%s\n", RNA_struct_identifier(ptr->type), propname);
2610                 str= propname;
2611         }
2612
2613         /* now create button */
2614         but= ui_def_but(block, type, retval, str, x1, y1, x2, y2, NULL, min, max, a1, a2, tip);
2615
2616         if(prop) {
2617                 but->rnapoin= *ptr;
2618                 but->rnaprop= prop;
2619
2620                 if(RNA_property_array_length(&but->rnapoin, but->rnaprop))
2621                         but->rnaindex= index;
2622                 else
2623                         but->rnaindex= 0;
2624         }
2625
2626         if(icon) {
2627                 but->icon= (BIFIconID)icon;
2628                 but->flag |= UI_HAS_ICON;
2629                 but->flag|= UI_ICON_LEFT;
2630         }
2631         
2632         if (!prop || !RNA_property_editable(&but->rnapoin, prop)) {
2633                 but->flag |= UI_BUT_DISABLED;
2634                 but->lock = 1;
2635                 but->lockstr = "";
2636         }
2637
2638         /* If this button uses units, calculate the step from this */
2639         if(ui_is_but_unit(but))
2640                 but->a1= ui_get_but_step_unit(but, but->a1);
2641
2642         if(freestr)
2643                 MEM_freeN((void *)str);
2644         
2645         return but;
2646 }
2647
2648 static uiBut *ui_def_but_operator(uiBlock *block, int type, const char *opname, int opcontext, const char *str, int x1, int y1, short x2, short y2, const char *tip)
2649 {
2650         uiBut *but;
2651         wmOperatorType *ot;
2652         
2653         ot= WM_operatortype_find(opname, 0);
2654
2655         if(!str) {
2656                 if(ot) str= ot->name;
2657                 else str= opname;
2658         }
2659         
2660         if ((!tip || tip[0]=='\0') && ot && ot->description) {
2661                 tip= ot->description;
2662         }
2663
2664         but= ui_def_but(block, type, -1, str, x1, y1, x2, y2, NULL, 0, 0, 0, 0, tip);
2665         but->optype= ot;
2666         but->opcontext= opcontext;
2667
2668         if(!ot) {
2669                 but->flag |= UI_BUT_DISABLED;
2670                 but->lock = 1;
2671                 but->lockstr = "";
2672         }
2673
2674         return but;
2675 }
2676
2677 static uiBut *ui_def_but_operator_text(uiBlock *block, int type, const char *opname, int opcontext, const char *str, int x1, int y1, short x2, short y2, void *poin, float min, float max, float a1, float a2, const char *tip)
2678 {
2679         uiBut *but;
2680         wmOperatorType *ot;
2681         
2682         ot= WM_operatortype_find(opname, 0);
2683
2684         if(!str) {
2685                 if(ot) str= ot->name;
2686                 else str= opname;
2687         }
2688         
2689         if ((!tip || tip[0]=='\0') && ot && ot->description) {
2690                 tip= ot->description;
2691         }
2692
2693         but= ui_def_but(block, type, -1, str, x1, y1, x2, y2, poin, min, max, a1, a2, tip);
2694         but->optype= ot;
2695         but->opcontext= opcontext;
2696
2697         if(!ot) {
2698                 but->flag |= UI_BUT_DISABLED;
2699                 but->lock = 1;
2700                 but->lockstr = "";
2701         }
2702
2703         return but;
2704 }
2705
2706 uiBut *uiDefBut(uiBlock *block, int type, int retval, const char *str, int x1, int y1, short x2, short y2, void *poin, float min, float max, float a1, float a2, const char *tip)
2707 {
2708         uiBut *but= ui_def_but(block, type, retval, str, x1, y1, x2, y2, poin, min, max, a1, a2, tip);
2709
2710         ui_check_but(but);
2711         
2712         return but;
2713 }
2714
2715         /* if _x_ is a power of two (only one bit) return the power,
2716          * otherwise return -1. 
2717          * (1<<findBitIndex(x))==x for powers of two.
2718          */
2719 static int findBitIndex(unsigned int x) {
2720         if (!x || (x&(x-1))!=0) {       /* x&(x-1) strips lowest bit */
2721                 return -1;
2722         } else {
2723                 int idx= 0;
2724
2725                 if (x&0xFFFF0000)       idx+=16, x>>=16;
2726                 if (x&0xFF00)           idx+=8, x>>=8;
2727                 if (x&0xF0)                     idx+=4, x>>=4;
2728                 if (x&0xC)                      idx+=2, x>>=2;
2729                 if (x&0x2)                      idx+=1;
2730
2731                 return idx;
2732         }
2733 }
2734
2735 /* autocomplete helper functions */
2736 struct AutoComplete {
2737         int maxlen;
2738         char *truncate;
2739         const char *startname;
2740 };
2741
2742 AutoComplete *autocomplete_begin(const char *startname, int maxlen)
2743 {
2744         AutoComplete *autocpl;
2745         
2746         autocpl= MEM_callocN(sizeof(AutoComplete), "AutoComplete");
2747         autocpl->maxlen= maxlen;
2748         autocpl->truncate= MEM_callocN(sizeof(char)*maxlen, "AutoCompleteTruncate");
2749         autocpl->startname= startname;
2750
2751         return autocpl;
2752 }
2753
2754 void autocomplete_do_name(AutoComplete *autocpl, const char *name)
2755 {
2756         char *truncate= autocpl->truncate;
2757         const char *startname= autocpl->startname;
2758         int a;
2759
2760         for(a=0; a<autocpl->maxlen-1; a++) {
2761                 if(startname[a]==0 || startname[a]!=name[a])
2762                         break;
2763         }
2764         /* found a match */
2765         if(startname[a]==0) {
2766                 /* first match */
2767                 if(truncate[0]==0)
2768                         BLI_strncpy(truncate, name, autocpl->maxlen);
2769                 else {
2770                         /* remove from truncate what is not in bone->name */
2771                         for(a=0; a<autocpl->maxlen-1; a++) {
2772                                 if(name[a] == 0) {
2773                                         truncate[a]= 0;
2774                                         break;
2775                                 }
2776                                 else if(truncate[a]!=name[a])
2777                                         truncate[a]= 0;
2778                         }
2779                 }
2780         }
2781 }
2782
2783 void autocomplete_end(AutoComplete *autocpl, char *autoname)
2784 {       
2785         if(autocpl->truncate[0])
2786                 BLI_strncpy(autoname, autocpl->truncate, autocpl->maxlen);
2787         else {
2788                 if (autoname != autocpl->startname) /* dont copy a string over its self */
2789                         BLI_strncpy(autoname, autocpl->startname, autocpl->maxlen);
2790         }
2791         MEM_freeN(autocpl->truncate);
2792         MEM_freeN(autocpl);
2793 }
2794
2795 /* autocomplete callback for ID buttons */
2796 static void autocomplete_id(bContext *C, char *str, void *arg_v)
2797 {
2798         int blocktype= (intptr_t)arg_v;
2799         ListBase *listb= which_libbase(CTX_data_main(C), blocktype);
2800         
2801         if(listb==NULL) return;
2802         
2803         /* search if str matches the beginning of an ID struct */
2804         if(str[0]) {
2805                 AutoComplete *autocpl= autocomplete_begin(str, 22);
2806                 ID *id;
2807                 
2808                 for(id= listb->first; id; id= id->next)
2809                         autocomplete_do_name(autocpl, id->name+2);
2810
2811                 autocomplete_end(autocpl, str);
2812         }
2813 }
2814
2815 static uiBut *uiDefButBit(uiBlock *block, int type, int bit, int retval, const char *str, int x1, int y1, short x2, short y2, void *poin, float min, float max, float a1, float a2,  const char *tip)
2816 {
2817         int bitIdx= findBitIndex(bit);
2818         if (bitIdx==-1) {
2819                 return NULL;
2820         } else {
2821                 return uiDefBut(block, type|BIT|bitIdx, retval, str, x1, y1, x2, y2, poin, min, max, a1, a2, tip);
2822         }
2823 }
2824 uiBut *uiDefButF(uiBlock *block, int type, int retval, const char *str, int x1, int y1, short x2, short y2, float *poin, float min, float max, float a1, float a2,  const char *tip)
2825 {
2826         return uiDefBut(block, type|FLO, retval, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2827 }
2828 uiBut *uiDefButBitF(uiBlock *block, int type, int bit, int retval, const char *str, int x1, int y1, short x2, short y2, float *poin, float min, float max, float a1, float a2,  const char *tip)
2829 {
2830         return uiDefButBit(block, type|FLO, bit, retval, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2831 }
2832 uiBut *uiDefButI(uiBlock *block, int type, int retval, const char *str, int x1, int y1, short x2, short y2, int *poin, float min, float max, float a1, float a2,  const char *tip)
2833 {
2834         return uiDefBut(block, type|INT, retval, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2835 }
2836 uiBut *uiDefButBitI(uiBlock *block, int type, int bit, int retval, const char *str, int x1, int y1, short x2, short y2, int *poin, float min, float max, float a1, float a2,  const char *tip)
2837 {
2838         return uiDefButBit(block, type|INT, bit, retval, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2839 }
2840 uiBut *uiDefButS(uiBlock *block, int type, int retval, const char *str, int x1, int y1, short x2, short y2, short *poin, float min, float max, float a1, float a2,  const char *tip)
2841 {
2842         return uiDefBut(block, type|SHO, retval, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2843 }
2844 uiBut *uiDefButBitS(uiBlock *block, int type, int bit, int retval, const char *str, int x1, int y1, short x2, short y2, short *poin, float min, float max, float a1, float a2,  const char *tip)
2845 {
2846         return uiDefButBit(block, type|SHO, bit, retval, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2847 }
2848 uiBut *uiDefButC(uiBlock *block, int type, int retval, const char *str, int x1, int y1, short x2, short y2, char *poin, float min, float max, float a1, float a2,  const char *tip)
2849 {
2850         return uiDefBut(block, type|CHA, retval, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2851 }
2852 uiBut *uiDefButBitC(uiBlock *block, int type, int bit, int retval, const char *str, int x1, int y1, short x2, short y2, char *poin, float min, float max, float a1, float a2,  const char *tip)
2853 {
2854         return uiDefButBit(block, type|CHA, bit, retval, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2855 }
2856 uiBut *uiDefButR(uiBlock *block, int type, int retval, const char *str, int x1, int y1, short x2, short y2, PointerRNA *ptr, const char *propname, int index, float min, float max, float a1, float a2,  const char *tip)
2857 {
2858         uiBut *but;
2859
2860         but= ui_def_but_rna(block, type, retval, str, x1, y1, x2, y2, ptr, propname, index, min, max, a1, a2, tip);
2861         if(but)
2862                 ui_check_but(but);
2863
2864         return but;
2865 }
2866 uiBut *uiDefButO(uiBlock *block, int type, const char *opname, int opcontext, const char *str, int x1, int y1, short x2, short y2, const char *tip)
2867 {
2868         uiBut *but;
2869
2870         but= ui_def_but_operator(block, type, opname, opcontext, str, x1, y1, x2, y2, tip);
2871         if(but)
2872                 ui_check_but(but);
2873
2874         return but;
2875 }
2876
2877 uiBut *uiDefButTextO(uiBlock *block, int type, const char *opname, int opcontext, const char *str, int x1, int y1, short x2, short y2, void *poin, float min, float max, float a1, float a2,  const char *tip)
2878 {
2879         uiBut *but= ui_def_but_operator_text(block, type, opname, opcontext, str, x1, y1, x2, y2, poin, min, max, a1, a2, tip);
2880
2881         if(but)
2882                 ui_check_but(but);
2883         
2884         return but;
2885 }
2886
2887 /* if a1==1.0 then a2 is an extra icon blending factor (alpha 0.0 - 1.0) */
2888 uiBut *uiDefIconBut(uiBlock *block, int type, int retval, int icon, int x1, int y1, short x2, short y2, void *poin, float min, float max, float a1, float a2,  const char *tip)
2889 {
2890         uiBut *but= ui_def_but(block, type, retval, "", x1, y1, x2, y2, poin, min, max, a1, a2, tip);
2891         
2892         but->icon= (BIFIconID) icon;
2893         but->flag|= UI_HAS_ICON;
2894
2895         ui_check_but(but);
2896         
2897         return but;
2898 }
2899 static uiBut *uiDefIconButBit(uiBlock *block, int type, int bit, int retval, int icon, int x1, int y1, short x2, short y2, void *poin, float min, float max, float a1, float a2, const char *tip)
2900 {
2901         int bitIdx= findBitIndex(bit);
2902         if (bitIdx==-1) {
2903                 return NULL;
2904         } else {
2905                 return uiDefIconBut(block, type|BIT|bitIdx, retval, icon, x1, y1, x2, y2, poin, min, max, a1, a2, tip);
2906         }
2907 }
2908
2909 uiBut *uiDefIconButF(uiBlock *block, int type, int retval, int icon, int x1, int y1, short x2, short y2, float *poin, float min, float max, float a1, float a2,  const char *tip)
2910 {
2911         return uiDefIconBut(block, type|FLO, retval, icon, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2912 }
2913 uiBut *uiDefIconButBitF(uiBlock *block, int type, int bit, int retval, int icon, int x1, int y1, short x2, short y2, float *poin, float min, float max, float a1, float a2,  const char *tip)
2914 {
2915         return uiDefIconButBit(block, type|FLO, bit, retval, icon, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2916 }
2917 uiBut *uiDefIconButI(uiBlock *block, int type, int retval, int icon, int x1, int y1, short x2, short y2, int *poin, float min, float max, float a1, float a2,  const char *tip)
2918 {
2919         return uiDefIconBut(block, type|INT, retval, icon, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2920 }
2921 uiBut *uiDefIconButBitI(uiBlock *block, int type, int bit, int retval, int icon, int x1, int y1, short x2, short y2, int *poin, float min, float max, float a1, float a2,  const char *tip)
2922 {
2923         return uiDefIconButBit(block, type|INT, bit, retval, icon, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2924 }
2925 uiBut *uiDefIconButS(uiBlock *block, int type, int retval, int icon, int x1, int y1, short x2, short y2, short *poin, float min, float max, float a1, float a2,  const char *tip)
2926 {
2927         return uiDefIconBut(block, type|SHO, retval, icon, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2928 }
2929 uiBut *uiDefIconButBitS(uiBlock *block, int type, int bit, int retval, int icon, int x1, int y1, short x2, short y2, short *poin, float min, float max, float a1, float a2,  const char *tip)
2930 {
2931         return uiDefIconButBit(block, type|SHO, bit, retval, icon, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2932 }
2933 uiBut *uiDefIconButC(uiBlock *block, int type, int retval, int icon, int x1, int y1, short x2, short y2, char *poin, float min, float max, float a1, float a2,  const char *tip)
2934 {
2935         return uiDefIconBut(block, type|CHA, retval, icon, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2936 }
2937 uiBut *uiDefIconButBitC(uiBlock *block, int type, int bit, int retval, int icon, int x1, int y1, short x2, short y2, char *poin, float min, float max, float a1, float a2,  const char *tip)
2938 {
2939         return uiDefIconButBit(block, type|CHA, bit, retval, icon, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2940 }
2941 uiBut *uiDefIconButR(uiBlock *block, int type, int retval, int icon, int x1, int y1, short x2, short y2, PointerRNA *ptr, const char *propname, int index, float min, float max, float a1, float a2,  const char *tip)
2942 {
2943         uiBut *but;
2944
2945         but= ui_def_but_rna(block, type, retval, "", x1, y1, x2, y2, ptr, propname, index, min, max, a1, a2, tip);
2946         if(but) {
2947                 if(icon) {
2948                         but->icon= (BIFIconID) icon;
2949                         but->flag|= UI_HAS_ICON;
2950                 }
2951                 ui_check_but(but);
2952         }
2953
2954         return but;
2955 }
2956 uiBut *uiDefIconButO(uiBlock *block, int type, const char *opname, int opcontext, int icon, int x1, int y1, short x2, short y2, const char *tip)
2957 {
2958         uiBut *but;
2959
2960         but= ui_def_but_operator(block, type, opname, opcontext, "", x1, y1, x2, y2, tip);
2961         if(but) {
2962                 but->icon= (BIFIconID) icon;
2963                 but->flag|= UI_HAS_ICON;
2964                 ui_check_but(but);
2965         }
2966
2967         return but;
2968 }
2969
2970 /* Button containing both string label and icon */
2971 uiBut *uiDefIconTextBut(uiBlock *block, int type, int retval, int icon, const char *str, int x1, int y1, short x2, short y2, void *poin, float min, float max, float a1, float a2,  const char *tip)
2972 {
2973         uiBut *but= ui_def_but(block, type, retval, str, x1, y1, x2, y2, poin, min, max, a1, a2, tip);
2974
2975         but->icon= (BIFIconID) icon;
2976         but->flag|= UI_HAS_ICON;
2977
2978         but->flag|= UI_ICON_LEFT;
2979
2980         ui_check_but(but);
2981
2982         return but;
2983 }
2984 static uiBut *uiDefIconTextButBit(uiBlock *block, int type, int bit, int retval, int icon, const char *str, int x1, int y1, short x2, short y2, void *poin, float min, float max, float a1, float a2,  const char *tip)
2985 {
2986         int bitIdx= findBitIndex(bit);
2987         if (bitIdx==-1) {
2988                 return NULL;
2989         } else {
2990                 return uiDefIconTextBut(block, type|BIT|bitIdx, retval, icon, str, x1, y1, x2, y2, poin, min, max, a1, a2, tip);
2991         }
2992 }
2993
2994 uiBut *uiDefIconTextButF(uiBlock *block, int type, int retval, int icon, const char *str, int x1, int y1, short x2, short y2, float *poin, float min, float max, float a1, float a2,  const char *tip)
2995 {
2996         return uiDefIconTextBut(block, type|FLO, retval, icon, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
2997 }
2998 uiBut *uiDefIconTextButBitF(uiBlock *block, int type, int bit, int retval, int icon, const char *str, int x1, int y1, short x2, short y2, float *poin, float min, float max, float a1, float a2,  const char *tip)
2999 {
3000         return uiDefIconTextButBit(block, type|FLO, bit, retval, icon, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
3001 }
3002 uiBut *uiDefIconTextButI(uiBlock *block, int type, int retval, int icon, const char *str, int x1, int y1, short x2, short y2, int *poin, float min, float max, float a1, float a2,  const char *tip)
3003 {
3004         return uiDefIconTextBut(block, type|INT, retval, icon, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
3005 }
3006 uiBut *uiDefIconTextButBitI(uiBlock *block, int type, int bit, int retval, int icon, const char *str, int x1, int y1, short x2, short y2, int *poin, float min, float max, float a1, float a2,  const char *tip)
3007 {
3008         return uiDefIconTextButBit(block, type|INT, bit, retval, icon, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
3009 }
3010 uiBut *uiDefIconTextButS(uiBlock *block, int type, int retval, int icon, const char *str, int x1, int y1, short x2, short y2, short *poin, float min, float max, float a1, float a2,  const char *tip)
3011 {
3012         return uiDefIconTextBut(block, type|SHO, retval, icon, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
3013 }
3014 uiBut *uiDefIconTextButBitS(uiBlock *block, int type, int bit, int retval, int icon, const char *str, int x1, int y1, short x2, short y2, short *poin, float min, float max, float a1, float a2,  const char *tip)
3015 {
3016         return uiDefIconTextButBit(block, type|SHO, bit, retval, icon, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
3017 }
3018 uiBut *uiDefIconTextButC(uiBlock *block, int type, int retval, int icon, const char *str, int x1, int y1, short x2, short y2, char *poin, float min, float max, float a1, float a2,  const char *tip)
3019 {
3020         return uiDefIconTextBut(block, type|CHA, retval, icon, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
3021 }
3022 uiBut *uiDefIconTextButBitC(uiBlock *block, int type, int bit, int retval, int icon, const char *str, int x1, int y1, short x2, short y2, char *poin, float min, float max, float a1, float a2,  const char *tip)
3023 {
3024         return uiDefIconTextButBit(block, type|CHA, bit, retval, icon, str, x1, y1, x2, y2, (void*) poin, min, max, a1, a2, tip);
3025 }
3026 uiBut *uiDefIconTextButR(uiBlock *block, int type, int retval, int icon, const char *str, int x1, int y1, short x2, short y2, PointerRNA *ptr, const char *propname, int index, float min, float max, float a1, float a2,  const char *tip)
3027 {
3028         uiBut *but;
3029
3030         but= ui_def_but_rna(block, type, retval, str, x1, y1, x2, y2, ptr, propname, index, min, max, a1, a2, tip);
3031         if(but) {
3032                 if(icon) {
3033                         but->icon= (BIFIconID) icon;
3034                         but->flag|= UI_HAS_ICON;
3035                 }
3036                 but->flag|= UI_ICON_LEFT;
3037                 ui_check_but(but);
3038         }
3039
3040         return but;
3041 }
3042 uiBut *uiDefIconTextButO(uiBlock *block, int type, const char *opname, int opcontext, int icon, const char *str, int x1, int y1, short x2, short y2, const char *tip)
3043 {