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