Merged changes in the trunk up to revision 44561.
[blender-staging.git] / source / blender / blenkernel / intern / brush.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  * The Original Code is: all of this file.
22  *
23  * Contributor(s): none yet.
24  *
25  * ***** END GPL LICENSE BLOCK *****
26  */
27
28 /** \file blender/blenkernel/intern/brush.c
29  *  \ingroup bke
30  */
31
32
33 #include <math.h>
34 #include <string.h>
35
36 #include "MEM_guardedalloc.h"
37
38 #include "DNA_brush_types.h"
39 #include "DNA_color_types.h"
40 #include "DNA_scene_types.h"
41 #include "DNA_object_types.h"
42 #include "DNA_windowmanager_types.h"
43
44 #include "WM_types.h"
45
46 #include "RNA_access.h"
47
48 #include "BLI_bpath.h"
49 #include "BLI_math.h"
50 #include "BLI_blenlib.h"
51 #include "BLI_rand.h"
52 #include "BLI_utildefines.h"
53
54 #include "BKE_brush.h"
55 #include "BKE_colortools.h"
56 #include "BKE_global.h"
57 #include "BKE_image.h"
58 #include "BKE_library.h"
59 #include "BKE_main.h"
60 #include "BKE_paint.h"
61 #include "BKE_texture.h"
62 #include "BKE_icons.h"
63
64 #include "IMB_imbuf.h"
65 #include "IMB_imbuf_types.h"
66
67 #include "RE_render_ext.h" /* externtex */
68 #include "RE_shader_ext.h"
69
70 static void brush_set_defaults(Brush *brush)
71 {
72         brush->blend = 0;
73         brush->flag = 0;
74
75         brush->ob_mode = OB_MODE_ALL_PAINT;
76
77         /* BRUSH SCULPT TOOL SETTINGS */
78         brush->size= 35; /* radius of the brush in pixels */
79         brush->alpha= 0.5f; /* brush strength/intensity probably variable should be renamed? */
80         brush->autosmooth_factor= 0.0f;
81         brush->crease_pinch_factor= 0.5f;
82         brush->sculpt_plane = SCULPT_DISP_DIR_AREA;
83         brush->plane_offset= 0.0f; /* how far above or below the plane that is found by averaging the faces */
84         brush->plane_trim= 0.5f;
85         brush->clone.alpha= 0.5f;
86         brush->normal_weight= 0.0f;
87         brush->flag |= BRUSH_ALPHA_PRESSURE;
88
89         /* BRUSH PAINT TOOL SETTINGS */
90         brush->rgb[0]= 1.0f; /* default rgb color of the brush when painting - white */
91         brush->rgb[1]= 1.0f;
92         brush->rgb[2]= 1.0f;
93
94         /* BRUSH STROKE SETTINGS */
95         brush->flag |= (BRUSH_SPACE|BRUSH_SPACE_ATTEN);
96         brush->spacing= 10; /* how far each brush dot should be spaced as a percentage of brush diameter */
97
98         brush->smooth_stroke_radius= 75;
99         brush->smooth_stroke_factor= 0.9f;
100
101         brush->rate= 0.1f; /* time delay between dots of paint or sculpting when doing airbrush mode */
102
103         brush->jitter= 0.0f;
104
105         /* BRUSH TEXTURE SETTINGS */
106         default_mtex(&brush->mtex);
107
108         brush->texture_sample_bias= 0; /* value to added to texture samples */
109         brush->texture_overlay_alpha= 33;
110
111         /* brush appearance  */
112
113         brush->add_col[0]= 1.00; /* add mode color is light red */
114         brush->add_col[1]= 0.39;
115         brush->add_col[2]= 0.39;
116
117         brush->sub_col[0]= 0.39; /* subtract mode color is light blue */
118         brush->sub_col[1]= 0.39;
119         brush->sub_col[2]= 1.00;
120 }
121
122 /* Datablock add/copy/free/make_local */
123
124 Brush *add_brush(const char *name)
125 {
126         Brush *brush;
127
128         brush= alloc_libblock(&G.main->brush, ID_BR, name);
129
130         /* enable fake user by default */
131         brush->id.flag |= LIB_FAKEUSER;
132
133         brush_set_defaults(brush);
134
135         brush->sculpt_tool = SCULPT_TOOL_DRAW; /* sculpting defaults to the draw tool for new brushes */
136
137          /* the default alpha falloff curve */
138         brush_curve_preset(brush, CURVE_PRESET_SMOOTH);
139
140         return brush;
141 }
142
143 Brush *copy_brush(Brush *brush)
144 {
145         Brush *brushn;
146         
147         brushn= copy_libblock(&brush->id);
148
149         if (brush->mtex.tex)
150                 id_us_plus((ID*)brush->mtex.tex);
151
152         if (brush->icon_imbuf)
153                 brushn->icon_imbuf= IMB_dupImBuf(brush->icon_imbuf);
154
155         brushn->preview = NULL;
156
157         brushn->curve= curvemapping_copy(brush->curve);
158
159         /* enable fake user by default */
160         if (!(brushn->id.flag & LIB_FAKEUSER)) {
161                 brushn->id.flag |= LIB_FAKEUSER;
162                 brushn->id.us++;
163         }
164         
165         return brushn;
166 }
167
168 /* not brush itself */
169 void free_brush(Brush *brush)
170 {
171         if (brush->mtex.tex)
172                 brush->mtex.tex->id.us--;
173
174         if (brush->icon_imbuf)
175                 IMB_freeImBuf(brush->icon_imbuf);
176
177         BKE_previewimg_free(&(brush->preview));
178
179         curvemapping_free(brush->curve);
180 }
181
182 static void extern_local_brush(Brush *brush)
183 {
184         id_lib_extern((ID *)brush->mtex.tex);
185         id_lib_extern((ID *)brush->clone.image);
186 }
187
188 void make_local_brush(Brush *brush)
189 {
190
191         /* - only lib users: do nothing
192          * - only local users: set flag
193          * - mixed: make copy
194          */
195
196         Main *bmain= G.main;
197         Scene *scene;
198         int is_local= FALSE, is_lib= FALSE;
199
200         if(brush->id.lib==NULL) return;
201
202         if(brush->clone.image) {
203                 /* special case: ima always local immediately. Clone image should only
204                    have one user anyway. */
205                 id_clear_lib_data(bmain, &brush->clone.image->id);
206                 extern_local_brush(brush);
207         }
208
209         for(scene= bmain->scene.first; scene && ELEM(0, is_lib, is_local); scene=scene->id.next) {
210                 if(paint_brush(&scene->toolsettings->imapaint.paint)==brush) {
211                         if(scene->id.lib) is_lib= TRUE;
212                         else is_local= TRUE;
213                 }
214         }
215
216         if(is_local && is_lib == FALSE) {
217                 id_clear_lib_data(bmain, &brush->id);
218                 extern_local_brush(brush);
219
220                 /* enable fake user by default */
221                 if (!(brush->id.flag & LIB_FAKEUSER)) {
222                         brush->id.flag |= LIB_FAKEUSER;
223                         brush->id.us++;
224                 }
225         }
226         else if(is_local && is_lib) {
227                 Brush *brush_new= copy_brush(brush);
228                 brush_new->id.us= 1; /* only keep fake user */
229                 brush_new->id.flag |= LIB_FAKEUSER;
230
231                 /* Remap paths of new ID using old library as base. */
232                 BKE_id_lib_local_paths(bmain, brush->id.lib, &brush_new->id);
233                 
234                 for(scene= bmain->scene.first; scene; scene=scene->id.next) {
235                         if(paint_brush(&scene->toolsettings->imapaint.paint)==brush) {
236                                 if(scene->id.lib==NULL) {
237                                         paint_brush_set(&scene->toolsettings->imapaint.paint, brush_new);
238                                 }
239                         }
240                 }
241         }
242 }
243
244 void brush_debug_print_state(Brush *br)
245 {
246         /* create a fake brush and set it to the defaults */
247         Brush def= {{NULL}};
248         brush_set_defaults(&def);
249         
250 #define BR_TEST(field, t)                                       \
251         if(br->field != def.field)                              \
252                 printf("br->" #field " = %" #t ";\n", br->field)
253
254 #define BR_TEST_FLAG(_f)                                \
255         if((br->flag & _f) && !(def.flag & _f))         \
256                 printf("br->flag |= " #_f ";\n");       \
257         else if(!(br->flag & _f) && (def.flag & _f))    \
258                 printf("br->flag &= ~" #_f ";\n")
259         
260
261         /* print out any non-default brush state */
262         BR_TEST(normal_weight, f);
263
264         BR_TEST(blend, d);
265         BR_TEST(size, d);
266
267         /* br->flag */
268         BR_TEST_FLAG(BRUSH_AIRBRUSH);
269         BR_TEST_FLAG(BRUSH_TORUS);
270         BR_TEST_FLAG(BRUSH_ALPHA_PRESSURE);
271         BR_TEST_FLAG(BRUSH_SIZE_PRESSURE);
272         BR_TEST_FLAG(BRUSH_JITTER_PRESSURE);
273         BR_TEST_FLAG(BRUSH_SPACING_PRESSURE);
274         BR_TEST_FLAG(BRUSH_FIXED_TEX);
275         BR_TEST_FLAG(BRUSH_RAKE);
276         BR_TEST_FLAG(BRUSH_ANCHORED);
277         BR_TEST_FLAG(BRUSH_DIR_IN);
278         BR_TEST_FLAG(BRUSH_SPACE);
279         BR_TEST_FLAG(BRUSH_SMOOTH_STROKE);
280         BR_TEST_FLAG(BRUSH_PERSISTENT);
281         BR_TEST_FLAG(BRUSH_ACCUMULATE);
282         BR_TEST_FLAG(BRUSH_LOCK_ALPHA);
283         BR_TEST_FLAG(BRUSH_ORIGINAL_NORMAL);
284         BR_TEST_FLAG(BRUSH_OFFSET_PRESSURE);
285         BR_TEST_FLAG(BRUSH_SPACE_ATTEN);
286         BR_TEST_FLAG(BRUSH_ADAPTIVE_SPACE);
287         BR_TEST_FLAG(BRUSH_LOCK_SIZE);
288         BR_TEST_FLAG(BRUSH_TEXTURE_OVERLAY);
289         BR_TEST_FLAG(BRUSH_EDGE_TO_EDGE);
290         BR_TEST_FLAG(BRUSH_RESTORE_MESH);
291         BR_TEST_FLAG(BRUSH_INVERSE_SMOOTH_PRESSURE);
292         BR_TEST_FLAG(BRUSH_RANDOM_ROTATION);
293         BR_TEST_FLAG(BRUSH_PLANE_TRIM);
294         BR_TEST_FLAG(BRUSH_FRONTFACE);
295         BR_TEST_FLAG(BRUSH_CUSTOM_ICON);
296
297         BR_TEST(jitter, f);
298         BR_TEST(spacing, d);
299         BR_TEST(smooth_stroke_radius, d);
300         BR_TEST(smooth_stroke_factor, f);
301         BR_TEST(rate, f);
302
303         BR_TEST(alpha, f);
304
305         BR_TEST(sculpt_plane, d);
306
307         BR_TEST(plane_offset, f);
308
309         BR_TEST(autosmooth_factor, f);
310
311         BR_TEST(crease_pinch_factor, f);
312
313         BR_TEST(plane_trim, f);
314
315         BR_TEST(texture_sample_bias, f);
316         BR_TEST(texture_overlay_alpha, d);
317
318         BR_TEST(add_col[0], f);
319         BR_TEST(add_col[1], f);
320         BR_TEST(add_col[2], f);
321         BR_TEST(sub_col[0], f);
322         BR_TEST(sub_col[1], f);
323         BR_TEST(sub_col[2], f);
324
325         printf("\n");
326         
327 #undef BR_TEST
328 #undef BR_TEST_FLAG
329 }
330
331 void brush_reset_sculpt(Brush *br)
332 {
333         /* enable this to see any non-default
334            settings used by a brush:
335
336         brush_debug_print_state(br);
337         */
338
339         brush_set_defaults(br);
340         brush_curve_preset(br, CURVE_PRESET_SMOOTH);
341
342         switch(br->sculpt_tool) {
343         case SCULPT_TOOL_CLAY:
344                 br->flag |= BRUSH_FRONTFACE;
345                 break;
346         case SCULPT_TOOL_CREASE:
347                 br->flag |= BRUSH_DIR_IN;
348                 br->alpha = 0.25;
349                 break;
350         case SCULPT_TOOL_FILL:
351                 br->add_col[1] = 1;
352                 br->sub_col[0] = 0.25;
353                 br->sub_col[1] = 1;
354                 break;
355         case SCULPT_TOOL_FLATTEN:
356                 br->add_col[1] = 1;
357                 br->sub_col[0] = 0.25;
358                 br->sub_col[1] = 1;
359                 break;
360         case SCULPT_TOOL_INFLATE:
361                 br->add_col[0] = 0.750000;
362                 br->add_col[1] = 0.750000;
363                 br->add_col[2] = 0.750000;
364                 br->sub_col[0] = 0.250000;
365                 br->sub_col[1] = 0.250000;
366                 br->sub_col[2] = 0.250000;
367                 break;
368         case SCULPT_TOOL_NUDGE:
369                 br->add_col[0] = 0.250000;
370                 br->add_col[1] = 1.000000;
371                 br->add_col[2] = 0.250000;
372                 break;
373         case SCULPT_TOOL_PINCH:
374                 br->add_col[0] = 0.750000;
375                 br->add_col[1] = 0.750000;
376                 br->add_col[2] = 0.750000;
377                 br->sub_col[0] = 0.250000;
378                 br->sub_col[1] = 0.250000;
379                 br->sub_col[2] = 0.250000;
380                 break;
381         case SCULPT_TOOL_SCRAPE:
382                 br->add_col[1] = 1.000000;
383                 br->sub_col[0] = 0.250000;
384                 br->sub_col[1] = 1.000000;
385                 break;
386         case SCULPT_TOOL_ROTATE:
387                 br->alpha = 1.0;
388                 break;
389         case SCULPT_TOOL_SMOOTH:
390                 br->flag &= ~BRUSH_SPACE_ATTEN;
391                 br->spacing = 5;
392                 br->add_col[0] = 0.750000;
393                 br->add_col[1] = 0.750000;
394                 br->add_col[2] = 0.750000;
395                 break;
396         case SCULPT_TOOL_GRAB:
397         case SCULPT_TOOL_SNAKE_HOOK:
398         case SCULPT_TOOL_THUMB:
399                 br->size = 75;
400                 br->flag &= ~BRUSH_ALPHA_PRESSURE;
401                 br->flag &= ~BRUSH_SPACE;
402                 br->flag &= ~BRUSH_SPACE_ATTEN;
403                 br->add_col[0] = 0.250000;
404                 br->add_col[1] = 1.000000;
405                 br->add_col[2] = 0.250000;
406                 break;
407         default:
408                 break;
409         }
410 }
411
412 /* Library Operations */
413 void brush_curve_preset(Brush *b, /*CurveMappingPreset*/int preset)
414 {
415         CurveMap *cm = NULL;
416
417         if(!b->curve)
418                 b->curve = curvemapping_add(1, 0, 0, 1, 1);
419
420         cm = b->curve->cm;
421         cm->flag &= ~CUMA_EXTEND_EXTRAPOLATE;
422
423         b->curve->preset = preset;
424         curvemap_reset(cm, &b->curve->clipr, b->curve->preset, CURVEMAP_SLOPE_NEGATIVE);
425         curvemapping_changed(b->curve, 0);
426 }
427
428 int brush_texture_set_nr(Brush *brush, int nr)
429 {
430         ID *idtest, *id=NULL;
431
432         id= (ID *)brush->mtex.tex;
433
434         idtest= (ID*)BLI_findlink(&G.main->tex, nr-1);
435         if(idtest==NULL) { /* new tex */
436                 if(id) idtest= (ID *)copy_texture((Tex *)id);
437                 else idtest= (ID *)add_texture("Tex");
438                 idtest->us--;
439         }
440         if(idtest!=id) {
441                 brush_texture_delete(brush);
442
443                 brush->mtex.tex= (Tex*)idtest;
444                 id_us_plus(idtest);
445
446                 return 1;
447         }
448
449         return 0;
450 }
451
452 int brush_texture_delete(Brush *brush)
453 {
454         if(brush->mtex.tex)
455                 brush->mtex.tex->id.us--;
456
457         return 1;
458 }
459
460 int brush_clone_image_set_nr(Brush *brush, int nr)
461 {
462         if(brush && nr > 0) {
463                 Image *ima= (Image*)BLI_findlink(&G.main->image, nr-1);
464
465                 if(ima) {
466                         brush_clone_image_delete(brush);
467                         brush->clone.image= ima;
468                         id_us_plus(&ima->id);
469                         brush->clone.offset[0]= brush->clone.offset[1]= 0.0f;
470
471                         return 1;
472                 }
473         }
474
475         return 0;
476 }
477
478 int brush_clone_image_delete(Brush *brush)
479 {
480         if (brush && brush->clone.image) {
481                 brush->clone.image->id.us--;
482                 brush->clone.image= NULL;
483                 return 1;
484         }
485
486         return 0;
487 }
488
489 /* Brush Sampling */
490 void brush_sample_tex(const Scene *scene, Brush *brush, const float xy[2], float rgba[4], const int thread)
491 {
492         MTex *mtex= &brush->mtex;
493
494         if (mtex && mtex->tex) {
495                 float co[3], tin, tr, tg, tb, ta;
496                 int hasrgb;
497                 const int radius= brush_size(scene, brush);
498
499                 co[0]= xy[0]/radius;
500                 co[1]= xy[1]/radius;
501                 co[2]= 0.0f;
502
503                 hasrgb= externtex(mtex, co, &tin, &tr, &tg, &tb, &ta, thread);
504
505                 if (hasrgb) {
506                         rgba[0]= tr;
507                         rgba[1]= tg;
508                         rgba[2]= tb;
509                         rgba[3]= ta;
510                 }
511                 else {
512                         rgba[0]= tin;
513                         rgba[1]= tin;
514                         rgba[2]= tin;
515                         rgba[3]= 1.0f;
516                 }
517         }
518         else {
519                 rgba[0]= rgba[1]= rgba[2]= rgba[3]= 1.0f;
520         }
521 }
522
523 /* TODO, use define for 'texfall' arg */
524 void brush_imbuf_new(const Scene *scene, Brush *brush, short flt, short texfall, int bufsize, ImBuf **outbuf, int use_color_correction)
525 {
526         ImBuf *ibuf;
527         float xy[2], rgba[4], *dstf;
528         int x, y, rowbytes, xoff, yoff, imbflag;
529         const int radius= brush_size(scene, brush);
530         unsigned char *dst, crgb[3];
531         const float alpha= brush_alpha(scene, brush);
532         float brush_rgb[3];
533     
534         imbflag= (flt)? IB_rectfloat: IB_rect;
535         xoff = -bufsize/2.0f + 0.5f;
536         yoff = -bufsize/2.0f + 0.5f;
537         rowbytes= bufsize*4;
538
539         if (*outbuf)
540                 ibuf= *outbuf;
541         else
542                 ibuf= IMB_allocImBuf(bufsize, bufsize, 32, imbflag);
543
544         if (flt) {
545                 copy_v3_v3(brush_rgb, brush->rgb);
546                 if (use_color_correction) {
547                         srgb_to_linearrgb_v3_v3(brush_rgb, brush_rgb);
548                 }
549
550                 for (y=0; y < ibuf->y; y++) {
551                         dstf = ibuf->rect_float + y*rowbytes;
552
553                         for (x=0; x < ibuf->x; x++, dstf+=4) {
554                                 xy[0] = x + xoff;
555                                 xy[1] = y + yoff;
556
557                                 if (texfall == 0) {
558                                         copy_v3_v3(dstf, brush_rgb);
559                                         dstf[3]= alpha*brush_curve_strength_clamp(brush, len_v2(xy), radius);
560                                 }
561                                 else if (texfall == 1) {
562                                         brush_sample_tex(scene, brush, xy, dstf, 0);
563                                 }
564                                 else {
565                                         brush_sample_tex(scene, brush, xy, rgba, 0);
566                                         mul_v3_v3v3(dstf, rgba, brush_rgb);
567                                         dstf[3] = rgba[3]*alpha*brush_curve_strength_clamp(brush, len_v2(xy), radius);
568                                 }
569                         }
570                 }
571         }
572         else {
573                 float alpha_f; /* final float alpha to convert to char */
574                 rgb_float_to_uchar(crgb, brush->rgb);
575
576                 for (y=0; y < ibuf->y; y++) {
577                         dst = (unsigned char *)ibuf->rect + y*rowbytes;
578
579                         for (x=0; x < ibuf->x; x++, dst+=4) {
580                                 xy[0] = x + xoff;
581                                 xy[1] = y + yoff;
582
583                                 if (texfall == 0) {
584                                         alpha_f = alpha * brush_curve_strength(brush, len_v2(xy), radius);
585
586                                         dst[0] = crgb[0];
587                                         dst[1] = crgb[1];
588                                         dst[2] = crgb[2];
589                                         dst[3] = FTOCHAR(alpha_f);
590                                 }
591                                 else if (texfall == 1) {
592                                         brush_sample_tex(scene, brush, xy, rgba, 0);
593                                         rgba_float_to_uchar(dst, rgba);
594                                 }
595                                 else if (texfall == 2) {
596                                         brush_sample_tex(scene, brush, xy, rgba, 0);
597                                         mul_v3_v3(rgba, brush->rgb);
598                                         alpha_f = rgba[3] * alpha * brush_curve_strength_clamp(brush, len_v2(xy), radius);
599
600                                         rgb_float_to_uchar(dst, rgba);
601
602                                         dst[3] = FTOCHAR(alpha_f);
603                                 }
604                                 else {
605                                         brush_sample_tex(scene, brush, xy, rgba, 0);
606                                         alpha_f = rgba[3] * alpha * brush_curve_strength_clamp(brush, len_v2(xy), radius);
607
608                                         dst[0] = crgb[0];
609                                         dst[1] = crgb[1];
610                                         dst[2] = crgb[2];
611                                         dst[3] = FTOCHAR(alpha_f);
612                                 }
613                         }
614                 }
615         }
616
617         *outbuf= ibuf;
618 }
619
620 /* Unified Size and Strength */
621
622 // XXX: be careful about setting size and unprojected radius
623 // because they depend on one another
624 // these functions do not set the other corresponding value
625 // this can lead to odd behavior if size and unprojected
626 // radius become inconsistent.
627 // the biggest problem is that it isn't possible to change
628 // unprojected radius because a view context is not
629 // available.  my ussual solution to this is to use the
630 // ratio of change of the size to change the unprojected
631 // radius.  Not completely convinced that is correct.
632 // In anycase, a better solution is needed to prevent
633 // inconsistency.
634
635 void brush_set_size(Scene *scene, Brush *brush, int size)
636 {
637         UnifiedPaintSettings *ups = &scene->toolsettings->unified_paint_settings;
638
639         if (ups->flag & UNIFIED_PAINT_SIZE)
640                 ups->size= size;
641         else
642                 brush->size= size;
643 }
644
645 int brush_size(const Scene *scene, Brush *brush)
646 {
647         UnifiedPaintSettings *ups = &scene->toolsettings->unified_paint_settings;
648
649         return (ups->flag & UNIFIED_PAINT_SIZE) ? ups->size : brush->size;
650 }
651
652 int brush_use_locked_size(const Scene *scene, Brush *brush)
653 {
654         const short us_flag = scene->toolsettings->unified_paint_settings.flag;
655
656         return (us_flag & UNIFIED_PAINT_SIZE) ?
657                 (us_flag & UNIFIED_PAINT_BRUSH_LOCK_SIZE) :
658                 (brush->flag & BRUSH_LOCK_SIZE);
659 }
660
661 int brush_use_size_pressure(const Scene *scene, Brush *brush)
662 {
663         const short us_flag = scene->toolsettings->unified_paint_settings.flag;
664
665         return (us_flag & UNIFIED_PAINT_SIZE) ?
666                 (us_flag & UNIFIED_PAINT_BRUSH_SIZE_PRESSURE) :
667                 (brush->flag & BRUSH_SIZE_PRESSURE);
668 }
669
670 int brush_use_alpha_pressure(const Scene *scene, Brush *brush)
671 {
672         const short us_flag = scene->toolsettings->unified_paint_settings.flag;
673
674         return (us_flag & UNIFIED_PAINT_ALPHA) ?
675                 (us_flag & UNIFIED_PAINT_BRUSH_ALPHA_PRESSURE) :
676                 (brush->flag & BRUSH_ALPHA_PRESSURE);
677 }
678
679 void brush_set_unprojected_radius(Scene *scene, Brush *brush, float unprojected_radius)
680 {
681         UnifiedPaintSettings *ups = &scene->toolsettings->unified_paint_settings;
682
683         if (ups->flag & UNIFIED_PAINT_SIZE)
684                 ups->unprojected_radius= unprojected_radius;
685         else
686                 brush->unprojected_radius= unprojected_radius;
687 }
688
689 float brush_unprojected_radius(const Scene *scene, Brush *brush)
690 {
691         UnifiedPaintSettings *ups = &scene->toolsettings->unified_paint_settings;
692
693         return (ups->flag & UNIFIED_PAINT_SIZE) ?
694                 ups->unprojected_radius :
695                 brush->unprojected_radius;
696 }
697
698 static void brush_set_alpha(Scene *scene, Brush *brush, float alpha)
699 {
700         UnifiedPaintSettings *ups = &scene->toolsettings->unified_paint_settings;
701
702         if (ups->flag & UNIFIED_PAINT_ALPHA)
703                 ups->alpha= alpha;
704         else
705                 brush->alpha= alpha;
706 }
707
708 float brush_alpha(const Scene *scene, Brush *brush)
709 {
710         UnifiedPaintSettings *ups = &scene->toolsettings->unified_paint_settings;
711
712         return (ups->flag & UNIFIED_PAINT_ALPHA) ? ups->alpha : brush->alpha;
713 }
714
715 /* scale unprojected radius to reflect a change in the brush's 2D size */
716 void brush_scale_unprojected_radius(float *unprojected_radius,
717                                                                         int new_brush_size,
718                                                                         int old_brush_size)
719 {
720         float scale = new_brush_size;
721         /* avoid division by zero */
722         if(old_brush_size != 0)
723                 scale /= (float)old_brush_size;
724         (*unprojected_radius) *= scale;
725 }
726
727 /* scale brush size to reflect a change in the brush's unprojected radius */
728 void brush_scale_size(int *brush_size,
729                                           float new_unprojected_radius,
730                                           float old_unprojected_radius)
731 {
732         float scale = new_unprojected_radius;
733         /* avoid division by zero */
734         if(old_unprojected_radius != 0)
735                 scale /= new_unprojected_radius;
736         (*brush_size)= (int)((float)(*brush_size) * scale);
737 }
738
739 /* Brush Painting */
740
741 typedef struct BrushPainterCache {
742         short enabled;
743
744         int size;                       /* size override, if 0 uses 2*brush_size(brush) */
745         short flt;                      /* need float imbuf? */
746         short texonly;          /* no alpha, color or fallof, only texture in imbuf */
747
748         int lastsize;
749         float lastalpha;
750         float lastjitter;
751
752         ImBuf *ibuf;
753         ImBuf *texibuf;
754         ImBuf *maskibuf;
755 } BrushPainterCache;
756
757 struct BrushPainter {
758         Scene *scene;
759         Brush *brush;
760
761         float lastmousepos[2];  /* mouse position of last paint call */
762
763         float accumdistance;    /* accumulated distance of brush since last paint op */
764         float lastpaintpos[2];  /* position of last paint op */
765         float startpaintpos[2]; /* position of first paint */
766
767         double accumtime;               /* accumulated time since last paint op (airbrush) */
768         double lasttime;                /* time of last update */
769
770         float lastpressure;
771
772         short firsttouch;               /* first paint op */
773
774         float startsize;
775         float startalpha;
776         float startjitter;
777         float startspacing;
778
779         BrushPainterCache cache;
780 };
781
782 BrushPainter *brush_painter_new(Scene *scene, Brush *brush)
783 {
784         BrushPainter *painter= MEM_callocN(sizeof(BrushPainter), "BrushPainter");
785
786         painter->brush= brush;
787         painter->scene= scene;
788         painter->firsttouch= 1;
789         painter->cache.lastsize= -1; /* force ibuf create in refresh */
790
791         painter->startsize = brush_size(scene, brush);
792         painter->startalpha = brush_alpha(scene, brush);
793         painter->startjitter = brush->jitter;
794         painter->startspacing = brush->spacing;
795
796         return painter;
797 }
798
799 void brush_painter_require_imbuf(BrushPainter *painter, short flt, short texonly, int size)
800 {
801         if ((painter->cache.flt != flt) || (painter->cache.size != size) ||
802                 ((painter->cache.texonly != texonly) && texonly)) {
803                 if (painter->cache.ibuf) IMB_freeImBuf(painter->cache.ibuf);
804                 if (painter->cache.maskibuf) IMB_freeImBuf(painter->cache.maskibuf);
805                 painter->cache.ibuf= painter->cache.maskibuf= NULL;
806                 painter->cache.lastsize= -1; /* force ibuf create in refresh */
807         }
808
809         if (painter->cache.flt != flt) {
810                 if (painter->cache.texibuf) IMB_freeImBuf(painter->cache.texibuf);
811                 painter->cache.texibuf= NULL;
812                 painter->cache.lastsize= -1; /* force ibuf create in refresh */
813         }
814
815         painter->cache.size= size;
816         painter->cache.flt= flt;
817         painter->cache.texonly= texonly;
818         painter->cache.enabled= 1;
819 }
820
821 void brush_painter_free(BrushPainter *painter)
822 {
823         Brush *brush = painter->brush;
824
825         brush_set_size(painter->scene, brush, painter->startsize);
826         brush_set_alpha(painter->scene, brush, painter->startalpha);
827         brush->jitter = painter->startjitter;
828         brush->spacing = painter->startspacing;
829
830         if (painter->cache.ibuf) IMB_freeImBuf(painter->cache.ibuf);
831         if (painter->cache.texibuf) IMB_freeImBuf(painter->cache.texibuf);
832         if (painter->cache.maskibuf) IMB_freeImBuf(painter->cache.maskibuf);
833         MEM_freeN(painter);
834 }
835
836 static void brush_painter_do_partial(BrushPainter *painter, ImBuf *oldtexibuf,
837                                      int x, int y, int w, int h, int xt, int yt,
838                                      const float pos[2])
839 {
840         Scene *scene= painter->scene;
841         Brush *brush= painter->brush;
842         ImBuf *ibuf, *maskibuf, *texibuf;
843         float *bf, *mf, *tf, *otf=NULL, xoff, yoff, xy[2], rgba[4];
844         unsigned char *b, *m, *t, *ot= NULL;
845         int dotexold, origx= x, origy= y;
846         const int radius= brush_size(painter->scene, brush);
847
848         xoff = -radius + 0.5f;
849         yoff = -radius + 0.5f;
850         xoff += (int)pos[0] - (int)painter->startpaintpos[0];
851         yoff += (int)pos[1] - (int)painter->startpaintpos[1];
852
853         ibuf = painter->cache.ibuf;
854         texibuf = painter->cache.texibuf;
855         maskibuf = painter->cache.maskibuf;
856
857         dotexold = (oldtexibuf != NULL);
858
859         /* not sure if it's actually needed or it's a mistake in coords/sizes
860            calculation in brush_painter_fixed_tex_partial_update(), but without this
861            limitation memory gets corrupted at fast strokes with quite big spacing (sergey) */
862         w = MIN2(w, ibuf->x);
863         h = MIN2(h, ibuf->y);
864
865         if (painter->cache.flt) {
866                 for (; y < h; y++) {
867                         bf = ibuf->rect_float + (y*ibuf->x + origx)*4;
868                         tf = texibuf->rect_float + (y*texibuf->x + origx)*4;
869                         mf = maskibuf->rect_float + (y*maskibuf->x + origx)*4;
870
871                         if (dotexold)
872                                 otf = oldtexibuf->rect_float + ((y - origy + yt)*oldtexibuf->x + xt)*4;
873
874                         for (x=origx; x < w; x++, bf+=4, mf+=4, tf+=4) {
875                                 if (dotexold) {
876                                         copy_v3_v3(tf, otf);
877                                         tf[3] = otf[3];
878                                         otf += 4;
879                                 }
880                                 else {
881                                         xy[0] = x + xoff;
882                                         xy[1] = y + yoff;
883
884                                         brush_sample_tex(scene, brush, xy, tf, 0);
885                                 }
886
887                                 bf[0] = tf[0]*mf[0];
888                                 bf[1] = tf[1]*mf[1];
889                                 bf[2] = tf[2]*mf[2];
890                                 bf[3] = tf[3]*mf[3];
891                         }
892                 }
893         }
894         else {
895                 for (; y < h; y++) {
896                         b = (unsigned char *)ibuf->rect + (y*ibuf->x + origx)*4;
897                         t = (unsigned char *)texibuf->rect + (y*texibuf->x + origx)*4;
898                         m = (unsigned char *)maskibuf->rect + (y*maskibuf->x + origx)*4;
899
900                         if (dotexold)
901                                 ot = (unsigned char *)oldtexibuf->rect + ((y - origy + yt)*oldtexibuf->x + xt)*4;
902
903                         for (x=origx; x < w; x++, b+=4, m+=4, t+=4) {
904                                 if (dotexold) {
905                                         t[0] = ot[0];
906                                         t[1] = ot[1];
907                                         t[2] = ot[2];
908                                         t[3] = ot[3];
909                                         ot += 4;
910                                 }
911                                 else {
912                                         xy[0] = x + xoff;
913                                         xy[1] = y + yoff;
914
915                                         brush_sample_tex(scene, brush, xy, rgba, 0);
916                                         rgba_float_to_uchar(t, rgba);
917                                 }
918
919                                 b[0] = t[0]*m[0]/255;
920                                 b[1] = t[1]*m[1]/255;
921                                 b[2] = t[2]*m[2]/255;
922                                 b[3] = t[3]*m[3]/255;
923                         }
924                 }
925         }
926 }
927
928 static void brush_painter_fixed_tex_partial_update(BrushPainter *painter, const float pos[2])
929 {
930         const Scene *scene= painter->scene;
931         Brush *brush= painter->brush;
932         BrushPainterCache *cache= &painter->cache;
933         ImBuf *oldtexibuf, *ibuf;
934         int imbflag, destx, desty, srcx, srcy, w, h, x1, y1, x2, y2;
935         const int diameter= 2*brush_size(scene, brush);
936
937         imbflag= (cache->flt)? IB_rectfloat: IB_rect;
938         if (!cache->ibuf)
939                 cache->ibuf= IMB_allocImBuf(diameter, diameter, 32, imbflag);
940         ibuf= cache->ibuf;
941
942         oldtexibuf= cache->texibuf;
943         cache->texibuf= IMB_allocImBuf(diameter, diameter, 32, imbflag);
944
945         if (oldtexibuf) {
946                 srcx= srcy= 0;
947                 destx= (int)painter->lastpaintpos[0] - (int)pos[0];
948                 desty= (int)painter->lastpaintpos[1] - (int)pos[1];
949                 w= oldtexibuf->x;
950                 h= oldtexibuf->y;
951
952                 IMB_rectclip(cache->texibuf, oldtexibuf, &destx, &desty, &srcx, &srcy, &w, &h);
953         }
954         else {
955                 srcx= srcy= 0;
956                 destx= desty= 0;
957                 w= h= 0;
958         }
959         
960         x1= destx;
961         y1= desty;
962         x2= destx+w;
963         y2= desty+h;
964
965         /* blend existing texture in new position */
966         if ((x1 < x2) && (y1 < y2))
967                 brush_painter_do_partial(painter, oldtexibuf, x1, y1, x2, y2, srcx, srcy, pos);
968
969         if (oldtexibuf)
970                 IMB_freeImBuf(oldtexibuf);
971
972         /* sample texture in new areas */
973         if ((0 < x1) && (0 < ibuf->y))
974                 brush_painter_do_partial(painter, NULL, 0, 0, x1, ibuf->y, 0, 0, pos);
975         if ((x2 < ibuf->x) && (0 < ibuf->y))
976                 brush_painter_do_partial(painter, NULL, x2, 0, ibuf->x, ibuf->y, 0, 0, pos);
977         if ((x1 < x2) && (0 < y1))
978                 brush_painter_do_partial(painter, NULL, x1, 0, x2, y1, 0, 0, pos);
979         if ((x1 < x2) && (y2 < ibuf->y))
980                 brush_painter_do_partial(painter, NULL, x1, y2, x2, ibuf->y, 0, 0, pos);
981 }
982
983 static void brush_painter_refresh_cache(BrushPainter *painter, const float pos[2], int use_color_correction)
984 {
985         const Scene *scene= painter->scene;
986         Brush *brush= painter->brush;
987         BrushPainterCache *cache= &painter->cache;
988         MTex *mtex= &brush->mtex;
989         int size;
990         short flt;
991         const int diameter= 2*brush_size(scene, brush);
992         const float alpha= brush_alpha(scene, brush);
993
994         if (diameter != cache->lastsize ||
995                 alpha != cache->lastalpha ||
996                 brush->jitter != cache->lastjitter)
997         {
998                 if (cache->ibuf) {
999                         IMB_freeImBuf(cache->ibuf);
1000                         cache->ibuf= NULL;
1001                 }
1002                 if (cache->maskibuf) {
1003                         IMB_freeImBuf(cache->maskibuf);
1004                         cache->maskibuf= NULL;
1005                 }
1006
1007                 flt= cache->flt;
1008                 size= (cache->size)? cache->size: diameter;
1009
1010                 if (brush->flag & BRUSH_FIXED_TEX) {
1011                         brush_imbuf_new(scene, brush, flt, 3, size, &cache->maskibuf, use_color_correction);
1012                         brush_painter_fixed_tex_partial_update(painter, pos);
1013                 }
1014                 else
1015                         brush_imbuf_new(scene, brush, flt, 2, size, &cache->ibuf, use_color_correction);
1016
1017                 cache->lastsize= diameter;
1018                 cache->lastalpha= alpha;
1019                 cache->lastjitter= brush->jitter;
1020         }
1021         else if ((brush->flag & BRUSH_FIXED_TEX) && mtex && mtex->tex) {
1022                 int dx = (int)painter->lastpaintpos[0] - (int)pos[0];
1023                 int dy = (int)painter->lastpaintpos[1] - (int)pos[1];
1024
1025                 if ((dx != 0) || (dy != 0))
1026                         brush_painter_fixed_tex_partial_update(painter, pos);
1027         }
1028 }
1029
1030 void brush_painter_break_stroke(BrushPainter *painter)
1031 {
1032         painter->firsttouch= 1;
1033 }
1034
1035 static void brush_apply_pressure(BrushPainter *painter, Brush *brush, float pressure)
1036 {
1037         if (brush_use_alpha_pressure(painter->scene, brush)) 
1038                 brush_set_alpha(painter->scene, brush, MAX2(0.0f, painter->startalpha*pressure));
1039         if (brush_use_size_pressure(painter->scene, brush))
1040                 brush_set_size(painter->scene, brush, MAX2(1.0f, painter->startsize*pressure));
1041         if (brush->flag & BRUSH_JITTER_PRESSURE)
1042                 brush->jitter = MAX2(0.0f, painter->startjitter*pressure);
1043         if (brush->flag & BRUSH_SPACING_PRESSURE)
1044                 brush->spacing = MAX2(1.0f, painter->startspacing*(1.5f-pressure));
1045 }
1046
1047 void brush_jitter_pos(const Scene *scene, Brush *brush, const float pos[2], float jitterpos[2])
1048 {
1049         int use_jitter= brush->jitter != 0;
1050
1051         /* jitter-ed brush gives weird and unpredictable result for this
1052            kinds of stroke, so manyally disable jitter usage (sergey) */
1053         use_jitter &= (brush->flag & (BRUSH_RESTORE_MESH|BRUSH_ANCHORED)) == 0;
1054
1055         if (use_jitter) {
1056                 float rand_pos[2];
1057                 const int radius= brush_size(scene, brush);
1058                 const int diameter= 2*radius;
1059
1060                 // find random position within a circle of diameter 1
1061                 do {
1062                         rand_pos[0] = BLI_frand()-0.5f;
1063                         rand_pos[1] = BLI_frand()-0.5f;
1064                 } while (len_v2(rand_pos) > 0.5f);
1065
1066                 jitterpos[0] = pos[0] + 2*rand_pos[0]*diameter*brush->jitter;
1067                 jitterpos[1] = pos[1] + 2*rand_pos[1]*diameter*brush->jitter;
1068         }
1069         else {
1070                 copy_v2_v2(jitterpos, pos);
1071         }
1072 }
1073
1074 int brush_painter_paint(BrushPainter *painter, BrushFunc func, const float pos[2], double time, float pressure,
1075                         void *user, int use_color_correction)
1076 {
1077         Scene *scene= painter->scene;
1078         Brush *brush= painter->brush;
1079         int totpaintops= 0;
1080
1081         if (pressure == 0.0f) {
1082                 if(painter->lastpressure) // XXX - hack, operator misses
1083                         pressure= painter->lastpressure;
1084                 else
1085                         pressure = 1.0f;        /* zero pressure == not using tablet */
1086         }
1087         if (painter->firsttouch) {
1088                 /* paint exactly once on first touch */
1089                 painter->startpaintpos[0]= pos[0];
1090                 painter->startpaintpos[1]= pos[1];
1091
1092                 brush_apply_pressure(painter, brush, pressure);
1093                 if (painter->cache.enabled)
1094                         brush_painter_refresh_cache(painter, pos, use_color_correction);
1095                 totpaintops += func(user, painter->cache.ibuf, pos, pos);
1096                 
1097                 painter->lasttime= time;
1098                 painter->firsttouch= 0;
1099                 painter->lastpaintpos[0]= pos[0];
1100                 painter->lastpaintpos[1]= pos[1];
1101         }
1102 #if 0
1103         else if (painter->brush->flag & BRUSH_AIRBRUSH) {
1104                 float spacing, step, paintpos[2], dmousepos[2], len;
1105                 double starttime, curtime= time;
1106
1107                 /* compute brush spacing adapted to brush size */
1108                 spacing= brush->rate; //radius*brush->spacing*0.01f;
1109
1110                 /* setup starting time, direction vector and accumulated time */
1111                 starttime= painter->accumtime;
1112                 sub_v2_v2v2(dmousepos, pos, painter->lastmousepos);
1113                 len= normalize_v2(dmousepos);
1114                 painter->accumtime += curtime - painter->lasttime;
1115
1116                 /* do paint op over unpainted time distance */
1117                 while (painter->accumtime >= spacing) {
1118                         step= (spacing - starttime)*len;
1119                         paintpos[0]= painter->lastmousepos[0] + dmousepos[0]*step;
1120                         paintpos[1]= painter->lastmousepos[1] + dmousepos[1]*step;
1121
1122                         if (painter->cache.enabled)
1123                                 brush_painter_refresh_cache(painter);
1124                         totpaintops += func(user, painter->cache.ibuf,
1125                                 painter->lastpaintpos, paintpos);
1126
1127                         painter->lastpaintpos[0]= paintpos[0];
1128                         painter->lastpaintpos[1]= paintpos[1];
1129                         painter->accumtime -= spacing;
1130                         starttime -= spacing;
1131                 }
1132                 
1133                 painter->lasttime= curtime;
1134         }
1135 #endif
1136         else {
1137                 float startdistance, spacing, step, paintpos[2], dmousepos[2], finalpos[2];
1138                 float t, len, press;
1139                 const int radius= brush_size(scene, brush);
1140
1141                 /* compute brush spacing adapted to brush radius, spacing may depend
1142                    on pressure, so update it */
1143                 brush_apply_pressure(painter, brush, painter->lastpressure);
1144                 spacing= MAX2(1.0f, radius)*brush->spacing*0.01f;
1145
1146                 /* setup starting distance, direction vector and accumulated distance */
1147                 startdistance= painter->accumdistance;
1148                 sub_v2_v2v2(dmousepos, pos, painter->lastmousepos);
1149                 len= normalize_v2(dmousepos);
1150                 painter->accumdistance += len;
1151
1152                 if (brush->flag & BRUSH_SPACE) {
1153                         /* do paint op over unpainted distance */
1154                         while ((len > 0.0f) && (painter->accumdistance >= spacing)) {
1155                                 step= spacing - startdistance;
1156                                 paintpos[0]= painter->lastmousepos[0] + dmousepos[0]*step;
1157                                 paintpos[1]= painter->lastmousepos[1] + dmousepos[1]*step;
1158
1159                                 t = step/len;
1160                                 press= (1.0f-t)*painter->lastpressure + t*pressure;
1161                                 brush_apply_pressure(painter, brush, press);
1162                                 spacing= MAX2(1.0f, radius)*brush->spacing*0.01f;
1163
1164                                 brush_jitter_pos(scene, brush, paintpos, finalpos);
1165
1166                                 if (painter->cache.enabled)
1167                                         brush_painter_refresh_cache(painter, finalpos, use_color_correction);
1168
1169                                 totpaintops +=
1170                                         func(user, painter->cache.ibuf, painter->lastpaintpos, finalpos);
1171
1172                                 painter->lastpaintpos[0]= paintpos[0];
1173                                 painter->lastpaintpos[1]= paintpos[1];
1174                                 painter->accumdistance -= spacing;
1175                                 startdistance -= spacing;
1176                         }
1177                 } else {
1178                         brush_jitter_pos(scene, brush, pos, finalpos);
1179
1180                         if (painter->cache.enabled)
1181                                 brush_painter_refresh_cache(painter, finalpos, use_color_correction);
1182
1183                         totpaintops += func(user, painter->cache.ibuf, pos, finalpos);
1184
1185                         painter->lastpaintpos[0]= pos[0];
1186                         painter->lastpaintpos[1]= pos[1];
1187                         painter->accumdistance= 0;
1188                 }
1189
1190                 /* do airbrush paint ops, based on the number of paint ops left over
1191                    from regular painting. this is a temporary solution until we have
1192                    accurate time stamps for mouse move events */
1193                 if (brush->flag & BRUSH_AIRBRUSH) {
1194                         double curtime= time;
1195                         double painttime= brush->rate*totpaintops;
1196
1197                         painter->accumtime += curtime - painter->lasttime;
1198                         if (painter->accumtime <= painttime)
1199                                 painter->accumtime= 0.0;
1200                         else
1201                                 painter->accumtime -= painttime;
1202
1203                         while (painter->accumtime >= (double)brush->rate) {
1204                                 brush_apply_pressure(painter, brush, pressure);
1205
1206                                 brush_jitter_pos(scene, brush, pos, finalpos);
1207
1208                                 if (painter->cache.enabled)
1209                                         brush_painter_refresh_cache(painter, finalpos, use_color_correction);
1210
1211                                 totpaintops +=
1212                                         func(user, painter->cache.ibuf, painter->lastmousepos, finalpos);
1213                                 painter->accumtime -= (double)brush->rate;
1214                         }
1215
1216                         painter->lasttime= curtime;
1217                 }
1218         }
1219
1220         painter->lastmousepos[0]= pos[0];
1221         painter->lastmousepos[1]= pos[1];
1222         painter->lastpressure= pressure;
1223
1224         brush_set_alpha(scene, brush, painter->startalpha);
1225         brush_set_size(scene, brush, painter->startsize);
1226         brush->jitter = painter->startjitter;
1227         brush->spacing = painter->startspacing;
1228
1229         return totpaintops;
1230 }
1231
1232 /* Uses the brush curve control to find a strength value between 0 and 1 */
1233 float brush_curve_strength_clamp(Brush *br, float p, const float len)
1234 {
1235         if(p >= len)    return 0;
1236         else                    p= p/len;
1237
1238         p= curvemapping_evaluateF(br->curve, 0, p);
1239         if(p < 0.0f)            p= 0.0f;
1240         else if(p > 1.0f)       p= 1.0f;
1241         return p;
1242 }
1243 /* same as above but can return negative values if the curve enables
1244  * used for sculpt only */
1245 float brush_curve_strength(Brush *br, float p, const float len)
1246 {
1247         if(p >= len)
1248                 p= 1.0f;
1249         else
1250                 p= p/len;
1251
1252         return curvemapping_evaluateF(br->curve, 0, p);
1253 }
1254
1255 /* TODO: should probably be unified with BrushPainter stuff? */
1256 unsigned int *brush_gen_texture_cache(Brush *br, int half_side)
1257 {
1258         unsigned int *texcache = NULL;
1259         MTex *mtex = &br->mtex;
1260         TexResult texres= {0};
1261         int hasrgb, ix, iy;
1262         int side = half_side * 2;
1263         
1264         if(mtex->tex) {
1265                 float x, y, step = 2.0 / side, co[3];
1266
1267                 texcache = MEM_callocN(sizeof(int) * side * side, "Brush texture cache");
1268
1269                 BKE_image_get_ibuf(mtex->tex->ima, NULL);
1270                 
1271                 /*do normalized cannonical view coords for texture*/
1272                 for (y=-1.0, iy=0; iy<side; iy++, y += step) {
1273                         for (x=-1.0, ix=0; ix<side; ix++, x += step) {
1274                                 co[0]= x;
1275                                 co[1]= y;
1276                                 co[2]= 0.0f;
1277                                 
1278                                 /* This is copied from displace modifier code */
1279                                 hasrgb = multitex_ext(mtex->tex, co, NULL, NULL, 0, &texres);
1280                         
1281                                 /* if the texture gave an RGB value, we assume it didn't give a valid
1282                                  * intensity, so calculate one (formula from do_material_tex).
1283                                  * if the texture didn't give an RGB value, copy the intensity across
1284                                  */
1285                                 if(hasrgb & TEX_RGB)
1286                                         texres.tin = (0.35f * texres.tr + 0.45f *
1287                                                                   texres.tg + 0.2f * texres.tb);
1288
1289                                 texres.tin = texres.tin * 255.0f;
1290                                 ((char*)texcache)[(iy*side+ix)*4] = (char)texres.tin;
1291                                 ((char*)texcache)[(iy*side+ix)*4+1] = (char)texres.tin;
1292                                 ((char*)texcache)[(iy*side+ix)*4+2] = (char)texres.tin;
1293                                 ((char*)texcache)[(iy*side+ix)*4+3] = (char)texres.tin;
1294                         }
1295                 }
1296         }
1297
1298         return texcache;
1299 }
1300
1301 /**** Radial Control ****/
1302 struct ImBuf *brush_gen_radial_control_imbuf(Brush *br)
1303 {
1304         ImBuf *im = MEM_callocN(sizeof(ImBuf), "radial control texture");
1305         unsigned int *texcache;
1306         int side = 128;
1307         int half = side / 2;
1308         int i, j;
1309
1310         texcache = brush_gen_texture_cache(br, half);
1311         im->rect_float = MEM_callocN(sizeof(float) * side * side, "radial control rect");
1312         im->x = im->y = side;
1313
1314         for(i=0; i<side; ++i) {
1315                 for(j=0; j<side; ++j) {
1316                         float magn= sqrt(pow(i - half, 2) + pow(j - half, 2));
1317                         im->rect_float[i*side + j]= brush_curve_strength_clamp(br, magn, half);
1318                 }
1319         }
1320
1321         /* Modulate curve with texture */
1322         if(texcache) {
1323                 for(i=0; i<side; ++i) {
1324                         for(j=0; j<side; ++j) {
1325                                 const int col= texcache[i*side+j];
1326                                 im->rect_float[i*side+j]*= (((char*)&col)[0]+((char*)&col)[1]+((char*)&col)[2])/3.0f/255.0f;
1327                         }
1328                 }
1329
1330                 MEM_freeN(texcache);
1331         }
1332
1333         return im;
1334 }